Leaderboard

Hi! Today I want to show you my current AutoIt project: The ISN AutoIt Studio. The ISN AutoIt Studio is a complete IDE made with AutoIt, for AutoIt! It includes a GUI designer, a code editor (with syntax highlighting, auto complete & intelisense), a file viewer, a backup system, trophies and a lot more features!! Here are some screenshots: Here some higlights: -> easy to create/manage/public your AutoIt-projects! ->integrated GUI-Editor (ISN Form Studio 2) ->integrated - file & projectmanager ->auto backupfunction for your Projects ->extendable with plugins! ->available in several languages ->trophies ->Syntax highlighting /Autocomplete / Intelisense ->Dynamic Script ->detailed overview of the project (total working hours, total size...) And much more!!! -> -> Click here to download ISN AutoIt Studio <- <- Here is the link to the german autoit forum where I posted ISN AutoIt Studio the first time: http://autoit.de/index.php?page=Thread&threadID=29742&pageNo=1 For more information visit my Homepage: https://www.isnetwork.at So….have fun with ISN AutoIt Studio! PS: Sorry for my bad English! ^^

This UDF allows users to record the events occurring on their screen in real-time (otherwise known as "screen recording"). Windows XP alone doesn't include a screen recorder. However I believe Windows Vista and Windows 7 do. I wanted to find the best free screen recording UDF solution I could for Windows XP. CamStudio is clearly a popular choice in these forums. Though I was already using HyperCam prior to evaluating CamStudio. After comparing the two applications, I found them to both be almost identical, with one major exception. HyperCam includes a COM interface. It was therefore the ideal choice for an AutoIT UDF. REQUIREMENTS: AutoIt3 3.2 or higherA HyperCam is installed & registeredLIST OF FUNCTIONS: EXAMPLE: The following example demonstrates how the HyperCam UDF can be used to record activities on the screen. On running the script, a full resolution screen recording (of the entire screen) will be performed for 3 seconds, with the result stored in the file "c:\full resolution 3 second recording.avi". Immediately after this, another screen recording is performed, on a 400 x 300 pixel area of the screen, also for 3 seconds, with the result stored in the file "c:\400x300 3 second recording.avi". HyperCam example.au3 DOWNLOAD: Latest Version - v0.1 (18/06/10) HyperCam.au3

Use Sleep

keelp calm, please Glad to help you.

New function - node-based compositing:

