هل يمكن عمل باسورد لملف pdf عن طريق النموذج

[محمد سلامة]

السلام عليكم

اولا نوضح الفكرة

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

وقمت بإدراج رابط له في النموذج و زر لفتحه 

وقمت بإدراج مربع نص جديد بجوار الرابط وذلك لكتابة ال password به 

فهل يمكن. تمرير  الباسورد من  ذلك الحقل بالنموذج ليفتح ملف ال pdf .

وهل يمكن عمل password لملف ال pdf ايضا عن طريق النموذج.

اسف جدا علي عدم ارفق مرفق لانني اتحدث من الموبيل وذلك لانقطاع الانترنت عن ال pc

وجاهز للرد والشرح اكثر

بارك الله فيكم

 

[رمهان]

اهلا بك عزيزنا واخينا محمد سلامة

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

1. طريقة صيد النافذة تبع المطالبة بالباسوورد ووضع الباسوورد بها ثم مناداة الضغط على ok  واعتقد باستخدام ال api  وبالتحديد دالة sendmessage

2. هل هناك كائنات خاصة لل  pdf  نضعها في المراجع وتساعدنا في فتح ملفاتها المحمية

3. هل امر الفتح من خلال command line  يقبل تمرير الباسوورد 

 

هذا ولنا عودة ان شاء الله !

[رمهان]

وجدت هذا البرنامج من خلال البحث في النت :

https://www.foxitsoftware.com/products/pdf-reader/

وهو لما طلبت واتوقع يمكن تشغيله عن طريق command line وتمرير مسار الملف وكلمة المرور بكل سهولة !

لكن هل التكلفة مناسبة لك ؟ الله اعلم !

تحياتي ولنا عوده ان شاء الله

[محمد سلامة]

صباح الخير استاذ رمهان

كم سعره.. اليس مجاني

بارك الله فيكم وعلي تعبكم معي

[محمد سلامة]

وجدت هذا البرنامج من خلال البحث في النت :

https://www.foxitsoftware.com/products/pdf-reader/

وهو لما طلبت واتوقع يمكن تشغيله عن طريق command line وتمرير مسار الملف وكلمة المرور بكل سهولة !

لكن هل التكلفة مناسبة لك ؟ الله اعلم !

تحياتي ولنا عوده ان شاء الله

هل نسيتنا استاذ رمهان؟؟!

[ابو عارف]

وهل يمكن عمل password لملف ال pdf ايضا عن طريق النموذج

اخي محمد: الاكسس 2013 يمكنه تحقيق المراد حسب ارشادات الرابط التالي

https://translate.google.com.kw/translate?hl=ar&sl=en&u=http://www.groovypost.com/howto/word-excel-2013-save-to-pdf-password-protect-documents/&prev=search

[رمهان]

وجدت هذا البرنامج من خلال البحث في النت :

https://www.foxitsoftware.com/products/pdf-reader/

وهو لما طلبت واتوقع يمكن تشغيله عن طريق command line وتمرير مسار الملف وكلمة المرور بكل سهولة !

لكن هل التكلفة مناسبة لك ؟ الله اعلم !

تحياتي ولنا عوده ان شاء الله

هل نسيتنا استاذ رمهان؟؟!

مش ناسيك والله اخوي محمد !

ولكن المسالة قيد النظر ! وانشغلت حبتين !

وبحضور الاستاذ ابو عارف اتوقع الفرج قرب !

تحياتي

وهل يمكن عمل password لملف ال pdf ايضا عن طريق النموذج

اخي محمد: الاكسس 2013 يمكنه تحقيق المراد حسب ارشادات الرابط التالي

https://translate.google.com.kw/translate?hl=ar&sl=en&u=http://www.groovypost.com/howto/word-excel-2013-save-to-pdf-password-protect-documents/&prev=search

استاذنا الفاضل ابو عارف

بقي ان تسعفنا في فتح الملف pdf  المحمي ؟ كيف تمرر له الباسوورد ؟

مشكور من الاعماق

[محمد سلامة]

