Đến nội dung


Hình ảnh
- - - - -

Lisp tạo pass cho bản vẽ


  • Please log in to reply
8 replies to this topic

#1 ttmt_jses

ttmt_jses

    biết vẽ circle

  • Members
  • PipPip
  • 31 Bài viết
Điểm đánh giá: 2 (bình thường)

Đã gửi 12 February 2009 - 10:01 AM

Chào mọi người!
Mình mới sưu tầm được cái lisp tạo pass cho bản vẽ, nhưng khi xài thì gặp 1 số khuyết điểm sau:

1. Khi tắt bản vẽ đi, dùng chương trình Acad khác ( ở đây mình dùng cad 2002 để tạo pass, rồi sau đó mở lại bằng cad 2008) để mở thì cái pass bảo vệ chả có hiệu lực gì nữa.

2. Nếu biết lệnh khóa và mở lệnh (undefined và redefine) thì cái lisp tạo pass kia cũng bó tay, vì thực ra nó chỉ là undefined và redefine.

Ngoài ra còn vài trục trặc nhỏ không đáng kể.

KL: Chỉ cần biết 2 lệnh undefine và redefine thì coi như cái lisp kia không còn tác dụng nữa, uổng công người đả viết ra.

Ở đây mục đích là tạo pass cho bản vẽ thì phải làm sao để chỉ dùng pass đó mới mở khóa được,ý của mình là như vậy,không biết có cách nào để cứu cái lisp kia hoặc làm 1 cái lisp mới bảo đảm đúng mục đích tạo pass cho bản vẽ không? Mong Bác Hoành, Bác ssg, các cao thủ và mọi người giúp mình!

Còn đây phần hướng dẫn và lisp tạo pass , mọi người tải về, giải nén và làm theo hướng dẫn rối xem xét lại giùm mình nhé!Cảm ơn rất rất nhiều.

“…Các quy ước dùng lisp do mình cung cấp như sau:
-Tại ổ C bạn tạo thư mục TAILIEUKYTHUAT bên trong có các thư mục sau:
+DWG
+DCL
+LENH
-Sau này trong các lisp mình cung cấp thì bạn copy vào trong các thư mục này với vị trí như sau:
+File *.dwg thì chép vào thư mục DWG.
+File *.dcl thì chép vào thư mục DCL.
+File *.sld thì chép vào thư mục DCL.
+File *.txt thì chép vào thư mục DCL.
+File *.lsp thì chép vào thư mục LENH.
-Bạn phải chắn chắn rằng đã làm đúng các bước trên thì lisp mới chạy được vì mình dùng đường dẩn cố định trong các lisp này.
-Mình sẽ đưa lần lượt từng lisp riêng rẽ mỗi lisp là 1 lệnh. Ai thích gì dùng nấy thích gộp lại thì tự làm. Mình chỉ giải thích và hướng dẩn sử dụng mà không chỉnh sửa.
*Mình coi như các bạn đã biết cách load lisp lên rồi nhé (không hướng dẩn gì thêm)

+Tiện ích khóa các lệnh cơ bản khi rời máy:
*Bạn đang vẽ bản vẽ quan trọng ví dụ có nhiều text, cao độ .v.v. nhưng bạn lại có việc rời máy 1 lát tắt đi thì phiền (phải mở lại => mệt) nhưng lại không yên tâm có ai đó đùa sửa vài thông số trong bản vẽ thì càng phiền, giải pháp là vô hiệu 1 vài lệnh cơ bản không cho người khác chỉnh sửa bản vẽ trong thời gian ra ngoài.
-Trong 3 file *.lsp mình cung cấp thì bạn copy tất vào thư mục lệnh nhưng chỉ load file khoamolenh.lsp thôi nhé
-Lệnh: KHOALENH hiện hộp thoại hỏi bạn nhập pass. Nhấn khoalenh và đi đâu thì đi.
-Mở khóa: gõ lệnh MOLENH và nhập cho đúng cái pass hồi nãy nhé nếu quên thì bạn cũng không dùng được các lệnh đâu trừ khi tắt và khởi động lại cad….”

-Đây là link:http://www.cadviet.com/upfiles/khoalenh.rar
  • 0

#2 Tue_NV

Tue_NV

    KS Võ Quang Tuệ

  • Moderator
  • PipPipPipPipPipPipPip
  • 4296 Bài viết
Điểm đánh giá: 3805 (đỉnh cao)

Đã gửi 12 February 2009 - 10:55 AM

Chào mọi người!
Mình mới sưu tầm được cái lisp tạo pass cho bản vẽ, nhưng khi xài thì gặp 1 số khuyết điểm sau:

