|
主题:[原创]科汛FLASH幻灯整合第一集:SOHU女性频道 [收藏主题] | 转到: |
才用几天科汛,感觉免费版的比风讯强大多了,看了下论坛好象没人改过幻灯,以前看到风讯有改过SOHU女人首页的FLASH,但一直没看到过科汛有人改过,今天有空改了下,已经实现了和科讯4.5的结合.。觉得并不是很复杂,只是有点 繁琐。有人需要的话可以跟贴交流哈。。 sohu女人首页:http://women.sohu.com/ 我改的效果图左边是SOHU的,右边是改的: 改后的文件:如果要替换直接覆盖。和下面的代码稍有不同。 以下内容只有回复后才可以浏览,请先登录! 此主题相关图片如下:科汛幻灯sohu版.jpg 。 1、修改KS_Cls\KS.LabelCls.asp 170-199行开始用下面的代码替换。 KS_Slide="<script src=""" & DomainStr &"ks_inc/loadflash.js"" type=""text/javascript"" language=""javascript""></script>"&vbcrlf KS_Slide=KS_Slide & "<div id=sasFlashFocus3>" & vbcrlf KS_Slide=KS_Slide & "<SCRIPT type=text/javascript>" & vbcrlf KS_Slide=KS_Slide & "var pics="""", mylinks="""", texts="""";" & vbcrlf KS_Slide=KS_Slide & "var focus_width=" & Width & ";" & vbcrlf KS_Slide=KS_Slide & "var focus_height=" & Height & ";" & vbcrlf If Cbool(ShowTitle)=True Then KS_Slide=KS_Slide & "var text_height=22;" & vbcrlf Else KS_Slide=KS_Slide & "var text_height=0;" & vbcrlf End If Dim ImgArr:ImgArr=Split(ImgArrStr,"@@@") Dim LinkArr:LinkArr=Split(LinkArrStr,"@@@") Dim TextArr:TextArr=Split(TextArrStr,"@@@") Dim ArrLength:ArrLength=Ubound(ImgArr) If ArrLength>5 Then ArrLength=5 Dim I,PicStr,LinkStr,TextStr For I=0 To ArrLength If I=0 Then PicStr="pics='" & ImgArr(0) LinkStr="mylinks='" & LinkArr(0) TextStr="texts='" & KS.GotTopic(TextArr(0),T_Len) &"" Else PicStr=PicStr & "|" & ImgArr(I) LinkStr=LinkStr&"|"&LinkArr(I) TextStr=TextStr & "|" & KS.GotTopic(TextArr(I),T_Len) End IF Next KS_Slide=KS_Slide &PicStr &"';"&vbcrlf&LinkStr&"';" &vbcrlf & TextStr &"';"&vbcrlf 'KS_Slide=KS_Slide & "LoadFlash('" & DomainStr & "KS_Inc/Slideviewer.swf','transparent',focus_width,focus_height+text_height,'pics='+pics+'&links='+links+'&texts='+texts+'&borderwidth='+focus_width+'&borderheight='+focus_height+'&textheight='+text_height)" & vbcrlf KS_Slide=KS_Slide & "var easytool2 = new easytool(""" & DomainStr & "KS_Inc/Slideviewer.swf"",""sasFlashFocus3"", "& width &", "& height &", ""6"");" & vbcrlf KS_Slide=KS_Slide & "easytool2.addParam(""quality"", ""high"");" & vbcrlf KS_Slide=KS_Slide & "easytool2.addParam(""wmode"", ""opaque"");" & vbcrlf KS_Slide=KS_Slide & "easytool2.addVariable(""pics2"",pics);" & vbcrlf KS_Slide=KS_Slide & "easytool2.addVariable(""links2"",mylinks);" & vbcrlf KS_Slide=KS_Slide & "easytool2.addVariable(""texts2"",texts);" & vbcrlf KS_Slide=KS_Slide & "easytool2.write(""sasFlashFocus3"");" & vbcrlf KS_Slide=KS_Slide & "</SCRIPT>" & vbcrlf KS_Slide=KS_Slide & "</div>" & vbcrlf Else 2、修改\KS_Inc\loadflash.js。加入以下代码 if(typeof sas=="undefined")var sas=new Object();if(typeof sas.ued=="undefined")sas.ued=new Object();if(typeof sas.ued.util=="undefined")sas.ued.util=new Object();if(typeof sas.ued.FlashObjectUtil=="undefined")sas.ued.FlashObjectUtil=new Object();sas.ued.FlashObject=function(swf,id,w,h,ver,c,useExpressInstall,quality,xiRedirectUrl,redirectUrl,detectKey){if(!document.createElement||!document.getElementById)return;this.DETECT_KEY=detectKey?detectKey:'detectflash';this.skipDetect=sas.ued.util.getRequestParameter(this.DETECT_KEY);this.params=new Object();this.variables=new Object();this.attributes=new Array();this.useExpressInstall=useExpressInstall;if(swf)this.setAttribute('swf',swf);if(id)this.setAttribute('id',id);if(w)this.setAttribute('width',w);if(h)this.setAttribute('height',h);if(ver)this.setAttribute('version',new sas.ued.PlayerVersion(ver.toString().split(".")));this.installedVer=sas.ued.FlashObjectUtil.getPlayerVersion(this.getAttribute('version'),useExpressInstall);if(c)this.addParam('bgcolor',c);var q=quality?quality:'high';this.addParam('quality',q);var xir=(xiRedirectUrl)?xiRedirectUrl:window.location;this.setAttribute('xiRedirectUrl',xir);this.setAttribute('redirectUrl','');if(redirectUrl)this.setAttribute('redirectUrl',redirectUrl)};sas.ued.FlashObject.prototype={setAttribute:function(name,value){this.attributes[name]=value},getAttribute:function(name){return this.attributes[name]},addParam:function(name,value){this.params[name]=value},getParams:function(){return this.params},addVariable:function(name,value){this.variables[name]=value},getVariable:function(name){return this.variables[name]},getVariables:function(){return this.variables},createParamTag:function(n,v){var p=document.createElement('param');p.setAttribute('name',n);p.setAttribute('value',v);return p},getVariablePairs:function(){var variablePairs=new Array();var key;var variables=this.getVariables();for(key in variables){variablePairs.push(key+"="+variables[key])}return variablePairs},getFlashHTML:function(){var flashNode="";if(navigator.plugins&&navigator.mimeTypes&&navigator.mimeTypes.length){if(this.getAttribute("doExpressInstall"))this.addVariable("MMplayerType","PlugIn");flashNode='<embed type="application/x-shockwave-flash" src="'+this.getAttribute('swf')+'" width="'+this.getAttribute('width')+'" height="'+this.getAttribute('height')+'"';flashNode+=' id="'+this.getAttribute('id')+'" name="'+this.getAttribute('id')+'" ';var params=this.getParams();for(var key in params){flashNode+=[key]+'="'+params[key]+'" '}var pairs=this.getVariablePairs().join("&");if(pairs.length>0){flashNode+='flashvars="'+pairs+'"'}flashNode+='/>'}else{if(this.getAttribute("doExpressInstall"))this.addVariable("MMplayerType","ActiveX");flashNode='<object id="'+this.getAttribute('id')+'" classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" width="'+this.getAttribute('width')+'" height="'+this.getAttribute('height')+'">';flashNode+='<param name="movie" value="'+this.getAttribute('swf')+'" />';var params=this.getParams();for(var key in params){flashNode+='<param name="'+key+'" value="'+params[key]+'" />'}var pairs=this.getVariablePairs().join("&");if(pairs.length>0){flashNode+='<param name="flashvars" value="'+pairs+'" />'}flashNode+="</object>"}return flashNode},write:function(elementId){if(this.useExpressInstall){var expressInstallReqVer=new sas.ued.PlayerVersion([6,0,65]);if(this.installedVer.versionIsValid(expressInstallReqVer)&&!this.installedVer.versionIsValid(this.getAttribute('version'))){this.setAttribute('doExpressInstall',true);this.addVariable("MMredirectURL",escape(this.getAttribute('xiRedirectUrl')));document.title=document.title.slice(0,47)+" - Flash Player Installation";this.addVariable("MMdoctitle",document.title)}}else{this.setAttribute('doExpressInstall',false)}if(this.skipDetect||this.getAttribute('doExpressInstall')||this.installedVer.versionIsValid(this.getAttribute('version'))){var n=(typeof elementId=='string')?document.getElementById(elementId):elementId;n.innerHTML=this.getFlashHTML()}else{if(this.getAttribute('redirectUrl')!=""){document.location.replace(this.getAttribute('redirectUrl'))}}}};sas.ued.FlashObjectUtil.getPlayerVersion=function(reqVer,xiInstall){var PlayerVersion=new sas.ued.PlayerVersion(0,0,0);if(navigator.plugins&&navigator.mimeTypes.length){var x=navigator.plugins["Shockwave Flash"];if(x&&x.description){PlayerVersion=new sas.ued.PlayerVersion(x.description.replace(/([a-z]|[A-Z]|\s)+/,"").replace(/(\s+r|\s+b[0-9]+)/,".").split("."))}}else{try{var axo=new ActiveXObject("ShockwaveFlash.ShockwaveFlash");for(var i=3;axo!=null;i++){axo=new ActiveXObject("ShockwaveFlash.ShockwaveFlash."+i);PlayerVersion=new sas.ued.PlayerVersion([i,0,0])}}catch(e){}if(reqVer&&PlayerVersion.major>reqVer.major)return PlayerVersion;if(!reqVer||((reqVer.minor!=0||reqVer.rev!=0)&&PlayerVersion.major==reqVer.major)||PlayerVersion.major!=6||xiInstall){try{PlayerVersion=new sas.ued.PlayerVersion(axo.GetVariable("$version").split(" ")[1].split(","))}catch(e){}}}return PlayerVersion};sas.ued.PlayerVersion=function(arrVersion){this.major=parseInt(arrVersion[0])||0;this.minor=parseInt(arrVersion[1])||0;this.rev=parseInt(arrVersion[2])||0};sas.ued.PlayerVersion.prototype.versionIsValid=function(fv){if(this.major<fv.major)return false;if(this.major>fv.major)return true;if(this.minor<fv.minor)return false;if(this.minor>fv.minor)return true;if(this.rev<fv.rev)return false;return true};sas.ued.util={getRequestParameter:function(param){var q=document.location.search||document.location.href.hash;if(q){var startIndex=q.indexOf(param+"=");var endIndex=(q.indexOf("&",startIndex)>-1)?q.indexOf("&",startIndex):q.length;if(q.length>1&&startIndex>-1){return q.substring(q.indexOf("=",startIndex)+1,endIndex)}}return""}};if(Array.prototype.push==null){Array.prototype.push=function(item){this[this.length]=item;return this.length}}var getQueryParamValue=sas.ued.util.getRequestParameter;var easytool=sas.ued.FlashObject; 3、把sohu的FLASH覆盖\web\softserver\KS_Inc\Slideviewer.swf OVER~~ [此贴子已经被作者于2007-12-21 11:56:30编辑过] |
|
支持(0) | 反对(0) 顶端 底部 |
haifeng111 发表于:2010/3/29 11:11:00 | 只看该作者 查看该作者主题
沙发
|
|
支持(0) | 反对(0) 顶端 底部 |
支持(0) | 反对(0) 顶端 底部 |
支持(0) | 反对(0) 顶端 底部 |
支持(0) | 反对(0) 顶端 底部 |
支持(0) | 反对(0) 顶端 底部 |
支持(0) | 反对(0) 顶端 底部 |
支持(0) | 反对(0) 顶端 底部 |
支持(0) | 反对(0) 顶端 底部 |
支持(0) | 反对(0) 顶端 底部 |
<上一主题 | 下一主题 > |