Hej en liten fundering. referens:Att ändra custom properties i Adodc (MS ADO Data Ctrl 6.0) i runtime
Man kan ju bygga en connectionstring genom att i listan för egenskaper klicka på custom och sedan på knappen build så startar en wizard för att bygga en connectionstring.
Min fundering är nu. Kan jag starta denna wizard från mitt program och hur gör jag det.
Grejjen är att jag tänkte slippa göra en egen wizard för detta. Eftersom jag ändå använder ADODB så skulle detta spara tid åt mig i projektet.
Jag vet inte heller om det finns några upphovsrättsliga aspekter i att göra så här i den mån det går att göra så.
Hoppas någon har ett svar.
/peterhSv: Att ändra custom properties i Adodc (MS ADO Data Ctrl 6.0) i runtime
Microsoft OLE DB Service component 1.0 type library
<code>
--form1
Option Explicit
Dim cn As New ADODB.Connection
Dim dataLink As New MSDASC.DataLinks
Private Sub cmdEdit_Click()
If dataLink.PromptEdit(cn) Then
MsgBox cn.ConnectionString
Else
MsgBox "Operation canceled"
End If
End Sub
Private Sub cmdNew_Click()
Dim connString As String
dataLink.hWnd = Me.hWnd
On Error Resume Next
connString = dataLink.PromptNew
If Err = 0 Then
cn.ConnectionString = connString
Else
'canceled
End If
txtCnString.Text = "cnstring = """ & connString & """"
End Sub
</code>