Gerald

good day sir how can i add a new col in array for this function #include <Array.au3> Local $avArray[10] $avArray[0] = "JPM" $avArray[1] = "Holger" $avArray[2] = "Jon" $avArray[3] = "Larry" $avArray[4] = "Jeremy" $avArray[5] = "Valik" $avArray[6] = "Cyberslug" $avArray[7] = "Nutster" $avArray[8] = "JdeB" $avArray[9] = "Tylo" _ArrayDisplay($avArray, "$avArray set manually 1D") i want to add a col 1 col 2 col 3 etc but the rows number a continues counting thank you for the advance

sir this is my command code For $oWord in $miDoc.Images(0).Layout.Words $str = $str & $oWord.text & @CrLf ConsoleWrite($oWord.text & @CRLF) $sArray [$i] = $oWord.text $i += 1 Next _ArrayDisplay($sArray,"OCR Result") how can i put in to exel ..?

sir i cant find the function of _exelcellwritefromarray what is SO ..?

good day my frnd i would like to ask a question about a _ArrayDisplay function my question is it's possible to _ArrayDisplay data will go into excel... ....tnx for the advnce

my next question is how can a get the value in edit hmmm if a click the edit box it's possible to get the value of click edit box...?

Tnx Problem solve

use the statement of StringReplace try dis $string = StringReplace ($string, 02-11", "2-11"); send($string) hope it's work

hi i have some question regards to my working program this is my code #include <GUIConstants.au3> #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Form1", 361, 365, 317, 191) $Input1 = GUICtrlCreateInput("Input1", 24, 40, 169, 21) $Edit1 = GUICtrlCreateList("", 8, 120, 337, 217) GUICtrlSetData(-1, "") $Button1 = GUICtrlCreateButton("Button1", 200, 32, 75, 25, 0) $Button3 = GUICtrlCreateButton("Button3", 280, 32, 75, 25, 0) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit case $Button1 Readreg() Case $Button3 orc() EndSwitch WEnd Func Readreg() For $i= 1 to 100000 $var = RegEnumVal("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run",$i) If @error <> 0 then ExitLoop GUICtrlSetData($Edit1,$var) Next EndFunc and my GUICtrlSetData result is only the value name of a regkey can possible to show the type and the date value in regkey .... ?

or you can your the If else statement if ControlCommand ("title", "text", controlID, "IsChecked") Then condition here Else condition here endif

i see the example of udf of Tesseract but the example of code are not exist i did know how its work hehehe just la little code pls a big smile hehe

sir can you give me a example how it's work sir just a little code

what is the different of to OPtical Character recognition .... can you give my some example of ORC

sir im new in optical character recognition can some one give me a example how to work optical character recognition or (orc) plss i want to learn that function plss rpz Thank you in advance

you have installed with autoit, autoit window info. after you install run window info looks like dis $TITLE = WinGetTitle("[CLASS:ZElementClient Window]") $WINNAME1 = WinSetTitle($TITLE, "", "ZX Online Bot") $WINNAME = WinGetTitle("ZX Online Bot")

can posible insert gif file on GUICtrlSetImage($videoThumbnail, "l2.gif") plsss help

thank you guy for your help i have make a my own and i have learn a littel bit soon i will post my code thank's a lot

nope i need i basic only a basic how youtube downloader work after i know the basic i will make my own program like i did to my previus program

can u give me some exmple of UDF and how it's work plss

hehehe you i have a lot of program that i made using this autotiscript i want to learn hot to get video for youtube so that i will make my program but thank you i wil read that

tnx but that is a UDF heheheh

hi guys can you pls give an tutorial how to make youtube downloader how can i start a code i have all ready have some program in autoitscript and i dont understand how youtube downloader work hehe i a noob can you plss help me guys i want to learn more ...

hmmmm i make a program called disk administrator i need to compiled my program her my program code i hope you will give me AutoIt3 Wrapper Gui i have all AutoIt3 Wrapper Gui but the problem AutoIt3 Wrapper Gui is corrupted so i need a fresh AutoIt3 Wrapper Gui file #Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_icon=..\..\project usb\remdrive.ico #AutoIt3Wrapper_outfile=drive.exe #AutoIt3Wrapper_Res_Comment=game_catague@yahoo.com #AutoIt3Wrapper_Res_Description=hide all drive disable the AutoRun #AutoIt3Wrapper_Res_Fileversion=1.0.0.0 #AutoIt3Wrapper_Res_LegalCopyright=Catague #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** #include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <EditConstants.au3> #include <WindowsConstants.au3> #include <String.au3> #include <GUIConstants.au3> #Region ### START Koda GUI section ### Form= $GuiTitle = "Disk Administrator V1.0 | Cat-software" If WinExists($GuiTitle) Then MsgBox(16, "Error", "Two Instances of this tool are not allowed," & @CRLF & _ "Close first one then run it again.") Exit EndIf $PASSFINISH = "catague" $INPUTTEDPASS = InputBox("Disk Administrator V1.0 | Cat-software", "Enter a password please:", "", "*") If @error = 1 Then MsgBox(16, "Disk Administrator V1.0 | Cat-software", "Wrong pwew!") Exit EndIf If $INPUTTEDPASS <> $PASSFINISH Then MsgBox(16, "Disk Administrator V1.0 | Cat-software", "Wrong password!") Exit Else MsgBox(0, "Disk Administrator V1.0 | Cat-software", "Password accepted, enjoy! =)") EndIf AutoItWinSetTitle($GuiTitle) FileInstall(".\1.jpg", @TempDir & "\1.jpg") FileInstall(".\2.jpg", @TempDir & "\2.jpg") $Form1 = GUICreate("Disk Administrator V1.0 | Cat-software", 428, 339, 341, 209) GUISetBkColor(0xFFFFFF) $Button1 = GUICtrlCreateButton("Hide Drives", 8, 192, 187, 25, 0) $Button2 = GUICtrlCreateButton("Prevent Access to drives", 8, 224, 187, 25, 0) $Button3 = GUICtrlCreateButton("Disable autorun on selected drives", 8, 256, 187, 25, 0) $Button4 = GUICtrlCreateButton("Restore default setting", 8, 288, 187, 25, 0) GUICtrlSetState(-1, $GUI_DISABLE) $Button5 = GUICtrlCreateButton("Apply Restrictions", 208, 192, 115, 25, 0) GUICtrlSetState(-1, $GUI_DISABLE) $Group1 = GUICtrlCreateGroup("External drive Write Protection", 208, 232, 217, 81) $ExternalWriteProtect = GUICtrlCreateCheckbox("Write-protect external removable -", 232, 256, 185, 17) $Label1 = GUICtrlCreateLabel("drives such as USB flash drives mass", 224, 272, 180, 17) $Icon1 = GUICtrlCreateIcon("C:\WINDOWS\system32\shell32.dll", -212, 216, 256, 16, 16, BitOR($SS_NOTIFY,$WS_GROUP)) $Label2 = GUICtrlCreateLabel("storagge and external hard drives.", 224, 288, 164, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) $Button6 = GUICtrlCreateButton("Exit", 328, 192, 75, 25, 0) $Label3 = GUICtrlCreateLabel("Disk Administrator V1.0 | Cat-software", 50, 8, 360, 28) GUICtrlSetFont(-1, 14, 400, 0, "MS Sans Serif") $Pic1 = GUICtrlCreatePic(@TempDir & "\1.jpg", 48, 48, 116, 108, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS)) $Pic2 = GUICtrlCreatePic(@TempDir & "\2.jpg", 240, 48, 100, 100, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS)) $MenuItem2 = GUICtrlCreateMenu("File") $MenuItem5 = GUICtrlCreateMenuItem("Exit", $MenuItem2) $MenuItem3 = GUICtrlCreateMenu("Program Help") $MenuItem81 = GUICtrlCreateMenuItem("Read Help File", $MenuItem3) $MenuItem1 = GUICtrlCreateMenu("Program Purpose") $MenuItem811 = GUICtrlCreateMenuItem("Read File", $MenuItem1) $MenuItem4 = GUICtrlCreateMenu("About") $MenuItem8 = GUICtrlCreateMenuItem("E-mail", $MenuItem4) $MenuItem10 = GUICtrlCreateMenuItem("About The Author", $MenuItem4) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE activatechanges() Exit case $MenuItem5 activatechanges() Exit case $ExternalWriteProtect ExternalWriteProtect() Case $MenuItem81 help() Case $Button1 NoDrives() GUICtrlSetState($Button5, $GUI_ENABLE) GUICtrlSetState($Button4, $GUI_ENABLE) Case $Button2 NoViewOnDrive() GUICtrlSetState($Button5, $GUI_ENABLE) GUICtrlSetState($Button4, $GUI_ENABLE) Case $Button3 NoDriveAutoRun() GUICtrlSetState($Button5, $GUI_ENABLE) GUICtrlSetState($Button4, $GUI_ENABLE) Case $Button4 Disable() Case $Button5 activatechanges() Case $MenuItem811 pp() Case $MenuItem8 MsgBox(64,"Disk Administrator V1.0 | Cat-software","e-mail game_catague@yahoo.com") Case $MenuItem10 MsgBox(64,"Code By: John Gerald Catague","Viva Philippines Women’s University " & @CRLF & "calamba city Laguna") about() case $Button6 Exit EndSwitch WEnd Func ExternalWriteProtect() If GUICtrlRead($ExternalWriteProtect) = $Gui_Checked Then RegWrite("HKLM\SYSTEM\CurrentControlSet\Control\StorageDevicePolicies", "WriteProtect", "REG_DWORD", "1") RegWrite("HKCU\SYSTEM\CurrentControlSet\Control\StorageDevicePolicies", "WriteProtect", "REG_DWORD", "1") Else RegWrite("HKLM\SYSTEM\CurrentControlSet\Control\StorageDevicePolicies", "WriteProtect", "REG_DWORD", "0") RegWrite("HKCU\SYSTEM\CurrentControlSet\Control\StorageDevicePolicies", "WriteProtect", "REG_DWORD", "0") EndIf EndFunc Func about() #Region ### START Koda GUI section ### Form=F:\au2it\Projects\Disk drive Administrator\about.kxf $hwnd2 = GUICreate("About", 318, 228, -1, -1, 0x94C800C4) GUISetIcon("shell32.dll", 50) GUISetIcon(@ScriptDir & "\images\disklock.ico") $Group11 = GUICtrlCreateGroup("", 8, 8, 65, 73) $icon1 = GUICtrlCreateIcon(@ScriptDir & "\images\disklock.ico", 0, 24, 32, 32, 32, BitOR($SS_NOTIFY, $WS_GROUP)) GUICtrlCreateGroup("", -99, -99, 1, 1) $Label11 = GUICtrlCreateLabel("Disk Administrator v1.0", 88, 16, 201, 28) GUICtrlSetFont(-1, 16, 400, 0, "MS Sans Serif") $Label2 = GUICtrlCreateLabel("Version: 1.0", 88, 48, 120, 17) GUICtrlSetFont(-1, 8, 800, 0, "MS Sans Serif") $Label4 = GUICtrlCreateLabel("Copyright:", 24, 112, 51, 17) $Label6 = GUICtrlCreateLabel("Home:", 40, 136, 35, 17) $Button1w = GUICtrlCreateButton("Ok", 8, 192, 83, 25, 0) $Label7 = GUICtrlCreateLabel("John Gerald Catague | cat-software", 88, 112, 200, 17) $Label8 = GUICtrlCreateLabel("http://www.cataguegerald.blogspot.com", 88, 136, 200, 17) GUICtrlSetFont(-1, 8, 400, 4, "MS Sans Serif") GUICtrlSetColor(-1, 0x0000FF) $Label51 = GUICtrlCreateLabel("Email: ", 40, 160, 35, 17) $Label9 = GUICtrlCreateLabel("game_catague@yahoo.com", 84, 162, 101, 17) GUICtrlSetFont(-1, 8, 400, 4, "MS Sans Serif") GUICtrlSetColor(-1, 0x0000FF) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE GUIDelete($hwnd2) ExitLoop case $Button1w GUIDelete($hwnd2) ExitLoop EndSwitch WEnd EndFunc ;==>about func help() #include <GUIConstants.au3> #Region ### START Koda GUI section ### Form= $Form2 = GUICreate("Disk Administrator V1.0 | Cat-software Help", 413, 298, 313, 218) GUISetBkColor(0xFFFFFF) $Edit1 = GUICtrlCreateEdit("", 8, 8, 393, 241, BitOR($ES_AUTOVSCROLL,$ES_AUTOHSCROLL,$ES_READONLY,$ES_WANTRETURN,$WS_VSCROLL,$WS_BORDER), BitOR($WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE)) GUICtrlSetData(-1, StringFormat("\r\n To hide and lock your individual drives as well as disable the AutoRun\r\n feature for them, use the checkboxes with settings that represent\r\n individual drives.\r\n To apply changes to your PC,\r\n you need to press the Apply button and confirm \r\n that you really want to apply them. \r\n You will need to reboot your PC to activate \r\n changes.\r\n")) $Button1 = GUICtrlCreateButton("Close", 320, 256, 75, 25, 0) $Label1 = GUICtrlCreateLabel("Code By: John Gerald Catague", 8, 264, 150, 17) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE GUIDelete($Form2) ExitLoop case $Button1w GUIDelete($Form2) ExitLoop EndSwitch WEnd EndFunc func pp() #include <GUIConstants.au3> #Region ### START Koda GUI section ### Form= $Form23 = GUICreate("Disk Administrator V1.0 | Cat-software", 413, 298, 313, 218) GUISetBkColor(0xFFFFFF) $Edit11 = GUICtrlCreateEdit("", 8, 8, 393, 241, BitOR($ES_AUTOVSCROLL,$ES_AUTOHSCROLL,$ES_READONLY,$ES_WANTRETURN,$WS_VSCROLL,$WS_BORDER), BitOR($WS_EX_CLIENTEDGE,$WS_EX_STATICEDGE)) GUICtrlSetData(-1, StringFormat("\r\n Use this password-protected security utility to hide and lock your local,\r\n network, \r\n Floppy and USB drives as well as disable the AutoRun feature for them. \r\n\r\n The design of the program is very simple. \r\n\r\n The main window contains the boxes with drive settings that represent\r\n individual drives and the toolbar used for applying changes. All you need to \r\n do is to click on the checkboxes with settings and after you finish press the \r\n apply button. \r\n\r\n For Comment or Suggestion E-mail Me at game_catague@yahoo.com\r\n\r\n or Visit my webpage at http://cataguegerald.blogspot.com")) $Button11 = GUICtrlCreateButton("Close", 320, 256, 75, 25, 0) $Label11 = GUICtrlCreateLabel("Code By: John Gerald Catague", 8, 264, 150, 17) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE GUIDelete($Form23) ExitLoop case $Button11 GUIDelete($Form23) ExitLoop EndSwitch WEnd EndFunc func activatechanges() Local $shell $shell = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "Shell") #Region --- CodeWizard generated code Start --- ;MsgBox features: Title=Yes, Text=Yes, Buttons=Yes and No, Icon=Info If Not IsDeclared("iMsgBoxAnswer") Then Local $iMsgBoxAnswer $iMsgBoxAnswer = MsgBox(68,"Information","Do you want to activate changes now?") Select Case $iMsgBoxAnswer = 6 ;Yes ProcessClose($shell) Case $iMsgBoxAnswer = 7 ;No MsgBox(64,"Information","Reboot computer to activate changes.") EndSelect #EndRegion --- CodeWizard generated code End --- EndFunc Func NoDrives() #include <GUIConstantsEx.au3> #include <StaticConstants.au3> ;================ ;This is the drive letter with it values ;=============== ;A: Bit 0 -- Z: Bit 25, ALL: Bits 0 thru 25 Global $ChkBox, $iSelection = 0 Global $iGuiW, $iGuiH, $hGui, $idLabel Global $iMsg, $f_Checked, $sText $ChkBox = DriveGetDrive("all") If Not @error Then MsgBox(4096, "Hide Drive v 1.0", "Found " & $ChkBox[0] & " Drives") EndIf $ChkBox2 = DriveGetDrive("all") $iGuiW = 200 + (UBound($ChkBox) * $ChkBox[0] * 3 ) $iGuiH = 100 + (UBound($ChkBox) * $ChkBox[0] * 2 ) $hGui = GUICreate("Hide Drive", $iGuiW, $iGuiH) GUISetBkColor(0xFFFFFF) For $i = 1 To UBound($ChkBox) - 1 $Label1 = GUICtrlCreateLabel("Check the box to hide your divers", 8, 16, 278, 17, BitOr($GUI_SS_DEFAULT_LABEL, $SS_CENTER)) $ChkBox[$i] = GUICtrlCreateCheckbox($ChkBox[$i], 10, ($i * 20) + 10, 80, 20) Next $idLabel = GUICtrlCreateLabel("REG_DWORD = 0 (0x00000000)", 10, $iGuiH - 30, $iGuiW - 20, 20, BitOr($GUI_SS_DEFAULT_LABEL, $SS_CENTER)) GUISetState() While 1 $iMsg = GUIGetMsg() Switch $iMsg Case $GUI_EVENT_CLOSE GUIDelete($hGui) ExitLoop Case $ChkBox[1] To $ChkBox[UBound($ChkBox) - 1] $f_Checked = ControlCommand($hGui, "", $iMsg, "IsChecked") $sText = ControlGetText($hGui, "", $iMsg) ConsoleWrite("ChkBx: $iMsg = " & $iMsg & "; Text = " & $sText & "; Checked = " & $f_Checked & @LF) $iMsg = Asc(StringUpper(StringLeft($sText, 1))) - 0x41 ; A=0, Z=25 If $f_Checked Then $iSelection = BitOR($iSelection, 2 ^ $iMsg) RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer", "NoDrives", "REG_DWORD", "" & $iSelection & "") Else $iSelection = BitAND($iSelection, BitNot(2 ^ $iMsg)) RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer", "NoDrives", "REG_DWORD", "" & $iSelection & "") EndIf If $iSelection Then ControlSetText($hGui, "", $idLabel, "REG_DWORD = " & $iSelection & " (0x" & Hex($iSelection) & ")") Else ControlSetText($hGui, "", $idLabel, "REG_DWORD = 0 (0x00000000)") EndIf EndSwitch WEnd EndFunc Func NoViewOnDrive() #include <GUIConstantsEx.au3> #include <StaticConstants.au3> ;================ ;This is the drive letter with it values ;=============== ;A: Bit 0 -- Z: Bit 25, ALL: Bits 0 thru 25 Global $ChkBox, $iSelection = 0 Global $iGuiW, $iGuiH, $hGui, $idLabel Global $iMsg, $f_Checked, $sText $ChkBox = DriveGetDrive("all") If Not @error Then MsgBox(4096, "No View On Drives", "Found " & $ChkBox[0] & " Drives") EndIf $ChkBox2 = DriveGetDrive("all") $iGuiW = 200 + (UBound($ChkBox) * $ChkBox[0] * 3 ) $iGuiH = 100 + (UBound($ChkBox) * $ChkBox[0] * 2 ) $hGui = GUICreate("No View On Drives", $iGuiW, $iGuiH) GUISetBkColor(0xFFFFFF) For $i = 1 To UBound($ChkBox) - 1 $Label1 = GUICtrlCreateLabel("Check the box to No View On Drives", 8, 16, 278, 17, BitOr($GUI_SS_DEFAULT_LABEL, $SS_CENTER)) $ChkBox[$i] = GUICtrlCreateCheckbox($ChkBox[$i], 10, ($i * 20) + 10, 80, 20) Next $idLabel = GUICtrlCreateLabel("REG_DWORD = 0 (0x00000000)", 10, $iGuiH - 30, $iGuiW - 20, 20, BitOr($GUI_SS_DEFAULT_LABEL, $SS_CENTER)) GUISetState() While 1 $iMsg = GUIGetMsg() Switch $iMsg Case $GUI_EVENT_CLOSE GUIDelete($hGui) ExitLoop Case $ChkBox[1] To $ChkBox[UBound($ChkBox) - 1] $f_Checked = ControlCommand($hGui, "", $iMsg, "IsChecked") $sText = ControlGetText($hGui, "", $iMsg) ConsoleWrite("ChkBx: $iMsg = " & $iMsg & "; Text = " & $sText & "; Checked = " & $f_Checked & @LF) $iMsg = Asc(StringUpper(StringLeft($sText, 1))) - 0x41 ; A=0, Z=25 If $f_Checked Then $iSelection = BitOR($iSelection, 2 ^ $iMsg) RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer", "NoViewOnDrive", "REG_DWORD", "" & $iSelection & "") Else $iSelection = BitAND($iSelection, BitNot(2 ^ $iMsg)) RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer", "NoViewOnDrive", "REG_DWORD", "" & $iSelection & "") EndIf If $iSelection Then ControlSetText($hGui, "", $idLabel, "REG_DWORD = " & $iSelection & " (0x" & Hex($iSelection) & ")") Else ControlSetText($hGui, "", $idLabel, "REG_DWORD = 0 (0x00000000)") EndIf EndSwitch WEnd EndFunc Func NoDriveAutoRun() #include <GUIConstantsEx.au3> #include <StaticConstants.au3> ;================ ;This is the drive letter with it values ;=============== ;A: Bit 0 -- Z: Bit 25, ALL: Bits 0 thru 25 Global $ChkBox, $iSelection = 0 Global $iGuiW, $iGuiH, $hGui, $idLabel Global $iMsg, $f_Checked, $sText $ChkBox = DriveGetDrive("all") If Not @error Then MsgBox(4096, "Disable autorun on selected drives", "Found " & $ChkBox[0] & " Drives") EndIf $ChkBox2 = DriveGetDrive("all") $iGuiW = 200 + (UBound($ChkBox) * $ChkBox[0] * 3) $iGuiH = 100 + (UBound($ChkBox) * $ChkBox[0] * 2 ) $hGui = GUICreate("Disable autorun on selected drives", $iGuiW, $iGuiH) GUISetBkColor(0xFFFFFF) For $i = 1 To UBound($ChkBox) - 1 $Label1 = GUICtrlCreateLabel("Check the box to Disable autorun on selected drives", 8, 16, 278, 17, BitOr($GUI_SS_DEFAULT_LABEL, $SS_CENTER)) $ChkBox[$i] = GUICtrlCreateCheckbox($ChkBox[$i], 10, ($i * 20) + 10, 80, 20) Next $idLabel = GUICtrlCreateLabel("REG_DWORD = 0 (0x00000000)", 10, $iGuiH - 30, $iGuiW - 20, 20, BitOr($GUI_SS_DEFAULT_LABEL, $SS_CENTER)) GUISetState() While 1 $iMsg = GUIGetMsg() Switch $iMsg Case $GUI_EVENT_CLOSE GUIDelete($hGui) ExitLoop Case $ChkBox[1] To $ChkBox[UBound($ChkBox) - 1] $f_Checked = ControlCommand($hGui, "", $iMsg, "IsChecked") $sText = ControlGetText($hGui, "", $iMsg) ConsoleWrite("ChkBx: $iMsg = " & $iMsg & "; Text = " & $sText & "; Checked = " & $f_Checked & @LF) $iMsg = Asc(StringUpper(StringLeft($sText, 1))) - 0x41 ; A=0, Z=25 If $f_Checked Then $iSelection = BitOR($iSelection, 2 ^ $iMsg) RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer", "NoDriveAutoRun", "REG_DWORD", "" & $iSelection & "") Else $iSelection = BitAND($iSelection, BitNot(2 ^ $iMsg)) RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer", "NoDriveAutoRun", "REG_DWORD", "" & $iSelection & "") EndIf If $iSelection Then ControlSetText($hGui, "", $idLabel, "REG_DWORD = " & $iSelection & " (0x" & Hex($iSelection) & ")") Else ControlSetText($hGui, "", $idLabel, "REG_DWORD = 0 (0x00000000)") EndIf EndSwitch WEnd EndFunc Func Disable() Local $shell $shell = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Winlogon", "Shell") #Region --- CodeWizard generated code Start --- ;MsgBox features: Title=Yes, Text=Yes, Buttons=Yes and No, Icon=Info If Not IsDeclared("iMsgBoxAnswer") Then Local $iMsgBoxAnswer $iMsgBoxAnswer = MsgBox(68,"Information","Do you want to Restore default setting now?") Select Case $iMsgBoxAnswer = 6 ;Yes RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer", "NoDriveAutoRun", "REG_DWORD", "0") ;NoDriveAutoRun RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer", "NoViewOnDrive", "REG_DWORD", "0");NoViewOnDrive RegWrite("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer", "NoDrives", "REG_DWORD", "0");NoViewOnDrive RegWrite("HKLM\SYSTEM\CurrentControlSet\Control\StorageDevicePolicies", "WriteProtect", "REG_DWORD", "0") RegWrite("HKCU\SYSTEM\CurrentControlSet\Control\StorageDevicePolicies", "WriteProtect", "REG_DWORD", "0") ProcessClose($shell) Case $iMsgBoxAnswer = 7 ;No MsgBox(64,"Information","Restore default setting Abort!") EndSelect #EndRegion --- CodeWizard generated code End --- EndFunc i need to complied

can some one give me a link of AutoIt3Wrapper_Gui.exe i need to download dis program because i need to compile and put some detailed REPLAY MY POST ASAP

@ PsaltyDS thnks to you assemble the REG_DWORD value i will post my hide drive if i have done thanks man hmmm can you put the desperation of your code how its work thank you men

hi i all ready make a simple download that convert into mp3 file but youtube update now my program not work properly this is my code <snip> anyone help me to update my program please