سلام
از این کد می تونی برای بک آپ گیری استفاده کنی:
Dim cmd As New SqlCommand
cmd.Connection = Con
Dim StrSql As String
Con.Open()
StrSql = "BACKUP DATABASE [" & Path & "\Table1.mdf] TO DISK ='" & BackupPath & "BackUp.bak" & "' with format"
cmd = New SqlCommand(StrSql, Con)
cmd.ExecuteNonQuery()
Con.Close()
و از این کد برای بازگردانی
Dim cmd As New SqlCommand
cmd.Connection = Con
Dim StrSql As String
Con.Open()
StrSql = "USE master; RESTORE DATABASE [" & Path & "\Table1.mdf]" & " FROM DISK ='" & RestorePath & "Backup.bak'"
cmd = New SqlCommand(StrSql, Con)
cmd.ExecuteNonQuery()
Con.Close()