مساعده بخصوص اضافه ملف قاعده البيانات الى sql

أرجو أن يفيدك هذا الشرح

/index.php?showtopic=268118

مشكوور اخوي

الدرس مفيد

الحين ابي اعرف لما اسوي سيت اب كيف اضيف سكربت قاعده البيانات الى sql تلقائي عن طريق الفيجوال

ممكن تعمل متغير في Settings من نوع Boolean وتعطيه القيمة False وليكن اسمه X

وعند فتح البرنامج أول مرة على جهاز العميل اكتب في حدث تحميل الفورم الاساسية التالي

If x = False Then
ضع كود إنشاء قاعدة البيانات هنا

My. Settings.x = True
My.Settings.Save
End If

وممكن طريقة أخرى عن طريق البحث عن قاعدة البيانات في القواعد المسجلة في sql server

فإن لم يجدها يقوم بإنشائها

للتحقق من عدم وجود database:

if db_id('database_name_goes_here') is null
begin
	-- أنشئ قاعدة البيانات وجميع محتوياتها
end

أو (يعمل فقط على SQL server 2005 أو أعلى)

if not exists(select * from sys.databases where name = 'database_name_goes_here')
	-- أنشئ قاعدة البيانات

شكرا للأخ الكريم Xacker على المشاركة

ومن الممكن أن يتم ذلك بالطريقة التالية

dim sql as string = "Server=(local); DataBase=; Integrated Security=SSPId"
dim cs as New SqlConnection(sql)
        Dim sql1 As String = "SELECT * FROM master..sysdatabases WHERE Name = 'DataBaseNAme'"
        Dim ds As New DataSet
dim da as New SqlDataAdapter(sql1, cs)
        da.Fill(ds, "master")
        If Me.BindingContext(ds, "master").Count = 0 Then
           انشئ قاعدة البيانات

                    End If

مع تغيير DataBaseNAme إلى اسم قاعدة البيانات المراد الاستعلام عنها

الف الف شكر اخواني على المساعده

انا باطبقهم وان شاء الله وباذن الله يشتغل معي تمام

:)

واخر سؤال للاخوه والسموحه على الازعاج :)

لما اريد احصل على اسم السرفر حق sql

حاولت اجرب الطريقه هذي

server =.\SQLEXPRESS; Database =chai; integrated security = true"

بس للاسف ما نفعت معي في ممكن حل ثاني؟

هذا كود الاتصال حقي

انا دورت في بعض المنتديات الاجنبيه ولقيت طريقه اسوي البرنامج اما تكون قاعده البيانات مربوطه بشبكه او بدون شبكه

 Try

            With FrmSERVERSETTINGS
                .OpenFileDialog1.FileName = Application.StartupPath & "\Config.ini"
                openedFileStream = .OpenFileDialog1.OpenFile()
            End With

            ReDim dataBytes(openedFileStream.Length - 1) 'Init 
            openedFileStream.Read(dataBytes, 0, openedFileStream.Length)
            openedFileStream.Close()
            tmpStr = System.Text.Encoding.Unicode.GetString(dataBytes)

            With FrmSERVERSETTINGS
                If Split(tmpStr, ":")(4) = "1" Then
                    'network
                    CnString = "Provider=SQLOLEDB;" & _
                               "Data Source=" & Split(tmpStr, ":")(0) & _
                               ";Network=" & Split(tmpStr, ":")(1) & _
                               ";Server=" & Split(tmpStr, ":")(1) & _
                               ";Initial Catalog=SaleInv_DDB" & _
                               ";User Id=" & Split(tmpStr, ":")(2) & _
                               ";Password=" & Split(tmpStr, ":")(3)
                Else
                    'local
                    'MsgBox(Split(tmpStr, ":")(1))
                    CnString = "Provider=SQLOLEDB;Server=" & Split(tmpStr, ":")(1) & _
                               ";Database=SaleInv_DDB; Trusted_Connection=yes;"
                End If
            End With
            Dim sqlCon As New OleDbConnection
            sqlCon.ConnectionString = CnString
            sqlCon.Open()
            checkServer = True
            sqlCon.Close()
        Catch ex As Exception
            checkServer = False
        End Try

الحين في معاي هذا الامر

Environment.MachineNameُُ

حاولت اسوي متغير dbserver as string وعملت كذه dbserver=Enviroment.MachineName

