推薦：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 =
新聞熱點
疑難解答