يا هلا باستاذتنا الكبار.. الذين لا يبخلون علينا ابدا

واشكرك استاذي رمهان

وايضا استاذي ابو عارف

بارك الله فيكم وجاري المتابعة

[محمد سلامة]

ولكن استاذي ابو عارف هذا للورد word

وانا احتاجه عن طريق النموذج سواء انشاء او تمرير كلمة المرور لملف ال pdf

 

[ابو عارف]

السلام عليكم 

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

 

[محمد سلامة]

صباح الخير علي اخي وأستاذي ابوعارف

ممكن تكتب الكود او تشرحه وانا ننفذ مع اني انا عندي اوفيس 2010 وسوف اضر لتغيره بهذه الطريقة الي 2013

طب بالنسبة لتمرير كلمة المرور عن طريق النموذج .. هل من حل لها

[ابو عارف]

السلام عليكم 

اخي محمد كتابة كود في الاكسل يختلف من كتابته في الاكسس و حفظ الملف بالكود  ميزة جديدة في اوفيس ، لهذا من الضروري عمل الكود في نفس اوفيس لا في 2007 و اكسل 2010.

[محمد سلامة]

Up

[محمد سلامة]

في ١٥‏/١٠‏/٢٠١٥ at 10:21, رمهان said:

استاذنا الفاضل ابو عارف

بقي ان تسعفنا في فتح الملف pdf  المحمي ؟ كيف تمرر له الباسوورد ؟

مشكور من الاعماق

السلام عليكم

مازلت ابحث عن حل لهذا الموضوع

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

وقمت بتجربته سابقا.. خلاصة هذا الكود الموجود في الموضوع المدرج رابطه بعاليه  هو ان استاذ ابوخليل يمرر كلمة المرور للقاعدة الطرفية (الجداول) عن طريق الكود من القاعدة الاماميه.. 

فهل يمكن الاستفادة بهذا الكود في تمرير كلمة المرور لملفات ال word وال pdf من خلال حقل في نموذج 

او تعديله ليتناسب مع هذا

بارك الله فيكم.. وانتظر رد خبرائنا

وخصوصا الاستاذ ابوخليل لانه صاحب هذا الكود

[jjafferr]

وعليكم السلام أخي محمد 

 

المرفق فيه الملفات التالية ، إلا البرنامج رقم 1 ، فانه موجود في قاعدة البيانات ، والرجاء اخراجه الى نفس مجلد البرنامج:

.

النموذج:

.

وكود النموذج:

Option Compare Database
    
    Dim PDFTKString As String
    Dim file1 As String
    Dim oFile As String
    Dim Path1 As String
    Dim Path2 As String
'
    
    
Private Sub cmd_Make_Password_to_this_pdf_Click()

'pdftk source.pdf output destination.pdf user_pw password

    Path1 = Application.CurrentProject.Path & "\"

    file1 = Path1 & Me.pdf_Name
    oFile = Path1 & "abc.pdf"

    PDFTKString = Chr(34) & Path1 & "PDFTK" & Chr(34) & Space(1) & _
                  Chr(34) & file1 & Chr(34) & Space(1) & _
                  " output " & Chr(34) & oFile & Chr(34) & _
                  " user_pw " & Space(1) & Me.pdf_Password

    Shell PDFTKString
    
End Sub

Private Sub cmd_Open_pdf_with_Password_Click()
On Error GoTo err_cmd_Open_pdf_with_Password_Click


    
    Path1 = Application.CurrentProject.Path & "\"
    Path2 = fReturnTempDir  'windows Temp Directory

    file1 = Path1 & Me.pdf_Name
    oFile = Path2 & "abc.pdf"

    PDFTKString = Chr(34) & Path1 & "PDFTK" & Chr(34) & Space(1) & _
                  Chr(34) & file1 & Chr(34) & Space(1) & _
                  "input_pw" & Space(1) & Me.pdf_Password & _
                  " output " & Chr(34) & oFile & Chr(34)

    'Debug.Print PDFTKString
    Kill fReturnTempDir & "abc.pdf"

    Shell PDFTKString

    PauseTime = 1    ' Set duration.
    start = Timer    ' Set start time.
    Do While Timer < start + PauseTime
        DoEvents    ' Yield to other processes.
    Loop

    Application.FollowHyperlink Path2 & "abc.pdf"

