Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Spustite program Microsoft Visual Basic Express a kliknite na tlačidlo " Nový projekt ... " na ľavom paneli obrazovky . Double - kliknite na " Aplikácia konzoly . "
2
Stlačte tlačidlo " Ctrl " a " A " , potom stlačte tlačidlo " Delete " odstrániť existujúci kód .
3
skopírujte a vložte nasledujúci kód do modulu " Module1.vb " . Kód sa pripojiť k databáze pomocou DSN , potom dotaz na tabuľku a zobrazí obsah tabuľky pomocou okne so správou .
Dovoz System.Data.Odbc.OdbcConnection
Module Module1
Sub Main ( )
Dim rstCntr As Integer
Dim Conn Ako Odbc.OdbcConnection
Conn = Nové Odbc.OdbcConnection ( " DSN = TRA3 " )
conn.Open ( )
Dim da As New Odbc.OdbcDataAdapter ( " SELECT * FROM TESTER_INFO TESTER_INFO ; . " , Conn )
Dim ds As New Data.DataSet
da.Fill ( ds )
rstCntr = 0 K ds.Tables ( 0 ) Rows.Count . - = Nothing
End Sub End Module
4
upravte nasledujúci riadok kódu a typu svoje meno DSN :
Conn = new Odbc.OdbcConnection ( " DSN = TRA3 " )
Upraviť nasledujúci riadok kódu a zadajte výberový dotaz : .
Dim da As New Odbc.OdbcDataAdapter ( " SELECT * FROM TESTER_INFO TESTER_INFO ; " , Conn )
5
Stlačte " F5 " pre spustenie programu VB.NET .