منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] كيف يمكن التأكد من وجود الجدول قاعدة بيانات - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] كيف يمكن التأكد من وجود الجدول قاعدة بيانات (/showthread.php?tid=34233)



كيف يمكن التأكد من وجود الجدول قاعدة بيانات - Codack - 09-04-20

السلام عليكم ورحمة الله وبركاته

أخواني الأعزاء

لدي قاعدة بيانات SQL local

المطلوب : أن يقوم البرنامج عند تشغيله بالتأكد من وجود أحد الجداول هل هو موجود أم لا ؟

إن لم يكن موجود يقوم بإنشاءه

وإن كان موجودا يتجاوز عملية إنشاء الجدول ويفتح الشاشة التالية .

فما هو الكود المطلوب للبحث عن الجدول في قاعدة البيانات هل هو مضاف للقاعدة أم لا ؟

منتظر ردودكم على أحر من الجمر

وتقبلوا خالص تحياتي .



RE: كيف يمكن التأكد من وجود الجدول قاعدة بيانات - سعود - 09-04-20

وعليكم السلام ورحمة الله وبركاته
مثال(كود انشاء(قاعدة بيانات + جدول + اعمدة) تصفير العداد) مع اضافة صور والبحث المطلق

ارجو ان تجد فيه مابتحث عنه.



RE: كيف يمكن التأكد من وجود الجدول قاعدة بيانات - Codack - 09-04-20

متشكر اخي على المساعدة وقد تم حل المشكلة عبر هذا الكود

كود :
       Dim con As New SqlCeConnection("Data Source=" & Application.StartupPath & "\GoldinDB\GDB.sdf;Password=Codack;Persist Security Info=True")
       Dim A001 As New SqlCeCommand
       If con.State = ConnectionState.Open Then con.Close()
       Dim sqlStatement As String = " Create Table [AAAAAAA] ([ID] [int] primary key identity not null,[Name] [nvarchar](100),[age] [nvarchar](100) ,[Mobile] [nvarchar](100))"
       A001 = New SqlCeCommand(sqlStatement, con)
       con.Open()
       Try
           A001.ExecuteNonQuery()
           MsgBox("ok")
       Catch ex As Exception
           MsgBox("no")
       End Try
       con.Close()