العائد

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

جرب الاطريقة الاولى ان تعكس الفورمات قبل الاستعلام setdate = format(textdate,"mm/dd/yyyy") الطريقة الثانية : ان تتعامل مع التاريخ مثل الستريج select * from table where date = ' " & textdate & "' او جربهما مع بعض ان شاء الله ستعمل

اضف هذة العبارة db.CursorLocation = adUseClient قبل ان تعمل rs.open pde hk hg db هي الداتا بيز و لا تنسى ان تضيف db.CursorLocation = adUseClient rs.open "select statment",db,adokeyset,adopestimistic ربما تجد بعض الاغلاط الاملائي عندها سوف تعمل شكرا

شكرا اخزاني على المساعدة و اشكر الاخ hamohd على الكود الرائع و لقد استخدمتة و تنفذ شكرا على تعاونكم

يوجد لدي لست بوكس يوجد بها اسماء لموظفين كيف يمكن لي ان ابحث عن طريق اسم بدون ان ابحث داخل الداتا بيز ارجو المساعدة في كتابه كود يقوم بالبحث داخل لست بوكس عن اسم موظف و شكرا لكم

جرب بدل ان تعمل rs.fields("ggg"( ان تعملها rs!item_name او اذا اردت ابعث لي فقط الجدول الخاص بهذه الفورم و الشاشه الخاصه بها و انا اعملها لك

select customer_no,custmer_age.cutmersalary,custmer_birthdate from customer هنا انا حددت الفيلدز التي اريدها ان تظهر فقط و هذا بدون ان احدد اسم العميل

يمكنك ان تتحكم اكثر اذا وضعت الصورة داخل فريم و يمكنك التحكم بالفريم افضل

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

اخي عليك ان تضع هذا الكود اذا انتا محدد اغنية معينة تريد تشغيلها في بداية تشغيل برنامجك فضعها على الفورم لود MediaPlayer1.Stop MediaPlayer1.FileName = "D:اغاني عربيAlbum11SONG2.wav" MediaPlayer1.Play اما اذا كانت عند الضغط على زر معين هو المسؤول عن التشغيل فضع…

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

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

على فرض اني عملت برنامج للاغاني ووضعت كل الاغاني على السي دي الخاص بي الان اريد عمل setup و البرنامج سيشتغل اريد ان يشغل من الواجهة الاغاني الموجودة على السي دي و المعروف انة d: و لكن على فرض انة في جهاز اخر كان ال e او f كيف لي ان احدد هذا الباث وشكرا لكم

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

نحن نعرف ان الفورم في فيجوال بيسك يكون اما مستطيل او مربع و لكن هل يمكن ان يكون الفورم صغير مثل وحوافة دائرية اي عند تشغيل البرنامج اريد ان يظهر لي فورم صغير و شكلة دائري فهل هعذا ممكن ؟ وشكرا لكم

Public Declare Function GetKeyboardLayoutList Lib "user32" (ByVal nBuff As Long, lpList As Long) As Long Sub setkblang(lang As kblanguage) Dim kbcount As Long, activekb As Long, i As Integer kbcount = GetKeyboardLayoutList(0, 0) For i = 1 To 5 activekb = Activ…

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

انتا تطلب احضار الداتا من خمس جداول و طلبك سهل جدا لان الجداول الخمس كلها لها نفس ال key الذي هو رقم الموظف حيث ان الجميع مربوطين علية لذلك انتا احضر الجملة كما يلس select takreem,al-byanat,al-dawrat,any information from table1,table2, tabl3,table4 where table…

الامر union i هو امر للتحاد هذا الامر نستخدمة اذا كان لدينا مجموعة من ال records و اريد احضارها و لكن لا استطيع ان احضرها جميعا على نفس record set كمثال اريد ان احضر على تقرير كمثال المواد التي تدرس لصف و هذة المواد تقسم اختياري و اجباري و اريد ان يظهر لي على …

المشكلة كما في الكود الذي كتبتماة و لكن انا اعتذر من الاخ فهد استخدم في الحقول العددية " & text1.text & " الحقول التي من نوع الحروف string ' " & text1.text & " '