中科新闻网友邦全佑至珍和平安福:寻asp无组件上传文件程序
来源：百度文库 编辑：中科新闻网 时间：2024/04/27 23:38:17
我自己做了个asp网站,想有上传文件的功能,怎么做??
由于刚接触asp,请提供程序的人说明怎么用,谢谢
由于刚接触asp,请提供程序的人说明怎么用,谢谢
formSize=Request.TotalBytes()
formData=Request.BinaryRead(formSize)
DataHeader=LeftB(formData,InStrB(formData,Chrb(13)&Chrb(10)))
strFileData=MIDB(formData,LenB(DataHeader),LenB(formData)-LenB(DataHeader)*2-3)
HeaderPos2=InStrB(strFileData,ChrB(AscB("-"))&ChrB(AscB("T"))&ChrB(AscB("y"))&ChrB(AscB("p"))&C
hrB(AscB("e")))
HeaderPos3=InStrB(HeaderPos2,strFileData,Chrb(13))
DataHeader2=LeftB(strFileData,HeaderPos3+4)
strFileData=MIDB(strFileData,LenB(DataHeader2),LenB(strFileData))
Response.binaryWrite(strFileData)
去百度搜索吧，太多了