Visual Basic Forum

L!x · Coder Anmeldedatum: 04.05.2008 Beiträge: 93

Hallo
Ich habe hier eine txt die ich gerne einlesen will in eine textbox und dann Zeile für Zeile versende über das Internet Controle ding also Inet1.
Die Website geht über get (index.php?username=bla&pass=123)
Wie kann ich das machen?

igoe · Gast

Kleiner Tipp schau mal im Archiv

L!x · Coder Anmeldedatum: 04.05.2008 Beiträge: 93

Ich finde dazu keinen Artikel [img]/sad.gif[/img]. Kanst du mir vlt auf die Sprünge Helfen?

^^kev#### · Verfasst am: 06.08.2008, 21:38

Wo ist das Problem?
Du musst einfach die Zeilen umbrüche Splitten!
Dann ist zB test(0) der Username und test(1) das Passwort!

L!x · Coder Anmeldedatum: 04.05.2008 Beiträge: 93

Kanst du dazu ein Konkretes Bsp machen?
Also mit
Visual Basic: [code] Open "Datei" For Input As #1
FileLength = LOF(1)
t = Input(FileLength, #1)
Close #1
Text1.Text = t[/code]
Liest man ein und dann??

igoe · Gast

Wenn du jetzt zB. in deiner textbox "Maik#maikmaik"

Dann würde mit
Visual Basic: [code]Dim Text As String
Dim cmd() As String
Text = text1.Text
cmd = Split(Text, "#")
MsgBox cmd(0)
MsgBox cmd(1)[/code]

dieser Funktion das rauskommen

Msgbox 1 gibt "maik" aus (Username)
Msgbox 2 gibt "maikmaik" aus (Passwort), das war ne einfache
Split Funktion. den Rest musste dir selber zusammen Basteln Wink

Mfg

L!x · Coder Anmeldedatum: 04.05.2008 Beiträge: 93

Ist das dann auch mit zeilenumbruch also
username1#pass1
username2#pass2
username3#pass3

Dass dann jedes einzeln "Versendet" wird

Hab das Prob Dank noX gelöst.

Doch noch net gelöst^^
Die Methode ist zu schnell für mein MySQl Server der Kakt ab. Ich habs so gemacht

For i = 0 To List1.ListCount - 1
Inet1.OpenURL ("http://127.0.0.1/tooleintrag.php?user=" & List1.List(i))
Next i