请教:可恶的实时错误13,类型不匹配!"

gy8654 2001-07-13 02:20:21
strsql = "select card,name from info where code='" & code_t & "';"
Set db = DBEngine.Workspaces(0).OpenDatabas("c:\info.mdb")
Set rst = db.OpenRecordset(strsql)

以前编的程序是能用的,新写个程序,换了个变量就不行了,code在库中是文本型的,code_t也是文本,真是不懂了?
我的Office生过级,变成2000了,但为了写程序,删了,改回97,不知有没有影响。请大家帮助了,一定给分。
...全文
76 3 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
BALLOONMAN 2001-07-13
  • 打赏
  • 举报
回复
1、这三句运行时到底是哪一句出现错误的?用F8调试一下呀
2、出错时code_t的值是什么?是不是无论什么值都出错?
3、你第一句最后好象没必要要;号的呀。
Netis_Sun 2001-07-13
  • 打赏
  • 举报
回复
1。code的字段长度是多少?
2。code_t的类型虽然为String可是在VB6中使用的是Unicode码,
所以一个字母使用两个字节,一个中文也使用两个字节;
3。以前使用的操作系统为win98?win95?winme?winnt?
由于操作系统使用的内码表示也不同比如:winnt使用unicode,win95,98不是。
4。office的Access不同,info.mdb是用office97还是office2000建立?这个对数据库
引擎有影响。

仔细检查一下再来问问题!!
qin_wei 2001-07-13
  • 打赏
  • 举报
回复
code_t中是否有单引号,
strsql = "select card,name from info where code='" & code_t & "';"
你这种写法不安全的
如code_t="abc'd"应处理成"abc''d"

7,785

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