用户登录后, 很快又返回登录界面的原因

[dajiaduoguanzhao]

我用AS+DW+ACCESS设计的客户登录程序, 本机调试没有任何问题,但上传后,只要是客户登录后,一会儿就又返回到登录界面, 要求重新输入再次等录, 反复N次都这样. 请大家帮忙看下,是什么问题. 在线等... 谢谢.

[dajiaduoguanzhao]

9楼的朋友, 那该如何改程序呢?

[dajiaduoguanzhao]

就象我们这个论坛, 如果不注销登录,基本能呆半天,如何实现啊?

[dajiaduoguanzhao]

有朋友能指点一下吗? 在线等......

[cfreez]

自己搜索下session丢失原因吧，有很多因素影响

[zhnzzy]

[Quote=引用 11 楼 dajiaduoguanzhao 的回复:]
就象我们这个论坛, 如果不注销登录,基本能呆半天,如何实现啊?
[/Quote]
这论坛不是让你勾选2周内不用登录的吗。就是设置个cookie生效时间
加一句话就可以了
cookie.Expires = DateTime.Now.AddMinutes(60*24);//保存一天

[lgaimin]

session丢失,或者设置的过期时间太短了吧?

[wangrumeng]

[Quote=引用 14 楼 zhnzzy 的回复:]
引用 11 楼 dajiaduoguanzhao 的回复:
就象我们这个论坛, 如果不注销登录,基本能呆半天,如何实现啊?

这论坛不是让你勾选2周内不用登录的吗。就是设置个cookie生效时间
加一句话就可以了
cookie.Expires = DateTime.Now.AddMinutes(60*24);//保存一天
[/Quote]

同意

[takako_mu]

權限問題?session超時?

[bj890]

怎么保存的用户信息！

[蓝海D鱼]

[Quote=引用 1 楼 takako_mu 的回复:]
權限問題?session超時?
[/Quote]up

[沉序员]

[Quote=引用 3 楼 jingshuaizh 的回复:]
引用 1 楼 takako_mu 的回复:
權限問題?session超時?
up
[/Quote]

TIMEOUT=9999

[dajiaduoguanzhao]

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
If cstr(Request.Form("c_username"))<>"" Then
If Request.form("checkbox") ="1" Then
Response.Cookies("remname") = Request.Form("c_username")
Response.Cookies("rempass") = Request.Form("c_password")
Response.Cookies("remme") = "1"
Response.Cookies("remname").expires = Date + 365
Response.Cookies("rempass").expires = Date + 365
Response.Cookies("remme").expires = Date + 365
Else
Response.Cookies("remme") = ""
Response.Cookies("remname") = ""
Response.Cookies("rempass") = ""
End If
End If
%>
<%
' *** Logout the current user.
MM_Logout = CStr(Request.ServerVariables("URL")) & "?MM_Logoutnow=1"
If (CStr(Request("MM_Logoutnow")) = "1") Then
Session.Contents.Remove("MM_Username")
Session.Contents.Remove("MM_UserAuthorization")
MM_logoutRedirectPage = "../mainpage.asp"
' redirect with URL parameters (remove the "MM_Logoutnow" query param).
if (MM_logoutRedirectPage = "") Then MM_logoutRedirectPage = CStr(Request.ServerVariables("URL"))
If (InStr(1, UC_redirectPage, "?", vbTextCompare) = 0 And Request.QueryString <> "") Then
MM_newQS = "?"
For Each Item In Request.QueryString
If (Item <> "MM_Logoutnow") Then
If (Len(MM_newQS) > 1) Then MM_newQS = MM_newQS & "&"
MM_newQS = MM_newQS & Item & "=" & Server.URLencode(Request.QueryString(Item))
End If
Next
if (Len(MM_newQS) > 1) Then MM_logoutRedirectPage = MM_logoutRedirectPage & MM_newQS
End If
Response.Redirect(MM_logoutRedirectPage)
End If
%>
我是用DW做的. 以上是系统生成的代码.

[dajiaduoguanzhao]

<%
' *** Restrict Access To Page: Grant or deny access to this page
MM_authorizedUsers=""
MM_authFailedURL="login.asp?errMsg=欢迎进入好吃大家庭，请用申请的用户名登录。"
MM_grantAccess=false
If Session("MM_Username") <> "" Then
If (true Or CStr(Session("MM_UserAuthorization"))="") Or _
(InStr(1,MM_authorizedUsers,Session("MM_UserAuthorization"))>=1) Then
MM_grantAccess = true
End If
End If
If Not MM_grantAccess Then
MM_qsChar = "?"
If (InStr(1,MM_authFailedURL,"?") >= 1) Then MM_qsChar = "&"
MM_referrer = Request.ServerVariables("URL")
if (Len(Request.QueryString()) > 0) Then MM_referrer = MM_referrer & "?" & Request.QueryString()
MM_authFailedURL = MM_authFailedURL & MM_qsChar & "accessdenied=" & Server.URLEncode(MM_referrer)
Response.Redirect(MM_authFailedURL)
End If
%>
以上是限制对页访问的代码,也是DW自动生成的, 请大家帮忙看下. 最好能详细点说明,本人菜鸟一个. 刚学ASP没几天.

[dajiaduoguanzhao]

并且我在本机上调试时也没有问题啊, 上传到服务器才出现这问题, 晕..

[幕夜]

session丢失吧!

[Adechen]

session过期了的原因