المشكله الحين ماني عارف كيف ادخل قيمه dbserver الي هي اسم الكمبيوتر واخليها بالشكل هذا dbserver\SQLEXPRESS

يالييييت تساعدوني كييف اسوي :)

ماذا لو لم يكن الـ SQL server هو SQL server 2005 express ؟

SQLEXPRESS هو الـ instance name الخاص بـ SQL server 2005 express (وربما SQL server 2008 express لكني غير متأكد إن كانت SQLExpress أم MSSQLEXPRESS)

حتى الـ instance name يمكن تغييرها، بالتالي أرى من الأفضل أن تسأل مستخدم النظام لأول مرة عن إصدار SQL server الذي يستخدمه وتسأله فيما إذا أراد استخدام الـ Default instance name أم اسم آخر تسمح له بإدخاله، بالإضافة إلى اسم المستخدم وكلمة المرور في حال أراد استخدام SQL authentication بدلاً من Windows authentication..

بشكل عام أي شئ قد يكون المستخدم قام بتغييره، اسأله عنه في أول تشغيل.

مش مشكله اخوي هكر نوع الاصدار

لاني بارفق مع ملف التحميل برنامج تحميل SQL وان كان في اصدار غيره اخليه يمسحه ويحمل الموجود بالملف

فياريت مساعده :)

بداية أود القول بأني أجد أنه من غير المنطقي أن تفرض على المستخدم إصدار معين من قواعد بيانات MSSQL خصوصاً إن كان تطبيقك يمكن أن يعمل على أي إصدار، فقد تجد مستخدم لديه الإصدار 2000 وهو يستخدمه مع أحد البرامج الموجودة لديه سلفاً، فلماذا قد يحتاج لتثبيت MSSQL 2005 ؟

أنصحك بأن تعيد التفكير بهذا الجزء.

بالنسبة للشفرة التي وضعتها،

الشفرة تفترض وجود ملف بالاسم Config.ini في ذات المسار مع البرنامج، وتقوم بفتح الملف للقراءة ويتم تحويل السلسلة التي تمت قراءتها إلى Unicode.

الجزء الأهم أن السلسلة تتكون من الشكل التالي:

.--- 0 ---.------ 1 -----.--- 2 --.-- 3 ---.------ 4-----.
datasource:network/server:username:password:network or not

يتم استخدام الأمر Split لتقسيم السلسلة عند كل ":" إلى مصفوفة نصّية من القيم يتم تعيينها بحسب الترتيب، مثلاً: Split(tmpStr, ":")(0) يشير إلى أول قيمة في السلسلة و Split(tmpStr, ":")(2) يشير إلى القيمة التي تحمل الترتيب 2، وهي تمثل اسم المستخدم كما في الشكل أعلاه (الترتيب يبدأ بـ 0 وينتهي بـ 4)

بالتالي بفرض أن Split(tmpStr, ":")(1) تساوي "\SQLEXPRESS" فيمكنك ببساطة تعديل السطر التالي:

";Server=" & Split(tmpStr, ":")(1) & _

ليصبح:

";Server=" & dbserver & Split(tmpStr, ":")(1) & _

بالمناسبة: هل أنت متأكد من صحة الـ connection string المستخدم؟ هذه المرة الأولى التي أرى هذا البارامتر ";Network=" .. عادة يكون ";Network Library="

لذلك إن واجهت مشكلة ما في الاستعلام، فقم بتحويل السطر:

";Network=" & Split(tmpStr, ":")(1) & _

إلى تعليق وانظر إن حلّت المشكلة.

الف شكر لك اخووي هكر

طيب اخوي انا الحين صممت البرنامج

وابي اخلي الناس تحمله ويتحمل معاها تلقائي

انا الي فهمت اني اخليه يحمل البرنامج وبنفس الوقت يتحمل sql server

وكنت ناوي اصمم setup بالفيجوال يقوم بالحصول على اسم السرفر نيم حق الداتا بيز

ويربط قاعده البيانات فيه

بحيث انه المستخدم فقط يحمل البرنامج ولا يدخل على شي اسمه sql او انه يضيف قاعده البيانات بنفسه

عشان كذه قاعد كل شويه احاول اجزء اسئلتي واستفساراتي

طبعا هذي اول مره لي اسوي برنامج setup