是这样的，用户登陆界面后进行投票操作，后台的数据表result负责存放投票结果，其中count1存放“张三”的选票数目，count2存放“李四”的选票数目，count3存放“王五”的选票数目，初始值都为0。
程序如下：
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="Connections/cnn.asp" -->
<%
Dim rs1
Dim rs1_numRows
Set rs1 = Server.CreateObject("ADODB.Recordset")
rs1.ActiveConnection = MM_cnn_STRING
rs1.Source = "SELECT ni, ei, Gi, ki from voter WHERE name='"&session("username")&"'"
rs1.CursorType = 1
rs1.CursorLocation = 2
rs1.LockType = 3
rs1.Open()
rs1_numRows = 0
%>
<%
Dim rs3
Dim rs3_numRows
Set rs3 = Server.CreateObject("ADODB.Recordset")
rs3.ActiveConnection = MM_cnn_STRING
rs3.Source = "SELECT * from result"
rs3.CursorType = 1
rs3.CursorLocation = 2
rs3.LockType = 3
rs3.Open()
rs3_numRows = 0
%>
<!--#include file="md5.asp"-->
<!--#include file="xmod.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtm
<%if request.QueryString("start") <>"" then%>
<%if cint(start)>0 then%>
<a href="search.asp?q= <%=q%>&start= <%if request.Query ......
我的網頁代碼為ASP語言,驗證方式為系統自帶的WINDOW驗證模式.
現在我如果要在ASP代碼中獲取當前的登入人 ......
