ioripalm

>"C:\Program Files (x86)\AutoIt3\SciTE\AutoIt3Wrapper\AutoIt3Wrapper.exe" /run /prod /ErrorStdOut /in "C:\Users\Mason\Desktop\oop\OOP\testerror.au3" /UserParams +>11:10:41 启动 AutoIt3Wrapper v16.306.1237.0 SciTE v3.6.2.0 键盘:00000804 操作系统:WIN_10/ CPU:X64 系统架构:X64 语言环境:0804 代码页:936 > utf8 检查: 4 # 检测 ASCII 字符,如无默认设置,则编码为 UTF-8 无 BOM. > 脚本编码: 256 UTF8 无 BOM. +> SciTE 目录 => C:\Program Files (x86)\AutoIt3\SciTE AutoIt3Wrapper 用户目录 => C:\Users\Mason\AppData\Local\AutoIt v3\SciTE\AutoIt3Wrapper SCITE 用户目录 => C:\Users\Mason\AppData\Local\AutoIt v3\SciTE >运行 AU3Check (3.3.14.2) 检查代码. 参数: C:\Program Files (x86)\AutoIt3 脚本路径: C:\Users\Mason\Desktop\oop\OOP\testerror.au3 +>11:10:41 AU3Check 语法检查结束.rc: 0 >运行:C:\Program Files (x86)\AutoIt3\autoit3_x64.exe(3.3.14.2), 脚本: C:\Program Files (x86)\AutoIt3\autoit3_x64.exe "C:\Users\Mason\Desktop\oop\OOP\testerror.au3" --> 点击 Ctrl+Alt+Break 重新启动, 或 Ctrl+Break 停止脚本执行 PARENTEMAIL OPTSTR POSTCODE STR TECETHN +>11:10:42 AutoIt3.exe 结束.rc: 0 +>11:10:42 AutoIt3Wrapper 完成脚本处理. >Exit code: 0 Time: 0.8471 Sorry,I user Chinese version SciTE.

UTF8 none BOM

return these: PARENTENULL OPTSTR POSTCOOR STRNOT TECETIF PARENTENULL_OPTSTRAND_POSTCOOR_STRAND_TECETIF_ Dim $sArray[5] = ["@PARENTEMAIL @", "@OPTSTRAND @", "@POSTCODE @", "@STRAND @", "@TECETHN @"] $sum = "" For $i = 0 To UBound($sArray) - 1 $sum &= $sArray[$i] Next ConsoleWrite($sum & @CRLF) I added "@" before and after the string return:@PARENTEMAIL @@OPTSTR @@POSTCODE @@STR @@TECETHN @

Thank you,but in my Console I can't see "AND".

Sorry,I edited this question and a pic of displayed my result.

Why is the result of this code not the same as expected? Dim $sArray[5] = ["PARENTEMAIL ", "OPTSTRAND ", "POSTCODE ", "STRAND ", "TECETHN "] $sum = "" For $i = 0 To UBound($sArray) - 1 $sum &= $sArray[$i] Next ConsoleWrite($sum & @CRLF) result: PARENTEMAIL OPTSTR POSTCODE STR TECETHN Editer is SciTE Ver 3.6.2 Feb 15 2016 18:42:26 Why its stripping "AND" from the string?

I find out what happend:

