Beiträge von Ilse

klappt irgendwie,
habe auch mit fileWriteLine probiert!

[autoit]

$file = FileOpen("test2.txt", 0)

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

;InputBox("Neu","Neue Datei")
If $file = -1 Then
MsgBox(0, "Error", "Unable to open file.")
Exit
EndIf

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

While 1
$line = FileReadLine($file)

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

If @error = -1 Then ExitLoop
$Wort1 = StringReplace($line,"VERSION","Test")
FileWriteLine($file,$Wort1)
$Wort2 = StringReplace($line,"URL","Web")
FileWrite($file,"test2.txt")
Wend
;MsgBox(0,"Fertig",$file)

[/autoit]

Meine TextDatei

Spoiler anzeigen

VERSION
URL GOTO=http://www.web.de/

Guten Morgen zusammen,

habe heute folgendes Problem.

1 Ich habe eine Textdatei
2. In dieser Datei sollen Teile ersetzt werden
3. Wenn das erledigt ist soll eine neue Datei gespeichert werden

Das mit dem speichern als neue Datei macht mir Probleme

Mein Code:

[autoit]

$file = FileOpen("test2.txt", 0)

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

InputBox("Neu","Neue Datei")
If $file = -1 Then
MsgBox(0, "Error", "Unable to open file.")
Exit
EndIf

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

While 1
$line = FileReadLine($file)

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

If @error = -1 Then ExitLoop
$Wort1 = StringReplace($line,"Petra","Web.de")
$Wort2 = StringReplace($line,"Lisa","Gmx.de")

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

Wend
MsgBox(0,"Fertig","Datei wurde angepasst")

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

D.h. die test2.txt wurde bearbeitet und soll nun als neue Datei
abgespeichert werden!

Grüße
Ilse

oh ...logisch Misterspeed!

Ich brauch jetzt mal ne Pause!!!

Dann geh ich wieder dran, glaube dann klappt es.

DANKE DANKE!

Hallo Misterspeed,

wo finde ich denn die Feldnamen?
z.B. bei web.de die hast du gelöscht?
Die sind ja je Anbieter unterschiedlich!

Die Feldnamen bei web.de lauten
Benutzername username
Passwort = password
bei gmx ....

die muß ich doch dann auch aus der Tabelle lesen, oder?

Ilse

Hallo Misterspeed,

hier mal mein Funktionsversuch (Fehler)

[autoit]

#include <Array.au3>
#include <file.au3>
#include <IE.au3>

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

;#include <Datei1.au3>
;#include <Datei2.au3>

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

Global $aCsv, $aCsvPath = 'Tabelle.csv'
Global $sSeparatorCSV = ';'

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

_FileReadToArray($aCsvPath, $aCsv)
Global $aCsv2D[$aCsv[0]-1][11]
For $i = 2 To $aCsv[0]
$aTmp = StringSplit($aCsv[$i], $sSeparatorCSV)
For $j = 1 To $aTmp[0]
$aCsv2D[$i-2][$j-1] = $aTmp[$j]
Next
Next
_ArrayDisplay($aCsv2D)

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

For $i = 0 To UBound($aCsv2D,1)-1

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

_loginWebDE()
;MsgBox(0,"Wesite",$aCsv2D[$i][3])
;MsgBox(0,"Datei starten",$aCsv2D[$i][2])

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

next

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

Func _loginWebDE()
MsgBox(0,"Anmeldung für:",$oIE,$aCsv2D[$i][4],2)

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

$oIE = _IECreate ($oIE,$aCsv2D[$i][1])

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

$name = _IEGetObjByName($oIE,$aCsv2D[$i][3])
$Email = _IEGetObjByName($oIE,$aCsv2D[$i][5])

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

_IEPropertySet($Name, 'innerText',$oIE,$aCsv2D[$i][4],2))
_IEPropertySet($Email, 'innerText',$oIE,$aCsv2D[$i][6],2))

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

Sleep (1000)

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

EndFunc

[/autoit]

Meine Tabelle.csv

Spoiler anzeigen

ID;Seite;Code;Benutzerfeld;Benutzername;Passwortfeld;Passwort
1;http://www.web.de;Petra.au3;username;Petra;password;33221
2;http://www.web.de;Klaus.au3;username;Klaus;password;33442

