执行cmd

晴雯晴雯

.版本 2
.支持库 spec
.支持库 EThread
                调试输出 (“renew”)
                cmdtext ＝ “cmd /c” ＋ “ipconfig /renew” ＋ “>>c:\temp.txt”
                运行 (cmdtext, 真, 1)
                filehd ＝ 打开文件 (“c:\temp.txt”, 1, )
                编辑框3.加入文本 (读入文本 (filehd, ))
                关闭文件 (filehd)
                删除文件 (“c:\temp.txt”)
                编辑框3.加入文本 (到文本 (取现行时间 ()) ＋ “:成功”)
                启动线程 (&addvise, , )



win7运行这个命令会失败啊，XP可以

红颜脸庞仍娇俏

a782464295 发表于 2016-4-13 15:52
我直接提示拒绝访问

杀软阻止了吧，或者你是后来创建的用户组，没有权限？

红颜脸庞仍娇俏

手动看看那个问题

晴雯晴雯

QQ2388300238 发表于 2016-4-13 15:50
手动看看那个问题

我直接提示拒绝访问

晴雯晴雯

QQ2388300238 发表于 2016-4-13 15:55
杀软阻止了吧，或者你是后来创建的用户组，没有权限？

好像有策咯组保护，不写出txt就没事，不过没办法获得返回的文本了

379061296

你在看看是哪里写错了，你这个代码原来是我写的，不知道你怎么改成这个样子了，第1个使用系统自带，第2个使用精易模块

  

子程序名	返回值类型	公开	备 注
CMD	文本型		支持多线程操作
参数名	类 型	参考	可空	数组	备 注
命令行文本	文本型

变量名	类 型	静态	数组	备 注
temp	文本型
cmdtext	文本型
filehd	文本型

temp ＝ 取临时文件名 ()
cmdtext ＝ “cmd /c ” ＋ 命令行文本 ＋ “ > ” ＋ temp
运行 (cmdtext, 真, 1)
filehd ＝ 到文本 (读入文件 (temp))
删除文件 (temp)
返回 (filehd)

子程序名	返回值类型	公开	备 注
CMD2	文本型		支持多线程操作
参数名	类 型	参考	可空	数组	备 注
命令行文本	文本型

变量名	类 型	静态	数组	备 注
filehd	文本型

filehd ＝ 系统_取DOS执行结果 (命令行文本)
返回 (filehd)

.版本 2<br /> <br /> .子程序 CMD, 文本型, 公开, 支持多线程操作<br /> .参数 命令行文本, 文本型<br /> .局部变量 temp, 文本型<br /> .局部变量 cmdtext, 文本型<br /> .局部变量 filehd, 文本型<br /> <br /> temp ＝ 取临时文件名 ()<br /> cmdtext ＝ “cmd /c ” ＋ 命令行文本 ＋ “ > ” ＋ temp<br /> 运行 (cmdtext, 真, 1)<br /> filehd ＝ 到文本 (读入文件 (temp))<br /> 删除文件 (temp)<br /> 返回 (filehd)<br /> <br /> <br /> .子程序 CMD2, 文本型, 公开, 支持多线程操作<br /> .参数 命令行文本, 文本型<br /> .局部变量 filehd, 文本型<br /> <br /> filehd ＝ 系统_取DOS执行结果 (命令行文本)<br /> 返回 (filehd)