当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp实现dig功能的js代码

ASP
ASP调用ORACLE存储过程并返回结果集
用ASP实现网页BBS
关于Global.asa文件的深入研究与session变量失效提示的具体方法
简易ASP+注册系统
防护手册:如何防止ASP木马在服务器上运行
用Visual Basic实现多画面播放功能之二
如何增强ASP程序性能(1)
如何增强ASP程序性能(2)
如何增强ASP程序性能(3)
ASP备份数据库
二十八条改善 ASP 性能和外观的技巧
在Form域中Post大于100K的数据
如何使用ASP制作模似动态生长的表单?
Microsoft IIS 真的如此「不安全」吗?(1)
Microsoft IIS 真的如此「不安全」吗?(2)
Microsoft IIS 真的如此「不安全」吗?(3)
Microsoft IIS 真的如此「不安全」吗?(4)
Microsoft IIS 真的如此「不安全」吗?(5)
关于页面和代码分离
ServerVariables 对路径的操作

ASP 中的 asp实现dig功能的js代码


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-10-12   浏览: 161 ::
收藏到网摘: n/a

这个是从科讯系统提出了的js代码 //ajax 控件
function DiggAjax(){
var xhrObj=null;
if(window.XMLHttpRequest){
xhrObj=new XMLHttpRequest();
}
else if(window.ActiveXObject){
try{
xhrObj=new ActiveXObject("Microsoft.XMLHTTP");
}
catch(e1)
{
try{
xhrObj=new ActiveXObject("MSXML2.XMLHTTP");
}
catch(e2){
try{
xhrObj=new ActiveXObject("MSXML3.XMLHTTP");
}
catch(e3){
alert("创建Ajax失败:"+e3)
}
}
}
}
else
{
alert("未能识别的浏览器");
}
return xhrObj;
}
var loader=new DiggAjax;
function ajaxLoadPage(url,request,method,fun)
{
method=method.toUpperCase();
if (method=='GET')
{
urls=url.split("?");
if (urls[1]=='' || typeof urls[1]=='undefined')
{
url=urls[0]+"?"+request;
}
else
{
url=urls[0]+"?"+urls[1]+"&"+request;
}
request=null;
}
loader.open(method,url,true);
if (method=="POST")
{
loader.setRequestHeader("Content-Type","application/x-www-form-urlencoded");
}
loader.onreadystatechange=function(){
eval(fun+'()');
}
loader.send(request);
}
function callbacks()
{
if (loader.readyState==4)
{
var s=loader.responseText;
switch (s)
{
case "err":
alert('digg error!');
break;
case "over":
alert('你已推荐过了!');
break;
case "nologin":
alert('您还没有登录,不能推荐!');
break;
default:
var sarr=s.split('|');
eval("document.all.s"+sarr[0]).innerHTML=sarr[1];
eval("document.all.d"+sarr[0]).innerHTML="Thanks";
}
}
}

//Digg
function digg(channelid,infoid,installdir)
{
ajaxLoadPage(installdir+'plus/digg.asp','action=hits&ChannelID='+channelid+'&infoid=' +infoid,'post','callbacks');
}
function show_digg(channelid,infoid,installdir)
{
var xhr=new DiggAjax();
xhr.open("get",installdir+"plus/digg.asp?channelid="+channelid+"&infoid="+infoid+"&action=show",true);
xhr.onreadystatechange=function (){
if(xhr.readyState==1)
{
eval("document.all.s"+infoid).innerHTML="<img src='"+installdir+"/upload/tech/20091012/20091012012410_430c3626b879b4005d41b8a46172e0c0.gif'>";
}
else if(xhr.readyState==2 || xhr.readyState==3)
{
eval("document.all.s"+infoid).innerHTML="<img src='"+installdir+"/upload/tech/20091012/20091012012410_430c3626b879b4005d41b8a46172e0c0.gif'>";
}
else if(xhr.readyState==4)
{
if (xhr.status==200)
{
var r=xhr.responseText
var rarr=r.split('|');
eval("document.all.s"+infoid).innerHTML=rarr[1];
}
}
}
xhr.send(null);
}