代码搜索:CNN
找到约 803 项符合「CNN」的源代码
代码结果 803
www.eeworm.com/read/164739/10090618
bas module1.bas
Attribute VB_Name = "Module1"
Public MySign As Boolean
Public Function cnn() As ADODB.Connection '定义函数
Set cnn = New ADODB.Connection
cnn.Open "Provider=SQLOLEDB.1;Persist Security Info=
www.eeworm.com/read/359944/10114940
bas dbfunc.bas
Attribute VB_Name = "DbFunc"
'== 标记数据库是否连接 ==
Private IsConnect As Boolean
'== 标记执行Connect()函数后,访问数据库的次数 ==
Private Connect_Num As Integer
Private cnn As ADODB.Connection '连接数据库的Connection对象
P
www.eeworm.com/read/280877/10283890
bas dbfunc.bas
Attribute VB_Name = "DbFunc"
'== 标记数据库是否连接 ==
Private IsConnect As Boolean
'== 标记执行Connect()函数后,访问数据库的次数 ==
Private Connect_Num As Integer
Private cnn As ADODB.Connection '连接数据库的Connection对象
P
www.eeworm.com/read/280877/10284222
bas dbfunc.bas
Attribute VB_Name = "DbFunc"
'== 标记数据库是否连接 ==
Private IsConnect As Boolean
'== 标记执行Connect()函数后,访问数据库的次数 ==
Private Connect_Num As Integer
Private cnn As ADODB.Connection '连接数据库的Connection对象
P
www.eeworm.com/read/280877/10284489
bas dbfunc.bas
Attribute VB_Name = "DbFunc"
'== 标记数据库是否连接 ==
Private IsConnect As Boolean
'== 标记执行Connect()函数后,访问数据库的次数 ==
Private Connect_Num As Integer
Private cnn As ADODB.Connection '连接数据库的Connection对象
P
www.eeworm.com/read/280877/10284812
bas dbfunc.bas
Attribute VB_Name = "DbFunc"
'== 标记数据库是否连接 ==
Private IsConnect As Boolean
'== 标记执行Connect()函数后,访问数据库的次数 ==
Private Connect_Num As Integer
Private cnn As ADODB.Connection '连接数据库的Connection对象
P
www.eeworm.com/read/280877/10285081
frm form1.frm
VERSION 5.00
Begin VB.Form Form1
BorderStyle = 1 'Fixed Single
Caption = "TestConnect"
ClientHeight = 2385
ClientLeft = 45
ClientTop = 330
www.eeworm.com/read/280877/10285140
bas dbfunc.bas
Attribute VB_Name = "DbFunc"
'== 标记数据库是否连接 ==
Private IsConnect As Boolean
'== 标记执行Connect()函数后,访问数据库的次数 ==
Private Connect_Num As Integer
Private cnn As ADODB.Connection '连接数据库的Connection对象
P
www.eeworm.com/read/280877/10285258
bas dbfunc.bas
Attribute VB_Name = "DbFunc"
'== 标记数据库是否连接 ==
Private IsConnect As Boolean
'== 标记执行Connect()函数后,访问数据库的次数 ==
Private Connect_Num As Integer
Private cnn As ADODB.Connection '连接数据库的Connection对象
P
www.eeworm.com/read/280877/10285405
bas dbfunc.bas
Attribute VB_Name = "DbFunc"
'== 标记数据库是否连接 ==
Private IsConnect As Boolean
'== 标记执行Connect()函数后,访问数据库的次数 ==
Private Connect_Num As Integer
'连接数据库
Private Sub Connect()
'如果连接标记为真,则返回。否则会出错