MatteoGuallini

Hi prazetto, your download link is down.

Here the repeatable exemple AutoItSetOption ("TCPTimeout", 50) ;Global $IPAddress="127.0.0.1" ;ok ;Global $IPAddress="0.0.0.0" ;ok ;Global $IPAddress="31.197.115.250"; ok Global $IPAddress="31.19.115.250"; ko TCPStartup() While 1 Ping ( $IPAddress , 50 ) If @error Then MsgBox(0,"PING",@error&" on "& $IPAddress,0) Else MsgBox(0,"PING","GOOD" &" on "& $IPAddress,0) EndIf $iSocket = TCPConnect($IPAddress, "23") If @error Then MsgBox(0,"CONNECTION",@error&" on "& $IPAddress,0) Else MsgBox(0,"CONNECTION","GOOD" &" on "& $IPAddress,0) EndIf TCPCloseSocket($iSocket) WEnd TCPShutdown ( )

Hello, I set AutoItSetOption ("TCPTimeout", 50) but if the TCPConnect function aren't able to connect to the host, it take about 5 seconds to continue the code. I hope I was clear Any suggetions?

Hello, Someone have a workaround or udf related to "libusb0-win32"? A canavas is enough for me. Thanks in advance.

The file has been attached in the first post.

I forgot to press "attach file". Tomarro I'm doing it.

Hello, MozBackup it's a good software however unfortunately it has some hole. I'm sorry if the code has italian comments but it will be translated soon. INTRO -------------------- MozBackup_Launcher.au3 is an helper for using Mozilla Thunderbird and MozBackup FEATURES -------------------- It Close Thunderbird before starting MozBackup. It Open Thunderbird before starting MozBackup. It Prevent Thunderbird opening during MozBackup running. It Deletes all previous *.pcv files contained in the same directory of the current .pcv file. It can read commnd line arguments for starting it on scheduled tasks. USAGE IN COMMAND LINE -------------------- Command line examples: "MozBackup_Launcher.exe" "c:\mypath\my_profile.mozprofile" "C:\mypath_A\MozBackup_Launcher.exe" "\\x.x.x.x\mypath_B\my_profile.mozprofile" OTHER USAGE -------------------- If you run MozBackup_Launcher.exe without arguments the program search the file "MozBackup_Launcher.mozprofile" into the same directory of the program and run it. ;Command line example *.cmd : "MozBackup_Launcher.exe myprofile.mozprofile" #include <Timers.au3> #Include <File.au3> #include <array.au3> $appname=StringMid(@ScriptName,1,StringLen(@ScriptName)-4) $MozProfile="MozBackup_Launcher.mozprofile" ;default profile If FileExists(@ScriptDir&"\"&"MozBackup.exe")=0 Then MsgBox(48+262144,$appname,"MozBackup.exe not found. The file must be in the same directory of the application. Program will be closed.",30) Exit EndIf If $CmdLine[0] = 0 Then $MozProfile="MozBackup_Launcher.mozprofile" If $CmdLine[0] = 1 Then $MozProfile=$CmdLine[1] ;loads the file *.mozprofile from command line If $CmdLine[0] > 1 Then MsgBox(48+262144,$appname,"Wrong command line. Program will be closed.",30) Exit EndIf If FileExists($MozProfile)=0 Then MsgBox(48+262144,$appname,"File '" &$MozProfile&"' not found. Program will be closed.",30) Exit EndIf $starttime=TimerInit() While ProcessExists("thunderbird.exe")>0 ProcessClose("thunderbird.exe") If _Timer_Diff($starttime)>60000 then MsgBox(48+262144,$appname,"The program is open. Close the program and press OK",0) ExitLoop EndIf WEnd $OutpotPCV=IniRead($MozProfile,"General","output","NA") Dim $szDrive, $szDir, $szFName, $szExt $OutpotPCVAr = _PathSplit($OutpotPCV, $szDrive, $szDir, $szFName, $szExt) If IsArray($OutpotPCVar)=1 Then FileDelete($OutpotPCVAr[1]&$OutpotPCVAr[2]&"*"&$OutpotPCVAr[4]) ;MsgBox(48+262144,$appname,$OutpotPCVAr[1]&$OutpotPCVAr[2]&"*"&$OutpotPCVAr[4],0) Else MsgBox(48+262144,$appname,"The backup file contained in '"&$MozProfile&"' isn't correct",0) EndIf ShellExecute("mozbackup.exe", '"'&$MozProfile&'"',@ScriptDir) While ProcessExists("MozBackup.exe")>0 If ProcessExists("thunderbird.exe")>0 Then ProcessClose("thunderbird.exe") MsgBox(48+262144,$appname,"Mozilla Thunderbird has been closed because the Backup is running.",30) EndIf WEnd Sleep(10000) Run(@ProgramFilesDir&"\Mozilla Thunderbird\thunderbird.exe")MozBackup_Launcher.au3

