[Đã xong] AutoBackup bản vẽ

[ketxu 2.984]

Không biết mọi người thấy như thế nào, chứ riêng Ketxu thấy chế độ Backup của CAD thật kinh khủng, và Recover không phải là cứu cánh tốt. Vậy, với một máy tính không quá khan hiếm tài nguyên, ta có nên tự làm 1 chương trình backup cho mình ??

Dựa theo ý tưởng của bác Hoành ở topic này

Oldsave

tuy nhiên, nếu phải gõ lệnh thì... nó không mang nghĩa auto nữa, nên Ket tính nước khác.

Sau 1 ngày bắt đầu học DCL, ketxu cũng mò mẫm xong cái chương trình Auto Backup bản đầu tiên, post nên để anh em dùng thử.

- Ý tưởng : tự động lưu thêm 1 bản sao của bản vẽ theo khoảng thời gian định trước. Tất nhiên, chỉ khi có thay đổi trong bản vẽ thì mới cần lưu.

- Thực hiện ở bản V1 :

+ Lưu các bản vẽ backup vào 1 thư mục cùng vị trí với bản vẽ, tên thư mục mặc định trùng với tên bản vẽ (Hoặc tên bất kỳ nếu người dùng thay đổi) theo

khoảng thời gian định kỳ (mặc định là 10 phút hoặc bất kỳ nếu người dùng thay đổi) nếu bản vẽ có thay đổi

+ Có thể thực hiện 1 vài thao tác trước khi lưu file (audit, purge hoặc j j đó khác nữa, chờ mọi người góp ý ^^)

 

- Sử dụng : AppLoad file vlx đi kèm, cho vào StartUp Suite hoặc dùng với từng bản vẽ.

Chú ý : Chỉ cần Load file là đủ, không cần lệnh. Chương trình sẽ chạy ngầm với chế độ mặc định lưu vào thư mục trùng tên bản vẽ, chu kỳ 10 phút

 

(nếu bản vẽ có thay đổi) , đồng thời thông báo ở StatusBar của CAD.

Chỉ dùng lệnh KABS để gọi bảng Setting của chương trình khi muốn thay đổi các mặc định này.

+ Nếu bản vẽ đã load lisp rồi, muốn tạm dừng, hãy cho time bằng 0

 

Cái này Ket mới hì hục từ hôm qua, chắc là còn phải sửa nhiều, mà DCL của mình còn non quá..hy vọng mọi người góp ý ^^

- Tương lai : thêm các Option :

+ Save theo số lần thao tác lệnh với bản vẽ

+ Hoạt động theo lệnh gọi hoặc chế độ Auto ngầm

+ Kiểm tra theo DBMode

+ Thư mục chỉ định ?

+ Add quy luật đánh số, post + prefix cho file backup

+ Assign vào Qsave, Save ?

+ Trau chuốt lại DCL :lol:

+ Có Auto Backup thì cũng sẽ cố có AutoDel và Manager. Tuy nhiên, những việc này giải quyết với Lisp thật...ngán ngẩm :blush:

 

Chúc mọi người cuối tuần vui vẻ !

 

KAB v1.0 (5-8)

 

P/S: chống chỉ định người dùng Vista, Win7... đặt lưu tự động trong ổ C hoặc các thư mục nhạy cảm của Win, vì vấn đề cấp quyền Admin để copy,move, tạo thư mục, tạo file...ở các nơi này cho lisp mình mù đặc -_-

[Doan Van Ha 3.191]

Không biết mọi người thấy như thế nào, chứ riêng Ketxu thấy chế độ Backup của CAD thật kinh khủng, và Recover không phải là cứu cánh tốt. Vậy, với một máy tính không quá khan hiếm tài nguyên, ta có nên tự làm 1 chương trình backup cho mình ??

Dựa theo ý tưởng của bác Hoành ở topic này

Oldsave

tuy nhiên, nếu phải gõ lệnh thì... nó không mang nghĩa auto nữa, nên Ket tính nước khác.

Sau 1 ngày bắt đầu học DCL, ketxu cũng mò mẫm xong cái chương trình Auto Backup bản đầu tiên, post nên để anh em dùng thử.

