我以前写过一个,模拟它的动态上拉效果
直接变动窗体的高度及top值。当然要使用window.setInterval。代码在公司里,:)

解决方案 »

  1.   

    上楼的发一份给我,谢谢
    [email protected]
      

  2.   


    http://www.ggajj.net/test/popMail.html
    <!-- 底下角弹出提示窗口
    var winPopUp = null;
    var oldTop = 0;
    var myTime = null;
    function PopUp(){
    winPopUp = window.open('newMail.html',"不眠蛙信息快递","height=150,width=200,top=5800,left=580");
    oldTop = 500;
    myTime = setTimeout("MoveWin()",10);
    }
    function MoveWin(){
    oldTop = oldTop - 5 ;
    if(oldTop == 400 ) {
    clearTimeout(myTime);
    winPopUp = null;
    }
    else{
    winPopUp.moveTo(580,oldTop);
    myTime = setTimeout("MoveWin()",50);
    }
    }
    PopUp();
    //-->
    </SCRIPT>
      

  3.   

    没有判断屏幕宽度,高度
    window.open('newMail.html',"不眠蛙信息快递","height=150,width=200,top=5800,left=580");第二个参数是窗口的名字哦,不是标题
      

  4.   

    错了
    <!--#include file=conn.asp-->
    <body background="images/d.gif" leftmargin="0" topmargin="0">
    <script language="JavaScript">
    //setTimeout("history.go(0)",1000);
    </script>
    <script language="VBScript">
    dim t,s,win,i
    h=200
    w=400
    s=100
    i=1
    sub show(page)
    dim le,tp
    le=screen.availwidth-w-15
    tp=screen.availheight-35
    if i=1 then
    set win=window.open(page,"","width="&w&",height="&h&",left="&le&",top="&tp-i)
    else
    call win.moveTo(le,tp-i)
    end if
    i=i+10
    if i<h then 
    call setTimeout("show('')",s)
    else
    i=1
    end if
    end sub
    </script>
    <%
    sql="select * from message where incept='"&session("username")&"' and isread=0"
    set rs=conn.execute(sql)
    if not rs.eof then
    %>
    <script language="JavaScript">
    //show('msg_mb.asp','','height=200,width=400')
    show('msn_newmsg.asp')
    </script>
    <%
    end if
    %>