har viden til at oprette og bruge et ADO -forbindelse til SQL Server kan spare dig tid, når du har brug for at forespørge data fra en database. SQL Server er en relationel database management system der almindeligvis anvendes til at skabe store databaser til rådighed for flere brugere i flere forskellige steder . Du kan bruge ADO forbindelser i flere programmeringssprog , og dette eksempel bruger Microsoft Visual Basic.NET . VB.NET er et objekt -orienteret programmeringssprog, der er relativt let at lære og bruge . Ting du skal
Microsoft Visual Basic Express & Microsoft SQL Server
Vis Flere Instruktioner
1

Åbn Microsoft Visual C # Express og vælg " Nyt projekt ... " fra venstre rude på skærmen. Klik på " Visual Basic " under " Installerede skabeloner " dobbeltklik på " Windows Forms Application ".
2

Klik på " Toolbox" rude og dobbeltklik på " Button " for at tilføje en ny knap til din formular . Klik på " Project" -menuen og vælg " Egenskaber". Klik på " Referencer " og derefter vælge "Tilføj". Vælg " COM" og klik på " " Microsoft ActiveX Data Objects Library " ." Klik på "OK".
3

Dobbeltklik på " Button1 " for at åbne " Form1.vb "-modulet . Indtast følgende i den allerførste linje over "Public Class Form1 " : Hej

Import ADODB
4

Skriv følgende at erklære dine variabler nedenfor " Button1_Click " : Hej

Dim con As New ADODB.Connection

Dim rst As New ADODB.Recordset

Dim sXMLResult As String
5

Skriv følgende for at åbne forbindelsen til din SQL Server-database : Hej

con.ConnectionString = " Provider = SQLNCLI10 , " _

& " server = navnet på din server , " _

& " database = din database navn ; "_

&" Integrated Security = SSPI , "_

&" DataTypeCompatibility = 80; "_

&" MARS Connection = false; "
< p> con.Open ()
6

Skriv følgende at forespørge en SQL Server database tabel : Hej

rst.ActiveConnection = con

rst = con.Execute ( " SELECT tableName.fieldName FROM tabelnavn ," )
7

Skriv følgende at sløjfe gennem alle poster i tabellen : Hej

( Ikke rst.EOF )

sXMLResult = rst.Fields ( " Feltnavn "). Value

MsgBox ( sXMLResult )

rst.MoveNext ()

End Mens
8

Skriv følgende for at lukke forbindelsen og frigivelse variabel fra hukommelsen : Hej

con.Close ()

con = Nothing

Tryk på " F5 " for at køre dit program klik derefter på " Button1 . "