نحوه backup گرفتن و Restore کردن دیتابیس

سلام
شاید از نسخه EXPRESS و در حالت غیر Attach استفاده میکنید، که در این شرایط دقت بیشتری لازم است.
کد زیر را امتحان کنید:

کد:

---

Private Const SQL1 As String = "ALTER DATABASE [{0}] SET SINGLE_USER WITH ROLLBACK IMMEDIATE;"
Private Const SQL2 As String = "RESTORE DATABASE [{0}] FROM DISK = '{1}' WITH REPLACE;"

Public Sub DbRestore(ByVal file As String)
    Dim iPosition As Integer = 0
    Try
          Using dbcon As New System.Data.SqlClient.SqlConnection("---CONNECTIONSTRING---")
              System.Data.SqlClient.SqlConnection.ClearAllPools()

              iPosition = 1
              dbcon.Open()

              Using dbcom As New System.Data.SqlClient.SqlCommand(String.Empty, dbcon)

                    dbcom.CommandText = String.Format(SQL1, dbcon.Database)

                    iPosition = 2
                    dbcom.ExecuteNonQuery()

                    dbcom.CommandText = String.Format(SQL2, dbcon.Database, file)

                    iPosition = 3
                    dbcom.ExecuteNonQuery()

              End Using
          End Using

    Catch ex As Exception
          Stop
          'Use of ex, iPosition
    End Try
End Sub

---

متأسفانه باز هم همون ارور. الان چک کردم دیتابیس به مد تک کاربره رفته ولی باز هم ارور میده. عکسش رو هم میذارم شاید کمکی کنه!!!:41:


لینک عکس :

کد:

---

http://www.2shared.com/photo/XFv3TdE7/Untitled3.html

---

این مقاله رو تو چند تا پست قبلی هم گذاشته بودم. ولی ظاهرا مشکل حل نشده. کسی اصلا امتحان کرده این روشی رو که توضیح داده یا هنوز باهاش مشکل دارین؟

-------------------------------------------------------------------------------------------
دلیل عدم کارایی بسیاری از نمونه کدهای موجود برای restor کردن دیتابیس اینه که زمان اجرای دستور restor نباید هیچ connection بازی رو دیتابیسی که داره ازش restor گرفته میشه وجود داشته باشه. حالا اکثرا میان یه دستور sql برای restor کردن مینویسند(مثل کد پست بالا) و اونو با یه connection رو دیتابیس خودشون اجرا میکنن. خوب تو همین مرحلیه اجرای کد یه اتصال باز با همون دیتا بیس ایجاد میشه و باعث میشه که عمل restor انجام نشه. برای این کار یه کلاس سری کلاس تو دات نت وجود داره که تو فضای نام Microsoft.SqlServer.Management.Smo قرار داده شدن. همه کلاسهای تو فضای نام SMO برای مدیریت دیتابیسهای sql server ایجاد شدن.
تو این مقاله توضیح restor و backup دیتابیس از طریق این کلاسها اومده :

کد:

---

http://www.codeproject.com/KB/database/SQL_Server_2005_Database.aspx?display=Print

---

-------------------------------------------------------------------------------------------

سلام

نقل قول:

---

متأسفانه باز هم همون ارور. الان چک کردم دیتابیس به مد تک کاربره رفته ولی باز هم ارور میده. عکسش رو هم میذارم شاید کمکی کنه!!!

---

کد را چنین اصلاح کنید، (همین الآن هم آزمایشش کردم)

کد:

---

Private Const SQL1 As String = "USE [master]; ALTER DATABASE [{0}] SET SINGLE_USER WITH ROLLBACK IMMEDIATE;"
Private Const SQL2 As String = "RESTORE DATABASE [{0}] FROM DISK = '{1}' WITH REPLACE;"

Public Sub DbRestore(ByVal file As String)
    Dim iPosition As Integer = 0
    Try
          Using dbcon As New System.Data.SqlClient.SqlConnection("---CONNECTIONSTRING---")
              System.Data.SqlClient.SqlConnection.ClearAllPools()

              iPosition = 1
              dbcon.Open()

              Dim database As String = dbcon.Database

              Using dbcom As New System.Data.SqlClient.SqlCommand(String.Empty, dbcon)

                    dbcom.CommandText = String.Format(SQL1, database)

                    iPosition = 2
                    dbcom.ExecuteNonQuery()

                    dbcom.CommandText = String.Format(SQL2, database, file)

                    iPosition = 3
                    dbcom.ExecuteNonQuery()

              End Using
          End Using

    Catch ex As Exception
          Stop
          'Use of ex, iPosition
    End Try
End Sub

---

موفق باشید.

ممنون از استاد خوبم _H2_ عزیز و دوست خوبم pezhmax که راهنمایی خوبی کردند. الان کد بالا که _H2_ عزیز گذاشتند رو امتحان کردم و کاملا جواب داد و ممنون به خاطر لطف و راهنمایی شما عزیزان که هیچوقت منو از راهنماییهاتون بی دریق نذاشتید. با هم ممنون