建站铺 » 网站建设交流 » 发一个很强的弹出窗口代码，有的请指教，没有的同志们请拿去吧

文人 发表于 2008-4-28 09:54

发一个很强的弹出窗口代码，有的请指教，没有的同志们请拿去吧

在网页上点击弹出
<!--
function PB(sName,sUrl,sTime,sClick)
{

        var ttan8_DivName = "a306_DIV_" + sName;
        var ttan8_AName   = "a306_A_" + sName;
        switch (sClick)
        {
                case '0':
                if(document.cookie.indexOf(sName)==-1)
                {
                        try
                        {
                                document.writeln("<DIV id=\""+ttan8_DivName+"\" STYLE=\"position:absolute;top:0;left:0;width:100%;height:100%;background-color:red;filter:alpha(opacity=0);z-index:10000;\" onclick=\"PB('"+sName+"','"+sUrl+"','"+sTime+"','1');\">");
                                document.writeln("<a name=\""+ttan8_AName+"\"></a>");
                                document.writeln("</DIV>");
                        }
                        catch(e)
                        {
                                //alert(e.message);
                        }
                }
                break;

                   case '1':
                if(document.cookie.indexOf(sName)==-1)
                {
                        try
                        {
                                var a306_T_A = document.getElementById(ttan8_AName)
                                a306_T_A.target = sName;
                                a306_T_A.href = sUrl;
                                a306_T_A.click();
                                document.getElementById(ttan8_DivName).style.display='none';

                                var expireDate = new Date();
                                var lefttime = 1000 * (7200 * sTime);
                                expireDate.setTime (expireDate.getTime() + lefttime);
                                document.cookie = sName +"=yes" + "; expires=" + expireDate.toGMTString() +  ";";
                        }
                        catch(e)
                        {
                                //alert(e.message);
                        }
                }
                break;
        }
}

PB('ttan8_Web_OpenName','http://www.cctvs.net','0','0');
//-->

shp408 发表于 2008-4-28 15:44

看了下代码 好像有点问题 哎 水平不够吧

foxlg 发表于 2008-5-12 13:37

偶是菜鸟,偶不懂..偶来学习/

辐射鱼 发表于 2008-5-19 15:40

谢谢 啊 ,..偶也是来学习的

wendns 发表于 2008-6-9 11:16

呵呵.呵呵.呵呵.

蓝色夏天 发表于 2008-6-13 10:34

老大，至少说明下强在哪里把

不觉晓 发表于 2008-8-7 12:51

进来就是学习的哦。。。。

查看完整版本: 发一个很强的弹出窗口代码，有的请指教，没有的同志们请拿去吧