databasesql.bas

来自「VB+SQL的图书管理程序,上传一个有用的东西,绝对用得上的」· BAS 代码 · 共 16 行

Attribute VB_Name = "databaseSQL"
Option Explicit

Public cnn As New ADODB.Connection
Public cnn1 As New ADODB.Connection

Public qy1 As New ADODB.Recordset
Public qy2 As New ADODB.Recordset
Public qy3 As New ADODB.Recordset
Public qy4 As New ADODB.Recordset
Public qy5 As New ADODB.Recordset
Public rst As New ADODB.Recordset
Public rst1 As New ADODB.Recordset
Public rstFriends As New ADODB.Recordset
Public rstFriends1 As New ADODB.Recordset