Beiträge von Dr.Galvany

jetzt aber wieder was, wo ich einfach nicht kapiere, oder ist es ein bug???
das müsste doch gehen?
wenn " PixelSearch" was findet geht es.
wenn " PixelSearch" nichts findet, schliesst sich das script einfach mit einen arry fehler
aber es müsste doch dann den "ExitLoop" ausführen.

While 1
	Sleep(500)
	$coord = PixelSearch(0, 0, 25, 200, 0xF6CCCC)
	If Not @error Then
		MsgBox(0,"Adresse","X = " & $coord[0] & @LF & "Y = " & $coord[1])
	Else
		ExitLoop
	EndIf
WEnd

ja so, kann es nicht gehen!

$a = WinExists("Neuer Arbeitsbereich 1 - Desktop 1 - TradeSignal enterprise")




While 1
If $a = 1 Then


 	Send("{F5}")

	Sleep(5000)
Else	

	 ExitLoop
EndIf	 

WEnd

Exit

sondern so muss es dann sein:

While 1
$a = WinExists("Neuer Arbeitsbereich 1 - Desktop 1 - TradeSignal enterprise")


If $a = 1 Then


 	Send("{F5}")

	Sleep(5000)
Else	

	 ExitLoop
EndIf	 

WEnd

Exit