Exit Sub
err_cmd_Open_pdf_with_Password_Click:

    If Err.Number = 53 Then
        'no file
        Resume Next
    Else
        MsgBox Err.Number & vbCrLf & Err.Description
    End If
    
End Sub

Private Sub Form_Close()
On Error GoTo err_Form_Close


    Kill Path2 & "abc.pdf"
    
Exit Sub
err_Form_Close:

    If Err.Number = 53 Then
        'no file
        Resume Next
    Else
        MsgBox Err.Number & vbCrLf & Err.Description
    End If
        
End Sub

.

البرنامج علشان يعرض ملف الـ pdf ، فانه يعمل نسخة منه بدون كلمة سر ، ويحفظها في مجلد الوندوز المؤقت باسم abc.pdf ، وعند اغلاق النموذج ، فانه يحذفه

 

 

جعفر

zpdf.zip

[محمد سلامة]

السلام عليك... استاذ الحبيب جعفر

بارك الله فيك.. وشكرا جزيلا.. 

جاري التجربة

هذا الموضوع احتاجه بشدة

[محمد سلامة]

السلام عليكم

المرفق لا يريد ان ينفك ببرنامج فك الضغط ويظهر رسالة خطأ

تقريبا يرى انه فيرس 

هل من حل استاذ جعفر

 

السلام عليكم

المرفق لا يريد ان ينفك ببرنامج فك الضغط ويظهر رسالة خطأ

تقريبا يرى انه فيرس 

هل من حل استاذ جعفر

 

[jjafferr]

4 ساعات مضت, محمد سلامة said:

السلام عليكم

المرفق لا يريد ان ينفك ببرنامج فك الضغط ويظهر رسالة خطأ

تقريبا يرى انه فيرس 

هل من حل استاذ جعفر

.

وعليكم السلام 

 

هل يمكنك انزال المرفق من هنا:

 

لأنه نفس البرنامج المرفق ، جرب واخبرني لوسمحت 

 

 

جعفر

[محمد سلامة]

السلام عليكم

استاذ جعفر ... متاسف جداااا وسمحنى

تم تحميل المرفق المسمى ( zpdf.zip ) من هنا فى هذه المشاركة مرة اخرى ويعمل ومن دون الاستعانة بالرابط الاخير

وجاري التجربه

تقريبا كانت المشكلة ب الانترنت لدى .. فعفوا وسامحنى

5 ساعات مضت, jjafferr said:

.

وعليكم السلام 

هل يمكنك انزال المرفق من هنا:

لأنه نفس البرنامج المرفق ، جرب واخبرني لوسمحت 

جعفر

 

[محمد سلامة]

في ١٢‏/٣‏/٢٠١٦ at 11:53, jjafferr said:

 

وعليكم السلام 

هل يمكنك انزال المرفق من هنا:

لأنه نفس البرنامج المرفق ، جرب واخبرني لوسمحت 

جعفر

السلام عليك... استاذنا الحبيب جعفر

بارك الله فيك.. وشكرا جزيلا.. 

بعد التجربة المثال جميل جدا ويفي بالغرض وبه المطلوب والحمد لله

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

وهذا هو مثالي الذي اريد التطبيق عليه اذا سمحت 

testPdf.rar

[jjafferr]

وعليكم السلام 

22 دقائق مضت, محمد سلامة said:

لا تضبط معي

ممكن تشرح هذه الجملة لوسمحت ، بس علشان نعرف وين المشكلة 

 

في المثال اللي انا وضعته في زرين ، زر لفتح ملف pdf ، والاخر لعمل كلمة سر فيه ،

طيب على اي ازرار تريد العمل في نموذجك؟

 

