hello,

i have a application, with sql database, now i want to backup every week, so i have code a but it gives error:
"The process cannot access the file 'C:\Users\yogeishh\Desktop\Restaurant-Stock-Management-System\Restaurant-Stock-Management-System\DataBase\RestaurantStockDataBase.mdf' because it is being used by another process."

can anybuddy solve this error??
my code is :: "

Private Sub btnCreateBackUpOfSetting_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCreateBackUpOfSetting.Click
       'Try
       Dim fulfilename As String
       fulfilename = "C:\Users\yogeishh\Desktop\Restaurant-Stock-Management-System\Restaurant-Stock-Management-System\DataBase\RestaurantStockDataBase.mdf"
       Dim sfd As New SaveFileDialog
       sfd.FileName = "Restaurant Stock Backup"
       '            sfd.InitialDirectory = My.Computer.FileSystem.SpecialDirectories.Desktop
       sfd.Title = "Select Save Location..."
       sfd.Filter = "SQL Server 2005 Files (*.mdf)|*.mdf"
       If sfd.ShowDialog = Windows.Forms.DialogResult.OK Then
           My.Computer.FileSystem.CopyFile(fulfilename, sfd.FileName)
           Dim fileDetail As IO.FileInfo = My.Computer.FileSystem.GetFileInfo(sfd.FileName)
           fileDetail.IsReadOnly = True
           'fileDetail.Attributes = fileDetail.Attributes Or IO.FileAttributes.ReadOnly
           MsgBox("Backup is Created...")
       End If
       'Catch ex As Exception
       '    MsgBox(ex.Message)
       'End Try
   End Sub

   Private Sub btnRestoreBackUpOfSetting_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnRestoreBackUpOfSetting.Click
       'Try
       Dim fulfilename As String
       fulfilename = "C:\Users\yogeishh\Desktop\Restaurant-Stock-Management-System\Restaurant-Stock-Management-System\DataBase\RestaurantStockDataBase.mdf"
       Dim ofd As New OpenFileDialog
       ofd.FileName = ""
       ofd.Filter = "SQL Server 2005 Files (*.mdf)|*.mdf"
       If ofd.ShowDialog = Windows.Forms.DialogResult.OK Then
           My.Computer.FileSystem.DeleteFile("C:\Users\yogeishh\Desktop\Restaurant-Stock-Management-System\Restaurant-Stock-Management-System\DataBase\RestaurantStockDataBase.mdf")
           My.Computer.FileSystem.CopyFile(ofd.FileName, fulfilename)
           MsgBox("Backup is Restored...")
       End If
       'Catch ex As Exception
       '    MsgBox(ex.Message)
       'End Try
   End Sub

plz solve this problem
thnks

This article has been dead for over six months. Start a new discussion instead.