Groumphy

Oops, I'm sorry. I have not read the full answer. But I confirm that if you compile it. AU3, everything works: (Sorry for the inconvenience.

Hi Everybody, I'm having the same problem. I'm sure I downloaded from the links given by the download page. So I proceeded as follows: Download CVSWrapper, Installation CVSWrapper, Download WinMerge, WinMerge installation & reboot the PC, Opening of SciTE and adding command lines in SciTEUser.properties (which was previously empty) Restart SciTE, So I opened a file test.au3, and tried to F12 or ALT + F12 (why not...) and the console so I have the following message: ALT + F12 CVSWrapper is installed in C:\Program Files\AutoIt3\SciTE\cvsWrapper; WinMerge in the folder C:\Program Files\WinMerge etc.. Everything is default. Some time ago (more than a year), I posted a similar message ... And a solution was given. Unfortunately I can not find what topics, in fact I tried on my nickname, but without success. Could you help me install the environment compared SVN? Thanks Groumphy [EDIT]Even if it is not because of the argument passed? (% 1) While the argument was not requested in the right order or it is incorrect? (Not an application?)

Hi, OK, this is perfect. Sorry for this dump question And happy of the rapid reaction of the forum ! 've a nice day, G. (Why code=autoit doesn't modify the code ? In first there was ok !)

Hello, Thanks for your reply, I've try on 2 computers and this works. I try on another type of computer and I give you feedback G.

Hello everybody, This is my come back on the forum. I try to install a MSI package in silent mode and that under an another user (administrator user). I've the following code : Global $s_version=1 Global $s_reseau="NETWORK.LAN" Global $s_utilisateur = "administrator" Global $s_motdepasse = "aqwrfv&é"'000001" Global $s_serveurdc1 = "server01" ; ... etc RunAsWait($s_utilisateur, $s_reseau, $s_motdepasse, 1, _RunDOS("MSIEXEC.EXE /i WSP.MSI /qn")) Or this : RunAsWait($s_utilisateur, $s_reseau, $s_motdepasse, 1, _RunDOS("MSIEXEC.EXE /i WSP.MSI /qn"), @WindowsDir, @SW_HIDE)Or this : RunAsWait($s_utilisateur, $s_reseau, $s_motdepasse, 1, ShellExecute(@ScriptDir & "\wsp.msi", "/q", @WindowsDir, "open",@SW_HIDE))Or this RunAs($s_utilisateur, $s_reseau, $s_motdepasse, 1, ShellExecuteWait(@ScriptDir & "\wsp.msi", "/q")... This is unsuccessfull to install the application in stealth mode ... With AutoIt, I think there is no problem (no error)... When I view the EventViewer, I've this : Event Type: Error Event Source: MsiInstaller Event Category: None Event ID: 11303 Date: 13/07/2009 Time: 9:54:56 User: NETWORK_DOM\groumphy Computer: BXL-NB001 Description: Product: winspiroPRO -- Error 1303.The installer has insufficient privileges to access this directory: C:\Program Files\Crystal Decisions. The installation cannot continue. Log on as an administrator or contact your system administrator. For more information, see Help and Support Center at http://go.microsoft.com/fwlink/events.asp. Data: 0000: 7b 44 46 41 33 31 31 31 {DFA3111 0008: 39 2d 41 34 44 38 2d 34 9-A4D8-4 0010: 37 44 37 2d 41 43 44 41 7D7-ACDA 0018: 2d 34 43 41 30 36 37 33 -4CA0673 0020: 46 33 45 41 43 7d F3EAC} My question: why the installing is under the user and not the administrator ? (this is the question... And this AutoIt who should do this ! I use only a combination of two command... Thanks for your help

SORRY SORRY SORRY I am confused of this typing error. I will hang myself with my cable network !

