用户操作
[即时聊天] [发私信] [加为好友]
Thomas_ChenID：Thomas_Chen
共57041次访问，排名1869(-2)好友1人，关注者1人
Thomas_Chen的文章
原创 18 篇
翻译 0 篇
转载 144 篇
评论 9 篇
最近评论
R191576565：只要
修改web.xml文件第３行.jdbc/mysqlx改成jdbc/mysql就能用了.这个连接池我也整了N多天，让网上那帮家伙给我害惨了，对生活都快失去了信心．今天终于整个了，哈哈.
qingxingmeng：谢谢，分享！
btq123：按你的方法试了，还是不行，错误如下：org.apache.jasper.JasperException: Unable to compile class for JSP:
我已经郁闷了几天了，一直连不上。。
我QQ：希望你能指点指点
intraweb：kesgf4zb :
楼主说的是开源，而说的那个什么SiteServer CMS只是免费，根本是两码事，麻烦你看清楚再说。
Thomas_Chen：是的 你可以测试下
文章分类
收藏
    相册
    BLOG
    ASP.NET开源组(RSS)
    大刘的博客
    铁拳的 Blog(RSS)
    开源社区
    _Net开源视界
    asp.net开源社区(RSS)
    asp.net开源组(RSS)
    C#开源资源大全(RSS)
    存档
    软件项目交易
    订阅我的博客
    XML聚合  FeedSky
    订阅到鲜果
    订阅到Google
    订阅到抓虾
    订阅到BlogLines
    订阅到Yahoo
    订阅到GouGou
    订阅到飞鸽
    订阅到Rojo
    订阅到newsgator
    订阅到netvibes

    转载 图片轮显效果大全收藏

    新一篇: 解决ASP无组件上传错误(上传超过200kB 的文件)：Request 对象 错误 'ASP 0104 : 80004005' 不许操作  | 旧一篇: 选择好的idc网站空间--虚拟主机--空间速度测试方法

    综合各种效果的图片轮显

    <SCRIPT language="VBScript">
    Dim FileList,FileListArr,TxtList,TxtListArr
    FileList     = "http://et.21cn.com/portray/images/if/01.jpg,http://et.21cn.com/portray/images/if/02.jpg,http://et.21cn.com/portray/images/if/03.jpg"
    TxtList     = "<a href=http://www.licns.com/ target=_blank>在这里添加你的连接1</a>,<a href=http://www.licns.com/ target=_blank>在这里添加你的连接2</a>,<a href=http://www.licns.com/ target=_blank>在这里添加你的连接3</a>"
    FileListArr     = Split(FileList,",")
    TxtListArr     = Split(TxtList,",")
    Dim CanPlay
    CanPlay     = CInt(Split(Split(navigator.appVersion,";")(1)," ")(2))>5
    Dim FilterStr
    FilterStr     = "RevealTrans(duration=2,transition=23)"
    FilterStr     = FilterStr + ";BlendTrans(duration=2)"
    If CanPlay Then
    FilterStr     = FilterStr + ";progid:DXImageTransform.Microsoft.Pixelate(,enabled=false,duration=2,maxSquare=25)"
    FilterStr     = FilterStr + ";progid:DXImageTransform.Microsoft.Fade(duration=2,overlap=0)"
    FilterStr     = FilterStr + ";progid:DXImageTransform.Microsoft.GradientWipe(duration=2,gradientSize=0.25,motion=forward )"
    FilterStr     = FilterStr + ";progid:DXImageTransform.Microsoft.Stretch(duration=2,stretchStyle=PUSH)"
    FilterStr     = FilterStr + ";progid:DXImageTransform.Microsoft.Wheel(duration=2,spokes=16)"
    FilterStr     = FilterStr + ";progid:DXImageTransform.Microsoft.RandomDissolve(duration=2)"
    FilterStr     = FilterStr + ";progid:DXImageTransform.Microsoft.Spiral(duration=2,gridSizeX=50,gridSizeY=50)"
    FilterStr     = FilterStr + ";progid:DXImageTransform.Microsoft.Slide(duration=2,bands=1,slideStyle=SWAP)"
    FilterStr     = FilterStr + ";progid:DXImageTransform.Microsoft.RadialWipe(duration=2,wipeStyle=CLOCK)"
    FilterStr     = FilterStr + ";progid:DXImageTransform.Microsoft.Pixelate(MaxSquare=15,Duration=1)"
    FilterStr     = FilterStr + ";progid:DXImageTransform.Microsoft.Wipe(duration=3,gradientsize=0.25,motion=reverse)"
    Else
    Msgbox     "幻灯片播放具有多种动态图片切换效果，但此功能需要您的浏览器为IE5.5或以上版本，否则您将只能看到部分的切换效果。",64
    End If
    Dim FilterArr
    FilterArr     = Split(FilterStr,";")
    Dim PlayImg_M
    PlayImg_M     = 5 * 1000  '切换时间（毫秒）
    Dim I
    I = 1
    Sub ChangeImg
    Do While FileListArr(I)=""
    I = I + 1
    If I>UBound(FileListArr) Then I = 0
    Loop
    Dim J
    If I>UBound(FileListArr) Then I = 0
    Randomize
    J = Int(Rnd * (UBound(FilterArr)+1))
    Img.style.filter = FilterArr(J)
    Img.filters(0).Apply
    Img.Src = FileListArr(I)
    Img.filters(0).play
    Txt.filters(0).Apply
    Txt.innerHTML = TxtListArr(I)
    Txt.filters(0).play()
    I = I + 1
    If I>UBound(FileListArr) Then I = 0
    TempImg.Src = FileListArr(I)
    SetTimeout "ChangeImg", PlayImg_M,"VBScript"
    End Sub
    </SCRIPT>
    <TABLE WIDTH="100%" height="100%" BORDER="0" CELLSPACING="0" CELLPADDING="0"><TR ID="NoScript"><TD Align="Center" Style="Color:White">对不起，图片浏览功能需脚本支持，但您的浏览器已经设置了禁止脚本运行。请您在浏览器设置中调整有关安全选项。</TD></TR><TR Style="Display:none" ID="CanRunScript"><TD HEIGHT="100%" Align="Center" vAlign="Center"><Img ID="Img" height="290" width="300" Border="0" ></TD></TR><TR Style="Display:none"><TD><Img ID="TempImg" Border="0"></TD></TR><TR><TD HEIGHT="100%" Align="Center" vAlign="Center"><div ID="Txt" style="PADDING-LEFT: 5px; Z-INDEX: 1; FILTER: progid:DXImageTransform.Microsoft.Fade(duration=1,overlap=0); POSITION:"><a href=http://www.licns.com/ target=_blank>在这里添加你的连接1</a></div></TD></TR></TABLE>
    <Script Language="VBScript">
    NoScript.Style.Display = "none"
    CanRunScript.Style.Display = ""
    Img.Src = FileListArr(0)
    SetTimeout "ChangeImg", PlayImg_M,"VBScript"
    </Script>

     

     

     

    腾讯的用Flash调用图片轮显

    <script type="text/javascript">
         <!--
     
         var focus_width=255
         var focus_height=200
         var text_height=18
         var swf_height = focus_height+text_height
     
         var pics='http://img1.qq.com/sports/20060102/2958063.jpg|http://img1.qq.com/sports/20060101/2955633.jpg|http://img1.qq.com/sports/20051229/2936827.jpg|http://img1.qq.com/sports/20051227/2920636.jpg'
         var links='http://sports.qq.com/a/20060101/000514.htm|http://sports.qq.com/a/20060101/000053.htm|http://sports.qq.com/a/20051229/000159.htm|http://sports.qq.com/a/20051227/000023.htm'
         var texts='曲圣卿打进一球两次助攻 阿德莱德大胜|曼城客场被逼平 继海首发多次制造杀机|继海打满全场表现尚可 曼城不敌切尔西|曼城落败 孙继海险助攻'
     
     document.write(    '<object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000" codebase="http://fpdownload.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,0,0" width="'+ focus_width +'" height="'+ swf_height +'">');
     document.write(    '<param name="allowScriptAccess" value="sameDomain"><param name="movie" value="http://sports.qq.com/flash/playswf.swf"><param name=wmode value=transparent><param name="quality" value="high">');
     document.write(    '<param name="menu" value="false"><param name=wmode value="opaque">');
     document.write(    '<param name="FlashVars" value="pics='+pics+'&links='+links+'&texts='+texts+'&borderwidth='+focus_width+'&borderheight='+focus_height+'&textheight='+text_height+'">');
     document.write(    '<embed src="http://sports.qq.com/flash/playswf.swf" wmode="opaque" FlashVars="pics='+pics+'&links='+links+'&texts='+texts+'&borderwidth='+focus_width+'&borderheight='+focus_height+'&textheight='+text_height+'" menu="false" bgcolor="#DADADA" quality="high" width="'+ focus_width +'" height="'+ swf_height +'" allowScriptAccess="sameDomain" type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/go/getflashplayer" />');  document.write('</object>');
     
         //-->
     </script>

     最基本的图片轮显

    <script language=JavaScript>
    var imgUrl=new Array();
    var imgLink=new Array();
    var adNum=0;
    imgUrl[    1]="http://image2.sina.com.cn/lx/nx/2006/0207/U1275P8T1D227041F918DT20060220173712.jpg"; 
    imgLink[    1]="http://eladies.sina.com.cn/bbs/p/2006/0220/17268791.html"; 
    imgUrl[    2]="http://image2.sina.com.cn/lx/nx/2006/0128/U1275P8T1D226214F918DT20060128200332.jpg"; 
    imgLink[    2]="http://eladies.sina.com.cn/pic/special/198/554.html";
    imgUrl[    3]="http://image2.sina.com.cn/lx/beauty1/2006/0218/U1275P8T1D229151F916DT20060220180508.jpg"; 
    imgLink[    3]="http://blog.sina.com.cn/u/45f2dd64010001yg";
    imgUrl[    4]="http://image2.sina.com.cn/lx/nx/2006/0210/U1275P8T1D227877F1086DT20060213161341.jpg"; 
    imgLink[    4]="http://eladies.sina.com.cn/bbs/2006/0213/16048576.html";
             var imgPre=new Array();
           for (i=1;i<4;i++){
    imgPre[i]    =new Image();
          imgPre[i].src    =imgUrl[i];
       }


    function setTransition(){
           if (document.all){
          imgUrlrotator.filters.revealTrans.Transition    =Math.floor(Math.random()*20);
          imgUrlrotator.filters.revealTrans.apply();
       }
    }

    function playTransition(){
           if (document.all)
          imgUrlrotator.filters.revealTrans.play()
    }


    function nextAd(){
           if(adNum<imgUrl.length-1)adNum++ ;
              else adNum=1;
       setTransition();
       document.images.imgUrlrotator.src    =imgUrl[adNum];
       playTransition();
       theTimer    =setTimeout("nextAd()", 6000);
    }

    function jump2url(){
       jumpUrl    =imgLink[adNum];
       jumpTarget    ='_blank';
           if (jumpUrl != ''){
              if (jumpTarget != '')window.open(jumpUrl,jumpTarget);
              else location.href=jumpUrl;
       }
    }
    function displayStatusMsg() { 
       status    =imgLink[adNum];
       document.returnValue     = true;
    }

    </script>
                <a onMouseOver="displayStatusMsg();return document.returnValue" 
          href    ="javascript:jump2url()"><img 
          style    ="FILTER: revealTrans(duration=2,transition=20);border:1 solid gray;" height=242 
          src    ="javascript:nextAd()" width=191
          name    =imgUrlrotator></a>

     

    21cn写真频道图片切换代码

    <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
    <html>
    <head>
    <meta http-equiv="Content-Type" content="text/html; charset=gb2312">
    <title>无标题文档</title>
    <META http-equiv=Content-Type content="text/html; charset=gb2312">
    <META content="MSHTML 6.00.2800.1476" name=GENERATOR></HEAD>
    <BODY leftMargin=0 topMargin=0 marginheight="0" marginwidth="0">
    <TABLE width=330 height="250" border=0 cellPadding=0 cellSpacing=0 bgcolor="434343">
          <TBODY>
            <TR> 
              <TD width=330 bgcolor="434343">     
                <CENTER>
                  <DIV id=oTransContainer 
              style    ="FILTER: progid:DXImageTransform.Microsoft.Wipe(GradientSize=1.0, 
                            wipeStyle=0, motion='forward'); WIDTH: 330px; HEIGHT: 250px"    ><    a 
              href="?SenFe=List&Id=466298" target=_blank><img src="http://et.21cn.com/portray/images/if/01.jpg" width    =330 
              height=250 border=0 align="absmiddle" id    =oDIV1 
              ></a> <    a 
              href="?SenFe=List&Id=399878"     
          target    =_blank><img src="http://et.21cn.com/portray/images/if/02.jpg" width    =330 
              height=250 border=0 align="absmiddle" id    =oDIV2 
              style="DISPLAY: none"></a><    a
              href="?SenFe=List&Id=466294"     
          target    =_blank><img src="http://et.21cn.com/portray/images/if/03.jpg" width    =330 
              height=250 border=0 align="absmiddle" id    =oDIV3 
              style="DISPLAY: none"></a><    a 
              href="?SenFe=List&Id=466296"     
          target    =_blank><img src="http://et.21cn.com/portray/images/if/04.jpg" width    =330 
              height=250 border=0 align="absmiddle" id    =oDIV4
              style="DISPLAY: none"></a></DIV>
                </CENTER>
                <SCRIPT>
    var NowFrame = 1;
    var MaxFrame = 4    ;
    var bStart = 0    ;

    function fnToggle()     {
            var next = NowFrame + 1    ;

            if(next == MaxFrame+1    ) 
            {
            NowFrame     =     MaxFrame;
            next     = 1    ;
        }

            if(bStart == 0)
            {
            bStart     = 1    ;
            
            setTimeout(    'fnToggle()', 6000    );

                return    ;
        }
            else
            {
            oTransContainer.filters[    0    ].Apply();

            document.images[    'oDIV'+next].style.display = ""    ;
            document.images[    'oDIV'+NowFrame].style.display = "none"    ; 

            oTransContainer.filters[    0].Play(duration=2    );

                if(NowFrame ==     MaxFrame) 
                NowFrame     = 1    ;
                else
                NowFrame    ++;
        }        setTimeout('fnToggle()', 6000);
    }

    fnToggle();
    </SCRIPT>
              </TD>
            </TR>
          </TBODY>
    </TABLE>
    </body>
    </html>
    加上了鼠标的特效的
    <script language="JavaScript">
    var elady_step=3;    //1:small, 3:middle, 5:big
    var elady_speed=50;    //20:fast, 50:middle, 80:slow
    var e_tp=new Array();
    var e_tplink=new     Array();
    var adNum_elady1=0    ;  
    var elady_stop_sh=0    ;
    var elady_star_sh=1    ;

    function elady1_moveImg()    {
    if ((!document.all&&!document.getElementById)||(elady_stop_sh==0))    return    ;
    if (elady_star_sh==1)    {
    document.all.elady1_divimg.style.pixelTop    =parseInt(document.all.elady1_divimg.style.pixelTop)+elady_step;}
    else if (elady_star_sh==2){
    document.all.elady1_divimg.style.pixelLeft    =parseInt(document.all.elady1_divimg.style.pixelLeft)+elady_step;}
    else if (elady_star_sh==3){
    document.all.elady1_divimg.style.pixelTop    =parseInt(document.all.elady1_divimg.style.pixelTop)-elady_step;}
    else{
    document.all.elady1_divimg.style.pixelLeft    =parseInt(document.all.elady1_divimg.style.pixelLeft)-elady_step;}
    if (elady_star_sh<4)    elady_star_sh++;
    else    elady_star_sh=1    ;
    setTimeout(    "elady1_moveImg()",elady_speed);}

    e_tplink[    0]="http://www.licns.com";
    e_tp[    0]="http://et.21cn.com/portray/images/if/01.jpg"    ;
    e_tplink[    1]="http://www.licns.com"    ;
    e_tp[    1]="http://et.21cn.com/portray/images/if/02.jpg"    ;
    e_tplink[    2]="http://www.licns.com"    ;
    e_tp[    2]="http://et.21cn.com/portray/images/if/03.jpg"    ;
    e_tplink[    3]="http://www.licns.com"    ;
    e_tp[    3]="http://et.21cn.com/portray/images/if/04.jpg"    ;

    var currentimage=new     Array();   
    for (i=0;i<=3;i++)    {currentimage[i]=new Image();
          currentimage[i].src    =    e_tp[i];
             }
                 function elady1_set(){   if (document.all)
                 {      e_tprotator.filters.revealTrans.Transition=Math.floor(Math.random()*23);
                   e_tprotator.filters.revealTrans.apply();   }