标题:我的代码如何判断表中的数据是否存在
只看楼主
meng0907
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2008-8-12
 问题点数:0 回复次数:4 
我的代码如何判断表中的数据是否存在
<%
'CompanyName = Request("CompanyName")
CName = Request("CName")
City = Request("City")
abc=request("xxx")
If CName = "" Or City = "" Then
Response.Write "<html><body><center><font size=5>请将资料填写完整。</font></center></body></html>"
'Response.Redirect "error.htm"
Response.End
End If
set dbconnection=Server.CREATEOBJECT("ADODB.CONNECTION")
DBPath = Server.MapPath("fanyong.mdb")
dbconnection.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open abc, dbconnection, adOpenDynamic, 3
rs.AddNew
rs("用户名") = CName
rs("支付宝") = City
rs("日期")=date()
rs.Update
Response.Write "<html><body><center><font size=5>祝贺,您的数据已经添加进数据库了!<p>"
Response.Write "</font></center></body></html>"
%>
这是我代码 是用abc获取上个页面的值也就是表名 然后把写数据写入abc对应的表内 如果判断数据是否存在呢 就是判断用户名 是否 存在
搜索更多相关主题的帖子: 数据 代码 判断 
2008-08-12 23:57
madpbpl
Rank: 4
等 级:贵宾
威 望:11
帖 子:2876
专家分:244
注 册:2007-4-5
得分:0 
rs.open abc where 用户名 ='" & CName &"',dbconnection,adOpenDynamic,3
if not (rs.eof and rs.bof) then
Response.write "此用户已存在"
else
rs.AddNew
.........             '你的语句
end if
2008-08-13 02:35
meng0907
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2008-8-12
得分:0 
'" & CName &"',dbconnection,adOpenDynamic,3
从这里开始就不行了 由于有'号 后面的语句都屏蔽掉了!!!
2008-08-13 10:34
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
得分:0 
'" & CName &"'",dbconnection,adOpenDynamic,3
2008-08-13 14:41
meng0907
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2008-8-12
得分:0 
不行还是有错误楼上的还是被屏蔽掉 我在最前面加了“后 提交数据有错误
错误类型:
Microsoft VBScript 编译器错误 (0x800A0401)
语句未结束
/meng/fanyong/adddat.asp, line 18, column 12
rs.open abc where 用户名 ="'" & CName &"'",dbconnection,adOpenDynamic,3
-----------^


浏览器类型:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; Maxthon; Alexa Toolbar; .NET CLR 2.0.50727)

网页:
POST 50 ??? /meng/fanyong/adddat.asp
2008-08-15 18:05



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-228001-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.349999 second(s), 8 queries.
Copyright©2004-2025, BCCN.NET, All Rights Reserved