Created for reference use in Visual Basic. Provides implementation for the promptNew and promptEdit methods.




The parent window handle for the dialog box to be displayed in.


Returns a Boolean value: true if the OK button was pressed on the dialog box; false if Cancel was pressed.


Displays the Data Link Properties window in its wizard mode. Returns a connection string.

Dim strConn as String
Dim objDataLinks as DataLinks
Dim bolStatus as Boolean
Dim cnn as ADODB.Connection

Set cnn = New ADODB.Connecton
Set objDataLinks = New Datalinks

' Get user's first settings for the connection.

StrConn = ObjDataLink.PromptNew

' Assign the settings to the connection object.

cnn.ConnectionString = strConn

' Display connection properties for editing.

bolStatus = objDataLinks.PromptEdit(cnn)
If bolStatus = False Then
   MsgBox("Changes were canceled")
   MsgBox("New settings are: " & cnn.ConnectionString)
End If

Set objDataLinks = Nothing
Set cnn = Nothing

To create a reference to IDataSourceLocator in Visual Basic

  • From the Project menu, select References. The References dialog box appears, listing the available references. Select the Microsoft OLE DB Service Component 1.0 Type Library check box.

This topic is a part of: