kabar Posted June 18, 2009 Share Posted June 18, 2009 First I would like to say that I am a noob (boob) at scripting. I have found that this forum is a wonderful help tool. I have created this gui that will add a user/s to multiple Active Directory groups based on selected checkboxes. I am finding that I may have to many checkboxes and the script is getting confused (I'm already confused) lol. I think that I am really missing something simple and there is a better way to get the same thing accomplished. Any input and direction would be greatly appreciated. Regards, Tom Without further ado My spanking script. Code\ #include <WindowsConstants.au3> #include <adfunctions.au3> #include <GUIConstantsEx.au3> ;~ #include <ButtonConstants.au3> ;~ #include <EditConstants.au3> ;~ #include <StaticConstants.au3> ;~ #include <file.au3> ;~ #include <GUIConstants.au3> ;~ #include <Array.au3> Global $msg $Form1 = GUICreate("Network Access Control Panel", 700, 900, 400, 300);"1100, 900, 400, 300" resize for expansion 700, 900, 400, 300 $Group1 = GUICtrlCreateGroup("Employee Number", 5, 16, 137, 417) Global $ID1 = GUICtrlCreateInput("ID 1", 8, 64, 121, 21) ;~ Global $ID2 = GUICtrlCreateInput("ID 2", 8, 96, 121, 21);expansion to include multiple ID assignments?? ;~ Global $ID3 = GUICtrlCreateInput("ID 3", 8, 128, 121, 21);expansion to include multiple ID assignments?? Global $Pattern = GUICtrlCreateInput("Pattern After", 8, 264, 121, 21);Not currently configured for use. Will bring up list of assigned AD groups for specified user. GUICtrlCreateGroup("", -99, -99, 1, 1) $Group2 = GUICtrlCreateGroup("Select Requested Active Directory Groups", 150, 20, 510, 830);"150, 20, 925, 830" resize for expansion 150, 20, 550, 830 ;Check boxes create Global $cbx1 = GUICtrlCreateCheckbox("DA_TOM_TEST_S", 160, 45, 260, 17) Global $cbx2 = GUICtrlCreateCheckbox("DA_TOM_TEST1_S", 160, 65, 260, 17) Global $cbx3 = GUICtrlCreateCheckbox("DA_TOM_TEST2_S", 160, 85, 260, 17) Global $cbx4 = GUICtrlCreateCheckbox("cbx", 160, 105, 260, 17) Global $cbx5 = GUICtrlCreateCheckbox("cbx", 160, 125, 260, 17) Global $cbx6 = GUICtrlCreateCheckbox("cbx", 160, 145, 260, 17) Global $cbx7 = GUICtrlCreateCheckbox("cbx", 160, 165, 260, 17) Global $cbx8 = GUICtrlCreateCheckbox("cbx", 160, 185, 260, 17) Global $cbx9 = GUICtrlCreateCheckbox("cbx", 160, 205, 260, 17) Global $cbx10 = GUICtrlCreateCheckbox("cbx10", 160, 225, 260, 17) Global $cbx11 = GUICtrlCreateCheckbox("cbx", 160, 245, 260, 17) Global $cbx12 = GUICtrlCreateCheckbox("cbx", 160, 265, 260, 17) Global $cbx13 = GUICtrlCreateCheckbox("cbx", 160, 285, 260, 17) Global $cbx14 = GUICtrlCreateCheckbox("cbx", 160, 305, 260, 17) Global $cbx15 = GUICtrlCreateCheckbox("cbx15", 160, 325, 260, 17) Global $cbx16 = GUICtrlCreateCheckbox("cbx", 160, 345, 260, 17) Global $cbx17 = GUICtrlCreateCheckbox("cbx", 160, 365, 260, 17) Global $cbx18 = GUICtrlCreateCheckbox("cbx", 160, 385, 260, 17) Global $cbx19 = GUICtrlCreateCheckbox("cbx", 160, 405, 260, 17) Global $cbx20 = GUICtrlCreateCheckbox("cbx20", 160, 425, 260, 17) Global $cbx21 = GUICtrlCreateCheckbox("cbx", 160, 445, 260, 17) Global $cbx22 = GUICtrlCreateCheckbox("cbx", 160, 465, 260, 17) Global $cbx23 = GUICtrlCreateCheckbox("cbx", 160, 485, 260, 17) Global $cbx24 = GUICtrlCreateCheckbox("cbx", 160, 505, 260, 17) Global $cbx25 = GUICtrlCreateCheckbox("cbx25", 160, 525, 260, 17) Global $cbx26 = GUICtrlCreateCheckbox("cbx", 160, 545, 260, 17) Global $cbx27 = GUICtrlCreateCheckbox("cbx", 160, 565, 260, 17) Global $cbx28 = GUICtrlCreateCheckbox("cbx", 160, 585, 260, 17) Global $cbx29 = GUICtrlCreateCheckbox("cbx", 160, 605, 260, 17) Global $cbx30 = GUICtrlCreateCheckbox("cbx30", 160, 625, 260, 17) Global $cbx31 = GUICtrlCreateCheckbox("cbx", 160, 645, 260, 17) Global $cbx32 = GUICtrlCreateCheckbox("cbx", 160, 665, 260, 17) Global $cbx33 = GUICtrlCreateCheckbox("cbx", 160, 685, 260, 17) Global $cbx34 = GUICtrlCreateCheckbox("cbx", 160, 705, 260, 17) Global $cbx35 = GUICtrlCreateCheckbox("cbx35", 160, 725, 260, 17) Global $cbx36 = GUICtrlCreateCheckbox("cbx", 160, 745, 260, 17) Global $cbx37 = GUICtrlCreateCheckbox("cbx", 160, 765, 260, 17) Global $cbx38 = GUICtrlCreateCheckbox("cbx", 160, 785, 260, 17) Global $cbx39 = GUICtrlCreateCheckbox("cbx", 160, 805, 260, 17) Global $cbx40 = GUICtrlCreateCheckbox("cbx40", 160, 825, 260, 17) Global $cbx41 = GUICtrlCreateCheckbox("DA_TOM_TEST3_S", 420, 45, 260, 17) Global $cbx42 = GUICtrlCreateCheckbox("DA_TOM_TEST4_S", 420, 65, 260, 17) Global $cbx43 = GUICtrlCreateCheckbox("DA_TOM_TEST5_S", 420, 85, 260, 17) Global $cbx44 = GUICtrlCreateCheckbox("cbx", 420, 105, 260, 17) Global $cbx45 = GUICtrlCreateCheckbox("cbx45", 420, 125, 260, 17) Global $cbx46 = GUICtrlCreateCheckbox("cbx2", 420, 145, 260, 17) Global $cbx47 = GUICtrlCreateCheckbox("cbx", 420, 165, 260, 17) Global $cbx48 = GUICtrlCreateCheckbox("cbx", 420, 185, 260, 17) Global $cbx49 = GUICtrlCreateCheckbox("cbx", 420, 205, 260, 17) Global $cbx50 = GUICtrlCreateCheckbox("cbx50", 420, 225, 260, 17) Global $cbx51 = GUICtrlCreateCheckbox("cbx", 420, 245, 260, 17) Global $cbx52 = GUICtrlCreateCheckbox("cbx", 420, 265, 260, 17) Global $cbx53 = GUICtrlCreateCheckbox("cbx", 420, 285, 260, 17) Global $cbx54 = GUICtrlCreateCheckbox("cbx", 420, 305, 260, 17) Global $cbx55 = GUICtrlCreateCheckbox("cbx55", 420, 325, 260, 17) Global $cbx56 = GUICtrlCreateCheckbox("cbx", 420, 345, 260, 17) Global $cbx57 = GUICtrlCreateCheckbox("cbx", 420, 365, 260, 17) Global $cbx58 = GUICtrlCreateCheckbox("cbx", 420, 385, 260, 17) Global $cbx59 = GUICtrlCreateCheckbox("cbx", 420, 405, 260, 17) Global $cbx60 = GUICtrlCreateCheckbox("cbx60", 420, 425, 260, 17) Global $cbx61 = GUICtrlCreateCheckbox("cbx", 420, 445, 260, 17) Global $cbx62 = GUICtrlCreateCheckbox("cbx", 420, 465, 260, 17) Global $cbx63 = GUICtrlCreateCheckbox("cbx", 420, 485, 260, 17) Global $cbx64 = GUICtrlCreateCheckbox("cbx", 420, 505, 260, 17) Global $cbx65 = GUICtrlCreateCheckbox("cbx65", 420, 525, 260, 17) Global $cbx66 = GUICtrlCreateCheckbox("cbx", 420, 545, 260, 17) Global $cbx67 = GUICtrlCreateCheckbox("cbx", 420, 565, 260, 17) Global $cbx68 = GUICtrlCreateCheckbox("cbx", 420, 585, 260, 17) Global $cbx69 = GUICtrlCreateCheckbox("cbx", 420, 605, 260, 17) Global $cbx70 = GUICtrlCreateCheckbox("cbx70", 420, 625, 260, 17) Global $cbx71 = GUICtrlCreateCheckbox("cbx", 420, 645, 260, 17) Global $cbx72 = GUICtrlCreateCheckbox("cbx", 420, 665, 260, 17) Global $cbx73 = GUICtrlCreateCheckbox("cbx", 420, 685, 260, 17) Global $cbx74 = GUICtrlCreateCheckbox("cbx", 420, 705, 260, 17) Global $cbx75 = GUICtrlCreateCheckbox("cbx75", 420, 725, 260, 17) Global $cbx76 = GUICtrlCreateCheckbox("cbx", 420, 745, 260, 17) Global $cbx77 = GUICtrlCreateCheckbox("cbx", 420, 765, 260, 17) Global $cbx78 = GUICtrlCreateCheckbox("cbx", 420, 785, 260, 17) Global $cbx79 = GUICtrlCreateCheckbox("cbx", 420, 805, 260, 17) Global $cbx80 = GUICtrlCreateCheckbox("cbx80", 420, 825, 260, 17) #cs Below used for expansion if needed Global $cbx81 = GUICtrlCreateCheckbox("group FS RW grdop-budget_staff_planning-leadership_S", 680, 45, 260, 17); 46 char test "group FS RW grdop-budget_staff_planning-leadership_S" Global $cbx82 = GUICtrlCreateCheckbox("cbx", 680, 65, 260, 17) Global $cbx83 = GUICtrlCreateCheckbox("cbx", 680, 85, 260, 17) Global $cbx84 = GUICtrlCreateCheckbox("cbx", 680, 105, 260, 17) Global $cbx85 = GUICtrlCreateCheckbox("cbx", 680, 125, 260, 17) Global $cbx86 = GUICtrlCreateCheckbox("cbx", 680, 145, 260, 17) Global $cbx87 = GUICtrlCreateCheckbox("cbx", 680, 165, 260, 17) Global $cbx88 = GUICtrlCreateCheckbox("cbx", 680, 185, 260, 17) Global $cbx89 = GUICtrlCreateCheckbox("cbx", 680, 205, 260, 17) Global $cbx90 = GUICtrlCreateCheckbox("cbx90", 680, 225, 260, 17) Global $cbx94 = GUICtrlCreateCheckbox("cbx", 680, 245, 260, 17) Global $cbx92 = GUICtrlCreateCheckbox("cbx", 680, 265, 260, 17) Global $cbx93 = GUICtrlCreateCheckbox("cbx", 680, 285, 260, 17) Global $cbx94 = GUICtrlCreateCheckbox("cbx", 680, 305, 260, 17) Global $cbx95 = GUICtrlCreateCheckbox("cbx95", 680, 325, 260, 17) Global $cbx96 = GUICtrlCreateCheckbox("cbx", 680, 345, 260, 17) Global $cbx97 = GUICtrlCreateCheckbox("cbx", 680, 365, 260, 17) Global $cbx98 = GUICtrlCreateCheckbox("cbx", 680, 385, 260, 17) Global $cbx99 = GUICtrlCreateCheckbox("cbx", 680, 405, 260, 17) Global $cbx100 = GUICtrlCreateCheckbox("cbx100", 680, 425, 260, 17) Global $cbx101 = GUICtrlCreateCheckbox("cbx", 680, 445, 260, 17) Global $cbx102 = GUICtrlCreateCheckbox("cbx", 680, 465, 260, 17) Global $cbx103 = GUICtrlCreateCheckbox("cbx", 680, 485, 260, 17) Global $cbx104 = GUICtrlCreateCheckbox("cbx", 680, 505, 260, 17) Global $cbx105 = GUICtrlCreateCheckbox("cbx105", 680, 525, 260, 17) Global $cbx106 = GUICtrlCreateCheckbox("cbx", 680, 545, 260, 17) Global $cbx107 = GUICtrlCreateCheckbox("cbx", 680, 565, 260, 17) Global $cbx108 = GUICtrlCreateCheckbox("cbx", 680, 585, 260, 17) Global $cbx109 = GUICtrlCreateCheckbox("cbx", 680, 605, 260, 17) Global $cbx110 = GUICtrlCreateCheckbox("cbx110", 680, 625, 260, 17) Global $cbx111 = GUICtrlCreateCheckbox("cbx", 680, 645, 260, 17) Global $cbx112 = GUICtrlCreateCheckbox("cbx", 680, 665, 260, 17) Global $cbx113 = GUICtrlCreateCheckbox("cbx", 680, 685, 260, 17) Global $cbx114 = GUICtrlCreateCheckbox("cbx", 680, 705, 260, 17) Global $cbx115 = GUICtrlCreateCheckbox("cbx115", 680, 725, 260, 17) Global $cbx116 = GUICtrlCreateCheckbox("cbx", 680, 745, 260, 17) Global $cbx117 = GUICtrlCreateCheckbox("cbx", 680, 765, 260, 17) Global $cbx118 = GUICtrlCreateCheckbox("cbx", 680, 785, 260, 17) Global $cbx119 = GUICtrlCreateCheckbox("cbx", 680, 805, 260, 17) Global $cbx120 = GUICtrlCreateCheckbox("cbx", 680, 825, 260, 17) #ce Above used for expansion if needed GUICtrlCreateGroup("", -99, -99, 1, 1) Global $add = GUICtrlCreateButton("Add User", 20, 450, 75, 25, $WS_GROUP) Global $exit = GUICtrlCreateButton("Exit", 20, 500, 75, 25, $WS_GROUP) Global $test = GUICtrlCreateButton("Test", 20, 550, 75, 25, $WS_GROUP) Global $clear = GUICtrlCreateButton("Clear All", 20, 575, 75, 25, $WS_GROUP) ;~ GUISetState(@SW_SHOW) GUISetState() While 1 $Msg = GUIGetMsg() Select Case $Msg = $exit ext() Case $Msg = $test tst() Case $Msg = $add add() Case $Msg = $clear clr() Case $Form1 Case $Form1 Case $Form1 Case $Form1 Case $ID1 ;~ Case $ID2 ;~ Case $ID3 Case $cbx1 Case $cbx2 Case $cbx3 ;~ Case $cbx41 ;~ Case $cbx42 ;~ Case $cbx43 Exit EndSelect If $msg = $GUI_EVENT_CLOSE Then Exit EndIf WEnd GUIDelete() Exit Func ext() ;Exit $line1 = "GOOD BYE" ;~ MsgBox(48, "Hello", $line1) exit EndFunc ;==>Ext Func Clr() ;Clears all checkboxes, should not uncheck if no is selected. ;~ If GUICtrlSetData($cbx1,0) = 1 Then If $cbx1 = $GUI_CHECKED = 0 Then $iresult = MsgBox(4100, "Attention", "Are you sure you want to clear all?") If $iresult = True then ;~ GUICtrlSetState($cbx1,$GUI_CHECKED) GUICtrlSetState($cbx1,$GUI_UNCHECKED) GUICtrlSetState($cbx2,$GUI_UNCHECKED) GUICtrlSetState($cbx3,$GUI_UNCHECKED) GUICtrlSetState($cbx4,$GUI_UNCHECKED) GUICtrlSetState($cbx5,$GUI_UNCHECKED) GUICtrlSetState($cbx6,$GUI_UNCHECKED) GUICtrlSetState($cbx7,$GUI_UNCHECKED) GUICtrlSetState($cbx8,$GUI_UNCHECKED) GUICtrlSetState($cbx9,$GUI_UNCHECKED) GUICtrlSetState($cbx10,$GUI_UNCHECKED) GUICtrlSetState($cbx11,$GUI_UNCHECKED) GUICtrlSetState($cbx12,$GUI_UNCHECKED) GUICtrlSetState($cbx13,$GUI_UNCHECKED) GUICtrlSetState($cbx14,$GUI_UNCHECKED) GUICtrlSetState($cbx15,$GUI_UNCHECKED) GUICtrlSetState($cbx16,$GUI_UNCHECKED) GUICtrlSetState($cbx17,$GUI_UNCHECKED) GUICtrlSetState($cbx18,$GUI_UNCHECKED) GUICtrlSetState($cbx19,$GUI_UNCHECKED) GUICtrlSetState($cbx20,$GUI_UNCHECKED) GUICtrlSetState($cbx21,$GUI_UNCHECKED) GUICtrlSetState($cbx22,$GUI_UNCHECKED) GUICtrlSetState($cbx23,$GUI_UNCHECKED) GUICtrlSetState($cbx24,$GUI_UNCHECKED) GUICtrlSetState($cbx25,$GUI_UNCHECKED) GUICtrlSetState($cbx26,$GUI_UNCHECKED) GUICtrlSetState($cbx27,$GUI_UNCHECKED) GUICtrlSetState($cbx28,$GUI_UNCHECKED) GUICtrlSetState($cbx29,$GUI_UNCHECKED) GUICtrlSetState($cbx30,$GUI_UNCHECKED) GUICtrlSetState($cbx31,$GUI_UNCHECKED) GUICtrlSetState($cbx32,$GUI_UNCHECKED) GUICtrlSetState($cbx33,$GUI_UNCHECKED) GUICtrlSetState($cbx34,$GUI_UNCHECKED) GUICtrlSetState($cbx35,$GUI_UNCHECKED) GUICtrlSetState($cbx36,$GUI_UNCHECKED) GUICtrlSetState($cbx37,$GUI_UNCHECKED) GUICtrlSetState($cbx38,$GUI_UNCHECKED) GUICtrlSetState($cbx39,$GUI_UNCHECKED) GUICtrlSetState($cbx40,$GUI_UNCHECKED) GUICtrlSetState($cbx41,$GUI_UNCHECKED) GUICtrlSetState($cbx42,$GUI_UNCHECKED) GUICtrlSetState($cbx43,$GUI_UNCHECKED) GUICtrlSetState($cbx44,$GUI_UNCHECKED) GUICtrlSetState($cbx45,$GUI_UNCHECKED) GUICtrlSetState($cbx46,$GUI_UNCHECKED) GUICtrlSetState($cbx47,$GUI_UNCHECKED) GUICtrlSetState($cbx48,$GUI_UNCHECKED) GUICtrlSetState($cbx49,$GUI_UNCHECKED) GUICtrlSetState($cbx50,$GUI_UNCHECKED) GUICtrlSetState($cbx51,$GUI_UNCHECKED) GUICtrlSetState($cbx52,$GUI_UNCHECKED) GUICtrlSetState($cbx53,$GUI_UNCHECKED) GUICtrlSetState($cbx54,$GUI_UNCHECKED) GUICtrlSetState($cbx55,$GUI_UNCHECKED) GUICtrlSetState($cbx56,$GUI_UNCHECKED) GUICtrlSetState($cbx57,$GUI_UNCHECKED) GUICtrlSetState($cbx58,$GUI_UNCHECKED) GUICtrlSetState($cbx59,$GUI_UNCHECKED) GUICtrlSetState($cbx60,$GUI_UNCHECKED) GUICtrlSetState($cbx61,$GUI_UNCHECKED) GUICtrlSetState($cbx62,$GUI_UNCHECKED) GUICtrlSetState($cbx63,$GUI_UNCHECKED) GUICtrlSetState($cbx64,$GUI_UNCHECKED) GUICtrlSetState($cbx65,$GUI_UNCHECKED) GUICtrlSetState($cbx66,$GUI_UNCHECKED) GUICtrlSetState($cbx67,$GUI_UNCHECKED) GUICtrlSetState($cbx68,$GUI_UNCHECKED) GUICtrlSetState($cbx69,$GUI_UNCHECKED) GUICtrlSetState($cbx70,$GUI_UNCHECKED) GUICtrlSetState($cbx71,$GUI_UNCHECKED) GUICtrlSetState($cbx72,$GUI_UNCHECKED) GUICtrlSetState($cbx73,$GUI_UNCHECKED) GUICtrlSetState($cbx74,$GUI_UNCHECKED) GUICtrlSetState($cbx75,$GUI_UNCHECKED) GUICtrlSetState($cbx76,$GUI_UNCHECKED) GUICtrlSetState($cbx77,$GUI_UNCHECKED) GUICtrlSetState($cbx78,$GUI_UNCHECKED) GUICtrlSetState($cbx79,$GUI_UNCHECKED) GUICtrlSetState($cbx80,$GUI_UNCHECKED) #cs Below used for expansion if needed GUICtrlSetState($cbx81,$GUI_UNCHECKED) GUICtrlSetState($cbx82,$GUI_UNCHECKED) GUICtrlSetState($cbx83,$GUI_UNCHECKED) GUICtrlSetState($cbx84,$GUI_UNCHECKED) GUICtrlSetState($cbx85,$GUI_UNCHECKED) GUICtrlSetState($cbx86,$GUI_UNCHECKED) GUICtrlSetState($cbx87,$GUI_UNCHECKED) GUICtrlSetState($cbx88,$GUI_UNCHECKED) GUICtrlSetState($cbx89,$GUI_UNCHECKED) GUICtrlSetState($cbx90,$GUI_UNCHECKED) GUICtrlSetState($cbx91,$GUI_UNCHECKED) GUICtrlSetState($cbx92,$GUI_UNCHECKED) GUICtrlSetState($cbx93,$GUI_UNCHECKED) GUICtrlSetState($cbx94,$GUI_UNCHECKED) GUICtrlSetState($cbx95,$GUI_UNCHECKED) GUICtrlSetState($cbx96,$GUI_UNCHECKED) GUICtrlSetState($cbx97,$GUI_UNCHECKED) GUICtrlSetState($cbx98,$GUI_UNCHECKED) GUICtrlSetState($cbx99,$GUI_UNCHECKED) GUICtrlSetState($cbx100,$GUI_UNCHECKED) GUICtrlSetState($cbx101,$GUI_UNCHECKED) GUICtrlSetState($cbx102,$GUI_UNCHECKED) GUICtrlSetState($cbx103,$GUI_UNCHECKED) GUICtrlSetState($cbx104,$GUI_UNCHECKED) GUICtrlSetState($cbx105,$GUI_UNCHECKED) GUICtrlSetState($cbx106,$GUI_UNCHECKED) GUICtrlSetState($cbx107,$GUI_UNCHECKED) GUICtrlSetState($cbx108,$GUI_UNCHECKED) GUICtrlSetState($cbx109,$GUI_UNCHECKED) GUICtrlSetState($cbx110,$GUI_UNCHECKED) GUICtrlSetState($cbx111,$GUI_UNCHECKED) GUICtrlSetState($cbx112,$GUI_UNCHECKED) GUICtrlSetState($cbx113,$GUI_UNCHECKED) GUICtrlSetState($cbx114,$GUI_UNCHECKED) GUICtrlSetState($cbx115,$GUI_UNCHECKED) GUICtrlSetState($cbx116,$GUI_UNCHECKED) GUICtrlSetState($cbx117,$GUI_UNCHECKED) GUICtrlSetState($cbx118,$GUI_UNCHECKED) GUICtrlSetState($cbx119,$GUI_UNCHECKED) GUICtrlSetState($cbx120,$GUI_UNCHECKED) #ce Above used for expansion if needed ;~ MsgBox(48, "AD Group Assignment","Selected Groups have been assigned") Else EndIf EndIf EndFunc ;Clear all Checkboxes ;~ #cs func add() ;Adds ID's to checked AD groups; There will be many ActiveDirectory Groups to be added. Local $data1 = GUICtrlRead($ID1) ;~ Local $data2 = GUICtrlRead($ID2) ;~ Local $data3 = GUICtrlRead($ID3) Local $E1 = StringLeft($data1,1) ;~ Local $E2 = StringLeft($data2,1) ;~ Local $E3 = StringLeft($data3,1) Local $put1 = GUICtrlRead($add) Local $DAGroup1 = "DA_Tom_Test_S" Local $DAGroup2 = "DA_Tom_Test_S1" Local $DAGroup3 = "DA_Tom_Test_S2" Local $DAGroup4 = "DA_Tom_Test_S3" Local $DAGroup5 = "DA_Tom_Test_S4" Local $DAGroup6 = "DA_Tom_Test_S5" If $data1 <> "" Then ;Verifies an E or X is the first input character. If StringLower($E1) = "e" or StringLower($E1) = "x" Then ;~ If $put1 = "1" Then _ADAddUserToGroup(_ADSamAccountNameToFQDN($DAGroup1), _ADSamAccountNameToFQDN($data1)); adds to the AD Group ;~ EndIf EndIf EndIf If $data1 <> "" Then If StringLower($E1) = "e" or StringLower($E1) = "x" Then ;~ If $put1 = "1" Then _ADAddUserToGroup(_ADSamAccountNameToFQDN($DAGroup2), _ADSamAccountNameToFQDN($data1)) ;~ EndIf Sleep(100) EndIf EndIf If $data1 <> "" Then If StringLower($E1) = "e" or StringLower($E1) = "x" Then ;~ If $put1 = "1" Then _ADAddUserToGroup(_ADSamAccountNameToFQDN($DAGroup3), _ADSamAccountNameToFQDN($data1)) ;~ EndIf EndIf EndIf If $data1 <> "" Then If StringLower($E1) = "e" or StringLower($E1) = "x" Then ;~ If $put1 = "1" Then _ADAddUserToGroup(_ADSamAccountNameToFQDN($DAGroup4), _ADSamAccountNameToFQDN($data1)) ;~ EndIf EndIf EndIf If $data1 <> "" Then If StringLower($E1) = "e" or StringLower($E1) = "x" Then ;~ If $put1 = "1" Then _ADAddUserToGroup(_ADSamAccountNameToFQDN($DAGroup5), _ADSamAccountNameToFQDN($data1)) ;~ EndIf Sleep(100) EndIf EndIf If $data1 <> "" Then If StringLower($E1) = "e" or StringLower($E1) = "x" Then ;~ If $put1 = "1" Then _ADAddUserToGroup(_ADSamAccountNameToFQDN($DAGroup6), _ADSamAccountNameToFQDN($data1)) ;~ EndIf EndIf EndIf EndFunc ;Add to AD ;~ #cs Func tst() ;Used for testing Not in production! Local $data1 = GUICtrlRead($cbx1) If $data1 = $GUI_CHECKED Then MsgBox(48, "Hello", $data1) Else MsgBox(0, "Results", $cbx1 & " Is UnChecked") EndIf ;~ Next EndFunc ;Test ;~ #ce #cs Func tst();Used for testing Not in production! toogle between above tst For $i = $cbx1 To $cbx6 If BitAnd(GuiCtrlRead($i), $GUI_Checked) Then MsgBox(0, "Results", GuiCtrlRead($i)& $i) EndIf Next EndFunc #ce Exit Link to comment Share on other sites More sharing options...
oMBRa Posted June 18, 2009 Share Posted June 18, 2009 First I would like to say that I am a noob (boob) at scripting. I have found that this forum is a wonderful help tool. I have created this gui that will add a user/s to multiple Active Directory groups based on selected checkboxes. I am finding that I may have to many checkboxes and the script is getting confused (I'm already confused) lol. I think that I am really missing something simple and there is a better way to get the same thing accomplished. Any input and direction would be greatly appreciated. Regards, TomThe answer is Arrays! Here is an example of how to use arrays to create checkboxes #include <GUIConstants.au3> $Gui = GUICreate('', 500, 500) Dim $CheckBoxes[20] For $i = 0 To UBound($CheckBoxes) - 1 $CheckBoxes[$i] = GUICtrlCreateCheckbox('Some Info', 50, 10 + 20 * $i) Next GUISetState() Do $msg = GUIGetMsg() Until $msg = $GUI_EVENT_CLOSE If you want to set the state of all checkboxes use the same method (For-Nexr loop etc) And... Next time wrap your code with code tags Link to comment Share on other sites More sharing options...
kabar Posted July 8, 2009 Author Share Posted July 8, 2009 Thanks for the reply oMBRa. Sorry I have not replied sooner, work,work,work. Do you know of any "array" tutorials? I don't really follow the logic of array's. I play with it. Thanks Again, Tom The answer is Arrays! Here is an example of how to use arrays to create checkboxes #include <GUIConstants.au3> $Gui = GUICreate('', 500, 500) Dim $CheckBoxes[20] For $i = 0 To UBound($CheckBoxes) - 1 $CheckBoxes[$i] = GUICtrlCreateCheckbox('Some Info', 50, 10 + 20 * $i) Next GUISetState() Do $msg = GUIGetMsg() Until $msg = $GUI_EVENT_CLOSE If you want to set the state of all checkboxes use the same method (For-Nexr loop etc) And... Next time wrap your code with code tags Link to comment Share on other sites More sharing options...
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now