د.كاف يار

تفضل هذا الكود اخي الكريم جملة اتصال + جملة الاستعلام+داتا تيبل و جاهزة للبراميتر اذا كان غرض الاستخدام لعمل شاشة تسجيل دخول كما انصحك بأن تجعل الموقع هذا في ضمن مراجعك بشكل دائم Access connection strings Using con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\Data.mdbJet OLEDB:Database Password=MyDbPassword;;") Using cmd As New OleDbCommand("SELECT * FROM EmployeeDATA;") Using sda As New OleDbDataAdapter cmd.Connection = con sda.SelectCommand = cmd Using dt As New DataTable() sda.Fill(dt) GridView1.DataSource = dt GridView1.DataBind() End Using End Using End Using End Using

هذا الموضوع تكرر اكثر من مرة انصحك بأن تستخدم البحث الخاص بالمنتدى تمت الاجابة على اسألة كثيرة بهذا الخصوص

لن يستطيع احد تقدم المساعدة لك بدون تقديم معطيات كاملة ففي المرفق الأخير ضمن الكود ارتباطات لعناصر ليست موجودة في المرفق و لا حتى الجداول المعدة لذلك لكن تفضل هذا عداد وقت قم بتكييفه مع برنامجك حسب التصميم لديك Sub NewTimer() Dim PauseTime, Start, Finish, TotalTime PauseTime = 3600 Start = Timer Do While Timer < Start + PauseTime DoEvents Loop Finish = Timer TotalTime = Finish - Start call NewTimer() End Sub

تفضل التعديل البرنامج.zip

تفضل هذا التعديل البرنامج.zip

تفضل بطاقة.accdb

تفضل التعديل New folder.zip

تفضل التعديل الدائن و المدين.zip

تفضل db1.zip

تفضل التعديل الدائن و المدين.zip

تفضل التعديل *** يجب فك ضغط الملفات أولاً قبل التجربة الدائن و المدين.zip

تفضل هذا التعديل يابوالحسن الدائن و المدين.zip

لأنه لا توجد سجلات ضمن السنة المالية المسجلة لكن تفضل تعم تعديل النسة المالية لكي تظهر النتائج الدائن و المدين.zip

جعله الله هذا العمل الجميل في موازين حسناتك عمل لا توفيه كل معاني الإعجاب قيمة في الإحترافية والإبداع شكرا لك و فعلا هذا ما كنت في حاجته و بارك الله فيك و في علمك

تفضل التعديل الدائن و المدين.zip

شكرا لك على كلماتك الجميلة يابو الحسن بالنسبة لطلبك غير واضح هل تريد اضافة بند او عمود جديد يتحوي على قديم و جديد ؟

يا اخوان الي جرب المرفق يرجع يحمله من جديد حيث ان الايميلات بدءت تصلني من كل من قام بتحميل البرنامج و تجربته تم التعديل ليرسل الى الاميلات المسجلة في الجدول حيث انه عند التجربة قد وضعت ايميلي الخاص و بالتالي كل من قام بتحميل المرفق اصبحت الايميلات ترسل الي ايميلي بشكل مباشر و تم تعديل خذا الخطـأ

مشاء الله جميل لكن لو كانت مباشرة افضل اي ان تضع عداد وقت يقوم بالتحديث في في جزء من الثانية لكي تصبح الدردشة حية

اتوقع المشكلة هنا me.Text6= dcount("*", "request", "[rdate]=#" & format(CDate(me.txtsearch),"mm/dd/yyyy") & "# And [doctor] ='ك'")

المرفق ليس الا مثال لكن تفضل هذا التعديل تم تشفير بيانات تسجيل الدخول الى البريد الإلكتروني كما يجب من اعدادات الايميل تمكين دخول البرامج الأقل أمانا myaccount.google بعد التمكين قم بإضافة الايميل و كلمة المرور لقاعدة البيانات صورة من الإيميل صورة الشهادة 12839.pdf Course certificates -Mohd+Moosa.zip

تفضل هذا التعديل بدون استخدام الأوت لك ستجد ازرار الضبط بجوار ازرار الإرسال ضع البريد الإلكتروني و كلمة المرور و ابدء في الإرسال Course certificates -Mohd+Moosa.zip

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

نعم صحيح بيانات قاعدة البيانات في سيرفر SOMEE لا الموضوع فقط كمثال للإتصال لأن بطبيعة الحال بيانات الدخول ستكون ضمن الكود فعند الاتصال للتعديل او الإضافة أو الحذف أو الإستعلام أو عرض البيانات يتم الاتصال بالسيرفر من خلال الكود دون تدخل المستخدم تماما مثل هذا المننتدى اوفيسنا فكل ما يحتويه مخزن ضمن قاعدة البيانات و انتي حين تدخلين على الموضوع تقومي بالإتصال بقاعدة البيانات و جلب السجل المرتبط بالموضوع كذلك يمكن الإكتفاء بربط قاعدة بيانات اكسس بالسيرفر بشكل مباشر لكني لم اجرب التعديل و الإضافة بشكل مباشر للأسف

تفضل التعديل الازرار.accdb

تفضل هذا المثال اكمالي البيانات و جربي الاتصال بجدول MyData.zip