国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > ASP > 正文

Asp備份與恢復SQLServer數據庫

2024-07-21 02:05:28
字體:
來源:轉載
供稿:網友

<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" id="act_backup" value="backup"><label for=act_backup>備份</label> 
  <input type="radio" name="act" id="act_restore" 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 數據庫的備份與恢復!
  /'海娃@2004-4-2
  /'http://www.51windows.net
  dim sqlserver,sqlname,sqlpassword,sqllogintimeout,databasename,bak_file,act
  sqlserver = "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 if
  end if
  %>
  </body>
  </html>  


發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 德兴市| 三明市| 股票| 布尔津县| 沁阳市| 三门县| 乡宁县| 吉木萨尔县| 乌恰县| 新建县| 东城区| 凤阳县| 安溪县| 泰兴市| 扎鲁特旗| 炎陵县| 竹山县| 凌云县| 彭泽县| 航空| 灌阳县| 浮山县| 富裕县| 大英县| 桦甸市| 唐海县| 武平县| 安阳市| 双桥区| 利津县| 贵阳市| 灵丘县| 丰城市| 巨野县| 连江县| 历史| 如皋市| 德格县| 调兵山市| 桃源县| 泽普县|