Ilse

Hallo Misterspeed,

schön daß du meldest.
Die ganzen Variablen setzen mir wirklich schwer zu.
Mal langsam,
So, ....die Infos aus der Tabelle bekomme ich ja so

[autoit]

MsgBox(0,"Wesite",$aCsv2D[$i][1])
MsgBox(0,"Datei starten",$aCsv2D[$i][2])

[/autoit]

Ich schreibe eine Funktion z.B. für Web.de
und schon geht's wieder los: müssen da die Variablen aus der Tabelle rein
oder muß ich alles im MainScript deklarieren?

und diese Variablen kommen aus dem MainScript?

[autoit]

func loginWebDE($user,$pw) endfunc

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

brrr....komm irgendwie total durcheinander
...kann gerade nicht mehr denken!!!!

Ich habe mal meine CSV erneuert

Spoiler anzeigen

ID;Seite;Code;Benutzerfeld;Benutzername;Passwortfeld;Passwort
1;http://www.web.de;Petra.au3;username;Petra;password;33221
2;http://www.web.de;Klaus.au3;username;Klaus;password;33442

Ilse

Guten Morgen AspirinJunkie,

ich poste jetzt einfach mal alles was ich bis jetzt habe, bevor ich mit weitermache.
Bin jetzt irgendwie unsicher wie's richtig weitergeht!

Mein Projektentwurf (gedacht...)
Könnte ich das so machen?

1. Das Main Script (das noch nicht fertig ist)
das greift auf die Tabelle zu die alle Daten enthält

[autoit]

#include <Array.au3>
#include <file.au3>
#include <IE.au3>

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

;#include <Datei1.au3>
;#include <Datei2.au3>

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

Global $aCsv, $aCsvPath = 'Tabelle.csv'
Global $sSeparatorCSV = ';'

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

_FileReadToArray($aCsvPath, $aCsv)
Global $aCsv2D[$aCsv[0]-1][11]
For $i = 2 To $aCsv[0]
$aTmp = StringSplit($aCsv[$i], $sSeparatorCSV)
For $j = 1 To $aTmp[0]
$aCsv2D[$i-2][$j-1] = $aTmp[$j]
Next
Next
_ArrayDisplay($aCsv2D)

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

For $i = 0 To UBound($aCsv2D,1)-1

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

MsgBox(0,"Wesite",$aCsv2D[$i][1])
MsgBox(0,"Datei starten",$aCsv2D[$i][2])

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

next

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

2. Meine Tabelle.csv (die ich noch nicht fertig ist)
würde ich gerne mit allen Feldnamen die benötigt werden ausbauen
auch Passwörter, Benutzernamen (...Gedanke)

Spoiler anzeigen

ID;Seite;Code
1;http://www.web.de;Petra.au3
2;http://www.web.de;Klaus.au3
3;http://www.gmx.de;Lisa.au3

3. Die einzelnen Scripte die für jeden gemacht werden aber unterschiedlich sind!
Jeder hat eine eMail Adresse, Benutzername... bei unterschiedlichen Anbietern.
Das würde ich gerne in die Tabelle einbauen und übersichtlich verwalten.

[autoit]

#include <IE.au3>

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

MsgBox(0,"Anmeldung für:","Petra",2) ; hier sollte normalerweise der Name aus der Tabelle hin!

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

$oIE = _IECreate ("http://www.web.de/fm/") ;hier sollte normalerweise die Seite aus der Tabelle hin!

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

$name = _IEGetObjByName($oIE,"username") ; Wenn ich in die Tabelle die Felder eintragen könnte wäre auch besser!
$Email = _IEGetObjByName($oIE,"password")

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

_IEPropertySet($Name, 'innerText','Petra') ; kann auch in die Tabelle
_IEPropertySet($Email, 'innerText','Petra@web.de'); kann auch in die Tabelle

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

MsgBox(0,"Anmeldedaten wurden eingetragen","Petra",2)
Sleep (1000)

[/autoit]

Die Bearbeitung/Ablauf:

Also, das MainScript startet, geht zur Adresse1 aus der Tabelle macht die Anmeldung, wenn fertig
dann einen neuen Tab, geht zur Adresse 2 usw.
aber...soweit bin ich ja leider noch nicht!

