文件名称:VB的ADO连接数据库
文件大小:4KB
文件格式:BAS
更新时间:2014-10-09 10:29:31
数据库 ADO
VB用ADO方式连接数据库的一些操作,如:ACCESS、MS-SQL等 引用ADO库或用ADO控件 Dim txtSQL As String Dim MsgText As String Dim MRC As ADODB.Recordset txtSQL = "SELECT * FROM jobs" Set MRC = ExecuteSQL(txtSQL, MsgText) If Not (MRC.EOF) Then MsgBox MsgText, vbOKOnly + vbExclamation, "提示" Exit Sub End If