7,789
社区成员
发帖
与我相关
我的任务
分享SQL问题：“至少一个参数没有被指定值”，为什么？
strsql = "select 客户号,客户名称,结账日期 from 结算信息表"
Call mycon1.OpenMyres(strsql)
运行后出错，提示：“至少一个参数没有被指定值”，为什么？
Call mycon1.OpenMyres(strsql)
运行后出错，提示：“至少一个参数没有被指定值”，为什么？
...全文
请发表友善的回复…
发表回复
guoyx 2003-09-09
- 打赏
- 举报
你用的是Access97或2000,我猜跟你用的数据库引擎不匹配，尽量用高的版本试试
FLchengang 2003-09-09
- 打赏
- 举报
好象有的数据库 （SQL SERVER） 不支持中文字段
dary_zhou 2003-09-08
- 打赏
- 举报
.Open txtSql, mycnn, , adLockPessimistic, adCmdText
这里出错
.Open txtSql, mycnn, adLockPessimistic, adCmdText
这里出错
.Open txtSql, mycnn, adLockPessimistic, adCmdText
lm517 2003-09-08
- 打赏
- 举报
不好意思，我给分的时候，提示“回复次数大于给分次数”，怎么回事？
lm517 2003-09-08
- 打赏
- 举报
怪，我把数据库里的那个字段重敲了一遍就解决了，但我保证不是字段名称不对，我谢谢大家给我出了这么多的主意，分不多，但都有。
hengxin54 2003-09-06
- 打赏
- 举报
把字段名和表名用“[]”括起来试试
lm517 2003-09-06
- 打赏
- 举报
Option Explicit
Public mycnn As New ADODB.Connection
Public myres As New ADODB.Recordset
Public Function OpenMyres(ByVal txtSql As String)
If myres.State = adStateOpen Then
myres.Close
End If
With myres
.CursorLocation = adUseClient
.CursorType = adOpenDynamic
.Open txtSql, mycnn, , adLockPessimistic, adCmdText
End With
End Function
这是我打开表的函数openmyres(),是不是这个里面的问题？
Public mycnn As New ADODB.Connection
Public myres As New ADODB.Recordset
Public Function OpenMyres(ByVal txtSql As String)
If myres.State = adStateOpen Then
myres.Close
End If
With myres
.CursorLocation = adUseClient
.CursorType = adOpenDynamic
.Open txtSql, mycnn, , adLockPessimistic, adCmdText
End With
End Function
这是我打开表的函数openmyres(),是不是这个里面的问题？
myhot-河马吃草 2003-09-06
- 打赏
- 举报
.Open txtSql, mycnn, , adLockPessimistic, adCmdText
改为.Open txtSql, mycnn试试。。
改为.Open txtSql, mycnn试试。。
xingnup 2003-09-06
- 打赏
- 举报
出错后程序停在哪一行?可以用F8调试一下,要分析错误时,第一步是找出哪里出错.
figoren 2003-09-06
- 打赏
- 举报
不要adLockPessimistic 改为默认值 "，"用豆号代替
lm517 2003-09-05
- 打赏
- 举报
是一致的。
绝对菜鸟提的方法我也试过了，也不行。
绝对菜鸟提的方法我也试过了，也不行。
xinshou1979330 2003-09-05
- 打赏
- 举报
看看你数据库中表中的字段和你 strsql 里要查询的字段是否一致
vgat 2003-09-05
- 打赏
- 举报
你把它写成strsql = "select 表名.客户号,表名.客户名称,表名.结账日期 from 结算信息表"这种形式试试呢。