- Ý tưởng : tự động lưu thêm 1 bản sao của bản vẽ theo khoảng thời gian định trước. Tất nhiên, chỉ khi có thay đổi trong bản vẽ thì mới cần lưu.

- Thực hiện ở bản V1 :

+ Lưu các bản vẽ backup vào 1 thư mục cùng vị trí với bản vẽ, tên thư mục mặc định trùng với tên bản vẽ (Hoặc tên bất kỳ nếu người dùng thay đổi) theo

khoảng thời gian định kỳ (mặc định là 10 phút hoặc bất kỳ nếu người dùng thay đổi) nếu bản vẽ có thay đổi

+ Có thể thực hiện 1 vài thao tác trước khi lưu file (audit, purge hoặc j j đó khác nữa, chờ mọi người góp ý ^^)

 

- Sử dụng : AppLoad file vlx đi kèm, cho vào StartUp Suite hoặc dùng với từng bản vẽ.

Chú ý : Chỉ cần Load file là đủ, không cần lệnh. Chương trình sẽ chạy ngầm với chế độ mặc định lưu vào thư mục trùng tên bản vẽ, chu kỳ 10 phút

 

(nếu bản vẽ có thay đổi) , đồng thời thông báo ở StatusBar của CAD.

Chỉ dùng lệnh KABS để gọi bảng Setting của chương trình khi muốn thay đổi các mặc định này.

+ Nếu bản vẽ đã load lisp rồi, muốn tạm dừng, hãy cho time bằng 0

 

Cái này Ket mới hì hục từ hôm qua, chắc là còn phải sửa nhiều, mà DCL của mình còn non quá..hy vọng mọi người góp ý ^^

- Tương lai : thêm các Option :

+ Save theo số lần thao tác lệnh với bản vẽ

+ Hoạt động theo lệnh gọi hoặc chế độ Auto ngầm

+ Kiểm tra theo DBMode

+ Thư mục chỉ định ?

+ Add quy luật đánh số, post + prefix cho file backup

+ Assign vào Qsave, Save ?

+ Trau chuốt lại DCL :lol:

+ Có Auto Backup thì cũng sẽ cố có AutoDel và Manager. Tuy nhiên, những việc này giải quyết với Lisp thật...ngán ngẩm :blush:

 

Chúc mọi người cuối tuần vui vẻ !

 

KAB v1.0 (5-8)

 

P/S: chống chỉ định người dùng Vista, Win7... đặt lưu tự động trong ổ C hoặc các thư mục nhạy cảm của Win, vì vấn đề cấp quyền Admin để copy,move, tạo thư mục, tạo file...ở các nơi này cho lisp mình mù đặc -_-

VLX thì kèm theo LSP+DCL mới góp ý được chứ!

Đã Dialoge thì cố gắng hoành tráng hơn ở chỗ bẫy lỗi Ketxu ạ! Hiện giờ để trống tên file hoặc time là số âm chẳng hạn thì nó cũng OK luôn.

Thân thương!

[ketxu 2.984]

Ý em nói là về cách sử dụng ấy bác ĐVH ạ ^^ Còn code này ketxu xin không public ;)

Chương trình vẫn âm thầm bẫy lỗi bác ạ :)

+ Để trống tên file : => tên thư mục = tên file

+ Tên file sai quy cách : Không thèm làm gì nữa ^^

+ Để time âm : lấy về mặc định 10 phút

Thân thương too :wub:

 

P/S : cho e hỏi cái edit_box Time kia e muốn dính vào text thì làm thế nào nhỉ :wacko: Không cầm kéo thả được thiệt là ức chế quá đi :angry:

[Doan Van Ha 3.191]

Ý em nói là về cách sử dụng ấy bác ĐVH ạ ^^ Còn code này ketxu xin không public ;)

Chương trình vẫn âm thầm bẫy lỗi bác ạ :)

+ Để trống tên file : => tên thư mục = tên file

+ Tên file sai quy cách : Không thèm làm gì nữa ^^

+ Để time âm : lấy về mặc định 10 phút

Thân thương too :wub:

 

