您的位置：程序门 -> vb -> 数据库（包含打印，安装，报表)

改了一早晨也没有改对，各位高手帮帮忙

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

改了一早晨也没有改对，各位高手帮帮忙

发表于：2008-02-16 13:56:57 楼主

原程序代码是这样：
public username as string
public adocon as adodb.connection
public rsado as adodb.recordset
public userdept as string

private function verifyuer（) as boolean
on error goto errorhandler
dim strsql as string
strsql = "select * from user "
strsql = strsql & "where userid='" & text1（1).text & "' and userpwd='" & text1（2).text & "'"
rsado.open strsql, adocon, adopenstatic, adlockreadonly
if rsado.eof then
msgbox "用户名或密码错误，请重新输入！", vbcritical, "用户登陆"
text1（1).setfocus
exit function
end if
userdept = rsado（"deptuserin")
username = rsado（"truename")
verifyuser = true
exit function
errorhandler:
msgbox "验证用户信息出错！" & err.description, vbcritical, "出错信息"
exit function
end function

最后调试的时候提示的是“user”附近有语法错误。是不是我的rsado.open那儿写的不对啊？还是那儿出错了，急用哦，在线等候

发表于：2008-02-16 14:01:181楼得分:0

user 是关键字
修改
strsql = "select * from 〔user〕 "

发表于：2008-02-16 14:35:212楼得分:0

select * from [user]

方括号

发表于：2008-02-17 14:13:003楼得分:0

user是关键字，可用方括号括起来，建议不要将关键字作为数据库名，表名及字段名来使用
select * from [user]

发表于：2008-02-19 11:52:434楼得分:0

把vss服务器上的数据存放目录共享，并且设置上有读写权限。客户端通过ip地址或机器名查找vss服务器即可。

发表于：2008-02-19 13:49:425楼得分:0

user 用[]括起来,数据表名最好不要使用关键字来命名,用[user]后要留出空格.

其他资讯