Office中国论坛/Access中国论坛

标题: 请求前辈帮忙看一下！ [打印本页]

作者: onesex 时间: 2004-2-23 05:44
标题: 请求前辈帮忙看一下！
Dim mRs
Set mRs=Conn.ExeCute("Select Title,Popedom,RoleTitle,Lock,NickName,ClassPopedom,ClassId From View_AdminInfo Where UCase(Title)='" & UCase(mTitle) & "' And Pwd='" & mPwd &"'")

这句话原来是用在access2000的数据库的，现在我改用SQL2000，所以会出现“[Microsoft][ODBC SQL Server Driver][SQL Server]'UCase' is not a recognized function name. "错误。

请问该怎样改才行呢？请教

作者: HG 时间: 2004-2-23 17:19

以下是引用onesex在2004-2-22 21:43:35的发言：
Dim mRs
Set mRs=Conn.ExeCute("Select Title,Popedom,RoleTitle,Lock,NickName,ClassPopedom,ClassId From View_AdminInfo Where UCase(Title)='" & UCase(mTitle) & "' And Pwd='" & mPwd &"'")

这句话原来是用在access2000的数据库的，现在我改用SQL2000，所以会出现“[Microsoft][ODBC SQL Server Driver][SQL Server]'UCase' is not a recognized function name. "错误。

请问该怎样改才行呢？请教

因为Ucase不是Tsql函数所到!(若不经过特列设置SqlServer对大小写并不敏感)!
strsql="Select Title,Popedom,RoleTitle,Lock,NickName,ClassPopedom,ClassId From View_AdminInfo Where upper(Title)='" & UCase(mTitle) & "' And Pwd='" & mPwd &"'"
set rs =conn.execute(strsql)

作者: onesex 时间: 2004-2-24 19:30
非常感激！

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)