欢迎您访问我爱IT技术网,今天小编为你分享的编程技术是:【VB.net实现sql数据库的备份与恢复】,下面是详细的分享!
VB.net实现sql数据库的备份与恢复
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click '备份数据库 'BACKUP DATABASE Test TO DISK='C:\Backup' WITH Format Dim cn As SqlConnection Dim cm As SqlCommand cn=getDB() cm=New SqlCommand("BACKUP DATABASE JXbase TO DISK='C:\Backup ' WITH Format", cn) cn.Open() cm.ExecuteNonQuery() MsgBox("备份成功") cn.Close()
End Sub
'恢复 Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click Dim cn As New SqlConnection Dim cn1 As New SqlConnection Dim mydr As SqlDataReader Dim str As String
Dim tmpConnectionString As String="Data Source=JJK;Initial Catalog=master;Integrated Security=True" cn.ConnectionString=tmpConnectionString cn1.ConnectionString=tmpConnectionString cn.Open() cn1.Open() Dim cm As SqlCommand=New SqlCommand("select spid from master..sysprocesses where dbid=db_id('JXbase')", cn) mydr=cm.ExecuteReader()
Dim cm1 As SqlCommand=New SqlCommand() cm1.Connection=cn1
While (mydr.Read()) '杀死进程
str="kill " & mydr("spid").ToString() cm1.CommandText=str cm1.CommandType=CommandType.Text Application.DoEvents() cm1.ExecuteNonQuery() '杀进程 End While mydr.Close() cm=New SqlCommand("RESTORE DATABASE JXbase FROM DISK='C:\Backup'", cn) '恢复备份 cm.ExecuteNonQuery() MsgBox("恢复成功成功") cn.Close() cn1.Close()
End Sub
以上所分享的是关于VB.net实现sql数据库的备份与恢复,下面是编辑为你推荐的有价值的用户互动:
相关问题:小弟跪求大神写一段数据库备份以及还原的代码 数据...
答:参考: 备份:BACKUP DATABASE [hotelbook] TO Disk='e:\\" + 备份名 + ".bak" + "'" 还原:ALTER DATABASE hotelbook MODIFY NAME=数据库备份路径及名称 链接SQL代码: Public con As New SqlConnection("Data Source=BUNS-PC\SQLEXPERSS;Initi... >>详细
相关问题:我想知道用VB.net和SQLServer 2005数据库做系统时...
答:照着sqlserver 的界面做呀 >>详细
相关问题:用VB.NET 和SQL Server2000做项目,请问,怎么实现数...
答:SQL的备份语句 备份整个数据库: BACKUP DATABASE { database_name | @database_name_var } TO < backup_device > [ ,...n ] [ WITH [ BLOCKSIZE = { blocksize | @blocksize_variable } ] [ [ , ] DESCRIPTION = { 'text' | @text_variable } ]... >>详细
- 评论列表(网友评论仅供网友表达个人看法,并不表明本站同意其观点或证实其描述)
-
