当前位置: 首页 > 图文教程 > 网站运营 > 建站经验 > 放心去玩吧 手机版远程网站文件删除程序

建站经验
中国的服装行业B2C应如何发展?
新站长应注意不要优化过度
学生站长分享其地方门户站的经验
不要对网络营销产生误解
涉足互联网:在努力之前请先选择可行的方向
外部链接多就一定能提高网站权重么?
设计领域内的排名前100名的博客
网站收录挺正常 为什么流量却暴跌呢?
全球第一社交网站在中国
女性购物网站应该如何做?
20个火狐插件-网站前端开发必备
百度对其用户体验的完善
交互设计师的任务
交互设计师的发展前景
网页表单应如何去除?
三个关于交互设计师的话题
对比分析白社会与开心网
已经被大家习惯了的平庸的标准菜单设计
帮助设计师配色的专业网站
SNS社区网站中平台应用的发展趋势

建站经验 中的 放心去玩吧 手机版远程网站文件删除程序


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-10-17   浏览: 67 ::
收藏到网摘: n/a

这是一个很和谐很实用的网站管理程序,和我以前介绍的服务器管理程序不同的是,这个程序只有一个功能,就是实现远程Web方式删除文件(实际上是重命名文件,但效果和删除一样)的操作。功能简单实用,适合所有的支持ASP的中文网站。

这个程序是基于这样一个应用场景:假如工作几个月好不容易有了一个放假的日子,周末的时候你随旅游团去千里之外的张家界旅游,当你正在登山索道上观赏周边风景的时候,电话响了,你接到你托管服务器机房IDC的电话,说你的网站上有一条有害信息,需要立刻删除,并将该信息的链接地址发送给你,如果半小时内不删除的话,你的服务器就要被立刻拔网线。

而此时,你在深山老林里找到最近的一个能上网的场所也要好几个小时,并且这会将你原来兴致勃勃的旅行计划全盘打乱,多么令人扫兴和烦恼的事情啊。

如果你在网站上安装了这个小程序就轻松多了,打开手机,输入这个程序的地址,登录后,输入要处理链接的“相对地址”,然后点“删除”,就可以将这个文件删除了(实际上是重命名操作),并且留有备份,以备将来处理。

使用方法很简单,将下面的代码复制出来,命名为一个ASP文件,修改用户登录密码为你自己记得住的一个密码,然后上传到你网站的根目录下,之后就可以使用手机远程操作了。

程序的源代码如下:

 response.charset="GB2312"
response.buffer = True
FileName = request.ServerVariables("URL")
'=====用户登录密码
userpass = "password"
If request.querystring("action") = "login" Then
    If request.Form("loginpass") = userpass Then
        session("password") = userpass
        response.redirect FileName
    Else
        response.write "验证未通过."
        response.end
    End If
ElseIf request.querystring("action") = "do" Then

 

'=====重命名文件操作
Set fs = Server.CreateObject("Scripting.FileSystemObject")
SFile = Server.MapPath(request.Form("filename"))
NFile = SFile & ".bak"
On Error Resume Next
fs.MoveFile SFile, NFile
If Err.Number = 53 Then
    response.write SFile & "文件不存在."
ElseIf Err.Number <> 0 Then
    response.write "发生错误. 请查看错误信息:" & Err.Number & " " & Err.Description
    Err.Clear
Else
    response.write "成功重命名文件 " & SFile & " 为 " & NFile & ""
End If

response.end

'=====登陆验证密码
Else
    If session("password") <> userpass Then
        response.write "<form action=" & FileName & "?action=login method='post'>需要密码:<input name='loginpass' type='password'>&nbsp<input type='submit' value='登录'></form>"
    Else
        response.write "<form action=" & FileName & "?action=do method='post'> "
        response.write "<input type=text name=filename><br><input type=submit value='删除'></form>"
    End If
End If

(作者博客:www.williamlong.info)