Hi I have a problem in Firebird Datebase. $sQUERY1 Can be run well #include <ADO.au3> Local $sDSN = 'FireBird' ; Default ;~ Local $sDatabase = @ScriptDir & '\ENROLPRO.GDB' ; db name Local $sDatabase = 'KITEDM/3050:E:\Enrolpro\ENROLPRO.GDB' ; db name Local $sServer = '192.168.0.5' ; Server IP Local $sPort = '3050' ; Port Local $sUser = 'SYSDBA' ; DEFAULT Username Local $sPassword = 'masterkey' ; DEFAULT Password Local $sConnectionString = 'DSN=' & $sDSN & ';DATABASE=' & $sDatabase & ';SERVER=' & $sServer & ';PORT=' & $sPort & ';UID=' & $sUser & ';PWD=' & $sPassword & ';' _ADO_ComErrorHandler_UserFunction(_ErrFunc) $sQUERY1 = "SELECT * FROM INTAKE WHERE INTAKECODE = 'OCT2017'" $sQUERY2 = "update or insert into CLASSROOM(CLASSROOMID,CLASSROOMCODE,CLASSROOMNAME,NUMBEROFSEATS,CLASSTYPEID,CLASSSTARTDATE,CLASSFINISHDATE,CAMPUSID,DISABLED,INTAKEID,COURSE_NBR,PROGCODE) " & _ "values (448,'OCT17601-L7','ORG & ETHIC',26,8,'2017/10/23','2017/12/15',1,0,38,NULL,'DBML7');" Local $oConnection = _ADO_Connection_Create() ; Create connection object _ADO_Connection_OpenConString($oConnection, $sConnectionString) $result = _ADO_Execute($oConnection, $sQUERY2,True) If @error Then SetError(@error, @extended, $ADO_RET_FAILURE) ConsoleWrite('@error = ' & @error & @CRLF & '@extended = ' & @extended & @CRLF & $sQUERY1 & @CRLF) EndIf _ADO_Connection_Close($oConnection) ; Clean Up MsgBox(1,1,$result[2]) _ArrayDisplay($result[2]) ; User's COM error function. Will be called if COM error occurs Func _ErrFunc($oError) ; Do anything here. ConsoleWrite(@ScriptName & " (" & $oError.scriptline & ") : ==> COM Error intercepted !" & @CRLF & _ @TAB & "err.number is: " & @TAB & @TAB & "0x" & Hex($oError.number) & @CRLF & _ @TAB & "err.windescription:" & @TAB & $oError.windescription & @CRLF & _ @TAB & "err.description is: " & @TAB & $oError.description & @CRLF & _ @TAB & "err.source is: " & @TAB & @TAB & $oError.source & @CRLF & _ @TAB & "err.helpfile is: " & @TAB & $oError.helpfile & @CRLF & _ @TAB & "err.helpcontext is: " & @TAB & $oError.helpcontext & @CRLF & _ @TAB & "err.lastdllerror is: " & @TAB & $oError.lastdllerror & @CRLF & _ @TAB & "err.scriptline is: " & @TAB & $oError.scriptline & @CRLF & _ @TAB & "err.retcode is: " & @TAB & "0x" & Hex($oError.retcode) & @CRLF & @CRLF) EndFunc ;==>_ErrFunc But $sQUERY2 have a error AddClass.au3 (1284) : ==> COM Error intercepted ! err.number is: 0x80020009 err.windescription: 发生意外。 err.description is: [ODBC Firebird Driver][Firebird]attempted update during read-only transaction err.source is: Microsoft OLE DB Provider for ODBC Drivers err.helpfile is: err.helpcontext is: 0 err.lastdllerror is: 0 err.scriptline is: 1284 err.retcode is: 0x80004005 @error = 2 @extended = -2147352567 I confrom this database can be write.Could you help me find out where have a problem. Thank you very much.

Hi How to use au3 to remove file protection? Does the test use the read-only parameter to open the file failed, can the other way to try to read the data? Thank you!

$lastSummaryXls = ObjGet(@ScriptDir & "\" & 07Summary.xls) If @error Then MsgBox(16, 1, "Error") With $lastSummaryXls.Worksheets("Summary") $EmpList = .cells(1, 1).resize(.UsedRange.Rows.Count , .UsedRange.Columns.Count).value $EmpList = $lastSummaryXls.parent.application.transpose($EmpList) ;_ArrayDisplay($EmpList) .parent.close(False) EndWith The above code has been tested if the open excel file is protected, such as the file is downloaded from the network, or U disk, or above the office version of Office opened 97 office xls file, excel default security options will prompt the excel file Is protected, and can not be modified by default (unless all protection is turned off in the office's options - trust settings). If you are using excel to manually open this file, you can click excel above the protected view - edit anyway to lift the protection (only need to set once, office will remember that this file is trusted). Again use Au3 can read excel to get the data. Please help me to see how read-only way to open the protection of the excel file.Thank you!!! 07Summary.xls

Can I connect a firebird database without ODBC? NOW I use ODBC Setup a firebird can connect a network database, and use ADO.au3 can get data. How to without ODBC connect a firebird database?Thank you !!!!

Thank You Very Much! If you find a good way, please give me a message!

Hi Friends How to create automated connection terminal Get Rreturn information by AU3? Terminal-type string is vt220, so you can not get return information with Windows Telnet CMD and StderrRead(). Now I use the putty.exe connection ControlSend () to send commands putty record .log file for get return information,FileRead("\putty.log") and strings function to determine return data How to get the information directly？ Thanks！

Thank you for your help!

How a lot of string formatted output to a printer? E.g: 1) The first line of Arial font and size 20 and Bold 2) The second line to the fourth line of Tahoma font and size 14 3) Insert two blank lines every 5 row 4) Every 64 rows to add a page break (chr(12) ) and add headers and footers 5) Finally, the formatted string output to a printer(Dot matrix printer) How to do that?The printer supports ESC / P, ESC / P2, ESC / PK, ESC / PK2, Epson Standard Code for Printer. Thank you very much!!!

I modified the code, if _ScreenCapture_CaptureWnd can not achieve their goals, how to do the job it?

Maybe I do not know the expression, how to get to a hidden window screenshot, of course _ScreenCapture_CaptureWnd can not do, I ask how can we get to a hidden window screenshot?

How to capture the hidden program window？ For example: #include <ScreenCapture.au3> $runPID = Run ("C:\OK.exe", "C:\",@SW_HIDE) $runPID = WinGetHandleFromPID($runPID) $hBmp = _ScreenCapture_CaptureWnd ("C:\OK.jpg", $runPID) Func WinGetHandleFromPID($iSearchPID, $tolerance = 2000) Sleep($tolerance); give the Window a chance to load Local $aList = WinList() For $i = 1 To $aList[0][0] If WinGetProcess($aList[$i][1]) = $iSearchPID Then Return $aList[$i][1] Next Return SetError(1, 0, False) EndFunc ;==>WinGetHandleFromPIDUnable to capture the hidden window, ask how to solve? You can be given code? Thank you Very Much!!!!!