[求助]：高手请进！！！

qijiun

小弟现在遇到一个问题
我现在在制作CAD外挂的安装程序，需要自动将autoCAD下的acad××doc.lsp文件用我自己编写的lsp程序覆盖，请问如何通过*.bat和VB得到解决？谢谢了，急！！！！

aeo

我觉得自做主张覆盖不好。
只要把你的目录，放到路径的第一个就可以达到目的.

qijiun

我想其实也可以在文件后边追加写入，那是后话，现在我急需先把安装程序做出来，我想这个是最快的方法了，所以才采用的
我想过程大概是这样的:先通过VB找到cad的AcadLocation键值,然后将lsp的文件名全路径表示出来,再通过VB的shell功能或者打开文件进行追加实现我的目的,请问能否提供VB的代码,我由于对VB和注册表的操作不熟悉,现在很急,只知道可以利用API实现这些东西,还望高手赐教,我的邮箱qijiun@etang.com,3ks a lot!!
现在我编出来一段了，你能否看看？

Private Sub Form_Load()
Form1.Hide
Dim Temp As String
Dim File(1) As String
Dim Ver As String
Dim Path(1) As String
Dim Nkeyhandle As Long, Nvaluetype As Long, Nlength As Long
Dim objFSO As FileSystemObject
Dim objText As TextStream

Path(0) = "HKEY_LOCAL_MACHINE\SOFTWARE\Autodesk\AutoCAD\R15.0"
Path(1) = "HKEY_LOCAL_MACHINE\SOFTWARE\Autodesk\AutoCAD\R16.0\ACAD-201:804"
Call RegOpenKey(Path(0), "curver", Nkeyhandle)
Call RegQueryValueEx(Nkeyhandle, "curver", 0, Nvaluetype, Ver, Nlength)
Path(0) = Path(0) + "\" + Ver
里边Call RegOpenKey里的path（0）有问题，不知道怎么能够解决呢：（因为项里边有点，所以不能直接拼写）
谢谢！！