这个asp源代码包含了流行的ajax星级投票功能，和无刷新发表评论的功能。如果大家想研究这个功能可以下载下面的源代码！压缩包解压后放在虚拟目录中运行index.html。

投票截图：

用到的投票星星图片

先给出javascript源代码：

function GetResultjishu()
{
/*
*/
var maxid1;
var maxid;
var oBao1 = new ActiveXObject("Microsoft.XMLHTTP");
//特殊字符：+,%,&,=,?等的传输解决办法.字符串先用escape编码的.
//Update:2004-6-1 12:22
oBao1.open("POST","readxing.asp",false);
oBao1.send();
//服务器端处理返回的是经过escape编码的字符串.
maxid1 = unescape(oBao1.responseText);
if (maxid1>120){
maxid=maxid1/120;
}else
maxid=maxid1;
    var t=document.styleSheets[2];
 t.cssText=".star-rating li.current-rating{background: url(images/star_rating2.gif) left bottom;position: absolute;height: 30px;width:"+maxid+"px;display: block;text-indent: -9000px;z-index: 1;}";
document.getElementById("showf").innerHTML=maxid1;
}

function GetResult()
{
/*
*--------------- GetResult() -----------------
* GetResult()
* 功能:通过XMLHTTP发送请求,返回结果.
* 参数:str,字符串,发送条件.
* 实例:GetResult();
*--------------- GetResult() -----------------
*/
var oBao = new ActiveXObject("Microsoft.XMLHTTP");
//特殊字符：+,%,&,=,?等的传输解决办法.字符串先用escape编码的.
//Update:2004-6-1 12:22
oBao.open("POST","readmessage.asp",false);
oBao.send();
//服务器端处理返回的是经过escape编码的字符串.
var strResult = unescape(oBao.responseText);
//将字符串分开.
var arrResult = strResult.split("###");
RemoveRow(); //删除以前的数据.
//将取得的字符串分开,并写入表格中.
for(var i=0;i<arrResult.length;i++)
{
arrTmp = arrResult[i].split("@@@");
num1 = arrTmp[0]; //字段num1的值
num2 = arrTmp[1]; //字段num2的值
row1 = tb.insertRow();
cell1 = row1.insertCell();
cell1.innerHTML ="<font color='#ff0000'><b>网友:</b></font> <font color='000000'><b>"+ num1+"</b></font>";
cell2 = row1.insertCell();
cell2.innerHTML = num2 ;
}

}
function RemoveRow()
{
//保留第一行表头,其余数据均删除.
var iRows = tb.rows.length;
for(var i=0;i<iRows-1;i++)
{
tb.deleteRow(1);
}
}
function AddDataPost(sUserId,sUserName)
{
/*
 *--------------- AddDataPost(sUserId,sUserName) -----------------
 * AddDataPost(sUserId,sUserName)
 * 功能:通过XMLHTTP添加数据.相当于Form的Method=Post.
 * 参数:sUserId,字符串,发送条件.
 * 参数:sUserName,字符串,发送条件.
 * 实例:AddDataPost(document.all.userid.value,document.all.username.value);
 *--------------- AddDataPost(sUserId,sUserName) -----------------
 */
    var oBao = new ActiveXObject("Microsoft.XMLHTTP");
    //特殊字符：+,%,&,=,?等的传输解决办法.
    //Update:2004-6-1 12:22
    //escape(sUserId),escape(sUserName);
if (sUserName==""){
    sUserName="我还没有想好要说什么！"
    }
if (sUserId==""){
    sUserId="无名侠客"
    }
    sUserId = escape(sUserId);
    sUserName = escape(sUserName);
 var userInfo = "userid="+sUserId+"&username="+sUserName;
    oBao.open("POST","adddate.asp",false);
    oBao.setRequestHeader("Content-Type","application/x-www-form-urlencoded")
    oBao.send(userInfo);
    //清空输入框数据.
    document.all.userid.value="";
    document.all.username.value="";
    //服务器端处理返回的是经过escape编码的字符串.
    GetResult();
    //alert(unescape(oBao.responseText))
}
function Addxing(ddate)
{
/*
 *--------------- AddDataPost(sUserId,sUserName) -----------------
 * AddDataPost(sUserId,sUserName)
 * 功能:通过XMLHTTP添加数据.相当于Form的Method=Post.
 * 参数:sUserId,字符串,发送条件.
 * 参数:sUserName,字符串,发送条件.
 * 实例:AddDataPost(document.all.userid.value,document.all.username.value);
 *--------------- AddDataPost(sUserId,sUserName) -----------------
 */
    var oBao3 = new ActiveXObject("Microsoft.XMLHTTP");
    ddate = escape(ddate);
    var userInfo3 = "ddate="+ddate;
    oBao3.open("POST","addxing.asp",false);
    oBao3.setRequestHeader("Content-Type","application/x-www-form-urlencoded")
    oBao3.send(userInfo3);
     GetResultjishu();
}

查看更多关于ajax的文章

源代码打包下载：ajax-toupiao.rar（70KB）