请问为什么错了?
<%
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
%>