国产成人精品亚洲777人妖,欧美日韩精品一区视频,最新亚洲国产,国产乱码精品一区二区亚洲

您的位置:首頁技術文章
文章詳情頁

用Asp備份與恢復SQL Server 數據庫

瀏覽:226日期:2023-10-27 08:57:12

51windows(原作)

一個用asp備份與恢復SQL Server數據庫的例子代碼,希望對一些朋友有用。(注意:數據庫使用中可能無法恢復)

<HTML><HEAD><TITLE>SQL Server 數據庫的備份與恢復</TITLE><meta http-equiv='Content-Type' content='text/html; charset=gb2312'></HEAD><BODY><form method='post' name=myform>選擇操作:<INPUT TYPE='radio' NAME='act' value='backup'><label for=act_backup>備份</label> <INPUT TYPE='radio' NAME='act' value='restore'><label for=act_restore>恢復</label><br>數據庫名:<INPUT TYPE='text' NAME='databasename' value='<%=request('databasename')%>'><br>文件路徑:<INPUT TYPE='text' NAME='bak_file' value='c:$1.bak'>(備份或恢復的文件路徑)<br><input type='submit' value='確定'></form><%'SQL Server 數據庫的備份與恢復!'海娃'http://www.51windows.Netdim sqlserver,sqlname,sqlpass<a target='_blank' class='ReplaceKeyword'>word</a>,sqlLoginTimeout,databasename,bak_file,actsqlserver = 'localhost' 'sql服務器sqlname = 'sa' '用戶名sqlpassword = 'sa' '密碼sqlLoginTimeout = 15 '登陸超時databasename = trim(request('databasename'))bak_file = trim(request('bak_file'))bak_file = replace(bak_file,'$1',databasename)act = lcase(request('act'))if databasename = '' then response.write 'input database name'else if act = 'backup' then Set srv=Server.CreateObject('SQLDMO.SQLServer') srv.LoginTimeout = sqlLoginTimeout srv.Connect sqlserver,sqlname, sqlpassword Set bak = Server.CreateObject('SQLDMO.Backup') bak.Database=databasename bak.Devices=Files bak.Files=bak_file bak.SQLBackup srv if err.number>0 then response.write err.number&'<font color=red><br>' response.write err.description&'</font>' end if Response.write '<font color=green>備份成功!</font>' elseif act = 'restore' then '恢復時要在沒有使用數據庫時進行! Set srv=Server.CreateObject('SQLDMO.SQLServer') srv.LoginTimeout = sqlLoginTimeout srv.Connect sqlserver,sqlname, sqlpassword Set rest=Server.CreateObject('SQLDMO.Restore') rest.Action=0 ' full db restore rest.Database=databasename rest.Devices=Files rest.Files=bak_file rest.ReplaceDatabase=True 'Force restore over existing database if err.number>0 then response.write err.number&'<font color=red><br>' response.write err.description&'</font>' end if rest.SQLRestore srv Response.write '<font color=green>恢復成功!</font>' else Response.write '<font color=red>沒有選擇操作</font>' end ifend if%></BODY></HTML>

標簽: Sql Server 數據庫
相關文章:
主站蜘蛛池模板: 秦皇岛市| 密云县| 皮山县| 柳林县| 阜宁县| 阆中市| 马山县| 佛学| 宁明县| 德安县| 红安县| 台南市| 达尔| 安福县| 遂溪县| 沙洋县| 遵义县| 青田县| 如皋市| 滦南县| 拜城县| 武汉市| 琼中| 南平市| 洛扎县| 鄱阳县| 桑植县| 丹东市| 松滋市| 连州市| 保康县| 保定市| 新蔡县| 旌德县| 长顺县| 正安县| 行唐县| 娱乐| 曲周县| 绿春县| 松滋市|