واذا ممكن ترفق لي بعض ملفات pdf اللي ما اشتغلت عندك ، بس علشان اجربها انا 

 

 

جعفر

[محمد سلامة]

19 ساعات مضت, jjafferr said:

في المثال اللي انا وضعته في زرين ، زر لفتح ملف pdf ، والاخر لعمل كلمة سر فيه ،

السلام عليكم استاذ جعفر

هذه معلومة جديدة كنت اظن انهو يمرر كلمة المرور فقط.. طلع كمان بيعمل كلمة سر.. هذا شئ رائع جدا

19 ساعات مضت, jjafferr said:

واذا ممكن ترفق لي بعض ملفات pdf اللي ما اشتغلت عندك ، بس علشان اجربها انا 

مين قال ان المثال مشتغلش عندي بالعكس

المثال شغال وزي الفل كمان

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

ولازم استخدام برنامج ال. Pdf بتاع حضرتك 

ام ممكن استخدام برنامج الاكروبات اللي بيفتح ملفات ال pdf 

بارك الله فيك

تم تعديل مارس 14, 2016 بواسطه محمد سلامة

[jjafferr]

وعليكم السلام أخي محمد 

 

البرنامج يعتمد على البرنامج الخارجي pdftk.exe ، واللي المفروض ان يكون في مجلد البرنامج ،

غير هذا ، البرنامج يحفظ ملف الـpdf في مجلد الوندوز المؤقت ويناديه بهذا الامر fReturnTempDir ، وعلشان هذا الامر يشتغل ، فانت محتاج للوحدة النمطية modSystemDirectories 

واذا لم ترد ان تحفظ الملف المؤقت في مجلد الوندوز المؤقت (او كان عندك كود آخر لهذه المهمة) ، فانت لست بحاجة لهذه الوحدة النمطية.

 

42 دقائق مضت, محمد سلامة said:

ولازم استخدام برنامج ال. Pdf بتاع حضرتك 

ام ممكن استخدام برنامج الاكروبات اللي بيفتح ملفات ال pdf

 

برنامج Adobe Acrobat Reader لا يملك قابلية عمل كلمة سر لملف pdf ، ولا إمكانية تمرير كلمة السر اليه لفتح ملف pdf ، لهذا السبب فنحن محتاجين الى الى البرنامج pdftk.exe ليقوم بهذه العمليات لنا 

 

جعفر

[محمد سلامة]

في ١٤‏/٣‏/٢٠١٦ at 18:25, jjafferr said:

وعليكم السلام أخي محمد 

 

البرنامج يعتمد على البرنامج الخارجي pdftk.exe ، واللي المفروض ان يكون في مجلد البرنامج ،

غير هذا ، البرنامج يحفظ ملف الـpdf في مجلد الوندوز المؤقت ويناديه بهذا الامر fReturnTempDir ، وعلشان هذا الامر يشتغل ، فانت محتاج للوحدة النمطية modSystemDirectories 

واذا لم ترد ان تحفظ الملف المؤقت في مجلد الوندوز المؤقت (او كان عندك كود آخر لهذه المهمة) ، فانت لست بحاجة لهذه الوحدة النمطية.

 

 

برنامج Adobe Acrobat Reader لا يملك قابلية عمل كلمة سر لملف pdf ، ولا إمكانية تمرير كلمة السر اليه لفتح ملف pdf ، لهذا السبب فنحن محتاجين الى الى البرنامج pdftk.exe ليقوم بهذه العمليات لنا 

 

جعفر

السلام عليكم

بارك الله فيك استاذنا الحبيب جعفر

بعد التطبيق على المرفق الخاص بى يقوم  الزر المسمى    Open pdf with password  بفتح  الملفات بكلمة سر ولا يمرر كلمة السر الموجود فى النموذج للملف

كذلك الزر الاخر المسمى Open pdf with password لا يقوم بتشفير الملفات التى تحتاج كلمة سر

 

ومرفق الملف الخاص بى بعد التعديل عليه واضافة الازرار الازمة والاكواد 

arc_pdf.rar

[محمد سلامة]

للرفع