高手指点一下吧!!!关于ADO的(最先回答对的给4分)
Dim con As New Connection
Dim rs As New Recordset
Private Sub BarCodeCtrl1_GotFocus()
End Sub
Private Sub Form_Load()
With con
.Provider = "Microsoft.jet.oledb.3.51"
.ConnectionString = *****************************************
.Open
End With
End Sub
*************************号的地方怎么写???不用DSN的!!不通过任何间接方式直接用ADO连接ACCESS!!
顺便问一句,98有没有ODBC???