注册 登录
编程论坛 VB6论坛

如何用Datagrid写句子连接sql? 3楼添加了附加

onegoodmen 发布于 2007-01-03 14:34, 1694 次点击

1、我在主窗口添加了DataGrid控件,在用vb写句子连接sql的时候是否要把Adodc也添加到主窗口上?
2、如果上述的问题需要添加Adodc那么怎么写出句子才能把sql的数据显示到DataGrid上?

[此贴子已经被作者于2007-1-3 18:06:20编辑过]

6 回复
#2
purana2007-01-03 14:37
"Provider=SQLOLEDB;Data Source=服务器名或IP地址;Initial Catalog=数据库名;User ID=用户名;Password=密码"
#3
onegoodmen2007-01-03 15:29
已经把我的程序贴了出来,请给出提示,谢谢

以下是引用purana在2007-1-3 14:37:10的发言:
"Provider=SQLOLEDB;Data Source=服务器名或IP地址;Initial Catalog=数据库名;User ID=用户名;Password=密码"

单纯的这样写好像不行

只有本站会员才能查看附件,请 登录



1、我用ADO向导做了连接,是在主窗体上添加了Adodc,然后再ADODC Properties -> Use Connection String 看到了语句Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=cmdata;Data Source=localhost,但如果我不用ADODC的话,怎么才能把 这条句子正确的写出来,或者我应该双击DataGrid之后再这里写呢?
Private Sub DataGrid_Click()
Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=cmdata;Data Source=CCWDL
End Sub

但这样写不对啊,请版主和各位大侠指点


2、这句还是错误的,怎么回事啊?郁闷!
Private Sub DataGrid_Click()
Adodc1.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=cmdata;Data Source=localhost;"
Adodc1.Open
Adodc1.RecordSource = "select * from t_Customer"
Adodc1.Refresh
End Sub

[此贴子已经被作者于2007-1-3 17:32:57编辑过]

#4
sinjizu2008-10-20 20:43
路过看一下
#5
不说也罢2008-10-24 18:32
'注意下面的连接字符串:其中AAA是服务器名或IP地址,本机填local,BBB是用户名,SQLSERVER默认为sa,CCC是密码,DDD是数据库名,看你用的代码我改了一下,可以复制过去,注意标点符号的全角半角哦:
'这一句暂且注释掉Adodc1.ConnectionString = "PROVIDER=MSDASQL;DRIVER={SQL SERVER};SERVER=AAA;UID=BBB;PWD=CCC;DATABASE=DDD"
Private Sub Command1_Click()
Adodc1.ConnectionString = "PROVIDER=MSDASQL;DRIVER={SQL SERVER};SERVER=(local);UID=sa;;PWD=;DATABASE=CCWDL"
[bo] = adCmdText[/bo]
Adodc1.RecordSource = "select * from t_Customer"
Adodc1.Refresh
[bo]Set Datagrid1.DataSource = Adodc1[/bo]

End Sub
#6
gyll2010-04-30 16:08
以下是引用不说也罢在2008-10-24 18:32:21的发言:

'注意下面的连接字符串:其中AAA是服务器名或IP地址,本机填local,BBB是用户名,SQLSERVER默认为sa,CCC是密码,DDD是数据库名,看你用的代码我改了一下,可以复制过去,注意标点符号的全角半角哦:
'这一句暂且注释掉Adodc1.ConnectionString = "PROVIDER=MSDASQL;DRIVER={SQL SERVER};SERVER=AAA;UID=BBB;PWD=CCC;DATABASE=DDD"
Private Sub Command1_Click()
Adodc1.ConnectionString = "PROVIDER=MSDASQL;DRIVER={SQL SERVER};SERVER=(local);UID=sa;;PWD=;DATABASE=CCWDL"
= adCmdText[/bo]
Adodc1.RecordSource = "select * from t_Customer"
Adodc1.Refresh
Set Datagrid1.DataSource = Adodc1[/bo]
 
End Sub
用adodc的datasource,connectionstring属性设置了数据源,就没有写
Adodc1.ConnectionString = "PROVIDER=MSDASQL;DRIVER={SQL SERVER};SERVER=(local);UID=sa;;PWD=;DATABASE=CCWDL"
= adCmdText[/bo]
这两句,怎么提示无效的SQL语句呢
#7
holiwood2012-10-09 21:40
是否在ODBC数据源管理器中建立SQL连接?
1