社区
数据库(包含打印,安装,报表)
帖子详情
adodc的recordsource问题
overcomeself
2004-09-28 01:00:48
fieldname="pid" 其中pid表示字段名
cmmark.text="<>"
下面有什么错误?
adodc1.recordsource="select * from products" + "where + & fieldstr1 &" + "+trim(cmbmark.text)+" + Trim(Txtcontent.Text)
adodc1.refresh
...全文
237
9
打赏
收藏
adodc的recordsource问题
fieldname="pid" 其中pid表示字段名 cmmark.text="" 下面有什么错误? adodc1.recordsource="select * from products" + "where + & fieldstr1 &" + "+trim(cmbmark.text)+" + Trim(Txtcontent.Text) adodc1.refresh
复制链接
扫一扫
分享
转发到动态
举报
AI
作业
写回复
配置赞助广告
用AI写文章
9 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
longki
2004-09-28
打赏
举报
回复
adodc1.recordsource="select * from products where " & fieldname & Trim(cmbmark.text) & Trim(Txtcontent.Text),就这样!
RUKYO
2004-09-28
打赏
举报
回复
adodc1.recordsource="select * from products" + "where + & fieldstr1 &" + "+trim(cmbmark.text)+" + Trim(Txtcontent.Text)
==========
adodc1.recordsource="select * from products where " & fieldname & Trim(cmbmark.text) & Trim(Txtcontent.Text)
overcomeself
2004-09-28
打赏
举报
回复
晕死,我没有在where后面空格.
谢谢saga007,谢谢上面的所有朋友。
paducn
2004-09-28
打赏
举报
回复
结贴了吧
paducn
2004-09-28
打赏
举报
回复
adodc1.recordsource="select * from products where " & fieldname & Trim(cmbmark.text) & "'" & Trim(Txtcontent.Text) & "'"
这个可以的了
我想你的 Trim(Txtcontent.Text) 不会是数值类型吧
sunmoonn
2004-09-28
打赏
举报
回复
adodc1.recordsource="select * from products where " & fieldname & Trim(cmbmark.text) & Trim(Txtcontent.Text)
bladeinside
2004-09-28
打赏
举报
回复
上面的还不行吗?
overcomeself
2004-09-28
打赏
举报
回复
上面的也不行,
说明一下,上面的fieldname并不是一个固定的字段。
chelseawu
2004-09-28
打赏
举报
回复
adodc1.recordsource="select * from products where " & fieldname & Trim(cmbmark.text) & Trim(Txtcontent.Text)
查询记录功能,从access数据库中读取,
Ado
dc
1.
Record
Source
= "select * from 订单表 where 订
查询记录功能,从access数据库中读取,
Ado
dc
1.
Record
Source
= "select * from 订单表 where 订 单号='" + Text1(0).Text + "'"
Ado
dc
1.Refresh(VB6.0源代码编写)
VB中用
ADO
DC
控件连接ACCESS数据库.doc
VB中用
ADO
DC
控件连接ACCESS数据库
查询指定控件内字符的例子,内附全部VB源代码及详细说明,有数据库的联接等DataGrid的应用,
Ado
dc
1.
Record
Source
查询指定控件内字符的例子,内附全部VB源代码及详细说明,有数据库的联接等DataGrid的应用,
Ado
dc
1.
Record
Source
VB
Ado
dc
控件模糊查询ACCESS数据库(含数据库
VB
Ado
dc
控件模糊查询加密ACCESS数据库
帐目查询(VB6.0源代码编写)'按日期查询并汇总商品销售信息
Ado
dc
1.
Record
Source
= "select * from xsd where 日期 between " + Chr(35) + Str(DTPicker1.Value) + Chr(35) + "and " + Chr(35) + Str(DTPicker2.Value) + Chr(35) + "order by 日期"
帐目查询(VB6.0源代码编写)'按日期查询并汇总商品销售信息
Ado
dc
1.
Record
Source
= "select * from xsd where 日期 between " + Chr(35) + Str(DTPicker1.Value) + Chr(35) + "and " + Chr(35) + Str(DTPicker2.Value) + Chr(35) + "order by 日期"
Ado
dc
1.Refresh lblCount = Sum(
Ado
dc
1.
Record
set,
Ado
dc
1.
Record
set.Fields("数量")) lblS1 = Sum(
Ado
dc
1.
Record
set,
Ado
dc
1.
Record
set.Fields("金额")) lblS2 = Sum(
Ado
dc
1.
Record
set,
Ado
dc
1.
Record
set.Fields("利润"))
数据库(包含打印,安装,报表)
1,217
社区成员
55,952
社区内容
发帖
与我相关
我的任务
数据库(包含打印,安装,报表)
VB 数据库(包含打印,安装,报表)
复制链接
扫一扫
分享
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章