[asemshahen5]

ضع هذا الكود :

PHP كود :

''ضع هذا السب في الفورم الذي يعمل عند بدء تشغيل البرنامج :

    Private Sub FormXT_Load(DatabaseNameForAttach As String)
        Dim openfd As New OpenFileDialog
        openfd.Filter = "Sql Server Database(*.mdf)|*.mdf"
        openfd.Title = "Attach Database"
        If (Cls.GetAttachDatabaseName(DatabaseNameForAttach) = False) Then
            If openfd.ShowDialog = DialogResult.OK Then
                Dim SafeFileName As String = openfd.SafeFileName
                SafeFileName = SafeFileName.Replace(".mdf", "")
                Dim DBName As String = openfd.FileName
                DBName = DBName.Replace(".mdf", "_log.ldf")
                If MessageBox.Show("Are You Sure Attach Database File : " & openfd.FileName, "Attach Database", MessageBoxButtons.YesNo) = DialogResult.Yes Then
                    If (Cls.AttachDatabaseName(SafeFileName, openfd.FileName, DBName) = True) Then
                        My.Settings.MdfFile = openfd.FileName
                        My.Settings.LdfFile = DBName
                        My.Settings.Save()
                    Else
                        My.Settings.MdfFile = ""
                        My.Settings.LdfFile = ""
                        My.Settings.Save()
                    End If
                End If
            End If
        End If
    End Sub

'في السيتنغ عرف متغيرين باسم :
'1- MdfFile

'2- LdfFile

'و في حدث تحميل الفورم ضع الكود التالي :

FormXT_Load("ضع هنا اسم قاعدة البيانات الخاصة بالبرنامج")

'لا تنسى إضافة الكلاس AttachDatabaseNameCls الى برنامجك .

'موفق ان شاء الله .