Leaderboard
Popular Content
Showing content with the highest reputation on 04/28/2021 in all areas
-
Creating a master item list
riceking reacted to JockoDundee for a topic
No problem. *Full disclosure, I’m a paid influencer for the AARP - American Association of Recursive Programmers1 point -
Creating a master item list
riceking reacted to JockoDundee for a topic
Can you give me the input file you ran to create this?1 point -
Creating a master item list
riceking reacted to JockoDundee for a topic
#pragma compile(Console,True) Local $aR=StringSplit(FileRead($CmdLine[1]),@CRLF&@CRLF,1) ForNest() Func ForNest($iLevel=1, $sLine="") Local $aOpts=StringSplit($ar[$iLevel], @CRLF,3) For $sOpt In $aOpts If $iLevel<$ar[0] Then ForNest($iLevel+1, $sLine & $sOpt &",") Else ConsoleWrite($sLine & $sOpt &@CRLF) EndIf Next EndFunc This should keep the order, tested it with three optionals only though.1 point -
Creating a master item list
riceking reacted to JockoDundee for a topic
Do you mean my output or your input? Can u give an example, it’s probably easily fixed...1 point -
As table shows above, from 0x80 to 0xFF. Here a way to convert properly a char : #include <Constants.au3> Local $cASCII = Chr(0xB4) Local $iUTF8 = StringToBinary($cASCII, 4) Local $cUTF8 = BinaryToString($iUTF8, 4) MsgBox ($MB_SYSTEMMODAL, $iUTF8, "is char " & $cUTF8 & @CRLF)1 point
-
BinaryToString cant convert 0xB4 to utf8
Invicore reacted to matwachich for a topic
Dont forget to set SciTE's console to display UTF8 chars.1 point -
I would have truly appreciated you as a teacher in those days...1 point
-
Hello, I'm the guy who made initial CI and I think using chocolatey to install autoit3 could be better, would look much cleaner. Has anyone here worked with autoit3 installing from chocolatey? I don't use Windows so every change that was needed to do was (almost) a blind guess and I'm honestly surprised that it works (more or less). Rcmaehl has been a big help with his Windows expertise (and it's his project after all).1 point
-
It should be like this: Local $sMyRTFFile = @ScriptDir & "\test.rtf" ; <== full path to the .rtf file RunWait(@ProgramFilesDir & '\Windows NT\Accessories\wordpad.exe "' & $sMyRTFFile & '"')1 point
-
defining variables inside vs outside loop..
Musashi reacted to argumentum for a topic
You know how to properly do it. If you believe that the "2nd version more manageable", ...we can have a chat in a few years maintaining disorganized code and see how this 2nd approach worked out. New school is the same. Might as well not declare a thing. You don't have to declare a thing in AutoIt. You'll get to repent in due time. Experience will teach you. ( we need a drop mic. emoji )🎤1 point -
Convert Registry Shutdown value to date/time
argumentum reacted to holyeyed for a topic
#include<Date.au3> ; Read Value Func _filetime2str($RegVal = "6000000010000000") ; Create a FileTime Struct (in bytes, so you can set value) $FileTime = DllStructCreate("struct; dword hi; dword lo; endstruct") ; set data to struct ;set hi value DllStructSetData($FileTime,1,Binary("0x"&Stringleft($RegVal,8))) ;set lo value DllStructSetData($FileTime,2,Binary("0x"&StringRight($RegVal,8)) ; Convert to String $String = _Date_Time_FileTimeToStr($FileTime) ConsoleWrite($String&@CRLF) return $String EndFunc this is what i use to convert 64bit FileTime value from registry into Readable Date/Time string convert 64bit Filetime hex string into local time String1 point -
Creating a master item list
riceking reacted to JockoDundee for a topic
Try this - #pragma compile(Console,True) Local $aR=StringSplit(FileRead($CmdLine[1]),@CRLF&@CRLF,1) ForNest() Func ForNest($iLevel=1, $sLine="") Local $aOpts=StringSplit($ar[$iLevel], @CRLF,3) For $sOpt In $aOpts If $iLevel<$ar[0] Then ForNest($iLevel+1, $sOpt &","& $sLine) Else ConsoleWrite($sLine & $sOpt &@CRLF) EndIf Next EndFunc Input File (Per Product Line - Must Have Empty Line after each feature) Size1 Size2 Size5 Thickness1 Thickness2 Thickness3 Color1 Color2 Color3 Output (to Console): Thickness1,Size1,Color1 Thickness1,Size1,Color2 Thickness1,Size1,Color3 Thickness2,Size1,Color1 Thickness2,Size1,Color2 Thickness2,Size1,Color3 Thickness3,Size1,Color1 Thickness3,Size1,Color2 Thickness3,Size1,Color3 Thickness1,Size2,Color1 Thickness1,Size2,Color2 Thickness1,Size2,Color3 Thickness2,Size2,Color1 Thickness2,Size2,Color2 Thickness2,Size2,Color3 Thickness3,Size2,Color1 Thickness3,Size2,Color2 Thickness3,Size2,Color3 Thickness1,Size5,Color1 Thickness1,Size5,Color2 Thickness1,Size5,Color3 Thickness2,Size5,Color1 Thickness2,Size5,Color2 Thickness2,Size5,Color3 Thickness3,Size5,Color1 Thickness3,Size5,Color2 Thickness3,Size5,Color3 Usage: pl.exe <product line input file> File Attached: pl.au3 pl.txt1 point -
Uploaded a new version of the SciTE4AutoIt3.exe v21.316.1639.1
seadoggie01 reacted to TheDcoder for a topic
@argumentum Too easy, I plan to make my own editor with all sorts of features... but I need to finish working on ECI before that, challenge accepted1 point -
WebDriver UDF - Help & Support (III)
seadoggie01 reacted to Danp2 for a topic
@seadoggie01 Thanks... I take a look at it.1 point -
RunAs
hudsonhock reacted to AdamUL for a topic
For your remote users, are you going to store the network credentials in the install script? Also, RunAs does not give you full admin rights (Admin Token), even if the user has admin right on the PC. You have to use a workaround of re-execution. Here is an example script. Global $sAdminUser = "USERNAME" Global $sAdminPassword = "PASSWORD" Global $sDomain = "AD" Global $iLogOnFlag = 0 Global $sParameters = "" ;Elevate with the Admin account. If @UserName <> $sAdminUser And Not IsAdmin() Then $sParameters = "" If Not @Compiled Then $sParameters = ' "' & @ScriptFullPath & '"' EndIf If RunAs($sAdminUser, $sDomain, $sAdminPassword, $iLogOnFlag, @AutoItExe & $sParameters) Then Exit Else Exit MsgBox(16 + 262144, "ERROR!", "Unable to run under administrator account.") EndIf EndIf ;Run with Admin Token in Windows Vista and Higher. If @UserName = $sAdminUser And Not IsAdmin() And Not StringRegExp(@OSVersion, "_(XP|200(0|3))") Then $sParameters = "" If Not @Compiled Then $sParameters = '"' & @ScriptFullPath & '"' EndIf If ShellExecute(@AutoItExe, $sParameters, "", "runas") Then Exit Else Exit MsgBox(16 + 262144, "ERROR!", "Unable to elevate to Admin due to UAC.") EndIf EndIf ;Put rest of the script here. MsgBox(16, $sAdminUser, IsAdmin()) ;ExampleAdam1 point