求救!asp编程高手进!!!

来源:百度知道 编辑:UC知道 时间:2024/05/12 16:28:19
请问各位朋友:以下代码是什么意思呀?请各位朋友指点一下吧,谢谢了.
sub BackupData()
if request("submit")<>"" then
DBPath=server.mapPath(trim(request("dbpath")))
bkfolder=request.form("bkFolder")
bkdbname=request.form("bkDBname")
set FSObject=Server.CreateObject("Scripting.FileSystemObject")
if FSObject.FileExists(DBPath) then
if isnull(bkfolder) or bkfolder="" then
body=body+"您的备份目录不能为空!"
elseif isnull(bkdbname) or bkdbname="" then
body=body+"您的备份数据库名不能为空!"

此为一个备份数据库的函数.
sub BackupData() 函数名称定义
if request("submit")<>"" then 判断提交是否为空
DBPath=server.mapPath(trim(request("dbpath"))) 不为空,计算数据库绝对路径
bkfolder=request.form("bkFolder") 从表单中获取变量(目录)
bkdbname=request.form("bkDBname") 同上(数据库名)
set FSObject=Server.CreateObject ("Scripting.FileSystemObject") 创建文件读写对象
if FSObject.FileExists(DBPath) then 判断数据库是否存在
if isnull(bkfolder) or bkfolder="" then 判断路径变量是否为空
body=body+"您的备份目录不能为空!" 为空,则提示不能备份
elseif isnull(bkdbname) or bkdbname="" then 判断数据库名变量是否为空
body=body+"您的备份数据库名不能为空!" 为空,则提示.
<br>
<br>不知道该函数是你没贴完还是就这些,如果就这些,还没有实际的数据库备份操作,只是进行了一堆变量判断.

sub BackupData()
'----------当按下表单中的按钮时
if request("submit")<>"" then
'---------开始获取上一页提交过来的文件夹名称和文件名
DBPath=server.mapPath(trim(request("dbpath")))'---