kostenloser Webspace werbefrei: lima-city

Wie kann ich mit Visual Basic auf Webserver schreiben?

lima-city → Forum → Programmiersprachen → Programmieren mit .NET & Mono

1. Autor dieses Themas

   f****e

   18:10, 26.2.2012

   Hallo!
   Ich will mit Visual Basic eine Textdatei auf einen Webserver schreiben (auf www.f-ecke.lima-city.de). Am besten ohne FTP oder ähnlichem. Auslesen geht mit folgendem Code:
   

   Sub Main()
           Dim responsestream As System.IO.Stream
           Dim responsereader As System.IO.StreamReader
   
           Dim client As New System.Net.WebClient
           responsestream = client.OpenRead("http://mitglied.multimania.de/efpr/lager_schorndorf.txt")
           responsereader = New System.IO.StreamReader(responsestream)
   
           a = responsereader.ReadToEnd()
   
           responsestream.Close()
           responsereader.Close()
   
       End Sub

   
   Wenn ich aber auf diese Methode schreiben will, kommen nur Fehler. Geht das anders? Vielen Dank schon mal im Vorraus!
   F-Ec

2. Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!

   lima-city: Gratis werbefreier Webspace für deine eigene Homepage

3. autobert

   

   autobert hat kostenlosen Webspace.

   18:21, 26.2.2012

   Schreiben auf deinen Webspace kann nur mit einer Authentifizierenden Methode erfolgen, alles andere wäre eine Sicherheitslücke so gross wie ein Scheunentor. Ich denke du wirst an FTP nicht vorbeikommen.
4. Autor dieses Themas

   f****e

   18:27, 26.2.2012

   Hallo autoBert!
   Vielen Dank für deine Antwort. Kennst du einen Code für FTP-Zugriff?
   F-Ecke

5. autobert

   

   autobert hat kostenlosen Webspace.

   20:43, 26.2.2012

   f-ecke schrieb:
   Hallo autoBert!
   Vielen Dank für deine Antwort. Kennst du einen Code für FTP-Zugriff?

   Ja, aber nur unter AutoIt (habe schon lange nichts mehr mit VB genacht).
   
   Dies: http://www.vb-paradise.de/programmieren/hauptforum/p558258-ftp-zugriff/#post558258 sieht erfolgversprechend aus.
   
   Beitrag zuletzt geändert: 26.2.2012 20:44:23 von autobert

6. leonfiedler

   leonfiedler hat kostenlosen Webspace.

   14:28, 16.3.2012

   Arbeite mit einem Webclient
   
   

   Dim wc as new Webclient
   
   wc.downloadstring("PFAD")
   wc.uploadfile("PFAD","DATEI")

   
   
   Gruß
   Leon

7. it-ecke

   it-ecke hat kostenlosen Webspace.

   11:01, 17.3.2012

   Hallo F-Ecke!
   Ich denke, man kommt um FTP nicht herum. Der Code ist aber nur eine Zeile lang:
   

   My.Computer.Network.UploadFile ("C:\index.html", "ftp://ftp.lima-city.de/index.html","f-ecke", "FTP-Passwort")

   
   Diesen Code (und noch einen zum Runterladen) habe ich dir auch schon in deinem Thema "Wie bekommt man einen FTP-Zugriff mit Visual Basic." gegeben.
   IT-Ecke
   
   Beitrag zuletzt geändert: 17.3.2012 11:08:41 von it-ecke

8. jv-web

   jv-web hat kostenlosen Webspace.

   14:13, 20.4.2012

   Ich würde auch mit webclient arbeiten.
   du musst dich aber erst autentifizieren:
   

   wc.Credentials = New Net.NetworkCredential(benutzername, passwort)

   
   dass setzt du am besten in die FormLoad
   wenn dir download reicht, mach
   

   wc.DownloadString("http://www.testserver.de/text.txt")

   
   Dann brauchst du keine Authezifierung.

9. h*******3

   19:20, 22.4.2012

   Public Class Form1
   
       Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
           Dim localfile As String = My.Application.Info.DirectoryPath & "\testdatei.txt"
           Dim user As String = "benutzername"
           Dim pass As String = "passwort"
           Dim remotefile As String = "ftp://ftpserver/zielordner/testdatei.txt"
           My.Computer.Network.UploadFile(localfile, remotefile, user, pass, True, 500)
       End Sub
   
       Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
           Dim localfile As String = My.Application.Info.DirectoryPath & "\testdatei.txt"
           Dim user As String = "benutzename"
           Dim pass As String = "passwort"
           Dim remotefile As String = "ftp://ftpserver/zielordner/testdatei.txt"
           My.Computer.Network.DownloadFile(remotefile, localfile, user, pass, True, 100, True)
           Process.Start(localfile)
       End Sub
   
   End Class

   
   
   Das ist zwar sicher nicht perfekt aber es fuktioniert (hab's getestet mit VB2010)
   
   mfg
   
   Beitrag zuletzt geändert: 22.4.2012 19:25:19 von hanibal63

10. Diskutiere mit und stelle Fragen: Jetzt kostenlos anmelden!

    lima-city: Gratis werbefreier Webspace für deine eigene Homepage

Dir gefällt dieses Thema?