国产探花免费观看_亚洲丰满少妇自慰呻吟_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>  


發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 修水县| 怀来县| 文登市| 洛阳市| 平湖市| 泸州市| 东乌| 汪清县| 耿马| 通化县| 阳城县| 浑源县| 辛集市| 英德市| 桦川县| 乐东| 福鼎市| 寻乌县| 河西区| 黔东| 新安县| 贵阳市| 鹰潭市| 石狮市| 昌邑市| 临漳县| 虎林市| 资兴市| 平塘县| 拜城县| 濮阳市| 东源县| 扶绥县| 阳春市| 玉龙| 泰州市| 西平县| 治多县| 麻阳| 隆德县| 隆德县|