If you want to use _IEAction, you have to get the DIV as an object. With _IETagNameGetCollection, you can list all DIV objects. Next, check for each object if the data-target value is "added", then use _IEAction with the object. Example : Local $oDivs = _IETagNameGetCollection($oIE, "div") For $oDiv In $oDivs $sDataTarget = Execute("$oDiv.attributes.getNamedItem('data-target').value") If $sDataTarget = "added" Then _IEAction($oDiv, "click") Next(note I used Execute to avoid any oject error, I don't know if this method is good or not...)

@Celtic88 your way will run only the first link try this variant: #include <File.au3> Local $aRecords If Not _FileReadToArray("Links.txt", $aRecords) Then MsgBox(4096, "Error", " Error reading file to Array error:" & @error) Exit EndIf For $x = 1 To $aRecords[0] ShellExecute("iexplore.exe", $aRecords[$x]) Next

copy the code from here https://www.autoitscript.com/autoit3/docs/functions/FileReadToArray.htm and just replace this line " MsgBox($MB_SYSTEMMODAL, "", $aArray[$i]) ; Display the contents of the array. " with " ShellExecute ( $aArray[$i]) ; command to open links "

SugarBall, Just the one thread at a time please - merged. M23

thanks @Jfish If you want custom icon and labelicon. Local $oErrorHandler = ObjEvent("AutoIt.Error", "_ErrFunc") $objWord = ObjCreate("Word.Application") $objWord.Visible = True $objDoc = $objWord.Documents.Add() $objSelection = $objWord.Selection Local $sMyPDF="C:\Users\User\Desktop\17598007.pdf" For $i= 1 to 20 $objSelection.InlineShapes.AddOLEObject("",$sMyPDF,false,True,@SystemDir & "\Shell32.dll",190+$i,"Shell32Icon=" & 190+$i) Next Saludos

Look: Local $oErrorHandler = ObjEvent("AutoIt.Error", "_ErrFunc") $objWord = ObjCreate("Word.Application") $objWord.Visible = True $objDoc = $objWord.Documents.Add() $objSelection = $objWord.Selection Local $sMyPDF="C:\Users\User\Desktop\17598007.pdf" $objSelection.InlineShapes.AddOLEObject("",$sMyPDF) Saludos

something like the sticky at the top of the forum you just posted in? jos

I think somethink like this: So I want to check but actually second question comes to me: How to fires collection of error ? EDIT: Finally works: #include <array.au3> #include "_sql.au3" Global $oADODB_Connection = ObjCreate("ADODB.Connection") _Example() Func _Example() ; Error monitoring. This will trap all COM errors while alive. ; This particular object is declared as local, meaning after the function returns it will not exist. Local $oErrorHandler = ObjEvent("AutoIt.Error", "_ErrFunc") $oADODB_Connection.Open("PROVIDER=SQLNCLI11;SERVER=localhost\SQLExpress;DATABASE=master;uid=sa;pwd=mypass;") $oADODB_Connection.BeginTrans $oADODB_Connection.Execute('use baza') Local $aResult1, $iRows, $iColumns _SQL_GetTable2D($oADODB_Connection, 'Select * from table1', $aResult1, $iRows, $iColumns) Local $aResult2, $iRows2, $iColumns2 _SQL_GetTable2D($oADODB_Connection, 'delete from table2', $aResult2, $iRows2, $iColumns2) Local $aResult3, $iRows3, $iColumns3 _SQL_GetTable2D($oADODB_Connection, 'Select * from table3', $aResult3, $iRows3, $iColumns3) $oADODB_Connection.CommitTrans _ArrayDisplay($aResult1) _ArrayDisplay($aResult2) _ArrayDisplay($aResult3) EndFunc ;==>_Example ; User's COM error function. Will be called if COM error occurs Func _ErrFunc($oError) ; Do anything here. Local $err Local $iErrorCnt = $oADODB_Connection.errors.Count For $iError = 0 to $iErrorCnt $err = $oADODB_Connection.errors.Item($iError) ConsoleWrite( _ 'ADO Error Collection: ' & $iError & '/' & $iErrorCnt & @CRLF & _ @ScriptName & " (" & $err.scriptline & ") : ==> COM Error intercepted !" & @CRLF & _ @TAB & "err.number is: " & @TAB & @TAB & "0x" & Hex($err.number) & @CRLF & _ @TAB & "err.windescription:" & @TAB & $err.windescription & @CRLF & _ @TAB & "err.description is: " & @TAB & $err.description & @CRLF & _ @TAB & "err.source is: " & @TAB & @TAB & $err.source & @CRLF & _ @TAB & "err.helpfile is: " & @TAB & $err.helpfile & @CRLF & _ @TAB & "err.helpcontext is: " & @TAB & $err.helpcontext & @CRLF & _ @TAB & "err.lastdllerror is: " & @TAB & $err.lastdllerror & @CRLF & _ @TAB & "err.scriptline is: " & @TAB & $err.scriptline & @CRLF & _ @TAB & "err.retcode is: " & @TAB & "0x" & Hex($err.retcode) & @CRLF & @CRLF) Next EndFunc ;==>_ErrFunc and to console output: >"C:\Program Files (x86)\AutoIt3\SciTE\..\AutoIt3.exe" "C:\Program Files (x86)\AutoIt3\SciTE\AutoIt3Wrapper\AutoIt3Wrapper.au3" /run /prod /ErrorStdOut /in "Z:\TOOLs\Macro\FORUM\obj_ErrColl.au3" /UserParams +>01:13:43 Starting AutoIt3Wrapper v.15.729.1555.9 SciTE v.3.6.0.0 Keyboard:00000415 OS:WIN_7/Service Pack 1 CPU:X64 OS:X64 Environment(Language:0415) +> SciTEDir => C:\Program Files (x86)\AutoIt3\SciTE UserDir => C:\Users\user\AppData\Local\AutoIt v3\SciTE\AutoIt3Wrapper SCITE_USERHOME => C:\Users\user\AppData\Local\AutoIt v3\SciTE >Running AU3Check (3.3.14.0) from:C:\Program Files (x86)\AutoIt3 input:Z:\TOOLs\Macro\FORUM\obj_ErrColl.au3 +>01:13:44 AU3Check ended.rc:0 >Running:(3.3.14.0):C:\Program Files (x86)\AutoIt3\autoit3.exe "Z:\TOOLs\Macro\FORUM\obj_ErrColl.au3" --> Press Ctrl+F11 to Restart or Ctrl+Break -or- F11 to Stop ADO Error Collection: 0/1 obj_ErrColl.au3 () : ==> COM Error intercepted ! err.number is: 0x80040E4D err.windescription: err.description is: Login failed for user 'sa'. err.source is: Microsoft SQL Server Native Client 11.0 err.helpfile is: err.helpcontext is: 0 err.lastdllerror is: err.scriptline is: err.retcode is: 0x00000000 ADO Error Collection: 1/1 obj_ErrColl.au3 () : ==> COM Error intercepted ! err.number is: 0x00000000 err.windescription: err.description is: err.source is: err.helpfile is: err.helpcontext is: err.lastdllerror is: err.scriptline is: err.retcode is: 0x00000000 ADO Error Collection: 0/0 obj_ErrColl.au3 () : ==> COM Error intercepted ! err.number is: 0x00000000 err.windescription: err.description is: err.source is: err.helpfile is: err.helpcontext is: err.lastdllerror is: err.scriptline is: err.retcode is: 0x00000000 ADO Error Collection: 0/0 obj_ErrColl.au3 () : ==> COM Error intercepted ! err.number is: 0x00000000 err.windescription: err.description is: err.source is: err.helpfile is: err.helpcontext is: err.lastdllerror is: err.scriptline is: err.retcode is: 0x00000000 ADO Error Collection: 0/0 obj_ErrColl.au3 () : ==> COM Error intercepted ! err.number is: 0x00000000 err.windescription: err.description is: err.source is: err.helpfile is: err.helpcontext is: err.lastdllerror is: err.scriptline is: err.retcode is: 0x00000000 ADO Error Collection: 0/0 obj_ErrColl.au3 () : ==> COM Error intercepted ! err.number is: 0x00000000 err.windescription: err.description is: err.source is: err.helpfile is: err.helpcontext is: err.lastdllerror is: err.scriptline is: err.retcode is: 0x00000000 ADO Error Collection: 0/0 obj_ErrColl.au3 () : ==> COM Error intercepted ! err.number is: 0x00000000 err.windescription: err.description is: err.source is: err.helpfile is: err.helpcontext is: err.lastdllerror is: err.scriptline is: err.retcode is: 0x00000000 ADO Error Collection: 0/0 obj_ErrColl.au3 () : ==> COM Error intercepted ! err.number is: 0x00000000 err.windescription: err.description is: err.source is: err.helpfile is: err.helpcontext is: err.lastdllerror is: err.scriptline is: err.retcode is: 0x00000000 +>01:13:44 AutoIt3.exe ended.rc:0 +>01:13:44 AutoIt3Wrapper Finished. >Exit code: 0 Time: 1.095 mLipok

Will have a look at it next week. I'm on vacation right now.

Details about Excel up to version 2000 can be found here: https://support.microsoft.com/en-us/kb/177991 What I have found so far: Excel 95 - 5461 cells Excel 97 - 5461 cells Excel 2000 - 5461 cells Excel 2002 - 65536 rows (tested by kylomas with an [65537][2] array) Excel 2003 - 65536 rows (because Excel 2002 and Excel 2010 have the same limit) Excel 2007 - 65536 rows (because Excel 2002 and Excel 2010 have the same limit) Excel 2010 - 65536 rows (tested myself with an [65537][1] array) Excel 2013 - ?

Excel 200 has an undocumented limit of 5641 cells that can be processed using the transpose method. Try _Excel_RangeWrite($workbook, $newsheet, $outarray, Default, Default, True) This forces the UDF to bypass the transpose method (and its limitations) and use function _ArrayTranspose.

Try this to see if it opens the .exe $Path = "C:\Program Files\EPM Suite\EPMControl.exe" ShellExecute($Path)

Look at _GUICtrlListView_GetItemChecked. Do you just want the total number checked or the index value as well? Anyway, this will return a 1-dimensional array of the index values checked. Func _GUICtrlListView_GetCheckedStates($hListView) ; By guinness. Local $sReturn = '' For $i = 0 To _GUICtrlListView_GetItemCount($hListView) - 1 If _GUICtrlListView_GetItemChecked($hListView, $i) Then $sReturn &= $i & '|' EndIf Next Return StringSplit(StringTrimRight($sReturn, StringLen('|')), '|') EndFunc ;==>_GUICtrlListView_GetCheckedStates

Here I publish my WordConstants UDF. I hope it shall be usefull. An example that uses Word constants from my UDF: It inserts some blank pages. #include<Word.au3> #include<WordConstants.au3> $oWord = _WordCreate(@ScriptDir &"\Guide.doc", 0, 1) $oDoc = _WordDocGetCollection($oWord, 0) $oDoc.Repaginate $NumPages = _WordDocPropertyGet($oDoc, "pages") $i=$NumPages Do $i = $i - 1 $oWord.Selection.GoTo($wdGotoPage, $wdGotoNext, 1) $oWord.Selection.InsertBreak($wdPageBreak) Until $i = 1 $oWord.Selection.EndKey($wdStory, $wdMove) ;updated script insert a new page at the end of the document $oWord.Selection.InsertBreak($wdPageBreak) _WordDocSave ($oDoc) _WordQuit ($oWordApp) UDF File: WordConstants.au3

I realize that this thread is a bit old... That script returned -1 for me as well, and my machine specs are... AMD Phenom Triple-Core processor 8400+ (2.0 GT/s Front-side Bus) 3GB PC2-6400 DDR2 (up-to 8 GB) 640GB 7200 rpm Serial ATA NVIDA GeForce 6150 SE Graphics with TurboCache (128MB Dedicated GM) ATI Radeon HD 4850 Dual-Head (512mb) Brand-spankin new Asus... (Asus M2N68-LA) Can't say mine is too old... Survey says! #RequireAdmin Worked like a charm... Too bad that guy might never know that... >.< P.S. I'm running Win7, so I'd assume this works on Vista as well, as the kernel is almost identical... Oh, and I will do my best to lay off the coffee...