P/S : cho e hỏi cái edit_box Time kia e muốn dính vào text thì làm thế nào nhỉ :wacko: Không cầm kéo thả được thiệt là ức chế quá đi :angry:

Tạm OK, nhưng ta hãy phát huy cái hay mà cad đã mặc định. Chẳng hạn, khi dialoge xuất hiện lần đầu tiên thì tên bản vẽ phải hiện lên giá trị mặc định là bản vẽ hiện hành (VD "Drawing1"), và time phải hiện lên số 10, đằng này 2 thằng đó trống rỗng, Ket ơi. Và khi User nhập tào lao thì có cảnh báo cho người ta biết, như cad thường có dòng cảnh báo ở góc trái dưới của dialoge ấy mà.

Thêm nữa, Ket nên thêm 1 dòng Princ ở cuối file lsp để giới thiệu tên lệnh, để khi load xong, bấm F2 là thấy tên lệnh ngay. Nếu không, vài ngày sau sẽ không nhớ tên lệnh đâu (vì VLX nên không thể tìm tên lệnh kiểu như tìm trong lsp).

[ketxu 2.984]

Tạm OK, nhưng ta hãy phát huy cái hay mà cad đã mặc định. Chẳng hạn, khi dialoge xuất hiện lần đầu tiên thì tên bản vẽ phải hiện lên giá trị mặc định là bản vẽ hiện hành (VD "Drawing1"), và time phải hiện lên số 10, đằng này 2 thằng đó trống rỗng, Ket ơi. Và khi User nhập tào lao thì có cảnh báo cho người ta biết, như cad thường có dòng cảnh báo ở góc trái dưới của dialoge ấy mà.

Thêm nữa, Ket nên thêm 1 dòng Princ ở cuối file lsp để giới thiệu tên lệnh, để khi load xong, bấm F2 là thấy tên lệnh ngay. Nếu không, vài ngày sau sẽ không nhớ tên lệnh đâu (vì VLX nên không thể tìm tên lệnh kiểu như tìm trong lsp).

OK bác, vấn đề này chưa quá hóc hiểm ^^ Ngày thứ 2 với DCL có lẽ sẽ dễ dàng hơn với ket.

P/s : đoạn màu đỏ bác check chưa nhỉ :o, vì ket có cho code xử lý cái này vào rồi mà ^^

[hochoaivandot 111]

Không biết mọi người thấy như thế nào, chứ riêng Ketxu thấy chế độ Backup của CAD thật kinh khủng, và Recover không phải là cứu cánh tốt. Vậy, với một máy tính không quá khan hiếm tài nguyên, ta có nên tự làm 1 chương trình backup cho mình ??

Dựa theo ý tưởng của bác Hoành ở topic này

Oldsave

tuy nhiên, nếu phải gõ lệnh thì... nó không mang nghĩa auto nữa, nên Ket tính nước khác.

Sau 1 ngày bắt đầu học DCL, ketxu cũng mò mẫm xong cái chương trình Auto Backup bản đầu tiên, post nên để anh em dùng thử.

- Ý tưởng : tự động lưu thêm 1 bản sao của bản vẽ theo khoảng thời gian định trước. Tất nhiên, chỉ khi có thay đổi trong bản vẽ thì mới cần lưu.

- Thực hiện ở bản V1 :

+ Lưu các bản vẽ backup vào 1 thư mục cùng vị trí với bản vẽ, tên thư mục mặc định trùng với tên bản vẽ (Hoặc tên bất kỳ nếu người dùng thay đổi) theo

khoảng thời gian định kỳ (mặc định là 10 phút hoặc bất kỳ nếu người dùng thay đổi) nếu bản vẽ có thay đổi

+ Có thể thực hiện 1 vài thao tác trước khi lưu file (audit, purge hoặc j j đó khác nữa, chờ mọi người góp ý ^^)

 

- Sử dụng : AppLoad file vlx đi kèm, cho vào StartUp Suite hoặc dùng với từng bản vẽ.

Chú ý : Chỉ cần Load file là đủ, không cần lệnh. Chương trình sẽ chạy ngầm với chế độ mặc định lưu vào thư mục trùng tên bản vẽ, chu kỳ 10 phút

 

(nếu bản vẽ có thay đổi) , đồng thời thông báo ở StatusBar của CAD.

