• Home
 · 
• Miscellaneous
 · 
• open data link property window dialog, oledb connection dialog

open data link property window dialog, oledb connection dialog

open data link property window dialog, oledb connection dialog

API Declarations


microsoft ole db service component 1.0 type library
drag 2 command buttons



Rate open data link property window dialog, oledb connection dialog

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Private Sub Command1_Click()

Dim MSDASCObj As MSDASC.DataLinks
Set MSDASCObj = New MSDASC.DataLinks

Set cn = New ADODB.Connection
MSDASCObj.PromptEdit cn
MsgBox cn.ConnectionString
cn.Open
MsgBox "Connection opened successfully"
cn.Close
End Sub
    
Private Sub Command2_Click()
Dim conn As New ADODB.Connection
      Dim dl As New MSDASC.DataLinks

      conn = dl.PromptNew
      Debug.Print conn.ConnectionString
End Sub