也是很基础的问题

q3_2006 · 发表于 2014-4-12 11:22:40

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要登录才可以下载或查看，没有账号？立即注册

×

(load "d:\\lsp\\xx.lsp")
->
"(load \"d:\\\\lsp\\\\xx.lsp\")"

怎么写呀....杠杠搞得我都晕了....{:soso_e127:}

q3_2006 · 发表于 2014-4-12 11:31:56

原来都是用EXCEL处理这个,今天想用LISP写.....才发现这几根杠杠就是出不来....

newer · 发表于 2014-4-12 11:36:10

q3_2006 发表于 2014-4-12 11:31
原来都是用EXCEL处理这个,今天想用LISP写.....才发现这几根杠杠就是出不来....

头和尾用"" ,里面的用单引号试试。

ll_j · 发表于 2014-4-12 11:44:54

用"(load \"d:/lsp/xx.lsp\")"试试。

命令: (eval (read "(load \"d:/lsp/xx.lsp\")"))
; 错误: LOAD 失败: "d:/lsp/xx.lsp"

提示正常。

newer · 发表于 2014-4-12 12:00:47

本帖最后由 newer 于 2014-4-12 12:04 编辑

q3_2006 发表于 2014-4-12 11:31
原来都是用EXCEL处理这个,今天想用LISP写.....才发现这几根杠杠就是出不来....

告诉你个技巧，如何字符串很长，你可以用strcat 把隔开的小的字符串给连接成一个整个的，你就容易清楚了。比如：

命令: (setq str (strcat "(load " "\"" "d:/abc/a.lsp" "\"" ")"))
"(load \"d:/abc/a.lsp\")"

命令: (read str)
(LOAD "d:/abc/a.lsp")

命令: (eval (read str))
; 错误: LOAD 失败: "d:/abc/a.lsp"

/db_自贡黄明儒_ · 发表于 2014-4-12 12:42:18

还是用VL-PRIN1-TO-STRING 来帮你加\吧，这样就简单了
如(VL-PRIN1-TO-STRING '(load "d:/lsp/xx.lsp"))

q3_2006 · 发表于 2014-4-12 12:44:15

ll_j 发表于 2014-4-12 11:44
用"(load \"d:/lsp/xx.lsp\")"试试。

命令: (eval (read "(load \"d:/lsp/xx.lsp\")"))

这样就解决了.....谢谢长老...

q3_2006 · 发表于 2014-4-12 12:47:40

/db_自贡黄明儒_ 发表于 2014-4-12 12:42
还是用VL-PRIN1-TO-STRING 来帮你加\吧，这样就简单了
如(VL-PRIN1-TO-STRING '(load "d:/lsp/xx.lsp"))

这个好....重点是要"\\"替换成"/"就是这个弯没转过来....

q3_2006 · 发表于 2014-4-12 12:49:53

newer 发表于 2014-4-12 12:00
告诉你个技巧，如何字符串很长，你可以用strcat 把隔开的小的字符串给连接成一个整个的，你就容易清楚了 ...

我的代码是....(write-line "(load \"d:\\\\lsp\\\\xx.lsp\")" ml)

就是没想到"\\"替换成"/".....笨死了...{:soso_e110:}

newer · 发表于 2014-4-12 13:17:56

q3_2006 发表于 2014-4-12 12:49
我的代码是....(write-line "(load \"d:\\\\lsp\\\\xx.lsp\")" ml)

就是没想到"\\"替换成"/".....笨死 ...

想用\\的话，这个。

命令: (VL-PRIN1-TO-STRING '(load "d:\\lsp\\xx.lsp"))
"(LOAD \"d:\\\\lsp\\\\xx.lsp\")"

账号		自动登录	找回密码
密码			立即注册

[求助] 也是很基础的问题

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

点评

点评

点评

点评

点评