各位大侠帮忙看看错在哪里啊!!!

fengkk 2003-08-19 10:07:07
Adodc1.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Data Source=SERVER"
Adodc1.UserName = "sa"
Adodc1.Password = ""
Adodc1.CommandType = adCmdText
Adodc1.RecordSource = "SELECT * FROM TABLE1 WHERE USERNAME = '" & txtUserName.Text & "'"
Adodc1.Refresh
If Adodc1.Recordset.RecordCount > 0 Then
MsgBox "用户存在"
Adodc1.RecordSource = "SELECT COUNT(*) AS COUNTS FROM TABLE1 WHERE USERNAME+PASSWORD = '" & txtUserName.Text & txtPassword.Text & "'"
Adodc1.Refresh <-每次到这里就出错说“对数据类形而言运算无效,运算符为ADD,类形为navrchar”
If Adodc1.Recordset!COUNTS = 1 Then
MsgBox "通过身份验证"
Else
MsgBox "没有通过身份验证"
End If
End If

应当怎么写啊?
...全文
61 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
felix 2003-08-19
  • 打赏
  • 举报
回复
第一次少写了个AND
felix 2003-08-19
  • 打赏
  • 举报
回复
前面发错了
Adodc1.RecordSource = "SELECT COUNT(*) AS COUNTS FROM TABLE1 WHERE USERNAME = '" & txtUserName.Text & "' AND PASSWORD = '" & txtPassword.Text & "'"
felix 2003-08-19
  • 打赏
  • 举报
回复
Adodc1.RecordSource = "SELECT COUNT(*) AS COUNTS FROM TABLE1 WHERE USERNAME = '" & txtUserName.Text & "' PASSWORD = '" & txtPassword.Text & "'"
stonegoldaustin 2003-08-19
  • 打赏
  • 举报
回复
应该是USERNAME+PASSWORD这吧.

在SQL里应该不会象VB里那样,可以STRING1 + STRING2

你试试用&符号呢?

1,216

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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