asp文件夾重命名
⑴ asp重命名文件
將與ASP文件同目錄下的File1.txt更名為NewFile1.txt。
程序如下：(MoveFile.asp)
<%
'==================================================
'源碼：FSO移動文件，重命名文件示例
'時間：2005年12月17日
'==================================================
Set fs = Server.CreateObject("Scripting.FileSystemObject")
SFile = Server.MapPath("File1.txt")
NFile = Server.MapPath("NewFile1.txt")
on Error Resume Next
fs.MoveFile SFile, NFile
If Err.Number = 53 Then
Response.Write File & "文件不存在！"
Response.End
Elseif Err.Number = 58 Then
Response.Write File & "文件已存在！"
Response.End
Elseif Err.Number <> 0 Then
Response.Write "未知錯誤，錯誤編碼：" & Err.Number
Response.End
Else
Response.Write "成功重命名文件！" & SFile &"為" &NFile& ""
End If
%>
⑵ ASP上傳重命名問題
1
上傳的時候你用到input那個控制項了吧
他有個屬性
SaveAs
用法如下
inputFile.PostedFile.SaveAs(路徑＋文件名);
文件名防止重名可以在前面加上時間日期
String
fileTime
=
DateTime.Now.Year.ToString()
+
DateTime.Now.Month.ToString()
+
DateTime.Now.Day.ToString()
+
DateTime.Now.Hour.ToString()
+
DateTime.Now.Second.ToString()
+
DateTime.Now.Minute.ToString()
+
DateTime.Now.Millisecond.ToString();
2
傳文件後
將文件路徑
文件名等信息插入資料庫中
這樣可以查詢列表
文件刪除
用File.Delete(路徑＋文件名);
重命名用File.Move(path,
path2);
注意名空間
using
System.IO;
⑶ 用Asp代碼修改某個文件夾的名稱/使其自動重命名
用FSO
⑷ ASP.net如何重命名文件夾
樓主的這個問題可以說是C#的一個缺陷吧。
System.IO.
Directory
.Move("D:\\a","D:\\aaa")
這種方式只要是該文件夾下有任何文件都會報錯拒絕訪問。
一般的解決方法是：目錄，將拷貝到的目標地址設定成想要的文件名，然後刪除原文件。
該方法在原文件夾下無
正在使用
的文件時是可行的。但是如果有文件正在使用，或者原文件比較大的話，處理起來也很麻煩。
最簡單的解決方法：在
asp.net
中引用VB！
1.先在項目中添加引用：Microsoft.
VisualBasic
然後在所需使用的文檔中加上using
Microsoft.VisualBasic.Devices;
命名空間
2.就下面兩行
Computer
MyComputer
=
new
Computer();
MyComputer.
FileSystem
.
RenameFile
(FileName,
newFileName);
其中FileName是你所要重命名的文件的全路徑，newFileName僅僅是目標文件名；
⑸ asp怎麼更改文件名
給你一個參考：VBScript code
'創建fso操作對象
Dim fso
Set fso = CreateObject("scripting.filesystemobject")
Dim FULL_extendName
'傳入文件夾路徑，修改下面文件的名稱
Function fileUpdate(folderName ,extendName)
Dim folderObject
Set folderObject = fso.getFolder(FolderName)
FULL_extendName = extendName
get_folder_object folderObject
MsgBox "已成功修改"
End Function
'傳入文件集合,更改文件名稱
Function update_file_name(files)
Dim file
Dim newFile
For Each file In files
newFile = Left(file,InstrRev(file ,"\")) & get_rand_name(FULL_extendName)
fso.moveFile file , newFile
Next
End Function
'傳入文件夾對象,調用_update_file_name
Function get_folder_object(folderObject)
Dim folsers ,files
Set folders = folderObject.subFolders
Set files = folderObject.files
update_file_name files
For Each file In folders
get_folder_object(file)
Next
End Function
'獲取隨機文件名字
Function get_rand_name(nameExtend)
Dim fileName
Randomize
fileName = Int(rnd()*1000000)
fileName = change_number(fileName)
fileName = fileName &"."& nameExtend
get_rand_name = fileName
End Function
'改數字為字母
Function change_number(number)
Dim str
str = CStr(number)
Dim strArr
strArr = Array("a","b","c","d","e","f","g","h","i","j")
Dim strNew
strNew = ""
For i = 1 To Len(str)
If Mid(str ,i ,1) <> "" Then
strNew = strNew & strArr(CInt(Mid(str ,i ,1)))
End If
Next
change_number = strNew
End Function
'****************調用例子**********************
fileUpdate "E:\Movie" ,"com"
'銷毀fso操作對象
Set fso = Nothing
⑹ asp文件重命名時出錯,無許可權
有可能這個文件是收到系統保護的，你可以嘗試用將當前用戶添加系統許可權，（系統在計算機的所有組里擁有最高許可權），然後更改文件名，然後將當前用戶從system組去除（為了安全考慮，因為很多程序運行時擁有當前用戶的許可權，如果你當前用戶使用系統組，會很不安全）
添加到system組，開始--運行---CMD ，輸入命令，net localgroup systems username/add ，username是你當前登陸的用戶名，這樣就使你當前用戶擁有了系統許可權，然後改名，完了之後去許可權，把add 改為del即可。輸入命令時注意空格
或者你先看下系統進程，看有哪些進程有可能是阻礙你改名的，暫時關閉即可
⑺ 請教ASP重命名文件夾
Dim fso
Set fso = Server.CreateObject("Scripting.FileSystemObject") ' 創建 fso組件
fso.MoveFolder Server.MapPath("img"),Server.MapPath("pic") ' 用 movefolder方法移動文件夾，相當於改名。
⑻ asp文件批量重命名的問題
你用單引號把 On Error Resume Next 注釋掉，調試
如果有錯就會顯示出來的了，你就可以對應著修改代碼了。
在高度階段不要用 On Error Resume Next 。