利用ShellExecuteEx Call bat檔 |
尚未結案
|
aries0616
一般會員 ![]() ![]() 發表:2 回覆:0 積分:0 註冊:2011-07-02 發送簡訊給我 |
HI 小弟目前利用ShellExecuteEx這個函數來執行bat檔,但確無法正確執行其內容,顯示請問有人知曉如何解決嗎? Bat檔內容如下 @echo off echo set sh=WScript.CreateObject("WScript.Shell") >telnet_tmp.vbs echo sh.SendKeys "XXXX{ENTER}" >>telnet_tmp.vbs echo sh.SendKeys "YYYY{ENTER}">>telnet_tmp.vbs start C:\Windows\System32\telnet localhost del telnet_tmp.vbs [code delphi] ZeroMemory(@ExecInfo,SizeOf(ExecInfo)); with ExecInfo do begin cbSize := SizeOf(ExecInfo); fMask := SEE_MASK_NOCLOSEPROCESS; lpVerb := 'open'; lpFile := PWideChar(path); Wnd := self.Handle; nShow := SW_SHOWNORMAL; end; ShellExecuteEx(@ExecInfo); WaitForSingleObject(ExecInfo.hProcess, INFINITE); DeleteFile(path); [/code] 編輯記錄
aries0616 重新編輯於 2011-07-02 09:48:53, 註解 無‧
|
herbert2
尊榮會員 ![]() ![]() ![]() ![]() ![]() ![]() 發表:58 回覆:640 積分:894 註冊:2004-04-16 發送簡訊給我 |
|
mitchellhu
一般會員 ![]() ![]() 發表:23 回覆:53 積分:15 註冊:2007-06-12 發送簡訊給我 |
|
blue
中階會員 ![]() ![]() ![]() 發表:170 回覆:136 積分:81 註冊:2002-04-15 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |