Beiträge von Carsten

Zitat von daJu

...
Mit ClipPut("Diesen Text möchte ich senden") und Send("^{STRG}") geb ich dir hoffentlich nen kleinen Denkanstoss

Das habe ich auch schon gemacht, geht wesentlich schneller als Send. Doch bin ich damit schon anderen Anwendungen in die Quere gekommen.
(Vielleicht daher: Inhalt Zwischenablage vorher wegsichern, dann o.g. Umsetzung, und Zwischenablage wieder mit altem Inhalt füllen. Geht nur nicht wenn Zwischenablage eine Grafik, oder 'aufwändige' Daten sind - sprich nur bei unformatiertem Text)

Aber den Einfügen-Befehl "^{STRG}" kenne ich nicht, ich denke diese Möglichkeiten sind korrekt:
* Send("^c") =(Strg-C) oder
* Send("{CTRLDOWN}c{CTRLUP}") =(Strg-C) oder
* Send("+{INSERT}") oder auch {INS} =(Shift-Einfügen)

Grüße
Carsten

Hallo,
warum machst Du dir nicht ein kleines eigenes Musikabspiel-Programm?

[autoit]

SoundSetWaveVolume ( 100 )
SoundPlay ( "musiklied.mp3")
sleep(10000) ; nur zum Testen: abbruch Musik, wenn Programm beendet

[/autoit]

Schau mal unter _SoundPause, _SoundStop, _SoundSeek, _SoundOpen
in der Hilfe - da gibt es noch mehr Möglichkeiten.

Grüße
Carsten

Ein Prozess schreibt in die Datenbank und der zweite liest + löscht.
Wenn nix da ist, hat der zweite auch nichts zu tun.

Mit der AutoIt-Hilfe und der Beschreibung hier im Forum ist das gar nicht so schwer.

Grüße
Carsten

Hallo,
ich habe mal wieder die neue AutoIt-Version installiert und bereue es jetzt gemacht zu haben, da ich momentan keine Zeit für große AutoIt-Veränderungen habe.....

Leider sind einige(?) Befehle verändert worden und mein Programm läuft nicht mehr.....
Wie erkenne ich jetzt welche Zeile in der ListView markiert, d.h. aktiv ist?
_GUICtrlListViewGetSelectedIndices() gibt es nicht mehr......

Vielen Dank für einen kurzen Hinweis.
Carsten

Ok.... Danke für die Info - um so besser

Jedenfalls funktioniert der SMS-Dienst mit diesen Zeilen perfekt:

[autoit]

$text = "Ich bin ein Test, aber möchte trotzdem gelesen werden!"
$url = "http://gateway.????.de/send_sms.php" ; Darf ich das hier veröffentlichen?
$nummer = "004911122222"
$gw = 10 ; = SMS-Typ, unterschiedliche Funktionen, unterschiedlicher Preis
$identnr = "xxxxx" ; Zugangsdaten
$pw = "xxxxx" ; Zugangsdaten
$absender = "Carsten" ; oder auch Rufnummer

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

$zeile = "?id="&$identnr&"&pass="&$pw&"&text="&$text&"&nummer="&$nummer&"&gateway="&$gw&"&absender="&$absender

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

;Encoden
$Message = _INetExplorerCapable($zeile) ; Umwandeln in HTML-Zeichensatz

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

;Senden:
$result = _INetGetSource($url&$Message)

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

MsgBox(4096,"test",$result)
; Mit dem Ergebnis ist sofort eine Auswertung möglich:
;$result = err = 0 = SMS wurde angenommen
;$result = err=-3 = Guthaben leer
; etc.....

[/autoit]

Ich konnte noch keinen Dauertest durchführen, aber meine bisherige Erfahrung ist wirklich gut und die Ansteuerung ist dank dieses Forums auch soooooo einfach. Darf ich hier den URL-Gateway-Namen veröffentlichen?

Nachteil bei diesem Anbieter (der sich an Geschäftskunden richtet): Prepaid geht erst ab 50,- Euro (netto, d.h.+ MwSt) los.
Kosten momentan pro SMS: 7,5 Cent wenn Absender veränderbar (was ich mir wünsche) / 4 Cent wenn die Nr. des SMS-Anbieters sichtbar.

Viele Grüße
Carsten

Ok, funktioniert problemlos mit dem IE.

Ich wollte halt von hinten ins Auge treffen
und mich in FF.au3 einarbeiten.

Dankeschön

BugFix
Das mit der Mail an sich selbst verschicken und dann der Weiterleitung per SMS über den Mail-Account (z.B. bei bestimmtem Absender) ist auch nicht schlecht und würde mein Problem momentan sogar lösen. Aber wenn ich direkten SMS-Service habe, könnte ich eine SMS auch mal an andere verschicken.

