ASP网页编程之哈哈写了个新的二文件上传！才30行代码...

因为ASP脚本语言非常简单，因此其代码也简单易懂，结合HTML代码，可快速地完成网站的应用程序。还无法完全实现一些企业级的功能：完全的集群、负载均横。上传<%
upload.asp
FunctionIntMin(n,y)
Ifn<yandn>0Then
IntMin=Int(n)
ElseIfy>0Then
IntMin=Int(y)
Else
IntMin=n
EndIf
EndFunction

FunctiongetFormValue(Name)
DimformSize,formData,DataHeader,DataStart,DataEnd,formNameStart,formNameEnd,formName,firstFilter
formSize=Request.TotalBytes()
formData=Request.BinaryRead(formSize)
firstFilter=true
Fori=1toLen(Name)
tmp=tmp&ChrB(AscB(Mid(Name,i,1)))
Next
Name=tmp
DataEnd=0
DataStart=0
DoWhileformSize>0
formData=RightB(formData,formSize-DataEnd-DataStart+1)
formSize=formSize-DataEnd-DataStart+1
DataHeader=LeftB(formData,InStrB(formData,Chrb(13)&Chrb(10))-1)
DataStart=InStrB(formData,ChrB(13)&ChrB(10)&ChrB(13)&ChrB(10))+4
DataEnd=InStrB(DataStart+1,formData,DataHeader)-DataStart
IfDataStart<0orDataEnd<=0ThenExitDo
filteredData=MidB(formData,DataStart,DataEnd-1)
formNameStart=InStrB(formData,ChrB(AscB("n"))&ChrB(AscB("a"))&ChrB(AscB("m"))&ChrB(AscB("e"))&ChrB(AscB("="))&ChrB(AscB("""")))+6
formNameEnd=intMin(InStrB(formNameStart,formData,ChrB(13)&ChrB(10))-formNameStart-1,InStrB(formNameStart,formData,ChrB(AscB(";")))-formNameStart-1)
formName=MidB(formData,formNameStart,formNameEnd)
IfName=formNameThen
getFormValue=filteredData
ExitFunction
EndIf
Loop
getFormValue=Name&"NotFound!"
EndFunction
Response.binaryWrite(getFormValue("loadfromfile"))这个loadfromfile就是表单名啦~
%>

</p>ASP由于使用了COM组件所以它会变的十分强大，但是这样的强大由于WindowsNT系统最初的设计问题而会引发大量的安全问题。只要在这样的组件或是操作中一不注意，哪么外部攻击就可以取得相当高的权限而导致网站瘫痪或者数据丢失；

最近在学asp，不要问我为什么不直接学.net，因为公司网站是asp做的所以有这个需要，卖了本书asp入门到精通，对里面的六大内置对象老是记不住，还有很多属性和方法看的头晕。

以HTML语言整合(HTML负责界面上，ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。

我可以结合自己的经验大致给你说一说，希望对你有所帮助，少走些弯路。

仓酷云

ASP（ActiveServerPages）是Microsfot公司1996年11月推出的WEB应用程序开发技术，它既不是一种程序语言，也不是一种开发工具，而是一种技术框架，不须使用微软的产品就能编写它的代码，能产生和执行动态、交互式、高效率的站占服务器的应用程序。

学习ASP其实应该上升到如何学习程序设计这种境界，其实学习程序设计又是接受一种编程思想。比如ASP如何学习，你也许在以前的学习中碰到过。以下我仔细给你说几点:

学习是为了用的，是为了让你的程序产生价值，把握住这个原则会比较轻松点。除此之外，课外时间一定要多参加一些社会实践活动，来锻炼自己的能力。

我可以结合自己的经验大致给你说一说，希望对你有所帮助，少走些弯路。

完全不知道到底自己学的是什么。最后，除了教程里面说的几个例子，还是什么都不会。

多看多学多思。多看一些关于ASP的书籍，一方面可以扩展知识面一方面可以鉴借别人是如何掌握、运用ASP的;多学善于关注别人，向同学老师多多学习，不论知识的大小;多思则是要将学到的知识灵活运用。