au3脚本编译后在XP系统远行不了 【已解决】

爱火箭528

开发一个au3脚本编译后，在XP系统上面运行出错，XP系统是要注意什么嘛、、、

kk_lee69

回复 1# 爱火箭528

XP 不需要注意甚麼
重點是你的程式內容吧

請上程式

爱火箭528

回复 2# kk_lee69


    是这样的，我们做了一个项目：用au3脚本来实现plsql这个客户端代填，是通过页面调au3编译后的文件。在win 64位上是可以实现的，但是在XP上运行是就呼不起来、、

1361739590

通过页面调au3编译后的文件----页面有没有调用成功？
用au3脚本来实现plsql这个客户端代填---这个大概是怎么操作的。

爱火箭528

回复 4# 1361739590


    就是通过SSO来实现页面啊，在本地安装一个插件通过页面调au3啊。

kk_lee69

回复 5# 爱火箭528

聽起來像是 IE 版本上的問題吧

沒上 程式 想幫妳的也很難了

爱火箭528

回复 6# kk_lee69

1. 
   
2. 
   
3. 
   
4. 
   
5. #RequireAdmin
   
6. #Region ;**** 参数创建于 ACNWrapper_GUI ****
   
7. #AutoIt3Wrapper_outfile=ORA_PLSQL_V11.0_5950.exe
   
8. #EndRegion ;**** 参数创建于 ACNWrapper_GUI ****
   
9. #include <../utils.au3>
   
10. #include <../Debug.au3>
    
11. Opt("TrayIconHide", 1) ;0=show, 1=hide tray icon
    
12. 
    
13. If $CmdLine[0] == 15 Then
    
14. Local $net_sid = $CmdLine[1];
    
15. Local $net_ip = $CmdLine[2];
    
16. Local $net_port = $CmdLine[3];
    
17. Local $ip = $CmdLine[4];
    
18. Local $port = $CmdLine[5];
    
19. Local $user = $CmdLine[6];
    
20. Local $pwd = $CmdLine[7];
    
21. Local $sessionId = $CmdLine[8];
    
22. Local $fortIp = $CmdLine[9];
    
23. Local $type = $CmdLine[10];
    
24. Local $dabase_name = $CmdLine[11]; 数据库名
    
25. Local $net_style = $CmdLine[12];       
    
26. Local $Con_identity = $CmdLine[13];
    
27. Local $pid = $CmdLine[14];
    
28. Local $client = $CmdLine[15];
    
29. 
    
30. Local $len_ip = StringLen("t_ip=");
    
31. Local $aim_ip = StringTrimLeft($ip, $len_ip);
    
32. Local $len_port = StringLen("t_port=");
    
33. Local $aim_port = StringTrimLeft($port, $len_port);
    
34. Local $len_userId = StringLen("uid=");
    
35. Local $aim_userId = StringTrimLeft($user, $len_userId);
    
36. Local $len_pwd = StringLen("pwd=");
    
37. Local $aim_password = StringTrimLeft($pwd, $len_pwd);
    
38. Local $len_client = StringLen("client_ver=");
    
39. Local $aim_client = StringTrimLeft($client, $len_client);
    
40.    
    
41. Else
    
42.    MsgBox(1,"错误！","参数错误，num=" & $CmdLine[0]);
    
43.    Exit 13;
    
44. EndIf
    
45. 
    
46. Plsql();
    
47. 
    
48. ;启动程序
    
49. Func Plsql()
    
50.        
    
51.         ;_DebugSetup("ORA_PLSQL_V11.0_5950", False);
    
52.         _DebugReport (_DebugBugReportEnv());
    
53. 
    
54.    ; 运行客户端程序
    
55.    ;Local $pid = Run($plSQL_Rpath);
    
56.    If($net_style == 1) Then
    
57.                 $pid = $pid;
    
58.    ElseIf($net_style== 0) Then
    
59.                 ;读取plsql路径
    
60.                 Local $plSQL_Rpath = IniRead(@ScriptDir & "\db_path.ini", "path", "plsql", "ERROR") ;找到plsql安装根路径
    
61. 
    
62.                 If($plSQL_Rpath == "ERROR") Then
    
