关于如何使用ADO连接数据库
2008-05-01 05:10
696 查看
我是一名VB初学者,曾经为这个问题很苦恼,现在终于写了出来,和我一样的初学者一起进步吧!
我使用ADO连接数据库,通过绑定datagrid控件来显示数据库中符合条件的内容。
Option Explicit
Private Sub Command1_Click()
Dim cn As New ADODB.Connection '数据库连接变量
Dim Cmd As New ADODB.Command '命令集
Dim rs As New ADODB.Recordset '记录集
Dim strConnect As String '连接字符串
Set cn = New ADODB.Connection
strConnect = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=database;Data Source=servername" '指定连接字符串
cn.ConnectionString = strConnect
cn.Open '连接数据库
With Cmd
.ActiveConnection = cn
.CommandType = adCmdStoredProc '有四种可选择的类型,在编程过程中使用SQL SERVER的存储过程是很好的方法
.CommandText = "SP_Get_Name" '存储过程名称
.Parameters.Refresh
.Parameters("@dt").Value = date() '存储过程中参数的值(存储过程中只有一个参数)
End With
With rs
.CursorLocation = adUseClient
.CursorType = ADOpenStatic
.LockType = adLockReADOnly
.Open Cmd
End With
Set DataGrid1.DataSource = rs '绑定数据库显示控件
End Sub
要在DataGrid控件中显示数据CursorLocation = adUseClient和Set DataGrid1.DataSource = rs两个语句不可缺少。
我使用ADO连接数据库,通过绑定datagrid控件来显示数据库中符合条件的内容。
Option Explicit
Private Sub Command1_Click()
Dim cn As New ADODB.Connection '数据库连接变量
Dim Cmd As New ADODB.Command '命令集
Dim rs As New ADODB.Recordset '记录集
Dim strConnect As String '连接字符串
Set cn = New ADODB.Connection
strConnect = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=database;Data Source=servername" '指定连接字符串
cn.ConnectionString = strConnect
cn.Open '连接数据库
With Cmd
.ActiveConnection = cn
.CommandType = adCmdStoredProc '有四种可选择的类型,在编程过程中使用SQL SERVER的存储过程是很好的方法
.CommandText = "SP_Get_Name" '存储过程名称
.Parameters.Refresh
.Parameters("@dt").Value = date() '存储过程中参数的值(存储过程中只有一个参数)
End With
With rs
.CursorLocation = adUseClient
.CursorType = ADOpenStatic
.LockType = adLockReADOnly
.Open Cmd
End With
Set DataGrid1.DataSource = rs '绑定数据库显示控件
End Sub
要在DataGrid控件中显示数据CursorLocation = adUseClient和Set DataGrid1.DataSource = rs两个语句不可缺少。
相关文章推荐
- 关于如何使用ADO连接数据库
- VC中ADO连接数据库,如何使用Datagrid显示的问题
- 如何使用 ADO.NET 和 Visual C# .NET 连接到数据库并运行命令
- 如何正确获得mysql,access的ADO连接字符串,并使用该连接字符串连接数据库
- ★ 浅谈如何使用ADO.NET连接数据库 ★
- 创建Accress 数据库连接文件UDL/如何使用 ADO 的数据链接文件
- 如何通过使用 ADO.NET 2005 和 Visual C# 2005 或使用 ADO.NET 和 Visual C# .NET 连接到数据库并运行命令
- 关于在英创em9161板上使用ADO.net连接远程数据库提示 “无法找到 PInvoke dll"dbnetlib.dll"”问题解决方法
- 如何解决 CentOS系统下 使用localhost无法连接数据库
- 关于UEditor插件的使用以及UEditor数据回显问题,数据库存储标签代码前台页面如何解析问题小结
- 关于weka使用 ————连接数据库
- 如何在不安装Oracle客户端的情况下,使用PL/SQL Developer连接数据库
- 关于ADO连接access数据库修改数据库记录的问题
- apache服务器的使用与配置2+php如何连接数据库
- ORACLE如何使用DBLINK连接另一个数据库
- 如何在 静态编译的QT 5.5.1 中 使用数据库插件连接 ODBC
- [Ado.Net]关于数据库连接Dispose和Close区别
- VC++中使用MFC通过ADO连接数据库方法小结
- BCB使用ADO连接informix数据库的方法
- 如何使用 PLSQL Developer 远程连接 Oracle 数据库