String vom Server auslesen

Otti · 19. Februar 2015, 10:36

Hallo zusammen.

Bräuchte mal wieder Eure Unterstützung bei , für Euch vermutlicher weise, leichten Sache.
Möchte eine txt die auf dem Server liegt , auslesen.
Weis nicht wie ich den String und StreamReader zusammen fügen soll.

Quellcode

web.Credentials = New Net.NetworkCredential("BN", "PW")
web.DownloadStringAsync(New Uri([url]ftp://AAAAAA.txt[/url]))

Quellcode

Dim laden As New StreamReader("XXXXXX.txt")
T1.Text = laden.ReadLine()

Soweit in den einzelnen Schritten klar.
Problem ist meins das ich nicht weis , noch nicht mal ansatzweise, wie ich die beiden Aktionen zusammen setzten soll.
Wäre schon wenn mir jemand einen Tip oder Idee geben könnte

Danke euch bis dann

EaranMaleasi · 19. Februar 2015, 11:01

Punkt 1: ich hoffe diese Anwendung wird nie öffentlich. Für weitere Infos Post#5
Punkt 2: Was genau hast du vor? einen Versionsvergleich?

v-go · 19. Februar 2015, 11:10

Verstehe ich nicht ganz, du musst vorher die Datei runterladen und dann liest du Sie einfach per " My.Computer.FileSystem.ReadAllText("")" aus.

Zitat entfernt. ~Thunderbolt

Alex-Digital · 19. Februar 2015, 11:28

DownloadString lädt keine Dateien runter, sondern gibt dir den Inhalt der Datei als String zurück.

Also:

VB.NET-Quellcode

Dim str As String = wb.DownloadString(URL)

Bei der asynchronen Variante musst du glaube ich den String beim DownloadStringCompleted auslesen.
Oder du arbeitest mit dem synchronen DownloadString und benutzt async / await mit 4.5.

Thunderbolt · 19. Februar 2015, 12:50

EaranMaleasi schrieb:

Punkt 1: ich hoffe diese Anwendung wird nie öffentlich

Damit ist keine Beleidigung gemeint, sondern das: Sicherheit: Gefahrenquelle Quellcode
Sonst wird das der nächste Warez-Server.

Otti · 19. Februar 2015, 14:27

Hallo zusammen.

Nein nein ist nur für den eigengebrauch. ich kenne die tücken und wie schnell man an die zugangsdaten kommt.
werde es mal ausprobieren und mich melden

danke im vorraus

Otti · 20. Februar 2015, 09:45

@Alex-Digital

Moin Alex
Habe heute mal versucht mit deiner Idee zu basteln aber erlig gesagt komm ich nicht hinter.
Mit dem downloadcomplet , klar verstehe ich habe ich auch bei einer anderen async Anwendung vorgenommen.
Weis leider aber immer noch nicht wie ich die beiden Sachen zusammen setzten soll ???
Hab glaube ich voll den blackout

EaranMaleasi · 20. Februar 2015, 10:03

Otti schrieb:

wie ich den String und StreamReader zusammen fügen soll

Otti schrieb:

wie ich die beiden Sachen zusammen setzten soll

EaranMaleasi schrieb:

Punkt 2: Was genau hast du vor? einen Versionsvergleich?

Klär uns bitte über dein genaues Vorhaben auf.

Otti · 20. Februar 2015, 10:19

Guten morgen zusammen.

Hab eine txt auf dem Server die ich nur auslesen will und die Einträge in meine Textfelder laden möchten.

Hoffe ich habe es nun verständlich erklärt.

Danke

ErfinderDesRades · 20. Februar 2015, 10:21

Also doch.

Da gibts nix zusammenzusetzen. Wenn du den Text einer Datei auffm Server lesen willst ist StreamReader einfach komplett fehl am Platz.

Und lies sie mit http aus, da gibts keine Gefahr, dass jmd deinen Server kapert.

Otti · 20. Februar 2015, 19:33

Ich glaube ich werde hier falsch verstanden, liegt evt. daran das ich es falsch formuliert habe.

In der *.txt stehen in 5 zeilen unterschiedliche zahlen, die ich in 5 verschiedenen TextBoxen widergeben möchte, also TextBox1 erste Zeile, Textbox2 zweite Zeile usw. bis Textbox5 mit der letzten Zahl aus der txt

Quellcode

server.Credentials = New Net.NetworkCredential("XXX", "XXX")
Dim Text = server.DownloadString("ftp://XX/YY/QQ.txt")
TextBox1.Text = Text

So wie ich es bis jetzt habe und verstehe , stehen alle 5 zahlen in einer TextBox.

Nikx · 20. Februar 2015, 20:08

Split an den Lines und dann durchiterieren?
Halte ich für ein schlechtes Konzept. Sowas sollte mMn nicht vorkommen.

Grüße

Otti · 20. Februar 2015, 20:14

@Nikx

Verstehe nicht wenn es klappen würde was wäre da so schlimm dran??

Quellcode

Try
server.Credentials = New Net.NetworkCredential("XXX", "XXX")
Dim Text = server.DownloadString("ftp://blabla.txt")
Dim laden As New StreamReader(Text)
TextBox1.Text = laden.Readline()
TextBox2.Text = laden.ReadLine()
TextBox3.Text = laden.ReadLine()
TextBox4.Text = laden.ReadLine()
TextBox5.Text = laden.ReadLine()
Catch
End Try

ErfinderDesRades · 20. Februar 2015, 20:16

Otti schrieb:

Verstehe nicht wenn es klappen würde was wäre da so schlimm dran??

wär nicht schlimm.
Wenns klappen würde.

(naja, der TryCatch ist schon schlimm...)

probierma:

VB.NET-Quellcode

Imports Microsoft.VisualBasic.ControlChars
Public Class Form1
Private Sub DispatchLines(derDowngeloadeteText As String)
Dim lines = derDowngeloadeteText.Split(CrLf.ToCharArray, StringSplitOptions.RemoveEmptyEntries)
TextBox1.Text = lines(0)
TextBox2.Text = lines(1)
'usw
End Sub

Nikx · 20. Februar 2015, 20:21

@ErfinderDesRades Eine gute Architektur wäre das dann aber auch nicht gerade. Ich habe sowas noch nie gebraucht und bin der Meinung, dass man
sowas eleganter lösen kann.

Grüße

ErfinderDesRades · 20. Februar 2015, 20:30

ja, mach doch einen Positiv-Vorschlag

Otti · 21. Februar 2015, 10:42

Moin zusammen

Ist klasse...

Quellcode

server.Credentials = New Net.NetworkCredential("XXX", "XXX")
Dim Text = server.DownloadString("ftp://blabla.txt")
Dim lines = Text.Split(CrLf.ToCharArray, StringSplitOptions.RemoveEmptyEntries)
TextBox1.Text = lines(0)
TextBox2.Text = lines(1)
TextBox3.Text = lines(2)
TextBox4.Text = lines(3)
TextBox5.Text = lines(4)

Habe nur ein Problem damit...
Wenn in meiner *.txt eine Zeile leer ist rückt alles einen auf.
Heist wenn ich in zeile 3 der txt , nichts stehen habe, wird automatisch der Inhalt der 4. zeile in der dritten angezeigt...

Wie kann das sein? ich vergebe doch die lines??

ErfinderDesRades · 21. Februar 2015, 10:45

naja - was meinst du, was StringSplitOptions.RemoveEmptyEntries bewirkt?

Mit Leerzeilen als Bestandteil der Anforderung kommst du auch jetzt erst rüber.

Otti · 21. Februar 2015, 10:47

Das ist ja das Problem ich verstehe es nicht...
Ist wahrscheinlich noch zuviel für einen Anfänger wie ich es bin.
Erkläre es mir doch bitte mal

ErfinderDesRades · 21. Februar 2015, 11:03

"Remove Empty Entries" ist englisch, und bedeutet "entferne leere Einträge".

Na, klingelts?

String vom Server auslesen

String vom Server auslesen

Quellcode

Quellcode

VB.NET-Quellcode

EaranMaleasi schrieb:

Otti schrieb:

Otti schrieb:

EaranMaleasi schrieb:

Quellcode

Quellcode

Otti schrieb:

VB.NET-Quellcode

Quellcode

Ähnliche Themen

7 Benutzer haben hier geschrieben