PDA

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