A L M A I S T R O

up

هل يمكن استبدال مسار البحث ليكون مسار البحث عن ملفات الاكسيل الموجودة مثلا فى المحرك C:\ ارجوا ان اجد اجابة

السلام عليكم ورحمة الله وبركاتة أخوانى الاعزاء iMushari #2 أبو محمد أشرف دغيدى الخطأ عندى انا لانى بالفعل اكتشفت ان ملف البرنامج بالفعل محمى (VBA ) على العموم الموضوع بالرابط التالى وتم تعديل المرفق وفك حماية VBA عنه : https://almaistro.wordpress.com/2011/10/11/%D8%AD%D8%B5%D8%B1%D9%89-%D8%A8%D9%8A%D8%A7%D9%86%D8%A7%D8%AA-%D8%A7%D9%84%D9%85%D9%88%D8%B8%D9%81%D9%8A%D9%86-%D8%A7%D9%84%D8%A7%D8%B5%D8%AF%D8%A7%D8%B1-%D8%A7%D9%84%D8%B1%D8%A7%D8%A8%D8%B9%D9%85/#comment-113 واسف مرة احرى

رائع اخ محمد بارك الله فيك

انا لا ارى مرفق !!

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

الملف مفتوح المصدر الآن sudoku solver.rar

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

يوجد خطأ بالسطر التالى : With Application.FileSearch علما بانى اعمل على اكسيل 2007

لقد شغلنى كثيرا موضوع ضغط الملفات عن طريق الدوس وهناك من يقول ان الضغط عن طريق الدوس يصغر حجم الملفات بصورة كبيرة جدا فأرجو من المتخصصين فى الدوس شرح الاتى شرح تفصيلى : D:\>ARJ ARJ32 v 3.10, Copyright (c) 1998-2004, ARJ Software Russia. [23 Jun 2005] Extended attributes enabled Processing archive: C:\Program Files\Universal Extractor\bin\arj.exe Archive created: 2005-06-23 15:39:30, modified: 2005-06-23 15:39:30 List of frequently used commands and switches. Type ARJ -? for more help. Usage: ARJ <command> [-<sw> [-<sw>...]] <archive_name> [<file_names>...] Examples: ARJ a -e archive, ARJ e archive, ARJ l archive *.doc <Commands> ac: Add Chapter to chapter archive l: List contents of archive a: Add files to archive m: Move files to archive c: Comment archive files t: Test integrity of archive d: Delete files from archive u: Update files to archive e: Extract files from archive v: Verbosely list contents of archive f: Freshen files in archive x: eXtract files with full pathname <Switches> c: skip time-stamp Check r: Recurse subdirectories e: Exclude paths from names u: Update files (new and newer) f: Freshen existing files v: enable multiple Volumes g: Garble with password w: assign Work directory i: with no progress Indicator x: eXclude selected files m: with Method 0, 1, 2, 3, 4 y: assume Yes on all queries n: only New files (not exist) hk: enable ARJ-PROTECT damage protection ==================================================================== D:\>UNZIP UnZip 5.52 of 28 February 2005, by Info-ZIP. Maintained by C. Spieler. Send bug reports using http://www.info-zip.org/zip-bug.html; see README for details. Usage: unzip [-Z] [-opts[modifiers]] file[.zip] [list] [-x xlist] [-d exdir] Default action is to extract files in list, except those in xlist, to exdir; file[.zip] may be a wildcard. -Z => ZipInfo mode ("unzip -Z" for usage). -p extract files to pipe, no messages -l list files (short format) -f freshen existing files, create none -t test compressed archive data -u update files, create if necessary -z display archive comment -x exclude files that follow (in xlist) -d extract files into exdir modifiers: -q quiet mode (-qq => quieter) -n never overwrite existing files -a auto-convert any text files -o overwrite files WITHOUT prompting -aa treat ALL files as text -j junk paths (do not make directories) -v be verbose/print version info -C match filenames case-insensitively -L make (some) names lowercase -$ label removables (-$$ => fixed disks) -V retain VMS version numbers -X restore ACLs (-XX => use privileges) -s spaces in filenames => '_' -M pipe through "more" pager Examples (see unzip.txt for more info): unzip data1 -x joe => extract all files except joe from zipfile data1.zip unzip -fo foo ReadMe => quietly replace existing ReadMe if archive file newer ============================================================== D:\>UNRAR UNRAR 3.80 freeware Copyright (c) 1993-2008 Alexander Roshal Usage: unrar <command> -<switch 1> -<switch N> <archive> <files...><@listfiles...> <path_to_extract\> <Commands> e Extract files to current directory l[t,b] List archive [technical, bare] p Print file to stdout t Test archive files v[t,b] Verbosely list archive [technical,bare] x Extract files with full path <Switches> - Stop switches scanning ac Clear Archive attribute after compression or extraction ad Append archive name to destination path ap<path> Set path inside archive av- Disable authenticity verification check c- Disable comments show cfg- Disable read configuration cl Convert names to lower case cu Convert names to upper case dh Open shared files ep Exclude paths from names ep3 Expand paths to full including the drive letter f Freshen files id[c,d,p,q] Disable messages ierr Send all messages to stderr inul Disable all messages ioff Turn PC off after completing an operation kb Keep broken extracted files n<file> Include only specified file n@ Read file names to include from stdin n@<list> Include files in specified list file o[+|-] Set the overwrite mode oc Set NTFS Compressed attribute or Rename files automatically ow Save or restore file owner and group p[password] Set password p- Do not query password r Recurse subdirectories ri<P>[:<S>] Set priority (0-default,1-min..15-max) and sleep time in ms sl<size> Process files with size less than specified sm<size> Process files with size more than specified ta<date> Process files modified after <date> in YYYYMMDDHHMMSS format tb<date> Process files modified before <date> in YYYYMMDDHHMMSS format tn<time> Process files newer than <time> to<time> Process files older than <time> ts<m,c,a>[N] Save or restore file time (modification, creation, access) u Update files v List all volumes ver[n] File version control vp Pause before each volume x<file> Exclude specified file x@ Read file names to exclude from stdin x@<list> Exclude files in specified list file y Assume Yes on all queries

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

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

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

