المبدعه الصغيره

شكلكم زهقتو فعلا من اسالتي ولا واحد رد B) B) B) B)

اولا اشكرك شكر كثير على الكود فعال وتمام جدا بس لي لديك سؤالين لو تسمح لي الاول هو كيف لي ان ادرج الحقل الى الكمبو بوكس من القاعده دون تكرار . والثاني ليس له علاقه بالموضوع وهوكلمة A7med_prof المكتوبه اخر توقيعك صنعها ببرنامج معين ولا بالفوتو شوب لو كان ببرنام…

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

ما شاء الله عليك مجهووووووووووود جبااااااااااااااااار

ساجرب المثال وارد عليك لاحقا وعلى اي حال كانت النتيجه مشكووووووووووور :lol:

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

اخواني الاعزاء اسفه لازعاجكم. لدي سؤال يهمني جدا وانا محتاجه له جدا . السؤال هو : كيف يمكنني جعل خلفية سطح المكتب "Center" او"Tile" او "Stretch" ياريت لوسمحتو بسرعه مسالة حياة او موت....؟؟؟؟؟؟؟

انا محتاجه له جدا .................

الرجا احد يدلني على كيفية استخدام هذه الاداه انا استخدمت هذا الكود للتحويل من ال JPG الى BMP PicFormat321.SaveJpegToBmp(x,v) حيث ان الـ > X هي مسار الصوره الـJPG والـ Y هي مسار الـصوره الـ MP

شكرا لك اخي A7med_prof وياريت حد يوضحلي الكود الخاص بذلك ................. ,,,,,,,

ليش ما حد ساعدني

On Error GoTo ErrHandler Dim vResult Dim sFileName As String Picture1.Visible = True 'Picture Control Used sFileName = Trim(BMPDestinationPath) & ".bmp" vResult = Dir(JPEGFilePath & ".jpg") If Not vResult = "" Then Picture1.Picture = LoadPicture(JPEGFilePath) …

يعني مثلا هذا الكود للتحويل من Jpg To Pmb ويوجد فيه خطا لم اعرفه الرجاء المساعده يا خواني

اخي ان المثال الذي ارفقه لي الاخ شمس فكرته انه ياخذ Copy للصوره ويلصقها في مكان اخر مع تغير اسم وامتداد الصوره وانا لا اريد هذا انا اريد الكود الفعلي للتحويل يارب يكون الاعضاء فهموني وشكرا لك اخوي شمس

اريد كود التحويل من اي صوره او امتداد الى امتداد Bmp شاكره لكم مقدما

ماشاء الله على مواضيعك المميزه

الله المعان لك

ياريت احد يرد في هذا الموضوع لان انا محتاجه للكود ده بردو

مشكور على الاداه الرائعة

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