Beiträge von x0r

tv_freeze:

ich hab keine Ahnung, sorry!

Du könntest auch alternativ die *.au3 hier anhängen

Da klickst einfach unter diesem Schreibfenster bei "Smileys" auf "Dateianhänge" - fertig!

Edit:

"Erlaubte Dateiendungen: 7z, au3, bmp, gif, ini, jpeg, jpg, lua, pdf, png, rar, txt, zip"

Hi tv_freeze,

sorry, aber ich werd mir garantiert keine fremde *.exe runterladen und ausführen

Tipp: "Kürzere" Codes erstellst du mit Mausklick auf das "AutoIT-Zeichen" und vorher ggf auf "SP" für Spoiler.

Beispiel:

Gruß
x0r

Hi,

liegt dran, dass Integer nicht mehr darstellen kann (vermute ich mal!)

Denn:

MsgBox(0,"",test(10000000000000000))

func test($i)
return $i * $i
EndFunc

hier kommt auch was negatives raus

Hi,

also ich hätte es per "for next" gelöst, statt mit Rekursion

MsgBox(0,"",fakultaet(20))

func fakultaet($x)
local $i, $res
$res = 1
for $i = 1 to $x
$res = $res * $i
Next
return $res
EndFunc

Gruß
x0r

Edit: habs suboptimal gelöst, und zwar hab ich einfach pro partner je 1 kunden auslesen lassen und das ganze mit verschieden aufgereihten partnerlisten bewerkstelligt. reicht aber für meine zwecke, denke ich!

Dickes Danke an Redhead!

Gruß
x0r

danke, das hab ich schon so gebastelt, dass es einigermaßen hin haut

code bis jetzt:

allerdings fügt er mir nun mehr als 4 partner mit entsprechenden kunden ein (kunden sind einzigartig, also das stimmt schonmal)
und das andere problem ist, ich müsste zuerst die kunden mit weniger nummern dran nehmen, denn die werden sonst gar nicht mehr gezählt und fallen weg (reinfolgen-problem).

soweit läuft aber schonmal was dank dir

Gruß
x0r

1000 Dank, werds morgen direkt testen

Hi all,

ich habe 2 Textdateien mit Informationen (aus Excel exportiert und als CSV bzw TXT gespeichert), die wie folgt aussehen:

PTNR.txt:
10001071;Diverse Informationen 1
36961238;Diverse Informationen 2

KDNR.txt:
10000675,10046615,10001071,;Diverse andere Informationen 1
10039063,10000675,10046615,;Diverse andere Informationen 2

Jetzt möchte ich die 8-stellige Zahl am Anfang der ersten Datei mit den Zahlen aus der zweiten Datei vergleichen und wenn diese drin vorkommt, in eine dritte Datei mit allen "Diverse Informationen" aus der entsprechenden Zeile ("KDNR" und "PTNR") schreiben.
Allerdings sollen für "PTNR" maximal 4 "KDNR"-Einträge eingetragen werden (die bereits genutzten Zeilen können gelöscht werden).

Edit: Doppelte aus der "KDNR" löschen ist Blödsinn, sorry! (also bitte drin lassen!)

Mein Lösungsansatz wäre bis jetzt folgender:

Da fehlt leider noch einiges, der Testlauf mit einem Testdatensatz in Zeile 1 hat funktioniert, aber leider wars das dann auch schon

Hoffe ihr könnt mir helfen

Grüße
x0r

Hi,

nach Zeile 132 fehlt ein "EndIf"

Grüßle
x0r

Hi Ilse,

um die Mausbewegung langsamer zu machen, einfach die "0" hintendran durch eine Zahl austauschen (je höher, desto langsamer):

z.b.:
MouseMove(10,$midy*2-10,1)

Edit: "MouseMove(<x>,<y>,[speed])"

"1" ist schon langsamer, geht aber noch einiges, einfach mal in die Hilfe schauen

Bei Maus größer machen kann ich dir leider nicht helfen, sorry!!!

Grüße
x0r

Hi Ilse,

du musst auch zuerst mal auf Space drücken zum aktivieren

Wenns schon beim Start direkt aktiviert sein soll, musst du halt $toggle auf 1 setzen

Edit: Hab oben mal noch Num0 hinzugefügt für "klick" an der Stelle.
Edit2: Noch schnell das zurücksetzen korrigiert

Gruß
x0r

Hi,

coole Sache!!!

Könnte man da noch eine Computergegner-Option mit einbauen?

Grüße
x0r

Facebook verkauft auch die Nutzerdaten, von daher ists nur fair wenn er ein paar automatische Klicks ausführt

Grüße

Hi,

Hätte eine schnelle Lösung, allerdings noch optimierbar

So würds ich lösen, und hauptsache es funktioniert!

Kann es sein, dass man bei HotKeySet() keine Parameter übergeben kann? (sowas steht nämlich in der Hilfe :D)

Edit: Tasten aktualisiert

Gruß
x0r

So,

die bis jetzt optimalste Lösung wäre folgende:

Dieses Sicherheits-Fenster wird einfach per ESC beendet und somit die komplette Datenbank, wenn die Shift-Taste in diesem Fenster gedrückt wird.
Lässt sich für 10 Sekunden deaktivieren, wenn man die "Admin-Tastenkombination" kennt, in dem fall WinTaste+N.

Dann muss die Datenbank zwar geschlossen und wieder neu geöffnet werden, aber so lernen es die Leute wenigstens

Grüße
x0r

Schönen guten Morgen!

Habe es gerade getestet, selbes Problem, wie bei meinem Script.

Die Pfeiltasten sind _überall_ deaktiviert, ausser in diesem "Sicherheitswarnung"-Fenster von Access!

So ein Mist!

Gruß
x0r

K4z: THX!! Ich werds morgen mal testen

Raupi : ich hatte das HotKeySet auch schon oben drin stehen, vor der While-Schleife (glaub ich hatte es in aller Eile nur nochmal drunter kopiert).
Wie gesagt, die Pfeiltasten waren auch gesperrt, nur eben nicht in diesem "Sicherheitswarung"-Fenster in Access

Edit: Das besagte Fenster ist auch kein Control, zumindest wird mir per Au3Info nichts dergleichen zurückgegeben. Schade!

Gruß
x0r

Hi all,

wenn man MS Access öffnet, kommt zuerst die "Sicherheitswarnung". In dieser möchte ich die Pfeiltasten sperren.

Grund ist folgender:

Ich habe eine Routine erstellt, die beim Drücken der Shift-Taste die Controls deaktiviert und diese solange nicht mehr anklickbar sind, bis Shift losgelassen wird.
Das Problem ist aber, wenn man Shift gedrückt hält und dann mit den Pfeiltasten navigiert, kommt man trotzdem zum Ziel...

Mit folgendem funktioniert dies aber leider nicht (dafür aber überall sonst!):

Edit: Der bisherige Code:

...lässt sich für ca 10 Sekunden per Strg+Alt+D deaktivieren.

Funktioniert soweit auch perfekt, Mausklicks sind nicht mehr möglich, nur leider die Pfeiltasten noch.

Danke und Grüße
x0r

Hi,

wäre in dem Fall nicht einfacher, wenn man folgendes verwendet?

#include <inet.au3>
$source = _INetGetSource('http://www.google.de')
MsgBox(0,"",$source)

Gruß
x0r