• Trang chủ click to expand contents 

  • Protect nhiều file Words theo đường dẫn động

  • Protect nhiều file Words theo đường dẫn động

    jeck09nt > 04-11-15, 06:34 PM

    Gửi các Anh/Chị cao thủ !
    Trong form : "frm Main"
    Mình đã tạo được Protect nhiều file words theo đường dẫn cố định (ấn nút : "Protect nhiều File Word theo đường dẫn cố định")
    Giờ mình muốn khi ấn nút : "Protect All Files" thì tất cả các file word đã chọn theo đường dẫn động của subform "frmDocMan1" sẽ được Protect tất cả.
    Đường đẫn giải nén đặt tại : C:\ProtectManyWords\
    Trân trọng cám ơn vì đã giúp đỡ !

    Đường dẫn file đính kèm : 
    http://www.mediafire.com/download/tq296s...yWords.zip

  • RE: Protect nhiều file Words theo đường dẫn động

    jeck09nt > 09-11-15, 08:58 AM

    Nhờ các Anh/Chị hướng dẫn giúp mình với !!!

  • RE: Protect nhiều file Words theo đường dẫn động

    maidinhdan > 09-11-15, 09:28 AM

    (09-11-15, 08:58 AM)jeck09nt Đã viết: Nhờ các Anh/Chị hướng dẫn giúp mình với !!!

    Nếu ý định của bạn chỉ có không muốn người dùng nào đó...(tạm gọi là anh Mr A) không được phép xem cũng như mở file Word đó. Thì mình ghĩ không cần thiết phải tạo hàm Mã hóa đường dẫn chi cho mệt và vất vả...

    Góp ý: 2 việc cần làm

    + Tạo textbox chứa đường dẫn ẩn.
    + Phần quyền theo người dùng.

    * Vì sao phải làm như vậy: Bởi trước hay sau khi hoàn thành chương trình của bạn thì bạn vẫn phải thiết kế phân quyền thôi.



    * Còn nếu bạn vẫn muốn thực hiện theo ý định ban đầu hãy cho mình hay...mình sẽ hỗ trợ.

    Thân mến!

  • RE: Protect nhiều file Words theo đường dẫn động

    jeck09nt > 09-11-15, 10:31 AM

    Cám ơn maidinhdan đã phản hồi,
    Ở đây, Phòng mình là bộ phân soạn nhiều mẫu văn bản (có link qua Access) và được phân quyền cho mỗi cán bộ trong phòng, sau khi soạn xong toàn bộ mẫu phải được Protect (không dùng chức năng convert to PDF) để gửi cho phòng khác kiểm tra và ban hành. Nếu có chỉnh sửa thì bộ phận soạn thảo sẽ thực hiện, còn bộ phận ban hành sẽ nhận file đã Protect để in hoặc lưu theo qui định.
    Vì trong Word mỗi lần chỉ Protect được 1 file nên rất mất thời gian, nên mình xem xét đến khả năng Protect nhiều file cùng một lúc. Mục đích của việc chọn đường dẫn động là để có thể linh hoạt chọn nhiều file word tại nhiều folder khác nhau cùng một lúc.
    Nhờ Maidinhdan và các Anh/Chị hướng dẫn thêm.
    Trân trọng !

  • RE: Protect nhiều file Words theo đường dẫn động

    jeck09nt > 09-11-15, 01:06 PM

    Chào các Anh/Chị.
    Mình có tham khảo được đoạn code (Protect và Unprotect) và  chỉ giải quyết cho đường dẫn cố định chạy trên nền  VB Word như sau :
    Mã PHP:
    'UNPROTECT
    Sub UnprotectDocsInFolder()
    Dim docfile As Document
    Dim docpath As String
    Dim docfilename As String
    Dim pwd As String

     '    Path for the documents
    docpath     = "C:\ProtectManyWords\Words\"
    'Password
    pwd = "    123"

     docfilename = Dir(docpath & "    *.docx")

     Do Until docfilename = ""
        Set docfile = Documents.Open(docpath & docfilename)
        If Not docfile.ProtectionType = -1 Then
             docfile.Unprotect pwd
             docfile.Close True
        Else
            docfile.Close False
        End If
        docfilename = Dir()
    Loop
    End Sub 
    Mã PHP:
    'PROTECT
    Sub ProtectDocsInFolder()
    Dim docfile As Document
    Dim docpath As String
    Dim docfilename As String
    Dim pwd As String
     
      '    Path for the documents
     docpath     = "C:\ProtectManyWords\Words\"
     'Password
     pwd = "    123"
     
      docfilename = Dir(docpath & "    *.docx")
     
      Do Until docfilename = ""
         Set docfile = Documents.Open(docpath & docfilename)
         If docfile.ProtectionType = -1 Then
             docfile.Protect wdAllowOnlyFormFields, , pwd
              docfile.Close True
         Else
             docfile.Close False
         End If
         docfilename = Dir()
     Loop
    End Sub 
    Nhờ các Anh/Chị xem xét có thể chuyển Code trên qua Access được không ah ?
    Cám ơn !

  • RE: Protect nhiều file Words theo đường dẫn động

    maidinhdan > 09-11-15, 04:54 PM

    Do đoạn code trên vẫn chưa toàn vẹn, nên Bạn cho mình link Demo hoặc file của đoạn code trên để mình nghiên cứu dùm bạn.

    Chú ý nhé: Mình chỉ hỗ trợ các file dạng *.mdb ( Access 2003) vì máy tính mình chỉ xài bản này thôi.

  • RE: Protect nhiều file Words theo đường dẫn động

    jeck09nt > 09-11-15, 05:17 PM

    Mình gửi bản Demo word :
    http://www.mediafire.com/view/bh2k7fzv31...rotec.dotm
    Vẫn sử dụng đường đẫn và file word đã gửi lúc trước : C:\ProtectManyWords

  • RE: Protect nhiều file Words theo đường dẫn động

    jeck09nt > 09-11-15, 05:32 PM

    Mình gửi lại file đính kèm có cả Access 2003 và 2007 : 
    http://www.mediafire.com/download/tq296s...yWords.zip

  • RE: Protect nhiều file Words theo đường dẫn động

    maidinhdan > 09-11-15, 06:01 PM

    Cuối năm công việc khá bận rộn, trong vòng 1 tuần sẽ trả lời cụ thể kèm hường dẫn cho bạn.


    Nếu Anh/Chị nào có nghiên cứu xin hướng dẫn trước.

    Thân Ái 015

  • RE: Protect nhiều file Words theo đường dẫn động

    maidinhdan > 10-11-15, 09:25 AM

    (04-11-15, 06:34 PM)jeck09nt Đã viết: Mình đã tạo được Protect nhiều file words theo đường dẫn cố định (ấn nút : "Protect nhiều File Word theo đường dẫn cố định")

    Giờ mình muốn khi ấn nút : "Protect All Files" thì tất cả các file word đã chọn theo đường dẫn động của subform "frmDocMan1" sẽ được Protect tất cả.
    Đường đẫn giải nén đặt tại : C:\ProtectManyWords\

    Mình chưa mở file bạn gửi...khi đọc lại câu này...tôi hơi bỡ ngỡ..bạn giải thích dùm chút nhé...