_asp技巧_黑客防线网安服务器维护基地

服务器维护网站维护数据维护系统安全配置
专业定制网站企业建站一条龙、软件定制开发、系统集成
稳定虚机备案一条龙，稳定快捷通道
服务理念诚信守诺客户至上专业精神专心贯注

首页编程学习 asp技术 asp技巧

作者：黑客防线网安ASP教程网来源：黑客防线网安ASP教程网浏览次数：0

本篇关键词：ASP 代码文件夹

C/C++ Code复制内容到剪贴板

<%
Name1="原文件名"
Name2="目标文件名"
if Name1<>"" and Name2<>"" then
Sub RenameFolder(ByVal strFolderPath, ByVal strNewName)
Dim objFileSystem
Set objFileSystem=Server.CreateObject("Scripting.FileSystemObject")
' 如果路径不包含冒号, 则认为 strFolderPath 是虚拟路径.
' 故调用 Server.MapPath() 方法将此路径转为绝对路径
If Instr(1,strFolderPath,":")=-1 Then
strFolderPath=Server.MapPath(strFolderPath)
End If
Dim objFolder
Set objFolder=objFileSystem.GetFolder(strFolderPath)
objFolder.Name=strNewName
Set objFolder=nothing
Set objFileSystem=nothing
End Sub
RenameFolder Server.MapPath(Name1),Name2
response.write "已经成功地把 "+Name1+" 更名为 "+Name2+" ！"
end if
%>

希望这篇的文章能够对您有所帮助，如果您觉得这篇网站维护教程有用的话，别忘了推荐给您的朋友哦！如果您有好的经验方法，不妨拿出来和大家一起分享：假如每个人都拿出一个经验，那么我们都将额外的获取一堆他人的经验。
请记住本站永久域名：（黑客防线网安服务器维护方案维护基地）Www.Rongsen.Com.Cn

黑客防线网安服务器维护方案本篇连接：http://kj.rongsen.com.cn/show-19657-1.html

网站维护教程更新时间:2013-03-18 16:17:33 【打印此页】【关闭】

2
顶一下0
踩一下

上一篇：ASP无法更新ACCESS数据库解决方法
下一篇：数据库连接出错，请检查Conn.asp文件中的数据库参数设置的解决办法