63.                         MsgBox(1,"错误！","未读取到plsql工具根路径");
    
64.                         Exit 20;
    
65.                 EndIf
    
66.           
    
67.                 $pid = Run($plSQL_Rpath);
    
68.    EndIf
    
69. 
    
70.    $ssolog = FileOpen(@ScriptDir & "\log\ssolog.txt", 10)
    
71.    _DebugReportVar("ssolog", $ssolog);
    
72.    ; 检查打开的文件可写
    
73.    If $ssolog = -1 Then
    
74.                 MsgBox(0, "错误", "ssolog.txt 不能打开文件.")
    
75.                 Exit
    
76.    EndIf
    
77. 
    
78.    FileWrite($ssolog, "["&@YEAR&"-"&@MON&"-"&@MDAY&" "&@HOUR&":"&@MIN&":"&@SEC&":"&@MSEC&"]"&"ORACALE-PLSQL:登录窗口正在打开"& @CRLF)
    
79. 
    
80.        
    
81. 
    
82.    ;新建连接
    
83.    BlockInput(1)
    
84.    WinActivate("[CLASS:TLogOnForm]");
    
85.    Local $rv = WinWait("[CLASS:TLogOnForm]","",20);
    
86.    
    
87.    If($rv == 0)Then
    
88.           BlockInput(0)
    
89.           MsgBox(1,"错误！","等待登录plsql窗口失败");
    
90.           FileClose($ssolog);
    
91.           Exit 10;
    
92.    EndIf
    
93.   
    
94.    WinSetState($rv, "", @SW_SHOW);
    
95. 
    
96.    FileWrite($ssolog, "["&@YEAR&"-"&@MON&"-"&@MDAY&" "&@HOUR&":"&@MIN&":"&@SEC&":"&@MSEC&"]"&"ORACALE-PLSQL:登录初始界面打开"& @CRLF)
    
97.    
    
98.    ;Sleep(1);
    
99.    
    
100.    FileWrite($ssolog, "["&@YEAR&"-"&@MON&"-"&@MDAY&" "&@HOUR&":"&@MIN&":"&@SEC&":"&@MSEC&"]"&"ORACALE-PLSQL:请求参数是"&$pid&","&$aim_userId&","&$aim_password&","&$dabase_name&","&$Con_identity& @CRLF)
     
101.    FileClose($ssolog)
     
102. 
     
103.    ;Send($aim_password);
     
104.    ;Sleep(1);
     
105.    
     
106.    BlockInput(1)
     
107.    __TransEngWrite();
     
108.    ControlSetText($rv, "", "TEdit2", $aim_userId);
     
109.    ControlSetText($rv, "", "TEdit1", $aim_password);
     
110.    ControlSetText($rv, "", "Edit1",  $dabase_name);
     
111.    ControlCommand($rv, "", "TComboBox2","SelectString", $Con_identity);
     
112.    
     
113.    ;连接
     
114.    ControlClick($rv, "", "TButton2")
     
115.    BlockInput(0)
     
116. 
     
117. EndFunc
     

复制代码

kk_lee69

回复 7# 爱火箭528

話說到這邊   當出現錯誤的時候  應該會告訴你是哪一行 出現錯誤

能說是哪行出現錯誤嗎??

爱火箭528

回复 8# kk_lee69


    不是说这个出错、、、我的意思是这个脚本在XP里面有啥限制没有、、、我发的这个没有问题。

kk_lee69

回复 9# 爱火箭528

這樣說好了  

AU3 發展的時候 是從 XP 開始

當 WIN7 剛出來的時候 有些相容性的問題  然後64位元  有需要注意的
現在則是 WI10 會遇到一些問題....

但是 XP 基本上就是最基礎的系統......所以理論上最不會有問題....

另外AU3 版本 可能會影像某些狀況
譬如 某個版本的 EXCEL UDF 做某些事情 不穩定  但是 換成舊版的AU3 就會正常....

1361739590

不同系统之间肯定有区别。
不能把区别都说出来吧。
你现在是  具体  哪边有问题，就看哪边就好了。
xp下是哪一步不能起作用呢？