熱點推薦:
您现在的位置: 電腦知識網 >> 編程 >> SQL Server >> 正文

利用VB進行SQL2000的數據備份和恢復

2013-11-15 14:37:25  來源: SQL Server 

  備份有兩中形式完全備份和差異備份
  
  完全備份是對數據庫進行完整備份周期比較長周等
  
  差異備份是對更新備份的數據進行備份周期比較短小時
  
  命令介紹 Backup Database [數據庫名] To Disk=[保存路徑和名稱] With [其他屬性]
  
  代碼注釋ServerIP :SQLServer所在機器的 IP
  jtsg:SQLServer中數據的名稱
  
  Public Cn As ADODBConnection
  Set Cn = New ADODBConnection
  strcon = Provider=SQLOLEDB;Password=sa;Persist Security Info=True;User ID=sa;Initial Catalog=jtsg;Data Source= + ServerIp + ; + _
  use procedure for prepare=;auto translate=true; + _
  use encryption for data=false;tag with column collation when possible=false
  CnConnectionString = strcon
  On Error Resume Next
  CnOpen
  If CnErrorsCount > Then
  For i = To CnErrorsCount
  If CnErrors(i)Number = Then
  MsgBox 網絡不通或服務器未開請確認後再試 vbOKOnly + vbInformation 提醒
  Unload Me
  Exit Sub
  Exit For
  End If
  Next i
  End If
  
  完全備份
  
  Private Sub BackupAll()
  CnExecute backup database jtsg to disk= + AppPath + \backup\myjtsgallbak with name=jtsg backup alldescription=Full Backup Of jtsg
  MsgBox 數據完全備份已經完成 vbOKOnly + vbInformation 提醒
  End Sub
  
  差異備份
  
  Private Sub BackupDif()
  CnExecute backup database jtsg to disk= + AppPath + \backup\myjtsgdifbak with differential noinitname=jtsg backup difdescription=Differential Backup Of jtsg
  MsgBox 數據差異備份已經完成 vbOKOnly + vbInformation 提醒
  End Sub
  
  數據恢復
  
  數據恢復問題很多要區分用戶的備份形式一般備份的默認形式是 Append to media即添加到備份設備已有內容後面前面介紹的備份方式就這種還有一種備份形式是 OverWrite即覆蓋設備原有內容這兩中備份形式決定恢復的方式也不一樣
  
  命令介紹 Restore Database [數據庫名] From [保存備份的路徑和名稱] With[其他屬性]
  
  在其他屬性中重點介紹File NORECOVERY和 RECOVERY
  
  FILE
  這是不同備份形式的重要參數用來指定從設備上的第幾個備份中恢復比如采用APPEND形式備份作了兩次備份恢復第一個備份時應該在恢復命令中使用FILE=恢復第二個備份時則使用FILE=的選項
  當然如果備份形式是OVERWRITE備份中就只有一次備份所以使用 FILE=的選項
  
  RECOVERY
  如果使用RECOVERY選項那麼恢復完成後SQLSERVER回滾被恢復數據庫中所有未完成的事務以保證數據庫的一致性在恢復後用戶就可以訪問數據庫所以RECOVERY用來恢復最後一個備份NORECOVERY則相反默認為RECOVERY
  
  代碼解釋還原備份的文件可以選擇完全備份和差異備份
  Private Sub RestoreData()
  CnExecute restore database jtsg from disk= + AppPath + \backup\myjtsgallbak with FILE=
  MsgBox 數據恢復已經完成 vbOKOnly + vbInformation 提醒
  End Sub
From:http://tw.wingwit.com/Article/program/SQLServer/201311/22078.html
    推薦文章
    Copyright © 2005-2013 電腦知識網 Computer Knowledge   All rights reserved.