EXCHANGE的登陆界面代码（服务器版）

lishush

登陆界面的客户端脚本如下：<br>
<SCRIPT LANGUAGE=javascript><br>
<!-- <br>
var Location1="<a target=_blank href=http://servername/exchange&quot>http://servername/exchange&quot</a>;; //定义你的exchange 2000 server OWA路径 <br>
var auth = new ActiveXObject("msxml2.xmlhttp"); //创建msxml2.xmlhttp对象 <br>
auth.open("get",Location1,false"username","pwd");<br>
try{<br>
auth.send(); <br>
}catch(Exception ex){<br>alert("请到系统维护中下载补丁."); //报错 <br>return;<br>
}<br>
switch(auth.status){ //检测auth.send以后的状态， <br>
case 200: //状态为：200代表用户名密码正确， <br>
window.location.href = Location1; //浏览器重转向至exchange 2000 server OWA <br>
break; <br>
case 401: //状态为：401代表用户名密码不正确，身份验证错误 <br>
alert("用户无效或密码错误。"); //报错 <br>
break; <br>
default: //其它状态，如服务器无法访问 <br>
alert(auth.status); <br>
alert("对不起，服务器发生错误，请稍后再试！"); //报错 <br>
}<br>
--><br>
</SCRIPT> <br>
<br>
上面的脚本方法可以让用户直接登录到邮箱，但有一个缺点就是需要打系统补丁，对于很多用户的系统来说，这是很麻烦的一件事情，所以我想将他改为服务器端脚本，代码如下：<br>
<%<br>
dim Location1,auth<br>
<br>
Location1="<a target=_blank href=http://servername/exchange&quot>http://servername/exchange&quot</a>;; '定义你的exchange 2000 server OWA路径 <br>
<br>
set auth = CreateObject("msxml2.xmlhttp") '创建msxml2.xmlhttp对象 <br>
<br>
auth.open "GET",Location1,false,"user","pwd"<br>
auth.send()<br>
<br>
if auth.status=200 then<br>response.Redirect(Location1)<br>
elseif auth.status=401 then<br>response.write "用户无效或密码错误。"<br>
else<br>response.write "对不起，服务器发生错误，请稍后再试！"<br>
end if<br>
<br>
%><br>
但执行的时候还是出来登录对话框，不知道怎么解决！<br>

lishush

没有人知道吗？

simtomato

把服务器中的网站的权限更改一下，增加everyone，即可。

simtomato

不过你说的使用客户端代码需要打系统补丁，这个补丁是什么？

lishush

论坛里面有的，你自己去找找吧。<br>
<br>
不过你说的增加everyone用户能解决这个问题吗？他弹出来登陆对话框，好像和这个没有什么关系吧