تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
اضافة استعلام الي قاعدة البيانات اكسس
#1
السادة الافاضل
كيف يمكن انشاء استعلام في الاكسس يضاف الي القاعدة مثله مثل الجدول ؟؟؟
شكرا
الرد
تم الشكر بواسطة:
#2
السلام عليكم

السؤال غير واضح؟!!!!!!!!!!!
الرد
تم الشكر بواسطة:
#3
AngelAngel مافهمت
الرد
تم الشكر بواسطة:
#4
اذا كنت تعني من برنامج مايكروسوفت أكسس نفسه فالامر لا يحتاج الا ان تذهب الى إنشاء ثم استعلامات معالج الاستعلامات
وبشكل بسيط بالماوس تستطيع عمل ذلك وتستطيع روية كود الاستعلام لو اختر بعد تكوين الاستعلام خريط SQL
او ضع مثال وبين طلبك بالتحديد عليه.
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 اللهم اغْفِرْ لِلمؤمنين والمؤمنات والمسلمين والمسلمات الأحياء منهم والأموات
الرد
تم الشكر بواسطة: ahmed saba
#5
السادة الافضل
نستطيع اضافة جدول الي قاعدة البيانات وذلك بالكود

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

بحيث اذا فتحنا القاعدة الاكسس نجد يها الاستعلام
الرد
تم الشكر بواسطة:
#6
يعني الأخ يقصد انشاء استعلام بواسطة الاكسس
وعند الذهاب الى الفيجوال دوت نت عند قاعدة البيانات المرتبطه بالتطبيق
نلاحظ وجود مجلدات عدة
من أهمها مجلد tables
وكذالك مجلد views الخاص بالأستعلامات الجاهزه من خلال قاعدة البيانات أكسس

صراحة انا لا اعلم كيفية الطريقه المناسبة ولكن حبيت ان اوضح ما طلبه الأخ
كيفية التعامل مع الأستعلامات الجاهزه من الأكسس

