有個前題,就是adb.exe,能識別若干引數。
uj5u.com熱心網友回復:
傳遞過去的引數對方可以通過 Paramter(1) 讀取到,對方又通過TStringList的CommText分割再決議,所可能是你引數中空格的問題或者命令不對,最好看看adb.exe里面的原始碼怎么決議這個引數的,然后怎么執行的。
//借用
var FileNam,sParam:string;
begin
FileName:='C:\Documents and Settings\Administrator\抄表\ADB\adb.exe';
sParam:='adb push D:\抄表\METER.dbf sdcard/XFDataBase/DBF_Input';
if Shellexecute(handle,'open',pchar(FileName),pchar(sParam),nil,sw_shownormal)<32 then
begin
showmessage('打開XX失敗!');
exit;
end;
end;
uj5u.com熱心網友回復:
與adb.exe編程者聯系一下,引數的傳遞方式。否則自己胡亂除錯,是搞不出來的。
uj5u.com熱心網友回復:
今日上午呼叫一程式,出現類似的情況。已經解決,所以建議你:var FileNam,sParam:string;
begin
FileName:='C:\Documents and Settings\Administrator\抄表\ADB\adb.exe';
sParam:='adb push D:\抄表\METER.dbf sdcard/XFDataBase/DBF_Input';
WinExec(pchar(FileName+' '+sParam), SW_SHOW);
end;
試試。但愿成功。
轉載請註明出處,本文鏈接:https://www.uj5u.com/houduan/87395.html
上一篇:DELPHI 呼叫C DLL 問題,LPSTR* 什么替換型別,請高手指點。
下一篇:sql陳述句的問題
