- *كود* فتح ملف بأي امتداد
الأخ الدوادمي بلغ سلامي إلى جبلة فقد استقت إلى مراتع الصبا فيها ومنابت الكلأ ( الفقع ) قبل أن تسأل جرب وأخبرني ماذا يكون إذا حاولت فتح ملف لا يوحد له برنامج مرتبط مع أنني أعرف الإجابة إلا أنني أريد أن تصل إليها بنفسك
- مربع حوار تاكيد الحذف
الأخ ajamy هناك مشكلة في تثبيت الأوفيس أعد تثبيته وسوف تحل المشكلة بإن الله
- هل يمكن الوصول للبيانات المخزنة بالاوت لوك
الأخ الكريم طالب علم الدالة التالية تقوم بإرسال بريد إليكتروني بواسطة أوت لوك مع ملف مرفق من خلال الأكسس قم بتجربتها Function sendmail() Set objOutl = CreateObject("Outlook.Application") Set objMailItem = objOutl.CreateItem(olMailItem) 'Const olMailItem = 0 ' …
- ارسال نسخة للبريد الالكتروني
عفواً نسيت إرفاق الملف وهذا هو frmmail.zip
- ارسال نسخة للبريد الالكتروني
ريما يكون السبب هو أنه مضغوط بامتداد rar أرفقت لك الملف بعد ضغطه بامتداد zip
- هل يمكن الوصول للبيانات المخزنة بالاوت لوك
السلام عليكم وبعد الحل في تصوري هو أن يكون إرسال الرسالة من داخل الأكسس وحفظ العناوين التي تم الإرسال إليها وبالتالي البحث بها وفي الموضوع التالي طريقة إرسال رسالة بريد إليكتروني من داخل الأكسس http://www.arabteam2000.com/vb/show...&threadid=17134 لعله يشفي غل…
- كيف أدرج صورة في أحد حقول الآكسس؟
الأخت كوكب هناك ثلاث قضايا أود أن أقولها هنا 1- بالنسبة للمثال الذي زودتك به يمكن اختصار عدد صفحاته إلى صفحتين أو ثلاث فقط عن طريق تجميع الأكواد واستخدام If Then وهذه مسألة سهلة للغاية 2- بالنسبة للكود الذي كتبت فهو لا يحتوي على أي أمر لعرض الصورة بل كل ما فيه…
- مربع حوار تاكيد الحذف
أخي الكريم الأمر DoCmd.SetWarnings False يقوم بإيقاف الرسائل التحذيرية للأكسس وهذا الكود يوضع في حدث عند النقر لزر الحذف
- *كود* فتح ملف بأي امتداد
السلام عليكم وبعد ضع الكود التالي في وحدة نمطية عامة Private Declare Function apiShellExecute Lib "shell32.dll" _ Alias "ShellExecuteA" _ (ByVal hwnd As Long, _ ByVal lpOperation As String, _ ByVal lpFile As String, _ ByVal lpParameters As String, _ ByVal lpDi…
- مربع حوار تاكيد الحذف
استخدم الكود التالي للحذف Dim a As Integer Beep a = MsgBox("هل أنت متأكد من رغبتك في حذف هذا السجل ؟", vbYesNo + vbDefaultButton2 + vbExclamation + vbMsgBoxRight, "تأكيد الحذف") If a = vbyes Then DoCmd.SetWarnings False DoCmd.DoMenuItem acFormBar, acEditMenu, …
- ارسال نسخة للبريد الالكتروني
الرجاء الاطلاع على الموضوع التالي ففيه ما يجيب على تساؤلك http://www.arabteam2000.com/vb/showthread....&threadid=17134
- كيف أدرج صورة في أحد حقول الآكسس؟
أختي الكريم السلام عليكم وبعد فهمت من كلامك أنك تريدين وضع الصور في قاعدة البيانات مع إمكانية الحاجة إلى تحديثها OnLine ولذلك أرفقت لك ملفاً يحتوي على سكربت معرض صور Gallery وهو يتبع نفس الفكرة التي شرحت لك لكن يجب التنبه إلى أنه يجب تخزين الصور عن طريق السكرب…
- سؤال موجه للاعزاء خبر اء الاكسس
أخي الكريم السلام عليكم وبعد بالنسبة للموضوع الأول فأنا أرى أن مكانه هو منتدى تصميم صفحات الويب لأن التوسع فيه يحتاج إلى وجود المبادئ الأساسية في لغة HTML وهذا ما ألاحظ عدم وجوده كما أن البرمجة على الإنترنت مختلفة بشكل كبير والحديث عن أكسس من هذا الباب أقرب إل…
- *تقارير*المزيد من الخيارات عند معاينة التقرير
أخي الكريم ما ذكرته موجود في المثال الذي وضعت حيث يمكنك طباعة التقرير وتحديد عدد النسخ من مربع حوار الطباعة
- كيف يتم إنشاء النموذج التالى بدون استعلام ؟
أخي الكريم إذا كانت المشكلة هي في ظهور المجموع فقط فاستخدم دالة nz لتحويل القيم الخالية إلى صفر حتى تظهر المجاميع حتى كانت بعض الحقول خالية مثال استخدام الدالة لو كتب الدالة كالتالي sum([text1]+[text2]) وكانت قيمة أحد الحقلين فارغة فسوف يكون ناتج الدالة قيمة ف…
- سؤال في استيراد جدول
الأخ أبا مشعل ابحث في المنتدى عن إجابة وإذا لم تجد فأنا مستعد للإجابة
- كيف أدرج صورة في أحد حقول الآكسس؟
أختي الكريمة ImageData هو اسم الحقل الذي يحتوي على الصورة Images اسم الجدول على كل إذا كان ممكن إرقاق قاعدة البيانات فهذا جيد وسوف أقوم بكتابة الكود المطلوب كاملاً تحياتي
- *فورم* مثال لتعريب النماذج
أخي الكريم ما رأيك بالكود بهذا الشكل For Each Ctl In Me.Controls With Ctl If .ControlType <> acOptionGroup Then .Left = Me.Width - (.Left + .Width) '---------------------------------- '---------------------------------- Select Case .TextAlign Case 1: .TextAlig…
- *تقارير*المزيد من الخيارات عند معاينة التقرير
الحمد لله وكفى والصلاة والسلام على النبي المصطفى وآله وصحبه وبعد في المثال المرفق نموذج يمكنك استخدامه لإعطاء مستخدمي البرنامج المزيد من الخيارات أثناء معاينة التقرير مثل عرض خيارات الطباعة التكبير والتصغير التصدير إلى ملف آمل أن يكون فيه ماينفع report_options…
- كيف يتم إنشاء النموذج التالى بدون استعلام ؟
معذرة أخي فأنا لم أفهم ما تريد جيداً آمل توضيح الفكرة كاملة حقيقة لا أفهم كيف تريد أن تقوم بعمليات حسابية بناء على الأسماء وفي نفس الوقت تقول إن من الممكن أن يوجد أرقام في جدول 2 لا نظير لها في جدول 1 !!!!!!!!!!!!!!!!!!