1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. McRau

Beiträge von McRau

  • Mit IF funktion Bilder Wechseln

    • McRau
    • 9. März 2017 um 19:01

    Hallo,

    Danke für deine Antwort.

    Ich habe das ganze jetzt mal so probiert, aber das funktioniert nicht ;)

    AutoIt
    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <StaticConstants.au3>
    #include <WindowsConstants.au3>
    #Region ### START Koda GUI section ### Form=
    $Form1 = GUICreate("Form1", 615, 437, 192, 124)
    $Group1 = GUICtrlCreateGroup("Group1", 96, 48, 337, 281)
    $Rechner1 = GUICtrlCreateLabel("Rechner1", 128, 88, 51, 17)
    $Pic1 = GUICtrlCreatePic("", 208, 80, 36, 28)
    GUICtrlCreateGroup("", -99, -99, 1, 1)
    GUISetState(@SW_SHOW)
    #EndRegion ### END Koda GUI section ###
    
    
    While 1
    	$nMsg = GUIGetMsg()
    	$PRechner1 = ping ("RECHNER1")
    	If $PRechner1 > 0 Then
    	   $Pic1 = GUICtrlSetImage (-1, "PFAD\BILD1", "")
    	Else
    	   $Pic1 = GUICtrlSetImage (-1, "PFAD\BILD2", "")
        EndIf
    	Sleep (100)
    	Switch $nMsg
    		Case $GUI_EVENT_CLOSE
    			Exit
    
    
    	EndSwitch
    WEnd
    Alles anzeigen


    Die Rechner sind im lokalen Netzwerk, was wäre den die Alternative zu Ping?

    Vielen Dank

    Gruß

  • Mit IF funktion Bilder Wechseln

    • McRau
    • 9. März 2017 um 18:02

    Hallo zusammen,

    ich versuche mir grade ein Script zu basteln, der 4 Rechner immer wieder anpingt um anzuzeigen ob die Rechner Online oder Offline sind.
    Der Script soll immer in einer Schleife laufen und mir hinter dem Rechnernamen entweder Bild 1 für Online oder Bild 2 für Offline anzeigen.
    Ich denke am einfachsten wäre das Ganze mit

    $Rechner1 = ping („Rechner1“)
    If $ Rechner1 > 0 then
    Bild1
    Else
    Bild2
    Endif

    Ich bin mir nur nicht im Klaren, wie ich an einer Bestimmten Position in ein GUI entweder das eine oder das andere Bild anzeigen lasse.

    Schon mal Danke im Voraus
    Gruß

  • GUI mit Fernbedienung Steuern

    • McRau
    • 22. Mai 2016 um 08:30

    Vielen Dank für die Mühe!!

    aber leider auch keine Reaktion. Ich habe grade nochmal getestet, wenn ich die Buttons mit den Pfeil Tasten auf der Tastatur durch springen kann, geht es auch mit der Fb und umgekehrt wenn es sich nicht mit den Pfeil Tasten bedienen lässt geht es auch nicht mit der Fb.

    Schönen Sonntag
    Gruß

  • GUI mit Fernbedienung Steuern

    • McRau
    • 21. Mai 2016 um 13:58

    Hi, danke für die Antwort.

    Die Lösung mit dem Button hinter dem Bild fände ich super, aber es funktioniert nicht zumindest mit meinem Code ;)
    Ich habe es so Probiert

    AutoIt
    $Button1 = GUICtrlCreateButton("Button", 420, 244, 348, 348)
    $Pic1 = GUICtrlCreatePic("C:\Bild1.bmp", 420, 244, 348, 348, BitOR($SS_NOTIFY,$WS_GROUP,$WS_CLIPSIBLINGS))

    Nur so wird mir das Bild nicht angezeigt sondern nur der Button und das Steuern mit der Fb geht auch wieder nicht.

    Gruß

  • GUI mit Fernbedienung Steuern

    • McRau
    • 21. Mai 2016 um 09:28

    Hallo zusammen,

    ich habe vorhin festgestellt wenn ich einen Button ganz normal mache also

    AutoIt
    $Button1 = GUICtrlCreateButton("Button1", 100, 244, 85, 25)
    $Button2 = GUICtrlCreateButton("Button2", 100, 244, 85, 25)

    dann kann ich die mit der Fernbedienung ansteuern.
    Kann mir jemand sagen was ich tun muss, damit es auch so geht mit dem Bild als Button.


    AutoIt
    $Button1 = GUICtrlCreateButton("Button1", 420, 244, 348, 348, BitOR($BS_BITMAP,$WS_GROUP))
    GUICtrlSetImage(-1, "C:\bild1.bmp", -1)
    $Button2 = GUICtrlCreateButton("Button2", 1208, 664, 200, 200, BitOR($BS_BITMAP,$WS_GROUP))
    GUICtrlSetImage(-1, "C:\bild2.bmp", -1)


    Danke und Gruß

  • GUI mit Fernbedienung Steuern

    • McRau
    • 20. Mai 2016 um 14:38

    Hi, ja genau bei der Fernbedienung war ein USB to Infarot Empfänger dabei.

    Falls es hilft Windows kann mit der Fernbedienung umgehen im Media Center funktioniert die 100%.

    Gruß

  • GUI mit Fernbedienung Steuern

    • McRau
    • 20. Mai 2016 um 13:47

    Hi,

    danke für die Antwort.

    Sry hätte ich mir auch denken können das die Info wichtig ist :)
    Das ist eine "Hewlett-Packard RC1534002/00 Remote Control" nur ist die was älter und ich finde dazu leider keine Produktseite mehr, hoffe es ist trotzdem möglich.

    Das ist bisher mein Script aber bis jetzt nur 2 Programm-Buttons.

    Gruß

    Spoiler anzeigen
    AutoIt
    #include <ButtonConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <WindowsConstants.au3>
    #Region ### Layout ###
    $Form1 = GUICreate("Form1",@DesktopWidth,@DesktopHeight,0,0,$WS_POPUP)
    GUISetBkColor(0xFFFFFF)
    $EMBY = GUICtrlCreateButton("EMBY", 420, 244, 348, 348, BitOR($BS_BITMAP,$WS_GROUP))
    GUICtrlSetImage(-1, "C:\tv\emby.bmp", -1)
    $Exit = GUICtrlCreateButton("Exit", 1208, 664, 200, 200, BitOR($BS_BITMAP,$WS_GROUP))
    GUICtrlSetImage(-1, "C:\tv\EXIT.bmp", -1)
    $Shutdown = GUICtrlCreateButton("Shutdown", 608, 664, 200, 200, BitOR($BS_BITMAP,$WS_GROUP))
    GUICtrlSetImage(-1, "C:\tv\Shutdown.bmp", -1)
    $Reboot = GUICtrlCreateButton("Reboot", 908, 664, 200, 200, BitOR($BS_BITMAP,$WS_GROUP))
    GUICtrlSetImage(-1, "C:\tv\Reboot.bmp", -1)
    $Tv = GUICtrlCreateButton("Tv", 1200, 244, 348, 348, BitOR($BS_BITMAP,$WS_GROUP))
    GUICtrlSetImage(-1, "C:\tv\logo_tv.bmp", -1)
    $EMBYTXT = GUICtrlCreateLabel("Emby", 549, 200, 89, 41)
    GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
    $TvTxT = GUICtrlCreateLabel("TV", 1352, 200, 48, 41)
    GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
    $Shutdowntxt = GUICtrlCreateLabel("Herunterfahren", 592, 616, 233, 41)
    GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
    $Reboottxt = GUICtrlCreateLabel("Neustarten", 920, 616, 171, 41)
    GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
    $Exittxt = GUICtrlCreateLabel("Exit", 1288, 616, 60, 41)
    GUICtrlSetFont(-1, 24, 800, 0, "MS Sans Serif")
    GUISetState(@SW_SHOW)
    #EndRegion ### Layout ###
    
    
    While 1
    	$nMsg = GUIGetMsg()
    	Switch $nMsg
    	     Case $Tv
             Run ( "C:\Program Files (x86)\DVBViewer\dvbviewer.exe", "C:\Program Files (x86)\DVBViewer", @SW_MAXIMIZE )
    		 GUISetState(@SW_HIDE, $Form1)
             Sleep (5000)
             While 1
    	     Sleep (2000)
    		 If ProcessExists ("dvbviewer.exe") = 0 then ExitLoop
             WEnd
    		 GUISetState(@SW_SHOW, $Form1)
    	   Case $EMBY
             Run ( "C:\Users\tv\AppData\Roaming\Emby-Theater\system\Emby.Theater.exe", "",@SW_MAXIMIZE)
    		 GUISetState(@SW_HIDE, $Form1)
             Sleep (5000)
             While 2
    	     Sleep (2000)
    		 If ProcessExists ("Emby.Theater.exe") = 0 then ExitLoop
             WEnd
    		 GUISetState(@SW_SHOW, $Form1)
    	  Case $Reboot
             Shutdown(6)
    	  Case $Shutdown
             Shutdown(5)
    	  Case $Exit
    		    Exit
    	  Case $GUI_EVENT_CLOSE
    			Exit
    
    
    	EndSwitch
    WEnd
    Alles anzeigen
  • GUI mit Fernbedienung Steuern

    • McRau
    • 20. Mai 2016 um 12:03

    Hallo zusammen,

    ich baue mir grade ein kleines Programm, welches mir eine GUI im Vollbildmodus startet wo 4 Buttons angezeigt werden, die jeweils ein Programm startet. Jetzt würde ich gerne mit meiner Fernbedienung die 4 Buttons mit den Pfeil-Tasten ansteuern. Die OK-Taste auf der Fernbedienung startet auch den ersten Button aber ich kann mit den Pfeil-Tasten nicht zum nächsten Button springen. Kann mir jemand helfen wie ich das hinbekomme.


    Danke und Gruß

  • Mircosoft Visual Studio Tools for Office Runtime 2010

    • McRau
    • 13. August 2015 um 13:46

    Okay habe doch noch eine Frage :)
    Wie bekomme ich ShellExecuteWait als Admin ausgeführt ala RunAs ?

    Danke und Gruß

  • Mircosoft Visual Studio Tools for Office Runtime 2010

    • McRau
    • 13. August 2015 um 13:31

    Hi gmmg,

    vielen dank!
    Entpacken und ShellExecuteWait funktioniert 1A :)

    Gruß

  • Mircosoft Visual Studio Tools for Office Runtime 2010

    • McRau
    • 13. August 2015 um 12:54

    Hallo zusammen,
    ich hoffe ihr könnt mir helfen, und zwar versuche ich das Setup von Mircosoft Visual Studio Tools for Office Runtime 2010 mit AutoIt automatisch installieren zulassen.
    Man kann das setup auch Silent installieren, nur bekomme ich da keine vernünftige abfrage hin, wann das Setup fertig ist, daher dachte ich lasse ich Setup mit GUI laufen und arbeite es mit ControlClick ab.
    Soweit so gut nur bekomme ich es einfach nicht hin, das mir die Buttons gedrückt werden.
    Ich habe schon alles mögliche probiert, das sind die Infos die mir AutoIt v3 Windows Info gibt:

    Spoiler anzeigen


    >>>> Window <<<<
    Title: Microsoft Visual Studio Tools for Office Runtime 2010 Setup
    Class: #32770
    Position: 1384, 233
    Size: 503, 471
    Style: 0x94CA00CC
    ExStyle: 0x00010101
    Handle: 0x0056123C

    >>>> Control <<<<
    Class: Button
    Instance: 3
    ClassnameNN: Button3
    Name:
    Advanced (Class): [CLASS:Button; INSTANCE:3]
    ID: 104
    Text: I have read and &accept the license terms.
    Position: 43, 152
    Size: 333, 26
    ControlClick Coords: 7, 10
    Style: 0x50012403
    ExStyle: 0x00000004
    Handle: 0x0005149A

    >>>> Mouse <<<<
    Position: 1437, 421
    Cursor ID: 0
    Color: 0xFFFFFF

    >>>> StatusBar <<<<

    >>>> ToolsBar <<<<

    >>>> Visible Text <<<<
    MICROSOFT SOFTWARE: LIZENZBESTIMMUNGEN
    MICROSOFT VISUAL STUDIO TOOLS FOR OFFICE RUNTIME AND LANGUAGE PACK
    Diese Lizenzbestimmungen sind ein Vertrag zwischen Ihnen und der Microsoft Corporation (oder einer anderen Microsoft-Konzerngesellschaft, wenn diese an dem Ort, an dem Sie die Software erwerben, die Software lizenziert). Bitte lesen Sie die Lizenzbestimmungen aufmerksam durch. Sie gelten für die der oben genannten Software und gegebenenfalls für die Medien, auf denen Sie diese erhalten haben, sowie für alle von Microsoft diesbezüglich angebotenen
    · Updates
    · Ergänzungen
    · Internetbasierten Dienste
    · Supportleistungen
    Liegen letztgenannten Elementen eigene Bestimmungen bei, gelten diese eigenen Bestimmungen.
    DURCH DIE VERWENDUNG DER SOFTWARE ERKENNEN SIE DIESE BESTIMMUNGEN AN. FALLS SIE DIE BESTIMMUNGEN NICHT AKZEPTIEREN, SIND SIE NICHT BERECHTIGT, DIE SOFTWARE ZU VERWENDEN.
    WENN SIE DIESE LIZENZBESTIMMUNGEN EINHALTEN, VERFÜGEN SIE ÜBER DIE FOLGENDEN ZEITLICH UNBESCHRÄNKTEN RECHTE.
    1. RECHTE ZUR INSTALLATION UND NUTZUNG. Sie sind berechtigt,eine beliebige Anzahl von Kopien der Software auf Ihren Geräten zu installieren und zu verwenden.
    2. GÜLTIGKEITSBEREICH DER LIZENZ. Die Software wird lizenziert, nicht verkauft. Dieser Vertrag gibt Ihnen nur einige Rechte zur Verwendung der Software. Microsoft behält sich alle anderen Rechte vor. Sie dürfen die Software nur wie in diesem Vertrag ausdrücklich gestattet verwenden, es sei denn, das anwendbare Recht gibt Ihnen ungeachtet dieser Einschränkung umfassendere Rechte. Dabei sind Sie verpflichtet, alle technischen Beschränkungen der Software einzuhalten, die Ihnen nur spezielle Verwendungen gestatten. Sie sind nicht dazu berechtigt:
    · Ergebnisse der für eine Software durchgeführten Vergleichstests ohne schriftliche Genehmigung von Microsoft an Dritte weiterzugeben
    · technische Beschränkungen der Software zu umgehen
    · die Software zurückzuentwickeln (Reverse Engineering), zu dekompilieren oder zu disassemblieren, es sei denn, dass (und nur insoweit) es durch das anwendbare Recht ungeachtet dieser Einschränkung ausdrücklich gestattet ist
    · eine größere Anzahl von Kopien der Software als in diesem Vertrag angegeben oder vom anwendbaren Recht ungeachtet dieser Einschränkung ausdrücklich gestattet anzufertigen
    · die Software zu veröffentlichen, damit andere sie kopieren können
    · die Software zu vermieten, zu verleasen oder zu verleihen
    · die Rechte an der Software oder diesen Vertrag auf Dritte zu übertragen oder
    · die Software für kommerzielle Software-Hostingdienste zu verwenden.
    3. SICHERUNGSKOPIE. Sie sind berechtigt, eine Sicherungskopie der Software anzufertigen. Sie dürfen diese nur zur erneuten Installation der Software verwenden.
    4. DOKUMENTATION. Jede Person, die über einen gültigen Zugriff auf Ihren Computer oder Ihr internes Netzwerk verfügt, ist berechtigt, die Dokumentation zu Ihren internen Referenzzwecken zu kopieren und zu verwenden.
    5. ÜBERTRAGUNG AUF EIN ANDERES GERÄT. Sie sind berechtigt, die Software zu deinstallieren und auf einem anderen Gerät zu Ihrer Verwendung zu installieren. Sie sind nicht berechtigt, dies zu tun, um diese Lizenz auf mehreren Geräten gemeinsam zu verwenden.
    6. AUSFUHRBESCHRÄNKUNGEN. Die Software unterliegt den Exportgesetzen und -regelungen der USA sowie des Landes, aus dem sie ausgeführt wird. Sie sind verpflichtet, alle nationalen und internationalen Exportgesetze und -regelungen einzuhalten, die für die Software gelten. Zu diesen Gesetzen gehören Einschränkungen im Hinblick auf Bestimmungsorte, Endbenutzer und Endbenutzung. Weitere Informationen finden Sie unter https://autoit.de/www.microsoft.com/exporting, oder wenden Sie sich an das verbundene Unternehmen von Microsoft in Ihrem Land, siehe unter https://autoit.de/www.microsoft.com/worldwide oder für Deutschland unter https://autoit.de/www.microsoft.com/germany oder telefonisch unter (49) (0) 89-3176-0.
    7. SUPPORTLEISTUNGEN. Da diese Software „wie besehen“ zur Verfügung gestellt wird, stellen wir möglicherweise keine Supportleistungen für sie bereit.
    8. GESAMTER VERTRAG. Dieser Vertrag sowie die Bestimmungen für von Ihnen verwendete Ergänzungen, Updates, internetbasierte Dienste und Supportleistungen stellen den gesamten Vertrag für die Software und die Supportleistungen dar.
    9. ANWENDBARES RECHT.
    a. Vereinigte Staaten. Wenn Sie die Software in den Vereinigten Staaten erworben haben, regelt das Gesetz des Staates Washington die Auslegung dieses Vertrags und gilt für Ansprüche, die aus einer Vertragsverletzung entstehen, ungeachtet von Prinzipien über Gesetzeskonflikte. Die Gesetze des Staates Ihres Wohnortes regeln alle anderen Ansprüche, einschließlich Ansprüche aus den Verbraucherschutzgesetzen des Staates, aus Gesetzen gegen unlauteren Wettbewerb und aus Schadenersatzverfahren.
    b. Außerhalb der Vereinigten Staaten. Wenn Sie die Software in einem anderen Land erworben haben, gelten die Gesetze dieses Landes.
    10. RECHTSKRAFT. Dieser Vertrag beschreibt bestimmte gesetzliche Rechte. Möglicherweise haben Sie unter den Gesetzen Ihres Landes weitergehende Rechte. Möglicherweise verfügen Sie außerdem über Rechte im Hinblick auf die Partei, von der Sie die Software erworben haben. Dieser Vertrag ändert nicht Ihre Rechte, die sich aus den Gesetzen Ihres Staates ergeben, sofern die Gesetze Ihres Staates dies nicht zulassen.
    11. AUSSCHLUSS VON GARANTIEN. DIE SOFTWARE WIRD „WIE BESEHEN“ LIZENZIERT. SIE TRAGEN DAS MIT DER NUTZUNG VERBUNDENE RISIKO. MICROSOFT GEWÄHRT KEINE AUSDRÜCKLICHEN GEWÄHRLEISTUNGEN ODER GARANTIEN. MÖGLICHERWEISE GELTEN UNTER DEN ÖRTLICH ANWENDBAREN GESETZEN ZUSÄTZLICHE VERBRAUCHERRECHTE ODER GESETZLICHE GARANTIEN, DIE DURCH DIESEN VERTRAG NICHT ABGEÄNDERT WERDEN KÖNNEN. IM DURCH DAS ÖRTLICH ANWENDBARE RECHT GESTATTETEN UMFANG SCHLIEßT MICROSOFT IMPLZIERTE GARANTIEN FÜR DIE GEBRAUCHSTAUGLICHKEIT, EIGNUNG FÜR EINEN BESTIMMTEN ZWECK UND NICHTVERLETZUNG VON RECHTEN DRITTER AUS.
    FÜR AUSTRALIEN - NACH DEM AUSTRALIAN CONSUMER LAW GELTEN GESETZLICHE GARANTIEN, UND ES BESTEHT AN KEINER STELLE IN DIESEN BESTIMMUNGEN DIE ABSICHT, DIESE RECHTE EINZUSCHRÄNKEN.
    12. BESCHRÄNKUNG UND AUSSCHLUSS DES SCHADENERSATZES. SIE KÖNNEN VON MICROSOFT UND DEREN LIEFERANTEN NUR EINEN ERSATZ FÜR DIREKTE SCHÄDEN BIS ZU EINEM BETRAG VON 5 US-DOLLAR ERHALTEN. SIE KÖNNEN KEINEN ERSATZ FÜR ANDERE SCHÄDEN ERHALTEN, EINSCHLIESSLICH FOLGESCHÄDEN, SCHÄDEN AUS ENTGANGENEM GEWINN, SPEZIELLE, INDIREKTE ODER BEILÄUFIG ENTSTANDENE SCHÄDEN.
    Diese Beschränkung gilt:
    · jeden Gegenstand im Zusammenhang mit der Software, Diensten, Inhalten (einschließlich Code) auf Internetseiten von Drittanbietern oder Programmen von Drittanbietern
    · Ansprüche aus Vertragsverletzungen, Verletzungen der Garantie oder der Gewährleistung, verschuldensunabhängiger Haftung, Fahrlässigkeit oder anderen unerlaubten Handlungen im durch das anwendbare Recht gestatteten Umfang.
    Sie hat auch dann Gültigkeit, wenn Microsoft von der Möglichkeit der Schäden gewusst hat oder hätte wissen müssen. Obige Beschränkung und obiger Ausschluss gelten möglicherweise nicht für Sie, weil Ihr Land den Ausschluss oder die Beschränkung von beiläufig entstandenen Schäden, Folgeschäden oder sonstigen Schäden nicht gestattet.
    Wenn Sie die Software in DEUTSCHLAND oder in ÖSTERREICH erworben haben, findet die Beschränkung im vorstehenden Absatz „Beschränkung und Ausschluss des Schadenersatzes“ auf Sie keine Anwendung. Stattdessen gelten für Schadenersatz oder Ersatz vergeblicher Aufwendungen, gleich aus welchem Rechtsgrund einschließlich unerlaubter Handlung, die folgenden Regelungen:

    Microsoft haftet bei Vorsatz, grober Fahrlässigkeit, bei Ansprüchen nach dem Produkthaftungsgesetz sowie bei Verletzung von Leben, Körper oder der Gesundheit nach den gesetzlichen Vorschriften.

    Microsoft haftet nicht für leichte Fahrlässigkeit. Wenn Sie die Software jedoch in Deutschland erworben haben, haftet Microsoft auch für leichte Fahrlässigkeit, wenn Microsoft eine wesentliche Vertragspflicht verletzt. In diesen Fällen ist die Haftung von Microsoft auf typische und vorhersehbare Schäden beschränkt. In allen anderen Fällen haftet Microsoft auch in Deutschland nicht für leichte Fahrlässigkeit.
    &Drucken
    &Speichern
    I have read and &accept the license terms.
    &Yes, send information about my setup experiences to Microsoft Corporation.
    For more information, read the <A HREF="http://go.microsoft.com/fwlink/?LinkID=168641&clcid=0x409">Data Collection Policy</A>.
    &Install
    Cancel


    >>>> Hidden Text <<<<
    < &Zurück
    Fertig stellen
    Hilfe

    Ich bin zum Schluss schon hingegangen und habe es so probiert

    AutoIt
    WinWait("Microsoft Visual Studio Tools for Office Runtime 2010 Setup","")
    WinActivate("Microsoft Visual Studio Tools for Office Runtime 2010 Setup","")
    Sleep (500)
    Send ("{SPACE}")
    Sleep (500)
    Send ("{ENTER}")

    Nur leider funktioniert das scheinbar auch nur mit der Tastatur aber nicht per Script.
    Schon einmal Danke für eure mühe

    Mit freundlichen Grüßen

  • CS:GO Dedicated Server Update

    • McRau
    • 21. Februar 2013 um 06:53

    HI General Kaboom,

    wo genau ist den dein Problem?

    EDIT:
    "Habe dir mal eine PN mit einer Schritt für Schritt Anleitung fürs Installieren geschickt, hoffe hilft dir weiter"

    Hi Nathax,

    danke für die Antwort. Ein Freund der sich jetzt nicht mit AutoIT auskennt meinte es müsste grundsätzlich so gehen

    [autoit]

    While
    $pid=run

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


    $text = StdoutRead($pid)

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


    If StringInStr($text, "Your server is out of date. Please update and
    restart.",1) Then

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


    ExitLoop

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

    EndIf

    [/autoit]


    nur ist mein Problem jetzt das AutoIT wohl mit run nichts anfangen kann.
    Ziel ist es ja alle Laufende Prozesse nach den Text zu durchsuchen, könnte mir eine vielleicht helfen was ich bei AutoIT anstatt $pid=run schreiben muss damit alle Prozesse abgeklappert werden.

    Gruß
    Marvin

  • CS:GO Dedicated Server Update

    • McRau
    • 15. Februar 2013 um 14:01

    Hallo,

    ich habe jetzt mal was gegoogelt und wenn ich das richtig verstehe wird mein Problem dadrin liegen, dass man Text nicht so einfach aus ner CMD (Console) auslesen kann, oder habe ich da was falsch verstanden?
    Gibt es den eine Lösung dafür oder werde ich das so nicht ans Laufen bekommen?

    Gruß
    Marvin

  • CS:GO Dedicated Server Update

    • McRau
    • 15. Februar 2013 um 10:36

    Hallo Chip,
    danke für die Antwort, aber wenn ich das nicht falsch verstehe macht der das so ja auch nicht auf dauer Automatisch, wenn doch dann Steam ein Update bringt habe ich ja wieder nur die Message das da stehen der Server ist out of Date und macht nicht selbständig das update.

  • CS:GO Dedicated Server Update

    • McRau
    • 15. Februar 2013 um 10:12

    Guten Morgen zusammen,

    ich lasse Privat auf einem Windows Server 2012 einen CS:GO
    Server laufen. Da gibt es nur das Problem das sobald Steam ein Update für CS:GO
    rausbringt dieses nicht automatisch eingespielt wird der Server nur folgende
    Meldung rausbringt "Your server is out of date. Please update and restart."
    Da habe ich mir gedacht das kann man bestimmt mit einem
    Script machen, dass man den Server nicht immer von Hand kontrollieren muss und
    gegebenen falls Updaten.
    Ich habe das ganze mal so Probiert

    [autoit]

    While 1While 2
    If NOT
    ProcessExists("srcds.exe") Then

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

    RunAs ("USER", "DOMAIN","PW", "4", "C:\HLServer\csgo\srcds.exe -game csgo -console -usercon +game_type 1 +game_mode 0 +mapgroup GunGame +map ar_monastery -maxplayers_override 16")

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

    Sleep(6500)

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

    EndIf

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

    Sleep(500)

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

    Wend

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

    While 3

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

    $text =
    WinGetText("RAUON-GunGame", "")

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

    If
    StringInStr($text, "Your server is out of date. Please update and restart.",1) Then

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

    ExitLoop

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

    EndIf

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

    Sleep(500)

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

    WEnd

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

    WinClose("RAUON-GunGame","")

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

    Sleep(3000)

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

    RunAs ("USER", "DOMAIN", "PW", "4", "C:\HLServer\Steamcmd\steamcmd.exe")

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

    Sleep(30000)

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

    Send("login USER PW")

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

    Send("{Enter}")

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

    Sleep(30000)

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

    Send("force_install_dir ../csgo")

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

    Send("{Enter}")

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

    Sleep(30000)

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

    Send("app_update 740")

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

    Send("{Enter}")

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

    Sleep(300000)

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

    Send("Exit")

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

    Send("{Enter}")

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

    Sleep(30000)

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

    While 4

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

    If NOT
    ProcessExists("steamcmd.exe") Then

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

    ExitLoop

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

    EndIf

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

    Sleep(500)

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

    Wend

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

    WEnd

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

    Sleep(1000)

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

    Allerdings
    funktioniert dies so nicht :)
    Er startet mir den Server aber das war es auch schon, ich denke ja dass er das Consolen Fenster nicht richtig ausliest.

    Würde mich über Hilfe sehr freuen.

    Schon mal vielen Dank im Voraus


    MFG
    Marvin

  • Gesamten Script als Admin Ausführen

    • McRau
    • 14. September 2012 um 06:27

    Hallo zusammen,


    ytwinky vielen Dank für den Script aber durch den User Wechsel unbrauchbar für
    mich.


    Ich schreib noch mal eben was ich genau machen möchte und zwar das im laufenden
    Betrieb im Abstand von 2-4Wochen dieser Script gestartet wird und dann eine
    Datei als Admin ausführt da der Standard-User nicht die benötigten rechte hat,
    das Ganze soll weites gehend unbemerkt ablaufen, daher ist ein User Wechsel
    leider nicht die Lösung für mich.


    Ich habe das ganze Jetzt mal so versucht mit 2 Dateien

    Code
    FileCopy("\\PFAD\DATEI.exe", "C:\Temp\")
    RunAs ("USER", "Domain", "PW", "4", "C:\Temp\Datei.exe")
    RunAs ("USER", "Domain", "PW", "4", "\\Pfad\Datei-Schleife.exe")


    Datei-Schleife

    Code
    While 1
    	WinSetState("Programm-Titel", "", @SW_MINIMIZE) 
    	$text = WinGetText("Programm-Titel", "")
    	If StringInStr($text, "Done.",1) Then
    		ExitLoop
    	EndIf
    	Sleep(1000)
    WEnd
    
    
    Sleep(1000)
    ControlClick("Programm-Titel", "", "[ID:4]")
    Sleep(1000)
    
    
    FileDelete("C:\Temp\Datei.exe")
    Alles anzeigen

    Allerdings
    habe ich so das Problem das manchmal einfach die Schleife nicht ordentlich
    läuft und nicht tut was sie tun soll und manchmal läuft der erste Script in
    Schleife und öffnet mir unbegrenzt oft die Dateien, oder es funktioniert einfach :)


    Was ist daran falsch das er öfters dieses fehl verhalten an den Tag legt?
    Oder kann man das so gar nicht machen?

    Gruß

  • Gesamten Script als Admin Ausführen

    • McRau
    • 13. September 2012 um 08:07

    Hi danke für die Antwort


    #RequireAdmin verlangt ja dann die Manuele Eingabe von den Admin Daten, genau
    das soll eben nicht passieren.


    Genau der Script soll eine Datei als Admin starten und wenn
    sie fertig ist geschlossen werden. Das Starten der Datei klappt auch wunderbar
    nur der Rest des Scripts wie das Minimieren und schließen klappt nicht nur wenn
    ich die Datei mit Rechtsklick "Als Administrator Ausführen" mache,
    nur weiß ich leider nicht bzw. habs nicht gefunden wie ich dem ganzen script
    wie bei runas Admin rechte mit auf den weg gebe.


    MFG

  • Gesamten Script als Admin Ausführen

    • McRau
    • 13. September 2012 um 06:52

    Hallo zusammen,


    ich habe grade angefangen mit AutoIT und mich direkt mal hier
    angemeldet im Forum da ich schon auf ein Problem gestoßen bin, wo ich hoffe das
    mir einer hier weiterhelfen kann :)


    Und zwar das ganze läuft vom Grundprinzip her schon ziemlich gut, aber muss den Script immer noch als Administrator
    ausführen wegen der Benutzerkontensteuerung.


    Da ist jetzt meine Frage wie führe ich den ganzen Script mit runas aus? Habe schon mit einem 2ten Script probiert der
    diesen ausführt aber dann läuft das Ganze als Schleife.


    Code
    FileCopy("\\PFAD\DATEI.exe", "C:\Temp\")
    RunAs ("USER", "Domain", "PW", "4", "C:\Temp\Datei.exe")
    
    
    While 1
    	WinSetState("Programm-Titel", "", @SW_MINIMIZE) 
    	WinSetState("Programm-Titel", "", @SW_MINIMIZE) 
    	$text = WinGetText("Programm-Titel", "")
    	If StringInStr($text, "Done.",1) Then
    		ExitLoop
    	EndIf
    	Sleep(1000)
    WEnd
    
    
    Sleep(1000)
    ControlClick("Programm-Titel", "", "[ID:4]")
    Sleep(1000)
    
    
    FileDelete("C:\Temp\Datei.exe")
    Alles anzeigen


    Schon mal Thx im Voraus


    MFG

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™