推薦：ASP限制ip投票完整實例代碼由於工作關係,要做個人空間,其中有一功能是對用戶投票，要求同一IP只能對同一用戶投票一次，貼Asp代碼： % '作者：無情出處： db_conn(dbs) Voteusername=trim(request.QueryString(username)) rs_create(select username from [user] where username ='
由於工作關係,要做個人空間,其中有一功能是增加對方為好友.如圖:
用到的方法是ajax,費話少說貼切代碼:
<a href=javascript：void(0); onClick =add_username('<%= rs(username) %> ');>加為好友</a>,用到的js驗證:
<script language = JavaScript src=ajax.js></script>
<script>
//add user
function add_username(usr){
//
var sta;
var username=usr;
if(username!=){
if(username!=){
username=username=+username;
sta=posthttp(username,Add_Friend.asp);
if(sta==false){
alert(添加失敗,服務器錯誤);
}else{
if(parseInt(sta)==1)
alert(恭喜您,好友添加成功！);
else
alert(sta);
}
}else{
alert(請輸入好友名);
}
}
}
</script>
ajax.js代碼:
http_request = false;
if (window.XMLHttpRequest) {
//對於Mozilla、Netscape、Safari等瀏覽器，創建XMLHttpRequest
http_request = new XMLHttpRequest();
if (http_request.overrideMimeType) {
//如果服務器響應的header不是text/xml，可以調用其它方法修改該header
http_request.overrideMimeType('text/xml');
}
} else if (window.ActiveXObject) {
// 對於Internet Explorer瀏覽器，創建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)
{
// 收到完整的服務器響應
if (http_request.status == 200) {
//HTTP服務器響應的值OK
requestdoc = http_request.responseText;
//將服務器返回的字符串寫到頁面中ID為message的區域
}
else {
requestdoc = http_request.status;
}
}
return requestdoc;
}
//POST 提交數據
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)
{
// 收到完整的服務器響應
if (http_request.status == 200) {
//HTTP服務器響應的值OK
requestdoc = http_request.responseText;
//將服務器返回的字符串寫到頁面中ID為message的區域
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)
{
// 收到完整的服務器響應
if (http_request.status == 200) {
//HTTP服務器響應的值OK
requestdoc = http_request.responseXML;
//將服務器返回的字符串寫到頁面中ID為message的區域
}
else {
requestdoc = http_request.status;
}
}
return requestdoc;
}
然後在Add_Friend.asp里處理一下就可以了.
<%
Response.ContentType=text/html; charset=gb2312
'處理程序就不貼了,先判斷一下用戶是否登陸,好友的用戶名是否傳過來了,好友的用戶名是否合法,該好友是否第一次增加等信息,如果增加正確,就返回1
If Add_Friend = 1 Then '如果能正確增加好友,Add_Friend=1
response.write 1 '這個值自動的返回給js
Else
response.write 出錯了'請檢查代碼
End If
%>
返回提示如圖:
分享：ASP長數字用逗號隔開顯示實例代碼% 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 =