求助高手 很早开发的一个项目 VB com+ 组件 客户端无法访问到server 端的dll (有代码 )
Public Function ConnGetRecordSetBySql(ByVal SQL As String) As ADODB.RecordsetOn Error GoTo ERROR 'U0038 add
Set Conn = Nothing
' MsgBox "New Getrecordset" 'test
Set Conn = New GetRecordSet.clsMain 'V0028 Mark 'V0029 unmark
' MsgBox "Set Getrecordset" 'test
Set ConnGetRecordSetBySql = Conn.GetRecordSetBySql(SQL)
' MsgBox "Set Getrecordset Ok" 'test
Set Conn = Nothing
Exit Function
ERROR:
MsgBox Err.Number & Err.Description
End Function
问题就出在 Set Conn = New GetRecordSet.clsMain 这句话上, GetRecordSet.clsMain 是注册在server上的,com+组件引用的 GetRecordSet的dll。 原来没做过的com+的项目,现在有点代码反而卡在这里,请帮帮忙。。
学习 upupupupupupupupupupupupupupupupupup 不懂,up GetRecordSet 要在本机注册
Set Conn = CreateObject("GetRecordSet.clsMain", "192.168.1.3") '服务端的IP
参考
VB6企业版中提供的范例,一个标准的三层分布式应用
你可以在 BV6安装目录\MSDN98\98VS\2052\SAMPLES\VB98\misc\booksale 找到
远端的DLL需要在本地注册。 misc\booksale
我连这个目录都没有
可以把这个例子发给我一下吗?
邮箱:86150302@qq.com 远端布署太麻烦.
建议改掉吧. 恩 现在解决了 GetRecordSet 本地是需要注册的 不然没法调用 我这个问题应该是系统账户的权限问题。。。
补充:VB , COM/DCOM/COM+