[VB.NET] Remote File Download

[hackerking]

Jo hey Leute..
ich code grade einen kleinen chat, welcher auch einen file transfer hat. ich mach es so, dass ich beim client die datei mit FileGet einlese:

                        FileOpen(1, Replace(tmpArr(1), "\\", "\"), OpenMode.Binary)
                        FileData = Space(LOF(1))
                        FileGet(1, FileData)
                        FileClose(1)
SendMessage("Down|||" & Len(FileData) & "|||")

und beim server kommt dann das an:

 Case "Down"
ThreadChangeLabel(CInt(tmpArr(3)) & "B")
ChangeMax(CInt(tmpArr(3)))
ThreadProgress(0)
tmp = 0
FileOpen(1, My.Application.Info.DirectoryPath & "\" & fromTrans.lblFilename.Text, OpenMode.Binary)
SendMessage("StartDL|||", CInt(fromTrans.Tag))
Download = True

dann beim client wieder:

                    Case "StartDL"
                        SendMessage(FileData)

und beim server hab ich dann nnach dem die naricht bekommen wurde diesen code:

                If Download = True Then
                    tmp = tmp + Len(tmpMsg)
                    ThreadProgress(CInt(tmp))
                    If CInt(Replace(fromTrans.lblFilesize.Text, "B", "")) = tmp Then
                        FilePut(1, tmpMsg)
                        FileClose(1)
                        Download = False
                    Else
                        FilePut(1, tmpMsg)
                    End If
                End If

das klappt auch aber nur mit 1 kb datein... wenn sie größer sind, dann bekomm ich den fehler, das das programm bei 99 % stehen bleibt (ablesbar an progressbar) und dann einfach nichts mehr passiert ;(

[blackberry]

Man programmiert einen Chat mit Sockets und nicht mit DownloadFile.

[hackerking]

Wo DownloadFile? Was meinste damit?
Das ist doch mit sockets oO

Ich will ja nur eine datei vom remote system downloaden...

[blackberry]

So wie ich das verstanden habe willst du die Nachrichten in einer Datei speichern, dann zum Gespächspartner schicken und dann verarbeiten.

Einen Chat schreibt man aber über Sockets, d.h. mit einem eigenen Netzwerkprotokoll.

[hackerking]

Nein...
Ich will Datein versenden also eine File-Verschicken Funktion..
Der Chat ist natürlich über Sockets...

[blackberry]

Dann sich doch einen "Header" mit, der die Länge der Datei angibt und häng den Inhalt hinten dran.

Sagen wir mal so:

[NamensLänge]
[DateiLänge]
[HIER DER NAME - "NamensLänge" Bytes lang]
[HIER DER INHALT - "DateiLänge" Bytes lang]

[hackerking]

ok und was soll das bringen? ich meine das macht ja wieder keinen unterschied...
namen brauch ich nicht, und dateilänge schick ich mit...