Tùy chọn
Protect nhiều file Words theo đường dẫn động
- 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 SubNhờ các Anh/Chị xem xét có thể chuyển Code trên qua Access được không ah ?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
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
-
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é...