网络编程 
首页 > 网络编程 > 浏览文章

AJAX简单应用实例-弹出层

(编辑:jimmy 日期: 2024/11/9 浏览:3 次 )
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简单应用实例-弹出层AJAX简单应用实例-弹出层.rar
上一篇:asp MYSQL出现问号乱码的解决方法
下一篇:asp两组字符串数据比较合并相同数据
一句话新闻
微软与英特尔等合作伙伴联合定义“AI PC”:键盘需配有Copilot物理按键
几个月来,英特尔、微软、AMD和其它厂商都在共同推动“AI PC”的想法,朝着更多的AI功能迈进。在近日,英特尔在台北举行的开发者活动中,也宣布了关于AI PC加速计划、新的PC开发者计划和独立硬件供应商计划。
在此次发布会上,英特尔还发布了全新的全新的酷睿Ultra Meteor Lake NUC开发套件,以及联合微软等合作伙伴联合定义“AI PC”的定义标准。