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

اخر جزئية لم افهمها ممكن التوضيح بمثال

مع العلم اننى قمت بالربط بداتا

وهناك مشكلة اخرى

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

كل شىء تمام ماعدا التقارير لم تعمل معى

مشكور

امممممم ، ما رأيك ان ترفق ملف المشكلة التي عندك .. :)

انا اشرح المشكلة

انا فى مدرسة ثانوى

وتريد ادارة المدرسة وضع نتائج الطلبة فى قاعدة بيانات وربطها بالفجوال

وطبعا قاعدة البيانات لازم يكون ليها باص وورد لعدم التلاعب

وتريد الادارة طبع النتائج للطلبة..طالب طالب

يعنى التقرير عند الطبع يظهر فية طالب واحد بس ..

فهل دة صعب

ارجو الرد السريع

مشكور

الموضوع صعب

لا شيء صعب بعون الله اخي الكريم ,,

اذا كنت مرتبط مع التقرير بأستخدام الـ DataEnvironment فعند الاتصال بقاعدة البيانات ادخل كلمة المرور .. كما في الصورة التالية :

اما اذا اتصلت بالقاعدة عن طريق ADO .. فعليك في جملة الاتصال ان تحدد كلمة المرور كما يلي :

db.Open "data_base path", , "password=123“

هذا و الله و اعلى و اعلم ،،

بنت اليمن ،،

مشكولا أخوى على هذا الجهد

مشكور جارى التجربة

ممكن اعرف المشكلى دى اية بالظبط

يا مسهل سهل

العفو اخي gezery ...

اخي olobnet .. كان الله فعلاً في عونك ، يبدو ان هذه المسألة مشكلة لك ، اتصور ان المشكلة هي في مستوى امنية الوصول داخل الـ Access نفسه (طبعاً هذا اذا كنت واثق من كلمة المرور التي ادخلتها ) ، و لكني اعدك ان اسأل شخص معروف لدي اعتبره ممتاز جداً في الفيجوال .. و سأوافيك برده غداً ان شاء الله ،،

بنت اليمن ،،

شكرا على الرد

وعلى المجهود المبذول من اجلى

الأخت بنت اليمن

أقوم الأن بعمل برنامج مرتبط بقاعدة بيانات عن طريق ال ADO ولكني أقوم بعمل باسوورد علي البرنامج وعملت جدول للباسورد بقاعدة البيانات وأرغب في جعل البرنامج يطلب الباسوورد من المستخدم ويكشف عنه في المكان المخصص عنه بقاعدة البيانات ويمكن للمستخدم تغيير الباسورد فما هو الكود المخصص لذلك ؟

جزاكي الله ألف خير

السلام عليكم ،،

حاولت البحث عن الشخص الذي اخبرتك عنه اخي olobnet و لكني لم اجده ،، و لكني وجدت على نت مثال قريب لما اردت و عدلت فيه حتى نستطيع الدخول الى تقرير محمي بكلمة مرور ..و قد وفقت في ذلك و الحمدلله ، و الآن ارفق لك البرنامج على امل ان يجدي معك ...

حياك الله اخي remono84 .. سأحاول ان شاء الله تجهيز مثال بما طلبت في دخولي التالي الى المنتدى ،، و اشكرك على المرور ،،

اشكرك اخي الكريم Mag1.Net و ارجوا من الله ان يجزيك خيراً ايضاً ،،

مع الشكر للجميع ،،

بنت اليمن ،،

الدخول الى تقرير محمي بكلمة مرور.rar

مشكورة كتيييييييييييييييييييييييييييييييييييييييييييييييييييييييييييييييييييييير

عمل تستاهلين عليه فعل كل التقدير والاحترام .. الى الامام يا اختي الفاضله

وجزاكي الله عنا الف خير يا بنت بلادي .. بنت اليمن . حفظكي الله ورعاك .. وزاد هذا العمل ان شاء الله في سجل حسناتك ..

الآنسي .

العفو اخي olobnet المهم ان يكون هذا طلبك :)

و حياك الله اخي الكريم الآنسي و جزاك الله كل الخير على هذه الكلمات ، و كتب لك التوفيق دائماً ،،

بنت اليمن ،،

معلش انا تقيل عليكم شوية

مرفق المثال

انا عايز لما اضغط على الكوماند يطبع على طول التقرير

وما يطبعش القاعدة كلها يطبع فرد فرد وكل فرد فى ورقة مستقلة

وارجو ان اعرف كيفية ضبط هوامش الريبورت

وكيفية جعل ورقة الريبورت بالعرض وليس طولى

حيث اننى مبتدأ

مشكور....................

New Folder.rar

للرفع

ياشباب ماحد رد علي سؤالي ولا حتي ألقي تعليق عليه هل أنا غير مرغوب بي في المنتدي أم ماذا؟

السؤال مهم بالنسبة لي وإن لم يكن لي مكان هنا فليخبرني أحد وأنا سأنسحب فورا