Hello hello, I'm using the function of R.Gilman (a.k.a rasim) and Amel27 for change a screen resolution. ;==================================================================================== ; ;Function Name: _ScreenSetting() ;Description: Changes the screen resolution, color dept and refresh rate ;Version: 1.0 ;Parameters: $iWidth - Width of the desktop screen in pixels. (horizontal resolution) ; $iHeight - Height of the desktop screen in pixels. (vertical resolution) ; $iDepth - Depth of the desktop screen in bits per pixel. ; $iRefresh - Refresh rate of the desktop screen in hertz. ;Return Value(s): On Success - Screen is adjusted ; On failure - Message with error description ;Requirement(s): Tested on AutoIt 3.2.10.0 ;Autor(s): R.Gilman (a.k.a rasim); special thanks to amel27 ; ;==================================================================================== Func _ScreenSetting($iWidth = @DesktopWidth, $iHeight = @DesktopHeight, $iDepth = @DesktopDepth, $iRefresh = @DesktopRefresh) Local Const $DISP_CHANGE_SUCCESSFUL = 0 Local Const $DISP_CHANGE_RESTART = 1 Local Const $DISP_CHANGE_FAILED = -1 Local Const $DISP_CHANGE_BADMODE = -2 Local Const $DISP_CHANGE_NOTUPDATED = -3 Local Const $DISP_CHANGE_BADFLAGS = -4 Local Const $DISP_CHANGE_BADPARAM = -5 Local Const $CDS_TEST = 0x4 Local Const $CDS_UPDATEREGISTRY = 0x1 Local Const $DM_PELSWIDTH = 0x80000 Local Const $DM_PELSHEIGHT = 0x100000 Local Const $DM_BITSPERPEL = 0x40000 Local Const $DM_DISPLAYFREQUENCY = 0x400000 Local Const $ENUM_CURRENT_SETTINGS = -1 Local Const $WM_DISPLAYCHANGE = 0x007E Local Const $HWND_BROADCAST = 0xFFFF Local Const $SPI_SETNONCLIENTMETRICS = 0x2A Local $DEVMODE, $DllRet $DEVMODE = DllStructCreate("char dmDeviceName[32];ushort dmSpecVersion;ushort dmDriverVersion;short dmSize;" & _ "ushort dmDriverExtra;dword dmFields;short dmOrientation;short dmPaperSize;short dmPaperLength;" & _ "short dmPaperWidth;short dmScale;short dmCopies;short dmDefaultSource;short dmPrintQuality;" & _ "short dmColor;short dmDuplex;short dmYResolution;short dmTTOption;short dmCollate;" & _ "byte dmFormName[32];dword dmBitsPerPel;int dmPelsWidth;dword dmPelsHeight;" & _ "dword dmDisplayFlags;dword dmDisplayFrequency") $DllRet = DllCall("user32.dll", "int", "EnumDisplaySettings", "ptr", 0, "dword", $ENUM_CURRENT_SETTINGS, _ "ptr", DllStructGetPtr($DEVMODE)) $DllRet = $DllRet[0] If $DllRet = 0 Then MsgBox(16, "Error", "Unable to get graphic mode") Return False EndIf $VGA_MAP_KEY = RegRead("HKLM\HARDWARE\DEVICEMAP\VIDEO", "\Device\Video0") $VGA_KEY = StringReplace($VGA_MAP_KEY, "\Registry\Machine", "HKLM") RegWrite($VGA_KEY, "PruningMode", "REG_DWORD", 0) DllStructSetData($DEVMODE, "dmSize", DllStructGetSize($DEVMODE)) DllStructSetData($DEVMODE, "dmPelsWidth", $iWidth) DllStructSetData($DEVMODE, "dmPelsHeight", $iHeight) DllStructSetData($DEVMODE, "dmBitsPerPel", $iDepth) DllStructSetData($DEVMODE, "dmDisplayFrequency", $iRefresh) DllStructSetData($DEVMODE, "dmFields", BitOR($DM_PELSWIDTH, $DM_PELSHEIGHT, $DM_BITSPERPEL, $DM_DISPLAYFREQUENCY)) $DllRet = DllCall("user32.dll", "int", "ChangeDisplaySettings", "ptr", DllStructGetPtr($DEVMODE), "int", $CDS_TEST) $DllRet = $DllRet[0] If $DllRet <> $DISP_CHANGE_SUCCESSFUL Then Switch $DllRet Case $DISP_CHANGE_RESTART MsgBox(48, "Warning", "Restart your computer for change display settings") Case $DISP_CHANGE_FAILED MsgBox(16, "Error", "The video driver not set a new mode") Return False Case $DISP_CHANGE_BADMODE MsgBox(16, "Error", "Video mode not supported") Return False Case $DISP_CHANGE_NOTUPDATED MsgBox(16, "Error", "Unable to write in registry") Return False Case $DISP_CHANGE_BADFLAGS MsgBox(16, "Error", "Bad flags") Return False Case $DISP_CHANGE_BADPARAM MsgBox(16, "Error", "Bad parameters") Return False EndSwitch EndIf $DllRet = DllCall("user32.dll", "int", "ChangeDisplaySettings", "ptr", DllStructGetPtr($DEVMODE), "int", $CDS_UPDATEREGISTRY) $DllRet = $DllRet[0] DllCall("user32.dll", "int", "SendMessage", "hwnd", $HWND_BROADCAST, "int", $WM_DISPLAYCHANGE, _ "int", $SPI_SETNONCLIENTMETRICS, "int", 0) RegWrite($VGA_KEY, "PruningMode", "REG_DWORD", 1) $DEVMODE = "" $DllRet = "" EndFuncoÝ÷ ØZ½ëazv­÷¢YhÂ)à±ÊÞzzÞ²n¶*'×Ý´§uÛM)Çöoþ´2ȶ¼­¢ë¶¢YhÂ)àr^jëh×6; Variables Dim $s_largeur, $s_hauteur Dim Const $s_couleur = 32 Dim Const $s_hertz = 60 $s_largeur = 0 $s_hauteur = 0oÝ÷ Ù«­¢+Øì%¸U$½ÈÑ¡Éͽ±ÕÑ¥½¸àÀÁÁààØÀÁÁààÌɼØÀ5¡è($% ÍÀÌØíÍÍ}µ¹|àÀÁàØÀÀ($$$ÀÌØíÍ}±ÉÕÈôàÀÀ($$$ÀÌØíÍ}¡ÕÑÕÈôØÀÀ($$%}MɹMÑÑ¥¹ ÀÌØíÍ}±ÉÕÈ°ÀÌØíÍ}¡ÕÑÕÈ°ÀÌØíÍ}½Õ±ÕÈ°ÀÌØíÍ}¡ÉÑè¤($$$ÀÌØíÍ}±ÉÕÈôÀ($$$ÀÌØíÍ}¡ÕÑÕÈôÀoÝ÷ Ù8b³ +«}ç-ßp'vØb±ú+¶«zÊ%ºØ¨Í4Ç­4×M¸Ç¾¼×m4ÇÍ4×m4Ç]6ã^´ÓvÓ@n·­Ø^~e£§·¬¢[­õ÷m1×­4+Þ¶¬zºè®g¬±¨ªê-V'^¢jzz-²êi¢»^v«¨µ­º¹Þu¼­çèZ0x¡×¢Ø^~éܶ*'jëh×6 $DllRet = DllCall("user32.dll", "int", "ChangeDisplaySettings", "ptr", DllStructGetPtr($DEVMODE), "int", $CDS_TEST) $DllRet = $DllRet[0] If $DllRet <> $DISP_CHANGE_SUCCESSFUL Then ; ... Case $DISP_CHANGE_BADMODE MsgBox(16, "Error", "Video mode not supported") Return False why this error while my original resolution equal this one !? Thanks for your help... Or explain

