mPath&file.FileName) paths=server.mappath("../")&"\bookpic\"&year(now)&month(now)&"\"&spp set fsobj=server.CreateObject("scripting.filesystemobject") if fsobj.fileExists(""&paths&"") then fsobj.deletefile(""&paths&"") end if set fsobj=nothing response.write "
" iCount=iCount+1 end if set file=nothing next set upload=nothing ''删除此对象 response.write "" 'Htmend iCount&" 个文件上传成功!" sub HtmEnd(Msg) set upload=nothing response.write " "&Msg&" [关闭窗口]" response.end end sub Function GetPP dim s s=Request.ServerVariables("path_translated") GetPP=left(s,instrrev(s,"\",len(s))) End function
第三章 ASP技术综述 3.1 ASP的产生 近年来随着Internet技术的飞速发展及用户需求的不断升级，Web页面技术也不断的推陈出新，使得Web站点的功能越来越强大，能够提供的服务种类越来越繁多。从HTML、Client Script 到CGI,从JAVA的诞生到ActiveX, Web页面设计人员不断受到冲击，微软公司在总结了以往技术，重新思考Web页面设计的真正需要后，推出了Active Server Pages (ASP)，一种用以取代CGI(Common Gateway Interface，通用网关接口)的技术。 简单讲，ASP是位于服务器端的脚本运行环境，通过这种环境，用户可以创建和运行动态的交互式 Web 服务器应用程序，如交互式的动态网页，包括使用 HTML 表单收集和处理信息，上传与下载等等。更重要的是，ASP使用的ActiveX技术基于开放设计环境，用户可以自己定义和制作组件加入其中，使自己的动态网页几乎具有无限的扩充能力，这是传统的Web编写工具所远远不及的地方。使用ASP还有个好处，就在于ASP可利用ADO(Active Data Object,微软的一种新的数据访问模型)方便快捷地访问数据库,从而使得开发基于WWW的应用系统成为可能，这也是本文选择ASP作为开发工具最重要的原因之一。 3.2 ASP与IIS 3.2.1 IIS简介 Wsb服务器是Web应用程序的心脏。IIS(Internet Information Server)是微软推出的Windows NT Option Pack的主要成员，作为Win2000server的扩展，自推出以来已经有
