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. PCKing

Beiträge von PCKing

  • Autoupdater

    • PCKing
    • 20. Januar 2010 um 11:54

    hier:

    [autoit]

    If Filereadline(FileOpen(@ScriptDir & "/update.upd", 0),1) <> Filereadline(FileOpen(@ScriptDir & "/Version.ver",0),1) Then ;bei FileReadLine muss man die datei vorher mit FileOpen öffnen :) (sorry, hatte da nen fehler drinnen)
    InetGet("http://Website.de/updatedatei.dll/exe/etc.",@ScriptDir & "/update.dll/exe/etc.");wenn in update.udp was anderes steht downloadet der das , was hier steht,
    ;du kannst auch mehrere InetGet befehle hier reinschreiben^^
    Else
    Run(@ScriptDir & "/start.exe");wenn in der update.udp was anderes steht startet der die start.exe
    EndIf

    [/autoit]

    hatte in der if funktion nen kleinen fehler eingebaut gehabt, nämlich das = musste gegen ein <> ausgetauscht werden. ich war halt müde, wo ichs geschrieben hab ^^

  • Autoupdater

    • PCKing
    • 20. Januar 2010 um 02:07

    Ich hab mir mal erlaubt das script ein bisschen umzuschreiben.
    für die eine datei sollte es eigentlich gehen, habs nicht getestet :rolleyes:


    Spoiler anzeigen
    [autoit]

    #include <GUIConstants.au3>
    #include <GUIConstantsEx.au3>
    #include <ProgressConstants.au3>

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

    $Form1 = GUICreate("Update", 295, 133)
    $Progress1 = GUICtrlCreateProgress(32, 56, 230, 17)
    $Label1 = GUICtrlCreateLabel("Update Suche...", 110, 37, 82, 17)

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

    GUISetstate(@SW_SHOW)

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

    InetGet("http://DeineWebSite.de/update.upd",@ScriptDir & "/update.upd",1,1)

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

    Do ;Damit der Prozess auch den richtigen prozentwert angibt ;)
    $groesse = InetGetSize("http://DeineWebSite.de/update.upd")
    $1 = $groesse/100
    $prozent = @InetGetBytesRead/$1
    GuictrlsetData($Progress1, $prozent)
    $msg = GUIGetMsg()
    Until $prozent = 100 Or $msg = $GUI_EVENT_CLOSE Or $groesse = -1

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

    If Filereadline(FileOpen(@ScriptDir & "/update.upd", 0),1) = Filereadline(FileOpen(@ScriptDir & "/Version.ver",0),1) Then ;bei FileReadLine muss man die datei vorher mit FileOpen öffnen :)
    InetGet("http://Website.de/updatedatei.dll/exe/etc.",@ScriptDir & "/update.dll/exe/etc.")
    Else
    Run(@ScriptDir & "/start.exe")
    EndIf

    [/autoit]
  • Frage zu TCPListen

    • PCKing
    • 15. Januar 2010 um 11:18

    ja, aber durch deinen if-satz in zeile 6 wird sich das script direkt wieder beenden, ausser wenn jemand bereits versucht über den port die verbindung aufzunehmen

  • Script immer im vordergrund

    • PCKing
    • 13. Januar 2010 um 21:24

    hab es grad bei serious sam getestet, es funktioniert leider nicht. aber danke schonmal für den versuch ^^

  • Script immer im vordergrund

    • PCKing
    • 13. Januar 2010 um 13:55

    die print taste macht nen screenshot von dem bild, was du gerade auf dem desktop siehst und lagert es im zwischenspeicher, sodass du im paint nur noch strg+v drücken musst um es anzusehen oder abzuspeichern
    die hotkeys werden ausgeführt, nur wenn ich ein spiel im fullscreen spiele eben nichtmehr

  • Script immer im vordergrund

    • PCKing
    • 13. Januar 2010 um 13:04

    naja.... mein pc is etwas sehr alt und wenn ich noch ein programm wie xfire benutze, was beim arbeitsspeicher ca. 100 mb verbrät, kannich nicht mehr richtig zocken. deswegen wollt ich mit autoit versuchen eine lösung zu finden.

    PS. mein pc is aus dem jahr 2001 soll heissen: 512mb arbeitsspeicher,2Ghz cpu und nvidia fx5500 graka ^^

  • Neuer PC (gelöst)

    • PCKing
    • 13. Januar 2010 um 12:27
    Zitat

    Also mein aktueller PC ist auch gerade mal vom 21.01.2009, also nichts "Altes" sozusagen.

    also wenn der noch so neu ist, würd ich aufrüsten empfehlen. meiner is vom jahre 2001 und funktioniert für meine anforderungen noch einwandfrei :rock:

  • Script immer im vordergrund

    • PCKing
    • 13. Januar 2010 um 12:23

    ja nur ich zocke gern im fullscreen und knights of honor z.B. hat keine eigene screenshot funktion und immer die "Druck" taste zu drücken, dann paint öffnen ums abzuspeichern is auch blöd!

  • Script immer im vordergrund

    • PCKing
    • 13. Januar 2010 um 11:54

    naja, is ja blöd, das das dann nicht funzt. trotzdem danke für die antwort :)

  • Script immer im vordergrund

    • PCKing
    • 13. Januar 2010 um 11:32

    hallo, wollte mal wissen, wie man das script immer im vordergrund ablaufen lassen kann.
    Ich möchte nämlich auch von spielen ein paar screenshots machen, und dazu möchte ich auch
    nicht nach jedem screenshot auf den desktop wechseln und paint öffnen.

    Spoiler anzeigen
    [autoit]

    #Include <ScreenCapture.au3>

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

    HotKeySet("^g","screenshot")
    HotKeySet("{ESC}","ende")

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

    While 1
    Sleep(50)
    WEnd

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

    Func screenshot()
    $i = 1
    $u = 0
    Do
    If FileExists($i & ".jpg") Then
    Else
    _ScreenCapture_Capture(@DesktopDir & "/" & $i & ".jpg",0,0,-1,-1,True)
    $u = 1
    EndIf
    $i = $i +1
    Until $u = 1
    EndFunc

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

    Func ende()
    Exit
    EndFunc

    [/autoit]


    screenshots macht der auf strg+g nur wenn ich ein spiel starte macht der auf den tasten nichts.

  • GUI funktioniert nicht..was ist falsch?

    • PCKing
    • 11. Januar 2010 um 22:48

    ich hab in meinem letzten post das script ein bisschen umgeschrieben, dann gehts und der cpu wird nicht belastet hier nochmal :D

    Spoiler anzeigen
    [autoit]

    #include <GUIconstants.au3>
    #include <Array.au3>
    #include <File.au3>

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

    Global $Start

    GUICreate("Name:Testgui",800,100,0,0)

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

    $bttn1 = GUICtrlCreateButton("exe1",0,20,180,50)
    $bttn2 = GUICtrlCreateButton("exe2",200,20,180,50)
    $bttn3 = GUICtrlCreateButton("exe3",400,20,180,50)
    $bttn4 = GUICtrlCreateButton("beenden",600,20,180,50)

    GUISetState(@SW_SHOW)

    Func _x1() ;hier drunter reinschreiben, was passieren soll z.B. eine MsgBox
    MsgBox(0,"","Button1")
    EndFunc

    Func _x2()
    MsgBox(0,"","Button2")
    EndFunc

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

    Func _x3()
    MsgBox(0,"","Button3")
    EndFunc

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

    Func _x4()
    Exit
    EndFunc

    While 1 ;die while schleife
    $msg = GUIGetMsg()
    Select ; leitet das Select ein
    Case $msg = $bttn1 ;wenn button1 gedrückt wird dann...
    _x1() ;... passiert das hier (das was in der Func _x1() steht)
    Case $msg = $bttn2 ;button2 etc...
    _x2()
    Case $msg = $bttn3
    _x3()
    Case $msg = $bttn4
    _x4()
    Case $msg = $GUI_EVENT_CLOSE ;damit funktioniert das X oben rechts
    Exit
    EndSelect ; beendet das Select
    WEnd ;while schleife zu ende

    [/autoit]
  • GUI funktioniert nicht..was ist falsch?

    • PCKing
    • 11. Januar 2010 um 22:44

    ich weiss nicht welche lösung besser is, hatte aber langeweile und hab eins mit select gescriptet. hier:

    Spoiler anzeigen
    [autoit]

    #include <GUIconstants.au3>
    #include <Array.au3>
    #include <File.au3>

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

    Global $Start

    GUICreate("Name:Testgui",800,100,0,0)

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

    $bttn1 = GUICtrlCreateButton("exe1",0,20,180,50)
    $bttn2 = GUICtrlCreateButton("exe2",200,20,180,50)
    $bttn3 = GUICtrlCreateButton("exe3",400,20,180,50)
    $bttn4 = GUICtrlCreateButton("beenden",600,20,180,50)

    GUISetState(@SW_SHOW)

    Func _x1()
    $Start = 1
    EndFunc

    Func _x2()
    $Start = 2
    EndFunc

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

    Func _x3()
    $Start = 3
    EndFunc

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

    Func _x4()
    Exit
    EndFunc

    While 1 ;die while schleife
    $msg = GUIGetMsg()
    Select ; leitet das Select ein
    Case $msg = $bttn1 ;wenn button1 gedrückt wird dann...
    _x1() ;... passiert das hier (das was in der Func _x1() steht)
    Case $msg = $bttn2 ;button2 etc...
    _x2()
    Case $msg = $bttn3
    _x3()
    Case $msg = $bttn4
    _x4()
    Case $msg = $GUI_EVENT_CLOSE ;damit funktioniert das X oben rechts
    Exit
    EndSelect ; beendet das Select
    WEnd ;while schleife zu ende

    [/autoit]

    hab ein paar kommis reingemacht :D aber ich denke, das Schnitzel recht hat

    Zitat

    ich tus mal nicht weil die andere lösung besser is ;)

    er is ja schon was länger drinnen, wie ich

  • GUI funktioniert nicht..was ist falsch?

    • PCKing
    • 11. Januar 2010 um 22:22

    stimmt, da sollte man dann noch die if durch ein switch oder select event austauschen

  • GUI funktioniert nicht..was ist falsch?

    • PCKing
    • 11. Januar 2010 um 22:05

    mach eine while schleife rein:

    Spoiler anzeigen
    [autoit]

    #include <GUIconstants.au3>
    #include <Array.au3>
    #include <File.au3>

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

    Global $Start

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

    Opt("GUIOnEventMode", 1)

    GUICreate("Name:Testgui",800,100,0,0)

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

    GUICtrlCreateButton ("exe1",0,20,180,50)
    GUICtrlSetOnEvent(-1, '_x1')
    GUICtrlCreateButton ("exe2",200,20,180,50)
    GUICtrlSetOnEvent(-1, "_x2")
    GUICtrlCreateButton ("exe3",400,20,180,50)
    GUICtrlSetOnEvent(-1, "_x3")
    GUICtrlCreateButton ("beenden",600,20,180,50)
    GUICtrlSetOnEvent(-1, "_x4")

    GUISetState(@SW_SHOW)

    Func _x1()
    $Start = 1
    EndFunc

    Func _x2()
    $Start = 2
    EndFunc

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

    Func _x3()
    $Start = 3
    EndFunc

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

    Func _x4()
    Exit
    EndFunc

    While 1 ;die while schleife
    If $Start = 1 Then

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

    ControlClick("titel", "", "[CLASS:Button;INSTANCE:7]")

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

    EndIf

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

    If $Start = 2 Then

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

    ControlClick("titel", "", "[CLASS:Button;INSTANCE:8]")

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

    EndIf

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

    If $Start = 3 Then

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

    ControlClick("titel", "", "[CLASS:Button;INSTANCE:9]")

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

    EndIf
    WEnd ;while schleife zu ende

    [/autoit]
  • Datenbank import automatisieren

    • PCKing
    • 11. Januar 2010 um 21:45

    also wenn die angaben immer in der selben zeile stehen würd ich mal das versuchen:


    Spoiler anzeigen
    [autoit]

    $file = FileOpen($datei)
    $read = FileReadLine($file,3)
    MsgBox(0,"",$read)

    [/autoit]
  • Ganzes Skript wiederholen

    • PCKing
    • 8. Januar 2010 um 00:40

    was schreibst du denn fürn prog. , wenn ich fragen darf??? nen restarter für einen server? eine kindersicherung??? bin jetzt neugierig :D

  • Ganzes Skript wiederholen

    • PCKing
    • 8. Januar 2010 um 00:33

    ne, fragen darfst du schon stellen, nur sobald es drum geht, irgendwas auf knopfdruck zu machen oder irgendwas wiederholen... da denke ich irgendwie andauernd automatich an bot! ka warum, sry :whistling:

  • Ganzes Skript wiederholen

    • PCKing
    • 8. Januar 2010 um 00:14

    dann schreib das script in eine Funktion rein

    Bot????

  • Ganzes Skript wiederholen

    • PCKing
    • 8. Januar 2010 um 00:05

    guck dir mal die commandos:

    [autoit]

    While 1 ..... WEnd

    [/autoit]


    und

    [autoit]

    Do ... Until

    [/autoit]


    an ^^

  • Fehlermeldung "rename error"

    • PCKing
    • 7. Januar 2010 um 11:51

    Error openig Destination file heisst soviel wie: "Fehler beim öffnen der Zieldatei" soll heissen, der kann keine dateien erstellen. installiere mal AutoIt neu, villeicht klappts dann ja wieder.

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™