[推荐]AutoXlsTable 2.31和Atable42(汉化注册版)下载地址

qijiun

http://geocom.hhcc.net.cn/cgi-bin/ddbread.cgi?db=geoware&anum=84&page=1


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

qijiun

现在我编出来一段了，你能否看看？

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）有问题，不知道怎么能够解决呢：（因为项里边有点，所以不能直接拼写）
谢谢！！