کسی نیستش کمکی نظری چیزی بده ؟ این کدی که اینجا گذاشتم فقط برای دکمه ی بک آپ (به زبان vb.net)هستش از دیتا بیسی به نام library بک آپ میگیره - اگه کسی در مورد کدنویسی برا دکمه ی ریستور اطلاعاتی داره بگه ممنون میشم !
Public Class Form1
Public Const Data As String = "Library"
Dim conString As String = "attachdbfilename=|datadirectory|\" & Data & _
".mdf;initial catalog=" & Data & _
";Integrated Security=true;" & _
"data source=.\sqlexpress;" & _
"User Instance=True"
Dim con = New SqlClient.SqlConnection(conString)
Dim com = New SqlClient.SqlCommand
Private Sub backup(ByVal Database, ByVal path)
If con.State = ConnectionState.Closed Then con.Open()
Dim Sql2 As String = "BACKUP DATABASE " & Database & " TO DISK = N'" & path & _
"' WITH NOFORMAT, INIT, NAME = N'" & Database & _
"-Full Database Backup', SKIP, NOREWIND, NOUNLOAD, STATS = 10 "
com = New SqlClient.SqlCommand
Try
With com
.Connection = con
.CommandText = Sql2
.ExecuteNonQuery()
End With
MsgBox("ok")
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub
Private Sub Backup_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim SaveFile As New SaveFileDialog
SaveFile.Filter = "Backup File (*.Bak)|*.bak"
SaveFile.ShowDialog()
backup(Data, SaveFile.FileName.ToString)
End Sub
End Class
