怎样向自写的一个控件中传递类型是对象(如:adodb.Connection对象)的参数?
我自写的一个控件中有一个参数类型是Adodb.connection,在控件中,我是这样写的:
Private m_Connection As Adodb.Connection
Public Property Get Connection() As Adodb.Connection
Connection = m_Connection
End Property
Public Property Let Connection(ByVal vData As Adodb.Connection)
m_Connection = vData
PropertyChanged "Connection"
End Property
Private Sub UserControl_ReadProperties(PropBag As PropertyBag)
m_Connection = PropBag.ReadProperty("Connection")
End Sub
Private Sub UserControl_WriteProperties(PropBag As PropertyBag)
PropBag.WriteProperty "Connection", m_Connection
End Sub
在.asp文件中,
<
dim objConn
set objConn=server.createobject("adodb.connection")
objConn.open "Provider=SQLOLEDB.1;Password=4311582;Persist Security Info=True;User ID=sa;Initial Catalog=lhweb_db;Data Source=LH5"
>
<OBJECT ID="ucWebWord" CLASSID="CLSID:53EFC0E4-9F64-4AEF-8807-D2BFC66883F5" CODEBASE="prjWebWord.CAB#version=1,0,0,0">
<PARAM NAME="Connection" VALUE=<=objConn>>
</OBJECT>
但有问题,我想问一下:怎样把asp中的服务器端的connection对象,传递到控件中?
最好还给源代码!
这符串类型的我知道怎么传递,我想问的是怎么把对象传递到控件中?