[strongriseman]

الموضوع كالتالي  
اريد انشاء قاعدة بيانات من ملف سكربت بحيث  يتجكم المستخدم 
في تحديد اسم جديد لقاعدة البيانات موجود داخل جقل نصي , وتحديد المسار الذي سيتم وضع قاعدة البيانات به  وهو موجود ضمن حقل نصي 
هل هذا الامر ممكن  
ارجو افادتي وبارك الله فيكم

[strongriseman]

انا استعملت الكود التالي
Dim serverName As String = Txtservername.Text
Dim scriptFilePath As String = txtscriptpath.Text
Dim newDatabaseName As String = Txtdatabasename.Text
Dim databaseFolderPath As String = Txtdatabasemassar.Text
' Dim connectionString As String = "Data Source={serverName};Integrated Security=True;"
Dim connectionString As String = "Data Source=" & Txtservername.Text.Trim & ";Initial Catalog=master;Integrated Security=True"
Using connection As New SqlConnection(connectionString)
connection.Open()

Dim script As String = File.ReadAllText(scriptFilePath)
script = script.Replace("اسم_قاعدة_البيانات", newDatabaseName)

' 2. تنفيذ ملف السكربت لإنشاء الكائنات داخل قاعدة البيانات
Dim command As New SqlCommand(script, connection)
command.ExecuteNonQuery()
End Using

MessageBox.Show("تم إنشاء قاعدة البيانات '{newDatabaseName}' بنجاح.")
وكان هناك خطا كما يلي
Additional information: Database 'archeefdata' does not exist. Make sure that the name is entered correctly.
مع العلم ان اسم قاعدة البيانات الاصلية هو archeefdata
ما هو سبب المشكلة يا شباب

[العتيق]

شاهد هذا المثال 

من هنا

[strongriseman]

المثال االاول مش شغال
المثال الثاني لا يفي بالغرض المطلوب

[العتيق]

تفضل اخي هذا رابط جديد

من هنا

[strongriseman]

الرابط الاول مش شغال
الرابط الثاني لا يفي بالغرض المطلوب