jaja, jetzt aber ein atom lol!!! [Blockierte Grafik: http://michischmitt.de/Maxthon/B-plugin/smilies/16.gif]

da ich alles im Virtuellen PC (VMWare) erstelle und Teste, liegt hier der fehler!! [Blockierte Grafik: http://michischmitt.de/Maxthon/B-plugin/smilies/28.gif] [Blockierte Grafik: http://michischmitt.de/Maxthon/B-plugin/smilies/29.gif]

beim test auf den normalen rechner geht es wunderbar.

die geschwintigkeits werte hatte ich auch getestet, aber es lag ja an VMWare [Blockierte Grafik: http://michischmitt.de/Maxthon/B-plugin/smilies/14.gif]

Eddy_Erpel
Danke für dein test [Blockierte Grafik: http://michischmitt.de/Maxthon/B-plugin/smilies/22.gif]

sorry, aber von script ist das alles io.
da hast du wohl selber eine fehler irgend wo sitzen

hi, ich wollte mal einwenig den Mauscursor bewegen lassen
wenn ich jetzt das so mache:

MouseMove(65, 80,0)

bewegt es sich nicht sichtbar,ist aber an der gewünschten stelle!!!

wie kann man es anstellen, das der Mauscursor sich von geisterhand bewegt???

wenn man noch nicht im windows angemeldet ist, bewegt es sich

schaue mal nach, wie der prozess von programm "tradesignal" heißt.
ich nehme mal an er heist "tradesignal.exe" und dadurch kann man das script so erweitern

$a = WinExists("Neuer Arbeitsbereich 1 - Desktop 1 - TradeSignal enterprise")


While $a = 1
If ProcessExists("tradesignal.exe") Then	
 	Send("{F5}")
	Sleep(5000)
Else
	ExitLoop
EndIf
WEnd

Exit

ja keinen rang und keine sterne lol

und was ist mit meinen?

man leichtesten ist es mit "SciTE" in kompi mit "ResHacker"

nach der installation von "SciTE" musst du den "ResHacker" in das verzeichnis "..\AutoIt3\SciTE\CompileAU3" kopieren.

wenn du jetzt auf einer "au3" datei mit der rechten maus klickst, kannst du hier auswählen "Compiele with Options".
da kannst du ganz einfach ein anderes tryIcon mit einbinden

ich hoffe du meinst auch das TryIcon.

hehe, mano das steht so ja in der help line und ich will das anders abfragen

danke es geht

jaja, manchmal sehe ich den wald vor lauter bäumen nicht

While 1
	Sleep(500)
	$coord = PixelSearch(0, 0, 25, 200, 0xF6CCCC)
	If Not @error Then
	Else
		ExitLoop
	EndIf
WEnd

bitte schön
hab ich doch gern gemacht :party4:

; ----------------------------------------------------------------------------
;
; AutoIt Version: 3.1.0
; Author:         A.N.Other <myemail@nowhere.com>
;
; Script Function:
;	Template AutoIt script.
;
; ----------------------------------------------------------------------------




;Konstanten und Variablen für die GUI
#include <GUIConstants.au3>


;Fenster erstellen
GUICreate("System-Informationen", 300, 180)
GUISetBkColor("0xFFFFCA")
GUISetFont(9, 400, 0, "Arial")
$CloseButton = GUICtrlCreateButton("Schließen", 100, 140, 100, 20)


;Rechner-Name
GUICtrlCreateLabel("Computer Name:", 10, 10, 150, 20)
GUICtrlCreateLabel(@ComputerName, 140, 10, 280, 20)
;angemeldeter Benutzer
GUICtrlCreateLabel("Benutzer:", 10, 30, 150, 20)
GUICtrlCreateLabel(@UserName, 140, 30, 280, 20)
;Betriebssystem
GUICtrlCreateLabel("Betriebssystem:", 10, 50, 150, 20)
GUICtrlCreateLabel(StringReplace(@OSVersion, "WIN_", "Windows ", 0, 0), 140, 50, 280, 20)
;Service Pack
GUICtrlCreateLabel("Service Pack:", 10, 70, 150, 20)
GUICtrlCreateLabel(@OSServicePack, 140, 70, 280, 20)
;IP-Adresse
GUICtrlCreateLabel("IP-Adresse:", 10, 90, 150, 20)
GUICtrlCreateLabel(@IPAddress1, 140, 90, 280, 20)


opt("TrayMenuMode", 1)
$info = TrayCreateItem ("System-Informationen")
$exit = TrayCreateItem ("Exit")




While 1
	$msg = TrayGetMsg ()
	Select
		Case $msg = $info
			;Fenster aufrufen
			info()
		Case $msg = $exit
			Exit
	EndSelect
WEnd




Func info()
While 1
	GUISetState()
	$msg = GUIGetMsg()
	Select
		Case $msg = $GUI_EVENT_CLOSE
			Exit
		Case $msg = $CloseButton
			Exit
	EndSelect
WEnd
EndFunc

hi leute, hänge hier und weis net warum. lol

While 1
	Sleep(500)
	$coord = PixelSearch(0, 0, 25, 200, 0xF6CCCC)
	If $coord[0] = "" Then
		Exit
	EndIf
WEnd

so wie es aussieht, kann ich "$coord[0]" nicht abfragen.
so lange die farbe da ist, geht es alles.
wenn die farbe nimmer da ist schliest sich das script einfach mit fehler (Subscript used with non-Array variable.)
warum ist das so?

zu 1:

While 1
If WinActive("Untitled -") Then
	MsgBox(0, "", "Window was active")
EndIf
WEnd

zu 2:
ist nicht sobalt das fenster nicht mehr aktiv ist, ganz normal die tasten für den rest wieder frei???

alles klar, danke

hehe, danke so geht es

aber das geht ja auch und da ich es von rechts wollte kam ich nicht klar

$lol1 = "123|hallo"
			$lol2 = StringInStr($lol1,"|",0,1)
			$result = StringLeft($lol1, $lol2)
			MsgBox(16, "inhalt", $result)

also wenn ich es von links auswerden will geht es super

aber ich muss es von rechts auswerden lasen und da komm ich nicht klar.
laut hilfe sollte es doch so gehen, aber wo ist da mein denkfehler?

$location = StringInStr("123|hallo", "|", 0, -1)
MsgBox(0, "Search result:", $location)

ach ja, wieso wird der au3 code nimmer farbig dargestellt?

Zitat

Original von bernd670
Hallo,

ich mache sowas immer mit dem Befehl AT. Damit ist es möglich Zeitgesteuert, auch auf entfernten Rechnern, Befehle auszuführen!

Ich weiß jetzt nur nicht ob es den Befehl auch auf Win98 Systemen gibt. Auf NT, 2000, XP und 2003 läuft er ohne Probleme!

Mfg Bernd

hallo, muss man auf den zu steuernten rechner noch was aktivieren vorher?
wenn ich "at \\markus 09:50 c:\hallo.exe" eingebe, kommt "Der Dienst ist nicht gestartet worden"
es sind beides windows xp systeme

Zitat

Original von muh_kuh
hallo
ich nehme an du hast ein adminzugang zu den Rechnern
http://www.sysinternals.com/Utilities/PsExec.html

ja damit geht es
"psexec -i \\markus c:\hallo.exe"

danke leute

ja es ist immer ein " | " dazwischen

hallo,
wenn ich zb. in meiner zwischenablage ( ClipPut ) das hier stehen habe "123 Hallo" und wenn ich sie dann wieder auslese ( ClipGet() ) kommt ja das gleiche.
jetzt meine frage, wie könnte ich es anstellen, das ich nur das "Hallo" bekomme?

die zahlen sind nicht immer nur drei stück, es können auch mal 5 oder 7 sein.
das gleiche gild für das "hallo", das kann auch mal länger sein "hallo du".
wenn es immer gleich wäre, hätte ich das mit ( Stringxxx) lösen können.

so ausgeschlafen geht es gleich wieder auwärts

While 1
$Aktiv_ist = WinGetTitle("", "")
blablabla
WinActivate($Aktiv_ist,"")
WEnd

so das geht, da ich in meinen script eine schleife habe