[求助]关于无组件上传图片的代码! 求解~
<%
dim FormSize,FormData
FormSize=Request.TotalBytes
FormData=Request.BinaryRead(FormSize)
bnCRLF=chrB(13) & chrB(10)
Divider=LEFTB(FormData,INSTRB(FormData,bnCRLF)-1)
DataStart=INSTRB(FormData,bnCRLF & bnCRLF)+4
DataEnd=INSTRB(DataStart+1,FormData,divider)-DataStart
Response.ContentType="image/gif"
Response.BinaryWrite MIDB(FormData,DataStart,DataEnd)
%>
以上四段红代码,小弟我实在理解不好~请高手帮我一段一段的指点一下,给个注释,越详细越好~~ 谢了~