May 23
Eliminazione di un nome di origine dati ODBC (DSN) utilizzando Visual Basic.NET (VB.NET) può rendere l'applicazione più robusto, non richiedendo all'utente di eliminare il DSN manualmente. È possibile utilizzare il "SQLConfigDataSource" per aggiungere, modificare o eliminare un DSN. Un DSN è un nome simbolico che rappresenta la connessione ODBC a un'origine dati. Memorizza i dettagli della connessione, ad esempio un nome di database, directory o driver del database quando si effettua il collegamento con il ODBC. Rimuovere un DSN forma computer dell'utente quando non è più necessario il DSN.
1 Avviare Microsoft Visual Studio, fare clic su "New Project" dal riquadro sinistro dello schermo del computer, quindi espandere "Visual Basic" sotto "Modelli installati." Fai clic su "Windows" e fare doppio clic su "Applicazione Console" dal centro della finestra per creare un nuovo progetto di console.
2 Copiare e incollare il seguente codice sopra "Sub Main" per dichiarare la funzione "SQLConfigDataSource" e altre variabili che si utilizzeranno per eliminare il DSN:
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 Copiare e incollare il seguente codice per rimuovere il DSN:
Dim result As Integer
Autista Dim As String
Attributi Dim come stringa
Driver = "SQL Server"
Attributi = "server = & lt; nome server>" & Chr (0)
Attributi = Attributi & "DESCRIZIONE = & lt; Descrizione DSN>" & Chr (0)
Attributi = Attributi & "DSN = & lt; nome DSN>" & Chr (0)
Attributi = Attributi & "DATABASE = & lt; il nome del database>" & Chr (0)
risultato = SQLConfigDataSource (vbAPINull, ODBC_REMOVE_SYS_DSN, Autista, attributi)
Se il risultato & lt;> 0 Then
MsgBox ( "DSN CANCELLATO!")
Altro
MsgBox ( "eliminazione DSN non riuscita")
Finisci se
4 Modificare gli attributi nel passaggio precedente e digitare il nome del server, descrizione DSN, il nome DSN e il nome del database. Premere F5 per eseguire il programma ed eliminare il DSN.