Beiträge von leertaste

Hallo zusammen,

seit mehreren Tagen brüte ich über folgenden Problem.
In Excel kann man mit dem Button "Suchen...|Suchen nach: * eingeben|Alle suchen" ganz schnell und einfach die Zelladresse aller gefüllten Zellen herausfinden. Egal, ob 5 Millionen Zellen formartiert sind und gar keinen Inhalt haben. Es werden nur die Zelladressen ausgegeben, die einen Inhalt haben.

Mit AutoIt habe ich nun folgendes gebaut, um die gleiche Funktion für viele Tabellen zu verwenden. Es funktioniert soweit, aber nicht zu 100 Prozent.
$aGetAddress[0] = $oExcel.Application.Selection.SpecialCells($xlCellTypeConstants).Address
Es wird ein Array zurückgegeben, dass alle Zelladressen beinhaltet und ich dann weiterverabbeiten kann.

Leider werden Zellen, die einen Inhalt haben und aneinandergrenzen als Bereich ausgegeben und nicht aufgeteilt in die jeweilige Zelle.

Wie kann ich das mit AutoIt hinbekommen, dass das gleiche Ergebnis wie mit dem Excelbefehl als Ergebnis im Array erscheint?
Mit Cells.Find() habe ich auch schon herumgespielt, aber ohne Erfolg.

Vielen Dank.

leertaste

Hallo,

RecordCount funktioniert nur, wenn bei Open als Option "adOpenStatic" benutzt wird.

$rs2a.Open( $SQLCommand2a, $conn, 3 ); 3 = adOpenStatic, nur so funktioniert $rs.RecordCount
$recCount = $rs2a.RecordCount
If $recCount > 0 Then $cArray = $rs2a.GetRows

Weiter Infos siehe http://www.w3schools.com/ado/prop_rs_cursortype.asp und http://www.w3schools.com/ado/met_rs_getrows.asp

Ich hoffe es hilft dir weiter.

Hi Leute,

danke an für eure Bemühungen. Ihr habt ja recht, es kann nicht sein, dass der Mausklick gespeichert wird. Schande......

Hatte vor lauter Bäumen den Wald nicht mehr gesehen, aber nun paßt alles.

Schönen Abend

leertaste

Leider hab ich durch mein ständiges rumprobieren mein Script so zerlegt, dass es nicht mal mehr startet.
Wenn ich wieder einigermaßen den Durchblick habe hänge ich es hier rein.

Übrigens versuche ich es im OnEventMode.

Oscar : Der Button arbeitet auch nicht wenn disabled. Klicke ich den Button an, merkt sich dieser den Mausklick und sobald der Button wieder aktiv ist wird sofort die hinterlegte Aktion ausgeführt.

So jetzt bastle ich mal weiter

leertaste

Hallo zusammen,

leider ist mir kein besserer Titel zu meiner Frage eingefallen.

Wenn man in einer GUI einen Button mit disable deaktiviert und anklickt wird der Mausklick nach Aktivierung des Button (enable) ausgeführt.

Was kann man machen das sich dieser Mausklick nicht auswirkt?

Vielen Dank für eure Tipps.

leertaste

Hi,

diese Thema würde mich auch interessieren.

Mit dem Code kann man ja alle Drucker ermitteln die in Start/Einstellungen/Drucker vorhanden sind.

Wie kann man nun einen Drucker von dieser Liste entfernen? Es sollte genauso funktionieren als wenn man rechte Maustaste anwählt und Löschen anklickt.

Danke im voraus,

bis bald - leertaste

Hi,

mal eine doofe Frage: Wie kann man den die Startzeit des PC's oder von Windows rausfinden?

Danke.

leertaste

Hi,

zuerst Danke für die Antworten. Einiges ist nun klarer, aber wieso wird hier BitAND verwendet?

Func _CN2clicked()
If BitAND(GUICtrlRead($checkCN2), $GUI_CHECKED) Then
GUICtrlSetState($checkCN1, $GUI_DISABLE)
GUICtrlSetState($okbutton, $GUI_ENABLE)

