Beiträge von Greenhorn

  • Shellexecute und _FileListToArray Problem

    Moin,

    ich habe mal ein wenig mit ShellExecute und *.lnk rumgespielt ...

    Also, ich habe zwei Registryeinträge, die da wären:

    Code
    Windows Registry Editor Version 5.00


[HKEY_CLASSES_ROOT\AllFilesystemObjects\shellex\ContextMenuHandlers\In Ordner verschieben]
@="{C2FBB631-2971-11D1-A18C-00C04FD75D13}"
[HKEY_CLASSES_ROOT\AllFilesystemObjects\shellex\ContextMenuHandlers\In Ordner kopieren]
@="{C2FBB630-2971-11D1-A18C-00C04FD75D13}"

    Wenn ich nun ein *.lnk File mit ShellExecute ausführe erscheint erst der 'In Ordner verschieben'-Dialog und dann der 'In Ordner kopieren'-Dialog bevor das eigentliche Ziel der Verknüpfung ausgeführt wird. *verwundert-bin*
    Entferne ich die beiden Schlüssel geht's auf Anhieb. Komisch ... *Kopfkratz*

    Es könnte also tatsächlich an AutoIt liegen !

    Probiert es mal aus !

    Es wäre Interessant zu wissen auf was deine Verknüpfung zeigt um deine Drucker zu Installieren.
    Ist es ein Script, eine ausführbare Datei (*.exe, *.dll, etc.) oder was ist das Ziel der Verknüpfung.

    Laut deiner Fehlermeldung - wo auch immer die Zeile 199 sein mag, bei 135 Zeilen Code - sind falsche bzw. keine Parameter angegeben.

    Zeige uns doch bitte mal Screenshots von dem Ordner mit den beiden Dateien und von den Eigenschaftsfenstern der beiden Dateien.


    Gruß
    Greenhorn

  • Fehlermeldung "Das Verzeichnis ist ungültig"

    Moin,

    so wie ich das sehe ist es eine Silentinstallation eines InstallShield Setups.

    Probiere es mal so:

    ShellExecute("\\Server\Freigabe\nocheine\UserInstall\setup.exe", "-a -s -f1'\\\Server\Freigabe\nocheine\UserInstall\Programm.iss' -f2'C:\Programm.log'")

    Die Pfad angaben für die Parameter f1 und f2 müssen in "", bzw. '' eingefasst sein soweit ich weiss !


    Gruß
    Greenhorn

  • Installationsscript

    Ja, der Ablaufplan ist deutlich genug... ;) :D

    Ich glaube wir haben etwas grundlegendes Übersehen...

    Spoiler anzeigen
    [autoit]

    Func install_ghost($software)
    ;GUISetState(@SW_DISABLE, $installGUI)
    RunAsSet($admin, @Computername, $pwd) ;Adminrechte geben
    Run($software,"c:\temp\")
    ;RunAsSet() ;Adminrechte nehmen ?? Fehler, weil Setup noch nicht beendet ??

    AutoItSetOption("WinTitleMatchMode", 2) ;Mode geändert - sucht nach irgendeiner Übereinstimmung
    If WinWaitActive("gs854w32.exe","",3) Then
    ControlClick("gs854w32.exe","",1,"&Setup") ;setup ausführen
    If WinWaitActive("AFPL") Then
    ControlCommand("AFPL","All Users","Button3","Check","") ;für alle User installieren
    ;Installation beginnen
    ControlClick("AFPL","",1004,"This install")
    ;Installation ist beendet - das Iconfenster lässt sich irgendwie nicht schließEndFunc
    WinWaitClose("AFPL") ;schließen des Installationsfensters
    EndIf
    Else
    MsgBox(0,"Error","Das benötigte Fenster ist nicht vorhanden.")
    Exit
    EndIf
    RunAsSet() ;Adminrechte nehmen ?? Richtig, weil Setup beendet ??
    EndFunc

    [/autoit]


    Ich hab's noch nicht probiert, aber klingt einleuchtend, oder ?
    Das Setup muss bis zum Schluss mit Adminrechten laufen, also muss RunAsSet() ans Ende der Funktion.

    Oder versuchen das komplette Script mit RunAsSet($admin, @Computername, $pwd) laufen zu lassen...

    Probier's doch mal aus...


    Gruß
    Greenhorn

  • Bilder aus einer DLL laden

    Ist nicht von mir ...

    Spoiler anzeigen
    [autoit]


    #cs
    ; Funktion: SetBitmapResourceToPicCtrl($hwnd,$ctrl,$file,$resource)
    ;
    ; Bitmap aus einer DLL laden.

    [/autoit] [autoit][/autoit] [autoit]

    #ce

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    $gui = GUICreate("")
    $pic = GUICtrlCreatePic("",0,0,200,200)

    [/autoit] [autoit][/autoit] [autoit]

    GUISetState()

    [/autoit] [autoit][/autoit] [autoit]

    SetBitmapResourceToPicCtrl($gui,$pic,"resource.dll","OK_BMP")

    [/autoit] [autoit][/autoit] [autoit]

    While 1
    If GUIGetMsg() = -3 Then Exit
    WEnd

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Func SetBitmapResourceToPicCtrl($hwnd,$ctrl,$file,$resource)
    Local Const $STM_SETIMAGE = 0x0172
    Local Const $IMAGE_BITMAP = 0
    Local Const $LR_CREATEDIBSECTION = 0x2000
    Local Const $LR_COPYDELETEORG = 8
    Local $hBitmap

    $hwnd = ControlGetHandle($hwnd,"",$ctrl)

    Local $DLLinst = DLLCall("kernel32.dll","hwnd","LoadLibraryEx","str",$file,"hwnd",0,"int",0x00000022)
    $DLLinst = $DLLinst[0]

    [/autoit] [autoit][/autoit] [autoit]

    If IsInt($resource) Then
    $hBitmap = DLLCall("user32.dll","hwnd","LoadImage","hwnd",$DLLinst,"int",$resource, _
    "int",$IMAGE_BITMAP,"int",0,"int",0,"int",0)
    Else
    $hBitmap = DLLCall("user32.dll","hwnd","LoadImage","hwnd",$DLLinst,"str",$resource, _
    "int",$IMAGE_BITMAP,"int",0,"int",0,"int",0)
    EndIf
    $hBitmap = $hBitmap[0]

    DeleteObject(_SendMessage($hwnd,$STM_SETIMAGE,$IMAGE_BITMAP,$hBitmap,0,"int","int","hwnd"))

    DLLCall("kernel32.dll","int","FreeLibrary","hwnd",$DLLinst)
    EndFunc

    [/autoit] [autoit][/autoit] [autoit]

    Func _SendMessage($hWnd, $msg, $wParam = 0, $lParam = 0, $r = 0, $t1 = "int", $t2 = "int", $t3 = "long")
    Local $ret = DllCall("user32.dll", $t3, "SendMessage", "hwnd", $hWnd, "int", $msg, $t1, $wParam, $t2, $lParam)
    If @error Then Return SetError(@error, @extended, "")
    If $r >= 0 And $r <= 4 Then Return $ret[$r]
    Return $ret
    EndFunc ; _SendMessage()
    Func DeleteObject($hObj)
    Local $bResult = DllCall('gdi32.dll', 'int', 'DeleteObject', _
    'hwnd', $hObj)
    Return $bResult[0]
    EndFunc ;==>DeleteObject

    [/autoit] [autoit][/autoit] [autoit][/autoit]


    Gruß
    Greenhorn

  • Board Section ?

    Moinsen,

    mir fällt gerade so auf, dass es hier gar keine richtige 'Board-Section' bezüglich Fragen, Kritik, Ver(schlimm)besserungsvorschläge... etc. gibt !?
    Oder irre ich ?

    Naja, ich versuche es mal in dieser Section ...

    Also @Admins/Mods, wäre es nicht z.B. möglich den Posts eine Nummer zu geben, sodass man direkt auf den Post im Thread verlinken kann ?


    Gruß
    Greenhorn

  • Installationsscript

    Zitat

    Hi,
    ich habe es mit dem Domänenbenutzer kopiert, da der lokale Admin ja keine rechte hat Augenzwinkern danach dann das Script als lokaler Admin ausgeführt.

    ?(

    Jetzt wird's ein wenig kompliziert, aber nach knapp 4o Antworten sollten wir langsam zu Potte kommen... ;) :D

    Also noch einmal, bitte:
    Wie soll der genaue Ablauf aussehen !?!
    Wer soll was ausführen und von wo !?!?


    Gruß

    Edit: http://www.microsoft.com/technet/sysint…es/PsTools.mspx
    GhostScript und den PDF-Heini mit FileInstall in's RunAsSet-Install-Script packen, auf den Client kopieren, und dann mit PSTools vom Server aus ausführen ...

  • Installationsscript

    Moin,

    es könnte vielleicht an folgendem liegen ...

    Aus der Hilfe zu RunAsSet:
    The "Secondary Logon service" or "RunAs service" must not be disabled if you want this function to work.

    D.h., "Secondary Logon service" oder "RunAs service" darf nicht deaktiviert sein. (...beim Client !)

    Prüfe doch einmal nach ob es nicht daran liegen könnte ...


    Gruß
    Greenhorn

  • C-Media 3D Audio

    Silent Installation für C-Media 3D Audio

    Spoiler anzeigen
    [autoit]

    #NoTrayIcon
    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_icon=..\Icons\setup.ico
    #AutoIt3Wrapper_outfile=SetupCMaudio.exe
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****

    [/autoit] [autoit][/autoit] [autoit]

    Opt('RunErrorsFatal', 1)
    Opt("MouseCoordMode", 0)
    Opt('WinTitleMatchMode', 2)
    Opt('WinWaitDelay', 500)

    [/autoit] [autoit][/autoit] [autoit]

    Run(@ScriptDir & '\Setup.exe', '', @SW_HIDE)

    [/autoit] [autoit][/autoit] [autoit]

    WinWait('C-Media 3D Audio Installation')
    WinSetState('C-Media 3D Audio Installation', '', @SW_HIDE)
    MouseClick('left',215, 275, 1)
    MouseClick('left', 350, 350, 1)
    WinWait('Willkommen')
    WinSetState('Willkommen', '', @SW_HIDE)
    ControlClick('Willkommen', '', '&Weiter >')
    WinWait('Zielpfad wählen ')
    WinSetState('Zielpfad wählen ', '', @SW_HIDE)
    ControlClick('Zielpfad wählen ', '', '&Weiter >')
    WinWait('Programmordner auswählen')
    WinSetState('Programmordner auswählen', '', @SW_HIDE)
    ControlClick('Programmordner auswählen', '', '&Weiter >')
    WinWait('Kopiervorgang starten ')
    WinSetState('Kopiervorgang starten ', '', @SW_HIDE)
    ControlClick('Kopiervorgang starten ', '', '&Weiter >')
    WinWait('Restarting Windows')
    WinSetState('Restarting Windows', '' , @SW_HIDE)
    ControlClick('Restarting Windows', '', 'No, I will restart my computer later.')
    ControlClick('Restarting Windows', '', 'OK')

    [/autoit] [autoit][/autoit] [autoit]

    Exit

    [/autoit]


    Gruß
    Greenhorn

  • Comodo Firewall

    Silent Installation für Comodo Firewall

    Spoiler anzeigen
    [autoit]

    #NoTrayIcon
    #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_icon=..\Icons\setup.ico
    #AutoIt3Wrapper_outfile=SetupComodo.exe
    #AutoIt3Wrapper_Allow_Decompile=n
    #AutoIt3Wrapper_Res_Description=Silent Installer for COMODO Firewall
    #AutoIt3Wrapper_Res_Fileversion=2.4.0.58
    #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****

    [/autoit] [autoit][/autoit] [autoit]

    Opt('RunErrorsFatal', 1)
    Opt('MouseCoordMode', 0)

    [/autoit] [autoit][/autoit] [autoit]

    Run('comodo.exe')

    [/autoit] [autoit][/autoit] [autoit]

    $winTitle = 'COMODO Firewall Pro Installer'

    [/autoit] [autoit][/autoit] [autoit]

    WinSetState($winTitle, '', @SW_HIDE)

    [/autoit] [autoit][/autoit] [autoit]

    WinWait($winTitle, 'In case you have any third party')
    WinSetState($winTitle, '', @SW_HIDE)
    Sleep(250)
    ControlClick($winTitle, '', '&Ja')
    WinWait($winTitle, 'Welcome to COMODO Firewall Pro Installer')
    Sleep(250)
    ControlClick($winTitle, '', 'Next >')
    WinWait($winTitle, 'Do you accept all the terms of the proceding license')
    Sleep(250)
    ControlClick($winTitle, '', 'Next >')
    WinWait($winTitle, 'Setup will install COMODO Firewall Pro')
    Sleep(250)
    ControlClick($winTitle, '', 'Next >')

    [/autoit] [autoit][/autoit] [autoit]

    $winTitle = 'Firewall-Konfigurationsassistent'

    [/autoit] [autoit][/autoit] [autoit]

    WinWait($winTitle, 'Anmeldung für Newsletter')
    WinSetState($winTitle, '', @SW_HIDE)
    Sleep(250)
    ControlClick($winTitle, '', 1047)
    Sleep(250)
    ControlClick($winTitle, '', 'Nächstes >')
    Sleep(1250)
    WinWait($winTitle)
    Sleep(250)
    ControlClick($winTitle, '', 'Nächstes >')

    [/autoit] [autoit][/autoit] [autoit]

    $winTitle = 'COMODO Firewall Pro Installer'

    [/autoit] [autoit][/autoit] [autoit]

    WinWait($winTitle, 'COMODO Firewall Pro has been installed successfully')
    Sleep(250)
    ControlClick($winTitle, '', 'Restart the computer')
    Sleep(250)
    ControlClick($winTitle, '', 'Next >')

    [/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

    Exit

    [/autoit]


    Gruß
    Greenhorn

  • GUI automatisch an der Länge eines Labels anpassen

    GUICtrlSetResizing

    Aus der Hilfe...

    Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>

    [/autoit] [autoit][/autoit] [autoit]

    Opt("GUICoordMode", 2)
    GUICreate ("My InputBox",190,114,-1,-1,$WS_SIZEBOX+$WS_SYSMENU) ; start the definition
    GUISetIcon ("Eiffel Tower.ico")

    [/autoit] [autoit][/autoit] [autoit]

    GUISetFont (8,-1,"Arial")

    [/autoit] [autoit][/autoit] [autoit]

    GUICtrlCreateLabel ("Prompt", 8,7) ; add prompt info
    GUICtrlSetResizing (-1,$GUI_DOCKLEFT+$GUI_DOCKTOP)

    [/autoit] [autoit][/autoit] [autoit]

    $nEdit = GUICtrlCreateInput ("Default", -1,3,175,20,$ES_PASSWORD) ; add the input area
    GUICtrlSetState ($nEdit,$GUI_FOCUS)
    GUICtrlSetResizing ($nEdit,$GUI_DOCKBOTTOM+$GUI_DOCKHEIGHT)

    [/autoit] [autoit][/autoit] [autoit]

    $nOk = GUICtrlCreateButton ("OK",-1,3,75,24) ; add the button that will close the GUI
    GUICtrlSetResizing ($nOk,$GUI_DOCKBOTTOM+$GUI_DOCKSIZE+$GUI_DOCKHCENTER)

    [/autoit] [autoit][/autoit] [autoit]

    $nCancel = GUICtrlCreateButton ("Annuler", 25,-1) ; add the button that will close the GUI
    GUICtrlSetResizing ($nCancel,$GUI_DOCKBOTTOM+$GUI_DOCKSIZE+$GUI_DOCKHCENTER)

    [/autoit] [autoit][/autoit] [autoit]

    GUISetState () ; to display the GUI

    [/autoit] [autoit][/autoit] [autoit]

    ; Run the GUI until the dialog is closed
    While 1
    $msg = GUIGetMsg()

    If $msg = $GUI_EVENT_CLOSE Then ExitLoop
    Wend

    [/autoit] [autoit][/autoit] [autoit][/autoit]

    Damit sollte es gehen, oder ?!


    Gruß
    Greenhorn

  • Umgebungsvariablen per AutoIT Skript

    Hi,

    ich hoffe ich habe dich einigermaßen richtig verstanden...

    Lass AutoIt mal weg und versuch mal so die .ini auszulesen.

    Spoiler anzeigen


    Bsp.ini

    Code
    [Section]
UVar=D:\Pfad\Ordner

    Batch.bat

    Code
    for /f "tokens=2 delims==" %%i in ('findstr "UVar=" C:\Bsp.ini') do set MyUVar=%%i


    Ich hoffe es hilft dir ein wenig weiter...


    Gruß
    Greenhorn

  • Wie PC aus StandBy wecken und anmelden

    Bitte bedenke, dass diese Einstellungen auf einem Laptop ein Sicherheitsrisiko darstellt.

    Sollte das Notebook "abhanden" kommen, braucht der "Finder" nur den Rechner starten und muss sich nicht per Pw Identifizieren (um eure Nacktfotos zu betrachten und im Internet zu verteilen) !

    Also bitte nur auf Heimrechnern anwenden !
    (Dabei gilt zu beachten, dass im BIOS die Option den Rechner über's LAN zu starten/wecken deaktivert ist !)


    Gruß
    Greenhorn

    p.s.: Freut mich, wenn ich dir helfen konnte, dafür sind wir ja eine große Familie ... :D

  • Wie PC aus StandBy wecken und anmelden

    Moin,

    damit müsste es eigentlich klappen ...

    oder

    Spoiler anzeigen

    [Blockierte Grafik: http://www.computerleben.net/artikel/images/xp_standby_1.png]
    [Blockierte Grafik: http://www.computerleben.net/artikel/images/xp_standby_2.png]
    Entferne den Haken bei "Kennwort beim Reaktivieren aus dem Standbymodus anfordern".


    Gruß
    Greenhorn

  • Viewer für Word, Excel, Powerpoint und Visio

    Sorry, war 'n büschen spät/früh gestern ... :D

    hab's korrigiert ...
    Die *.msi Pakete kann man immer installieren mit den bekannten Schaltern.
    Wenn man die ursprüngliche Setup-Datei nicht entpacken kann, um an die *.msi Pakete heranzukomme, dann bringen diese meistens einen Silent-Schalter mit.
    Wie gesagt, mit dem Parameteraufruf /? bekommst Du immer heraus was geht und was nicht.
    Ansonsten kann ich dir UniExtract empfehlen. Damit kannst Du die meisten Installer entpacken, um an die msi zu gelangen (sofern die Installer überhaupt ein msi Paket enthalten).
    Universal Extractor 1.5
    Microsoft benutzt eigentlich immer den Microsoft Software Installer.
    Bei anderen Installerpaketen bekommst Du einen Einblick in den Aufbau der verschiedenen Installer (NSIS, Installshield usw.)


    Gruß
    Greenhorn