xspichx 发表于 2022-7-6 08:45:56

要从中导入块的lisp。反恐精英

我有一个客户谁有超过1000个csv文件,每个文件包含x,y,z和块名。每个csv代表一种块类型。有没有一种方法可以使用lisp自动导入这些内容,而无需手动一次导入一个?我附上了一个带有相应dwg的示例csv。
dga。txt文件
混凝土边缘1。txt文件
消防栓。txt文件
发现txt文件
未铺面车道边缘。txt文件
边缘沥青。txt文件
涵洞。txt文件
混凝土边缘。txt文件
2DA9082D 10-20 AL.dwg

ReMark 发表于 2022-7-6 09:13:49

看看论坛成员李·麦克的积分经理v2-4。lsp在此处找到。。。。http://lee-mac.com/ptmanager.html
 
也许这对你有点用处。至少我希望如此。

xspichx 发表于 2022-7-6 09:20:37

这就是我目前正在使用的。但我一次只能导入一个csv。我想知道是否有什么方法可以批量导入。

ReMark 发表于 2022-7-6 09:43:24

我建议派一个PM给李·麦克,要求他定制,但不要期望白手起家。至少提出赔偿。

BIGAL 发表于 2022-7-6 09:57:36

第一步是编写一个合并文件,使其成为一个包含所有块的大文件,然后点管理器将工作
 
写文件并不难,你有一个附加选项,只需从每个文件中读取一行并附加到主文件中,就可以一次性使用李·麦克的程序。
 
有多种方法可以使TXT文件列表变得最简单,如下所示:开始运行CMD cd,将您的TXT文件放入目录*。TXT>lsttxt/b您现在有了一个文本文件列表。另一种方法是使用findfile。
 
未试验过

(setq fout (open allpts "a"))
(setq fo (open lsttxt "r"))
(while (setq new_line (read-line fo))
(setq fo2 (open new_line "r"))
(setq new_line2 (read-line fo2))
(write-line new_line2 fout)
(close fo2)
)
页: [1]
查看完整版本: 要从中导入块的lisp。反恐精英