ADO SQL Server Tutorial

ha kunskap för att skapa och använda ett ADO -anslutning till SQL Server kan spara tid när du behöver söka data från en databas . SQL Server är en relationsdatabas management system som vanligen används för att skapa stora databaser tillgängliga för flera användare på flera platser . Du kan använda ADO anslutningar i flera programmeringsspråk , detta exempel använder Microsoft Visual Basic.NET . VB.NET är ett objektorienterat programmeringsspråk som är relativt lätt att lära sig och använda . Saker du behöver
Microsoft Visual Basic Express Review Microsoft SQL Server
Visa fler instruktioner
1

Öppna Microsoft Visual C # Express och välj " Nytt projekt ... " från vänster på skärmen . Klicka på " Visual Basic " under " Installerade mallar " dubbelklicka på " Windows Forms Application . "
2

Klicka på " Verktyg" panelen och dubbelklicka på " knappen " för att lägga till en ny knapp i formuläret . Klicka på " Project " -menyn och välj " Properties " . Klicka på " Referenser " och välj sedan " Lägg till " . Välj " COM " och klicka på " " Microsoft ActiveX Data Objects Library " " . Klicka på " OK . " Addera 3

Dubbelklicka på " Button1 " för att öppna " Form1.vb " modul . Skriv följande i den allra första raden ovanför " public class Form1 " :

Imports adodb
4

Skriv följande för att deklarera dina variabler nedan " Button1_Click " :

Dim con As New ADODB.Connection

Dim rst som New ADODB.Recordset

Dim sXMLResult As String
5

Skriv följande för att öppna anslutningen till SQL Server-databas :

con.ConnectionString = " Provider = SQLNCLI10 ; " _

& " Server = namnet på din server , " _

& " Database = din databas namn , " _

& " Integrated Security = SSPI ; " _

& " DataTypeCompatibility = 80 ; " _

& " MARS Connection = false; "

con.Open ( )
6

Skriv följande för att söka en SQL tabell Server-databas :

rst.ActiveConnection = con

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

Skriv följande för att loopa igenom alla poster i tabellen :

( Not rst.EOF ) katalog

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

MsgBox ( sXMLResult ) katalog

rst.MoveNext ( ) katalog

Slut Medan
8

Skriv följande för att stänga anslutningen och frisättning variabel från minnet :

con.Close ( ) katalog

con = Nothing

Tryck " F5 " för att köra programmet klicka sedan på " Button1 . " Addera