Elsayed Bn Gemy

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

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

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

بارك الله فيك هذا ما كنت اريده تماما

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

السلام عليكم ورحمة الله وبركاته اعمل حاليا على برنامج عيادة اسنان وواجهتنى مشكلة ضبط التقرير ليطبع على روشتة الطبيب وهى جاهزة عنده مثل هذه الروشتة الروشتة الخاصة بى ارتفاع 20 سم × 14 سم عرض كيف يمكننى ضبط مساحة التقرير ليطبع على هذه الروشتة ؟

السلام عليكم ورحمة الله تعالى وبركاته برنامج مبيعات جميل وبسيط سهل فى التعامل واجهته فيجوال بيسك وقاعدة بياناته سيكوال يمكنك من خلاله ادارة مبيعاتك ومشترياتك ومتابعة حركة البيع والشراء البرنامج من تصميم اخى أ / محمد واراد ان يشارككم نتاج افكاره مع عمل اسعار خاصة لاعضاء اوفيسنا المحترمين البرنامج به ايضا نظام صلاحيات للمستخدمين للتواصل داخل مصر 01001048853 وهو ايضا نفسه عليه واتساب صفحة الشركة الخاصة به للتواصل على فيس بوك الايميل الشخصى mohamedsobhyy3@gmail.com الصفحة الرسمية على فيسبوك

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

بارك الله فيك وصلتنى رسالة هل هى منك

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

بارك الله لك اخى الفاضل دمتم لنا سند

انا علقت على ردك سابقا بس واضح ان النت خزلنى اعتذر لك اخى صالح

-------------

حبيبى اخى محمد اعتذر لك ارفقت تطبيق خطأ قمت بتعديل الروابط يمكنك التحميل من جديد مرة اخرى اعتذر لك

بسم الله الرحمن الرحيم كنا قد اشرنا سابقا الى امكانية قراء ملفات التكست اونلاين وقام الاخوة الافاضل بعمل بتطبيق ذلك بافضل الامثلة منها التحديث لقواعد البيانات والتفعيل وما الى ذلك وها انا ذا احذو بكم بعيدا قليلا عن مجال الاكسس واقدم لكم تطبيقى لقراءة الملفات اونلاين فى الواقع قمت بتنفيذ ذلك الموضوع بالاكسس مسبقا ولكن لم يروق لى الموضوع ببساطه هو مجلة نعرض بها اى موضوع يرسله لى اى عضو اذا احب ان يشارك موضوعه معنا مثلا لديك برنامج تريد عرضه على المجلة بطريقة جميلة وجذابة او شرح لك ابدعت به واستفاد منه الاخوة فقط ارسله الى المجلة وسيتم مراجعته وادراجه فى المجلة المجلة تنقسم الى تطبيقين اول تطبيق هو ( ماى اكسس ) وهو للمستخدمين ويتم عرض به الموضوعات وهو على هذا النحو اما التطبيق الثانى وهو الخاص بالتحكم بالمجلة وهو انشأته لدى على هذا النحو ومن خلاله اتلقى طلباتكم بخصوص عرض برامجكم وموضعاتكم اما عن كيفية العمل فالموضوع بسيط جدا ويمكن تنفيذه بالاكسس لانه فى الاساس مربوط بقاعدة بيانات اكسس قد يتسائل احدكم كيف تصلك طلباتكم الى هل هى استضافة ام ماذا فى الواقع كل ما استخدمه فى هذا الموضوع هو انشاء حساب على دروبوكس مجانى فقــــــــط اما طلباتكم فهى تصلنى على هيئة بريد اليكترونى تم تصميمه بكيفية معينة وتم ربط قاعدة بيانات لوحة التحكم ببالبريد هكذا وتقوم لوحة التحكم بتهيئة البريد الذى يصلنى وفلترته وانشاء المقالات يمكنك ارسال مقالك من هنا اولا اتمنى ان تستمتعو ثانيا بعد الاستمتاع بقى التجربة هههههههههه شكرا لكم الصور التى على المجلة يقوم العضو برفعها اوللا على الانترنت وادراج الرابط الخاص بها عند انشاء المقال الخاص به اى ان رابط الصورة المستخدمه لا يكون رابط محلى على جهاز المستخدم بل صورة مرفوعة على الانترنت MyAccess.rar

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

وتلالئت معها سمائنا بزيادة نجمين بارزين فى سماء الاكسس نفعنا الله بعلمكما وبارك الله لكما فيه 🌺

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

بارك الله فيك اخى الكريم لحل تلك المشكلة سنقوم بتشفير بيانات الملف النصى

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

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

اعزكم الله اخى الكريم نحن لا نخفى اكواد على احد فقط نحن نخفى طريقتنا فى استغلال الكود ملخص الموضوع هذا او يدور حول قراءة ملفات النصوص اونلاين نحن نستغل هذا الموضوع وكل منا له طريقته فى استخدام الكود منا من يستخدمه فى التفعيل ومنا من يستخدمه فى التحديث وهكذا ... وهذا هو الكود Function GetFromWebpage(URL As String) As String On Error GoTo Err_GetFromWebpage Dim objWeb As Object Dim strXML As String ' Instantiate an instance of the web object Set objWeb = CreateObject("Microsoft.XMLHTTP") ' Pass the URL to the web object, and send the request objWeb.Open "GET", URL, False objWeb.send ' Look at the HTML string returned strXML = objWeb.responseText GetFromWebpage = strXML 'End_GetFromWebpage: ' Clean up after ourselves! Set objWeb = Nothing Exit Function Err_GetFromWebpage: ' Just in case there's an error! MsgBox Err.Description & " (" & Err.Number & ")" Resume End_GetFromWebpage End Function

الحمد لله اخى صالح اين المرفق الخاص بى لا تبخل علينا اتشرف بان اكون احد عملائك

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

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