Das Ergebnis:
Tab1 Petra Anmeldung bei Web.de fertig
Tab2 Klaus Anmeldung bei Web.de fertig
Tab3 Lisa Anmeldung bei Gmx.de fertig

Und warum das ganze?

Spoiler anzeigen

So jetzt kommt die Frage, darf da jeder die eMails des anderen lesen, schreiben...?
JA, das soll so sein.

Und wie Ihr seht, jedes Script ist unterschiedlich und
hat andere Feldnamen u.s.w.
Da wartet noch sehr viel Arbeit auf mich

Liebe Grüße
Ilse;)

@ alle Helfer

dank euch für alle Tipps.

@ Autobert
...hatte doch mein original Script, Screenshots, Beispiel.au3's gepostet

Zitat

Du hast einen Konzeptionsfehler in deinem Projektentwurf

Du hast ja Recht, meine Ansätze waren falsch, das haben mir auch BugFix und die anderen mitgeteilt.
Manchmal denkt man in die verkehrte Richtung.
Und wenn man dann fertig ist,
bekommt man die Info: So ist das nicht möglich!

...und damit habt ihr mir geholfen. Ich hoffe ich bin mit den Funktionen
wieder auf dem richtigen Weg.

Also, ich schließe diesen Thread, und probiere alle eure Tipps.
Ich bin euch dankbar, auch wenn es euch viel Nerven mit mir gekostet hat

Liebe Grüße
Ilse

Guten Morgen zusammen,

autoBert  misterspeed

Zitat

MsgBoxen ausgeben kannst du doch auch anders lösen....

...damit ich für eine Msgbox nicht diesen Aufwand betreibe versteht sich doch von selbst
Wie bereits erwähnt das sind Beispiele.
Jedes Script ist ID bezogen und ziemlich umfangreich.

Raupi

Zitat

Was du vorhattest ist schon klar, aber scheinbar verstehst du nich was man dir sagen will

Entweder du compilierst die einzelnen Scripte welche du ausführen willst und rufst sie per Run auf oder
du machst aus jeder deiner "Includescripts" eine Func und rufst diese auf.

Auch das ist mir klar Raupi . Jedes Script compilieren, testen, ändern, compilieren...
ich finde daß das keine elegante Lösung ist.

Zitat

oder du machst aus jeder deiner "Includescripts" eine Func und rufst diese auf.

ich denke daß der Weg ist.
Aber zurück zu meiner Frage: Ich hoffe du verstehst was ich sagen will:
Bei 100 au3 Files wie kann man so etwas am besten managen, per ID zuordnen
ohne den Überblick zu verlieren.

Dann stelle ich die Frage so:
Wie kann ich in meiner Tabelle die Funktionen für die jeweiligen ID's managen
und per Loop aufrufen?
Auch für die Bearbeitung wichtig:

Ich sehe in der Tabelle bei ID 68 die Funktion v. Erika.au3
Diese wird geändert, das war's!
Das MainScript wird nicht benötigt.

Also wie kann ich diese Komponenten MainScript, Funktionen und Tabelle
sinnvoll verknüpfen ohne ein einziges Mainscript mit 20000 Zeilen zu haben.

Ich bräuchte mal ein Beispiel
Mein Mainscript

Spoiler anzeigen

#include <Array.au3>
#include <file.au3>
#include <IE.au3>

;#include <Datei1.au3>
;#include <Datei2.au3>

Global $aCsv, $aCsvPath = 'Tabelle.csv'
Global $sSeparatorCSV = ';'

_FileReadToArray($aCsvPath, $aCsv)
Global $aCsv2D[$aCsv[0]-1][11]
For $i = 2 To $aCsv[0]
$aTmp = StringSplit($aCsv[$i], $sSeparatorCSV)
For $j = 1 To $aTmp[0]
$aCsv2D[$i-2][$j-1] = $aTmp[$j]
Next
Next
_ArrayDisplay($aCsv2D)

For $i = 0 To UBound($aCsv2D,1)-1

MsgBox(0,"Datei starten:",$aCsv2D[$i][2])

next

...Tabelle mit Name der Funktion
...Aufruf der Funktion aus der Tabelle

Liebe Grüße
Ilse

