<%end if%></td>
</tr>
<%rs.MoveNext
loop
end if
rs.Close
set rs=nothing
%>
</table>
<%end sub%>
3．3．6 数据库管理与备份
a.界面
b.功能说明：数据库备份/数据库压缩/数据库恢复。
c.部分代码如下（生成函数，后台代码基本模块化了）
<%sub backupdata()
Dbpath=request.form("Dbpath")
Dbpath=server.mappath(Dbpath)
bkfolder=request.form("bkfolder")
bkdbname=request.form("bkdbname")
Set Fso=server.createobject("scripting.filesystemobject")
if fso.fileexists(dbpath) then
If CheckDir(bkfolder) = True Then
fso.copyfile dbpath,bkfolder& "\"& bkdbname
else
MakeNewsDir bkfolder
fso.copyfile dbpath,bkfolder& "\"& bkdbname
end if
response.write "<SCRIPT LANGUAGE=java script>alert (' 成功备份数据!');window.location.href='admin_backupdata.asp';</script>"
response.end
Else
response.write "<SCRIPT LANGUAGE=java script>alert (' 备份数据库失败，您要备份的数据库不存在!');window.location.href='admin_backupdata.asp';</script>"
response.end
End if
end sub
'------------------检查某一目录是否存在-------------------
Function CheckDir(FolderPath)
folderpath=Server.MapPath(".")&"\"&folderpath
Set fso1 = CreateObject("Scripting.FileSystemObject")
If fso1.FolderExists(FolderPath) then
'存在
CheckDir = True
Else
'不存在
CheckDir = False
End if
Set fso1 = nothing
End Function
'-------------根据指定名称生成目录---------
Function MakeNewsDir(foldername)
Set fso1 = CreateObject("Scripting.FileSystemObject")
Set f = fso1.CreateFolder(foldername)
MakeNewsDir = True
Set fso1 = nothing
End Function %>
3．4 如何让用户获得较好的感觉呢？
1、服务器速度一定要快，
这是非常重要的一条因素，给用户“快”感了，用户自然会喜欢上你的网站。
2、网站设计一定要人性化
网站的设计不要千篇一律的去模仿，要站到用户的角度来考虑，如何让用户方便就如何来设计。
3、把你的好处很直白的表现出来
很多网站有很多很好的东西，但是总是搞得很朦胧，很难让用户在上到你网站的第一眼就看到你的好处。做网站不是搞艺术，千万不要搞朦胧，越直接就越好。
3．5 我的成功推广
当个人网站建成之后，当务之急是要如何让众多网民知道并点击你的网站，从而使网站有很好的流量，扩大知名度，集聚人气。这里根据互联网上相关的资源，对个人网站推广的基本方法作如下归纳。
1.登陆搜索引擎
这是一个很普遍的推广方式。网络上的搜索引擎何止上千，即使不把英文搜索引擎算在内，仅简体中文版的搜索引擎就不下百个，为此我们除了需要使用“AddWeb”或“登陆奇兵”之类软件专门把网站注册到各种搜索引擎进行登陆外（事实上，我不太赞同使用这种软件，因为这种登陆方式绝对不会比你自己手工一个个去登陆更能成功），更需要自己手工去登陆几个知名的搜索引擎，如YAHOO！中文、搜狐、新浪、网易、TOM、263、GOYOYO之类是一定要登陆的。值得一提的是，现在很多搜索引擎已开始进行收费登陆了，也就是说如果你不付钱给服务商，那么就别想把自己的网站登陆进数据库。好在目前其只对企业型的商业网站进行收费，个人网站还是能免费登陆的。 登陆搜索引擎之前应该做好如下准备：页面标题 ＜TITLE＞ 关键词 ＜Keywords＞ TITLE就是在浏览网页时出现在浏览器上方标题栏自左上角起的文字，