1. Khi tắt bản vẽ đi, dùng chương trình Acad khác ( ở đây mình dùng cad 2002 để tạo pass, rồi sau đó mở lại bằng cad 2008) để mở thì cái pass bảo vệ chả có hiệu lực gì nữa.

2. Nếu biết lệnh khóa và mở lệnh (undefined và redefine) thì cái lisp tạo pass kia cũng bó tay, vì thực ra nó chỉ là undefined và redefine.

Ngoài ra còn vài trục trặc nhỏ không đáng kể.

KL: Chỉ cần biết 2 lệnh undefine và redefine thì coi như cái lisp kia không còn tác dụng nữa, uổng công người đả viết ra.

Ở đây mục đích là tạo pass cho bản vẽ thì phải làm sao để chỉ dùng pass đó mới mở khóa được,ý của mình là như vậy,không biết có cách nào để cứu cái lisp kia hoặc làm 1 cái lisp mới bảo đảm đúng mục đích tạo pass cho bản vẽ không? Mong Bác Hoành, Bác ssg, các cao thủ và mọi người giúp mình!

Còn đây phần hướng dẫn và lisp tạo pass , mọi người tải về, giải nén và làm theo hướng dẫn rối xem xét lại giùm mình nhé!Cảm ơn rất rất nhiều.

“…Các quy ước dùng lisp do mình cung cấp như sau:
-Tại ổ C bạn tạo thư mục TAILIEUKYTHUAT bên trong có các thư mục sau:
+DWG
+DCL
+LENH
-Sau này trong các lisp mình cung cấp thì bạn copy vào trong các thư mục này với vị trí như sau:
+File *.dwg thì chép vào thư mục DWG.
+File *.dcl thì chép vào thư mục DCL.
+File *.sld thì chép vào thư mục DCL.
+File *.txt thì chép vào thư mục DCL.
+File *.lsp thì chép vào thư mục LENH.
-Bạn phải chắn chắn rằng đã làm đúng các bước trên thì lisp mới chạy được vì mình dùng đường dẩn cố định trong các lisp này.
-Mình sẽ đưa lần lượt từng lisp riêng rẽ mỗi lisp là 1 lệnh. Ai thích gì dùng nấy thích gộp lại thì tự làm. Mình chỉ giải thích và hướng dẩn sử dụng mà không chỉnh sửa.
*Mình coi như các bạn đã biết cách load lisp lên rồi nhé (không hướng dẩn gì thêm)

+Tiện ích khóa các lệnh cơ bản khi rời máy:
*Bạn đang vẽ bản vẽ quan trọng ví dụ có nhiều text, cao độ .v.v. nhưng bạn lại có việc rời máy 1 lát tắt đi thì phiền (phải mở lại => mệt) nhưng lại không yên tâm có ai đó đùa sửa vài thông số trong bản vẽ thì càng phiền, giải pháp là vô hiệu 1 vài lệnh cơ bản không cho người khác chỉnh sửa bản vẽ trong thời gian ra ngoài.
-Trong 3 file *.lsp mình cung cấp thì bạn copy tất vào thư mục lệnh nhưng chỉ load file khoamolenh.lsp thôi nhé
-Lệnh: KHOALENH hiện hộp thoại hỏi bạn nhập pass. Nhấn khoalenh và đi đâu thì đi.
-Mở khóa: gõ lệnh MOLENH và nhập cho đúng cái pass hồi nãy nhé nếu quên thì bạn cũng không dùng được các lệnh đâu trừ khi tắt và khởi động lại cad….”

-Đây là link:http://www.cadviet.com/upfiles/khoalenh.rar

Trong CAD đã cung cấp tiện ích tạo pass rối nè :
http://www.cadviet.c...art=#entry48802
  • 0

#3 duy782006

duy782006

    PHẠM QUỐC DUY

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 2155 Bài viết
Điểm đánh giá: 1359 (rất tốt)

Đã gửi 12 February 2009 - 10:58 AM

Chào mọi người!
Mình mới sưu tầm được cái lisp tạo pass cho bản vẽ, nhưng khi xài thì gặp 1 số khuyết điểm sau:

1. Khi tắt bản vẽ đi, dùng chương trình Acad khác ( ở đây mình dùng cad 2002 để tạo pass, rồi sau đó mở lại bằng cad 2008) để mở thì cái pass bảo vệ chả có hiệu lực gì nữa.

2. Nếu biết lệnh khóa và mở lệnh (undefined và redefine) thì cái lisp tạo pass kia cũng bó tay, vì thực ra nó chỉ là undefined và redefine.