Chỉ dùng lệnh KABS để gọi bảng Setting của chương trình khi muốn thay đổi các mặc định này.

+ Nếu bản vẽ đã load lisp rồi, muốn tạm dừng, hãy cho time bằng 0

 

Cái này Ket mới hì hục từ hôm qua, chắc là còn phải sửa nhiều, mà DCL của mình còn non quá..hy vọng mọi người góp ý ^^

- Tương lai : thêm các Option :

+ Save theo số lần thao tác lệnh với bản vẽ

+ Hoạt động theo lệnh gọi hoặc chế độ Auto ngầm

+ Kiểm tra theo DBMode

+ Thư mục chỉ định ?

+ Add quy luật đánh số, post + prefix cho file backup

+ Assign vào Qsave, Save ?

+ Trau chuốt lại DCL :lol:

+ Có Auto Backup thì cũng sẽ cố có AutoDel và Manager. Tuy nhiên, những việc này giải quyết với Lisp thật...ngán ngẩm :blush:

 

Chúc mọi người cuối tuần vui vẻ !

 

KAB v1.0 (5-8)

 

P/S: chống chỉ định người dùng Vista, Win7... đặt lưu tự động trong ổ C hoặc các thư mục nhạy cảm của Win, vì vấn đề cấp quyền Admin để copy,move, tạo thư mục, tạo file...ở các nơi này cho lisp mình mù đặc -_-

 

Hochoaivandot mới download ứng dụng của ketxu về, chưa dùng được nhiều nên không góp ý được nhiều ngoài vài điều sau:

 

1. Đường dẫn lưu file ketxu mặc định là đường dẫn lưu bản vẽ hiền thời \\ đường dẫn nhập....Cái này mình thấy không hợp lý lắm. Không nên luôn luôn là như vậy. Chẳng hạn mình làm ở công ty, tấc cả làm qua mạng Lan, còn file Backup thì mình muốn lưu trên máy của mình --->Không biết làm thế nào.

Nếu ý kiến 1 ketxu đồng ý thì mình đề xuất thêm ý 2 sau:

2. Nên cho thêm 1 button đằng sau edit_box để người dùng Chọn Button rồi chọn đến đường dẫn (Chứ nhiều đường dẫn dài cả mấy cây số ngồi type cũng ná thở)

3. Đúng như bạn Doan Van Ha đã phản ánh, lần đầu tiên dùng lệnh KABS thì tên đường dẫn + bản vẽ, thời gian không được mặc định hiển thị trên edit_box (Cái này nếu không sửa thấy không trực quan lắm). Mình dùng Win7+Cad2007 có phải là lý do nó ko chịu cho mình thấy không nhỉ??? ;)

4. Phải công nhận KAB là ý tưởng quá hay. Sau khi hoàn thiện phần AutoDel thì KAB có thể giúp Sơn Tùng kết xù rồi!

[ketxu 2.984]

Hochoaivandot mới download ứng dụng của ketxu về, chưa dùng được nhiều nên không góp ý được nhiều ngoài vài điều sau:

 

1. Đường dẫn lưu file ketxu mặc định là đường dẫn lưu bản vẽ hiền thời \\ đường dẫn nhập....Cái này mình thấy không hợp lý lắm. Không nên luôn luôn là như vậy. Chẳng hạn mình làm ở công ty, tấc cả làm qua mạng Lan, còn file Backup thì mình muốn lưu trên máy của mình --->Không biết làm thế nào.

Nếu ý kiến 1 ketxu đồng ý thì mình đề xuất thêm ý 2 sau:

2. Nên cho thêm 1 button đằng sau edit_box để người dùng Chọn Button rồi chọn đến đường dẫn (Chứ nhiều đường dẫn dài cả mấy cây số ngồi type cũng ná thở)

3. Đúng như bạn Doan Van Ha đã phản ánh, lần đầu tiên dùng lệnh KABS thì tên đường dẫn + bản vẽ, thời gian không được mặc định hiển thị trên edit_box (Cái này nếu không sửa thấy không trực quan lắm). Mình dùng Win7+Cad2007 có phải là lý do nó ko chịu cho mình thấy không nhỉ??? ;)

