无忧启动论坛

标题: 100元求高手写个小程序 [打印本页]

作者: zhxy9804 时间: 2017-11-6 11:04
标题: 100元求高手写个小程序
本帖最后由 zhxy9804 于 2017-11-6 14:17 编辑

因为工作需要，本人需要一个实现如下功能的小程序，
要求如下，
1.程序最好别依赖.net之类，能独立运行，
2.程序读取配置文件来决定是否执行
3.配置文件格式如下123.ini

[1]
run=1
exec=1.exe
[2]
run=0
exec=2.exe
[3]
.....
【】里面的是分隔符，run=1就执行下面的exec需要执行的文件，run=0就不需要执行
4.给源码，我好照葫芦画瓢，因为这种程序我认为对懂的来说，毫无私有价值

最后，有愿意做的，加我QQ 35585816跟我联系吧，本人版主，做好了肯定给钱！
谢谢啦！
最后总结一下，给两个加我QQ的发了红包，每人50，还有感谢免费发代码的，也加我好友我给你转50元红包吧

webwxgetmsgimg (1).jpg (63.56 KB, 下载次数: 43)

作者: tt911 时间: 2017-11-6 11:12
我给你做个语音视频
保证你从入门到精通ahk 到编译输出带有热键的。。。你的要求的程序
马上自己完成剩下的部分
这活我接了！

作者: 窄口牛 时间: 2017-11-6 11:16
这个批处理就能做到吧
你要在什么环境适用？

作者: zhxy9804 时间: 2017-11-6 11:21

窄口牛发表于 2017-11-6 11:16
这个批处理就能做到吧
你要在什么环境适用？

批处理不好办吧？

作者: kteggplant 时间: 2017-11-6 11:29
对语言有要求吗？VC++2015可以吗？

作者: 窄口牛 时间: 2017-11-6 11:31
问题不大，主要是你要用于什么环境。

作者: guies 时间: 2017-11-6 11:53
不會寫程序，但會寫一點 Autoit，這個對 Autoit 很簡單，不過 Autoit 寫的程式容易被防毒查殺。
還有我認為這種程式用 Delphi，VB6 寫比較好，因為文件小又任何系統適用，
不用另裝 Runtime。

作者: 527104427 时间: 2017-11-6 12:03
本帖最后由 527104427 于 2017-11-6 13:49 编辑

为何不用PECMD来做呢？就几行代码，超级简单：

示例.7z (912.17 KB, 下载次数: 9)
声明：此方法免费，技术来源于mdyblog，要赞助找m大

#code=936T950
ENVI^ EnviMode=1
ENVI^ ForceLocal=1
SET$ &NL=0d 0a
READ %CurDir%\123.ini,**,&abcd
ENVI &N=1
LOOP #1=1,
{*
      LPOS* * ,&A=run=,%&N%,&abcd
      IFEX $%&A%>0,
      {
            READ -*,%&A%,&B,&abcd
            MSTR * -delims:= &C=<2>&B
            IFEX $%&C%=1,
            {
                     CALC #&D=%&A%+1
                     READ -*,%&D%,&E,&abcd
                     MSTR * -delims:= &F=<2>&E
                      EXEC =%&F%
            }
      }!
      {
            EXIT
      }
      CALC #&N=%&N%+1
}

用reshacker打开“示例.exe”，点击script-->101-->2052，即可编辑源码。

作者: 2012duanyongli 时间: 2017-11-6 12:05
写这么个小程序都100元，楼主富的流油...

作者: haduke 时间: 2017-11-6 12:15
楼主你懂程序吗?这样的程序几分钟搞定

作者: 窄口牛 时间: 2017-11-6 12:16
版主身责付费收劳，提升论坛氛围。

作者: ku588 时间: 2017-11-6 12:21
本帖最后由 ku588 于 2017-11-6 12:23 编辑

支持版主言出必行，如今这个年代出100元并不算多，
关键能解决自己问题就行，不过要优选，无忧人才辈出，让有才有用武之地！

作者: nttwqz 时间: 2017-11-6 12:34
我有现成的批处理，和楼主的类似，Win7PE里面就内置，用于实现根据U盘的配置文件临时自定义WinPE的分辨率，壁纸，切换双拼全拼。

作者: slore 时间: 2017-11-6 12:46

@echo off&&setlocal ENABLEDELAYEDEXPANSION
call :load_ini abc
echo Run:%LI_run%
if defined LI_exec echo EXEC:%LI_exec%
call :load_ini def
echo Run:%LI_run%
if defined LI_exec echo EXEC:%LI_exec%
:load_ini
set name=%1
set LI_run=0
set LI_exec=
set /a SET_ON=0
for /f "delims=" %%i in (123.ini) do (
if !SET_ON! EQU 1 (
set line=%%i
if "x!line:~0,1!"=="x[" goto :EOF
set LI_%%i
)
if "x%%i"=="x[%name%]" set /a SET_ON=1
)

复制代码

