注册键根未知

dcl1214

(defun c:hh()
(setq f(open "F:\昌立线束软件/gx.reg" "W"))
(write-line "Windows Registry Editor Version 5.00" f)
(write-line "" f)
   (write-line "[HKEY_CURRENT_USER\\Software\\Autodesk\\AutoCAD\\R17.1\\ACAD-6001:804\\Profiles\\<<未命名配置>>\\Dialogs\\Appload\\Startup]" f)
   ;(write-line "\"forceguest\"=dword:00000000" f)
(write-line "\"NumStartup\"=\"2\"" f)
   (write-line "\"1Startup\"=\"F:\\\\昌立线束软件[url=]\\\\bom.lsp\[/url]"" f)
   (write-line "\"2Startup\"=\"F:\\\\昌立线束软件[url=]\\\\EF_Library.lsp\[/url]"" f)
   (write-line "" f)
  
   
   
   (close f)
  (vl-registry-write "HKEY_CURRENT_USER\Software\Autodesk\AutoCAD\R17.1\ACAD-6001:804\Profiles\<<未命名配置>>\Dialogs\Appload\Startup" "forceguest" 0)
;(startapp "regedit.exe" "gx.reg")
)


执行这个代码的时候提示：注册键根未知
请各位大师帮我看看问题出在什么地方了

Andyhon

不确定合汝原意...

2. 
   
3. (defun c:hh ()
   
4.   (setq f (open "F:\昌立线束软件/gx.reg" "W"))
   
5.   (write-line "Windows Registry Editor Version 5.00" f)
   
6.   (write-line "" f)
   
7.   (write-line
   
8.     "[HKEY_CURRENT_USER\\Software\\Autodesk\\AutoCAD\\R17.1\\ACAD-6001:804\\Profiles\\<<未命名配置>>\\Dialogs\\Appload\\Startup]"
   
9.     f
   
10.   )
    
11.   ;; (write-line ""forceguest"=dword:00000000" f)
    
12.   (write-line ""NumStartup"="2"" f)
    
13.   (write-line
    
14.     ""1Startup"="F:\\\\昌立线束软件[url=]\\\\bom.lsp\[/url]""
    
15.     f
    
16.   )
    
17.   (write-line
    
18.     ""2Startup"="F:\\\\昌立线束软件[url=]\\\\EF_Library.lsp\[/url]""
    
19.     f
    
20.   )
    
21.   (write-line "" f)
    
22. 
    
23.   (close f)
    
24.   (vl-registry-write
    
25.     "HKEY_CURRENT_USER\Software\Autodesk\AutoCAD\R17.1\ACAD-6001:804\Profiles\<<未命名配置>>\Dialogs\Appload\Startup"
    
26.     "forceguest"
    
27.     0
    
28.   )
    
29.   ;; (startapp "regedit.exe" "gx.reg")
    
30. )
    

<br /> (defun c:hh ()<br />   (setq f (open "F:\昌立线束软件/gx.reg" "W"))<br />   (write-line "Windows Registry Editor Version 5.00" f)<br />   (write-line "" f)<br />   (write-line<br />     "[HKEY_CURRENT_USER\\Software\\Autodesk\\AutoCAD\\R17.1\\ACAD-6001:804\\Profiles\\<<未命名配置>>\\Dialogs\\Appload\\Startup]"<br />     f<br />   )<br />   ;; (write-line ""forceguest"=dword:00000000" f)<br />   (write-line ""NumStartup"="2"" f)<br />   (write-line<br />     ""1Startup"="F:\\\\昌立线束软件[url=]\\\\bom.lsp\[/url]""<br />     f<br />   )<br />   (write-line<br />     ""2Startup"="F:\\\\昌立线束软件[url=]\\\\EF_Library.lsp\[/url]""<br />     f<br />   )<br />   (write-line "" f)<br /> <br />   (close f)<br />   (vl-registry-write<br />     "HKEY_CURRENT_USER\Software\Autodesk\AutoCAD\R17.1\ACAD-6001:804\Profiles\<<未命名配置>>\Dialogs\Appload\Startup"<br />     "forceguest"<br />     0<br />   )<br />   ;; (startapp "regedit.exe" "gx.reg")<br /> )<br />

dcl1214

Andyhon 发表于 2012-9-29 15:17
不确定合汝原意...

谢谢大哥！！我测试一下

dcl1214

dcl1214 发表于 2012-9-29 15:19
谢谢大哥！！我测试一下

命令: hh
; 错误: 注册键根未知:
"HKEY_CURRENT_USERSoftwareAutodeskAutoCADR17.1ACAD-6001:804Profiles<<未命名配置>>Dial
ogsApploadStartup"
命令:



还是这个提示啊

Andyhon

Ref:
http://thatcadguy.blogspot.tw/20 ... tocads-startup.html