اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

السلام عليكم

ابحث عن كود vb وكيفية عمل Recordset داخل كود vb داخل الأكسس

وذلك لإتاحة الإستعلام عن قيمة معينة وعمل مجموعة من العمليات عليها

مع تحياتي

قام بنشر

إذا كنت تريد ذلك عن طريق DAO أو ADO

فالموضوع لا يمكن شرحه هنا

فإما أن تحدد بالضبط ما تريده لعل أحدا من الإخوان يكون عنده إجابة محددة ، أو ترجع لشروح DAO أو ADO ، وهو ما أنصحك به إن لم تكن مستعجلا ، لأني حقيقة لم أزل أميا في البرمجة حتى تعلمت DAO من أحد الكتب ، فصرت أمشي حال نفسي غالبا .

وأتمنى حاليا أن أتعلم ADO .

قام بنشر

انا اريد فقط جملة vb التي تخلق Recordset لجملة sql

والناتج أضعه في متغير

هذا ما أريده بالتحديد مجرد كود

ومع تحياتي

مع العلم اني كنت اريد منك في صورة مختصرة ان أعلم مامعني ADO , DAO والفرق بينهما بصورة مختصرة جدا

قام بنشر

مامعني ADO , DAO والفرق بينهما بصورة مختصرة جدا ؟

Data Access Objects كائنات الوصول الي البيانات :

http://www.officena.net/Tips/AC3-ADO&DAO.htm

مواضيع أخرى ذات صلة :

إضافة سجل باستخدام ADO, إضافة سجل من نموذج بدون مصدر بيانات

http://www.officena.net/ib/index.php?showtopic=13

حول اضافة سجلات الى جدول باستخدام كود الVBA

http://www.officena.net/ib/index.php?showtopic=1096

إضافة سجل باستخدام DAO, إضافة سجل من نموذج بدون مصدر بيانات

http://www.officena.net/ib/index.php?showtopic=14

أخي الفاضل : طيب حصلت على Recordset ، والغالب أنها عبارة عن عدد من السجلات ، فيها عدد من الحقول بأسماء مختلفة ، أي السجلات تريد ، وأي الحقول ؟ وهل تريد فقط استنتاج قيم أو تريد إجراء عمليات على السجلات إضافة وحذفا وتعديلا .

قام بنشر

السلام عليكم

اخي هذا مثال بالضبط يعبر عما اريد بالتحديد _ هذا المثال من خلال برنامج vb ويقوم بالإتصال بقاعدة بيانات sql

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

وهو كالتالي :

-----------

dim Connect As Connection

dim RecSet_Common As Recordset

-------------------

Set Connect = New Connection

Connect.Open "driver={Sql server};server=" & X_ServerName & ";uid=" & X_ConnicionUserName & ";;database=" & X_DataBaseName & ""

----------------

Set RecSet_Common = New Recordset

RecSet_Common.Open "SELECT T_ItemsDetails_M.* FROM T_ItemsDetails_M WHERE (ItemsID = " & List_Items & " ) ", Connect_EastAsia, adOpenStatic, adLockOptimistic

---------------

هنا يمكن أن اتعامل مع ناتج جملة SELECT بأي طريقة أريدها

Text_ItemsID = RecSet_Common.Fields("ItemsID")

--------------

__

والمختصر اني اريد ان أجلب مجموعة من البيانات ناتج جملة SELECT وأضعها في Recordset بدون إستخدام form

والتعامل مع هذه البيانات بأي طريقة أريدها من خلال الكود

أتمني ان أكون قد وضحت المطلوب

مع تحياتي

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information