4. Phải công nhận KAB là ý tưởng quá hay. Sau khi hoàn thiện phần AutoDel thì KAB có thể giúp Sơn Tùng kết xù rồi!

Chào bác Học hoài, thực ra sau khi post bản đầu ket thấy không mấy ai hứng thú lắm, nên định tà tà update tự sướng :)

Về các vấn đề bác góp ý thì :

1,2 . Cái này đã có trong dự kiến mà Ket đã nêu, nhưng để thực hiện vấn đề này, ket phải hoàn thiện nguyên tắc ghi file, Log, manager trước, vì để chung trong 1 thư mục sẽ dẫn tới nhiều file ở khắp các nơi có thể có tên giống nhau, cho vào đó thì cần chương trình Pro hơn ^^

3. Có thể là do bản vẽ đó Chưa từng được lưu (DWGTITLED), nên chưa lấy được Name file và Base Path. Và nếu như thế, sau lần đầu, chương trình sẽ lưu vào Document (thường là mặc định của CAD) => có thể dính vào cái P/S ket để ở bài đầu tiên ^^

4. :) Chắc là lâu lâu lâu lâu nữa ^^

 

P/S : Các vấn đề trên đây sẽ được giải quyết dễ dàng hơn rất nhiều với Net, tuy nhiên, Ketxu đang học DCL, coi như là 1 bài tập lớn lớn ^^

[ketxu 2.984]

Ôi để lăn lóc hoài mà không mấy ai ngó ngàng đến ^^

Thôi đã chơi thì chơi cho tới, cuối tuần lại bận bịu đổ Bê tông, nên hôm nay Ket up thêm 1 chức năng nữa, dành cho những ai hứng thú ^^

Mới : Gán chức năng lưu backup vào lệnh Qsave

(tức sẽ lưu 1 bản vẽ backup khi sử dụng lệnh Qsave hoặc Ctrl S)

Kab v1.1

[Doan Van Ha 3.191]

Ôi để lăn lóc hoài mà không mấy ai ngó ngàng đến ^^

Thôi đã chơi thì chơi cho tới, cuối tuần lại bận bịu đổ Bê tông, nên hôm nay Ket up thêm 1 chức năng nữa, dành cho những ai hứng thú ^^

Mới : Gán chức năng lưu backup vào lệnh Qsave

(tức sẽ lưu 1 bản vẽ backup khi sử dụng lệnh Qsave hoặc Ctrl S)

Kab v1.1

Đã "Gán vào lệnh Qsave" thì "Theo thời gian", tức số 10, phải "mờ" đi chứ Ket?

Với lại: thuốc này chống chỉ định nhiều quá nên sợ ngộ độc. Hì, Hì, Hì.

[ketxu 2.984]

Đã "Gán vào lệnh Qsave" thì "Theo thời gian", tức số 10, phải "mờ" đi chứ Ket?

Viềng, e đã tiếp thu và sẽ cho vào ngay ^^

 

P/S : đã sửa lại 1 chút giao diện theo góp ý của bác ĐVH.

Chúc mọi người ngủ ngon ^^

[thanhduan2407 272]

Viềng, e đã tiếp thu và sẽ cho vào ngay ^^

 

P/S : đã sửa lại 1 chút giao diện theo góp ý của bác ĐVH.

Chúc mọi người ngủ ngon ^^

Vote cho Ketxu cái nào. Ý tưởng hay mà bây giờ anh mới đọc. Đi trực đổ bê tông mà cũng nghĩ tạo DCL hả? Hee, thanks cho cái nè. Hiii.

[Detailing 281]

Viềng, e đã tiếp thu và sẽ cho vào ngay ^^

 

P/S : đã sửa lại 1 chút giao diện theo góp ý của bác ĐVH.

Chúc mọi người ngủ ngon ^^

Có ý kiến chút mặc dù chưa xài thử

Nếu đã backup thì phải backup nhiều lần (user tự nhập số lượng) drw.001, drw.002, drw.003, ...

giả sử mình chọn 3 file backup thì khi sinh ra cái 004 nó tự xóa 001 đi, khi nào hết thì quay lại từ đầu.

