تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] فتح جدول موجود ضمن قاعدة البيانات
#1
لو سمحتم عندي برنامج عالفيجول ستديو وقاعدة بيانات اكسس فيها اربع جداول a وbوcوd
عاوز احط زر بوتم اقدر افتح من خلاله قاعدة البيانات   الجدول a  فقط
 ياريت المساعدة
الرد }}}
تم الشكر بواسطة:
#2
اتمنى التوضيح اكثر

هل تريد كا كود استعلام يقوم بعرض محتوى بيانات الدول المحدد
ام ماذا بضبط لان تقريباً كلامك يدل على انه لا يخص الاستعلام فاتمنا توضيح ما تريد فعله تماماً

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}}
تم الشكر بواسطة:
#3
اريد كود اضعه في بوتن يفتحلي جدول  معين موجود ضمن ملف اكسس  كجدول a الموجود في ملف اكسس خارج الفورم  اي كأني عم افتح ملف اكسس عادي ولكن جدول معين
الرد }}}
تم الشكر بواسطة:
#4
لاتمام الامر بكل سهولة 
كل ما عليك تطبيق التالى افتح محرر Notepad
ثم قم بوضع الكود التالى بداخله
كود :
[Shortcut Properties]
AccessShortcutVersion=1
DatabaseName=استبدل النص هنا باسم ملف قاعدة البيانات بالامتداد
ObjectName=استبدل النص هنا باسم الجدول
ObjectType=Table
DatabasePath=استبدل النص هنا باسم ملف قاعدة البيانات بالامتداد

ثم قم بحفظ الملف بهذا الاسم مع الامتداد
كود :
a.MAT

تذكر الكود المدرج بالاعلى يجب ان يكون على هذا النحو
كود :
[Shortcut Properties]
AccessShortcutVersion=1
DatabaseName=DBAccess.accdb
ObjectName=a
ObjectType=Table
DatabasePath=DBAccess.accdb

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

بعد اتمام حفظ الملف الاول ووضع به اسم الجدول وهو A
كرر نسخ الملف وحرره لتعديل اسم الجدول فى الملف الثاني الى B
حتى يكون لديك عدد الملفات بعدد الجداول لديك

وتذكر ان يكون الملفات بعد حفظها ان تكون بجانب قاعدة البيانات تماماً
لنقول انك تقوم بوضع قاعدة البيانات بجوار البرنامج كذلك الملفات دى تكون بجانب البرنامج

الان اصبح لديك كلاً من:
كود :
a.MAT
b.MAT
c.MAT
d.MAT

الان تعال فى كود الحدث واستخدم الكود على هذا النحو
كود :
       Process.Start("a.MAT")

بكده عند فتح الملف سيتم تلقائي فتح قاعدة البيانات 
على الجدول حسب ما قمت انت به من تسمية

اتمنى ان تكون  الصورة مبسطة ولا يوجد اى متاهة فى تنفيذ الامر

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}}
#5
اخي الكربم توهنتني كثير وانا مبتدئ بهدا العلم راح ابعتلك مشروع جاهز لكن من موقع اخر اسمه emad ياريت تساعدني بالكود 
وشكوا كثير الك سلفا
الرد }}}
تم الشكر بواسطة:
#6
(09-03-19, 12:20 AM)EMADMW17 كتب : اخي الكربم توهنتني كثير وانا مبتدئ بهدا العلم راح ابعتلك مشروع جاهز لكن من موقع اخر اسمه emad ياريت تساعدني بالكود 
وشكوا كثير الك سلفا

اخي الكريم هذا هو الرنامج ياريت التعديل


الملفات المرفقة
.rar   فتح جدول ضمن ملف اكسس.rar (الحجم : 82.15 ك ب / التحميلات : 19)
الرد }}}
تم الشكر بواسطة:
#7
الله يعطيكم العافي حاولت نفذ الكود الي بعثته ماعرفت مكان  notepad
لاني مبتدئ بعثتلك المشروع من موقعي الاخر ياريت المساعدة او شرح لي اكثر وخاصة المقصود  بكلمة notepad
الرد }}}
تم الشكر بواسطة:
#8
ولا يهمك اخى الحبيب

