Leaderboard

I've learned so much from the AutoIt community and figured it is about time I start giving something back. I am open sourcing all my software and Complete Internet Repair is the first program I am releasing. Complete Internet Repair will give you a free option to attempt to repair everything internet related. With any repair utility, you will need to remember only two golden rules. Firstly; don't try to repair something that is not broken, you might break it. Secondly; Comnplete Internet Repair cannot repair it all, we are not like the all-seeing and all-knowing Oracle, we cannot anticipate each and every situation, but this all said; it should be able to help with most internet issues. Complete Internet Repair could help if you are experiencing any of the following problems: Internet or network problem after removing adware, spyware, virus, worm, Trojan horse, etc. Loss network connection after installing/uninstalling adware, spyware, antispam, vpn, firewall or other networking programs. Unable to access any website or can only access some websites. Pop-up error window with network related problem description. No network connectivity due to registry errors. DNS lookup problem. Fail to renew the network adapter’s IP address or other DHCP errors. Network connectivity issue with limited or no connections message. Windows update does not work. You are having problems connecting to secured websites (ex. Banking). Internet Explorer stopped working or crashes all the time. A few other internet errors, but we will not discuss all here. Update 22 October 2016 Exes are now signed. New installation utility. Now built on the ReBar Framework. New Update Notification System. Resources moved to external Dll files. Added support for Windows 10. New Interface. New Logging System. New Reset Rroxy Server Configuration. New Registry based Method for configuring Services. Cleaner Optimized Code. You can download Complete Internet Repair 3 and Source Code at: http://www.rizonesoft.com/downloads/complete-internet-repair/ The source code can be viewed on GitHub here. Please while you're there, give it a Star! Please let me know what you think and if you have any suggestions, I would love to hear about it.

Hey guys, i wrote a small TVmaze.com API UDF for my TV-Show-Manager program. You can get any tv-show info you like with this UDF. Everything like tv-schedule, series info, cast list, episode list etc. including image links can be downloaded and will be returned in arrays. The API is way faster than for example tvrage.com. In case anyone ever needs it: Simple Example: #include "TVMazeAPI_UDF.au3" #include <Array.au3> ;===========TV Schedule for next 2 days========== $TV_Schedule=_GetTVSchedule() _ArrayDisplay($TV_Schedule,"TV Schedule") ;===============Search for a show================ $SearchResults=_SearchShow("person of interest") If @error then Exit _ArrayDisplay($SearchResults,"Searchresults") ;===============Get show info/details============ $ShowID=$SearchResults[0][1];Show id is taken from the searchresults first result $ShowInfo = _GetShowInfo($ShowID) _ArrayDisplay($ShowInfo,"Show Info") ;=============Get the cast of a show============= $Cast=_GetCast($ShowID) _ArrayDisplay($Cast,"Cast") ;============Get all Episodes of a Show========== $AllEpisodes = _GetShowEpisodes($ShowID) _ArrayDisplay($AllEpisodes,"All Episodes") ;========Filter Episodes by selected season====== $FilteredBySeason2 = _FilterBySeason($AllEpisodes, "2") _ArrayDisplay($FilteredBySeason2,"Filtered by episodes of season 2") ;====Get only last and next episode of a show==== $LastAndNextEpisode = _GetShowEpisodes($ShowID, 0, @TempDir, 0, 1) _ArrayDisplay($LastAndNextEpisode,"Last and Next Episodes only") Example usage(image): Updated 30.12.2015: - Bug fix TVMazeAPI_UDF.zip

AuPad This is a notepad program written entirely in AutoIt. It has all the basics of notepad that you would expect. This is NOT feature complete, yet. I have included the source code for your pleasure, and feel free to give me pointers if you'd like to help out development (This is all done with AutoIt version 3.3.14.0) If you use any code from this, please leave a comment or something linking to this post, thank you. run the install to put the AuPad.exe and AuPad.ico in the program files directory under AuPad. Also, the install puts the RESH.au3 (all thanks to Beege) UDFs into your include folder for you. Included in the .zip: Install.exe, Install.au3, AuPad.au3, AuPad.exe, aupad.ico, uninstall.au3, Uninstall.exe, and RESH.au3 Current Version: 1.9.5 AuPad V1.9.5.zip ## Latest Update ## ---==== 1.9.5 ====--- - Fixed crash when selecting AutoIt Help - Set version number as 1.9.5 - Updated version history Current Features: Version History: Working on: If you would like to see any older versions feel free to ask and I will be happy to release them to whomever.

regex101.com is good for testing, and also has a Community tab in which you can load or/and post expressions For my part, i learnt learn regexs with this forum (and on the French forum), by reading a lot of topics relative to string treatment. It takes time, but it depends on your ability to learn (be patient)

Dll Tutorial 7Zip UDF

$xml = "<xml><div class='data_field_value'>test1</div><div class='data_field_value'>test2</div></xml>" $oXML = ObjCreate("Microsoft.XMLDOM") $oXML.loadXML($xml) $oDivs = $oXML.selectNodes("//div[@class='data_field_value']") For $oDiv In $oDivs ConsoleWrite($oDiv.text & @CRLF) Next Output: test1 test2

