代码搜索：CNN
找到约 803 项符合「CNN」的源代码
代码结果 803
www.eeworm.com/read/235652/14058524
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/257021/11959845
bas module1.bas
Attribute VB_Name = "Module1"
Option Explicit
Public Cnn1 As ADODB.Connection
Public Cnn2 As ADODB.Connection
Public Sub SetAccessDb()
Dim Str1 As String, Str2 As String, Str3 As String
www.eeworm.com/read/213248/15139794
bas module1.bas
Attribute VB_Name = "Module1"
Option Explicit
Public Cnn1 As ADODB.Connection
Public Cnn2 As ADODB.Connection
Public Sub SetAccessDb()
Dim Str1 As String, Str2 As String, Str3 As String
www.eeworm.com/read/192685/8362395
txt 错误提示too many rows affected by update.txt
With rst
.ActiveConnection = cnn
.CursorLocation = adUseClient
.CursorType = adOpenKeyset
.LockType = adLockOptimistic
.Open "select * from sf"
do until .eof
www.eeworm.com/read/242302/13077851
txt 错误提示too many rows affected by update.txt
With rst
.ActiveConnection = cnn
.CursorLocation = adUseClient
.CursorType = adOpenKeyset
.LockType = adLockOptimistic
.Open "select * from sf"
do until .eof
www.eeworm.com/read/125259/14502795
bas common.bas
Attribute VB_Name = "common"
Option Explicit
Public cnn As clsCon
Public right As String
Public operatorid As String
www.eeworm.com/read/114100/15111360
txt 错误提示too many rows affected by update.txt
With rst
.ActiveConnection = cnn
.CursorLocation = adUseClient
.CursorType = adOpenKeyset
.LockType = adLockOptimistic
.Open "select * from sf"
do until .eof
www.eeworm.com/read/187700/8607377
bas module1.bas
Attribute VB_Name = "Module1"
Public czy As String
Public Function Cnn() As String '定义函数
'返回一个数据库连接
Cnn = "Provider=MSDASQL.1;Persist Security Info=False;User ID=sa;Data Source=XSGL"
End F