我尝试对dir执行以下命令：
(command "dir" " C:\\000-lisp--3-1 /b/oN/A-H *.LSP > C:\\000-lisp--3-1\\uu(LSP).txt")
但没有操作wello：）
尝试
(setq x (strcat "(load " (chr 34) "C:\\000-lisp1\\"x (chr 34) " " (chr 34) "MyLISP Failed to Load" (chr 34)")")
亨里克 嗨BIGAL
我试过这个：
(command "dir" " C:\\000-lisp-93-3-1 /b/oN/A-H *.LSP > C:\\000-lisp-93-3-1\\uu(LSP).txt")
但是做得不好，这段代码有什么问题吗？？
我检查了例行程序，但不幸的是做得不好，你的修改意味着我必须用（chr 34）替换“内部” 尝试
(setq x (strcat "(load " (chr 34) "C:/000-lisp1/"x (chr 34) " " (chr 34) "MyLISP Failed to Load" (chr 34)")")
HTH公司
亨里克 hmsilva公司
我试过了，但还是有问题。。此时，我将routin分为两个单独的选项：
1- i change " to www string character .
2-now code change to ::(setq x (strcat "(load WWWC:\\000-lisp-93-3-1\\" x " WWW WWWMyLISP Failed to LoadWWW)")
3-and operate the fierst lisp
4-the second lisp for replacingWWW--->> "and\ ----->> \\
现在一切正常，直到第3项，我需要在文件中查找和替换www和\的lisp代码，然后依次运行lisp 1和2。 现在，我感到困惑。。。
你能解释一下你想做什么吗。
为什么你需要WWW，然后把它修改成“？
亨里克 因为：
(setq x (strcat "(load " (chr 34) "C:/000-lisp1/"x (chr 34) " " (chr 34) "MyLISP Failed to Load" (chr 34)")")
而且做得不好。
为了得到模块化的两个任务，我将其分为两部分：
1-1 lisp表示前缀和后缀
2-另一个查找和替换
我在上面试过（把“改为www”），一切都很好。
当lisp与几个“i change internal”不匹配时，在为每行添加前缀和后缀后，我再次从www更改为“ 我问的是你想写什么，a。lsp，或。scr加载目录中的所有文件？ 一lsp
事实上，我的想法是：
我在特定目录中有lisp文件，每次我添加新的lisp文件进行测试时
我有一个bat文件，用于将这些文件的名称与以下文件合并到一个文件中：
(command "dir" " /b/oN/A-H *.LSP >uu(LSP).LSP")
在这之后，我把每一行都换成
(load "C:\\lsp--------hlsp\\80----DynOff---DIN OFFSET-----DynOffV2-1.lsp" "MyLISP Failed to Load")
(load "C:\\lsp--------hlsp\\80----trim.lsp" "MyLISP Failed to Load")
(load "C:\\lsp--------hlsp\\80----ctyu.lsp" "MyLISP Failed to Load")
and more file here..........................
使用一个命令，嵌入目录中的每个文件自动加载到cad：）
有更好的方法吗？
页:
1
[2]