Đến nội dung


Hình ảnh
- - - - -

[Yêu cầu] Lisp tìm tất cả các file cad có chứa đoạn text cho trước


  • Please log in to reply
7 replies to this topic

#1 TRUNGNGAMY

TRUNGNGAMY

    biết lệnh block

  • Members
  • PipPipPipPipPipPip
  • 401 Bài viết
Điểm đánh giá: 91 (tàm tạm)

Đã gửi 14 August 2011 - 04:55 PM

Chào các bạn cadviet.
Mình có yêu cầu nhờ các bạn giúp đỡ. Số là mình có một số file bản vẽ đã in ra giấy nhưng đã bị thất lạc không biết nằm đâu, phiền các bạn viết lisp căn cứ vào nội dung đoạn text có trên bản in (mình sẽ nhập vào nội dung của nó hoặc chọn trên màn hình để tránh TH một số bản cad kg gõ đc tiếng việt trên dòng command) để tìm tra file cad tương ứng (có thể có nhiều file) trong ổ đĩa hay thư mục (kể cả thư mục con) được chọn. Kết qủa có thể lưu đường dẫn vào file hay in ra màn hình text cũng đc.
Cám ơn các bạn
  • 0

#2 thanhduan2407

thanhduan2407

    biết lệnh adcenter

  • Advance Member
  • PipPipPipPipPipPipPip
  • 993 Bài viết
Điểm đánh giá: 223 (khá)

Đã gửi 14 August 2011 - 07:04 PM

Chào các bạn cadviet.
Mình có yêu cầu nhờ các bạn giúp đỡ. Số là mình có một số file bản vẽ đã in ra giấy nhưng đã bị thất lạc không biết nằm đâu, phiền các bạn viết lisp căn cứ vào nội dung đoạn text có trên bản in (mình sẽ nhập vào nội dung của nó hoặc chọn trên màn hình để tránh TH một số bản cad kg gõ đc tiếng việt trên dòng command) để tìm tra file cad tương ứng (có thể có nhiều file) trong ổ đĩa hay thư mục (kể cả thư mục con) được chọn. Kết qủa có thể lưu đường dẫn vào file hay in ra màn hình text cũng đc.
Cám ơn các bạn

Bạn vào google search với cái tên Ava find. Đây là phần mềm tìm kiếm file nhanh nhất, chỉ cần gõ một cái tên là nó ra 1 loạt luôn.
Không chắc có đúng ý bạn không?
P/s: Đừng lợi dụng Cad nhiều quá.
  • 0



Tôi là con kiến bò trên sa mạc kiến thức bao la. Biển học thật rộng lớn







#3 ketxu

ketxu

    Copier - Paster - Editor

  • Moderator
  • PipPipPipPipPipPipPip
  • 5682 Bài viết
Điểm đánh giá: 2605 (tuyệt vời)

Đã gửi 14 August 2011 - 08:34 PM

Bác TNM cần phân biệt chính xác mục tiêu :
Đọc file chỉ gồm CAD hay file khác ?
- Nếu chỉ là CAD có thể nên dùng ObjectDbx để find text, hơn là cách đọc file từng dòng lisp cung cấp
- Nếu gồm cả file type khác : dùng các chương trình e và bác thanhduan247 đã giới thiệu
  • 0

Thành viên nhóm CadMagic.
Mời bạn ghé thăm facebook nhóm - Page viết lisp theo yêu cầu  :
CAD MAGIC


#4 TRUNGNGAMY

TRUNGNGAMY

    biết lệnh block

  • Members
  • PipPipPipPipPipPip
  • 401 Bài viết
Điểm đánh giá: 91 (tàm tạm)

Đã gửi 14 August 2011 - 09:50 PM

Bác TNM cần phân biệt chính xác mục tiêu :
Đọc file chỉ gồm CAD hay file khác ?
- Nếu chỉ là CAD có thể nên dùng ObjectDbx để find text, hơn là cách đọc file từng dòng lisp cung cấp
- Nếu gồm cả file type khác : dùng các chương trình e và bác thanhduan247 đã giới thiệu

-Trên mình đã nói, chỉ tìm trên cad. Còn làm trên file text ketxu đã chỉ rồi. Cám ơn bạn
-Bản vẽ cad đã in ra giấy rồi giờ thất lạc đi. CT phải tìm và mở file cad ra, truy xuất dữ liệu trong đó và so sánh với text đã cho, nếu tìm đc thì thống kê các file cad cùng đường dẫn của nó. Sau đó, căn cứ vào kq mình sẽ mở ra để xác định lại cho đúng với bản đã in.
-ketxu đề cập đến ObjectDbx, mình chưa hiểu nó là gì cả. Mong bạn nói rõ hơn
  • 0

