مساعدة الله يخليكم تخرجي متوقف على مساعدتكم

انتظر اخي جاري تحضير الحل

اخي اعمل قاعدة ب 2007 ثم حولها الي تنسيق 2002 او 2003 اللي اقدم وكل ما يقل كان افضل (لان البرنامج ليس لدي)

-ثم اضف مكتبة من project ثم references

واضف مكتبة Microsoft Dao 3.51 Object Library

ثم اضف الكود التالي في الفورم:

	Set Cn = New ADODB.Connection
	Cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=; Data Source=" & App.Path & "\مكان الداتا"

	Set DATACN = New Connection
	With DATACN
		.Provider = "Microsoft.Jet.OLEDB.4.0"

		.ConnectionString = "Data Source=" & App.Path & "\مكان الداتا"
		.Open
	End With
	Set DATARS = New Recordset
	With DATARS
		.ActiveConnection = DATACN
		.CursorType = adOpenDynamic
		.LockType = adLockOptimistic

		.Open "اسم الجدول", DATACN, adOpenDynamic, adLockOptimistic, 2
	End With
	 RRefresh

ثم بعد ذلك اضف موديول

واكتب فيه :

Global Cn As ADODB.Connection

هل المشكلة حلت اخي

؟؟؟؟؟؟؟

مشكووور اخوي على الحل لكن في خطا اخوي بكود الموديل .... تابع الصورة التالية

كل ما اشغل البرنامج يواجهني الخطا التالي

user defined type not defined

اذا لم تظهر الصورة عندك هذا هو رابطها

http://www.up.to.md/s.gif

حلها اخوي الله يخليكم ما في وقت

شكراااا

اخي اسف نسيت

افتح صفحة الكود واكتب الكود التالي في الجنرال او تحت الاكواد او فوقهم (المهم بعيد عن الفورم لود)

اخي هذا في الفورم وليس الموديول

Option Explicit										  
Dim DATACN As ADODB.Connection
Dim DATARS As ADODB.Recordset
Dim OpenFile As String
Public rs	 As New ADODB.Recordset

اسف اخوي نفس المشكلة

user defined type not defined

اذا لم تظهر الصورة عندك هذا هو رابطها

http://www.up.to.md/s.gif

اخوي انت شنو القواعد الي تتعامل معها ؟؟؟

حلها الله يكرمك

مشكوووور

نوع القواعد 2002

أخي الكريم هو يسأل كيفية ربط قاعدة من نوع آكسس 2007 عن طريق الداتا كنترول وأنت واضع له طريقة الداو!!

بالنسبة للسؤال : أخي الكريم قواعد بيانات 2007 صيغة القاعدة تختلف عن المعروف الذي هو (mdb) وصيغتها هي(accdb) ولا أضن أن الفيجيوال يتعامل مع هذا النوع من قواعد البيانات.

الحل: أنك تصمم قاعدة على آكسس 2003 ومن ثم تحولها إلى نوع 98 ومن ثم ربطها.

أتمنى أن الفكرة وصلت.

اخي انت لم تفهم قصدي انا قلت له في الاول حول تنسيق القاعدة الي 2002 او 2003 لا اتذكر

لان البرنامج ليس عندي ولكني جربت الطريقة دي من قبل وشغالة

هل حولت القاعدة؟؟

شكرا للاخوان على الردود الكريمة لكن اخوي انا صممت قاعدة بيانات 2002-2003 ونفذت الطريقة الي قلتلي عليها مع الاكواد لكن للاسف بدون اي نتيجة نفس الخطا شنو الحل

استني اعملك مثال

تفضل اخي جرب هذا

New_Folder__2_.zip

ايه الاخبار يامان؟؟؟؟؟؟؟؟

B) مشكوووووووووور اخوي والله مو عارف كيف اشكرك

شكرا كتير

بس سؤال اي اصدار من الاكسس استخدمت في عمل القاعدة

وشنو هو كووود الاضافة (إضافة سجل)

الاصدار هو 2002 او 2003

وليس 2007 او 97

اما الكود سأحضره لك قريبا

assi boy كتب:

مشكووور اخوي على الحل لكن في خطا اخوي بكود الموديل .... تابع الصورة التالية

كل ما اشغل البرنامج يواجهني الخطا التالي

user defined type not defined

اذا لم تظهر الصورة عندك هذا هو رابطها

http://www.up.to.md/s.gif

حلها اخوي الله يخليكم ما في وقت

شكراااا

Assalamou 3alaykom

Because you are in a hurry and I am not used to write with an arabic keyboard, I will answer your questions in English and I promise next time to give it more time to write in arabic.

I think you need to add a reference to ADO in order to be able to use it in Coding, so go to the menu

Tools >> References

and then add two references:

Microsfot ActiveX Data Objects 2.7 Library (Or later)

Microsoft ADO Ext. 2.1 for DDL and Security or later version

This way you will not have any problems with the user defined type.

Betawfi9 Incha2allah

Salem ;)

تفضل اخي عدلت لك المثال

وعملتك الازرار

وجرب وقولي

New_Folder__2_.zip

ايه الاخبار؟؟؟؟؟؟؟؟؟

http://www.arabmoheet.net/forum/default.as...3853&page=4

بعض التعديلات referencesهنا الرابط