54SA.COM|专注于系统运维管理,为中国SA提供动力!
Getting online shouldn't be tough. $7.99 .COMs
系统管理员之家Banner
当前位置: 主页 > 信息化 > 数据库 >

VB与SQL Server连接的三种方式(教程)

时间:2010-12-21 09:24来源:未知 编辑:admin

 

随着大家课程设计的临近,大家都在为课程设计在找资料。网上的、书上的等一些资料很全面都不符合我们的实际,我本人特整理出VB与SQL Server连接的几种方法,供大家学习参考,也希望大家能够互相帮助,共同完美地完成这次的课程设计。
一、              VB与SQL Server连接方法一:使用Adodc控件
在vb的工程中选择部件,可添加Adodc部件如下图所示:
 

 
添加Microsoft ADO Data Control 6.0 控件。
设置adodc控件的属性(在vb中画一个adodc控件,并右击,弹出右键菜单,选择adodc属性):
 
单击生成按钮,弹出数据链接属性,选择Microsoft OLE DB Provider for SQL Server
 

 

 
下一步,选择本机的服务器(一定要和SQL服务器的名称一致),根据自己的登陆设置选择输入登录服务器的信息,选择自己需要使用的数据库(在本例中我选择创建的student数据库),可以测试连接。
      
 
      
 
 
在回到adodc属性页,更改记录源,在命令类型中选择2,在表或存储过程名称中选择你需要使用的表或存储过程。
 

 
在添加一些需要的控件,设置控件的属性,本例中一设置text1属性为例。
 

 
单击text1,在vb的属性框中出现text1属性,设置DataSoure属性为一配置好的adodc1控件,在DataFileld属性中选择需要使用的表中的字段(这里我选择学生基本信息表中的学号字段。)可以运行了,界面如下:
 

 
大家可以通过上面的方法连接数据库,并可以通过vb的学习编写代码实现更强大的功能。
 
二、VB与SQL Server连接方法二(使用DSN方法)
我们需要首先做的事就是配置自己的DSN,如何配置,请看我一一到来:
在控制面板里管理工具,选择里面的数据源 (ODBC),弹出ODBC数据源管理器,选择添加,
 

 
选择驱动程序(SQL Server)
点完成,弹出创建到SQL Server的新数据源,
 

 
在名称中选择自己喜欢的都可以哦,在服务器中粘贴你服务器的名称(一定要使用粘贴,不可通过下拉框选择,实际上,你通过下拉框也不能选择。)
点下一步

 
点下一步了(这步就不用我说了吧)

 
更改默认的数据库,选择自己创建的需要的数据库名称(本例中我选择student数据库)
点下一步
 

 
点完成,弹出

 
可以测试数据源,

 
点确定,再三次点确定。DSN即配置完毕,那就看我们怎么使用了。
打开vb。像上面介绍的添加adodc控件,并设置adodc控件的属性:

 
选择使用ODBC数据资源名称。通过下拉框选择刚创建的DSN(stu)
点击应用,然后选择积累源,

 
确定。后面跟第一种方法都一样了。(不会这写步骤的再和我联系)
二、             VB与SQL Server连接方法三(使用代码实现)
使用此种方法一定要在工程的引用项中配置一个驱动,(Microsoft ActiveX Data Objects 2.6 Library)确定。

 
再在一些控件的代码中添加以下代码:
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
 
Private Sub Command1_Click()
cn.ConnectionString = "DRIVER=SQL Server;SERVER=B1B0D3A0BF844A5\MZ;UID=" & "" & ";PWD=" & "" & ";DATABASE=student"
cn.Open
rs.Open "select *from 学生基本信息表", cn, adOpenKeyset, adLockOptimistic
If rs.RecordCount > 0 Then
rs.MoveFirst
End If
For i = 0 To rs.RecordCount - 1
Print rs.Fields(0), rs.Fields(1), rs.Fields(2), rs.Fields(3), rs.Fields(4), rs.Fields(5)
rs.MoveNext
Next
End Sub

[责任编辑:admin]


------分隔线----------------------------
发表评论
请自觉遵守互联网相关的政策法规,严禁发布色情、暴力、反动的言论。
评价:
用户名:
最新评论 进入详细评论页>>