Hallo,

erstmal danke an alle Helfer.
Ich habe mich vielleicht nicht so gut ausgedrückt.

So, ich habe jetzt mal eine Variante meiner Main.au3 zusammengestellt
Macht einfach die Tabelle.csv mit den Daten ins Hauptverzeichnis.

[autoit]

#include <Array.au3>
#include <file.au3>
#include <IE.au3>

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

;#include <Datei1.au3>
;#include <Datei2.au3>

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

Global $aCsv, $aCsvPath = 'Tabelle.csv'
Global $sSeparatorCSV = ';'

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

_FileReadToArray($aCsvPath, $aCsv)
Global $aCsv2D[$aCsv[0]-1][11]
For $i = 2 To $aCsv[0]
$aTmp = StringSplit($aCsv[$i], $sSeparatorCSV)
For $j = 1 To $aTmp[0]
$aCsv2D[$i-2][$j-1] = $aTmp[$j]
Next
Next
_ArrayDisplay($aCsv2D)

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

For $i = 0 To UBound($aCsv2D,1)-1

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

MsgBox(0,"Datei starten:",$aCsv2D[$i][2])

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

next

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

Die Daten kommen aus der Tabelle.csv
Sieht so aus:

Spoiler anzeigen

ID;Seite;Code
1;Petra;'Code.au3'
2;Klaus;'Code2.au3'

Die #include ?.au3 sind ganz normale Scripte!
Beispiel:
Code.au3

[autoit]

Msgbox(0,"Anrede","Hallo Petra")
;hier kommt nur der Code von Petra rein)

[/autoit]

Code2.au3

[autoit]

Msgbox(0,"Anrede","Hallo Klaus")
;hier kommt nur der Code von Klaus rein)

[/autoit]

Alle Daten wollte ich in der Tabelle.csv managen und per ID zugreifen.

Ich hoffe die Welt hat mich nun verstanden?

Liebe Grüße
Ilse

...bitte nochmal langsam

also ich lege meine Files in meiner Main.au3 per Include
an den Anfang
etwa so?

Spoiler anzeigen

#Daten1.au3
#Daten2.au3

Meine Frage:
Könnt Ihr mir ein einfaches Loop Beispiel machen...
For $i = 1To 100
...das wenn ID=2 dann die Daten2.au3 startet

Wie ich die ID aus der csv erhalte ist kein Problem

huh wenn das klappen würde wäre prima.

Ilse

ich glaube ich war

@ guten Morgen miteinander,

zuerstmal merci für euren Beistand. Mußte gestern wieder los.
Vieleicht nochmal so erklärt:

Zitat

1. Ich habe mehrere au3 Files in einem Ordner include.
2. Diese Files werden mitgeliefert.

