登錄次數的問題! - ASP技术论坛

xunmi_love

等　级：论坛游民
帖　子：204
专家分：18
注　册：2006-10-14
结帖率：57.14%

楼主

问题点数：0 回复次数：8

登錄次數的問題!

<%
names=request.form("use")
pwd=request.form("pwd")
dim conn
dim connstr
c&server.mappath("data\bb.mdb")
set conn=server.createobject("adodb.connection")
conn.open connstr
ssql="select * from userss where names='"&names&"'"
set rs=server.CreateObject("ADODB.RecordSet")
rs.open ssql,conn,1,3
if pwd<>rs("pwds") then
response.write "<link rel='stylesheet' type='text/css' href='style.css'>"
response.write "<body bgcolor='#ffffef'>"
response.write "Sorry,請輸入正確的用戶名和密碼 =====<a href=default.asp>返回</a>====="
rs.close
response.end()
end if
ssql="update userss Dcount=Dcount+1 where names='"&names&"'"
application.lock()
rs.open ssql,conn,1,3
application.Unlock()
session("nana")=rs("TruName")
session("keke")=rs("oss")
response.redirect "default2.asp"
rs.close
%>

數據庫中的Dcount不加1.別的地方都沒有問題.也不報錯.

這個是我抄別人的.請各位幫下忙

搜索更多相关主题的帖子: asp　vbscript　

2007-11-23 14:26

yms123

等　级：版主
威　望：209
帖　子：12488
专家分：19042
注　册：2004-7-17

第 3 楼

得分:0

ssql="update userss Dcount=Dcount+1 where names='"&names&"'"
application.lock()
rs.open ssql,conn,1,3
application.Unlock()
这里改为
rs("Dcount")=rs("Dcount")+1
rs.update

2007-11-23 16:32

xunmi_love

等　级：论坛游民
帖　子：204
专家分：18
注　册：2006-10-14

第 5 楼

得分:0

xunmi_love

還是沒有寫入Dcount.....你們兩位的都試了一下.MADPBPL的我也加上了update.
好像還是以前那種情況.沒有報錯.

請再幫忙一次

低頭做人，擡頭做事。

2007-11-24 11:50

hmhz

等　级：贵宾
威　望：30
帖　子：1890
专家分：503
注　册：2006-12-17

第 7 楼

得分:0

这样写的

程序代码：

 
<%
set rs=server.createobject("adodb.recordset")                            
rs.open "select Dcount from userss where names='"&names&"'",conn,1,3
if not(rs.eof and rs.bof) then
rs("Dcount")=rs("Dcount")+1
end if
rs.update
rs.close
set rs=nothing
%>

[编程论坛] ASP超级群：49158383 敲门暗号：ASP编程
龍艺博客 http://www.

2007-11-24 14:35

jfjfgz

等　级：新手上路
帖　子：100
专家分：0
注　册：2007-11-21

第 9 楼

得分:0

:victory:

2007-11-24 16:56