AJAX简单应用实例-弹出层

所属分类: 网络编程 / ASP编程 阅读数: 672
收藏 0 赞 0 分享
function createobj() {
 if (window.ActiveXObject) {
         return(new ActiveXObject("Microsoft.XMLHTTP"));
     }
     else if (window.XMLHttpRequest) {
         return(new XMLHttpRequest());
     }
}


function personalInfo() {
  var oBao=createobj();
  var cont=document.getElementById("person_detial");
  var cont_a=document.getElementById("person_content");
  cont.style.display='block';
  cont.style.cursor='pointer';
  cont_a.innerHTML="请等待,加载中..."; 
  var my_url="getinfo.asp?"+Math.random();
  oBao.open("get",my_url,true); 
  oBao.onreadystatechange=function(){
  if(oBao.readyState==4){
   if(oBao.status==200){ 
     cont_a.innerHTML=oBao.responseText;
     }else{
     cont_a.innerHTML="出现错误,错误代码为:"+oBao.status;
    }  
  }
  }
  oBao.send(); 
 }



function Drag(id)
{
var self=this;
this.obj=(typeof(id)=="string")?document.getElementById(id):id;
this.obj.onmousedown=function(e)
{
e=e||window.event;
var obj=self.obj;//指向自己
if(e.layerX){obj.position={x:e.layerX,y:e.layerY};}
else{obj.position={x:e.offsetX,y:e.offsetY};}
document.onmousemove=self.start;
document.onmouseup=self.end;


}
this.start=function(e)
{
e=e||event;
document.onselectstart = function(){ return false; };
window.getSelection && window.getSelection().removeAllRanges();
var obj=self.obj;
obj.style.left=e.clientX-obj.position.x+"px";
obj.style.top=e.clientY-obj.position.y+"px";
}
this.end=function(e)
{
e=e||event; 
document.onmousemove = document.onmouseup = document.onselectstart = null;     
}
}
AJAX简单应用实例-弹出层.rar
更多精彩内容其他人还在看

asp中去除内容HTML标签的三个function函数

asp中去除内容HTML标签的三个function函数
收藏 0 赞 0 分享

chr(9)、chr(10)、chr(13)、chr(32)、chr(34)讲解

chr(9)、chr(10)、chr(13)、chr(32)、chr(34)讲解
收藏 0 赞 0 分享

方便的大家admin及admin888 经过 md5加密后16位和32位代码

方便的大家admin及admin888 经过 md5加密后16位和32位代码
收藏 0 赞 0 分享

可用的ASP无重复数字随机函数, 数组实现, 并应用于随机显示记录集

可用的ASP无重复数字随机函数, 数组实现, 并应用于随机显示记录集
收藏 0 赞 0 分享

asp动态级联菜单代码

asp动态级联菜单代码
收藏 0 赞 0 分享

ASP中经常使用的SQL语句与教程说明

ASP中经常使用的SQL语句与教程说明
收藏 0 赞 0 分享

实例分析之用ASP编程实现网络内容快速查找的代码

实例分析之用ASP编程实现网络内容快速查找的代码
收藏 0 赞 0 分享

服务端 VBScript 与 JScript 几个相同特性的写法与示例

服务端 VBScript 与 JScript 几个相同特性的写法与示例
收藏 0 赞 0 分享

ASP 环境下 VBS 事件应用 示例代码

ASP 环境下 VBS 事件应用 示例代码
收藏 0 赞 0 分享

asp 之上传漏洞终结篇

asp 之上传漏洞终结篇
收藏 0 赞 0 分享
查看更多