Article ID: 174921
Article Last Modified on 6/29/2004
Public Property Let CustomerID(ByVal iCustID As String)
'Load the customer data associated with iCustID
End Property
Private Sub lstContact_Click()
Dim CustID As String
'retrieve customer id from the listbox
CustID = lstContact.List(lstContact.ListIndex)
'tell the userdocument to load the customer
brwWebBrowser.Document.CustomerID = CustID
End Sub
Additional query words: PARAMETERS WEBBROWSER VBD kbinternet kbinetdev kbdsi kbDSupport kbVBp kbVBp500 kbVBp600 kbCtrl
Keywords: kbhowto KB174921