بدون اى متاهة او مراحل كثير او ما شبه
كل ما عليك فقط تاتى فى كود الزر الاول 

وهو : A  فتح الجدول || وضع بالحدث الخاص به الكود التالى
كود :
       Dim MyApp As String = Application.StartupPath
       Dim path As String = "a.MAT"
       Dim Text As String = "[Shortcut Properties]
                          AccessShortcutVersion=1
                          DatabaseName=mm1.accdb
                          ObjectName=a
                          ObjectType=Table
                          DatabasePath=" & MyApp & "\mm1.accdb"
       File.WriteAllText(path, Text, Encoding.Unicode)
       Process.Start("a.MAT")

كود الزر الثاني
وهو : B  فتح الجدول || وضع بالحدث الخاص به الكود التالى
كود :
       Dim MyApp As String = Application.StartupPath
       Dim path As String = "b.MAT"
       Dim Text As String = "[Shortcut Properties]
                          AccessShortcutVersion=1
                          DatabaseName=mm1.accdb
                          ObjectName=b
                          ObjectType=Table
                          DatabasePath=" & MyApp & "\mm1.accdb"
       File.WriteAllText(path, Text, Encoding.Unicode)
       Process.Start("b.MAT")

وهو سيقوم بكل شى وسيقوم بفتح الجدول مباشر كما تريد

تحياتى لك
وتمنياتى لك التوفيق
{ وَقُل رَّبِّ زِدْنِي عِلْمًا }
[ كن على يقين من اعمالنا نخطئ ومن اخطائنا نتعلم ولذلك لا شي مستحيل ]

ساهم دائماً فى    لكل من يقوم بالمساهمة
فى حل المشكلة او الاستفسار لديك فالجميع هنا يعمل 
على مساعدة الاخرين لوجه الله وان تحتسب له اجر عند الله


 شرح كيفية عمل قاعدة بيانات تعمل على اكثر من جهاز على الشبكة الداخلية
الرد }}}
تم الشكر بواسطة: sendbad100


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  هل من الممكن العمل على قاعدة بيانات اكسل على الفيجوال بيسك خالد كامل1 4 81 24-03-24, 02:00 AM
آخر رد: خالد كامل1
Exclamation [سؤال] كيف يمكن الغاء السوال عند الكتابة على ملف موجود dell 0 48 19-03-24, 01:23 AM
آخر رد: dell
  [VB.NET] تحديث بيانات فى كلاس من جدول سيكوال asdfar1977 6 184 26-02-24, 01:07 AM
آخر رد: asdfar1977
  [VB.NET] حل مشكلة الاتصال بقواعد البيانات access loay775 2 158 25-02-24, 06:29 AM
آخر رد: loay775
  انشاء قاعدة بيانات من ملف سكربت strongriseman 5 500 17-02-24, 02:57 PM
آخر رد: strongriseman
  سؤال عن عملية حذف سجل من قاعدة البيانات assuhimi 3 249 11-02-24, 08:43 PM
آخر رد: assuhimi
  فلترة datagridview بدون قاعدة بيانات صالح عبدالله 3 295 02-02-24, 04:07 PM
آخر رد: صالح عبدالله
  [VB.NET] منع تكرار البيانات في عند الادخال مبرمج صغير 1 2 255 24-01-24, 05:18 PM
آخر رد: مبرمج صغير 1
Photo [كود] مطلوب كود يستخدم الأوامر فقط لتحديث قاعدة بيانات بـ vb.net AhmedEissa 4 638 18-01-24, 11:40 PM
آخر رد: العتيق
  [VB.NET] مساعدة في استدعاء البيانات معينه من form الأول إلى form 2 بدون التعديل loay775 2 275 18-01-24, 05:04 PM
آخر رد: loay775

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم