| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 578 人关注过本帖
标题:为什么说标准表达式中数据类型不匹配?
只看楼主 加入收藏
whp413
Rank: 1
等 级:新手上路
帖 子:9
专家分:0
注 册:2006-4-26
收藏
 问题点数:0 回复次数:2 
为什么说标准表达式中数据类型不匹配?
If Combo1.Text = "总计" Then
If Not IsNumeric(Trim(Text1.Text)) Then
MsgBox "请输入数字!", vbOKOnly + vbExclamation, "警告"
Text1.Text = ""
Text1.SetFocus
Exit Sub
End If
sql = "select * from 整机服务 where 总计='" & Trim(Text1.Text) & "'"
rs_reader.Open sql, conn, adOpenKeyset, adLockPessimistic
If rs_reader.RecordCount > 0 Then
rs_reader.Close
rs_reader.CursorLocation = adUseClient
sql = "select * from 整机服务 where 总计='" & Trim(Text1.Text) & "'"
rs_reader.Open sql, conn, adOpenKeyset, adLockPessimistic
Label1.Caption = rs_reader("购机日期")
Label2.Caption = rs_reader("客户姓名")
Label3.Caption = rs_reader("联系电话")
Label4.Caption = rs_reader("联系地址")
Label5.Caption = rs_reader("总计")
Else

MsgBox "查询不到相关信息,请确认查询内容!", vbOKOnly + vbExclamation
Text1.SetFocus
Text1.Text = ""
End If
End If

这段代码运行说标准表达式中数据类型不匹配?什么意思?哪里错了吗?
搜索更多相关主题的帖子: 类型 数据 表达 
2006-04-28 15:09
google
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:22
帖 子:3419
专家分:23
注 册:2005-11-1
收藏
得分:0 
“总计”是什么类型的?
如果是数字类型的就错了,SQL应该是
sql = "select * from 整机服务 where 总计=" & Trim(Text1.Text)


祝天下所有母亲幸福安康!~
2006-04-28 15:20
whp413
Rank: 1
等 级:新手上路
帖 子:9
专家分:0
注 册:2006-4-26
收藏
得分:0 
thank you!版主
2006-04-28 16:28
快速回复:为什么说标准表达式中数据类型不匹配?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.025580 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved