Dream Maker 老漂 不要有和人斗的心,你要赢的是你自己!

无菜单无状态栏最大化打开窗口 JS代码

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE>IT人家</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<SCRIPT>
function openFullscreen(page) {

Tags: 代码 js

发布: 老漂 分类: 网站|站长 评论: 0 浏览: 993

屏蔽js错误 屏蔽js错误代码

可屏蔽js错误,在下面的状态栏不会看见错误提示:

<script language="javascript">
function killErrors()
{

Tags: 代码 js

发布: 老漂 分类: 网站|站长 评论: 0 浏览: 552

PJBLOG三个热门广告位添加代码的方法

朋友问到,在PJBLOG程序中加入谷歌联盟的广告代码的方法,下边就把我在本博客中加入谷歌联盟和阿里妈妈广告的一些方法归纳如下,此些方法在当时自己操作中是参照网上资料来操作的,切实可行,大家也可以在我网上看到效果,其中导航栏下边的那个谷歌搜索广告使用的是JS代码,因时间关系,就不再介绍了。

        可投放的代码广告大概有三个位置,分别是:侧边栏(右边)广告位、内容页(含首页)顶、底部广告位、文章内容页广告位。下边分别介绍下加入代码广告的方法,当然,PJBLOG程序可以加入广告的地方不止在这三处,还有更多的位置可以加入代码,只是这三处广告位是最热门的,效果是较好的:

        一、侧边栏广告位

msxml3.dll 错误 '80070005' 拒绝访问。

代码如下:
PostUrl=http://www.xxx.com/
Server.ScriptTimeOut=20
Set oXMLHttp = createObject("Microsoft.XMLHTTP")
Call oXMLHttp.Open("get", PostUrl, false)
Call oXMLHttp.Send("")
sHtmlStr = oXMLHttp.responseBody
Set oXMLHttp = nothing

初步判定可能是打开的页面有跳转的原因,解决办法是用
MSXML2.ServerXMLHTTP
替换掉
Microsoft.XMLHTTP
即可解决。

另外在CSDN上找到这么一段代码
ServerURL=PostUrl
Set Mail1 = Server.CreateObject("CDO.Message")
Mail1.CreateMHTMLBody ServerURL,31
AA=Mail1.HTMLBody
Set Mail1 = Nothing
Response.Write AA

试了一下,也可以用,拷过来收藏

更换域名,留住流量的源码

事情是这样地:
一直想换域名,但又苦于依赖搜索引擎带来不小的流量,就这么一来二去拖着。结果被百度和google各大搜索引擎的搜录越来越多,面对流量为0和新域名之间更是难以取舍。
上周终于下决心换域名!不然心里会一直不舒服下去。

但我总觉得事情还是可以解决的,可以通过程序来保住流量。比如说:当用户访问旧域名,由于已经搬走,为404错误,在控制面板的404页面自定义一个页面,里面通过程序引导到新的域名。并非简单的引导到新域名上,而是引导到新域名的原来文章上

举例:访问www.aaa.com/blog/article.asp?id=656 时自动跳转到 www.bbb.com/article.asp?id=656

好了,说了原理之后,我们开始动手做一个asp页,名为forward.asp.在空间控制面板的404错误页定义为此页。
forward.asp代码如下:
复制内容到剪贴板
代码:
<%
url=Request.ServerVariables("QUERY_STRING") '取得来路网址
arr=Split(url,"/") '用/分割
n=ubound(arr) '求得最后一个/
%>
<!--js直接跳转-->
<script language="javascript">
        window.top.location="http://www.1100do.cn/<%= arr(n)%>";
</script>
这样,当用户访问旧域名不存在时,通过forward.asp跳转到新域名的相应文章。

Tags: 代码

发布: 老漂 分类: 网站|站长 评论: 0 浏览: 547

镜像跳转脚本

/* 镜像跳转
     By joe         www.1100do.cn
     2007-05-23
*/
var imgheight1
var imgleft1
document.ns = navigator.appName == "Netscape"
window.screen.width>800 ? imgheight1=230:imgheight1=350
window.screen.width>1000 ? imgleft1=100:imgleft1=330
function myload1()
{
         myleft1.style.top=document.body.scrollTop+document.body.offsetHeight-imgheight1;
         myleft1.style.right=imgleft1;
         leftmove1();
}
function leftmove1()
{
     myleft1.style.top=document.body.scrollTop+document.body.offsetHeight-imgheight1;
     myleft1.style.right=imgleft1;
     setTimeout("leftmove1();",1)
}
    if (window.location.href.substring(0,10)=="http://cnc")
     {
     document.write("<div id=myleft1 style='position:


absolute;width:90;top:"+window.screen.height+";left:"+(window.screen.width-200)


+";visibility: visible;z-index: 1'>");
     document.write("<a href=http://www"+window.location.href.substring(10,2048)+"><img


src=./images/www.gif border=0 alt=sebug.NET电信镜像站点></a><br />");
     document.write("<a href=http://uni"+window.location.href.substring(10,2048)+"><img


src=./images/uni1.gif border=0 alt=sebug.NET联通镜像站点></a>");
     document.write("</div>");
     myload1()
     }
    else     if (window.location.href.substring(0,10)=="http://uni")
     {
     document.write("<div id=myleft1 style='position:


absolute;width:90;top:"+window.screen.height+";left:"+(window.screen.width-200)


+";visibility: visible;z-index: 1'>");
     document.write("<a href=http://www"+window.location.href.substring(10,2048)+"><img


src=./images/www.gif border=0 alt=sebug.NET电信镜像站点></a><br />");
     document.write("<a href=http://cnc"+window.location.href.substring(10,2048)+"><img


src=./images/cnc1.gif border=0 alt=sebug.NET网通镜像站点></a>");
     document.write("</div>");
     myload1()
     }
else
     {
     document.write("<div id=myleft1 style='position:


absolute;width:90;top:"+window.screen.height+";left:"+(window.screen.width-200)


+";visibility: visible;z-index: 1'>");
     document.write("<a href=http://cnc"+window.location.href.replace


("//sebug.net/","//cnc.sebug.net/").substring(10,2048)+"><img src=./images/cnc.gif border=0


alt=SEBUG.NET网通镜像站点></a><br />");
     document.write("<a href=http://uni"+window.location.href.replace


("//sebug.net/","//uni.sebug.net/").substring(10,2048)+"><img src=./images/uni1.gif border=0


alt=SEBUG.NET联通镜像站点></a>");
     document.write("</div>");
     myload1()
     }

Tags: 代码

发布: 老漂 分类: 网站|站长 评论: 0 浏览: 579