Was gibt _FFConnect bei laufendem Firefox zurück (also was steht in der Konsole)?
Ist MozRepl installiert und gestartet?
Wenn du ein 64 Bit OS hast ganz oben im script das hier einfügen:
#AutoIt3Wrapper_UseX64=n
[/autoit]Was gibt _FFConnect bei laufendem Firefox zurück (also was steht in der Konsole)?
Ist MozRepl installiert und gestartet?
Wenn du ein 64 Bit OS hast ganz oben im script das hier einfügen:
#AutoIt3Wrapper_UseX64=n
[/autoit]Vielleicht noch den Index angeben. Dann sollte es eigentlich so gehen wie es weedhead schon gesagt hat.
PS: Es geht einfacher dir zu helfen wenn du uns die URL der Seite wo das Input ist gibst.
Statt Koda (was ich sowieso selten benutze) werde ich jetzt deinen GUI Designer nutzen. (Falls ich mal schnell ne GUI basteln muss)
Hammer!
Genau so etwas habe ich gerade gebraucht. Danke!
Eine nette Idee aber ich würde es mit einem TimerInit() Timer machen.
So gehts ohne externen Timer:
$e = 0
$d = 0
$c = 1
$r = 0
$f = 0
$iEnde = 0
$hTimer = TimerInit()
AdlibRegister("TimerCheck", 50)
While $e < 2
$e = $e + 0
$e = 1
$a = (Chr(Random(97, 122, 1)))
$b = (Chr(Random(97, 122, 1)))
$c = 1
If $a = "w" And $b = "w" Then
If $d = 0 Then
$Inputbox = InputBox(" ", "!")
If $Inputbox = "!" Then
$r = $r + 1
Else
$f = $f + 1
EndIf
EndIf
If $d = 1 Then
$Inputbox = InputBox(" ", '"')
If $Inputbox = '"' Then
$r = $r + 1
Else
$f = $f + 1
EndIf
EndIf
If $d = 2 Then
$Inputbox = InputBox(" ", '§')
If $Inputbox = "§" Then
$r = $r + 1
Else
$f = $f + 1
EndIf
EndIf
If $d = 3 Then
$Inputbox = InputBox(" ", '
)
If $Inputbox = "$" Then
$r = $r + 1
Else
$f = $f + 1
EndIf
EndIf
If $d = 4 Then
$Inputbox = InputBox(" ", "%")
If $Inputbox = "%" Then
$r = $r + 1
Else
$f = $f + 1
EndIf
EndIf
If $d = 5 Then
$Inputbox = InputBox("", "&")
If $Inputbox = "&" Then
$r = $r + 1
Else
$f = $f + 1
EndIf
EndIf
If $d = 6 Then
$Inputbox = InputBox(" ", "/")
If $Inputbox = "/" Then
$r = $r + 1
Else
$f = $f + 1
EndIf
EndIf
If $d = 7 Then
$Inputbox = InputBox(" ", "(")
If $Inputbox = "(" Then
$r = $r + 1
Else
$f = $f + 1
EndIf
EndIf
If $d = 8 Then
$Inputbox = InputBox(" ", ")")
If $Inputbox = ")" Then
$r = $r + 1
Else
$f = $f + 1
EndIf
EndIf
If $d = 8 Then
$Inputbox = InputBox(" ", "?")
If $Inputbox = "?" Then
$r = $r + 1
Else
$f = $f + 1
EndIf
EndIf
If $d = 9 Then
$Inputbox = InputBox(" ", "=")
If $Inputbox = "=" Then
$r = $r + 1
Else
$f = $f + 1
EndIf
EndIf
If $d = 10 Then
$Inputbox = InputBox(" ", "?")
If $Inputbox = "?" Then
$r = $r + 1
Else
$f = $f + 1
EndIf
EndIf
If $d = 11 Then
$Inputbox = InputBox(" ", "1")
If $Inputbox = "1" Then
$r = $r + 1
Else
$f = $f + 1
EndIf
EndIf
If $d = 12 Then
$Inputbox = InputBox(" ", "2")
If $Inputbox = "2" Then
$r = $r + 1
Else
$f = $f + 1
EndIf
EndIf
If $d = 13 Then
$Inputbox = InputBox(" ", "3")
If $Inputbox = "3" Then
$r = $r + 1
Else
$f = $f + 1
EndIf
EndIf
If $d = 14 Then
$Inputbox = InputBox(" ", "4")
If $Inputbox = "4" Then
$r = $r + 1
Else
$f = $f + 1
EndIf
EndIf
If $d = 15 Then
$Inputbox = InputBox(" ", "5")
If $Inputbox = "5" Then
$r = $r + 1
Else
$f = $f + 1
EndIf
EndIf
If $d = 16 Then
$Inputbox = InputBox(" ", "6")
If $Inputbox = "6" Then
$r = $r + 1
Else
$f = $f + 1
EndIf
EndIf
If $d = 17 Then
$Inputbox = InputBox(" ", "7")
If $Inputbox = "7" Then
$r = $r + 1
Else
$f = $f + 1
EndIf
EndIf
If $d = 18 Then
$Inputbox = InputBox(" ", "8")
If $Inputbox = "8" Then
$r = $r + 1
Else
$f = $f + 1
EndIf
EndIf
If $d = 19 Then
$Inputbox = InputBox(" ", "9")
If $Inputbox = "9" Then
$r = $r + 1
Else
$f = $f + 1
EndIf
EndIf
If $d = 20 Then
$Inputbox = InputBox(" ", "0")
If $Inputbox = "0" Then
$r = $r + 1
Else
$f = $f + 1
EndIf
EndIf
Else
If $d = 21 Then
$d = -1
EndIf
$d = $d + $c
EndIf
WEnd
Func TimerCheck()
If TimerDiff($hTimer) > 30000 And Not $iEnde Then
_Ende()
Global $iEnde = 1
EndIf
EndFunc ;==>TimerCheck
Func _Ende()
If $e = 1 Then
$e = 0
$Grammatik1 = ""
$Grammatik2 = ""
$Grammatik3 = ""
$Grammatik4 = ""
$Grammatik5 = ""
$Punkte = $r - $f - $f
If $f = 0 Then $Punkte = $r + $r
If $r = 1 Or $r = -1 Then $Grammatik1 = "s"
If Not ($Punkte = 1) And Not ($Punkte = -1) Then
$Grammatik2 = "e"
$Grammatik3 = "sind"
Else
$Grammatik3 = "ist"
EndIf
If Not ($f = 1) Then
$Grammatik5 = "e"
Else
$Grammatik4 = "s"
EndIf
MsgBox(0, "", $r & " Richtige" & $Grammatik1 & " und " & $f & " Falsche" & $Grammatik4 & " Ergebniss" & $Grammatik5 & ". Das " & $Grammatik3 & " " & $Punkte & " Punkt" & $Grammatik2 & ".")
Exit
EndIf
EndFunc ;==>_Ende
[/spoiler]
Hier das gesamte script mal korrigiert:
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
HotKeySet("{ESC}", "_ExitHotkey")
$punkte = 0
Global $pos = 50
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("mtVision Quiz", 550, 400, 192, 124)
$Label1 = GUICtrlCreateLabel("MTvision Quiz", 100, 20, 210, 41)
GUICtrlSetFont(-1, 25, 400, 0, "MS Sans Serif")
$Label2 = GUICtrlCreateLabel("Punkte", 16, 70, 40, 17)
$Label3 = GUICtrlCreateLabel("Label3", 64, 70, 36, 17)
$Pic1 = GUICtrlCreatePic("C:\Users\Trane\Desktop\trane.jpg", 16, 296, 209, 73, BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS))
$Pic2 = GUICtrlCreatePic("C:\Users\Trane\Desktop\main.bmp", 0, 0, 550, 385, BitOR($SS_NOTIFY, $WS_GROUP, $WS_CLIPSIBLINGS))
GUICtrlSetState(-1, $GUI_DISABLE)
$edit1 = GUICtrlCreateLabel("Wie viel % gibt Stein gegen Kreiger+6??? ", 24, 150, 364, 121)
GUICtrlSetFont(-1, 17)
$MenuItem2 = GUICtrlCreateMenu("&Datei")
$MenuItem6 = GUICtrlCreateMenuItem("Schließen", $MenuItem2)
$MenuItem3 = GUICtrlCreateMenu("&Info")
$MenuItem5 = GUICtrlCreateMenuItem("Anleitung", $MenuItem3)
$MenuItem1 = GUICtrlCreateMenu("Ü&bermich")
$MenuItem4 = GUICtrlCreateMenuItem("Trane", $MenuItem1)
$Group1 = GUICtrlCreateGroup("Antworten", 425, 30, 110, 280)
$A = GUICtrlCreateButton("A", 430, 50, 100, 41, $WS_GROUP)
$B = GUICtrlCreateButton("C", 430, 120, 100, 41, $WS_GROUP)
$C = GUICtrlCreateButton("B", 430, 190, 100, 41, $WS_GROUP)
$D = GUICtrlCreateButton("D", 430, 260, 100, 41, $WS_GROUP)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Label4 = GUICtrlCreateLabel("", 24, 100, 364, 28)
GUICtrlSetFont(-1, 15, 400, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$round = 0
$correct = 0
$save = 0
GUICtrlSetData($Label3, $punkte)
GUICtrlSetData($Label4, "Die " & $pos & " Punkte Frage ")
MsgBox(0, "MTvision Quiz", "Das Spiel beginnt nach dem Klicken auf 'OK' oder nach 5 sekunden", 5)
_setquestions()
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $A
If $correct = "a" Then
MsgBox(64, "Richtig!", "Sehr gut. Auf zur nächsten Frage!")
Global $punkte = $pos
GUICtrlSetData($Label3, $punkte)
_setQuestions()
Else
MsgBox(16, "Oops", "Leider falsch" & $save & " Punkte")
GUICtrlSetData($Label4, "Leider falsch. Du hast " & $save & " Punkte gewonnen")
GUICtrlSetData($edit1, "")
GUICtrlSetData($A, "A")
GUICtrlSetData($B, "B")
GUICtrlSetData($C, "C")
GUICtrlSetData($D, "D")
$round = 0
$correct = 0
$save = 0
MsgBox(0, "Leider falsch", "Na dann noch mal")
_setquestions()
EndIf
Case $B
If $correct = "b" Then
MsgBox(64, "Richtig!", "Sehr gut. Auf zur nächsten Frage!")
Global $punkte = $pos
GUICtrlSetData($Label3, $punkte)
_setQuestions()
Else
MsgBox(16, "Oops", "Leider falsch " & $save & " Punkte")
GUICtrlSetData($Label4, "Leider falsch. Du hast " & $save & " Punkte gewonnen")
GUICtrlSetData($edit1, "")
GUICtrlSetData($A, "A")
GUICtrlSetData($B, "B")
GUICtrlSetData($C, "C")
GUICtrlSetData($D, "D")
$round = 0
$correct = 0
$save = 0
MsgBox(0, "Neues Spiel", "Es wird ein neues Spiel begonnen")
_setquestions()
EndIf
Case $C
If $correct = "c" Then
MsgBox(64, "Richtig!", "Ja, genau. Los, nächste Frage!")
Global $punkte = $pos
GUICtrlSetData($Label3, $punkte)
_setQuestions()
Else
MsgBox(16, "Oops", "Leider falsch " & $save & " Punkte")
GUICtrlSetData($Label4, "Leider falsch. Du hast " & $save & " Punkte gewonnen")
GUICtrlSetData($edit1, "")
GUICtrlSetData($A, "A")
GUICtrlSetData($B, "B")
GUICtrlSetData($C, "C")
GUICtrlSetData($D, "D")
$round = 0
$correct = 0
$save = 0
MsgBox(0, "Leider falsch", "Na dann noch mal")
_setquestions()
EndIf
Case $D
If $correct = "d" Then
MsgBox(64, "Richtig!", "Sehr gut. Auf zur nächsten Frage!")
Global $punkte = $pos
GUICtrlSetData($Label3, $punkte)
_setQuestions()
Else
MsgBox(16, "Oops", "Leider falsch " & $save & " Punkte")
GUICtrlSetData($Label4, "Leider falsch. Du hast " & $save & " Punkte gewonnen")
GUICtrlSetData($edit1, "")
GUICtrlSetData($A, "A")
GUICtrlSetData($B, "B")
GUICtrlSetData($C, "C")
GUICtrlSetData($D, "D")
$round = 0
$correct = 0
$save = 0
MsgBox(0, "Leider falsch", "Na dann noch mal")
_setquestions()
EndIf
EndSwitch
WEnd
Func _setQuestions()
If $punkte = 500 Then
$save = 500
ElseIf $punkte = 5000 Then
$save = 5000
EndIf
$round = $round + 1
Switch $round
Case 1
Global $pos = 50
GUICtrlSetData($Label4, "Die 50 Punkte Frage")
GUICtrlSetData($edit1, "Wie viel % gibt Stein gegen Krieger+6?")
GUICtrlSetData($A, "A: 10%")
GUICtrlSetData($B, "B: 25%")
GUICtrlSetData($C, "C: 35%")
GUICtrlSetData($D, "D: 20%")
$correct = "c" ;Antwort a ist richtig
Case 2
Global $pos = 100
GUICtrlSetData($Label4, "Die 50 Punkte Frage")
GUICtrlSetData($edit1, "Beispielfrage2")
GUICtrlSetData($A, "A: Antwort A")
GUICtrlSetData($B, "B: Antwort B")
GUICtrlSetData($C, "C: Antwort C")
GUICtrlSetData($D, "D: Antwort C")
$correct = "b" ;Antwort b ist richtig
Case 3
Global $pos = 150
GUICtrlSetData($Label4, "Die 50 Punkte Frage")
GUICtrlSetData($edit1, "bla bla3")
GUICtrlSetData($A, "A: Antwort A")
GUICtrlSetData($B, "B: Antwort B")
GUICtrlSetData($C, "C: Antwort C")
GUICtrlSetData($D, "D: Antwort C")
$correct = "d" ;Antwort d ist richtig
Case 4
Global $pos = 200
GUICtrlSetData($Label4, "Die 50 Punkte Frage")
GUICtrlSetData($edit1, "bla bla4")
GUICtrlSetData($A, "A: Antwort A")
GUICtrlSetData($B, "B: Antwort B")
GUICtrlSetData($C, "C: Antwort C")
GUICtrlSetData($D, "D: Antwort C")
$correct = "d" ;Antwort d ist richtig
Case 5
Global $pos = 250
GUICtrlSetData($Label4, "Die 50 Punkte Frage")
GUICtrlSetData($edit1, "bla bla5")
GUICtrlSetData($A, "A: Antwort A")
GUICtrlSetData($B, "B: Antwort B")
GUICtrlSetData($C, "C: Antwort C")
GUICtrlSetData($D, "D: Antwort C")
$correct = "d" ;Antwort d ist richtig
Case 6
Global $pos = 300
GUICtrlSetData($Label4, "Die 50 Punkte Frage")
GUICtrlSetData($edit1, "bla bla6")
GUICtrlSetData($A, "A: Antwort A")
GUICtrlSetData($B, "B: Antwort B")
GUICtrlSetData($C, "C: Antwort C")
GUICtrlSetData($D, "D: Antwort C")
$correct = "d" ;Antwort d ist richtig
Case 7
Global $pos = 350
GUICtrlSetData($Label4, "Die 50 Punkte Frage")
GUICtrlSetData($edit1, "bla bla7")
GUICtrlSetData($A, "A: Antwort A")
GUICtrlSetData($B, "B: Antwort B")
GUICtrlSetData($C, "C: Antwort C")
GUICtrlSetData($D, "D: Antwort C")
$correct = "d" ;Antwort d ist richtig
Case 8
Global $pos = 400
GUICtrlSetData($Label4, "Die 50 Punkte Frage")
GUICtrlSetData($edit1, "bla bla8")
GUICtrlSetData($A, "A: Antwort A")
GUICtrlSetData($B, "B: Antwort B")
GUICtrlSetData($C, "C: Antwort C")
GUICtrlSetData($D, "D: Antwort C")
$correct = "d" ;Antwort d ist richtig
Case 9
Global $pos = 500
MsgBox(0, "100 Punkte", "jetzt kommen die 100 Punkte fragen")
GUICtrlSetData($Label4, "Die 100 Punkte Frage")
GUICtrlSetData($edit1, "bla bla9")
GUICtrlSetData($A, "A: Antwort A")
GUICtrlSetData($B, "B: Antwort B")
GUICtrlSetData($C, "C: Antwort C")
GUICtrlSetData($D, "D: Antwort C")
$correct = "d" ;Antwort d ist richtig
Case 10
Global $pos = 600
GUICtrlSetData($Label4, "Die 100 Punkte Frage")
GUICtrlSetData($edit1, "bla bla10")
GUICtrlSetData($A, "A: Antwort A")
GUICtrlSetData($B, "B: Antwort B")
GUICtrlSetData($C, "C: Antwort C")
GUICtrlSetData($D, "D: Antwort C")
$correct = "d" ;Antwort d ist richtig
Case 11
Global $pos = 700
GUICtrlSetData($Label4, "Die 100 Punkte Frage")
GUICtrlSetData($edit1, "bla bla11")
GUICtrlSetData($A, "A: Antwort A")
GUICtrlSetData($B, "B: Antwort B")
GUICtrlSetData($C, "C: Antwort C")
GUICtrlSetData($D, "D: Antwort C")
$correct = "d" ;Antwort d ist richtig
Case 12
Global $pos = 800
GUICtrlSetData($Label4, "Die 100 Punkte Frage")
GUICtrlSetData($edit1, "bla bla12")
GUICtrlSetData($A, "A: Antwort A")
GUICtrlSetData($B, "B: Antwort B")
GUICtrlSetData($C, "C: Antwort C")
GUICtrlSetData($D, "D: Antwort C")
$correct = "d" ;Antwort d ist richtig
Case 13
Global $pos = 900
GUICtrlSetData($Label4, "Die 100 Punkte Frage")
GUICtrlSetData($edit1, "bla bla13")
GUICtrlSetData($A, "A: Antwort A")
GUICtrlSetData($B, "B: Antwort B")
GUICtrlSetData($C, "C: Antwort C")
GUICtrlSetData($D, "D: Antwort C")
$correct = "d" ;Antwort d ist richtig
Case 14
Global $pos = 1000
GUICtrlSetData($Label4, "Die 100 Punkte Frage")
GUICtrlSetData($edit1, "bla bla14")
GUICtrlSetData($A, "A: Antwort A")
GUICtrlSetData($B, "B: Antwort B")
GUICtrlSetData($C, "C: Antwort C")
GUICtrlSetData($D, "D: Antwort C")
$correct = "d" ;Antwort d ist richtig
Case 15
Global $pos = 1100
GUICtrlSetData($Label4, "Die 100 Punkte Frage")
GUICtrlSetData($edit1, "bla bla15")
GUICtrlSetData($A, "A: Antwort A")
GUICtrlSetData($B, "B: Antwort B")
GUICtrlSetData($C, "C: Antwort C")
GUICtrlSetData($D, "D: Antwort C")
$correct = "d" ;Antwort d ist richtig
EndSwitch
EndFunc ;==>_setQuestions
Func _Exit()
MsgBox(0, "ENDE", "Du hast alle Fragen richtig beantwortet Glückwunsch :D")
Exit 0
EndFunc ;==>_Exit
Func _ExitHotkey()
Exit
EndFunc
Das nächste mal den Autoit Quellcode in dann ist der code gleich so formatiert wie in SciTE
Dein Fehler mit den Punkten war Zeile 112 statt
[autoit]$punkte = $pos
[/autoit]hattest du geschrieben
[autoit]$money = $pos
[/autoit]
Und bei deinem Script waren ziemlich viele Fehler bei denen Func und EndFunc nicht richtig verwendet wurden oder nicht an der richtigen Stelle waren.
Ich glaube du solltest dir vielleicht noch mal das Autoit Buch von Peethebee an der Stelle durchlesen wo Funktionen erklärt werden.
Edit: Ich habe jetzt noch nichts hinzugefügt das alles wieder resettet wenn alle Fragen richtig beantwortet wurden. Wenn du willst mach ichs aber noch.
So gehts: (Bei mir jedenfalls)
Global $a
Opt("GUIOneventmode", 1)
;####### Problem 1 #######
If Not IsDeclared($a) Then $a = "anything wonderfull"
;#########################
;#### Supergeniale Funktion ####
Func test($a = 2)
If $a = 0 Then MsgBox(0, "test", "a = " & $a)
If $a = 1 Then MsgBox(0, "test", "a = " & $a)
If $a = 2 Then MsgBox(0, "test", "a = " & $a)
EndFunc ;==>test
;###############################
test(1) ; <-- so funktionierts
test(2) ; <-- so auch
test(0) ; <-- so auch
test() ; <-- so auch
GUICreate("SchrottGUI", 500, 200)
GUISetState()
;###### Problem 2 #########
GUICtrlCreateButton("SuperButton", 50, 50) ; <-- so funktionierts NICHT mehr
GUICtrlSetOnEvent(-1, "test")
;##########################
While 1
Sleep(100)
WEnd
Dieses Problem kann nicht zufällig durch einen USB Stick Virus entstehen oder? Hat zufällig jemand ein XP Image für VMWare Player? Ich habe mit der Notfall CD von Cumputerbild auf meinem USB stick eine verdächtige .exe Datei gefunden die ein Autoit Icon hat (auf Win7 nicht auf der Notfall CD) würde das ding gerne mal in ner VM ausführen.
//Edit: Die Texte die man beim booten sehen kann sind übrigens gepunktet also es sieht so aus als ob sich einzelne Pixel in die Farbe der Füße des Linux Pinguins eingefärbt hätten, aber nur die Pixel die zu nem Buchstaben gehören.
Es ist zwar schon ein zwei Monate her das mein 3 Jahre alter PC sich verabschiedet hat aber ich dachte vllt. wäre mein Problem ja lösbar. (Das Problem entastand während ich ein DirectX benötigendes Spiel spielte. Das Problem war dann manchmal auch wieder verschwunden kam allerdings schlagartig zurück als ich vorhatte ein anderes DirectX Spiel zu Spielen. Kann DirectX irgendwas kaputtmachen?)
Hier ein Screenshot vom boot einer Linux Ubuntu CD mit der ich versuche Daten zu Retten was auch funktioniert bis auf die grafischen Unstimmigkeiten.
Windows startet übrigens nicht mehr (XP) ausser im abgesicherten Modus(obwohl gerade eben ging das auch nicht mehr)
Der Bildschirm funktioniert 100% noch ist am Laptop getestet und das VGA Kabel auch.
Auch Grafikkarte und RAM habe ich in einem anderen PC getestet.
Ah und ich sehe gerade das Linux beim booten abgekratzt ist.
Edit: Ups Screen vergessen. Hier ist das Bild:
[Blockierte Grafik: http://black-eyes-soft.square7.ch/Files/IMG_0196.JPG]
Sieht so aus als würde jemand willkürlich Zeichen auf dem Bildschirm verteilen.
Ich hab den Anotha ID3 Editor mal heruntergeladen aber ich komme irgendwie nicht damit klar. Wie kann man es automatisch nach den richtigen ID3 Tags suchen lassen? Kann es sein ,dass das Programm nur eine Datenbank durchsucht anhand von bereits vorhandenen ID3 Tags?
Aber ich habe selber noch was gefunden was die Songs mithilfe eines akkustischen Fingerabdrucks erkennt. (AudioID)
Mufin Player
Leider kann der immer nur 30 Songs pro "Suchvorgang" erkennen danach muss man wieder die 30 nächsten Songs markieren und erkennen lassen.
Kann man das vielleicht irgendwie automatisieren?
Sorry, aber ich glaube nicht dass das sehr sinnvoll ist...
Doch für Personen die gerne mit Sekundenkleber spielen und sich dabei aus versehen die Hände an Maus und Tastatur festkleben
Habs mal aus Fun ein wenig verbessert:
#include <GUIConstants.au3>
[/autoit] [autoit][/autoit] [autoit]Opt("GUIOnEventMode", 1)
[/autoit] [autoit][/autoit] [autoit]HotKeySet("o", "op");Hotkey zum Öffnen des CD-Laufwerks
HotKeySet("c", "cl");Hotkey zum Schließen des CD-Laufwerks
HotKeySet("e", "ex");Hotkey zum Beenden
MsgBox(0, "Hotkeys", "Press o for Open CD" & @CRLF & "Press c for Close CD" & @CRLF & "Press e for Exit") ;MsgBox vor dem Start
[/autoit] [autoit][/autoit] [autoit]$hGUI = GUICreate("CD Mover", 100, 115, -1, -1)
GUISetOnEvent($GUI_EVENT_CLOSE, "ex")
$hOpen = GUICtrlCreateButton("CD Öffnen (o)", 0, 10, 100, 25, 0)
GUICtrlSetOnEvent(-1, "op")
$hClose = GUICtrlCreateButton("CD Schließen (c)", 0, 45, 100, 25, 0)
GUICtrlSetOnEvent(-1, "cl")
$hExit = GUICtrlCreateButton("Beenden (e)", 0, 80, 100, 25, 0)
GUICtrlSetOnEvent(-1, "ex")
GUISetState()
While 1
Sleep(10)
WEnd
Func op()
$aDrive = DriveGetDrive("CDROM")
If Not IsArray($aDrive) Then
MsgBox(16, "Error", "Kein Laufwerk gefunden.")
Return
EndIf
For $i = 1 To UBound($aDrive) - 1
CDTray($aDrive[$i], "open")
Next
EndFunc ;==>op
Func cl()
$aDrive = DriveGetDrive("CDROM")
If Not IsArray($aDrive) Then
MsgBox(16, "Error", "Kein Laufwerk gefunden.")
Return
EndIf
For $i = 1 To UBound($aDrive) - 1
CDTray($aDrive[$i], "close")
Next
EndFunc ;==>cl
Func ex()
Exit
EndFunc ;==>ex
Itunes speichert ja alles in einem eigenen Ordner ab (bei mir z.B. D:\Itunes). Ich habe eine große Musiksammlung (über 1000 Songs) aber nur ca. 200 davon in Itunes. Jetzt würde ich sie dort auch gerne einfügen aber finde es sinnlos 1000 Songs doppelt auf der Festplatte zu haben. Mein Musikordner ist in etwa so Geordnet: D:\Musik\<Interpret>\<Titel>.mp3 ohne die <> Klammern natürlich. Es sah nur irgendwie besser aus . Gibt es irgendeine Möglichkeit das ITunes das einfach so übernimmt und nicht jedes Lied in den Itunes Ordner kopiert?
2. Frage
Kennt jemand ein Programm wie dieses http://www.tuneupmedia.com/index.php , welches allerdings kostenlos ist. (Also ein Programm was mp3 dateien automatisch mit den richtigen ID3 Tags versieht)?
Für Firmware 4.2.1 Gibt es irgeindein Beta Jailbreak auf https://autoit.de/www.hack2learn.org musst mal da schauen. Hoffentlich stellt er es bald wieder rein bin schon ganz gespannt.
Ok habe es jetzt manuell gestartet dann kam dies hier in der Konsole:
_FFConnect: OS: WIN_7 WIN32_NT 7600
_FFConnect: AutoIt: 3.3.6.1
_FFConnect: FF.au3: 0.6.0.1b-3
_FFConnect: IP: 127.0.0.1
_FFConnect: Port: 4242
_FFConnect: Delay: 2ms
_FFConnect: Socket: 668
_FFConnect: Browser: Mozilla/5.0 (Windows; U; Windows NT 6.1; de; rv:1.9.2.13) Gecko/20101203 Firefox/3.6.13
__FFSendJavaScripts: Sending functions to FireFox .
__FFWaitForRepl ==> MozRepl Exception: !!! [Exception... "Component is not available" nsresult: "0x80040111 (NS_ERROR_NOT_AVAILABLE)"
......... done
Alles anzeigen
Und wenn ich danach das hier ausführe:
_FFPrefSet("network.proxy.type", 1)
_FFPrefSet("network.proxy.http", $aProxy[0])
_FFPrefSet("network.proxy.http_port", $aProxy[1])
_FFPrefSet("network.proxy.socks", $aProxy[0])
_FFPrefSet("network.proxy.socks_port", $aProxy[1])
_FFPrefSet("network.proxy.socks_version", 4)
Steht in der Konsole das:
__FFSend: try{FFau3.obj=Components.classes["@mozilla.org/preferences-service;1"].getService(Components.interfaces.nsIPrefBranch);FFau3.obj.getPrefType("network.proxy.type");}catch(e){'_FFCmd_Err';};
__FFRecv: 64
__FFSend: try{FFau3.obj=Components.classes["@mozilla.org/preferences-service;1"].getService(Components.interfaces.nsIPrefBranch); FFau3.obj.getPrefType("network.proxy.type");}catch(e){'_FFCmd_Err';};
__FFRecv: 64
__FFSend: try{FFau3.obj.getIntPref("network.proxy.type");}catch(e){'_FFCmd_Err';};
__FFRecv: 1
__FFSend: try{FFau3.obj.setIntPref("network.proxy.type",1);}catch(e){'_FFCmd_Err';};
__FFRecv:
__FFSend: try{FFau3.obj=Components.classes["@mozilla.org/preferences-service;1"].getService(Components.interfaces.nsIPrefBranch); FFau3.obj.getPrefType("network.proxy.type");}catch(e){'_FFCmd_Err';};
__FFRecv: 64
__FFSend: try{FFau3.obj.getIntPref("network.proxy.type");}catch(e){'_FFCmd_Err';};
__FFRecv: 1
__FFSend: try{FFau3.obj=Components.classes["@mozilla.org/preferences-service;1"].getService(Components.interfaces.nsIPrefBranch);FFau3.obj.getPrefType("network.proxy.http");}catch(e){'_FFCmd_Err';};
__FFRecv: 32
__FFSend: try{FFau3.obj=Components.classes["@mozilla.org/preferences-service;1"].getService(Components.interfaces.nsIPrefBranch); FFau3.obj.getPrefType("network.proxy.http");}catch(e){'_FFCmd_Err';};
__FFRecv: 32
__FFSend: try{FFau3.obj.getCharPref("network.proxy.http");}catch(e){'_FFCmd_Err';};
__FFRecv: 211.137.73.116
__FFSend: try{FFau3.obj.setCharPref("network.proxy.http","211.137.73.116");}catch(e){'_FFCmd_Err';};
__FFRecv:
__FFSend: try{FFau3.obj=Components.classes["@mozilla.org/preferences-service;1"].getService(Components.interfaces.nsIPrefBranch); FFau3.obj.getPrefType("network.proxy.http");}catch(e){'_FFCmd_Err';};
__FFRecv: 32
__FFSend: try{FFau3.obj.getCharPref("network.proxy.http");}catch(e){'_FFCmd_Err';};
__FFRecv: 211.137.73.116
__FFSend: try{FFau3.obj=Components.classes["@mozilla.org/preferences-service;1"].getService(Components.interfaces.nsIPrefBranch);FFau3.obj.getPrefType("network.proxy.http_port");}catch(e){'_FFCmd_Err';};
__FFRecv: 64
__FFSend: try{FFau3.obj=Components.classes["@mozilla.org/preferences-service;1"].getService(Components.interfaces.nsIPrefBranch); FFau3.obj.getPrefType("network.proxy.http_port");}catch(e){'_FFCmd_Err';};
__FFRecv: 64
__FFSend: try{FFau3.obj.getIntPref("network.proxy.http_port");}catch(e){'_FFCmd_Err';};
__FFRecv: 0
__FFSend: try{FFau3.obj=Components.classes["@mozilla.org/preferences-service;1"].getService(Components.interfaces.nsIPrefBranch);FFau3.obj.getPrefType("network.proxy.socks");}catch(e){'_FFCmd_Err';};
_FFPrefSet ==> Invalid data type: (int) $vValue: 80
__FFRecv: 32
__FFSend: try{FFau3.obj=Components.classes["@mozilla.org/preferences-service;1"].getService(Components.interfaces.nsIPrefBranch); FFau3.obj.getPrefType("network.proxy.socks");}catch(e){'_FFCmd_Err';};
__FFRecv: 32
__FFSend: try{FFau3.obj.getCharPref("network.proxy.socks");}catch(e){'_FFCmd_Err';};
__FFRecv: 211.137.73.116
__FFSend: try{FFau3.obj.setCharPref("network.proxy.socks","211.137.73.116");}catch(e){'_FFCmd_Err';};
__FFRecv:
__FFSend: try{FFau3.obj=Components.classes["@mozilla.org/preferences-service;1"].getService(Components.interfaces.nsIPrefBranch); FFau3.obj.getPrefType("network.proxy.socks");}catch(e){'_FFCmd_Err';};
__FFRecv: 32
__FFSend: try{FFau3.obj.getCharPref("network.proxy.socks");}catch(e){'_FFCmd_Err';};
__FFRecv: 211.137.73.116
__FFSend: try{FFau3.obj=Components.classes["@mozilla.org/preferences-service;1"].getService(Components.interfaces.nsIPrefBranch);FFau3.obj.getPrefType("network.proxy.socks_port");}catch(e){'_FFCmd_Err';};
__FFRecv: 64
__FFSend: try{FFau3.obj=Components.classes["@mozilla.org/preferences-service;1"].getService(Components.interfaces.nsIPrefBranch); FFau3.obj.getPrefType("network.proxy.socks_port");}catch(e){'_FFCmd_Err';};
__FFRecv: 64
__FFSend: try{FFau3.obj.getIntPref("network.proxy.socks_port");}catch(e){'_FFCmd_Err';};
__FFRecv: 0
__FFSend: try{FFau3.obj=Components.classes["@mozilla.org/preferences-service;1"].getService(Components.interfaces.nsIPrefBranch);FFau3.obj.getPrefType("network.proxy.socks_version");}catch(e){'_FFCmd_Err';};
_FFPrefSet ==> Invalid data type: (int) $vValue: 80
__FFRecv: 64
__FFSend: try{FFau3.obj=Components.classes["@mozilla.org/preferences-service;1"].getService(Components.interfaces.nsIPrefBranch); FFau3.obj.getPrefType("network.proxy.socks_version");}catch(e){'_FFCmd_Err';};
__FFRecv: 64
__FFSend: try{FFau3.obj.getIntPref("network.proxy.socks_version");}catch(e){'_FFCmd_Err';};
__FFRecv: 4
__FFSend: try{FFau3.obj.setIntPref("network.proxy.socks_version",4);}catch(e){'_FFCmd_Err';};
__FFRecv:
__FFSend: try{FFau3.obj=Components.classes["@mozilla.org/preferences-service;1"].getService(Components.interfaces.nsIPrefBranch); FFau3.obj.getPrefType("network.proxy.socks_version");}catch(e){'_FFCmd_Err';};
__FFRecv: 64
__FFSend: try{FFau3.obj.getIntPref("network.proxy.socks_version");}catch(e){'_FFCmd_Err';};
__FFRecv: 4
Alles anzeigen
Das stellt normal die Proxy Einstellungen um was auch gestern noch ging aber jetzt geht es nicht mehr. Ich habe seitdem keine Updates von Add-Ons oder Firefox selber gemacht und auch am Quellcode hat sich seitdem nichts geändert. Ich habe schon Firefox deinstalliert die übgrig gebliebenen Dateien gelöscht und von Hand die Registry nach Schlüsseln von Firefox durchsucht und die die ich gefunden habe hab ich dann gelöscht. Dann habe ich Firefox 3.6 neu installiert und MozRepl auch und trotzdem ging es nicht.
Edit: Ich hab mal in den Einstellungen von Firefox nachgeschaut ob der Proxy eingestellt wird und er wird eingestellt allerdings nur die ip nicht der port.
Edit 2: Das mit _FFConnect ist gelöst. Habe es so gemacht wie Thorsten Willert in seinem Beispiel mit _FFConnect(Default,Default,3000)
Jetzt die letzte Frage:
Was muss ich hier ändern wenn dieser error kommt:
Ja ok so klug war ich dann doch wieder das ich dieses Add-On habe. Es ging ja gestern abend noch. Eine Frage wie kann man MozRepl starten?
Ich habe gerade bei der FF.au3 ein Problem:
Bei _FFConnect kommt immer ein _FFIsConnected Error und eine MsgBox mit Socket Error: -1
In der SciTE Konsole unten steht dann dies hier:
_FFIsConnected ==> Socket Error: -1
_FFConnect: OS: WIN_7 WIN32_NT 7600
_FFConnect: AutoIt: 3.3.6.1
_FFConnect: FF.au3: 0.6.0.1b-3
_FFConnect: IP: 127.0.0.1
_FFConnect: Port: 4242
_FFConnect: Delay: 2ms
_FFConnect ==> Timeout: TCPConnect Error: 10061
_FFConnect ==> General Error: Timeout: Can not connect to FireFox/MozRepl on: 127.0.0.1:4242
__FFSend ==> Socket Error
Was kann man dagegen machen?
Betriebsystem: Win7 x64 (Skript ist aber x86 Kompiliert)
Du kannst Skripte direkt in Skype ausführen? Das Addon hätte ich dann auch gerne.
Skype hat eine Konsole?!
Das war wohl die Müdigkeit gestern ich meinte natürlich SciTE. Ich Editiere es mal schnell.
Das Problem hatte ich auch schon aber das Script ist als 32Bit Kompiliert.
Wenn man es direkt in SciTE ausführt steht das in der Konsole unten:
Ich hab gerade ein kleines Problem mit der FF.au3. Bei der Func _FFIsConnected bekomme ich immer @error 2 was einen SocketError -1 bedeutet. Da kommt immer eine MsgBox mit SocketError -1 als Text. Vorhin ging es noch und jetzt geht es nicht mehr obwohl ich nichts verändert habe. Woran kann das liegen? Wie kann man das beseitigen?
ich sitze schon dran
Und ich bin fertig. Ist jetzt aber eine Silent Version. Ohne GUI aber schon mit Proxy.txt wo ein paar Proxys von hidemyass.com drinstehen.
Einfach starten. Funktioniert auch bei bereits laufendem Firefox. Die Proxy.txt muss im selben Ordner sein wo das Script ist. (oder die exe wenn man die benutzt) Funktioniert ohne das man etwas merkt. Ausser bei der MsgBox die jedesmal kommt wenn ein neuer Proxy eingestellt wurde. Überprüft den gerade genutzten Proxy alle 60 sekunden.