中文字幕在线视频一区二区,精品少妇一区二区三区在线,亚洲色图都市激情

form method="post" name="myform" action="?action=backupdatabase">
  選擇操作：
  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>恢復(fù)/label>
  br>
  數(shù)據(jù)庫名：
  input type="text" name="databasename" value="%=request("databasename")%>">
  br>
  文件路徑：
  input type="text" name="bak_file" value="c:\$1.bak">
  (備份或恢復(fù)的文件路徑)br>
  input type="submit" value="確定" id=submit1 name=submit1>
/form>
%
'sql server 數(shù)據(jù)庫的備份與恢復(fù)!
if request("action")="backupdatabase" then
dim sqlserver,sqlname,sqlpassword,sqllogintimeout,databasename,bak_file,act
'**************************************************************************
sqlserver = "127.0.0.1"
sqlname = "sa "
sqlpassword ="111"
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.action   = 0
   bak.initialize   = 1
   'bak.replace        = true
   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>"
  end if

  if act="restore" then
  '恢復(fù)時要在沒有使用數(shù)據(jù)庫時進行！
   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>恢復(fù)成功!/font>"
  else
   response.write "font color=red>沒有選擇操作/font>"
  end if
end if
end if
%>

標(biāo)簽：錫林郭勒盟江門新余儋州廣元七臺河雅安宣城

巨人網(wǎng)絡(luò)通訊聲明：本文標(biāo)題《非常好用的asp備份,還原SQL數(shù)據(jù)庫的代碼》，本文關(guān)鍵詞非常好,用的,asp,備份,還原,；如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題，煩請?zhí)峁┫嚓P(guān)信息告之我們，我們將及時溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò)，涉及言論、版權(quán)與本站無關(guān)。