+Tiện ích khóa các lệnh cơ bản khi rời máy:
*Bạn đang vẽ bản vẽ quan trọng ví dụ có nhiều text, cao độ .v.v. nhưng bạn lại có việc rời máy 1 lát tắt đi thì phiền (phải mở lại => mệt) nhưng lại không yên tâm có ai đó đùa sửa vài thông số trong bản vẽ thì càng phiền, giải pháp là vô hiệu 1 vài lệnh cơ bản không cho người khác chỉnh sửa bản vẽ trong thời gian ra ngoài.
-Trong 3 file *.lsp mình cung cấp thì bạn copy tất vào thư mục lệnh nhưng chỉ load file khoamolenh.lsp thôi nhé
-Lệnh: KHOALENH hiện hộp thoại hỏi bạn nhập pass. Nhấn khoalenh và đi đâu thì đi.
-Mở khóa: gõ lệnh MOLENH và nhập cho đúng cái pass hồi nãy nhé nếu quên thì bạn cũng không dùng được các lệnh đâu trừ khi tắt và khởi động lại cad….”

-Đây là link:http://www.cadviet.com/upfiles/khoalenh.rar


Bạn không đọc kỹ chức năng của lệnh rồi:
Cái này chỉ là khóa không cho thực hiện các lệnh cơ bản khi rời máy thôi. Chứ tắt cad rồi mở lại thì nó không còn tác dụng nửa.
Đúng là cái này chỉ dùng để chơi thôi. tính trường hợp ít người biết (undefined và redefine)
  • 0

