منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
عمل أتاش لقاعدة البيانات - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم قواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=40)
+--- قسم : قسم أسئلة قواعد البيانات تحت بيئة الـ.NET (http://vb4arb.com/vb/forumdisplay.php?fid=41)
+--- الموضوع : عمل أتاش لقاعدة البيانات (/showthread.php?tid=15008)

عمل أتاش لقاعدة البيانات - djelloul - 07-03-16

السلام عليكم ورحمة الله تعالى وبركاته
رجاءا هل هناك طريقة لعمل اتاش لقاعدة البيانات عن ظريق الأكواد بالفيجوال بيزك
ألف شكر مسبقا

RE: عمل أتاش لقاعدة البيانات - khodor1985 - 07-03-16

السلام عليكم أخي العزيز ورحمة الله وبركاته
شغل هذا الكود من خلال زر أمر :
PHP كود :
Dim cmd As New SqlCommand()
Dim con As new SqlConnection = "Connection string"

cmd.CommandText = "sp_attach_db 'e:\dbTest.mdf', 'e:\dbTest.ldf'"
  
    con.open()
    cmd.CommandType = CommandType.StoredProcedure
 cmd.Connection = con
    cmd.executenonquery()
    con.close 

أتمنى لك التوفيق

RE: عمل أتاش لقاعدة البيانات - djelloul - 07-03-16

ألف شكر لكم راح أجرب وأخبرك

RE: عمل أتاش لقاعدة البيانات - khodor1985 - 07-03-16

PHP كود :
Dim con As New SqlConnection("Data Source=localhost;Initial Catalog=master;Integrated Security=True")
 con.Open()

        Dim cmd As New SqlCommand()
        Dim txt As String

        txt = "sp_attach_db @dbname = N'Test', " & vbCrLf & _
              "@filename1 = N'C:\Program Files\Microsoft SQL Server\MSSQL12.MSSQLSERVER\MSSQL\DATA\Test.MDF', " & vbCrLf & _
              "@filename2 = N'C:\Program Files\Microsoft SQL Server\MSSQL12.MSSQLSERVER\MSSQL\DATA\Test_log.LDF'"

        cmd.CommandText = txt
        cmd.Connection = con
        cmd.ExecuteNonQuery()
        MsgBox("Database created successfully")


        con.Close() 
لقد جربت هذا الكود وهو ناجح مئة بالمئة

أتمنى لك التوفيق

RE: عمل أتاش لقاعدة البيانات - khodor1985 - 07-03-16

السلام عليكم أخي العزيز ورحمة الله وبركاته
شرح الكود أعلاه : إعادة ربط قاعدة البيانات
أولا لكي نتمكن من إعادة ربط قاعدة البيانات لا بد من الإتصال بقاعدة بيانات Master
PHP كود :
Dim con As New SqlConnection("Data Source=localhost;Initial Catalog=master;Integrated Security=True") 

ثانيا : لقد قمنا باستدعاء الإجراء المخزن sp_attach_db وهو Stored Procedure من قاعدة بيانات Master
[attachment=9728]

[attachment=9729]

ثالثا : قمنا بالإعلان عن متغير يتضمن إسم Stored Procedure ومسار قاعدة البيانات الغير مرتبطة
PHP كود :
txt = "sp_attach_db @dbname = N'Test', " & vbCrLf & _
              "@filename1 = N'C:\Program Files\Microsoft SQL Server\MSSQL12.MSSQLSERVER\MSSQL\DATA\Test.MDF', " & vbCrLf & _
              "@filename2 = N'C:\Program Files\Microsoft SQL Server\MSSQL12.MSSQLSERVER\MSSQL\DATA\Test_log.LDF'" 

رابعا : نفذنا العملية من خلال SqlCommand

أتمنى لك التوفيق

RE: عمل أتاش لقاعدة البيانات - djelloul - 07-03-16

ألف شكر لكم جميعا وجزاكم الله خيرا