这些代码哪里有问题？为什么我一提交就出现乱码，而不是图像
这些代码哪里有问题？为什么我一提交就出现乱码，而不是图像<META HTTP-EQUIV="ContentType" CONTENT="image/gif">
<title>无标题文档</title>
</head>
<body>
<%
if request.QueryString("query")<>"text" then
%>
<form action="?query=text" method="post" enctype="multipart/form-data" name="form1" id="form1">
<input type="file" name="file">
<input type="submit" name="submit" value="提交">
<label></label>
</form>
<%
else
response.ContentType="image/gif"'设置输出类型为图象
data=request.BinaryRead(request.TotalBytes)'获取客户端传送的所有数据
tcrlf=chrb(13)&chrb(10)'回车符号代码
flag=leftb(data,instrb(data,tcrlf)-1)'获取图象数据结束标志
datastart=instrb(data,tcrlf&tcrlf)+4'获取图象数据开始位置
datalength=instrb(datastart+1,data,flag)-datastart'获取图象数据长度
response.BinaryWrite midb(data,datastart,datalength)'输出图象
end if
%>
