Im using mswinsck.ocx and RFC977, and 2980.
I have the basics for a nifty NNTPd, but have run into
a stumbling block! When I attach a file to send with
a message (Base64 encoded, using WinVn), I only receive
512bytes of the transmission!
Something like this:
winsock(index).DataArrival - - - -
Dim InBuffer as string
Dim FileName as string
Dim FF as Integer
Winsock(0).GetData InBuffer
FF = FreeFile
Open "c:\Test.msg" for output as ff
print #ff, InBuffer
Close FF
Winsock(0).Close
Yes, this does NOT include all the details in the
RFCs, they are implimented in the program, this is
only a snippit to show how I am receiving the data.
If we do this:
text2.text = str(len(InBuffer))
I only show length to be 512bytes, and test.msg
is only 512bytes in size. I just sent a 62K
.BMP image as an attachment!
What in the WORLD am I doing wrong?
Thanks in advance!
Andrew
