<%
if request("type")="save" then
CnSoftMDBname=request("CnSoftMDBname")
CnSoftMDBnameNew=request("CnSoftMDBnameNew")

if CnSoftMDBname="" or CnSoftMDBnameNew="" then
CnSoftMsg="错误:文件名不能为空."
end if

if CnSoftMDBname=CnSoftMDBnameNew then
CnSoftMsg="错误:文件名相同."
end if

if CnSoftMsg="" then
Set fs=Server.CreateObject("Scripting.FileSystemObject")
fs.CopyFile Server.MapPath(CnSoftMDBname),Server.MapPath(CnSoftMDBnameNew)
CnSoftMsg="<b>成功:</b>已经成功备份数据库&nbsp;&nbsp;"&CnSoftMDBnameNew
Set fs=nothing
end if
%>
这样就备份了！！

请二楼列出代码！
请三楼把代码写完整！

那找路径就不简单了！