发表回复 
CMDRet全后台执行并获取cmd回显【dll方式】
2014-10-07, 20 : 01 (这个帖子最后修改于: 2014-10-07 20 : 03 by thinkai.)
Thumbs Up CMDRet全后台执行并获取cmd回显【dll方式】
出处:http://www.autohotkey.com/board/topic/3489-cmdret-return-output-from-console-progs-dll-version/
最新版下载资源已不可用,这里po出3.1.1版的CMDRet。
相关链接:http://ahk8.com/thread-5281.html @robertL
示例代码:
代码: (全选)
; CMDret (DLL version 3.0 or greater required) examples

CMD := COMSPEC " /C set"

  VarSetCapacity(StrOut, 1000)
  hModule := DllCall("LoadLibrary", "str", "cmdret.dll","UInt")
  DllCall("lstrcpyA", "str", StrOut, "int", DllCall("cmdret.dll\RunRedirect", "str", CMD))
  DllCall("FreeLibrary", "UInt", hModule)

  MsgBox %StrOut%



CMD := "ipconfig /all"

  VarSetCapacity(StrOut, 1000)
  hModule := DllCall("LoadLibrary", "str", "cmdret.dll","UInt")
  DllCall("lstrcpyA", "str", StrOut, "int", DllCall("cmdret.dll\RunRedirect", "str", CMD))
  DllCall("FreeLibrary", "UInt", hModule)

  MsgBox %StrOut%


附件
.zip  cmdret_dll.zip (大小: 5.45 KB / 下载: 42)

bolg:thinkai.net 百度知道sunshinezxk 热爱Autohotkey5年。
访问这个用户的网站 查找这个用户的全部帖子
表示感谢 引用并回复 移动视图置页面顶端
[+] 4用户表示感谢thinkai
2015-04-12, 21 : 46
RE: CMDRet全后台执行并获取cmd回显【dll方式】
; http://www.autohotkey.com/board/topic/91...ntry578882
objShell := ComObjCreate("WScript.Shell")
objExec := objShell.Exec( ComSpec " /c ipconfig" )
strStdOut := ""
while, !objExec.StdOut.AtEndOfStream
strStdOut := objExec.StdOut.ReadAll()
msgbox, 262208, a,%strStdOut%
exitapp

;--- write to file ---------------
F1=%a_scriptdir%\ipconfig_test.txt
runwait,%comspec% /c ipconfig /all >"%f1%",,hide
run,%f1%
return
查找这个用户的全部帖子
表示感谢 引用并回复 移动视图置页面顶端
[+] 3用户表示感谢cixiplc
发表回复 


论坛跳转:


联系我们 | Autohotkey 中文站 | 回到顶部 | 回到正文区 | 精简(归档)模式 | RSS 聚合