Es soll eine Main.au3 geben die (und jetzt kommt's)
die Daten aus einer csv Tabelle liest.

Beispiel CSV:

Spoiler anzeigen

ID;Files
1;Daten1.au3
2;Daten2.au3
3;Daten4.au3

Die Main.au3 sollte einen Loop enthalten.
Nur mal so als Beispiel zum nachvollziehen
wenn die csv gelesen wird

If ID="1" then Starte Daten1.au3....
If ID="2" then Starte Daten2.au3....

Das Warum?

Jeder Datensatz braucht eine eigene AU3 (ziemlich umfangreich)
Jede au3 ist also spezifisch für einen Datensatz angefertigt.

Damit man die Übersicht in der Main.au3 nicht verliert dachte ich, daß das per include zu lösen ist.

Was ich nicht verstehe:
Es geht doch einfach nur um eine Befehlszeile:

#include 'Daten.au3'
und das 'Daten.au3' kann man nicht variabel im Loop aus der csv verwenden. Schade

Ich hoffe ich konnte das Problem etwas besser erklären

Liebe Grüße
Ilse

@alle

Schade daß das so nicht geht.
Eine andere Frage:

Wie kann ich mit einem Loop dann
mehrere au3 Dateien die in einem Ordner sind
nacheinander abarbeiten?

Ich wollte die Pfade in eine csv machen...

Habt Ihr da eine Grundidee?

...ich muß leider schon wieder los
zum verrücktwerden

melde mich später wieder

Liebe Grüße
Ilse

Hallo Detroid 49,

ich glaube jetzt hab ich's

[autoit]

Opt("WinTitleMatchMode", 2)
If Winexists("Sicherheitswarnung") then
Sleep(1000)
;MsgBox(4096,"gefunden","beenden",1)
WinActivate("Sicherheitswarnung")
Sleep(2000)
Controlclick("Sicherheitswarnung","ja","")

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

If Winexists("Sicherheitswarnung") then Controlclick("Sicherheitswarnung","Ja","")
EndIf

[/autoit]

Das Fenster habe ich mit WinActivate("Sicherheitswarnung")
nochmals aktiviert, dann läuft es!

Liebe Grüße
Ilse

Ich fass es mal kurz in Worte:

Es gibt eine For Schleife die mir die au3 Dateinamen
die ich includieren will, ausführt

[autoit]

For $i = 0 To UBound($aCode,1)-1
#include 'MeineAu3DateinameAusDerTabelle'
next

[/autoit]

Die Tabelle sieht so aus:
Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

da sollten noch mehrere au3 Files rein!

Ich möchte folgendes machen:
1. Eine Seite aufrufen aus der csv Spalte 2, das geht ....
2. Ein passendes au3 File starten Spalte 3 (das array zeigt mir den Namen an)

das passende au3 File sollte einfach mit #include jeweils eingebunden werden!
und genau das geht nicht!
Die Msgbox zeigt alles korrekt, Durchläufe prima, nur #include klappt nicht!

auch wenn ich in der Tabelle den Eintrag so habe
<Code.au3>
'Code.au3'
"Code.au3"

Grüße Ilse

2x ...hab das schon verstanden!
Aber: ES GEHT NICHT!

Das Fenster bleibt wie eine Mauer stehen

Grüße
Ilse

@Alle

d.h. auch wenn es nur um den Dateinamen geht,
klappt das nicht!

#include 'code.au3' geht

$test = 'code.au3'

#include $test geht nicht

Gibt es eine andere Möglichkeit wie man
die Dateinamen hinter #include per Code austauschen kann?

Grüße Ilse

@Detroid49

Zitat

pack mal vor den Click einen Sleep(50) oder so...

Habe Sleeps drin,
geht nicht!

[autoit]

Opt("WinTitleMatchMode", 2)
If Winexists("Sicherheitswarnung") then
Sleep(1000)
MsgBox(4096,"gefunden","beenden",1)
Sleep(50)
Controlclick("Sicherheitswarnung","","Button1")
If Winexists("Sicherheitswarnung") then Controlclick("Sicherheitswarnung","","Button1")
EndIf

[/autoit]

geht leider immer noch nicht Schnuffel

[autoit]

Opt("WinTitleMatchMode", 2)
If Winexists("Sicherheitswarnung") then
Sleep(1000)
MsgBox(4096,"gefunden","beenden",1)
Sleep(50)
Controlclick("Sicherheitswarnung","","Button1")
If Winexists("Sicherheitswarnung") then Controlclick("Sicherheitswarnung","","Button1")
EndIf

[/autoit]

Etwas komisch ist, es kommt zuerst die Msgbox
dann das Sicherheitsfenster
und dann passiert nichts mehr!

Auch mit identischem Code von dir, das Fenster bleibt stehen!

Ilse

Hallo,

ich habe ein #include Problem: ( klingt wie eine Krankheit)

Der Dateipfad kommt aus einem Array
Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

Folgendes:
Wenn ich im Code die au3 direkt angebe, funktioniert es

[autoit]

#include 'Code.au3'

[/autoit]

Die au3-Files möchte ich aber aus der Tabelle lesen!

Wenn ich mir das Array anzeigen lasse

[autoit]

MsgBox(0,"Meine Datei",$aCode[$i][2])

[/autoit]

dann wird Code.au3 angezeigt
D.h. ich kann auf das Array zugreifen und den Pfad der von include benötigt wird lesen.

Probiere ich aber mit #include
nun diese Datei (die natürlich vorhanden ist und im gleichen Ordner liegt...)
mit

#include '$aCode[$i][2]' aufzurufen, dann geht das nicht!

obwohl $aCode[$i][2] in der Msgbox Code.au3 zeigt!

Grüße
Ilse