如何得到本机登陆账号

[leonnet]

如何在这里得到本机登陆账号
<td >员工号:<input type=text name="bbcxj" size=10>

以下是代码

<%@language="VBSCRIPT"%>
<title>考勤数据</title>
<center>
考勤数据<p><br>
</p>
</center>
<p>
<%

dim Fromday,Today
dim TempDate
TempDate=formatdatetime(date()-1,2)
Today=Cstr(Year(TempDate))

if Month(TempDate)<10 then
Today=Today+"0"+Cstr(Month(TempDate))
else
Today=Today+Cstr(Month(TempDate))
end if

'设置查询开始日期为当月的第１天
Fromday=Today+"01"

if Day(TempDate)<10 then
Today=Today+"0"+Cstr(Day(TempDate))
else
Today=Today+Cstr(Day(TempDate))
end if

'Response.Write Today
%>
<form method="POST" action="hl_query.asp">
<table align="center" border=1>
<tr>
<td >查询开始日期:<input type=text name="bbcxksrq" value=<%=Fromday%> size=10>
<td >查询结束日期:<input type=text name="bbcxjsrq" value=<%=Today%> size=10>
<td >员工号:<input type=text name="bbcxj" size=10>
</tr>
<tr>
<td colspan="2" align="center">
<input type="submit" value="提交查询">
 
<input type="reset" value="重置查询">
</td>
</tr>
</table>
</form>
<p>
<div align="center"><br>
</div>
<hr>
<div align="center">建议屏幕分辨率1024*768 </div>
<hr>
<div align="center"></center> </div>
</body>

[孟子E章]

<%
Response.Write Request.ServerVariables("LOGON_USER")
' or
Response.Write Request.ServerVariables("AUTH_USER")
%>

前提是，你必须将iis的匿名访问去掉才能得到

[yangtututu]

楼上 正解

[leonnet]

如何加到<td >员工号:<input type=text name="bbcxj" size=10>
这个里边去呢

[xzwms2010]

<%
Response.Write Request.ServerVariables("LOGON_USER")
' or
Response.Write Request.ServerVariables("AUTH_USER")
%> 这个方法是对你!我就是这样用的!iis的匿名访问去掉(必须的!)

[抓不住老鼠的猫-总是眼睁睁看它逃跑]

要使用ActiveX控件

[孟子E章]

<input type=text name="bbcxj" size=10 value="<%=Request.ServerVariables("LOGON_USER")%>">