ASP备份SQL Server数据库
ASP #sql server #备份2012-05-11 11:50
beifen.asp
01 | <% |
02 | 'SQL Server 数据库的备份与恢复! |
03 | if request( "action" )= "backupdatabase" Then |
04 | dim sqlserver,sqlname,sqlpassword,sqlLoginTimeout,databasename,bak_file,act |
05 | sqlserver = "localhost" |
06 | sqlname = "sa" |
07 | sqlpassword = "password" |
08 | sqlLoginTimeout = 15 |
09 | databasename = trim(request( "databasename" )) |
10 | bak_file = trim(request( "bak_file" )) |
11 | bak_file = replace(bak_file, "$1" ,databasename) |
12 | act = lcase(request( "act" )) |
13 | if databasename = "" then |
14 | response.write "input database name" |
15 | else |
16 | if act = "backup" then |
17 | Set srv=Server.CreateObject( "SQLDMO.SQLServer" ) |
18 | srv.LoginTimeout = sqlLoginTimeout |
19 | srv.Connect sqlserver,sqlname, sqlpassword |
20 | Set bak = Server.CreateObject( "SQLDMO.Backup" ) |
21 | bak.Database=databasename |
22 | bak.Devices=Files |
23 | bak.Action = 0 |
24 | bak.Initialize = 1 |
25 | 'bak.Replace = True |
26 | bak.Files=bak_file |
27 | bak.SQLBackup srv |
28 | if err.number>0 then |
29 | response.write err.number& "<font color=red><br>" |
30 | response.write err.description& "</font>" |
31 | end if |
32 | Response.write "<font color=green>备份成功!</font>" |
33 | elseif act= "restore" then |
34 | '恢复时要在没有使用数据库时进行! |
35 | Set srv=Server.CreateObject( "SQLDMO.SQLServer" ) |
36 | srv.LoginTimeout = sqlLoginTimeout |
37 | srv.Connect sqlserver,sqlname, sqlpassword |
38 | Set rest=Server.CreateObject( "SQLDMO.Restore" ) |
39 | rest.Action=0 ' full db restore |
40 | rest.Database=databasename |
41 | rest.Devices=Files |
42 | rest.Files=bak_file |
43 | rest.ReplaceDatabase= True 'Force restore over existing database |
44 | if err.number>0 then |
45 | response.write err.number& "<font color=red><br>" |
46 | response.write err.description& "</font>" |
47 | end if |
48 | rest.SQLRestore srv |
49 | Response.write "<font color=green>恢复成功!</font>" |
50 | else |
51 | Response.write "<font color=red>没有选择操作</font>" |
52 | end if |
53 | end if |
54 | end if |
55 | %> |
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 > |
相关文章
- ASP下ajax抓取中国天气网天气的代码 2012/05/11
- ASP仿PHP的一些常用函数 2012/05/11
- ASP获取远程网页的指定内容的函数 2012/05/11
- ASP生成SQL命令字符串类 2012/05/11
- ASP文本框换行显示方法 2012/05/11
- ASP页面支持cache的方法 2012/05/11
- ASP的JSON类使用方法 2012/05/11
- ASP的JSON类 2012/05/11
- ASP实现注册登录的代码 2012/05/11
- ASP实现ajax注册即时提示代码 2012/05/10