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

د.كاف يار

الخبراء
  • Posts

    1,681
  • تاريخ الانضمام

  • تاريخ اخر زياره

  • Days Won

    60

كل منشورات العضو د.كاف يار

  1. تفضل التعديل *** يجب فك ضغط الملفات أولاً قبل التجربة الدائن و المدين.zip
  2. تفضل هذا التعديل يابوالحسن الدائن و المدين.zip
  3. لأنه لا توجد سجلات ضمن السنة المالية المسجلة لكن تفضل تعم تعديل النسة المالية لكي تظهر النتائج الدائن و المدين.zip
  4. جعله الله هذا العمل الجميل في موازين حسناتك عمل لا توفيه كل معاني الإعجاب قيمة في الإحترافية والإبداع شكرا لك و فعلا هذا ما كنت في حاجته و بارك الله فيك و في علمك
  5. شكرا لك على كلماتك الجميلة يابو الحسن بالنسبة لطلبك غير واضح هل تريد اضافة بند او عمود جديد يتحوي على قديم و جديد ؟
  6. يا اخوان الي جرب المرفق يرجع يحمله من جديد حيث ان الايميلات بدءت تصلني من كل من قام بتحميل البرنامج و تجربته تم التعديل ليرسل الى الاميلات المسجلة في الجدول حيث انه عند التجربة قد وضعت ايميلي الخاص و بالتالي كل من قام بتحميل المرفق اصبحت الايميلات ترسل الي ايميلي بشكل مباشر و تم تعديل خذا الخطـأ
  7. مشاء الله جميل لكن لو كانت مباشرة افضل اي ان تضع عداد وقت يقوم بالتحديث في في جزء من الثانية لكي تصبح الدردشة حية
  8. اتوقع المشكلة هنا me.Text6= dcount("*", "request", "[rdate]=#" & format(CDate(me.txtsearch),"mm/dd/yyyy") & "# And [doctor] ='ك'")
  9. المرفق ليس الا مثال لكن تفضل هذا التعديل تم تشفير بيانات تسجيل الدخول الى البريد الإلكتروني كما يجب من اعدادات الايميل تمكين دخول البرامج الأقل أمانا myaccount.google بعد التمكين قم بإضافة الايميل و كلمة المرور لقاعدة البيانات صورة من الإيميل صورة الشهادة 12839.pdf Course certificates -Mohd+Moosa.zip
  10. تفضل هذا التعديل بدون استخدام الأوت لك ستجد ازرار الضبط بجوار ازرار الإرسال ضع البريد الإلكتروني و كلمة المرور و ابدء في الإرسال Course certificates -Mohd+Moosa.zip
  11. المشكلة لديك في لغة الاوفيس اتوقع انها فرنسية حولها الى العربية او الانجليزية و تنتهي المشكلة
  12. نعم صحيح بيانات قاعدة البيانات في سيرفر SOMEE لا الموضوع فقط كمثال للإتصال لأن بطبيعة الحال بيانات الدخول ستكون ضمن الكود فعند الاتصال للتعديل او الإضافة أو الحذف أو الإستعلام أو عرض البيانات يتم الاتصال بالسيرفر من خلال الكود دون تدخل المستخدم تماما مثل هذا المننتدى اوفيسنا فكل ما يحتويه مخزن ضمن قاعدة البيانات و انتي حين تدخلين على الموضوع تقومي بالإتصال بقاعدة البيانات و جلب السجل المرتبط بالموضوع كذلك يمكن الإكتفاء بربط قاعدة بيانات اكسس بالسيرفر بشكل مباشر لكني لم اجرب التعديل و الإضافة بشكل مباشر للأسف
  13. تفضل التعديل الازرار.accdb
  14. تفضل هذا المثال اكمالي البيانات و جربي الاتصال بجدول MyData.zip
  15. تفضل هذا التعديل المحزن.zip
  16. لقد قمت بإغلاق السؤال في حال تم اغلاق السؤال لن يلتفت احد بعد ذلك للموضوع انصحك بفتح موضوع جديد يتضمن السؤال او الاستفسار الذي تريده شكرا لك
  17. للأسف يبدوا انه لدي مشكلة في فهم سؤالك يرجى اعادة شرح المطلوب بصورة مبسطة هل تريد التغيير على القيم الأساسية ؟ ام هل تريد الحاق نسخة من القيم الأساسية لكل سجل بحيث تكون لكل سجل قيمة فريدة مستقبلة به
  18. هذا الكود فقط كمثال يجب ان تضعي المعطيات للكود للحصول على نتيجة ServerAddress=عنوان السيرفر ServerUserName = اسم المستخدم الخاص بالسيرفر ServerPassword = كلمة المرور الخاصة بالسيرفر Call SQL_String("ServerAddress", "ServerUserName", "ServerPassword") كما يجب اضافة المكتبة الخاصة بالإتصال البعيد او ارفقي مثال لكي يتم التعديل عليه
  19. اتفضل هذا التعديل cnbo (1).accdb
  20. لجلب البيانات من السيرفر استخدمي الرابط التالي الصقي الكود التالي في آخر محرر الأكواد Private Function SQL_String(ServerAddress As String, ServerUserName As String, ServerPassword As String) As String Dim conn As ADODB.Connection Dim rs As ADODB.Recordset Dim strConnString As String strConnString = "Provider=SQLOLEDB;Data Source=" & ServerAddress & _ ";Persist Security Info=True;User ID=" & ServerUserName & ";Password=" & ServerPassword & ";" Set conn = New ADODB.Connection conn.Open strConnString Set rs = conn.Execute("SELECT * FROM aqsam111") If Not rs.BOF And Not rs.EOF Then rs.MoveFirst While (Not rs.EOF) [TextBox1] = rs.Fields(0).Value [TextBox2] = rs.Fields(1).Value [TextBox3] = rs.Fields(2).Value [TextBox4] = rs.Fields(3).Value [TextBox5] = rs.Fields(4).Value rs.MoveNext Wend End If rs.Close Set rs = Nothing End Function و في ازرار جلب البيانات Call SQL_String("ServerAddress", "ServerUserName", "ServerPassword")
  21. حاليا نعم و هي مجانية الى الأبد او حتى تقوم الشركة بتغيير سياستها ممتاز جدا حاليا اتبعي الطريقة في الرابط التالي لربط الأكسس مع قاعدة البيانات في السيرفر الخارجي بالتأكيد نعم و بهذه اللغات يكون الاستخدام اسهل من الأكسس بكثير
×
×
  • اضف...

Important Information