又是一个session丢失的问题,请教各位
OS:windows2003server
site:d:\
虚拟目录:d:\don
IIS6
数据库access2000
有病情况:
每当把项目复制到一个新的机器上并设好虚拟目录后第一次编译后运行可以从login.aspx传至session传到personalDons.aspx
但第二次编译后就personalDons.aspx无法取得session值
__________________________________________________________________________
web.config配置如下:
<sessionState
mode="InProc"
cookieless="true"
timeout="30"
/>
__________________________________________________________________________
login.aspx登录代码:
Private Sub login_bu_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles login_bu.Click
Dim conn As OleDbConnection
Dim comm As OleDbCommand
Dim dr As OleDbDataReader
Dim userIsTrue As Boolean = False
Dim sqlstr As String = " select xh,mm from students where xh=@xh and mm=@mm"
conn = New OleDbConnection(ConfigurationSettings.AppSettings("conn"))
comm = New OleDbCommand(sqlstr, conn)
comm.CommandType = CommandType.Text
comm.Parameters.Add("@xh", OleDbType.Char, 20).Value = xh_tb.Text
comm.Parameters.Add("@mm", OleDbType.Char, 50).Value = mm_tb.Text
Try
conn.Open()
dr = comm.ExecuteReader
If dr.HasRows Then
dr.Read()
Session.Add("xh", dr.Item("xh"))
Session.Add("mm", dr.Item("mm"))
userIsTrue = True
Else
xh_tb.Text = ""
mm_tb.Text = ""
retinfo_lab.Text = "学号或密码有误,请重试或与管理员联系。"
userIsTrue = False
End If
Catch ex As Exception
Response.Write(ex.Message.ToString)
Finally
conn.Close()
End Try
If userIsTrue Then
Response.Redirect("personalDons.aspx")
End If
End Sub
___________________________________________________________________
personalDons.aspx代码如下:
Response.Write(Session.Count.ToString)
Response.Write("<br>")
Response.Write("学号:" + Session.Item("xh") + "<br>")
Response.Write("姓名:" + Session.Item("mm") + "<br>")
Response.Write(Session.SessionID.ToString)
session.count的值总为零,在使用断点调试的时候看到每当login.aspx转向personalDons.aspx时session.count就变为0.
___________________________________
我想着是不是OS2003的问题,不知怎么解决,看老帖也解决。
请教各位。谢谢!