 麻烦高手解析下下面的这段代码，关于脚本语言中的binaryread
<%'--------------------------------------------------------------- ' AspStudio_Codepage="936" ' ' 档案名称：s.asp ' 原创作者：seavoice ' 作者邮件：mang_man@sina.com ' 创建日期：星期六，2007年05月05日 16:01:01 ' 版权所有(C)西北农林科技大学 '--------------------------------------------------------------%> <HTML>
<HEAD>
<Title>s.asp</Title>
<META http-equiv="Content-Type" content="text/html; charset=gb2312">
<META name="Generator" content="Asp Studio 1.0">
</HEAD> <BODY> <!-- 请在这里输入您的HTML代码 -->
<%
if request.QueryString("query")<>"s" then
%>
<FORM name="form1" action="?query=s" method="post">
<input type="file" name="file">
<label>
<input type="submit" name="submit" value="提交">
</label>
</FORM>
<div align="center">
<%
else
response.ContentType="image/gif" '设置输出的内容为图片类型
data=request.BinaryRead(request.totalbytes) '获取客户端传送的所有数据
tcrlf=chr(13) & chr(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
response.Write("你的浏览器名称：" & request.ServerVariables("HTTP_USER_AGENT") & "<br>")
response.Write("你请求的地址是：" & request.ServerVariables("URL") & "<br>")
response.Write("你的IP地址是：" & request.ServerVariables("REMOTE_ADDR") & "<br>")
response.Write("你的远程主机是：" & request.ServerVariables("REMOTE_HOST") & "<br>")
response.Write("你请求的字符是：" & request.ServerVariables("QUERY_STRING") & "<br>")
response.Write("你的客户端的路径信息是：" & request.ServerVariables("PATH_INFO") & "<br>")
response.Write("你执行脚本的名称是：" & request.ServerVariables("SCRIPT_NAME") & "<br>")
response.Write("你请求的服务器的端口号是：" & request.ServerVariables("SERVER_PORT") & "<br>")
response.Write("你的服务器使用的协议和版本是：" & request.ServerVariables("SERVER_PROTOCOL") & "<br>")
response.Write("你接受请求的服务器地址是：" & request.ServerVariables("LOCAL_ADDR") & "<br>")
response.Write("你刚才传送的字节数是：" & request.TotalBytes)
%>
</div>
</BODY> </HTML>
|
[返回] 中文XML论坛 - 专业的XML技术讨论区 →
XML.ORG.CN讨论区 - XML技术 → 『 HTML/XHTML/Ajax/Web 2.0/Web 3.0 』 → 麻烦高手解析下下面的这段代码，关于脚本语言中的binaryread
(订阅本版)
2007/5/5 23:51:00
新浪微博