wieso kann ich nicht die ganzen Infos in der URL mit angeben? (siehe FFOpenURL-Befehle in Beispiel)
Eine direkte Eingabe in Firefox funktioniert......

Gibt es eine alternative Technik?

Danke, Grüße, Carsten

P.S: Kennt jemand einen Befehl, um Text in HTML-Text umzuwandeln?

[autoit]

#include "FF.au3"
;Opt("TrayIconDebug", 0) ;0=no info, 1=debug line info

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

$text = "Hallo_TEST"
$url = "http://gateway.xxxxxx.de/send_sms.php"
$nummer = "00491112222222"
$gw = 20
$identnr = "1234567890"
$pw = "Fragezeichen"
$absender = "von_mir"
$zeile = $url&"?id="&$identnr&"&pass="&$pw&"&text="&$text&"&nummer="&$nummer&"&gateway="&$gw&"&absender="&$absender

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

$Socket = _FFStart()
If $Socket <> -1 Then

_FFOpenURL($Socket,"http://www.autoitscript.com/") ;// FUNKTIONIERT
_FFOpenURL($Socket,$zeile) ;// geht nicht
;sleep(5000)

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

_FFAction($Socket, "alert", "FireFox ist nun gestartet!")
Sleep(3000)

;??? geht nicht: _FFClose($Socket)
_FFQuit($Socket)
Else
MsgBox(16, "Error", "Connection error")
EndIf
Exit

[/autoit]

Hallo,
ich habe auch das Problem mit "100", welches ich bisher nicht lösen konnte.
Ich hoffe es ist ok, wenn ich hier weiter schreibe, aber es passt halt so gut hier her.
(AutoIt-Version 3.2.10.0 = aktuell)

Benutze ich die normale FF.au3 (V0.2.7.8beta) bekomme ich das Timeout-Problem (siehe oben, Fehler "100").
Benutze ich die empfohlene Beta-Version (V0.2.8.7beta) bekomme ich folgende Fehlermeldung:

Spoiler anzeigen

C:\PROGRA~1\AutoIt3\Include\FF.au3(220,59) : ERROR: syntax error
Case $sActionL = "presentationmode" OR $sActionL = "pm" $sOptionL
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\PROGRA~1\AutoIt3\Include\FF.au3(1207,38) : WARNING: $sMode: possibly used before declaration.
Return _FFGetLength($Socket, $sMode =
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^
C:\PROGRA~1\AutoIt3\Include\FF.au3(1608,24) : ERROR: syntax error
$sJavaScript[2] &= '}')
~~~~~~~~~~~~~~~~~~~~~~^
C:\PROGRA~1\AutoIt3\Include\FF.au3(1207,38) : ERROR: $sMode: undeclared global variable.
Return _FFGetLength($Socket, $sMode =
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^

Habe ich was übersehen?

Danke
Carsten

Nachtrag:
Ok, habe es selbst gelöst, indem ich in der aktuellen (NICHT Beta-Version) folgendes geändert habe:
-----------------
Func _FFLoadWait(ByRef $Socket, $iDelay = 0, $iTimeOut = 45000)
...
local $z34 = chr(34)
...
If _FFSetGet($Socket, "document.getElementById('statusbar-icon').value") = $z34&100&$z34 Then Return
-----------------
Vielleicht hilft es ja jemandem.

Vielen Dank, das sind gute Hinweise.

Oscar
Na ja, ich wollte ja deren Programm zum SMS-Versand verwenden - und nur eine einfachere Maske drüber setzen. Aber ok.....

Ich habe einen neuen Dienst, bei dem ich (gegen Kosten) über eine http-Schnittstelle SMS versenden kann.
Das sieht auch sehr einfach aus und mit der Firefox-Automatisation wohl auch eine sehr einfache und sichere Möglichkeit.

Jetzt suche ich allerdings nach der Möglichkeit Text in html-Text umzuwandeln (wie bei PHP der Befehl 'urlencode($Text)'). Ich glaube ich habe schon mal was gesehen, werde aber leider nicht fündig.

Grüße
Carsten

Hallo zusammen,
ich habe 2 Fragen, die gewissermaßen zusammenhängen:
1) Ich kann hier leider nicht nach SMS suchen, weil wohl 3 Zeichen zu wenig sind. Ich habe nur einen Beitrag gefunden und dieser hilft mir nicht mehr richtig weiter [ Siehe post26393: SMS Sender - 100%ig kosteloses SMS Senden! ) ]

