حسين العربى

Up

السلام عليكم ورحمة الله وبركاته اخواني اعضاء ومشرفي المنتدي الكرام اريد كود في زر امر لتصغير برنامج معين مفتوح علي سطح المكتب

تفضل استاذي الفضل الشرح بالفيديو

لاشكر علي واجب نحن نتعلم منك استاذ الفاضل وهذه فكرتك بس انا وضعت لمسه صغيره فقط

كما تفضلت استاذي الفاضل jjafferr انشأة جدول وسميته tbl_DateTime في قاعدة بينات سيكول يتكون من معرف/ وحقل تاريخ القيمة الافتراضية ()getdate وحقل اسمه tamp نوعه نص وفي النموذج وضعة حقل غير منضم وجعلة قيمته الافتراضية (1) /لاني النموذج عندي غير مرتبط بجدول / وفي حقل البحث وضعت كود لادراج رقم 1 من حقل tamp الي الحقل tamp / في جدول tbl_DateTime وبعد الادارج في الجدول يعطينا التاريخ والوقت الحالي للسيرفر فاستدعية في الحال عن طريق دالة DMax في حقل في النموذج اسمه srvr_Date_Time وفي زر الادخال توضع المقارنه بين تاريخ الجهاز وتاريخ السيرفر

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

استاذي الفاضل جعر اسف جدا تعبتك معي التعديل علي الكود الذي ارسلته لك لايعمل معي اما المثال الثاني الذي تفضلت به يعمل بس لا يحدث الوقت انا ضفت سجل وبقي عليه لاياتي بجديد ملوحظه في جدول SQL لابد من اضافة سجل لعطيك تاريخ وقت جديد ليس مثل الاكسس يظهر لك تحت السجل تاريخ وقت جديد

استاذي الفاضل jjafferr لوتكرمت تظبط لي الكود علي الفورم انا وضعت الكود والبيانات المطلوبه ولاكن في اي مكان اضع اسم الحقل الذي يستدعي فيه الوقت TEST.mdb

الف شكر استاذي الفاضل بالعكس انا هدفي هو المقارنه لكي لايتلاعب المستخدم في وقت وتاريخ الجهاز ولاكن لي استفسار المقصود ب اسم المستخدم وكلمة السر الي هما خاصين ب SQl ولا ايه

استاذي الفاضل jjafferr لم انتبه لهذا الكود ممكن شرح Dim cmd As New ADODB.Command Dim RS As New ADODB.Recordset cmd.ActiveConnection = "Provider=SQLOLEDB;DataSource=yourserver;Database=yourDB;UID=test;PWD=test;" cmd.ActiveConnection.CursorLocation = adUseClient cmd.CommandText = "Select getdate()" Set RS = cmd.Execute Debug.Print RS(0) RS.Close cmd.ActiveConnection.Close

الف شكر استاذي الفاضل صالح حمادي

الف الف شكر استاذي ومعلمي الفاضل جزاك الله خيرا وجعه في ميزان حسناتك

الف شكر استاذي الفاضل علي تعبك معي بس انا توصلت الي حل اخر بالنسبة للسيرفر وضعت الجدول في قاعدة بيانات SQL وجعلة قيمة حقل التاريخ NOW وعملت ربط من برنامجي بالجدول عن طريق ODBC وعملت استعلام مرتبط بالجدول ومن خلال النموذج بستدعي التاريخ والوقت عن طريق دالة DLookup من الاستعلام فيستدعي لي تاريخ السيرفر وسوف اشرح ذلك بالفيديو ليستفيد الجميع لاكن طلبي الحين لو تكرمت ليكتمل عملي اريد كود مقارنه يظهر لي رسالة تنبيه اذا كان حقل وقت السيرفر غير مطابق لحقل وقت كمبيوتر المستخدم واقصد بالوقت الساعه فقط مع تلاشي الدقائق والثواني لاني احيانا يكون في فرق في الدقائق بين السيرفر وجهاز المستخدم وشكر واسف علي الاطالة

استاذي الفاضل jjafferr انا جربت التعديل وظبط معي طيب ايه رايك لو نضع الجدول الي موجود في الملف BE الموجود علي السيرفر في SQL ونربطه بالواجه FE عن طريق ODBC فما هو التعديل علي الوحده النمطيه لا ني بصراحة مش عاوز اعمل ملف شير لاني دي شركة

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

Up

شكرا استاذي الفاضل للاسف جربته ولم يفلح معي وكان به هذا الملف عند وضع IP في اسم السيرفر يعطيني خطأ الجداول مصصمه في قاعدة بيانات سيكوال ومرتبطه عن طريق ODBC get time.rar 1176.Network_PC_Time.mdb

السلام عليكم ورحمة الله وبركاته عندي برنامج مرتبط بجداول علي سيكوال سيرفر اريد جلب تاريخ ووقت السيرفر في حقل في نموذج بدل من تاريخ ووقت جهاز المستخدم الي عليه البرنامج IP _SERVER_ 128.122.1.20 وجزاكم الله خيرا

هذا ما كنت اريده بالظبط ولاكن خطر في بالي شي فرجعة لكود اخي الفاضل عبد اللطيف سلوم لكي لايطوف علي المستخدم عقد منتهي

الف شكر استاذي الفاضل

كيفية عمل شرط في معيار استعلام اريد العقود التي تنتهي مثلا بعد 10 ايام بس دي مش هي المشكله عندي المشكلة اني مش هيظهر عندي غير العقد الي هينتهي بعد 10 ايام فقط انا مش عاوز كده ولانفترض ان انا عاوز من تاريخ اليوم ولنفترض تاريخ اليوم 21-8-2020 لحد 10 ايام لقدام طبعا هيظهر بس الي هينتهي بعد 10 ايام فقط انا عاوز يظهر لي مثلا الي هينتهي مثلا يوم 22 و 23 و24 وهكذا من داخل ال 10 ايام الي انا محددهم من تارييخ اليوم وشكرا واسف علي الاطالة ولكم جزيل الشكر وليكم مثال للتعديل عليه PROGRMS_HOME.rar

Up

السلام عليكم ورحمة الله وبركاته اخواني اعضاء ومشرفي المنتدي الكرام كانت لي تجربة مع قارئ شريحة البطاقة المدنية كارت ريدر وصممت برنامج علي الاكسس وطرحت هذا الموضوع من قبل في الموقع ولم اتوصل الي حل مشكلتي هي اني اريد الكود الي اقدر اتعامل به مع القارئ بدل من البرامج الوسيطه الجاهزه فلو احد الاخوه عنده فكره عن الموضوع يشرحه لنا وله جزيل الشكر اليكم طريقتي في السحب عن طريق برنامج وسيط exe https://youtu.be/eiyc-CGxewc

الف شكر استاذي الفاضل محمد ابو عبدالله واستاذي الفاضل د.كاف يار واستاذي الفاضل Barna هذا هو المطلوب