Wieso nicht so?

If GUICtrlRead($checkCN2) = $GUI_CHECKED Then
GUICtrlSetState($checkCN1, $GUI_DISABLE)
GUICtrlSetState($okbutton, $GUI_ENABLE)

Hab leider keine Erklärung dafür.

Danke, leertaste

Hi zusammen,

Autoit mach jetzt so richtig Spaß, dass ich mir dachte, wäre doch mal eine GUI auch was Tolles.

Leider habe ich damit noch Probleme.

Mein erster Versuch scheitert daran, dass es mir nicht möglich ist zwei Checkboxen gegenseitig auszuschliessen und der Ok-Button nur dann aktiv ist, wenn eine Checkbox "gecheckt" ist.
Weiter zeigt der OK-Button keine Funktion - je nach gewählter Checkbox soll zu Testzwecken eine Messagebox öffnen.

Wo verstehe ich die GUI falsch.

Vielen Dank für eure Hilfe.

leertaste

Hi,

vielen Dank. Hat geklappt.

leertaste

Hallo zusammen,

bastle gerade an einem kleinen Script, dass nur eine Datei erzeugen soll wenn eine bestimmte Datei im Verzeichnis nicht vorhanden ist.

Falls doch diese Datei vorhanden ist, soll das Programm nach 3 Versuchen mit einer Pause von 30s abbrechen.

Danke.

leertaste

Hi Tweaky,

vielen Dank für den Tipp. Hab noch bei $i = UBound($array_neu) -1 To 0 "step -1" ergänzt.

BugFix

Danke für die Funktion.

leertaste

Hi,

hab den den code von Tweaky abgeändert um nur Dateinamen im array zu haben die mit -A usw enden. Aber irgendwo ist ein Fehler. Das Script läuft ohne einer Fehlermeldung durch ohne etwas aus dem array zu entfernen.

;#include<Array.au3>
Dim $array_neu[100][2]
Dim $array[8] = ["img12xx-A.jpg", "img12xx-5.jpg", "img12xx-7.jpg", "img12xx-B.jpg", "img23xx-B.jpg", "img23xx-6.jpg", "img23xx-7.jpg", "img23xx-A.jpg"]
For $i = 0 to UBound($array) -1
$split = StringSplit($array[$i], "-")
$array_neu[$i][0] = $split[1]
$array_neu[$i][1] = $split[2]
Next
ReDim $array_neu[$i][2]
_ArrayDisplay($array_neu, "zweispaltig")
For $i = UBound($array_neu) -1 To 0
$count = Stringleft($array_neu[$i][1], 1)
$zahl = StringIsDigit($count)
If $zahl = 1 Then _ArrayDelete($array_neu, $i)
Next
_ArrayDisplay($array_neu, "ohne Buchstaben")

Wo liegt der Fehler?

Danke.

leertaste

Hallo zusammen,

ok!

Danke.
leertaste <IMG onmouseover="this.style.cursor='pointer'" title=tongue style="CURSOR: pointer" onclick="tinyMCE.insertSmiley('wcf/images/smilies/tongue.png', 'tongue', ':P');" alt="" src="http://www.autoit.de/wcf/images/smilies/tongue.png" />

Zitat von BugFix

Eine wirkliche allgemeingültige Lösung ist hier eigentlich nicht machbar, da die Sortiervorgabe nicht 'sinnvoll' ist.
Kommen noch mehr Dateien mit unterschiedlichen Namen hinzu, wirds total unübersichtlich.
Meine Frage ist hier: Wieso tragen die Bilder soch unterschiedliche Kennung und welchen Sinn hat es sie so seltsam zu ordnen?
Da ist es vermutlich viel einfacher sie umzubenennen.

Hi,

die unterschiedliche Kennung benutze ich für schwarz-weiss und farbige Bilder bei verschiedenen Bearbeitungen. Die Sortierreihenfolge kommt dadurch zustande, dass eine Sortierung nach Datum leider manchmal nicht der Reihenfolge A,B,0,1 entspricht. Ich starte bei A......Z und springe dann nach 0...... bis unendlich. Wieso auch immer das Datum (modified) nicht dieser Reihenfolge entspricht.