2) Ich würde mir gerne bestimmte Dinge per SMS auf das Handy zukommen lassen und bin auch bereit für die SMS zu bezahlen. Ich arbeite bisher mit Your-SMS.com. [ http://www.your-sms.com/ ] Dort gibt es die Möglichkeit die SMS im Internet zu verschicken, aber es gibt auch ein extra (Stand-alone)-Programm. Dieses Programm ist aber leider nicht so einfach mit AutoIt ansteuerbar, weil - ich es nicht blicke - oder weil es, absichtlich oder unabsichtlich, kompliziert programmiert wurde.

Da ich an meinem PC eine Tastatursperre habe, wenn ich nicht anwesend bin, sind Tastatureingaben mit 'send' nicht möglich. Eine direkte Ansteuerung mit Controlsend wäre möglich. Dies habe ich leider für oben erwähntes Programm nicht hin bekommen.

Kennt jemand eine andere zuverlässige Möglichkeit?
Oder soll ich das EXE-Programm zur Verfügung stellen, ob jemand die entsprechenden Control-Infos raus bekommt?

Vielen Dank
viele Grüße
Carsten

Hallo zusammen,

ich habe den Befehl _StringProper() verwendet um etwas NUR GROSSGESCHRIEBENES in Groß-/Klein umzuwandeln, hatte aber komische Ergebnisse mit den deutschen Umlauten.

Der Befehl beinhaltet diese kleine Funktion und wenn dort noch die dt. Umlaute ergänzt werden, funktioniert es sehr gut.

Spoiler anzeigen

; Helper functions
Func __CharacterIsApha($s_Str)
Local $a_Alpha = "abcdefghijklmnopqrstuvwxyzäöüß"
Return (StringInStr($a_Alpha, $s_Str))
EndFunc ;==>__CharacterIsApha

Kann das irgendwie fest integriert werden?

Viele Grüße
Carsten

Hallo - und noch ein gutes neues Jahr an alle,

weiß jemand, ob es möglich ist eine Spalte in einer ListView auch mehrzeilig zu benutzen?

So wie bei einem Knopf:
$BS_MULTILINE
Wraps the button text to multiple lines if the text string is too long to fit on a single line in the button rectangle.

Vielen Dank,
viele Grüße
Carsten

Einzige Idee, die mir dazu einfällt, ist ein Programm zu suchen, welches die Audio-Ausgabe mit einem Equalizer visualisiert (bewegende Balken) und dieses dann ggf. versteckt zu überwachen (Pixelüberwachung?).

Aber ob das sicher läuft und den Aufwand wert ist ?????

Vorschlag:
Wörter ab 3 werden indiziert und wir erstellen eine Liste, welche 3stelligen Wörter NICHT zu indizieren sind:

der, die, das
wer, wie, was
von, bei, auf
usw.

Hallo,
ich suche gerade einen Beitrag, den ich schon mal gelesen habe. Dabei ging es um die Integration von DOS.
Aber mit dem Suchwort 'DOS' kommt gar nix.....

Mache ich was falsch?

Auch ich wünsche allen die Erfüllung besinnlicher Tage und einen guten Rutsch in 2008

Carsten

P.S.: und denkt daran:
Weihnachten ist mehr als die Summe seiner Tage

Hallo,
ich finde die Links für stabile + Beta-Version AutoIt nicht mehr..... gibt es die noch hier im Forum???

Grüsse
Carsten

.... und ich auch....
Daran versuche ich mich schon den ganzen Mittag ....
Wie toll doch das Forum hier ist....

Hier noch den Code welchen ich benutzt habe, konnte ihn oben nicht einfügen, weil die Nachricht sonst die erlaubten 10000 Zeichen überschritten hätte.
(hatte zumindest so eine Fehlermeldung)

Spoiler anzeigen

;____________________________________________________________________
; Original program by Ejoc ;
; Improved by Adam1213 (autoit 3.2 compatiblity + improved labels ;
;____________________________________________________________________

#include

;_________________ SETUP_____________________________________
Local $joy,$coor,$h,$s,$msg

$joy = _JoyInit()

dim $labels_text[8]=['X', 'Y', 'Z', 'R', 'U', 'V', 'POV', 'Buttons']
dim $labels_no=UBound($labels_text)
dim $labels[$labels_no]
dim $labels_value[$labels_no]
;__________ CONFIG ____________________________________________
;---------- Find the max length of the longest label --------------
$label_len=0
for $text in $labels_text
$len=stringlen($text)
if $len>$label_len then
$label_len=$len
endif
next
$label_len*=6
;_____________ GUI _______________________________________________
GUICreate('Joystick Test', 200, 200)
GUICtrlCreateLabel('Joystick', 40, 20, 100, 20)

for $i=0 to $labels_no-1
GuiCtrlCreatelabel($labels_text[$i]&':', 10, 60+$i*12, $label_len, 12)
$labels[$i]=GuiCtrlCreatelabel('', 10+$label_len, 60+$i*12, 70, 12)
$labels_value[$i]=''
next
GUISetState()
;_____________________________________________________________________

while 1
$coord=_GetJoy($joy,0)
for $i=0 to UBound($coord)-1
if $coord[$i]<>$labels_value[$i] then
GUICtrlSetData($labels[$i], $coord[$i])
$labels_value[$i]=$coord[$i]
endif
next
sleep(10)
$msg =GUIGetMSG()
if $msg = $GUI_EVENT_CLOSE Then Exitloop
WEnd

$lpJoy=0 ; Joyclose

;======================================
; _JoyInit()
;======================================
Func _JoyInit()
Local $joy
Global $JOYINFOEX_struct = "dword[13]"

$joy=DllStructCreate($JOYINFOEX_struct)
if @error Then Return 0
DllStructSetData($joy, 1, DllStructGetSize($joy), 1);dwSize = sizeof(struct)
DllStructSetData($joy, 1, 255, 2) ;dwFlags = GetAll
return $joy
EndFunc

;======================================
; _GetJoy($lpJoy,$iJoy)
; $lpJoy Return from _JoyInit()
; $iJoy Joystick # 0-15
; Return Array containing X-Pos, Y-Pos, Z-Pos, R-Pos, U-Pos, V-Pos,POV
; Buttons down
;
; *POV This is a digital game pad, not analog joystick
; 65535 = Not pressed
; 0 = U
; 4500 = UR
; 9000 = R
; Goes around clockwise increasing 4500 for each position
;======================================
Func _GetJoy($lpJoy,$iJoy)
Local $coor,$ret

Dim $coor[8]
DllCall("Winmm.dll","int","joyGetPosEx", _
"int",$iJoy, _
"ptr",DllStructGetPtr($lpJoy))

if Not @error Then
$coor[0] = DllStructGetData($lpJoy,1,3)
$coor[1] = DllStructGetData($lpJoy,1,4)
$coor[2] = DllStructGetData($lpJoy,1,5)
$coor[3] = DllStructGetData($lpJoy,1,6)
$coor[4] = DllStructGetData($lpJoy,1,7)
$coor[5] = DllStructGetData($lpJoy,1,8)
$coor[6] = DllStructGetData($lpJoy,1,11)
$coor[7] = DllStructGetData($lpJoy,1,9)
EndIf

return $coor
EndFunc

Edit peethebee: Limit auf 100.000 Zeichen gesetzt.

Hallo,
ich bin etwas weiter gekommen und wärme daher dieses ältere Thema wieder auf.......

Im englischen Forum gibt es tatsächlich 2 Game-Port-UDFs, eine funktioniert bei mir:
http://www.autoitscript.com/forum/index.…94&#entry323294

Ich habe es mit einem alten Joystick probiert - das AutoIt-Tool zeigt die Werte wunderschön an.
Um einen Schalter daran zu montieren habe ich das Kabel abgeschnitten (war ein alter.....) und
die entsprechenden Drähte ermittelt - Schaltererkennung geht nicht mehr.....

Ich zweifle inzwischen, ob der Gameport für eine Nutzung das Richtige ist.......
Es ist so:
4 Drähte sind für die Drehregler (Widerstände), 3 sind für die Schalter (erkennt man gut, wenn man das Ding aufschraubt und schaut wo sie hin führen).
Aber auch die Drehregler-Kabel müssen angeschlossen werden, damit die Schalterdrähte reagieren.
Also meine Lösung:
die 4 Drähte werden alle zusammengeschlossen, d.h. kein Widerstand (Vollausschlag) - aber nicht wichtig.
Die anderen 3 Drähte geben dann die Schalterstellung mit 0 1 2 3 an (je nachdem welche Drähte zusammengeschaltet werden)
Das geht wirklich ganz einfach - ohne irgendwelche Technik.
Aber wenn ich das Kabel aus dem PC ziehe, bleiben die letzten Werte erhalten -
ob das für einen Schalter ausreicht, der erkennt, ob eine Sicherheitstüre offen ist, ist wohl mehr als fraglich *grins*

Aber ich habe keine Sicherheitstüre, daher werde ich das ganze mal installieren und kann dann einen Langzeitbericht geben.
Die Vorversuche heute waren nicht schlecht.

Viele Grüße
Carsten