代码搜索：CNN
找到约 803 项符合「CNN」的源代码
代码结果 803
www.eeworm.com/read/215770/15049178
cs show.aspx.cs
using System;
using System.Collections;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Web;
using System.Web.SessionState;
using System.Web.UI;
using System
www.eeworm.com/read/215354/15063882
bas module1.bas
Attribute VB_Name = "Module1"
Public Function ConnectString() _
As String
'returns a DB ConnectString
ConnectString = "fileDSN=newdata.dsn;database=pubs;UID=sa;PWD=sa"
End Function
Public
www.eeworm.com/read/215353/15063955
bas modxtreme.bas
Attribute VB_Name = "modXtreme"
Option Explicit
Public Report As New dsrXtreme
Public Function ConnectString() _
As String
'returns a DB ConnectString
ConnectString = "FileDSN=xtreme.dsn
www.eeworm.com/read/214529/15097325
bas module1.bas
Attribute VB_Name = "Module1"
Public cnn As New ADODB.Connection
Sub main()
Call Connect
End Sub
Private Function ReadConnectSetup(filename As String)
Dim cs As String
D
www.eeworm.com/read/210196/15204718
bas module1.bas
Attribute VB_Name = "Module1"
Public blnAdd0 As Boolean, blnAdd1 As Boolean, blnAdd2 As Boolean
Public Function Cnn() As String '返回一个数据库连接
Cnn = "Provider=MSDASQL.1;Persist Security Info=False;
www.eeworm.com/read/206909/15285955
bas module1.bas
Attribute VB_Name = "Module1"
Public UserName As String
Public Function ConnectString() As String
ConnectString = "FileDSN=goy.dsn;UID=;PWD="
End Function
Public Function ExecuteSQL(ByVal SQL A
www.eeworm.com/read/162398/5547759
bas module1.bas
Attribute VB_Name = "Module1"
Public fMainForm As FrmMain '定义一个全局对象
Public username As String '用于记录当前用户
Public password As String '记录当前密码
Public flagtoexcel As Integer '标志当前的导出数据对象
Public
www.eeworm.com/read/395633/8166122
bas dbconn.bas
Attribute VB_Name = "DBconn"
Public Function check(str As String) As Boolean 'sql防注入
Dim str1, str2, str3, str4 As String
str1 = "'"
str2 = "="
str3 = "or"
str4 = "!"
If str = "" Then '判断传入的数据
www.eeworm.com/read/193667/8208045
bas module1.bas
Attribute VB_Name = "Module1"
Public blnAdd0 As Boolean, blnAdd1 As Boolean, blnAdd2 As Boolean
Public Function Cnn() As String '返回一个数据库连接
Cnn = "Provider=MSDASQL.1;Persist Security Info=False;
www.eeworm.com/read/147380/12555808
bas module11.bas
Attribute VB_Name = "Module1"
Public fMainForm As frmMain
Public UserName As String
Public gintMode As Integer
Public flagEdit As Boolean
Public cnn As ADODB.Connection
Sub Main()
Dim strcn A