Originally Posted by
eriksk
In Visual Studio wordt ditzelfde scherm gebruikt. Dus zal het ook vast wel mogelijk zijn om dit scherm in ASP.NET te gebruiken, toch...?
1) EditConnectionString is in Delphi Win32 een property Editor in een design-time package en dient niet voor runtime gebruik. Het is dus gewoon een Delphi form. Je kan dat 'nabouwen' en gebruiken.
2) Visual Studio is een Win32 applicatie?
3) Met .NET is het mogelijk via Interop (zie code), of eventueel met PInvoke
4) ASP.NET is een ander paar mouwen: waar ga je die connection dialog overigens tonen? Op de server?
Code:
'Toevoegen aan references:
'Microsoft ActiveX Data Objects Library (bij mij 2.8)
'Microsoft OLE DB Service Component Type Library
Private Sub Button1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Button1.Click
Dim DataLink As New MSDASC.DataLinks
Dim AdoConn As New ADODB.Connection
If DataLink.PromptEdit(DirectCast(AdoConn, Object)) Then
MessageBox.Show(AdoConn.ConnectionString)
End If
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Button2.Click
Dim DataLink As New MSDASC.DataLinks
Dim AdoConn As Object = DataLink.PromptNew
If Not AdoConn Is Nothing Then
MessageBox.Show(DirectCast(AdoConn, ADODB.Connection).ConnectionString)
End If
End Sub
Bookmarks