'-------------------複製檔案－－－－－－－－
function copyfiles(tempsource,tempend)
dim fso
set fso = server.createobject("scripting.filesystemobject")
if fso.fileexists(tempend) then
response.write "目標備份檔案" & tempend & "已存在，請先刪除!"
set fso=nothing
exit function
end if
if fso.fileexists(tempsource) then
else
response.write "要複製的源資料庫檔案"&tempsource&"不存在!"
set fso=nothing
exit function
end if
fso.copyfile tempsource,tempend
response.write "已經成功複製檔案"&tempsource&"到"&tempend&""
set fso = nothing
end function
使用如下：
ASP基本函式
now 2.取得來訪用的ip request.servervariables remote host 3.獲得系統,瀏覽器版本 4.去除ie混動條 5.進入 跳出廣告 6.隨機數 randomize int rnd n 1 n為可改變量 7.向上混動 hhhhhhhhhhhhhhhhhhh 8.自動...
asp函式FileSystemObject詳解
set fs server.createobject scripting.filesystemobject 1 檔案是否存在 if fs.fileexists c winnt cursors 3dgarro.cur true then response.write file c winnt curs...
asp常用函式
array function 返回乙個陣列 syntax array list arguments 字元，數字均可 example dim myarray for i 1 to 7 redim preserve myarray i myarray i weekdayname i next resul...