hvordan de kan videregive variabler fra Visual Basic til at få adgang forespørgsel

Indlæg af Alice Christensen     opdateret: 2011-10-31

Microsoft Access er en lille database motor, der bruges af begyndere eller for små hjemmesider . Du kan bruge Visual Basic ( VB ) for at forespørge databasen direkte i din kode . Dette er til gavn for dem , der ønsker at levere en dynamisk hjemmeside for deres læsere . At søge i databasen , skal du oprette en forbindelse , sender forespørgslen og tildele resultatet til din egen Visual Basic variabel
1 .
Dobbeltklik på Visual Basic-formular til at åbne filen kode og indlæse det i din VB editor . Rul ned til afsnittet i din VB -koden, hvor du ønsker at placere databasen forbindelsen og forespørgslen.
2 .
Opret din database forbindelse . Forbindelsen variabel indeholder server og database , som du vil tilslutte. Følgende kode opretter en forbindelse :

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

Dim sqlcon Som SqlConnection=Ny SqlConnection ( forb. )
sqlcon. Open ( )

Den " localhost " tekst forbindes til det lokale computer , hvor hjemmesiden koden er placeret . Hvis din database server er på en anden computer , skal du indtaste computerens navn i stedet for " localhost . " Erstat " Northwind " med navnet på din database .
3 .
Query de tabeller og hente dine databaseoplysninger . Følgende kode viser , hvordan du forespørgsel Access ved hjælp af forbindelsen oprettede i trin tre:

Dim variabel As String=" Miami "
Dim strSelect As String=" SELECT * FROM Kunder WHERE City=' " variabel " ' "
Dim dscmd som ny SqlDataAdapter ( strSelect , sqlcon )
Dim ds Som New DataSet ( )
dscmd . Fyld ( ds , " kunder " )

I ovenstående kode , en forespørgsel sendes til Access -databasen ved hjælp af variabel ved navn "variable ". Denne variabel indeholder byen " Miami . " Denne variabel er sendt til Access-database . Forespørgslen er sendt og holdes i et datasæt variabel med navnet " ds . "
4 .
Print ud den første post at teste din nye kode . Følgende kode udskriver efternavnet fra den første rekord i forespørgslen resultater:

MsgBox ds. Tables. Item ( " Last_Name " )


Previous:hvordan man kan læse xls -fil vb Next:hvordan man åbner en postsættet



 

Kommentarer

Code:
change