exe datei in skript eibinden

1. offizieller Beitrag

    hi leute!

    habe ein problem, ich habe eine *.exe datei erstellt (sms installer), diese möchte ich nun in mein skript einbinden, dass geht auch alles soweit, er entpackt diese datei, weiter tut er aber nichts.
    wenn ich das ganze in der *.au3 datei durchlaufen lasse klappt alles super, die compilierte datei hingegen entpackt nur und das war es.

    was habe ich verkehrt gemacht,

    help me.


    mfg
    fko

    ;~ DirCreate ("C:\Temp\Nortel";)
    FileInstall ("C:\Temp\Test.EXE", "C:\Temp\Nortel\Test.EXE", 1)
    ;~ Sleep (30000)
    RunWait ("C:\Temp\Nortel\Test.EXE";)
    ;Sleep (50000)
    RunWait ("C:\Temp\setup.exe";)

    WinWait ("Installation Type";)
    If Not WinActive("Installation Type","";) Then WinActivate("Installation Type","";)
    WinWaitActive("Installation Type","";)

    das ist er ich hoffe das er ein wenig weiter hilft, und nicht lachen, denkt daran ich bin ein absoluter neuling auf diesem gebiet

    danke
    mfg
    fko

    die setup exe befindet dich in der Test.exe , wenn wenn ich das richtig verstanden habe tu ich die gepackte (Test.exe) in ein verzeichnis kopieren ,diese soll nachher in der compilierten datei ausgeführt werden. was sie auch macht, sie tut aber nicht mehr aks sich nach c:\temp zu entpacken.

    wie meinst du das fileinstalen, ich dachte mit dem befehl
    FileInstall ("C:\Temp\Test.EXE", "C:\Temp\Nortel\Test.EXE", 1), hätte ich das getan.

    • Offizieller Beitrag

    Hi,

    [autoit]

    ;~ DirCreate ("C:\Temp\Nortel")
    FileInstall("C:\Temp\Test.EXE", "C:\Temp\Nortel\Test.EXE", 1)
    Run("C:\Temp\Nortel\Test.EXE")
    Do
    Sleep(1000)
    Until FileExists("C:\Temp\setup.exe")

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

    Run("C:\Temp\setup.exe")
    WinWait("Installation Type")
    If Not WinActive("Installation Type", "") Then WinActivate("Installation Type", "")
    WinWaitActive("Installation Type", "")

    [/autoit]

    So long,

    Mega

    Das ist der ganze quelltext, habe gerade deine lösung probiert geht als *.au3 version auch aber als kompilierte exe nicht, er entpackt auch wieder nur die dateien.


    mfg
    fko


    ;BlockInput(1)

    FileInstall("C:\Temp\Test.EXE", "C:\Temp\Nortel\Test.EXE", 1)
    Run("C:\Temp\Nortel\Test.EXE")
    Do
    Sleep(1000)
    Until FileExists("C:\Temp\setup.exe")

    Run("C:\Temp\setup.exe")
    WinWait("Installation Type")
    If Not WinActive("Installation Type", "") Then WinActivate("Installation Type", "")
    WinWaitActive("Installation Type", "")


    Send ("{Enter}")
    Sleep (1000)
    Send ("{Enter}")
    Sleep (1000)
    Send ("{Enter}")
    Sleep (1000)
    Send ("{Enter}")

    WinWait ("File Overwrite")
    If Not WinActive("File Overwrite","") Then WinActivate("File Overwrite","")
    WinWaitActive("File Overwrite","")

    Send ("{Enter}")
    Sleep (1000)
    Send ("{Enter}")
    Sleep (1000)
    Send ("{Enter}")
    Sleep (1000)
    Send ("{TAB}")
    Sleep (1000)
    Send ("{Enter}")
    Sleep (1000)
    Send ("{Enter}")
    Sleep (2000)

    TrayTip("Info", "Temp Dateien werden gelöscht", 29, 2)
    Sleep (10000)

    ;Deinstalliert die Enpackten Dateien
    Run ("c:\Temp\uninstal.exe")
    WinWait("Deinstallieren Wie")
    If Not WinActive("Deinstallieren Wie","") Then WinActivate("Deinstallieren Wie","")
    WinWaitActive("Deinstallieren Wie","")

    ControlClick ("Deinstallieren Wie", "&Weiter", "Button1")
    Sleep (1000)
    ControlClick ("Deinstallieren Wie", "&Weiter", "Button1")
    Sleep (30000)

    ;Konfiguration Nortel Treiber
    Run ("c:\sybase\OCS-12_0\bin\dsedit.exe")
    WinWait("Select Directory Service")
    If Not WinActive("Select Directory Service","") Then WinActivate("Select Directory Service","")
    WinWaitActive("Select Directory Service","")
    ControlClick ("Select Directory Service","OK", "Button1")

    Send ("!s")
    Send ("{TAB}")
    Send ("{Enter}")
    Send ("10.133.74.81")
    Sleep (2000)
    Send ("{TAB}")
    ControlClick ("Input Server Name", "OK", "Button1")
    Sleep (2000)

    WinWait("dsedit - DSEDIT1 - InterfacesDriver")
    If Not WinActive("dsedit - DSEDIT1 - InterfacesDriver","") Then WinActivate("dsedit - DSEDIT1 - InterfacesDriver","")
    WinWaitActive("dsedit - DSEDIT1 - InterfacesDriver","")

    Send ("!s")
    Send ("{DOWN 4}")
    Send ("{Enter}")
    Sleep (1000)

    ControlClick ("Add Attribute", "OK", "Button1")
    Sleep (1000)
    ControlClick ("Change Multi-String Attribute", "Add", "Button3")
    Sleep (1000)
    Send ("10.133.74.81,5000")
    Sleep (1000)
    Send ("{TAB}")
    Send ("{Enter}")
    Sleep (1000)
    ControlClick ("Change Multi-String Attribute", "OK", "Button1")
    Sleep (1000)

    WinWait("dsedit - DSEDIT1 - InterfacesDriver")
    If Not WinActive("dsedit - DSEDIT1 - InterfacesDriver","") Then WinActivate("dsedit - DSEDIT1 - InterfacesDriver","")
    WinWaitActive("dsedit - DSEDIT1 - InterfacesDriver","")

    Send ("!f")
    Sleep (500)
    Send ("{Down 2}")
    Send ("{Enter}")

    ;BlockInput(1)

    ;Shutdown (2) ;Neustart