أسف لبدايتي ولكني أوقفت عمل البرنامج علي تلك الجزئيه

أنا لا أنكر أهمية المجموعه التي عملتها بنت اليمن في كتابها ولكني لم أكن قرأته ولذا لم أقم بالتعليق عليه

ولكني رايته الأن وهو رائع جدا فعلا

ولكني أرغب في أن أستعمل اداة الDao في عمل باسوورد في برنامج والباسورد يتم تسجيله في قاعدة البيانات ويتم البحث عنه ثم يفتح القاعده

وسأقوم بإرفاق المثال للشرح الأكبر

ثانية : ( البرنامج عباره عن دليل تليفون ) وأرغب في جعل المستخدم يدخل باسورده يبدأ البرنامج ويوجد زر لعمل قاعدة بيانات جديده لمستخدم جديد يعمل علي البرنامج فيقوم البرنامج بإنشاء قاعده جديده للمستخدم الجديد حينئذ يقوم البرنامج عن قاعدة البيانات المسئوله عن هذا الباسورد فيفتح القاعده المسئوله عنه وعندما يقوم البرنامج بإنشاء القاعده الجديده يقوم بوضع باسوورد عليها حتي لا يستطيع فتحها أحد عن طريق الأكسس بدون الباسورد ولكن في تلك الحاله سأقوم بتثبيت الباسورد علي قاعدة البيانات فلا يمكن لأحد فتح قاعدة البيانات عن طريق الأكسس غيري أنا ولا حتي مستخدمها إلا عن طريق البرنامج نفسه علي حسب صاحب القاعده.

إذا كان كلامي واضحا وأراد أحد أن يجيب فليخبرني وإن لم يوجد فأنا أسف لتدخلي في الموضوع

شكرا لمن يقرأ الرساله

remono84_20@hotmail.com

حياك الله اخي remono84 .. وصدقني لا يوجد هنا احد غير مرغوب به فالمسألة هي مسألة وقت لوضع الرد المناسب ... :rolleyes:

عموماً اذا تريد ان تعرف كيف تنشيء قاعدة بيانات اثناء التنفيذ :

Private Sub Command1_Click()
CreateMyDatabase "c:\Mydata"
'يبدأ فيستدعي الدالة التي تنشأ الجدول المذكور
End Sub

Sub CreateMyDatabase(DB_Name As String)
نضيف المتغيرات التي نحتاج إليها
Dim wrkDefault As Workspace
Dim dbsNew As Database
Dim prpLoop As Property
Dim Resulte
Set wrkDefault = DBEngine.Workspaces(0)


Set dbsNew = wrkDefault.CreateDatabase(DB_Name, _
dbLangGeneral, dbEncrypt)
'ننشيئ قاعدة البيانات

dbsNew.Close
'ثم نغلقها

CreateMyTableS DB_Name
'نستدعى الدالة التى تنشيئ لنا الجداول فى قاعدة البيانات

Set dbsNew = Nothing
Set wrkDefault = Nothing
'لتفريغ الذاكرة
End Sub

Sub CreateMyTableS(DBName)
Dim dbsMyData As Database
Dim tdfNew1 As TableDef
Dim tdfNew2 As TableDef
Dim tdfNew3 As TableDef
Dim relNew As Relation
Dim idxNew1 As Index
Dim idxNew2 As Index

Set dbsMyData = OpenDatabase(DBName)
'لفتح قاعدة البيانات
With dbsMyData

Set tdfNew1 = dbsMyData.CreateTableDef("TB")
'لإنشاء جدول دون إضافة أى حقول إليه

With tdfNew1
.Fields.Append .CreateField("Number", dbInteger)
.Fields.Append .CreateFiled("Name",dbText")
هكذا نكون قد أضفنا حقلين باسمين ، وحددنا نوعيهما ، فالحقل الأول رقم والثاتي
نص .
End With
dbsMyData.TableDefs.Append tdfNew1
End With
End Sub

و هو للأمانة منقول

اما اذا اردت ان تعمل حماية لنظامك ، بكلمة مرور و صلاحيات للمستخدمين ، فهذا برنامج ارفق لك ، قمت بعمله على عجالة و ارجوا ان يجدي معك ...

الأخ الكريم olobnet : قرأت في احد المواضيع حلول لأسئلتك ارجوا ان يفي ذلك معك و اسأل الله ان يوفقك بعد هذا المجهود ،،

خالص تحياتي للجميع ،،

بنت اليمن ،،

حماية النظام بكلمة مرور و صلاحيات.rar

طيب حد يحل المشكلة الجديدة فى الداتا ريبورت

عايز افتح التقرير من اى مكان على الهارد

New Folder (10).rar

يعطيك العافية

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

الله يبارك فيكم اخوي المتميز و hussein2005 .. و مشكورين جزيل الشكر على المرور ...

بنت اليمن ،،