代码搜索:CNN
找到约 803 项符合「CNN」的源代码
代码结果 803
www.eeworm.com/read/240723/13201810
bas databasesql.bas
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
P
www.eeworm.com/read/318771/13472192
bas databasesql.bas
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
P
www.eeworm.com/read/317458/13504549
bas databasesql.bas
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
P
www.eeworm.com/read/208209/15250847
bas conn.bas
Attribute VB_Name = "conn"
Option Explicit
Public Cnn As ADODB.Connection
Public Cnn1 As ADODB.Connection
Public str As String '连接字符串
Public tInterval As Long '定时器时间间隔
Public s As Integer
Publi
www.eeworm.com/read/206217/15298527
bas databasesql.bas
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
P
www.eeworm.com/read/265621/4281633
bas databasesql.bas
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
P
www.eeworm.com/read/475160/6793306
bas databasesql.bas
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
P
www.eeworm.com/read/471858/6883264
bas databasesql.bas
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
P
www.eeworm.com/read/269683/11084213
bas module1.bas
Attribute VB_Name = "Module1"
Public Function cnn() As String '定义函数
'返回一个数据库连接
cnn = "DSN=GFGL;uid=sa;"
End Function
Private Function setdata(num As Integer) As String
Select Case num
www.eeworm.com/read/237782/13930256
bas module1.bas
Attribute VB_Name = "Module1"
Public czy As String
Public gh As String
Public ckh As String
Public sjh As String
Public Function cnn() As String '定义函数
'返回一个数据库连接
cnn = "Provider=MSDASQL.