#5 ketxu

ketxu

    Copier - Paster - Editor

  • Moderator
  • PipPipPipPipPipPipPip
  • 5682 Bài viết
Điểm đánh giá: 2605 (tuyệt vời)

Đã gửi 15 August 2011 - 12:43 AM

-ketxu đề cập đến ObjectDbx, mình chưa hiểu nó là gì cả. Mong bạn nói rõ hơn

Nôm na là kỹ thuật thao tác với nhiều bản vẽ mà không phải mở nó ra trên Editor. Với yêu cầu của bác, BFind của Lee-Mac đã làm quá tốt, không việc gì phải viết nữa :) Bác có thể dùng nó để biết Object DBX nó chạy ra sao :)
Bfind v2.0
  • 0

Thành viên nhóm CadMagic.
Mời bạn ghé thăm facebook nhóm - Page viết lisp theo yêu cầu  :
CAD MAGIC


#6 TRUNGNGAMY

TRUNGNGAMY

    biết lệnh block

  • Members
  • PipPipPipPipPipPip
  • 401 Bài viết
Điểm đánh giá: 91 (tàm tạm)

Đã gửi 15 August 2011 - 01:58 AM

Nôm na là kỹ thuật thao tác với nhiều bản vẽ mà không phải mở nó ra trên Editor. Với yêu cầu của bác, BFind của Lee-Mac đã làm quá tốt, không việc gì phải viết nữa :) Bác có thể dùng nó để biết Object DBX nó chạy ra sao :)
Bfind v2.0

Bạn biết được những công cụ thật hữu ích.
Bạn có thể nói sơ qua khả năng mà Object DBX có thể làm được không? Muốn vận dụng nó thì làm thế nào?
Cám ơn bạn rất nhiều.
  • 0

#7 ketxu

ketxu

    Copier - Paster - Editor

  • Moderator
  • PipPipPipPipPipPipPip
  • 5682 Bài viết
Điểm đánh giá: 2605 (tuyệt vời)

Đã gửi 15 August 2011 - 06:51 AM

Bạn biết được những công cụ thật hữu ích.
Bạn có thể nói sơ qua khả năng mà Object DBX có thể làm được không? Muốn vận dụng nó thì làm thế nào?
Cám ơn bạn rất nhiều.

Tóm lại là những công việc Batch Process, làm việc với hàng loạt file mà không muốn mở nó ra trên màn hình vẽ. Code có ở đó rồi, bác hãy xem cách LM gọi nó, chứ giờ bác không nghiên cứu mục này nữa Ket cũng chẳng biết nói thế nào với hiểu biết nông cạn của mình ^_^
  • 0

Thành viên nhóm CadMagic.
Mời bạn ghé thăm facebook nhóm - Page viết lisp theo yêu cầu  :
CAD MAGIC


#8 TRUNGNGAMY

TRUNGNGAMY

    biết lệnh block

  • Members
  • PipPipPipPipPipPip
  • 401 Bài viết
Điểm đánh giá: 91 (tàm tạm)

Đã gửi 15 August 2011 - 10:10 PM

Tóm lại là những công việc Batch Process, làm việc với hàng loạt file mà không muốn mở nó ra trên màn hình vẽ. Code có ở đó rồi, bác hãy xem cách LM gọi nó, chứ giờ bác không nghiên cứu mục này nữa Ket cũng chẳng biết nói thế nào với hiểu biết nông cạn của mình ^_^

Thực ra mình rất muốn tìm hiểu khả năng can thiệp vào dữ liệu của cad mà không mở nó ra, nhưng do kiến thức hạn chế mình không biết nó nằm ở đâu, muốn nghiên cứu nó thì bắt đầu như thế nào. Trong Lisp bạn gởi thì người lập trình đã sd nó đến mức uyên thâm rồi (mình nghĩ vậy), mình nhìn cũng chưa hiểu gì ngay đc, chắc phải có một số vốn.
Nhưng hình như trước đây mình nghe có người nói autodesk chỉ miễn phí ARX, còn DBX thì có phí, kg biết có phải kg
Mình cũng có nhiều vđ sd chức năng này, hẹn sẽ gặp lại và mong đc sự giúp đỡ của bạn. Xin cám ơn
  • 0