请问为什么错了?

daocaoming 2002-02-03 08:05:15
<%
Function bin2str(binstr)
skipflag=0
ccc = ""
If Not IsNull(binstr) Then
varlen=LenB(binstr)
For i=1 To varlen
If skipflag=0 Then
clow = MidB(binstr,i,1)
If AscB(clow) > 127 Then
ccc =ccc & Chr(AscW(MidB(binstr,i+1,1) & clow))
skipflag=1
Else
ccc = ccc & Chr(AscB(clow))
End If
Else
skipflag=0
End If
Next
End If
bin2str = ccc
End Function

crlf=chrb(13)&chrb(10)
formsize=request.totalbytes
formdata=request.binaryread(formsize)
formdata=bin2str(formdata)

filenamestart=instr(formdata,"filename="&chr(34))+len("filename="&chr(34))
filenameend=instr(filenamestart,formdata,chr(34))
filename=mid(formdata,filenamestart,filenameend-filenamestart)
response.write filename&"<br>"

filedatastart=instr(formdata,crlf&crlf)+4
filedataend=instr(filedatastart,formdata,crlf&crlf)
filedata=mid(formdata,filedatastart,filedataend-filedatastart)'调试的时候为提示这一句错了,请问什么地方错了?
response.write filedata
%>
...全文
56 1 打赏 收藏 转发到动态 举报
写回复
用AI写文章
1 条回复
切换为时间正序
请发表友善的回复…
发表回复
希偌 2002-02-03
  • 打赏
  • 举报
回复
错误信息是什么?

28,406

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