View Full Version : تهیه ی نسخه ی پشتیبان از sql
vahab2010
پنج شنبه 13 خرداد 1389, 01:44 صبح
یه برنامه ای میخواستم که از بانک sql پشتیبان تهیه کند چی کار کنم؟:اشتباه:
iman_me
پنج شنبه 13 خرداد 1389, 02:40 صبح
کد پشتیبان گیری
'پشتيبان گيري از بانک اطلاعاتي
Dim con As SqlConnection = New SqlConnection()
con.ConnectionString = "Data Source=ServerName;database=DataBaseName;Integrated Security=SSPI"
Dim cmd As SqlCommand = New SqlCommand()
Try
con.Open()
'BACKUP DATABASE نام بانک اطلاعاتي TO DISK = 'مسير پشتيبان گيري بانک اطلاعاتي'
Dim query As String = "BACKUP DATABASE DataBaseName TO DISK = 'C:\DataBase\Backup.MDF'"
cmd.CommandText = query
cmd.Connection = con
cmd.ExecuteNonQuery()
con.Close()
MessageBox.Show("پشتيبان گيري به درستي انجام شد")
Catch
MessageBox.Show("اشکال در ارتباط با بانک اطلاعاتي")
End Try
iman_me
پنج شنبه 13 خرداد 1389, 02:41 صبح
کد بازیابی
'بازيابي بانک اطلاعاتي
Dim con As SqlConnection = New SqlConnection()
con.ConnectionString = "Data Source=ServerName;database=DataBaseName;Integrated Security=SSPI"
Dim cmd As SqlCommand = New SqlCommand()
Try
con.Open()
'USE master RESTORE DATABASE [نام بانک اطلاعاتي] FROM DISK = 'مسير فايل بانک اطلاعاتي'
Dim query As String = "USE master RESTORE DATABASE [DataBaseName] FROM DISK = 'C:\DataBase\Backup.MDF'"
cmd.CommandText = query
cmd.Connection = con
cmd.ExecuteNonQuery()
con.Close()
MessageBox.Show("بازيابي به درستي انجام شد")
Catch
MessageBox.Show("اشکال در ارتباط با بانک اطلاعاتي")
End Try
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.