Cứ ngỡ trần gian là cõi thật.Cho nên tất bật đến bây giờ.
Tạo hộp thoại bằng lisp My blog QUY ĐỊNH ĐẶT TÊN TOPIC TRONG CHUYÊN MỤC LISPD http://ktsduy.wordpress.com/
Để cám ơn chỉ cần nhấn rep_up.png
(Là nhấn vào nút đó phía bài viết của người ta í chứ đừng có nhè cái hình này mà nhấn miết đi nha :-D


#4 vndesperados

vndesperados

    biết lệnh xref

  • Members
  • PipPipPipPipPipPipPip
  • 547 Bài viết
Điểm đánh giá: 253 (khá)

Đã gửi 12 February 2009 - 02:31 PM

+Tiện ích khóa các lệnh cơ bản khi rời máy:
*Bạn đang vẽ bản vẽ quan trọng ví dụ có nhiều text, cao độ .v.v. nhưng bạn lại có việc rời máy 1 lát tắt đi thì phiền (phải mở lại => mệt) nhưng lại không yên tâm có ai đó đùa sửa vài thông số trong bản vẽ thì càng phiền, giải pháp là vô hiệu 1 vài lệnh cơ bản không cho người khác chỉnh sửa bản vẽ trong thời gian ra ngoài.
-Trong 3 file *.lsp mình cung cấp thì bạn copy tất vào thư mục lệnh nhưng chỉ load file khoamolenh.lsp thôi nhé
-Lệnh: KHOALENH hiện hộp thoại hỏi bạn nhập pass. Nhấn khoalenh và đi đâu thì đi.
-Mở khóa: gõ lệnh MOLENH và nhập cho đúng cái pass hồi nãy nhé nếu quên thì bạn cũng không dùng được các lệnh đâu trừ khi tắt và khởi động lại cad….”

-Đây là link:http://www.cadviet.com/upfiles/khoalenh.rar


Cái này để làm gì nhỉ. Nếu đi ra ngòai thì khóa máy tính của mình lại luôn. Phím tắt là Winkey + L.
  • 0

#5 duy782006

duy782006

    PHẠM QUỐC DUY

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 2155 Bài viết
Điểm đánh giá: 1359 (rất tốt)

Đã gửi 12 February 2009 - 02:55 PM

Nếu đi ra ngòai thì khóa máy tính của mình lại luôn. Phím tắt là Winkey + L.

Mổi cơ quan có 1 cách dùng máy riêng. Cơ quan mình thì máy mình nhưng ai dùng cũng được. nó dính tới máy in và tùm lum thứ ... mấy ông tư vấn xd không chuyên nghiệp như dân IT được :cheers:
  • 0

Cứ ngỡ trần gian là cõi thật.Cho nên tất bật đến bây giờ.
Tạo hộp thoại bằng lisp My blog QUY ĐỊNH ĐẶT TÊN TOPIC TRONG CHUYÊN MỤC LISPD http://ktsduy.wordpress.com/
Để cám ơn chỉ cần nhấn rep_up.png
(Là nhấn vào nút đó phía bài viết của người ta í chứ đừng có nhè cái hình này mà nhấn miết đi nha :-D


#6 vndesperados

vndesperados

    biết lệnh xref

  • Members
  • PipPipPipPipPipPipPip
  • 547 Bài viết
Điểm đánh giá: 253 (khá)

Đã gửi 12 February 2009 - 03:21 PM

Mổi cơ quan có 1 cách dùng máy riêng. Cơ quan mình thì máy mình nhưng ai dùng cũng được. nó dính tới máy in và tùm lum thứ ... mấy ông tư vấn xd không chuyên nghiệp như dân IT được :cheers:



Mình chưa hiểu. Trong một mạng LAN nếu dùng máy in chung thì nên dùng Network Printer, cái này ai cũng in được từ máy tính của họ
Còn nếu dùng máy in dạng share thì việc Lock bằng Winkey + L không ảnh hưởng gì, ngoai trừ ai đó muốn nhấn Ctrl + P trên chính máy của bạn
  • 0

#7 duy782006

duy782006

    PHẠM QUỐC DUY

  • CADViet Team
  • PipPipPipPipPipPipPip
  • 2155 Bài viết
Điểm đánh giá: 1359 (rất tốt)

Đã gửi 12 February 2009 - 04:13 PM

Mình chưa hiểu. Trong một mạng LAN nếu dùng máy in chung thì nên dùng Network Printer, cái này ai cũng in được từ máy tính của họ
Còn nếu dùng máy in dạng share thì việc Lock bằng Winkey + L không ảnh hưởng gì, ngoai trừ ai đó muốn nhấn Ctrl + P trên chính máy của bạn

Mình đã nói còn tùm lum thứ nửa mà. Ví dụ mình đang vẽ ngon nhưng có thèn ku kia nó cần làm w hay gì gì mà máy nó lổi fon hay sao đó thì nó đứng bên cạnh trưng bày cái bản mẹt thấy ghét ra chừng nào đưa máy cho nó làm thì thôi. Rồi khi nó in mà máy nó không có cad đời cao thì nó củng làm dậy nói chung là i hợp tác xã thôi không có jì riêng tư hết. Mạng LAN thì trục trẵc luôn thỉnh thoảng máy in lại bị sao sao đó lại phải bấm bấm gỏ gỏ trên máy của mình thì nó lại tiệp tục in.
  • 0

Cứ ngỡ trần gian là cõi thật.Cho nên tất bật đến bây giờ.
Tạo hộp thoại bằng lisp My blog QUY ĐỊNH ĐẶT TÊN TOPIC TRONG CHUYÊN MỤC LISPD http://ktsduy.wordpress.com/
Để cám ơn chỉ cần nhấn rep_up.png
(Là nhấn vào nút đó phía bài viết của người ta í chứ đừng có nhè cái hình này mà nhấn miết đi nha :-D


#8 vndesperados

vndesperados

    biết lệnh xref

  • Members
  • PipPipPipPipPipPipPip
  • 547 Bài viết
Điểm đánh giá: 253 (khá)

Đã gửi 12 February 2009 - 04:46 PM

Mình đã nói còn tùm lum thứ nửa mà. Ví dụ mình đang vẽ ngon nhưng có thèn ku kia nó cần làm w hay gì gì mà máy nó lổi fon hay sao đó thì nó đứng bên cạnh trưng bày cái bản mẹt thấy ghét ra chừng nào đưa máy cho nó làm thì thôi. Rồi khi nó in mà máy nó không có cad đời cao thì nó củng làm dậy nói chung là i hợp tác xã thôi không có jì riêng tư hết. Mạng LAN thì trục trẵc luôn thỉnh thoảng máy in lại bị sao sao đó lại phải bấm bấm gỏ gỏ trên máy của mình thì nó lại tiệp tục in.



Nếu vậy thì nên tạo một account cho phép người khác sử dụng có password công khai hoặc không có password. Còn riêng phần mình thì sử dụng môt account riêng. Như vậy sẽ an tòan hơn và cũng chuyên nghiệp hơn.
  • 0

#9 ttmt_jses

ttmt_jses

    biết vẽ circle

  • Members
  • PipPip
  • 31 Bài viết
Điểm đánh giá: 2 (bình thường)

Đã gửi 12 February 2009 - 05:06 PM

các bác đi tới đâu rồi, vòng lại cho em hỏi chút xíu nữa.
Cứ coi như cái lisp đó có khuyết điểm, người thích người không thích nhưng dù sao cũng cảm ơn tác giả đã viết ra.
Tiện đây cho em hỏi về cái "Security options" cùa Cad.
Em đã sử dụng chức năng đó, có tạo pass, confirm pass...làm đầy đủ, nhưng nó chả có tác dụng gì kể cả khi em tắt đi
rồi mở lại cad, tạo bên cad này mở bên cad kia , đổi người sử dụng từ admin thành guest , tạo bên máy này mở bên máy kia..nói chung là hết cách mà vẫn không hiểu chức năng đó sử dụng như thế nào,mục đích là gì?
Mong các bác chỉ giáo giùm em ! Cảm ơn các bác trước nhé!
  • 0