Eine andere Idee wäre zuerst alle Dateien mit -A..... ins array zu nehmen und zu löschen bis auf die aktuellste. Dann alle mit -1....... und als letzten Schritt Buchstabe und Zahl ins array nehmen. Dadurch vereinfacht sich die Sortierung dramatisch.

Die einzige Hürde die ich habe ist die Ermittlung ob eine Zahl oder ein Buchstabe nach dem - steht. Irgendwie mit StringIsAlpha und StringIsDigit.....

Danke.

leertaste

Hallo,
habs soweit verstanden.
Kann man denn die Funktionen so aufrufen, ohne einer Abfrage?
_Movetxtfile()
_Movexlsfile()
_Movedocfile()

Wird die nächste Funktion nur gestartet wenn die vorhergehende fehlerfrei war?

Danke.

leertaste

Hallo zusammen,

folgendes array möchte ich sortieren, aber es geht nicht wie gewünscht.

#include <array.au3>

Dim $array[8] = ["img12xx-A.jpg", "img12xx-5.jpg", "img12xx-7.jpg", "img12xx-B.jpg", "img23xx-B.jpg", "img23xx-6.jpg", "img23xx-7.jpg", "img23xx-A.jpg"]

_ArrayDisplay($array)
_ArraySort($array,0)
_ArrayDisplay($array)

Ergebnis:
img23xx-6.jpg
img23xx-7.jpg
img23xx-A.jpg
img23xx-B.jpg
img12xx-5.jpg
img12xx-7.jpg
img12xx-A.jpg
img12xx-B.jpg

Wunsch wäre aber so:
img23xx-A.jpg
img23xx-B.jpg
img23xx-6.jpg
img23xx-7.jpg
img12xx-A.jpg
img12xx-B.jpg
img12xx-5.jpg
img12xx-7.jpg

_ArraySort($array,0) auf _ArraySort($array,1) bringt auch nichts.

Hat jemand eine Idee?

Danke.
leertaste

Hallo zusammen,

ist das Abarbeiten von Nutzerfunktionen richtig im Programmaufbau eingefügt?
Wie frägt man den Erfolg ab, wenn die erste Funktion erfolgreich gelaufen ist.
Aus der Hilfe konnte ich entnehmen, dass eine Nutzerfunktion 0 zurückgibt und ein anderer Return kann auch definiert werden.
Wie schaut so eine Returndefinition bei Nichterfolg einer Nutzerfunktion aus?

z.B.

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

$pfad = ""

_Movetxtfile()
_Movexlsfile()
_Movedocfile()

Func _Movetxtfile()
EndFunc
Func _Movexlsfile()
EndFunc
Func _Movedocfile()
EndFunc

Vielen Dank.

Bis bald
leertaste

Hi,

danke, funktioniert prima.

leertaste

Hab leider nicht so toll beschrieben was ich eigentlich erreichen möchte.

In einem Verzeichnis sind zig verschiedene Dateien (*.jpg)

IMG_123456
IMG_123899
IMG_123124
IMG_123428 usw.

Zu jeder Datei gibt es verschiedene Varianten z.B. zur IMG_123456

IMG_123456_A
IMG_123456_10
IMG_123456_2
IMG_123456_1

Es soll nun die jüngste Datei erhalten bleiben, ist auch in der Regel die mit der höchsten laufenden Nr., als die _10. Manchmal habe ich auch mit Buchstaben angefangen und bin dann zu Zahlen übergegangen. Im Zweifelsfalle müsste man das Datum auch noch vergleichen. Dies ist mir aber zum Einstieg noch zu kompliziert.

Das array sind so aus: Dateiname - Datum - Dateiname ohne laufender Nr.

Wenn man nun absteigend nach Datum sortiert steht die jüngste Datei oben, bei jedem Dateinamen.

Alle anderen Dateien einer Familie möchte ich löschen.

Hoffentlich ist es verständlich.....

Danke. leertaste