10行代码100块？工作要是也是这个钱就好了。。。
(此代码白送)

作者: zhxy9804 时间: 2017-11-6 12:50

slore 发表于 2017-11-6 12:46
10行代码100块？工作要是也是这个钱就好了。。。
(此代码白送)

就这么简单吗？

作者: wuyouaaa 时间: 2017-11-6 13:10
本帖最后由 wuyouaaa 于 2017-11-6 13:11 编辑

#define iniFile "123.ini"
#include <stdlib.h>
#include <windows.h>
int main() {
  char buf[MAX_PATH];
  for (int i = 1; i < INT_MAX; i++) {
UINT run = GetPrivateProfileInt(itoa(i), "run", 86456223, iniFile);
if (run == 86456223) return 0;
else if (run == 1 && GetPrivateProfileString(itoa(i), "run"，
      "", buf, MAX_PATH, iniFile) > 0) {
   system(buf);
}
  }
  return 0;
}

作者: zhxy9804 时间: 2017-11-6 13:31

slore 发表于 2017-11-6 12:46
10行代码100块？工作要是也是这个钱就好了。。。
(此代码白送)

加我QQ发你红包，还需要你润色一下

作者: zhxy9804 时间: 2017-11-6 13:38

527104427 发表于 2017-11-6 12:03
为何不用PECMD来做呢？就几行代码，超级简单：

#code=936T950

必须分开啊，不分开不好最方便的编辑

作者: 527104427 时间: 2017-11-6 13:47

zhxy9804 发表于 2017-11-6 13:38
必须分开啊，不分开不好最方便的编辑

这个简单：打开记事本，将代码保存为“示例.exe.autoapp.wcs”，pecmd改名为“示例.exe”，放于同目录即可。关键是wcs要与exe同名，双击exe即可运行。wcs用记事本编辑

声明：此方法免费，技术来源于mdyblog，要赞助找m大

作者: ku588 时间: 2017-11-6 14:29
本帖最后由 ku588 于 2017-11-6 15:43 编辑

哎呀呀，版主就是版主，不但兑现承诺，而且处事很公道！

这叫有求必应，各取所需，很公道！就怕给钱咱没本事赚！

赞.jpg (37.96 KB, 下载次数: 32)

作者: zhxy9804 时间: 2017-11-6 15:05

527104427 发表于 2017-11-6 12:03
为何不用PECMD来做呢？就几行代码，超级简单：
声明：此方法免费，技术来源于mdyblog，要赞助找m大

测试的确成功，不过貌似是一个接一个的运行，问题我程序都是常驻的，怎么改成一起运行?

作者: 527104427 时间: 2017-11-6 15:13

zhxy9804 发表于 2017-11-6 15:05
测试的确成功，不过貌似是一个接一个的运行，问题我程序都是常驻的，怎么改成一起运行?

红色代码部分，去掉等于号。表示不等待运行

作者: zhxy9804 时间: 2017-11-6 15:20

527104427 发表于 2017-11-6 15:13
红色代码部分，去掉等于号。表示不等待运行

好，加入内置代码这个pecmd，是不是只能干这件事了，别的事情干不了了？
还有我修改任何一个pecmd程序都可以吧？

作者: 527104427 时间: 2017-11-6 15:29
本帖最后由 527104427 于 2017-11-6 15:31 编辑

zhxy9804 发表于 2017-11-6 15:20
好，加入内置代码这个pecmd，是不是只能干这件事了，别的事情干不了了？
还有我修改任何一个pecmd程序都 ...

是的，只能干这事了，如果你了解多线程，可以再开一个线程干别的事。
pecmd一定要最新版，从作者网盘下载，日期最新的就是。

另外纠正一下，这不叫内置代码，这是外置代码。因为pecmd只是改了个名字

作者: zhxy9804 时间: 2017-11-6 15:39

527104427 发表于 2017-11-6 15:29
是的，只能干这事了，如果你了解多线程，可以再开一个线程干别的事。
pecmd一定要最新版，从作者网盘下 ...

好的，多谢！原来如此，以后还往多多指教！

作者: zhxy9804 时间: 2017-11-6 16:16

527104427 发表于 2017-11-6 15:29
是的，只能干这事了，如果你了解多线程，可以再开一个线程干别的事。
pecmd一定要最新版，从作者网盘下 ...

我下载了一个最新版本的无imdisk的，怎么无法修改101 2052，102倒是可以改，但是不应该改吧，

作者: 527104427 时间: 2017-11-6 16:43

zhxy9804 发表于 2017-11-6 16:16
我下载了一个最新版本的无imdisk的，怎么无法修改101 2052，102倒是可以改，但是不应该改吧，

要用pecmd_原始.exe，其他的都加了壳

作者: zhxy9804 时间: 2017-11-6 17:08

527104427 发表于 2017-11-6 16:43
要用pecmd_原始.exe，其他的都加了壳

明白，明白了！非常感谢，

欢迎光临无忧启动论坛 (http://wuyou.net/)