在编写的一个用HTTP下载文件的程序中,使用
Do
szBuf = String(256, 0)
lRet = recv(Sock, ByVal szBuf, Len(szBuf), 0)
If lRet > 0 Then sData = sData + Left$(szBuf, lRet)
Loop Until lRet <= 0
得到的文件比原文件小,相信是VB二进制处理的问题。如何才能得到BYTE格式的结果,请不吝赐教
Do
szBuf = String(256, 0)
lRet = recv(Sock, ByVal szBuf, Len(szBuf), 0)
If lRet > 0 Then sData = sData + Left$(szBuf, lRet)
Loop Until lRet <= 0
得到的文件比原文件小,相信是VB二进制处理的问题。如何才能得到BYTE格式的结果,请不吝赐教
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货