首页 »标签 » vb连接sql数据库 » 列表
2008年9月26日vb超连接代码:vb连接sql模块代码
Public conn As New ADODB.ConnectionPublic rs As New ADODB.RecordsetPublic addFlag As BooleanPublic Function OpenCn(ByVal Cip As String) As BooleanDim mag As StringOn Error GoTo strerrmagSet conn = New ADODB.Connectionconn.ConnectionTimeout = 25conn.Provider = \"sqloledb\"conn.Prop...
[阅读全文] [PDF]
2008年9月25日vb连接sql数据库:VB访问SQL Server数据库技术全揭密
摘 要： 本文讨论了Visual Basic应用程序访问SQL Server数据库的几种常用的方法，分别说明了每种方法的内部机理并给出了每种方法的一个简单的实例，最后比较了每种方法性能和优缺点。 一、引言 SQL Server是微软推出的中小型网络数据库系统，是目前最常用的数据库系统之一。随着SQL Server网络数据库应用程序日益增多，这种Web数据库应用系统的正常运行一般依赖于已存在的用户数据库。创建维护数据库的工作可用SQL Server提供的SQL Enterprise Manager工具来进行，如能提供一种定制的数据...
[阅读全文] [PDF]
2008年9月25日vb连接sql数据库:VB访问SQL Server数据库技术全揭密（2）
SION=SqlInit() If DBLIB_VERSION=\"\"Then MsgBox\"Could not initialize DBLIB!Exit application.\", MB_ICONEXCLAMATION End If End Sub Private Function LoginToServer() As integer loginToServer=SUCCEED Status%=SqlSetloginTime%(loginTimeOut) If giSqlConn<>0 Then ...
[阅读全文] [PDF]
2008年9月25日vb连接sql数据库:VB访问SQL Server数据库技术全揭密（3）
连接开始以前被激发，此时不能进行有关终止连接的操作: Private Sub Cn_BeforeConnect(ConnetString As String, Pro mpt As Variant) MsgBox \"正在连接\" & ConnectString, vbOKOnly, \"连接前\" End Sub 连接完成之后的事件处理: Private Sub Cn_Connect(ByVal ErrorOccurred As Boolean) Dim M As String If ErrorOccurred ...
[阅读全文] [PDF]
2008年9月25日vb连接sql数据库:VB访问SQL Server数据库技术全揭密（4）
sSQL = \"USE\" & sDB Cn.Execute sSQL SQLCreateDatabase65 = True Exit Function errSQLCreateDatabase65: On Error Resume Next sSQL = \"USE \" & sDB Cn.Execute sSQL SQLCreateDatabase65 = False End Function (4)判断一个数据库是否存在 Public Function SQLExistDatabase(Cn...
[阅读全文] [PDF]
1 共5条 分1页
