签到有奖
消息提醒
运维工程师专区
官方商城
点击复制链接
关注该帖后,有多人参加探讨会对您通知与提示!
帖子
精华
被关注
论坛等级:游民
注册时间:2005-08-16
普通 如何晋级?
发布于 2016-04-04 22:00:33
4楼
Set DataGrid1.DataSource = Adodc1.recordset
引用详细内容:
还是不太懂啊。
请问万泉河大侠:
我是要在窗口中拖放两个.net控件:AdoDC和DataGrid吗?它们默认的控件名字是不是.Net Control?
下面是我写的代码,数据集加载不到 DataGrid 中,显示不出来,请帮忙看看哪里有问题啊?多谢了!
Sub OnLButtonDown(Byval Item, Byval Flags, Byval x, Byval y)
Dim objConnection
Dim objCommand
Dim objRecordset
Dim strConnectionString
Dim strSQL
strConnectionString = "Provider=MSDASQL;DSN=TX;UID=;PWD=;"
strSQL = "select ID from TX;"
Set objConnection = CreateObject("ADODB.Connection")
objConnection.ConnectionString = strConnectionString
objConnection.Open
Set objRecordset = CreateObject("ADODB.Recordset")
Set objCommand = CreateObject("ADODB.Command")
objCommand.ActiveConnection = objConnection
objCommand.CommandText = strSQL
Set objRecordset = objCommand.Execute
Set DataGrid1.DataSource = Adodc1 '好像是这里开始有问题。
DataGrid1.Refresh
Set objCommand = Nothing
objConnection.Close
Set objRecordset = Nothing
Set objConnection = Nothing
End Sub
万大侠,还是不行啊,数据加载不进去。Adodc1和DataGrid1这两个控件的静态属性有什么需要设置的吗?
请填写推广理由:
AI 小西智伴登场,7×24 小时权威支援,让技术支持告别等待!
助你技有所长,论有所获
首次发帖探讨工控技术话题 立获新人礼包,100中奖哦! (包含周边、书籍、兑奖西币)
共有32569条技术帖
恭喜,你发布的帖子
快扫描右侧二维码晒一晒吧!
再发帖或跟帖交流2条,就能晋升VIP啦!开启更多专属权限!
分享
只看 楼主
欢迎您访问支持中心!
丰富的视频,全方位的文档,大量的网友交流精华……
为了更好的完善这些内容,我们诚邀您在浏览结束后,花20秒左右的时间,完成一个用户在线调查!
感谢您的支持!