Posted by Finn on 2001-04-04
my guess, unless i missed it you dont ever clear the variable sArriving so
where you have
ElseIf Left$(strData, 4) = "FILE" Then
bFileArriving = True
sFile = Right$(strData, Len(strData) - 4)
add in the line
sArriving = ""
----- Original Message -----
From: <tcg@xxxx.xx.xx>
To: <finn@xxxxxxxxx.xx.xx>
Sent: Wednesday, April 04, 2001 4:41 AM
Subject: TCG digest 941
> Contents:
> Winsock help Please? Specificaly TCP/IP File Transfer with VB 6.0 ("Duston
S. Horacek" <dhoracek@xxxxx.xxx>)
>
> >
> Date: Tue, 3 Apr 2001 20:42:43 -0700
> From: "Duston S. Horacek" <dhoracek@xxxxx.xxx>
> Subject: Winsock help Please? Specificaly TCP/IP File Transfer with VB 6.0
>
> Greetings, I've written a program that allows a person to connect to
another
> who also uses this program, and they can then send a file. The Program
works
> great, as you can connect over a network, or the internet. When you send
the
> file initialy it works fine, sending the file correctly. HOWEVER when you
> send it a second time the file is larger then it should be usualy double.
> ANY help is appreciated, and below I will include a copy of the pertinent
> Code.
>
<snip VB code>
Previous post | Next post | Timeline | Home