Hello, Why not use the WinWait or WinWaitActive ? If the Windows is active, then send a key ! ??

@Kogmedia >> Ok, for your small script (this form was know... ) but that was for a direct include...

Oops ! Hum, sorry, I don't read the "help topics" about the Func ! I'm confused... Big sorry, and big thanks for your answer...

Ok... It is a fact ! But why can't that function? I declare my function, following his call, but it does not put an error to me on the function but well on the "if" Thus syntax is correct, but the call is not execute (done)...

Hello, I've a small question... This is not a problem (ouf !). If I use Javascript... I can write in my JS file a function in a function. Sample (not tested only for fun) : function chiffre() { var xxx; xxx = prompt('Number \? 0 to 10 \?', '0'); if (xxx > 10) { function stop() { alert('Incorrect'); }; stop(); } else { function superieure(){ alert('Good : ' + xxx); }; superieure(); } } But if I use the same idea for AutoIt : Func msg() Dim $s_box $s_box = MsgBox(4+64, "Test", "This is a test of a function in an other function") If $s_box = 6 Then Func myPing() Dim $u_var $u_var = Ping("begroumphy",250) If $var Then; also possible: If @error = 0 Then ... Msgbox(0,"Status","Online, roundtrip was:" & $u_var) Else Msgbox(0,"Status","An error occured with number: " & @error) EndIf EndFunc myPing() Else MsgBox(0+64, "Test", "Exit of script", 3) EndIf EndFunc msg() Exit This doesn't work ! Can you inform me why a function in a function gives errors ?

And an other "problem" (or inattention...) : #include <String.au3> _StringEncrypt ( $i_Encrypt, $s_EncryptText, $s_EncryptPassword [, $i_EncryptLevel ] ) oÝ÷ Ú)íä^+-z¶®Ý«­¢+Ø)Õ¹}MÑÉ¥¹¹ÉåÁÐ ÀÌØí¥}¹ÉåÁаÀÌØíÍ}¹ÉåÁÑQáаÀÌØí5½°ÀÌØí¥}¹ÉåÁÑ1Ù°ôĤ(¸¸¸¸¹¹¹¸¸¸)¹Õ¹( I'm sorry :s

Waw ! (Thanks !)

Hi, Why not use the following : #include <IE.au3> _IEAction ( ByRef $o_object, $s_action ) With the parameters : ... More easyly !?