睡着后被翻眼皮视频:代码有误,帮忙看看

来源:百度文库 编辑:中科新闻网 时间:2024/05/10 12:49:33
set rsQSDoc=connDB.execute("select max(mid(Nb,5,2)) As Nb_Max,* from tblQSDoc where ucase(trim(Grp)) = '" & strDocumentGrp & "' order by Nb")
上面的代码一调试就报下面的代码,求高人帮忙看看
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Cannot group on fields selected with '*'.

数据库连接符有问题
我常用下面的方法连接access数据库(VB环境),其中con是连接符,app.path是程序所在路径,如果是根目录,后面的数据库名前不能加上"\",用你的方法也是一样,要先赋连接符。
dim rs as object,sql as string,con as string
set rs=createobject("adodb.recordset")
con="provider=microsoft.jet.oledb.4.0;data source=" & app.path & "\mdb数据库名"
sql="sql语句"
rs.open sql,con

execute一般执行不需要返回数据集的update和delete语句,select语句应该用open方法