-
Similar Content
-
By Marcvde
Hello people,
I want to open a website but i don't know how... I tried..
Here is my script, can someone write the code in it (thanks)
#include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> Opt("GUIOnEventMode", 1) #Region ### START Koda GUI section ### Form= $BProxy = GUICreate("Choose Proxywebsite ", 426, 235, 199, 138) $Label1 = GUICtrlCreateLabel("Press a Button for a Proxy Website", 18, 8, 209, 20) GUICtrlSetFont(-1, 10, 400, 0, "MS Sans Serif") GUISetBkColor(0xA0A0A4) $Button1 = GUICtrlCreateButton("Proxy1", 16, 32, 105, 41) $Button2 = GUICtrlCreateButton("Proxy2", 16, 81, 105, 41) $Button3 = GUICtrlCreateButton("Proxy3", 16, 128, 105, 41) $Button4 = GUICtrlCreateButton("Proxy4", 16, 177, 105, 41) $Button5 = GUICtrlCreateButton("Proxy5", 137, 32, 105, 41) $Button6 = GUICtrlCreateButton("Proxy6", 137, 81, 105, 41) $Button7 = GUICtrlCreateButton("Proxy7", 137, 128, 105, 41) $Button8 = GUICtrlCreateButton("Proxy8", 137, 177, 105, 41) $Button9 = GUICtrlCreateButton("Fuck it! Google now!", 256, 128, 153, 89) GUISetState(@SW_SHOW) GUISetOnEvent($GUI_EVENT_CLOSE, "_Exit") GUISetOnEvent($Button1, "Proxy1") #EndRegion ### END Koda GUI section ### While 1 Sleep(100) WEnd Func _Exit() Exit EndFunc Func Proxy1() ShellExecute("http://www.google.com/") EndFunc
-
By dannymcf2
Hey!
Im just going to say that im new to autoit and this is my first successful script !
anyway i have a little problem that does not
make sense at all to me.... Maybe you can help me out? Anyone please??
What i have the SCRIPT do is this :
The script finds a text box (on the screen) then it clicks the text box, then it sends "guess what...."
but after it has sent "guess what...." FOR SOME REASON IT SCROLLS DOWN THEN ENDS THE SCRIPT WITH AN ERROR.... (see below for error...)
"C:\Users\yolo\Desktop\bot\best.au3" (47) : ==> Illegal text at the end of statement (one statement per line).: mousewheel("down"), 3) mousewheel("down")^ ERROR HERE IS MY SCRIPT BELOW... That im having problems with.
func ns3() $pixel = PixelSearch(416, 295, 882, 315, 0x707070) if IsArray($pixel) = true then MouseClick("left", $pixel[0], $pixel[1]) tn() EndIf EndFunc func tn() send ("guess{SPACE}what.....") sleep ($interval) sleep ($interval) findcombox() EndFunc So what happens is it searches for the text box, then if it's true then mouse click then Func tn() runs
Then func tn sends "guess what...."
then sleeps
THEN IS SCROLLS DOWN AND AN ERROR COMES UP?!!?!?!? what the heck ?!
oh BTW i have a few "Scroll func's" (See Below)
Func scroll() mousewheel("down", 2) EndFunc func scroll3t() mousewheel("down"), 3) EndFunc func scrollup() mousewheel("up"), 20) EndFunc scroll () - scrolls twice down
scroll3t() - scrolls 3 times
scrollup() - YOU GUESSED IT! scrolls up
SO?! What the heck is happening?! im so confused why it's scrolling down twice for no reason.... it's not like i have the scroll() in the tn() ??
-
By xinx
I'm have a working program that displays the users in Active Directory. When a user's name is clicked on it displays their details (profile folder, work folder, etc). However, what I'd really like to do is be able to eliminate using the mouse as much as possible, so instead of having to click on each user's name, you can use the UP and DOWN arrows and it will act as though their name has been clicked on (if that makes any sense?).
Here's some of the code so far:
$ADListView = GUICtrlCreateListView("Login Name|Display Name", 140, 60, 220, 280);A ListView to display the users ; Adjust the ADListView column headers _GUICtrlListView_SetColumnWidth($ADListView, 0, 100) _GUICtrlListView_SetColumnWidth($ADListView, 1, 116)
Func UpdateUserList() _AD_Open() $SelectedUserType = GUICtrlRead($UserTypeCombo) ;Get the base OU for the user type $SelectedUserTypeBaseOU = IniRead("iniUsers.ini", $SelectedUserType, "BaseOU", "NotFound") ;Get the filtered results from the AD using base OU $ADData = _AD_GetObjectsInOU($SelectedUserTypeBaseOU, "(&(objectclass=user)(name=*))", 2, "sAMAccountName,distinguishedName,displayname", "displayname") GUICtrlSetData($ADListView, $ADData) _GUICtrlListView_DeleteAllItems($ADListView) GUICtrlSetData($UserPropertiesEditBox, "Properties of Selected User") $SelectedUser = "" ;For each AD user, add an item in in the ListView For $i = 1 To UBound($ADData) - 1 GUICtrlCreateListViewItem($ADData[$i][0] & "|" & $ADData[$i][2], $ADListView) GUICtrlSetOnEvent(-1, "ListClicked") ; For each item, add the required event Next _AD_Close() EndFunc ;==>UpdateUserList
Func ListClicked() $ItemString = GUICtrlRead(@GUI_CtrlId) $ItemArray = StringSplit($ItemString, "|") $SelectedUser = $ItemArray[1] _AD_Open() $givenName = _AD_GetObjectAttribute($SelectedUser, "givenName") $SN = _AD_GetObjectAttribute($SelectedUser, "SN") $displayName = _AD_GetObjectAttribute($SelectedUser, "displayName") $profilePath = _AD_GetObjectAttribute($SelectedUser, "profilePath") $homeDirectory = _AD_GetObjectAttribute($SelectedUser, "homeDirectory") $homeDrive = _AD_GetObjectAttribute($SelectedUser, "homeDrive") $GroupArray = _AD_GetUserGroups($SelectedUser) GUICtrlSetData($UserPropertiesEditBox, "") _GUICtrlEdit_AppendText($UserPropertiesEditBox, "Properties of Selected User") _GUICtrlEdit_AppendText($UserPropertiesEditBox, @CRLF & @CRLF & "First Name: " & $givenName) _GUICtrlEdit_AppendText($UserPropertiesEditBox, @CRLF & @CRLF & "Last Name: " & $SN) _GUICtrlEdit_AppendText($UserPropertiesEditBox, @CRLF & @CRLF & "Login Name: " & $SelectedUser) _GUICtrlEdit_AppendText($UserPropertiesEditBox, @CRLF & @CRLF & "Profile Directory: " & $profilePath) _GUICtrlEdit_AppendText($UserPropertiesEditBox, @CRLF & @CRLF & "Home Directory: " & $homeDirectory & " (" & $homeDrive & ")") _GUICtrlEdit_AppendText($UserPropertiesEditBox, @CRLF & @CRLF & "Group Membership:") For $i = 1 To UBound($GroupArray) - 1 _GUICtrlEdit_AppendText($UserPropertiesEditBox, @CRLF & _AD_FQDNToDisplayname($GroupArray[$i])) Next _AD_Close() EndFunc ;==>ListClicked
Any help would be great, thank you!
-