رسالة المطالبة بالحفظ تظهر فقط فى حالة فتح اى ملف اخر وليس الملف الرئيسى هذا ما فهمتة من سؤالك

الحل بسيط جدا اخى الكريم افتح ملف الاكسيل المراد ثم ضع هذا الكود فى حدث Deactivate للـ Workbook Private Sub Workbook_Deactivate() On Error GoTo 1 If ActiveWorkbook.CodeName = "ALMAISTRO" Then Exit Sub If BookName <> ActiveWorkbook.Name Then If MsgBox("هل تريد حفظ التغيرات التي أجريتها على '" & ActiveWorkbook.Name & "'؟ ", vbExclamation + vbYesNo + vbMsgBoxRight + vbMsgBoxRtlReading) = vbYes Then ActiveWorkbook.Save Else ActiveWorkbook.Saved = True End If ActiveWorkbook.Close End If Exit Sub 1: MsgBox "لن يتم حفظ التغيرات" ActiveWorkbook.Saved = True ActiveWorkbook.Close End Sub مع العلم ان اسم ملف العمل فى محرر ال VB هو almaistro وتستطيع تغييرة كما تريد

الاخ الفاضل حسام حسين اسف فى تأخرى فى الرد على مشاركتك ولكن لظروف خاصة اقتراحاتك فعلا ضرورية جدا لاكتمال البرنامج والكمال وحده لله وسيتم ان شاء الله مراعاه كل الاضافات فى الاصدار القادم لو احيانا الله تعالى شكرا لك مرة اخرى وتحياتى ،،،

الروابط لا تعمل

لو فرضنا ان اسم المستخدم سيخزن بالشيت المسمى seet1 بالخلية A1 وجدول الرسائل اسمه Seet2 والحقل A1 به اسم المستخدم والحقل B1 به حالة الرسالة فتكون الجملة الشرطية كالتالى: If Sheets("seet1").Range("A1") = Sheets("Seet2").Range("A1") And Sheets("Seet2").Range("B1") = False Then

عندما يقوم المستخدم بتسجيل الدخول يتم تخزين اسم المستخدم الذى قام بتسجيل الدخول فى خليه ما ولتكن الخلية A1 عندها يتم عمل مقارنة بين اسم المستخدمالموجود فى الخلية A1 وبين اسم المستخدم الموجود بجدول الرسائل اذا تمت المقارنة ونجحت بوجود اسم المستخدم يتم بعدها عمل مقارنة اخرى على اسم المستخدم الموجود بجدول الرسائل إذا وجد ان المستخدم هذا لم يقم بقراءة الرسالة يقوم البرنامج بعرض مربع إخبارى بوجود رسالة اتمنى اكون وصلت وجهة نظرى وبالخدمة ،،،

اخى الكريم اهلا بك الموضوع ببساطة هو كالتالى : قم بعمل نموذج وضع علية مربعين نص المربع الاول وظيفتة كتابة اسم المستخدم المرسل اليه المربع الثانى وظيفتة نص الرسالة وزر امر وظيفتة الارسال آليه العمل : عندما تضغط على الزر ارسال يتم تخزين محتوى الرسالة فى جدول معين بأسم العضو المرسل إلية ويكون هذا الجدول عبارة عن اربعة اعمدة العمود الاول : يتم وضع اسم المرسل إلية الرسالة العمود الثانى : يتم وضع أسم الراسل العمود الثالث : نص الرسالة العمود الرابع : حالة الرسالة وتكون True / False عندما يقوم المستخدم بتسجيل دخولة للبرنامج يقوم البرنامج بالبحث عن اسم العضو الذى قام بتسجيل الدخول فى الجدول الخاص بالرسائل وإذا وجد اسم العضو موجود بالجدول وامامة رسالة وكانت حالة الرسالة False فعندها يظهر مربع يقول للمستخدم ان لدية رسالة اعتقد ان الموضوع سهل الان واعذرنى لضيق الوقت اى سؤال تحت امرك تحياتى،،،

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

ليس لدى خبرة بالبور بوينت لكن بالمرفق كود يبين ذلك بالاكسيل كود تفعيل 1.rar

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

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

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