have viden om, hvordan man få adgang til flere datakilder ved hjælp af Microsoft Visual Basic.NET kan gøre din ansøgning mere dynamisk. Du kan åbne flere database -forbindelser til at sende kommandoer eller forespørgslen data fra en database tabel. I dette eksempel vil du oprette en Microsoft SQL Server -forbindelse med ActiveX Data Objects ( ADO ) for at søge en database tabel . Du vil også gøre en OLEDB forbindelse til en Microsoft Access-database til at oprette en ny tabel . Du kan bruge ADO og Object Linking and Embedding ( OLEDB ) forbindelser i flere programmeringssprog. I dette eksempel vil du bruge Microsoft Visual Basic.NET . Ting du skal
Microsoft Visual Basic Express & Microsoft SQL Server
Northwind database
Vis Flere Instruktioner
1

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

Klik på " Toolbox" rude og dobbeltklik på " Button " for at tilføje en ny knap til Deres Form . Klik på " Projekt "-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 " :

Import System.Data.OleDb

Import ADODB
4

Skriv følgende under " Button1_Click "for at erklære din OLEDB forbindelse variabler : Hej

Dim oleDBConn Som OleDbConnection

Dim oleDBComm Som OleDbCommand

Dim SQLStr As String
5

Type følgende under " Button1_Click " for at erklære din ADO forbindelse variabler : Hej

Dim AdoCon Som New ADODB.Connection

Dim AdoRst Som New ADODB.Recordset

Dim adoResult As String < br >
6

Skriv følgende for at oprette en ny forbindelse til databasen Northwind : Hej

oleDBConn = Ny OleDbConnection _

( " Provider = Microsoft.ACE.OLEDB.12.0 ; datakilde = C: \\ Northwind 2007.accdb , " ) oleDBConn.Open ()

Edit " Source = C: . \\ Northwind 2007.accdb ", og skrive stien til din Access-database
< br > 7.

Skriv følgende for at oprette en ny ADO forbindelse til din SQL Server-database : Hej

AdoCon.ConnectionString = " Provider = SQLNCLI10 , " _

& " server = din server navn " _

&" database = din database navn, "_

&" Integrated Security = SSPI , "_

&" DataTypeCompatibility = 80; "_ < br >

& " MARS Connection = false; "

AdoCon.Open ()
8

Skriv følgende for at oprette en ny tabel i databasen Northwind : Hej

SQLStr = " CREATE TABLE ThisTable " _

& " ( Fornavn char, EfterNavn CHAR ) "

oleDBComm = Ny OleDbCommand ( SQLStr , oleDBConn )

oleDBComm . ExecuteNonQuery ()

oleDBConn.Close ()
9

Skriv følgende at forespørge en tabel i din SQL server : Hej

AdoRst.ActiveConnection = AdoCon < br >

AdoRst = AdoCon.Execute ( "SELECT tableName.fieldName FROM tabelnavn ," )

Skriv følgende at sløjfe gennem forespørgslen resultater og vise dem gennem en besked boks : Hej

( Ikke AdoRst.EOF )

adoResult = AdoRst.Fields ( " Feltnavn "). Value

MsgBox ( adoResult )

AdoRst.MoveNext ()
< p > Slut Mens

AdoCon.Close ()

AdoCon = Nothing

Tryk på " F5 " for at køre dit program og derefter klikke på " Button1 ".
< br >