请大家共同研究下这个段代码哪里出错了
以下是一段 在线留言的AJAX 应用,但是 不知道哪里的问题,提示只停留在 “正在保存留言...”[bo]home.asp [/bo]页面
<span id="book_err"></span><br>
<textarea name="message" id="message"></textarea> <br />
<input type="submit" name="btnOK" id="btnOK" value="提交留言" onclick="sendinfo(document.getElementById('message').value);"/>
[bo]AJAX.页面[/bo]
function sendinfo(message){
var xmlhttp;
try{
xmlhttp=new XMLHttpRequest();
}
catch(e){
xmlhttp=new ActiveXObject("Microsoft.XMLHTTP");
}
xmlhttp.onreadystatechange=function(){
if (xmlhttp.readyState==4){
if (xmlhttp.status==200){
var data=xmlhttp.responseText;
book_result(data);
}
else{
document.getElementById("book_err").innerHTML="<font color='red'>留言失败,请联系管理员</font>";
}
}
else{
document.getElementById("book_err").innerHTML="<font color='blue'>正在保存留言...</font>";
}
}
xmlhttp.open("post", "booksave.asp", true);
xmlhttp.setRequestHeader('Content-type','application/x-www-form-urlencoded');
xmlhttp.send("message="+escape(message));
}
//---------------------------------- AJAX 博客留言 信息添加状态----------------------------------
function book_result(data){
if(data==0){document.getElementById("book_err").innerHTML="<img src='../images/yesno.gif'/> 留言保存失败,请联系管理员";}
if(data==1){document.getElementById("book_err").innerHTML="<img src='../images/yesok.gif'/> 留言保存成功";}
if(data==2){document.getElementById("book_err").innerHTML="<img src='../images/yesno.gif'/> 你尚未登陆,请先登陆再留言";}
if(data==3){document.getElementById("book_err").innerHTML="<img src='../images/yesno.gif'/> 本系统不允许给自己留言";}
}
[bo]booksave.asp[/bo]
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!--#include file="../conn.asp"-->
<!--#include file="../CodePage.asp"-->
<%
if loginuserID<>"" then'判断用户是否已经登陆
'登陆成功用户继续执行以下操作
if loginuserID=myID then '如果登陆用户是博客所有者
response.Write(3)'输出不能给自己留言的警告标识
else'
'执行留言添加动作
message=trim(request.Form("message"))
strsql="insert into blog_book(userID,message) values("&loginuserID&",'"&message&"')"
call Table_Insert(strsql)
if err then
response.Write(0)'添加失败标记
else
response.Write(1)'添加成功标记
end if
'
end if
else'如果没有登陆,输出未登陆标记2
response.Write(2)
end if
%>