Asp+Ajax實(shí)現(xiàn)無(wú)刷新增加好友_ASP教程

教程Tag：暫無(wú)Tag,歡迎添加,賺取U幣!

推薦：ASP限制ip投票完整實(shí)例代碼
由于工作關(guān)系,要做個(gè)人空間,其中有一功能是對(duì)用戶投票，要求同一IP只能對(duì)同一用戶投票一次，貼Asp代碼： % '作者：無(wú)情出處： db_conn(dbs) Voteusername=trim(request.QueryString(username)) rs_create(select username from [user] where username ='

由于工作關(guān)系,要做個(gè)人空間,其中有一功能是增加對(duì)方為好友.如圖:

用到的方法是ajax,費(fèi)話少說(shuō)貼切代碼:

<a href="javascript：void(0);" onClick="add_username('<%= rs("username") %>');">加為好友</a>,用到的js驗(yàn)證:

ajax.js代碼:

http_request = false;

if (window.XMLHttpRequest) {
//對(duì)于Mozilla、Netscape、Safari等瀏覽器，創(chuàng)建XMLHttpRequest
http_request = new XMLHttpRequest();
if (http_request.overrideMimeType) {
//如果服務(wù)器響應(yīng)的header不是text/xml，可以調(diào)用其它方法修改該header
http_request.overrideMimeType('text/xml');
}
} else if (window.ActiveXObject) {
// 對(duì)于Internet Explorer瀏覽器，創(chuàng)建XMLHttpRequest
try {
http_request = new ActiveXObject("Msxml2.XMLHTTP");
} catch (e) {
try {
http_request = new ActiveXObject("Microsoft.XMLHTTP");
} catch (e) {}
}
}
return http_request;
}

//獲得Url 的responseText
function getResponseText(url)
{
http_request=getRequest();
http_request.open('GET', url, false);
http_request.send(null);

if (http_request.readyState == 4)
　　 {
　　　// 收到完整的服務(wù)器響應(yīng)
　　　if (http_request.status == 200) {
　　 //HTTP服務(wù)器響應(yīng)的值OK
　　　　 requestdoc = http_request.responseText;
　　　　 //將服務(wù)器返回的字符串寫(xiě)到頁(yè)面中ID為message的區(qū)域
}
　　　 else {
　　　　 requestdoc = http_request.status;
　　　 }
　　 }
return requestdoc;
}

//POST 提交數(shù)據(jù)
function posthttp(str,url){
http_request=getRequest();
http_request.open('POST',url,false);
http_request.setRequestHeader("Content-Length",str.length);
http_request.setRequestHeader("CONTENT-TYPE","application/x-www-form-urlencoded");

http_request.send(str);
if (http_request.readyState == 4)
{
　　　// 收到完整的服務(wù)器響應(yīng)
　　　if (http_request.status == 200) {
//HTTP服務(wù)器響應(yīng)的值OK
　　　 requestdoc = http_request.responseText;
　　　 //將服務(wù)器返回的字符串寫(xiě)到頁(yè)面中ID為message的區(qū)域
return requestdoc;
}else{
　　　　 //requestdoc = http_request.status;
return false;
　　 }
}
}

//獲得Url 的responseXML
function getXMLResponseText(url)
{
http_request=getRequest();
http_request.open('GET', url, false);
http_request.send(null);

if (http_request.readyState == 4)
　　 {
　　　// 收到完整的服務(wù)器響應(yīng)
　　　if (http_request.status == 200) {
　　　　 //HTTP服務(wù)器響應(yīng)的值OK
　　　　 requestdoc = http_request.responseXML;
　　　　 //將服務(wù)器返回的字符串寫(xiě)到頁(yè)面中ID為message的區(qū)域
}
　　　 else {
　　　　 requestdoc = http_request.status;
　　　 }
　　 }
return requestdoc;
}

然后在Add_Friend.asp里處理一下就可以了.

<%
Response.ContentType="text/html; charset=gb2312"
'處理程序就不貼了,先判斷一下用戶是否登陸,好友的用戶名是否傳過(guò)來(lái)了,好友的用戶名是否合法,該好友是否第一次增加等信息,如果增加正確,就返回1

If Add_Friend = 1 Then '如果能正確增加好友,Add_Friend=1
response.write "1" '這個(gè)值自動(dòng)的返回給js
Else
response.write "出錯(cuò)了"'請(qǐng)檢查代碼
End If
%>

返回提示如圖:

分享：ASP長(zhǎng)數(shù)字用逗號(hào)隔開(kāi)顯示實(shí)例代碼
% Function Comma(str) If Not(IsNumeric(str)) Or str = 0 Then Result = 0 ElseIf Len(Fix(str)) 4 Then Result = str Else Pos = Instr(1,str,.) If Pos 0 Then Dec = Mid(str,Pos) End if Res = StrReverse(Fix(str)) LoopCount = 1 While LoopCount =