انا بأعتقادي انه لو تروح على الأستعلام الذي موجود في قاعدة البيانات أكسس بالنقر عليه باليمين ثم تعديل بواسطة sql
سيظهر لك جملة sql على الاستعلام الذي تم انشائه مسبقآ
ويتم اسناده الى فيجوال دوت نت مثل أي استعلام يتم التعامل معه
وذلك بوضع الأدوات المناسبة بما يقابلها في جملة الأستعلام وذلك من خلال استبدال مابعد جملة where مثلآ
PHP كود :
str = (select username from studentes where id_student '"& textbox.text &'") 


الملفات المرفقة صورة/صور
       
الرد
تم الشكر بواسطة:
#7
السيد الفاضل
هذا الكود ينفذ استعلام ولا ينشيء استعلام في القاعدة
اي عند الخروج من الفيجوال وفتح القاعدة نجد ان الاستعلام غير موجود

اي

المطلوب التعامل مع الملف اكسس من خلال الكود من حيث انشاء جدول استعلام تقرير داخل القاعدة
شكرا
الرد
تم الشكر بواسطة:
#8
كود :
Dim ConnSTR As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" + Application.StartupPath + "\db.mdb;Persist Security Info=False;"
        Dim connection As New OleDbConnection(ConnSTR)
        Dim command As New OleDbCommand ()
        command.Connection = connection
        connection.Open()
        command.CommandText = "CREATE PROC FF AS SELECT * FROM Employee "
        command.ExecuteNonQuery ()
أما إنشاء الجدول :
CREATE TABLE
الرد
تم الشكر بواسطة:
#9
جاري التنفيذ مع وافر التحية لك
الرد
تم الشكر بواسطة:
#10
ربما لو كان طلبك واضحا لكانت الاجابات اقل وأسرع
من خلال الفيجوال بيسك تسطيع انشاء قاعدة بيانات بأكملها
يعني قاعدة بيانات وجداولها و حقول الجداول عدا الاستعلام الذي لا يعد سوى استخلاص بيانات حقول من جدول أو اكثر
فمثلا لانشاء قاعدة بيانات بخا جدول واحد يحوي ثلاثة حقول نتبع التالي
بالتوفيق للجميع
[/php]
PHP كود :
Imports System.Data.OleDb
Friend 
Class Form1
    Inherits System
.Windows.Forms.Form
    
'بداية من الريفرنس اضف المكتبة
    '
Microsoft DAO 3.6 Object Library
    
' Microsoft Access 12.0 Object Library
    Sub CreateMyDatabase(ByRef DB_Name As String)
        Dim wrkDefault As dao.Workspace
        Dim dbsNew As dao.Database
        Dim DAODBEngine_definst As New dao.DBEngine
        wrkDefault = DAODBEngine_definst.Workspaces(0)
        dbsNew = wrkDefault.CreateDatabase(DB_Name, dao.LanguageConstants.dbLangGeneral, dao.DatabaseTypeEnum.dbEncrypt)
        '
ننشيئ قاعدة البيانات
        dbsNew
.Close()
        
'ثم نغلقها
        CreateMyTableS(DB_Name)
        '
نستدعى الدالة التى تنشيئ لنا الجداول فى قاعدة البيانات
        dbsNew 
Nothing
        wrkDefault 
Nothing
        
'لتفريغ الذاكرة
    End Sub
    Sub CreateMyTableS(ByRef DBName As Object)
        Dim dbsMyData As dao.Database
        Dim tdfNew1 As dao.TableDef
        Dim DAODBEngine_definst As New dao.DBEngine
        dbsMyData = DAODBEngine_definst.OpenDatabase(DBName)
        '
لفتح قاعدة البيانات
        With dbsMyData
            tdfNew1 
dbsMyData.CreateTableDef("Table1")
            
'لإنشاء جدول دون إضافة أى حقول إليه
            With tdfNew1
                '
انشاء الحقول كما ترى اسم الحقل ونوعه
                
.Fields.Append(.CreateField("Number"dao.DataTypeEnum.dbInteger))
                .
Fields.Append(.CreateField("items"dao.DataTypeEnum.dbText))
                .
Fields.Append(.CreateField("Lion_Ksa"dao.DataTypeEnum.dbMemo))
            
End With
            dbsMyData
.TableDefs.Append(tdfNew1)
            
dbsMyData.Close()
        
End With
        
'الان نأتي للاستعلام والاستعلام لن يخرج عن حقول الجداول ابدأ
        Dim ConnSTR As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" + Application.StartupPath + "\VB4Arab.mdb;Persist Security Info=False;"
        Dim connection As New OleDbConnection(ConnSTR)
        Dim command As New OleDbCommand()
        command.Connection = connection
        connection.Open()
        '
هنا نختار الحقل والشرط للاستعلام
        
'لاحظ انني حددت الحقل وكذلك الشرط والشرط هنا هو عدم تكرار نفس البيانات اكثر من مرة
        '
الحقل ' Lion_Ksa
        '
والشرط ' Distinct
        command.CommandText = "CREATE PROC FF AS SELECT Distinct Lion_Ksa FROM Table1 "
        command.ExecuteNonQuery()
        connection.Close()
    End Sub
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        '
تستطيع تغيير اسم و مسار  قاعدة البيانات حسب ما تريد
        CreateMyDatabase
(Application.StartupPath + ("\VB4Arab"))
        
MsgBox(" تم إنشاء قاعدة البيانات في المسار التالي " vbCrLf Application.StartupPathMsgBoxStyle.Information"")
    
End Sub
End 
Class 
سبحان الله والحمدلله ولا إله إلا الله والله أكبر
 اللهم اغْفِرْ لِلمؤمنين والمؤمنات والمسلمين والمسلمات الأحياء منهم والأموات
الرد
تم الشكر بواسطة: hamada salah90


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  عمل قاعدة البيانات salah mansour 5 11 منذ 48 دقيقة مضت
آخر رد: حريف برمجة
  [VB.NET] حفظ البيانات دفعة واحدة الداتا جريد فيو mahmoud.3com 1 112 16-12-18, 09:07 PM
آخر رد: viv
  سؤال فى قواعد البيانات احمد خطاب 5 120 26-11-18, 03:41 AM
آخر رد: elgokr
  مشكلة قاعدة البيانات لا تقبل البيانات بعد التنصيب abozeyd 8 325 10-09-18, 08:02 AM
آخر رد: elgokr
  سؤال حول عرض البيانات في الداتا جريد والاستعلام alfaiz678 12 665 25-08-18, 10:00 PM
آخر رد: elgokr
  [سؤال] حول تحديث البيانات داخل DataGridView مبرمج بلا حدود 20 3,824 14-08-18, 09:00 PM
آخر رد: elgokr
  كيفية حفظ التعديل في Data Grid View مباشرا الى قاعدة البيانات اللورد محمود 1 461 02-08-18, 07:26 PM
آخر رد: سعود
  [سؤال] كيفية ربط قاعدة بيانات اكسس 2007 بالفيجوال 2008 mohmedhosen 3 5,523 16-07-18, 08:48 PM
آخر رد: aridje34
  كيف اعمل استعلام لحقول معينه متشابهه من عدة جداول aftfm 0 210 24-05-18, 09:16 PM
آخر رد: aftfm
  خطأ في الإتصال بقاعدة البيانات الموجودة على هذا السيرفر (ويندوز 10) djelloul 0 241 04-05-18, 12:14 AM
آخر رد: djelloul

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


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