عيسى الشريف

الحل : Try Dim SavInto As New OleDb.OleDbCommand Dim ConStr As String = _ "Provider=Microsoft.Jet.OLEDB.4.0; Data Source =" & _ Application.StartupPath & "\Colors_sets.mdb" Dim Conn As New OleDbConnection(ConStr) For Each item In ListBox1.Items SavInto.Connect…

السلام عليكم أريد إضافة محتويات مربع قائمة لقاعدة بيانات بأستخدام vb.net 2008 وأنا جديد على دوت نت :blush: هذا الكود اللذي وصلت له ولكن لا شيء يحدث Try Dim z As Long z = ListBox1.Items.Count Dim SavInto As New OleDb.OleDbCommand Dim ConStr As String = _ "Provi…

لا يمكن فعل ذلك إطلاقا ولا تحاول رجاءً منفذ اليو أس بي لديه بروتوكول لأرسال وأستقبال البيانات ,فهو بعيد كل البعد (من حيث المبدأ)عن منفذ الطابعة Lpt و الذي يمكن فعل ذلك بأستخدامه. للتعامل مع منفذ اليو أس بي تحتاج الي ميكروكنترولير ومعرفة الأوامر الصادر اليه ناه…

:P أفضل أكواد فيجول في التصدير لأمكانياتها المتعددة الملف المصدر تجده في المجلد الذي يحوي القاعدة Re_11_be.rar

بالتوفيق

عموما هنا يمكنك أرسال رسالة بمحتويات جدول البضائع في تقرير بشكل HTML لكل الأيميل الجديد المسجل في جدول بيانات data مع أمكانية تغيير نص الرسالة . يتم الأرسال عبر برنامج Outlook لدى يجب أن يكون مفتوح ليتم أرسال الرسائل . أرجوا أن يكون الغرض من هذا الخير وليس إيذ…

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

تفضل أخي الكريم بالتوفيق في عمل الخير و التقييم :D Re_Re_p1.rar

والله شوف .. أنا تحايلت على الموضوع ذه ولو فيه حد ثاني عندو فكرة أفضل ممكن يعطينا رآيه Re_Re_Database.rar

تفضل أخي Re_p1.rar

أولاً أنا شخصياً آرى أن أدخال بريد ألكتروني شخصي و كلمة مروره في قاعدة بيانات أمر فيه خطورة. لدى أفضل التعامل مع الأوتلووك Outlook حيث يتم إعداده مرة واحدة و ويتم أرسال بريدك منه متى شئت من أكسس Access ,بشرط يكون البرنامج الأول مفتوح . ثانياً قم بتصدير البيانا…

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

ربي يبارك في زهرتنا زهرة العالم العربي كله تحياتي و أحترامي

Invalid or Deleted File. الرجاء إعادة رفع الكتاب . وشكراً مسبقا

هههههه كلك ظرافة أخي أنا تقريباً حليت المشكلة تبعـــي بس أحب أنك تفهمني بس وما تأخد موقف هيك ولا هيك السطر الأول شرط التحقق و هو بيشوف إذا هالرقم اللي في مربع تحرير وسرد في منو في (cartin) ..إذا فيه ينفذ updating اللي هو معناتو تحديث السجل من (pro_all) الى (ca…

هلا إذا كان فهمك بطيء وشرحي سريع, عمو شو بأعملـــــــــــــــــــــــــــــــــك....!!!!! إذا فهمت وحابب تشرح أهلا وسهلا ما فهمت روح وما في حدا معاتبك خيو ....شو بنــــــــا....!!!!؟؟؟

أخي الكريم انا ماقصدت التسبب بالإهانة لأحد .... و كل أعضاء المنتدى لهم كل التقدير...و أنا شخصياً معتز جداً بهذا المنتدى و الفطاحلة الموجودين فيه.... ولكن كل ما طلبت فكرة وليس أن يقوم الشخص الذي يرد على السؤال بأن يحل المشكلة إجمالاً.... و اكرر أسفي عن عدم الوض…

فعلاً الأمر كان مشوش علي تفكيري ...وأنا أسف أني ما وضحت كويس المطلوب في المثال المرفق لآني كنت أعدته على مضض .... وأرجوا أنك ما تأخد الموضوع شخصي .... الجدول 1 و الجدول 2 عنيت بها مجازيا أي جدولين 1 الجدول الأول , 2 الجدول الثاني ..... في حال تطابق السجلين في …

بعد عصر الأفكار في الدماغ من يومين ... وصلت لهذه النتيجة ...أرجوا من ذويي الخبرة أبداء الملاحظة إن كان هذا الكود خطأ ولكنه يعمل بشكل ممتاز و يفي بما أريد :lol: في حدث عند التغيير في مربع تحرير وسرد Private Sub BARCODE_Change() If Me.[BARCODE] = DLast("[BARCODE…

تم تحميل الملف المرفق 11 مرة ...!!! ولا رد ..... :mellow: يبدوا ان الأمر عصي جداً ....!!!!؟؟ :blink: