
Azazel
Active Members-
Posts
69 -
Joined
-
Last visited
Everything posted by Azazel
-
Hi Mat, DriveMappAdd give you the possibiliby for mapping a drive but not a folder For my second question, when you mapp a drive you cannot change the name of the result mapping drive In the name, you have the complete network way as x:folder1subfolder1subdolder2... You can remame it by right clic of the mouse and "remane" to obtain X: (My network) but autoit doesn't permit it Best regards
-
Hi team, I'm back in the forum after all lost of years I started with Autoit at the beginning and i still use it almost every days i'm not sure i'm in the good place but i propose a new function for autoit Why not addind in the drive mapping place a function like "MapFolder" using "Subst" function from microsoft ? http://www.microsoft.com/resources/documentation/windows/xp/all/proddocs/en-us/subst.mspx?mfr=true To drive a folder as a drive letter... exemple : Run(@ComSpec & " /c " & 'subst D: "C:\My Folder"', "", @SW_HIDE) ; Mapp the folder "C:\My Folder" with letter "D:\" mapping drive ;Run(@ComSpec & " /c " & 'subst D: /d', "", @SW_HIDE) ; Command for removing the mapping with a syntax like : FolderMapAdd ( "Mapping letter", "remote folder") I'm happy to see you Again Best regards Marc PS: Just a question about mapping a drive I have map a network like "//Network/folder1/folder2/....folderxxx" with a letter "X:" but in Explorer the drive mapped appear like X: (//Network/folder1/folder2/....folderxxx) I have changed the name with mouse right clic and rename it X: (My network) but is there a command or a script to do it automatically ? Thank you for your answer
-
I understant your opinion, unfortunatly, the script i put here is a small part of a bigger AutoIt program So i need your help to make it works Thanks a lot Marc
-
No more help ?
-
My collegues use this excel sheet to send spare parts to customers, i don't want to interract with there job with a input box i just want to read the datas they fill in to generate the "Save as" name
-
Hi, The cell 1,2 is set by the user When the Excel sheet is start this cell is blank Best regards
-
Hi everybody, My goal is to write and read some datas in a excel sheet . I want to read the cell (1,2) and use this data to fill the name of the book in "Save as" I'm in front of 2 errors and crashes I use Autoit v3.2.13.13 (beta) Souce code : #include <Excel.au3> #include <Date.au3> $oMyError = ObjEvent("AutoIt.Error", "MyErrFunc"); Install a custom error handler $date=@MDAY&"/"&@MON&"/"&@YEAR $oExcel = _ExcelBookNew() _ExcelWriteCell($oExcel, $date, 1, 1);Write to the Cell while 1 $name = _ExcelReadCell($oExcel, 1, 2) if $name<>"" Then ExitLoop EndIf Sleep(500) WEnd WinWait("Save As","") ControlSetText( "Save As", "", "[CLASS:RichEdit20W; INSTANCE:2]", @ScriptDir&"\"&@YEAR&"\SEM "&_WeekNumberISO()&$name&".xls") Exit Func MyErrFunc() ;Avoid CRASH EndFunc ;==>MyErrFunc First Crash : If in don't use a "Install a custom error handler" when i start to fill the cell (1,2) i have this message : C:\Program Files\AutoIt3\beta\Include\Excel.au3 (685) : ==> The requested action with this object has failed.: Return $oExcel.Activesheet.Cells($sRangeOrRow, $iColumn).Value Return $oExcel.Activesheet^ ERROR I use a error handler to solve the problem Second crash : If i use the error handler and i close the Excel sheet before opening "Save as" i have this message : C:\Program Files\AutoIt3\beta\Include\Excel.au3 (685) : ==> Missing right bracket ')' in expression.: Return $oExcel.Activesheet.Cells($sRangeOrRow, $iColumn).Value Return ^ ERROR Please help me for debugging my script Best regards Marc
-
see WinGetPos ( "title" [, "text"] ) Aza
-
hi ! do you really need to move the mouse ? if not you can do like this (i use mozilla replace by firefox) $url= result of your inputbox run("C:\Program Files\mozilla.org\Mozilla\mozilla.exe"&chr(32)&$url) or run("C:\Program Files\Internet Explorer\iexplore.exe"&chr(32)&$url) ????
-
When you have some " " you have to replace by ' ' So try this and let me know: #include <Process.au3> $rc = _RunDos('netsh interface IP set address "L" static 192.168.0.1 255.255.255.0') Aza
-
I'm not sure i understand what you want but if you want to click for exemple on the third link this is a exemple : #include <IE.au3> $oIE = _IE_Example ("basic") $oLinks = _IELinkGetCollection ($oIE,-1) $iNumLinks = @extended Dim $link[@extended+1] MsgBox(0, "Link Info", $iNumLinks & " links found") $value=1 For $oLink In $oLinks MsgBox(0, "Link Info", $oLink.href) $link[$value]=$oLink.href $value=$value+1 Next _IENavigate($oIE,$link[3]) $link[1] contain the first link and so on... is it your question ? Aza
-
no help for spamming Aza
-
Click even on Pic not working
Azazel replied to Andrew Peacock's topic in AutoIt General Help and Support
Andrew Peacock you make a mistake it's not "GUISetOnEvent" you have to use but "GUICtrlSetOnEvent" Good continuation Aza #Include <Constants.au3> #include <GUIConstants.au3> #include <Color.au3> #include <Array.au3> #include <File.au3> #Include <Misc.au3> AutoItSetOption("GuiOnEventMode",1) ; Go to on-event mode $gui = GUICreate("Stay On Focus!", 600,500) $btnDelete0 = guictrlcreatepic("delete.jpg", 530, 30, 16, 16, bitor($SS_NOTIFY, $GUI_SS_DEFAULT_PIC)) GUICtrlSetOnEvent($btnDelete0,"deleteTask0") ;GUISetOnEvent($btnDelete0, "deleteTask0") GUISetState(@SW_SHOW) While 1 Sleep(10) WEnd func deleteTask0() msgbox(0, "deleting 0", "") ;deleteTask(0) EndFunc -
you are right yxrkt, it seems there is a bug in this function it seems that the size of the line you read depend of the last one as you can see if you add 2 spaces after "Third line lala " the second line is displayed correctly very strange #Include <GuiEdit.au3> GuiCreate('',260,260) $h_edit = guictrlcreateedit('First line lala'&@CRLF&"Second line lala"&@CRLF&"Third line lala ",1,1,250,250) guisetstate() $totlines = _GUICtrlEditGetLineCount ( $h_edit ) for $i = 0 to $totlines msgbox(0,'',_GUICtrlEditGetLine($h_edit, $i)) Next
-
Hi xxfxx Why do you make a loop inside your script ? Delete this lines $Paused = Not $Paused While $Paused and Wend make your script run once Start again by pressing "Home" Aza
-
Thanks Jdeb for explanations, i m waiting ....
-
i'm agree with this, however i always work with beta version of autoit and since today beta versions was in line... like v3.2.1.14 (beta) so why now i can't found v3.2.2.x to work around ?
-
I think i'm stupid but where can i find 3.2.3.0 version ? It don't exist in beta download directory
-
I'm suprised that there is no new beta version of Autoit since 09-Dec-2006. Does the developpement is finished(closed) or it will continue in a near future ? thanks Aza
-
Hi, Add this to the script : Opt("SendKeyDelay",500) Adjust 500 to less or more as you want ++ Aza Opt("SendKeyDelay",500); brief pause in between sent keystrokes in milliseconds (500= 0.5 Seconde) HotKeySet("{END}", "_end") While 1 _Send() Sleep(5000) WEnd Func _Send() Send("{Enter}{UP}{enter}") EndFunc;==>_Send Func _end() Exit (0) EndFunc;==>_end
-
Hi, Depend of application, you can have a look to : ControlClick ( "title", "text", controlID [, button] [, clicks]] ) ++ Aza
-
So no solution :"> Thx for your help
-
Hello, I'm in front a profesional web page witch is written only in Java. Unfortunatly, i can't give you a link because it's professional with password and so on. I need to read the forms and send it back some datas. It's seems that no _Ie management can read this page. Do you know a solution without "send" and "Tab" to play with Please let me know... Thx
-
Thanks BigDod, that was not the answer i was hope but if it's not possible, i will try to do another way. Thanks you again... Aza
-
I have make a script with some labels and edits, and i need to move verticaly the GUI witch is bigger than the screen. I post the code, can you help me plz. #include <GUIConstants.au3> #include <date.au3> Opt("WinTitleMatchMode",2) opt("TrayIconDebug",1) GUICreate("Rapport d'intervention N° "&"JE1000",800,1000,100,5,BitOR($WS_OVERLAPPEDWINDOW,$WS_VSCROLL)) GUICtrlCreateLabel("Client : ",10,13,60,20) $edit_client=GUICtrlCreateEdit("",80,10,102,20,$WS_CHILD) GUICtrlCreateLabel("Contact : ",200,13,60,20) $edit_contact=GUICtrlCreateEdit("",252,10,200,20,$WS_CHILD) GUICtrlCreateLabel("Numéro de commande : ",480,13,115,20) $edit_cde=GUICtrlCreateEdit("",605,10,125,20,$WS_CHILD) GUICtrlCreateLabel("Adresse : ",10,43,60,20) $edit_adresse=GUICtrlCreateEdit("",80,40,372,60,BitOR($ES_MULTILINE,$ES_WANTRETURN)) GUICtrlCreateLabel("Type de CN : ",10,123,70,20) $edit_cn=GUICtrlCreateEdit("",155,120,75,20,$WS_CHILD) GUICtrlCreateLabel("Numéro de CN : ",305,123,80,20) $edit_num_cn=GUICtrlCreateEdit("",425,120,125,20,$WS_CHILD) GUICtrlCreateLabel("Type et marque de machine : ",10,153,200,20) $edit_machine=GUICtrlCreateEdit("",155,150,125,20,$WS_CHILD) GUICtrlCreateLabel("Numéro de machine : ",305,153,200,20) $edit_num_machine=GUICtrlCreateEdit("",425,150,125,20,$WS_CHILD) GUICtrlCreateGroup("ALARME / PROBLEME : ",10,190,610,270) $edit_pb=GUICtrlCreateEdit("",20,210,588,240,BitOR($ES_MULTILINE,$ES_WANTRETURN)) GUICtrlCreateLabel("Informations bureau : ",10,473,200,20) $edit_infos_1=GUICtrlCreateEdit("",125,470,534,20,$WS_CHILD) $edit_infos_2=GUICtrlCreateEdit("",125,488,588,20,$WS_CHILD) GUICtrlCreateGroup("Group2 : ",10,530,610,270) $edit_pb2=GUICtrlCreateEdit("",20,560,588,240,BitOR($ES_MULTILINE,$ES_WANTRETURN)) GUISetState (@SW_SHOW) ; will display an empty dialog box ; Run the GUI until the dialog is closed While 1 $msg = GUIGetMsg() If $msg = $GUI_EVENT_CLOSE Then ExitLoop Wend thx