#####高手的问题，有点难度，不会的也可以凑个热闹，会的盼望给我解围。#####

0956304127832708 2003-09-15 11:30:24

问题一（20分）：
在线用户的标识我都把它保存在application变量中,如果谁关闭了窗口就我把该变量中的标识用空替换,可是有客户机器突然重启,于是它就没有调用我的关闭窗口里面的一个替换事件,问:如何捕获重启机器的用户登录标识名?

问题二(10分):
我的一个dropdownlist里面绑定的是一个表里里面的数据,都是填充的用户名, 可是奇怪的是只能选择dropdownlist里面的前三个用户名,当选择后面的用户名时突然跳到第一个用户名作为了选择项,请问是什么原因?

...全文

47 12 打赏收藏转发到动态举报

写回复

用AI写文章

12 条回复

切换为时间正序

请发表友善的回复…

发表回复

saucer 2003-09-15

打赏
举报

1. no good method, either use Session_End or create your own schema using Cache object, consult

Preventing Multiple Logins in ASP.NET
http://www.eggheadcafe.com/articles/20030418.asp

Prevent Multiple Logins Using the Cache in ASP.NET
http://www.eggheadcafe.com/articles/20030416.asp

2. where is this DropDownList? did you set AutoPostBack=true on the dropdown?

0956304127832708 2003-09-15

打赏
举报

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If Not IsPostBack Then
Dim myconn As New SqlConnection("server=nikko3;database=iteminf;uid=sa;pwd=")
Dim sqlwhere As String
Dim i As Integer = 0
sqlwhere = "select name,ipaddress from userinfo"
myconn.Open()
Dim da As New SqlDataAdapter(sqlwhere, myconn)
Dim ds As New DataSet()
da.Fill(ds, "receiver")
sendto.DataTextField = ds.Tables("receiver").Columns(0).ColumnName
sendto.DataValueField = ds.Tables("receiver").Columns(1).ColumnName
sendto.DataSource = ds.Tables(0).DefaultView
sendto.DataBind()
End If
'If Request.QueryString("sendto") <> "" Then
' sendto.Items.FindByText("陈廖英").Selected = True
'End If
End Sub

下拉框就与这个有关，该网页是用另一个窗口中下面的代码中打开：
Private Sub DataGrid1_ItemCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs) Handles DataGrid1.ItemCommand
If e.CommandName = "Select" Then
RegisterStartupScript("sendmessage1", "<script language=javascript>window.showModalDialog('发送短信.aspx?sendto=郭先生','newwin','dialogHeight:151px; dialogWidth: 369px; dialogTop: 200px; dialogLeft: 300px; edge: Raised; center: Yes; help: Yes;fullscreen:yes;toolbar:no;location:no;directories:no;menubar:no;,scrollbars:no; resizable:Yes; status: no;');</script>")
End If
End Sub

ryuubun 2003-09-15

打赏
举报

怎么如此的奇怪？

Inyoureyes 2003-09-15

打赏
举报

第一个问题比较头疼，很多网站多有这个问题的，但是好像害处不大。可能人数统计上会出现几个误差吧（不大可能大批量停机，除非中国大停电）。
你的状态肯定是被提交刷新掉了，但是原因不清楚。所以第二个问题要看看你的代码。

0956304127832708 2003-09-15

打赏
举报

大侠，快来呀！我急着哩.5555555555555555555555555555555555555555555555

0956304127832708 2003-09-15

打赏
举报

还有第二个问题是怎么回事啊？怎么如何的奇怪？

0956304127832708 2003-09-15

打赏
举报

那有什么办法让计算机过一段时间自动检察当前application里面的用户是否还在呢？
当客户关闭主页后我就调用了一个网页，里面只有一句话：
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Application("allonline") = Replace(Application("allonline"), Session("currentloginuser"), "")
End Sub
要不然显示当前在线用户的时候，那个死了机的人也还在。

ryuubun 2003-09-15