一个asp+ 版本的 Active Server Explorer---asp-为中国网络技术提供点滴动力-iyit.net-易特网络技术！

　　通行证: 用户密码

域名空间　下载中心　 社区论坛　信息公告 MY小屋

联系我们
设为首页
加入收藏

QQ,ASP,PHP,JSP,XML,SQL,.Net,编程程序网页图象建站经验私服




	当前位置：首页>>编程开发>>NET专区>>正文	新版上线！[旧版]

注:打开慢时请稍等

一个asp+ 版本的 Active Server Explorer

http://www.iyit.net 日期：2006-6-12 2:01:06 来源：点击：

【参加讨论】/*
豆腐制作都是精品
http://www.asp888.net 豆腐技术站
如转载请保留版权信息
*/
很多人可能都用过 chinaAsp 出的 ase 可以对服务器上的文件进行各种操作,在这里我们也来
讲一个在 asp plus 下实现 ase 的程序由于时间仓促和本来就是出于演示的目的本程序只演示了最简单的情况至于上传和编辑文本文件我在以前的文章里都已经讲过了，大家可以到 http://www.asp888.net 查看技术栏目里面的文章
首先是列出机器上的盘符
<% @Page Language="C#" %>
<% @Import Namespace="System.IO" %>
<%
string[] LocalDriver = Directory.GetLogicalDrives();
int intNum = LocalDriver.Length;
Response.Write("<ul>");
for (int i=0; i < intNum; i++)
{
%>
<li><a href="dir.aspx?dir=<%=Server.UrlEncode(LocalDriver[i])%>"><%=LocalDriver[i]%></a></li>
<%
}
Response.Write("</ul>");
%>
列出所选择的盘符上的目录
<% @Page Language="C#" %>
<% @Import Namespace="System.IO" %>
<%
string strDir2List = Server.UrlDecode(Request.QueryString.Get("dir"));
Directory thisOne = null;
try
{
thisOne = new Directory(strDir2List);
// 得到当前的目录创建时间
Response.Write("<p>当前所在目录: " + thisOne.ToString() + "</p>");
Directory[] Dir = thisOne.GetDirectories();
Response.Write("<ul>");
for (int i=0; i < Dir.Length; i++)
{
Response.Write("<li><a href=\"dir.aspx?dir=");
Response.Write(Server.UrlEncode(Dir[i].FullName));
Response.Write("\">" + Dir[i].Name);
Response.Write("</a><br>");
}
Response.Write("</ul>");

File[] Files = thisOne.GetFiles();
Response.Write("<ul>");
for (int i=0; i < Files.Length; i++)
{
Response.Write("<li><a href=\"viewfile.aspx?file=");
Response.Write(Server.UrlEncode(Files[i].FullName));
Response.Write("\">" + Files[i].Name);
Response.Write("</a><br>");
}
Response.Write("</ul>");
}
catch (Exception e)
{
Response.Write("错误: <i>");
Response.Write(e.ToString() + "</i>");
Response.End();
}
%>
查看文件的详细信息：
<% @Page Language=VB %>
<% @Import Namespace="System" %>
<% @Import Namespace="System.IO" %>
<html>
<head><title>编辑文件</title></head>
<body>
<%
dim File as string
File = Request.QueryString.Get("file")
thisOne = new File(File)
'string File = Request.QueryString.Get("file");
'File thisOne = new File(File);
%>
<table>
<tr><td>文件名称:</td><td><%=thisOne.Name%></td></tr>
<tr><td>文件的全名:</td><td><%=thisOne.FullName%></td></tr>
<tr><td>所在目录:</td><td><%=thisOne.DirectoryName%></td></tr>
<tr><td>文件创建时间:</td><td><%=thisOne.CreationTime.ToString()%></td></tr>
<tr><td>文件大小:</td><td><%=thisOne.Length.ToString()%> Bytes</td></tr>
<tr><td>最近一次的存取时间:</td><td><%=thisOne.LastAccessTime.ToString()%></td></tr>
<tr><td>最近一次更新时间:</td><td><%=thisOne.LastWriteTime.ToString()%></td></tr>
</table>
<%
ss=split(thisOne.Name,".")
fileent=lcase(ss(ubound(ss)))
if fileent="txt" or fileent="asp" or fileent="aspx" then
theReader = thisOne.OpenText()
Do
strIn = theReader.ReadLine()
response.write(strIn)
Loop Until strIn = Null

