ASP网页设计用完成文件上传
结论:和PHP一样,ASP简单而易于维护,很适合小型网站应用,通过DCOM和MTS技术,ASP甚至还可以完成小规模的企业应用,但ASP的致命缺点就是不支持跨平台的系统,在大型项目开发和维护上非常困难。上传材料来历精髓区稻草老农等人submit.htm
<html><title>example</title>
<body>
<formname="form1"method="post"action="upload.asp"enctype="multipart/form-data">
<inputtype=filename="file1">
<inputtype=submitname="submit"value="提交">
</form>
</body>
</html>
upload.asp
<%@Language=VBScript%>
<%
functionbinarytoasi(byvalvarstr)
asi=""
fori=1to3
asi=asi&chr(ascb(midb(varstr,i,1)))
next
binarytoasi=asi
endfunction
formsize=request.totalbytes
formdata=request.binaryread(request.totalbytes)取得上传数据
bcrlf=chrB(13)&chrB(10)
divider=leftB(formdata,clng(instrb(formdata,bcrlf))-1)
Position=instrb(formdata,bcrlf&bcrlf)+4上传文件数据入手下手位
filesize=instrb(Position+1,formdata,divider)-Position-4上传文件数据长度
exnamestart=instrb(1,formdata,chrb(46),1)+1
exnameend=instrb(exnamestart,formdata,chrb(34),1)
exname=midb(formdata,exnamestart,exnameend-exnamestart)
setdr=CreateObject("Adodb.Stream")
dr.Mode=3:dr.Type=1:dr.Open
setdr1=CreateObject("Adodb.Stream")
dr1.Mode=3:dr1.Type=1:dr1.Open
dr.Writeformdata
dr.Position=Position-1
dr.CopyTodr1,filesize
dr1.SaveToFile"d:/mailtemp/temp_"&session("userid")&"."&binarytoasi(exname),2文件保留
setdr=nothing:setdr1=nothing
%>
</p>缺乏可以共同遵循的行业标准,ASP还处在发展初期,大家对它的理解不同,如产品和服务标准,收费标准等,不利于行业的健康发展。 如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质,我们可以在实践中不断提升自己,不断充实自己。 作为IE上广为流传的动态网页开发技术,ASP以它简单易学博得了广大WEB程序爱好这的青睐,而且它对运行环境和开发品台的不挑剔,以及有大量有效的参考手册,极大的推广了它的发展。 我想问如何掌握学习节奏(先学什么再学什么)最好详细点? 运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中,便可快速完成网站的应用程序,无需编译,可在服务器端直接执行。容易编写,使用普通的文本编辑器编写,如记事本就可以完成。由脚本在服务器上而不是客户端运行,ASP所使用的脚本语言都在服务端上运行。 如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助: 运用经典的例子。并且自己可以用他来实现一些简单的系统。如果可以对他进行进一步的修改,找出你觉得可以提高性能的地方,加上自己的设计,那就更上一个层次了,也就会真正地感到有所收获。 如何学好ASP,以前也有人问过,把回答给你转过来看看能否对你有帮助: Request:从字面上讲就是“请求”,因此这个是处理客户端提交的东东的,例如Resuest.Form,Request.QueryString,或者干脆Request("变量名")
页:
[1]