代码收藏

根据URL获取主机名

function gethost(url) { var result = url.match("^http:\/\/([^\/:]*)"); if(result[1]) { var domain =...

获取一个页面元素在页面上的坐标位置

/* obj-要获取其页面坐标的元素 enjoy收集整理 http://www.9enjoy.com */function findPos(obj) { var curleft = curtop = 0; if (obj.offsetParent) { curleft = obj.offsetLeft curtop = obj.offsetTop while (obj = obj.offsetParent) { curleft += obj.offsetLeft curtop += obj.offsetTop } } return...

获取页面参数

function GetLocationParam(param){ //获取页面参数 var request = { QueryString : function(val) { var uri = window.location.search; var re = new RegExp("" +val+ "=([^&?]*)", "ig"); return ((uri.match(re))?(uri.match(re)[0].substr(val.length+1)):null); } } return request.QueryString(param); }js中就可以这样调用如URL为http://www.itlearner.com/test.htm?name=hxvar name=...

纯ASP代码生成图表函数1——柱状图

4 then temp3=(int(temp1/(10^(len(cstr(temp1))-1)))+1)*10^(len(cstr(temp1))-1)else temp3=(int(temp1/(10^(len(cstr(temp1))-1)))+0.5)*10^(len(cstr(temp1))-1)end ifelseif temp1>4 then temp3=10 else temp3=5end iftemp4=temp3response.write ""response.write ""response.write ""select case table_typecase "A"table_space=(all_width-table_width*total_no)/total_noresponse.write ""for i=0 to all_height-1 step all_height/5response.write ""response.write ""response.write ""response.write...

asp设置文件下载

<% 'asp读取1.swf这个文件，并提供下载，可以让用户无法获知下载文件的实际地址。 Response.Buffer = True Dim objXMLHTTP, xml Set xml = Server.CreateObject("Microsoft.XMLHTTP") '创建对象xml.Open "GET","http://www.itlearner.com/1.swf",False ' '设置对象,具体xmlhttp详细使用方法请见:《XMLHTTP 对象及其方法》一文xml.Send '发送请求Response.AddHeader "Content-Disposition", "attachment;filename=banner_k_050202.swf"...

自动检测内容是编码进行转换

...