Hello Someone are able to incorporate in an html file an autoit script? Like javascript or java do. For example putting <script type="text/autoit"> I've tried a lot of method but I've no enough knowledges about web scripting infrastructure. I've tried to do an Autoit Virtual Machine that runs as a sevice but I'don't know how trigger the script on loading.

Good job!!!! However the problem is alwais the same. GuiRichEdit isnt't fully compatible with RTF generated by MS Word.

Hi Someone can tell me how I can modify an existing record in a table using this UDF? thanks in advance.

This modified function get formulas ;=============================================================================== ; ; Description: Read information from the active worksheet of the specified Excel object. ; Syntax: $val = _ExcelReadCellFormula($oExcel, $sRangeOrRow, $iColumn = 1) ; Parameter(s): $oExcel - Excel object opened by a preceding call to _ExcelBookOpen() or _ExcelBookNew() ; $sRangeOrRow - Either an A1 range, or an integer row number to read from if using R1C1 ; $iColumn - The column to read from if using R1C1 (default = 1) ; Requirement(s): None ; Return Value(s): On Success - Returns the data from the specified cell ; On Failure - Returns 0 and sets @error on errors: ; @error=1 - Specified object does not exist ; @error=2 - Specified parameter is incorrect ; @extended=0 - Row out of valid range ; @extended=1 - Column out of valid range ; Author(s): SEO <locodarwin at yahoo dot com> ; Note(s): This function will only read one cell per call - if the specified range spans ; multiple cells, only the content of the top left cell will be returned. ; ;=============================================================================== Func _ExcelReadCellFormula($oExcel, $sRangeOrRow, $iColumn = 1) If NOT IsObj($oExcel) Then Return SetError(1, 0, 0) If NOT StringRegExp($sRangeOrRow, "[A-Z,a-z]", 0) Then If $sRangeOrRow < 1 Then Return SetError(2, 0, 0) If $iColumn < 1 Then Return SetError(2, 1, 0) Return $oExcel.Activesheet.Cells($sRangeOrRow, $iColumn).FormulaR1C1 Else Return $oExcel.Activesheet.Range($sRangeOrRow).Formula EndIf EndFunc;==>_ExcelReadCell

If I read a cell I get the value of this cell. How can I get the formula of this cell instead of the value?

Thanks a lot.

I'm a newbye Where I can find documentation for implementing this way of using ado?

This is the function I need. This is a little bit raw but it just run. #cs Function name: _GetColsVals Description: Gets all of the values of a specified columns in a specified table Parameters: $oConnectionObj - As returned by _MySQLConnect(), $sTable - the table that the column is in $sColumn - the columns to get values from divided by "," ex. ColumnA,ColumnB. Return value(s): On success returns an array where $array[0] is the number of values and $array[n] is the Nth value On failure sets @error to 1 and returns 0 Author: cdkid #ce Func _GetColsVals($oConnectionObj, $sTable, $sColumn) $Columns=StringSplit($sColumn,",") MsgBox(0,"",$Columns[0],0) If IsObj($oConnectionObj) Then Dim $ret[1][$Columns[0]] $quer = $oConnectionObj.Execute("SELECT " & $sColumn & " FROM " & $sTable & ";") With $quer While Not .EOF ReDim $ret[UBound($ret, 1) + 1][$Columns[0]] For $eachcolumn=0 to $Columns[0]-1 $ret[UBound($ret, 1) - 1][$eachcolumn] = .Fields ($eachcolumn).value Next .MoveNext WEnd EndWith For $eachcolumn=0 to $Columns[0]-1 $ret[0][$eachcolumn] = UBound($ret, 1) - 1 Next Return $ret EndIf EndFunc ;==>_GetColsVals