怎么样检验添加的用户已存在
怎么样检验添加的用户已存在 问题点数：20、回复次数：12Top
1 楼hank212（IT民工）回复于 2005-12-22 18:44:05 得分 0
rst.open "select * from table where field1='a' and ..."
if not rst.eof then
msgbox "有这条记录"
end ifTop
2 楼fishmans（金脚指）回复于 2005-12-22 18:52:51 得分 0
rst.open "select username from userinfo where username='"+trim(text1.text)+"'",cnn
if not (rst.eof and rst.bof) then
msgbox "用户存在 "
end ifTop
3 楼province_（雍昊）回复于 2005-12-22 19:45:08 得分 0
再或者
rst.open "select count(*) from userinfo where username='"+trim(text1.text)+"'",cnn
if rst(0)>0 then msgbox "用户存在 "Top
4 楼wyf2（创新）回复于 2005-12-23 10:49:46 得分 0
rs.open "select username from user where username='"+trim(text1.text)+"'",conn
我写了这一句
但运行时错误信息“对象变量或with块变量未设置”
Top
5 楼haisenmai（我应该做得到）回复于 2005-12-23 11:30:47 得分 0
rs 或者conn 没有定义Top
6 楼province_（雍昊）回复于 2005-12-23 12:10:37 得分 0
那是因为你的RST（记录集对象）没有实例化，你声明的时候加个NEW就可以了。
dim rst as new adodb.recordsetTop
7 楼wyf2（创新）回复于 2005-12-23 13:16:09 得分 0
rs.Open "select * from use where gusetname='" & Trim(Text1.Text) & "'", conn, adOpenStatic, adLockOptimistic
错误信息“至少一个参数没有被指定”但是我这里的参数都写上去了呀Top
8 楼wyf2（创新）回复于 2005-12-23 17:16:30 得分 0
怎么没有回答我Top
9 楼xihongjian（踏上编程路）回复于 2005-12-23 20:43:53 得分 0
他前面的gusetname改成这样看看Trim(gusetname)
也就是把代码改成
rs.Open "select * from use where Trim(gusetname)='" & Trim(Text1.Text) & "'", conn, adOpenStatic, adLockOptimisticTop
10 楼bulletCoderHope（小子）回复于 2005-12-23 21:08:29 得分 0
一大堆都是正确答案，还有个就是用rs.Open "select * from use where Trim(gusetname)='" & Trim(Text1.Text) & "'", conn, adOpenStatic, adLockOptimistic
if rs.recordcount<>0 then
msgbox"存在用户"
else
msgbox"用户不存在"
end ifTop
11 楼wyf2（创新）回复于 2005-12-24 11:17:40 得分 0
如果我这样写
sql="select * from use where Trim(gusetname)='" & Trim(Text1.Text) & "'"
set rs=conn.exucte(sql)
那么到把新增的用户添加到表里的时候会提示该表不支持更新，如果是这样要怎么样改才能让它支持呀Top
12 楼wyf2（创新）回复于 2005-12-25 13:23:56 得分 0
帮帮Top