Visual Basic Forum

regenwurm_ · Coder Anmeldedatum: 20.07.2007 Beiträge: 85

Die Textfelder;

- txtID
- txtPW
- txtRPW
- txtEmail
- cbSQ
- txtSA
- cbGM
- txtGM

Sollen per btnSend an eine Password.txt beim FTP gesendet werden.
Wie geht das?

12flo54_ · Newbie Anmeldedatum: 06.05.2007 Beiträge: 8

Private Sub Command1_Click()
File = "C:\floistschön.txt"
Open File For Output As #1
Print #1, Text1.Text
Print #1, Text2.Text
Print #1, Text3.Text
Close 1
End Sub

Das erstellt den Text File

Bei mir mit 3 TextBox

und für den ftp upload wurde ja ein tut gemacht...
http://www.vb-x.org/viewtopic.php?t=738

regenwurm_ · Coder Anmeldedatum: 20.07.2007 Beiträge: 85

Der Pfad sollte aufn FTP verweisen oder?

Marduk_ · « Moderator » Anmeldedatum: 17.06.2007 Beiträge: 389

Welcher Pfad? Wenn du c:\floistschön.tzxt meinst, dann liegst du falsch, denn die txt muss erst mal auf demPC gespeichert werden um sie anschließend hochzuladen.

regenwurm_ · Coder Anmeldedatum: 20.07.2007 Beiträge: 85

aso
kk ^^

12flo54_ · Newbie Anmeldedatum: 06.05.2007 Beiträge: 8

'2 Text Boxen
'ein Butten mit dem namen cmd_upload
'Microsoft Inet Transfers (oder so)
' Das wars

Private Sub cmd_upload_Click()

Open "floistschön.txt" For Append As #1

Print #1, Text1.Text
Print #1, Text2.Text

Close 1

Dim a As String
Dim b As String

With Inet1

.AccessType = icUseDefault
.Protocol = icFTP
.RemoteHost = "21" 'port vom FTP = 21
.URL = ".." 'der Ftp host
.UserName = "fff" 'user name vom Ftp
.Password = "fff" ' pw vom FTP

a = "floistschön.txt"
b = "floistschön.txt"

.Execute , "Put " & a & " " & b

End With

MsgBox ("du hast den Fehler gefunden Very Happy

")

End Sub

ist irgendwo ein Fehler drin kp wo
aber so sollte es aus schauen Smile

Marduk_ · « Moderator » Anmeldedatum: 17.06.2007 Beiträge: 389

Jo stimmt schon so, war ja der Code ausm Vidtut

regenwurm_ · Coder Anmeldedatum: 20.07.2007 Beiträge: 85

Jo danke

Ich schaue mir gerade das VideoTut an Smile

)

Noch was kurz XD

anstatt

Print #1, Text1.Text
Print #1, Text2.Text

Soll ich einfach:

Print #1, txtID.Text
Print #1, txtPW.Text
Print #1, txtRPW.Text
Print #1, txtEmail.Text
Print #1, cbSQ.Combobox
Print #1, txtSA.Text
Print #1, cbGM.Checkbox
Print #1, txtGM.Text

nehmen?

Folgendes:

[code] Private Sub btnSend_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSend.Click
Open ("Request.txt") For Append As #1
Print #1, txtID.Text
Print #1, txtPW.Text
Print #1, txtRPW.Text
Print #1, txtEmail.Text
Print #1, cbSQ.Combobox
Print #1, txtSA.Text
Print #1, cbGM.Checkbox
Print #1, txtGM.Text
Close #1

Dim a As String
Dim b As String

With Inet1
.AccessType = icUseDefault
.Protocol = icFTP
.RemoteHost = "21" 'port vom FTP = 21
.Url = "***" 'der Ftp host
.UserName = "***" 'user name vom Ftp
.Password = "***" ' pw vom FTP

a = "Request.txt"
b = "Request.txt"

Execute, "Put " & a & " " & b

End With
End of

End Sub[/code]

1. Finde ich in der Toolbox das InternetTransfer Symbol net
2.

12flo54_ · Newbie Anmeldedatum: 06.05.2007 Beiträge: 8

du hast ja text boxen die musst du umbenenne Wink

der Startart name ist text1, text2 ... die muss du dann halt so umbenennen wie du willst Wink

oder du machst es einfach so

print #1, text1.text
print #1, text2.text
...

Marduk_ · « Moderator » Anmeldedatum: 17.06.2007 Beiträge: 389

zu eins: Kann es sein das es Unterschiede zwischen den Versionen gibt, das im Video die Prof Version benutzt wurde und du nur die Standart hast. Is das so?

zu zwei: Bei der Checkbox musst du das anders machen. Probier es da mal mir dem Value-Wert, Genauso bei der Combobox

regenwurm_ · Coder Anmeldedatum: 20.07.2007 Beiträge: 85

Ich benutzte Microsoft Visual Basic 2005 Express Edition.

Wie meinst du das mit dem Value wert?

sonst hast du evt. ICQ?

Marduk_ · « Moderator » Anmeldedatum: 17.06.2007 Beiträge: 389

Aha...wenn du .NET hast dann kann das mit dem in die Datei schreiben gar nicht funktionieren.
Zu den Checkboxen:
Bsp: die Checkbox hat folgende Eigenschaften:

Bild1

.checked: Gibt an ob das Element überhautpt ausgewählt ist, also ob ein Häkchen drin ist.
.checkedstate: Es gibt zwei verschiedene Auswahlhäkchen. 1. ein Haken 2. ein Quadrat.
.text: Das ist die Beschreibung.

Also mit value meine ich die Eigenschaft .checked, natürlich kannst du auch .checkedstate
verwenden, wenn du zb drei Möglichkeiten hast( ja nein vllt, als Beispiel)

Zu der Combobox:
Bei der Combobox kannst du mit .text den Wert abfragen, den der User eingegeben hat. Also es wird der Text abgerufen, den man sehen kann. Bei Items kannst du die Items festlegen, aus denen der User auswählen kann.

Bild2

Bei dem Thema " Wie speichere ich eine txt Date" schau einfach mal in der MSDN von Microsoft nach, is ein Beispiel ganz gut erklärt( Stichwort: Streamreader, Writer,...)

Hoffe das war verständlich