%>
<form action="savefile.asp" method=post>
<textarea cols=40 rows=30><%=strIn%></textarea>
<input type=hidden name=filename value="<%=thisOne.FullName%>">
<br>
<input type=submit value="保存更改">
</form>

<%
end if
%>
</body>
</html>
好了一个完整的 ase 程序还需要删除拷贝移动和上传编辑相信大家在看完这个程序以后一定会有办法经过简单的改动就可以实现
这个程序的完整例子可以在 http://www.asp888.net/download/asp/ase.zip 下载
谢谢大家

作者:豆腐()

编辑：黑鹰　[发送给好友] [打印本页] [关闭窗口] [返回顶部]
上一篇：asp+中的session 的使用和原理() 不需要cookie也可以使用session
下一篇：妙用asp+的global.asax
转载请注明来源：www.iyit.net
特别声明： 本站除部分特别声明禁止转载的专稿外的其他文章可以自由转载，但请务必注明出处和原始作者。文章版权归文章原始作者所有。对于被本站转载文章的个人和网站，我们表示深深的谢意。如果本站转载的文章有版权问题请联系编辑人员，我们尽快予以更正。

　相关文章

使用 ASP.NET 加密口令	[ASP.NET] Session 详解	从ASP迁移至ASP+
从ASP迁移至ASP+ ----------进入DataSe	从ASP迁移至ASP+ --将HTML表格转换为AS	从ASP迁移至ASP+ --急不可耐了？转换其
从ASP迁移至ASP+ --处理会话变量（Sess	ASP+ 与 Java（一）	ASP+ 与 Java（二）
asp+的论坛列表程序---代码部分	asp+的论坛列表程序---页面部分	用c#写的asp+域名查询程序
ASP+联结数据库	asp+文件上传增强实例	从ASP迁移至ASP+ --处理会话变量（Sess
ASP.NET学习手记:验证用户表单输入	asp+ 操作Cookie 方法大全	asp+ 现在已经被官方正式更名为 asp.ne
在ASP+ 中我们如何使用 Class 而不是组	asp+ 如何跨站抓取页面	在 ASp+ 中的一些可能会用到的小函数
列出asp+中所有request 的属性和数值	妙用asp+的global.asax	asp+中的session 的使用和原理() 不需要

推荐新闻

从ASP迁移至ASP+ ----------进入DataS

从ASP迁移至ASP+ --将HTML表格转换为A

为ASP.NET 2.0菜单控件增加target属性

将Asp.net页面输出为HTML

在ASP.NET中防止注入攻击

ASP.NET 2.0 中的异步页功能应用

exeplorer.exe错误的问题的总结、解决

Authorware7.0基础与实例教程连载第5

解决Windows中的explorer.exe出错

ASP.NET 2.0 中的异步页功能应用

Windows下的虚拟主机设置全功略

危险无处不在 Html标签带来的安全隐患

网络游戏是06年互联网最具发展潜力业务

巧用ACDSee 8.0截取QQ表情每一帧

解除瑞星诺顿遗留下的杀毒兼容问题

第一款开源AJAX安全扫描工具Sprajax

	友情链接

	Copyrights © 2004-2006 iYiT.Net All Rights Reserved. 网站合作、广告联系QQ:147007642、466949678
	易特网络技术冀ICP备05011851号		浏览器不支持嵌入式框架，或被配置为不显示嵌入式框架。