ASP备份SQL Server数据库


ASP #sql server #备份2012-05-11 11:50

beifen.asp

01<%
02'SQL Server 数据库的备份与恢复!
03if request("action")="backupdatabase" Then
04dim sqlserver,sqlname,sqlpassword,sqlLoginTimeout,databasename,bak_file,act
05sqlserver = "localhost"
06sqlname = "sa"
07sqlpassword ="password"
08sqlLoginTimeout = 15
09databasename = trim(request("databasename"))
10bak_file = trim(request("bak_file"))
11bak_file = replace(bak_file,"$1",databasename)
12act = lcase(request("act"))
13if databasename = "" then
14response.write "input database name"
15else
16if act = "backup" then
17Set srv=Server.CreateObject("SQLDMO.SQLServer")
18srv.LoginTimeout = sqlLoginTimeout
19srv.Connect sqlserver,sqlname, sqlpassword
20Set bak = Server.CreateObject("SQLDMO.Backup")
21bak.Database=databasename
22bak.Devices=Files
23bak.Action = 0
24bak.Initialize = 1
25'bak.Replace = True
26bak.Files=bak_file
27bak.SQLBackup srv
28if err.number>0 then
29response.write err.number&"<font color=red><br>"
30response.write err.description&"</font>"
31end if
32Response.write "<font color=green>备份成功!</font>"
33elseif act="restore" then
34'恢复时要在没有使用数据库时进行!
35Set srv=Server.CreateObject("SQLDMO.SQLServer")
36srv.LoginTimeout = sqlLoginTimeout
37srv.Connect sqlserver,sqlname, sqlpassword
38Set rest=Server.CreateObject("SQLDMO.Restore")
39rest.Action=0 ' full db restore
40rest.Database=databasename
41rest.Devices=Files
42rest.Files=bak_file
43rest.ReplaceDatabase=True 'Force restore over existing database
44if err.number>0 then
45response.write err.number&"<font color=red><br>"
46response.write err.description&"</font>"
47end if
48rest.SQLRestore srv
49Response.write "<font color=green>恢复成功!</font>"
50else
51Response.write "<font color=red>没有选择操作</font>"
52end if
53end if
54end if
55%>
beifen.html

1<form method="post" name="myform" action="?action=backupdatabase">
2选择操作:<INPUT TYPE="radio" NAME="act" id="act_backup"value="backup"><label for=act_backup>备份</label>
3<INPUT TYPE="radio" NAME="act" id="act_restore" value="restore"><label for=act_restore>恢复</label>
4<br>数据库名:<INPUT TYPE="text" NAME="databasename" value="<%=request("databasename")%>">
5<br>文件路径:<INPUT TYPE="text" NAME="bak_file" value="c:\$1.bak">(yige.org备份或恢复的文件路径)<br>
6<input type="submit" value="确定" id=submit1 name=submit1>
7</form>


相关文章

粤ICP备11097351号-1