Folge dem Video um zu sehen, wie unsere Website als Web-App auf dem Startbildschirm installiert werden kann.
Anmerkung: Diese Funktion ist in einigen Browsern möglicherweise nicht verfügbar.
Hallo,
ich habe folgenden Code um eine bestimmte Datei auf mein Server zu laden,
ich möchte aber das ich in der Form ein textfeld habe wo ich ein Pfad zur Datei angeben kann das dieser dann hochgeladen wird mit dem Button klick.
Code:Private Sub Command1_Click() Call Verbinden Do While Inet1.StillExecuting: DoEvents: Loop Inet1.Execute , "PUT c:\test.txt test.txt" Do While Inet1.StillExecuting: DoEvents: Loop Inet1.Execute , "quit" Call Trennen End Sub Public Sub Verbinden() With Inet1 .Cancel .Protocol = icFTP .URL = " " .UserName = " " .Password = " " End With End Sub Public Sub Trennen() Inet1.Execute , "quit" Do While Inet1.StillExecuting: DoEvents: Loop End Sub
Ich hoffe das mir da einer weiter helfen kann wie das geht.