UPDATED - See first post. Many changes and versions since the last upload. As suggested though, you may prefer the earlier simple version, though there are some important bugfixes. (v1.4) Added a Search Menu and options, with facility to increment a number when used in text searching. Some special Copy and Import options added. Hopefully now fixed a bug where window would not restore on a rare occasion. Bugfixes. (v1.5) Added some Line menu options. (v1.6) FIND button added. Some buttons changed to dropdown items, that now have a remove facility. Some buttons moved. Multi Job added for Lines. Bugfixes & Improvements. (v1.7) Undo active window setting option added, plus further attempt to deal with occasional memory allocation bug which crashes the program. (v1.8) Added extra Copy import options, plus store/retrieve last active window title. Bugfix. (v1.9) Added option to Copy line by line with removal & reduction. Bugfix. (v2.0) Added two Copy clear options, plus changed one default button setting. Bugfix for null character. (v2.1) Fix Mode added for checking/joining lines. (v2.2) Fast, Quotes Only & Quick Fix options added for Fix Mode. CTRL key Abort Query added for Fix process. CLEAR button added and ON TOP button made smaller to accomodate. (v2.3) Minimize on clear option added. Detect leading digit added to Fix process. Quick Fix + Query option added. Pipe character is now added to end of Line 1 to help indicate any space/s. Checks for Saint abbreviation at end of line, plus now tests for alternate quote characters. Remove line with specific text option added for Fix process. Bugfixes. (NOTE - unwarranted or extra carriage returns or line feeds are now stripped to prevent unwanted queries). (v2.4) Apart from in Quotes option, now working with both types of inverted comma. CTRL key with TAB button = 1st character check. Character Count Report option added, plus UNDO and Update Undo options. Warning added for Character Count over 30,000. (v2.5) Remove Mode added, plus a Quick Fix for trailing spaces at the end of a line after a fullstop, question or exclamation mark, even if nested inside single or double quotes.

ah you are right! I was using second parameter as end position instead of count (what a shame ) (TheSaint also told in post #3) .... thanks both

Use AutoItSetOption to set MustDeclareVars to 0 to suppress this error messages.

Show your full code please in tags, not some picture of a part of it.

A example script to translate numbers to word (in portuguese) portugues: este script escreve número por extenso #cs ---------------------------------------------------------------------------- AutoIt Version: 3.3.4.0 Author: Ricardo Bernardes Coelho Script Function: Escreve um dado valor por extenso #ce ---------------------------------------------------------------------------- ;Centena, Dezena, Unidade (CDU) Const $unidade_por_extenso[10] = ["","UM", "DOIS", "TRES", "QUATRO", "CINCO", "SEIS", "SETE", "OITO", "NOVE"] Const $dezena_por_extenso[10] = ["","DEZ", "VINTE", "TRINTA", "QUARENTA", "CINQUENTA", "SESSENTA", "SETENTA", "OITENTA", "NOVENTA"] Const $centena_por_extenso[10] = ["","CEM", "DUZENTOS", "TREZENTOS", "QUATROCENTOS", "QUINHENTOS", "SEISCENTOS", "SETECENTOS", "OITOCENTOS", "NOVECENTOS"] Const $especial_por_extenso[11] = ["","ONZE", "DOZE", "TREZE", "CATORZE", "QUINZE", "DEZESEIS", "DEZESSETE", "DEZOITO", "DEZENOVE", "CENTO"] Const $milhar[4] = ["", "MIL", "MILHÃO", "BILHÃO"] Const $milhares[4] = ["", "MIL", "MILHÕES", "BILHÕES"] Func ContaAtemMil($Valor) Dim $str_valor $str_valor = StringFormat("%03d", $Valor) Dim $centena, $dezena, $unidade $centena = StringMid($str_valor,1,1) $dezena = StringMid($str_valor,2,1) $unidade = StringMid($str_valor,3,1) $str_valor = "" If $centena <> "0" Then If $centena == "1" Then If $dezena+$unidade <> 0 Then $str_valor &= $especial_por_extenso[10]; & " E" ;cento e Else $str_valor = $centena_por_extenso[1] EndIf Else $str_valor &= $centena_por_extenso[$centena] EndIf EndIf If $dezena <> "0" Then If StringLen($str_valor) > 0 Then $str_valor &= " E " If $dezena == "1" Then If $unidade == "0" Then $str_valor &= $dezena_por_extenso[$dezena] Else $str_valor &= $especial_por_extenso[$unidade] EndIf Else $str_valor &= $dezena_por_extenso[$dezena] EndIf EndIf If $unidade <> "0" And $dezena<> "1" Then If StringLen($str_valor) > 0 Then $str_valor &= " E " $str_valor &= $unidade_por_extenso[$unidade] EndIf Return $str_valor EndFunc Func ValorPorExtenso($Valor) Dim $tamanho_valor = Ceiling(StringLen($Valor)/3) Dim $format_valor = "%0" & $tamanho_valor*3 & "d" Dim $str_valor = StringFormat($format_valor, $Valor) Dim $vector_valores[$tamanho_valor] For $i=0 To $tamanho_valor-1 $vector_valores[$tamanho_valor-1-$i] = StringMid($str_valor,$i*3+1,3) Next Dim $valor_por_extenso = "" For $i=$tamanho_valor-1 To 0 Step -1 $str_valor = ContaAtemMil($vector_valores[$i]) If $str_valor <> "" Then If $str_valor==$unidade_por_extenso[1] And $i == 1 Then ; se mil $str_valor = $milhar[1] Else If $vector_valores[$i] > 1 Then $str_valor &= " " & $milhares[$i] Else $str_valor &= " " & $milhar[$i] EndIf EndIf If StringLen($valor_por_extenso)>0 Then $valor_por_extenso &= " E " $valor_por_extenso &= $str_valor EndIf Next Return $valor_por_extenso EndFunc Dim $a = 158158 MsgBox(0, $a,ValorPorExtenso($a))