Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Spustite program Microsoft Office Excel . Kliknite na " Developer " kartu nasleduje " Visual Basic " . . Kliknite na menu " Vložiť " a potom " modul " vložiť nový modul
2
Vytvoriť nový čiastkové postup :
Private Sub checkODBC ( )
sims 3
Vytvorte premennej objektu budete používať ku kontrole ovládače ODBC :
Dim adoCNN Ako ADODB.Connection
Dim canConnect As Boolean
Set adoCNN = Nové ADODB.Connection
4
Zadajte názov ODBC , prihlasovacie meno a heslo :
adoCNN.Open " Názov DSN " , " meno " , " heslo "
5
Skontrolujte stav ovládača ODBC :
Ak adoCNN.State = adStateOpen Potom
canConnect = TRUE
adoCNN.Close
End If
6
Zobrazí okno so správou informujúce užívateľa o stave pripojenia ODBC :
Ak canConnect Potom
MsgBox " pripojenie ODBC je pripravený ! "
Else
MsgBox " Pripojenie ODBC nie je pripravený ! "
End If
End Sub
7
Stlačením tlačidla " F5 " spustiť procedúru .