您的位置：程序门 -> vb -> 非技术类

请问ado连接sql server2000的问题

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

请问ado连接sql server2000的问题[已结贴,结贴人:zhh_soviet]

发表于：2007-04-20 10:55:08 楼主

我在vb 6.0中用ado连接不上我的本机sql server2k，请问需要怎么样的步骤？

发表于：2007-04-20 11:00:051楼得分:70

vb通过ado连接sql数据的两种方法

vb使用ado数据库可以分为有源数据库和无源数据库，即是否使用了dsn数据源，如下例：
1、在连接数据库前首先要在vb菜单中“工程”-“引用”从中选择 microsoft activex data objects 2.6 library和 microsoft activex data objects recordset 2.6两个组件，这是在连接数据前所必做的工作。
2、接下来定义ado的连接对象，如下所示：
set conn = new adodb.connection
set rs = new adodb.recordset

第一种方法采用的是无源的数据库连接方法
conn.connectionstring = "driver={sql server};server=jszx3-11;uid=sa;pwd=;database=wzc "
conn.connectiontimeout = 30
conn.open
rs.open "select 用户名,密码 from login where 用户名= ' " & trim（combo1.text) & " ' and 密码= ' " & trim（text1.text) & " ' ", conn, adopenstatic, adlockreadonly, adcmdtext
if rs.eof = true and rs.bof then
m = msgbox（ "请重新登录 ", vbexclamation)
text1.text = " "
text1.setfocus
else
form1.hide
end if
rs.close

这是第二种方法连接数据库的方法，这一种方法是采用有源的方法与数据库连接的方法，代码如下所示：
set conn = new adodb.connection
set rs = new adodb.recordset
conn.connectionstring = "dsn=login;uid=sa;pwd=; "
conn.connectiontimeout = 30
conn.open
rs.open "select 用户名 from login ", conn, adopenstatic, adlockreadonly, adcmdtext
dim i as string
for t = 0 to val（rs.recordcount) - 1
i = trim（rs.fields（ "用户名 ").value)
rs.movenext
combo1.additem i
next t
rs.close

发表于：2007-04-20 11:05:342楼得分:0

adodc试试

发表于：2007-04-20 11:08:133楼得分:0

阿勇，很久不见，你怎么还是5个裤衩

发表于：2007-04-20 13:28:314楼得分:0

up~~~

发表于：2007-04-20 13:44:175楼得分:30

dim conn as new adodb.connection
strcon = "provider=sqloledb.1;persist security info=false;user id=sa;password=sa;initial catalog=supplychain;data source=192.168.10.250 "
conn.cursorlocation = aduseclient
conn.open strcon
引用miscroft activex data objects 2.0

发表于：2007-04-21 20:22:186楼得分:0

楼上能否具体解释一下下面的这句话中的含义？
conn.connectionstring = "driver={sql server};server=jszx311;uid=sa;pwd=;database=wzc "

发表于：2007-04-21 20:22:597楼得分:0

strcon = "provider=sqloledb.1;persist security info=false;userid=sa;password=sa;initial catalog=supplychain;data source=192.168.10.250 "

发表于：2007-04-21 20:23:488楼得分:0

楼上能否具体解释一下这句的含义？
strcon = "provider=sqloledb.1;persist security info=false;user id=sa;password=sa;initial catalog=supplychain;data source=192.168.10.250 "

发表于：2007-04-21 22:20:169楼得分:0

你在msdn吗？
不如好好看看，要不就找一本ado的最简单的书看看，好吗？

发表于：2007-04-21 22:38:0610楼得分:0

连接字符串，如这样

provider=sqloledb.1;password=asdf;persist security info=true;user id=asdf;initial catalog=pubs;data source=adsf

下一篇：还有这个原来的代码是什么啊？谢谢
上一篇：有个局域网的小软件开发价格不高求诚意者合作！

其他资讯