Wie ODBC DSN auf VBNET Löschen

Mitglieder-Login

InformationenVisual Basics Programmierung

Wie Course & Distance in VB berechn… Der Abstand und natürlich zwischen zwei Punkten auf einer Kugel kann anhand von zwei Formeln werden.
Wie VBScript Installieren Wenn Sie Visual Basic Script ( VBScript) ausführen möchten, dann müssen Sie Internet Explorer verwen
DirectX Visual Basic Tutorial Vor der Gründung von DirectX , war die Visual Basic-Umgebung nicht in der Lage, leistungsstarke graf
Was ist ein VB.NET Import ? Visual Basic Import wird der Prozess von Verweisen auf eine Code-Bibliothek , die nicht lokal verf

Programming

HOME

* Computer Wissen >> Programming >> Visual Basics Programmierung >> .

Wie ODBC DSN auf VBNET Löschen

Löschen einer ODBC Data Source Name ( DSN) mit Visual Basic.NET ( VB.NET) können Sie Ihre Anwendung robuster , durch die nicht der Benutzer die DSN manuell löschen. Sie können die " SQLConfigDataSource " hinzufügen, ändern oder löschen einen DSN . Ein DSN ist ein symbolischer Name, der die ODBC-Verbindung zu einer Datenquelle darstellt. Es speichert die Verbindungsdaten wie eine Datenbank , Verzeichnis oder Datenbank-Treiber , wenn Sie die Verbindung zum ODBC. Entfernen eines DSN Form dem Computer des Benutzers , wenn der DSN nicht mehr benötigt wird . Things You
Microsoft Visual Studio
brauchen anzeigen Weitere Anweisungen
1

Starten Sie Microsoft Visual Studio , klicken Sie auf "Neues Projekt" aus dem linken Fenster von Ihrem Computer-Bildschirm , dann erweitern " Visual Basic " unter " Installierte Vorlagen . " Klicken Sie "Windows " und doppelklicken Sie auf "Console Application" aus der Mitte des Fensters , um eine neue Konsole Projekt zu erstellen.
2

Kopieren Sie den folgenden Code oben "Sub Main" zu erklären, die " SQLConfigDataSource "-Funktion und andere Variablen, die Sie verwenden, um die DSN löscht :

private Declare Function SQLConfigDataSource Lib" ODBCCP32.DLL "_

(ByVal hwndParent As Integer , ByVal ByValfRequest As Integer , ByVal lpszDriver As String , ByVal lpszAttributes As String ) As Integer

private Const vbAPINull As Integer = 0

private Const ODBC_REMOVE_SYS_DSN = 3
3

Kopieren und Einfügen Mit dem folgenden Code auf Ihre DSN entfernen:

Dim Ergebnis As Integer Dim

Treiber As String Dim

Attribute As String

Driver = "SQL Server"

Attribute = " SERVER = " & Chr (0)

Attribute Attribute = & "Description = " & Chr (0)
< p > Attribute Attribute = & " DSN = " & Chr (0)

Attribute Attribute = & " DATABASE = " & Chr (0)

result = SQLConfigDataSource ( vbAPINull , ODBC_REMOVE_SYS_DSN , Berufsfahrer, Attribute )

Wenn Ergebnis < > 0 Then

MsgBox ( "DSN gelöscht! " )

Else

MsgBox (" Löschen DSN Failed" ) End If

bearbeiten Sie die Attribute im vorherigen Schritt und geben Sie den Namen des Servers , DSN Beschreibung, DSN-Namen , und Datenbank- Namen. Drücken Sie F5, um das Programm ausführen und löschen Sie Ihre DSN .