Xem tính năng backup của Revit để tìm hiểu thêm

Thân!

 

 

[ketxu 2.984]

@Detail : mình không dùng Revit nên chưa biết, cám ơn bạn đã góp ý ( ý tưởng bạn nêu mình đã lập sơ đồ ngay từ đầu, tuy nhiên, vì cần phải giải quyết vấn đề nhiều phiên làm việc + quy luật đặt tên thay đổi nên chưa đưa vào ) hề hề. Vì ít người máu nên Ketxu chưa nghiên cứu thêm, lú nào vui vui thì update thêm 1 tính năng thôi

P/S : "có ý kiến mặc dù chưa xài thử " có thể hem cần nói cũng được mà ^^

[ketxu 2.984]

Lại 1 tuần nữa trôi qua... Tuần này Ket update thêm 1 tính năng nữa cho KAB, để đề phòng có người không thích gán vào lệnh Qsave, mà thích lệnh riêng ^^ Các góp ý của các bác tuy Ket rất háu làm, nhưng tài năng có hạn, nên đành phải từ từ :(

 

Mới : Update chức năng cho phép gán KAB vào lệnh bất kì, kể cả Known lẫn Unknown command (không bao gồm các lệnh từ Lisp).

Các lệnh cách nhau bởi dấu "," .

Chúc các bác 1 tuần mới vui vẻ :wub: Một lần nữa cám ơn các bác đã dùng thử và góp ý :)

 

 

Kab v1.2

[victor85 10]

Lại 1 tuần nữa trôi qua... Tuần này Ket update thêm 1 tính năng nữa cho KAB, để đề phòng có người không thích gán vào lệnh Qsave, mà thích lệnh riêng ^^ Các góp ý của các bác tuy Ket rất háu làm, nhưng tài năng có hạn, nên đành phải từ từ :(

 

Mới : Update chức năng cho phép gán KAB vào lệnh bất kì, kể cả Known lẫn Unknown command (không bao gồm các lệnh từ Lisp).

Các lệnh cách nhau bởi dấu "," .

Chúc các bác 1 tuần mới vui vẻ :wub: Một lần nữa cám ơn các bác đã dùng thử và góp ý :)

 

 

Kab v1.2

 

Cảm ơn bác ketxu nhé. Ý tưởng này để phòng thân cho cad rất hay. Tuy nhiên mình có ý góp ý rằng nếu để mặc định đường dẫn là: D/KAB/"TenBanVe"/"1-TenBanVe". Hoặc cái D/KAB có thể cho người dùng chọn mặc định theo tùy người.

Đến khi cần xóa sau khi công việc thực hiện xong Mình chỉ cần vào folder KAB xóa là xong chứ nếu mỗi một đường dẫn backup một folder khi thao tác nhiều bản vẽ sẽ dễ dẫn đến loạn mất. Đôi khi ta xóa thủ công mà có quản lý như vậy cũng sẽ không nhất thiết cần phải auto xóa.

P/s: Chữ K trong KAB là ketxu kìa hè hè. Cứ toàn hiểu thành Kẹt xu nhưng hóa ra là Kết Xù thì phải ;))

[ketxu 2.984]

Mình đang dò dẫm cái pick lấy Folder nên cũng hơi lâu update chức năng ấy ^^ Cũng nói luôn 1 vấn đề đau đầu là nhiều khi tên bản vẽ ở các thư mục khác nhau trùng nhau, mà lại lưu vào cùng 1 chỗ thì cũng....^^

P/S : PS chứ hè ??

[Chiron 94]

Mình đang dò dẫm cái pick lấy Folder nên cũng hơi lâu update chức năng ấy ^^ Cũng nói luôn 1 vấn đề đau đầu là nhiều khi tên bản vẽ ở các thư mục khác nhau trùng nhau, mà lại lưu vào cùng 1 chỗ thì cũng....^^

P/S : PS chứ hè ??

Không biết ket đã hoàn thiện chưa hè? Share lên cho mọi người xài ké. :-)

[thanhtungvnn 2]

Em đang cần cách để chuyển vị trí save file .bak . Không biết vấn đề này đã có ai giải quyết được chưa ạ?