• الإعلانات

    • فيصل الحربي

      تسجيل عضوية جديدة في المنتدى   01/31/2016

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

اسلام الكبابى

اعضاء
  • عدد المشاركات

    292
  • تاريخ الانضمام

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

كل شيء نشر بواسطة اسلام الكبابى

  1. قيمة حقل معين فى سجل معين

    عرفت الحل والحمد لله الحل هو أن يكون تعاملى مع RS وليس مع الADODC نفسه أى أن يكون الكود هكذا If RS.State = adStateOpen Then RS.Close RS.Open "SELECT * FROM table1", db, adOpenStatic, adLockPessimistic RS.MoveFirst: RS.Move (9) XXX = RS.Fields(3)  
  2. لدى adodc مرتبط بأحد جداول قاعدة بيانات كيف يمكن معرفة قيمة حقل معين فى سجل معين (مثلآ قيمة حقل رقم 3 فى السجل العاشر) كل ما أعلمه من أجل ذلك أن أتوجه للسجل العاشر ثم أكتب الجملة XXX = Adodc1.Recordset.Fields(3) فكيف يمكن معرفة ذلك دون التوجه للسجل العاشر أى كيف يمكن معرفة ذلك مع ترك الADODC فى مكانه عند السجل الواقف عنده ولكم ألف شكر
  3. قيمة حقل معين فى سجل معين

    طبعآ التوجه للسجل العاشر يكون يالكود Adodc1.Recordset.MoveFirst Adodc1.Recordset.Move (9)  
  4. لا أستطيع فتح النت https://www.sombes.com/sub/68fb46e220c23278f191a7315f7c9990 كيف أتخلص من هذا الموقع لا أستطيع فتح أى موقع على النت بسببه هذه الكلمات التى تقرءونها الآن اضطررت لكى أضعها لكم فى المنتدى الى كتابتها أولآ فى ملف وورد ثم نسخها ثم لصقها هنا بسرعة حتى لا تطير صفحة المنتدى ويظهر بدلآ منها صفحة هذا الموقع فكيف أتخلص من هذا الموقع ولكم ألف شكر
  5. حدث تغيير خلية الDATAGRID

    وجدت الحل والحمد لله انه فى الحدث AfterColEdit أى أن الكود يكون هكذا Private Sub DataGrid1_AfterColEdit(ByVal ColIndex As Integer) Z = MsgBox(" ", vbYesNo, "       هل أنت متأكد؟ ") If Z = 6 Then Adodc1.Recordset.UpdateBatch adAffectCurrent: GoTo 100 Adodc1.Recordset.CancelBatch adAffectCurrent  100End Sub  
  6. أريد تنفيذ كود معين كلما تغيرت خلية الDATAGRID بحيث اذا قام المستخدم بعمل تعديل فى احدى الخلايا ثم انتقل الى خلية أخرى يقوم البرنامج بتنفيذ هذا الكود مع العلم أن حدث الDataGrid_Change لم يصلح فى ذلك لأنه يجعل البرنامج ينفذ هذا الكود بمجرد كتابة المستخدم حرف واحد أو رقم واحد فى هذه الخلية التى يريد تعديل ما فيها ولكنى لا أريد تنفيذ هذا الكود الا بعد أن ينتهى المستحدم من كتابته ويخرج من هذه الخلية الى غيرها ولكم ألف شكر
  7. الاشارة الى حقل معين

    لدى DataGrid متصلة بAdodc متصل بأحد جداول قاعدة بيانات ما هو الكود الللازم لتوجيه الماوس الى حقل معين فى سجل معين ؟ مثلآ توجيهه الى الحفل رقم 2 فى السجل رقم 34 ولكم ألف شكر
  8. حدث تغيير خلية الDATAGRID

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

    ألا يمكن الاستغناء عن هذه الجملة الطويييييييلة .......... OR...OR...OR...OR...OR...OR ولكم ألف شكر
  11. لدى جملة طويييييييلة بسبب أرقامها الكثيييييرة أحتاجها كثيرآ فى الكود وأريد اخنصارها بدلآ من تكرارها بنفس هذا الطووووول كود : X = Val(Text1.Text) Y = 200 If X = 7 Or X = 20 Or X = 23 Or X = 38 Or X = 69 Or X = 188 Or X = 213 Or X = 239 Or X = 246 Then Y = 100 Print Y ألا يمكن عمل مجموعة تحتوى هذه الأرقام بحيث تكون صيغة هذه الجملة الشرطية الطويييييييلة هكذا THEN Y=100    ضمن أرقام المجموعة     IF X ولكم ألف شكر
  12. عمل مجموعة أرقام

    أم لابد لعمل ذلك من عمل جدول من حقل واحد بقاعدة بيانات ووضع هذه الأرقام فيه كسجلات وكلما أردت كتابة هذه الجملة كتبت جملة البحث select عن قيمة X فيه ألا يمكن عمل ذلك بطريقة سهلة بدلآ من هذا اللف والدوران ؟ ولكم ألف شكر    
  13. ألا يمكن هذا الذى سأل عنه صاحب السؤال نتحكم في نوعية الخط ( فونت ) و حجم الخط في رسالة msgbox
  14. فى لغة الvb6 كيف أمنع المستخدم من اغلاق الفورم سواء بالضغط على علامة x أو بالضغط على مفتاح Alt+F4 أو بأى طريقة أخرى أريد ألا يسنطيع المستخدم غلقها الا بالضغط على زر الغلق الذى أضعه فى الفورم وأكتب طبعآ كود الغلق فى حدث الضغط عليه           و أظهره وقتما أشاء و أخفيه وقتما أشاء ولكم ألف شكر
  15. فى لغة ال VB6 لدى Adodc متصل بجدول TABLE1 فى قاعدة بيانات وعندى مشكلة عند عرض البيانات بترتيب معين جملة الترتيب التى أعرفها هى Adodc1.RecordSource = "select * from TABLE1 ORDER BY TABLE1.NAME تحدث المشكلة اذا كان الحقل المطلوب ترتيب السجلات بناء عليه(الحقل NAME) حقل نصى وتحتوى بيناته على همزات فهو يفرق بين الحرف "ا" وبين الحرف "أ"   فيجعل كلمة "أمجد" قبل كلمة "اشرف" بينما لو تجاهلنا الهمزات ولم نفرق بين الحرفين لكانت كلمة "اشرف"هى الأولى (لأن طبعآ حرف ال شين قبل حرف ال ميم) ولكم ألف شكر
  16. تنسيق اكتابة والتاريخ فى ال DataGrid

    ألا يوجد حل حتى الآن  ولو لمشكة التاريخ المقلوب ولكم ألف شكر
  17. فى لغة ال VB6 لدى DataGrid متصلة ب Adodc المتصل بجدول فى قاعدة بيانات وعندى مشكلتان  عند عرض البيانات فى الDataGrid الأولى :- أريد دائمآ أن يكون عرض أى عمود على حسب كمية الكلام المكتوب فيه الثانية:- أجد التاريخ مكتوبآ من اليسار لليمين رغم أنه باللغة العربية ولكنى أريده بنفس اللغة الربية من اليمين لليسار فكيف يمكن حل هثين المشكلتين ؟ سواء من خصائص الDataGrid أو بالكود ولكم ألف شكر
  18. تنسيق اكتابة والتاريخ فى ال DataGrid

    هذا مرفق . وستجدون التاريخ مكتوبآ مثلآ  14/05/1992   ولكن باللغة العربية ولكنى أريده مكتوبآ باللغة العربية  ولكن هكذا   1992/05/14  وستجدون مشكلة ثالثة وهى أن بعد كل بحث تتغيرعروض أعمدة الdatagrid كما تتغيرعناوينها وتتحول الى الغة الانجليزية فهل لهذه المشكلة حل ؟ أم أنه لابد من اعادة الكود المكتوب فى الForm_Activate  بعد كل بحث (أعنى لابد من وضعه فى func والتوجه اليها بعد كل بحث) ولكم ألف شكر الموظفين.rar
  19. كيف يمكن منع التعديل أو الاضافة أو الحذف فى سجلات قاعدة البيانات أكسيس الا عن طريق كود برمجى (مثلآ بجملة مثل هذه قى لغة ال Adodc1.Recordset.AddNEW    VB6) أما أن يفتح المستخدم قاعدة البيانات بنفسه ويعدل فى سجلات جداولها فأريد منعه من ذلك ولكم ألف شكر
  20. منع التعديل فى سجلات قاعدة البيانات

    يبدو أن سؤالى غير مفهوم سؤالى ليس له علاقة بالبرمجة نهائيآ سؤالى فى التعامل مع قاعدة البيانات أكسيس كيف يمكن منع أى شخص من التعديل أو الاضافة أو الحذف فى سجلات قاعدة البيانات ولكم ألف شكر
  21. كيف يمكننى ارفاق ملف EXE مع رسالة الايميل الى أرسلها لشخص ما ؟ أتعامل دائمآ مع YAHOO وبه أيكونة لارفاق الملفات أضع الملف الذى أريد ارفاقه داخل فولدر ثم أضغطه باستخام برنامج RAR ثم أرفق هذا الملف المضغوط مع رسالتى وأعيش على ذلك دون أى مشاكل ولكنى حين أردت ارفاق ملف EXE ووضعته داخل فولدر ثم ضغطته باستخام برنامج RAR ثم حاولت ارفاقه رفض الياهو ارفاقه قائلآ "NO INTERNET CONNECTION" فتعاملت مع الGMAIL فرفض ارفاقه أيضآ قائلآ "ممنوع ارفاق هذا الملف لدواعى أمنية" فكيف يمكن ارفاق ملف EXE ولكم ألف شكر
  22. قرأت كثيرآ عن التحزيم بالSETUP FATCORY والتحزيم بالPACKAGE ولكن لم أستطع فى النهاية تحزيم برنامج بالVB6 متصل بقاعدة بياناتACCESS أرجو من أحد الأعضاء أن يوضح لى الآتى أولآ:- ما هى الملفات الواجب وضعها فى فولدر برنامجى         الفولدر يحتوى على مشروع البرنامجvbp وعلى الفورمfrm وعلى الملف التنفيذىexe         وعلى قاعدةالبياناتmdb         فما هى الملفات الواجب على أن أضعها معهم داخل هذا الفولدر؟ ثانيآ:- أى البرامج أستخدم ؟         هل SETUP FATCORY 7 أم SETUP FATCORY 8 أم SETUP FATCORY 9         أم الPACKAGE الموجود ضمن الVB6          بحيث يمكن فى النهاية استحدام برنامجى على أى جهاز وعلى أى ويندوز(XP أو أى اصدار بعده) دون أن يفتح المستخدم قاعدة البيانات ها هو الفولدر مرفق ولكم ألف شكر الموظفين.rar
  23. ادخال مجموعة سجلات مرة واحدة

    قرأت عن أداة اسمها MSFLIXGRID وأنها تقوم بذلك ولكنى حين وضعتها على الفورم وشغلت البرنامج لم تسمح لى بادخال أى بيانات
  24. كيف لى أن أمكن المستخدم من ادخال جميع بياناته مرة واحدة المعتاد دائمآ أنى أضع text كل منها مرتبط بأحد حقول قاعدة البيانات يدخل فيها المستخدم سجلآ واحدآ ثم يضغط على الزر update ثم يضغط على الزرadd ليدخل فيها سجلآ آخر ثم يضغط على الزر update ثم يضغط على الزرadd ليدخل فيها سجلآ آخر ثم يضغط على الزر update وهكذا لدى جدول به ثلاثة حقول لا أكثر منهم حقل الidd أى أن المستخدم لن يدخل فى كل سجل الا رقمين فقط فهل لى أن أرحمه من الضغط على الزر updat  ثم على الزر add بعد كل رقمين أى هل من أداة بشكل الجدول (مثل الdatagrid مثلآ ) أفتحها له  لادخال سبعة سجلات مثلآ ثم يضغط على الزر update مرة واحدة وكيف يكون الكود لذلك ولكم ألف شكر