Dubbelklik op uw Visual Basic- formulier om het bestand code te openen en plaats het in uw VB -editor . Blader omlaag naar het gedeelte van uw VB- code waar u wilt de database connectie en query- plaatsen. Kopen van 2

Maak uw database connectie . De verbinding variabele bevat de server en database waarmee u verbinding wilt maken . De volgende code maakt een verbinding :

Dim conn
As String = " Data Source = localhost ; Initial Catalog = Noordenwind ; Integrated Security = True "

Dim sqlcon
Zoals SqlConnection = Nieuw SqlConnection ( verb )

sqlcon.Open
( ) op

de " localhost " tekst wordt aangesloten op de lokale computer waarop de website code zich bevindt . Als uw database -server is op een andere computer , voert u de naam van de computer in plaats van " localhost ". Vervang " Northwind " met de naam van uw database .

Query 3 de tafels en de database op te halen . De volgende code laat zien hoe u Access met behulp van de verbinding gemaakt in stap drie bevragen :

Dim variabele
As String = " Miami "

Dim strSelect
As String = " SELECT * FROM Klanten WHERE Stad = ' " & variable & " ' "

Dim dscmd
als Nieuwe SqlDataAdapter ( strSelect , sqlcon )

Dim ds
As New DataSet ( )

dscmd.Fill
( ds , " klanten " ) op

In de bovenstaande code , wordt een query gestuurd naar de Access-database met behulp van de variabele genaamd " variabel . " Deze variabele bevat de stad " Miami . " Deze variabele wordt naar de Access database. De aanvraag wordt doorgestuurd en gehouden in een dataset variabele genaamd " ds . "
4

Print uit de eerste record naar uw nieuwe code te testen . De volgende code drukt de achternaam van de eerste record in de query resultaten :

MsgBox ds.Tables.Item
( " achternaam " ) op Twitter