madmorgan

thanks Sh3llC043r, ive tryed that au3 udf but with no luck any othere way i can just get my genrator key maker to load the same keys over and over?

hello all, im making a script for me to use on my own programs than i code. i have made a app that randomly gens a set of letters and number BUT i want my app to allways generate thae same set of numbers and letters, the reson i want to do this is so i can give my main program that im making to a company to try for 14 days and then need to buy the licence code off me for each pc in there company. once the fixed sequnce is done on this gen app ill put it into my own progeam afterwards to do check to see if the code matches. but anyway here is my gen app that i need help with. #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form= $Form1_1 = GUICreate("Form1", 302, 271, 192, 124) $Edit1 = GUICtrlCreateEdit("", 32, 104, 233, 145, BitOR($ES_WANTRETURN,$WS_VSCROLL,$WS_BORDER)) GUICtrlSetData(-1, "") $Button1 = GUICtrlCreateButton("Run", 72, 40, 75, 25) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### dim $letters While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit case $Button1 GUICtrlSetData($Edit1,"") _KEY_GEN_LIST() EndSwitch WEnd Func _KEY_GEN_LIST() $GENLIST = 0 Do $i = 0 Do $Part1 = Chr(Random(Asc("a"), Asc("z"), 1)) $Part1_1 = $Part1 $i = $i + 1 GUICtrlSetData($Edit1,$Part1_1,1) Until $i = 8 GUICtrlSetData($Edit1,"-",1) $i2 = 0 Do $number = Random(0,9,1) $numbers = $number $i2 = $i2 + 1 GUICtrlSetData($Edit1,$numbers,1) Until $i2 = 5 GUICtrlSetData($Edit1,"-",1) $i3 = 0 Do $Part2 = Chr(Random(Asc("a"), Asc("z"), 1)) $Part2_2 = $Part2 $i3 = $i3 + 1 GUICtrlSetData($Edit1,$Part2_2,1) Until $i3 = 8 $GENLIST = $GENLIST + 1 GUICtrlSetData($Edit1,@CRLF,1) until $GENLIST = 50 EndFunc thanks all.

no i want to try and make a simple hex program that i can take txt files and look at them at hte hex level.

hello all, i want to use the file open command to open files but i want to open a then up into a HEX edit format. thanks

hello all, any one know were the usb that are live are located in the registory??

hello all, ive looked in the help file at shutdown command but how can i send this command to a remote computer. thanks

Adamul, i have a check statment be for connecting to a pc befor it dos any reg reading.

thanks Adamul, i did not notice i removed the @error statment i feel so silly now and thanks for the help. thanks.

ah thanks.

hello all, is where any way to diable a keybord from working when a script is run and then at the end of the program will enable back again. thanks need help on this.

hello all, i dont want to use regedit im put a muiti use app that gets information from the remote pc. but with help from ADAMUL i have been able to do this now. #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <TabConstants.au3> #include <WindowsConstants.au3> $Form1 = GUICreate("Form1", 625, 443, 192, 124) $Edit1 = GUICtrlCreateEdit("", 28, 199, 569, 201, BitOR($ES_READONLY,$ES_WANTRETURN,$WS_VSCROLL,$WS_BORDER)) GUICtrlSetData(-1, "") $Button1 = GUICtrlCreateButton("RUN", 64, 128, 75, 25) GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 _InstalledSoftware() EndSwitch WEnd Func _InstalledSoftware($sComputerName = @ComputerName) ;Finds all the for installed software on a remote PC with connection error logging. $iInstalledAppsCount = 1 While 2 $sSubKey = RegEnumKey("\\" & $sComputerName & "\HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall", $iInstalledAppsCount) $sDisplayName = RegRead("\\" & $sComputerName & "\HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\" & $sSubKey, "DisplayName") $sDisplayVersion = RegRead("\\" & $sComputerName & "\HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall\" & $sSubKey, "DisplayVersion") If $sDisplayName <> "" And $sDisplayVersion <> "" Then GUICtrlSetData($Edit1,"App Name: " & $sDisplayName & ", Version: " & $sDisplayVersion, 1) GUICtrlSetData($Edit1, @CRLF, 1) EndIf $iInstalledAppsCount +=1 WEnd EndFunc but now i have a problem with it when i click the "RUN" button it list all the software installed but it want come out of the secound wihle loop to dive me control to close the program. i need help to fix this problem.

ok guys i got this to part work here what i got #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <TabConstants.au3> #include <WindowsConstants.au3> $pc = "\\john-pc" $Form1 = GUICreate("Form1", 625, 443, 192, 124) $Edit1 = GUICtrlCreateEdit("", 28, 199, 569, 201, BitOR($ES_READONLY,$ES_WANTRETURN,$WS_VSCROLL,$WS_BORDER)) GUICtrlSetData(-1, "") $Button1 = GUICtrlCreateButton("Close", 64, 128, 75, 25) GUISetState(@SW_SHOW) for $i = 1 to 100 $info = RegEnumKey($pc&"\HKLM\software\microsoft\windows\currentversion\uninstall\", $i) ;$info2 = RegEnumVal($pc&"\HKLM\software\microsoft\windows\currentversion\uninstall\"&$info , $i) if @error <> 0 then ExitLoop ;MsgBox(4096,0,$info2) GUICtrlSetData($Edit1, $i &" "& $info, 1) GUICtrlSetData($Edit1, @CRLF, 1) Next While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit case $Button1 Exit EndSwitch WEnd but i want ti to only show the apps that are installed only the programs names EG office 2007, AVG 9 ect but not {884856456456123_pojihuu}_1 classes

ok thanks WEBS ill read it.

thats the probelm i dont know the vales as on all systems the values are going to different all the time. some systems are win xp, vista, win 7 on and ME. any more idears???

yea i need help how to make the app if i use the information from the help file i can get sominformation back with this bit of code. $info = RegRead("\\john-pc\HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion", "ProgramFilesDir") MsgBox(0,0,$info) but i just dont want that one entry i want the hole of the restory bringing back to a tree view gui. hop you under stand what im getting at. thanks