ASP网页设计WEB文件办理器2.0版
asp可以使用微软的activeX使得网页功能无比强大，不过安全性也较差，而且是基于的windows服务器，所以性能稳定性也一般web<title>WEB文件办理器2.0版http://asp2004.net</title><metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
<styletype="text/css">
<!--
a{
font-size:9pt;
color:#3300CC;
text-decoration:none;
}
body{
font-size:9pt;
margin-left:0px;
margin-top:0px;
margin-right:0px;
margin-bottom:0px;
line-height:20px;
background-color:#EEEEEE;
}
td{
font-size:9pt;
line-height:20px;
}
.tx{
border-color:#000000;
border-left-width:0px;
border-top-width:0px;
border-right-width:0px;
border-bottom-width:1px;
font-size:9pt;
background-color:#EEEEEE;
}
.tx1{
font-size:9pt;
border:1pxsolid;
border-color:#000000;
color:#000000;
}
-->
</style>
<%
’版权声明：本代码仅供进修研讨之用，自己不合错误因利用本程序而酿成的任何成果卖力。未经作者书面允许不得用于贸易用处。
’QQ：103895
’email:quxiaohui_0@163.com
’http://asp2004.net
Server.ScriptTimeout=999
action=Request("action")
temp=Split(Request.ServerVariables("URL"),"/")
url=temp(UBound(temp))
Constpass="asp2004.net"’上岸暗码
’上岸考证
CallChkLogin()
Setfso=CreateObject("Scripting.FileSystemObject")
SelectCaseaction
Case"新建文件"
Callfileform(Request("path")&"")
Case"savefile"
Callsavefile(Request("filename"),Request("content"),Request("filename1"))
Case"新建文件夹"
Callnewfolder(Request("path")&"")
Case"savefolder"
Callsavefolder(Request("foldername"))
Case"编纂"
Calledit(Request("f"))
Case"重定名"
Callrenameform(Request("f"))
Case"saverename"
Callrename(Request("oldname"),Request("newname"))
Case"剪切"
session("f")=request("f")
session("action")=action
Response.Redirect(url&"?foldername="&Request("path"))
Case"复制"
session("f")=request("f")
session("action")=action
Response.Redirect(url&"?foldername="&Request("path"))
Case"粘贴"
Callaffix(Request("path")&"")
Case"删除"
CallDelete(request("f"),Request("path"))
Case"uploadform"
Calluploadform(Request("filepath"),Request("path"))
Case"saveupload"
Callsaveupload()
Case"下载"
Calldownload(request("f"))
Case"打包"
DimStr,s,s1,s2,rep
CallDabao(Request("f"),Request("path"))
Case"解包"
CallJiebao(Request("f"),Request("path"))
Case"加入"
Calllogout()
CaseElse
Path=Request("foldername")
IfPath=""ThenPath=server.MapPath("./")
ShowFolderList(Path)
EndSele</p>对用户来说可预见费用、节约费用，可以做到花少钱办大事。由于省去了购买软件和硬件等的前期费用，用户可以租用较高级的应用软件。ASP的收费是根据软件的类型、客制化程度、用户数量、服务期限来定的，对客户来说这笔费用是可以预见的。方便于客户应用软件的升级。 尽管MS自己讲C#内核中更多的象VC，但实际上我还是认为它和Java更象一些吧。首先它是面向对象的编程语言，而不是一种脚本，所以它具有面向对象编程语言的一切特性，比如封装性、继承性、多态性等等，这就解决了刚才谈到的ASP的那些弱点。 Response:从字面上讲是“响应”，因此这个是服务端向客户端发送东西的，例如Response.Write 如何更好的使自己的东西看上去很不错等等。其实这些都不是问题的实质，我们可以在实践中不断提升自己，不断充实自己。 以HTML语言整合(HTML负责界面上，ASP则负责功能上)形成一个B/S(浏览器/服务器)模式的网页程序。 下面简单介绍一下我学习ASP的方法,希望对想学习ASP的朋友有所帮助... Session:这个存储跟客户端会话过程的数据，默认20分钟失效 不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍
页:
[1]