| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 566 人关注过本帖
标题:关于幻灯片调用切换问题 ,急
取消只看楼主 加入收藏
读书危害健康
Rank: 1
等 级:新手上路
帖 子:22
专家分:0
注 册:2006-9-23
收藏
 问题点数:0 回复次数:0 
关于幻灯片调用切换问题 ,急
<% dim mm_id,mm_pic,mm_topic,mm_i,mm_id0,mm_topic0,mm_temp1,mm_temp2,mm_temp3  
mm_i=0   
mm_id0=0
set rs3=server.CreateObject("ADODB.RecordSet")
rs3.Source="select top 10 *  from "& db_News_Table &" where picnews=1 and goodnews=1 and checkked=1 and picname is not null order by NewsID DESC"
rs3.Open rs3.Source,conn,1,1   
do while not rs3.eof   
mm_id=rs3("Newsid")     
mm_pic=rs3("picname")     
mm_pic=mm_pic   
mm_topic=rs3("title")   
mm_topic=mm_topic         
if instr(mm_pic,"://")<1 then   
mm_pic=mm_pic   
end if     
if mm_i=0 then  
mm_id0=rs3("Newsid")   
mm_topic0=rs3("title")     
end if     
mm_temp1= mm_temp1&"uploadfile/"&mm_pic&","
mm_temp2= mm_temp2&"E_ReadNews.asp?newsid="&mm_id&","
mm_temp3= mm_temp3&""&mm_topic&","
mm_i=mm_i+1   
rs3.movenext
loop  
rs3.close
if instr(right(mm_temp1,1),",")>0 then  
mm_temp1=left(mm_temp1,len(mm_temp1)-1)  
mm_temp2=left(mm_temp2,len(mm_temp1)-1)
mm_temp3=left(mm_temp3,len(mm_temp1)-1)  
end if%>
<style type="text/css">
#AutoNumber3 tr td table tr td font font font font font font {
    font-weight: bold;
}
#AutoNumber3 tr td table tr td font font font font font font {
    font-weight: normal;
}
</style>
 
<table width="818" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td width="1030" height="14"><img src="Images/ecowo_11.gif" width="818" height="29" /></td>
  </tr>
  <tr>
    <td height="177" valign="top" background="IMAGES/ecowo_25.gif">
      <table width="800" border="0" align="center" cellpadding="3" cellspacing="0" id="AutoNumber3" style="border-collapse: collapse;">
        <tr>
          <td width="468" rowspan="2" valign="top" bgcolor="#FFFFFF">
<script type="text/javascript">
imgUrl1="<%=mm_pic%>";
imgtext1="<%=mm_topic%>"
imgLink1=escape("<%=mm_temp2%>" );
imgUrl2="<%=pic2%>";
imgtext2="<%=text2%>"
imgLink2=escape("news_view.asp?newsid=<%=id2%>");
imgUrl3="<%=pic3%>";
imgtext3="<%=text3%>"
imgLink3=escape("news_view.asp?newsid=<%=id3%>");
imgUrl4="<%=pic4%>";
imgtext4="<%=text4%>"
imgLink4=escape("news_view.asp?newsid=<%=id4%>");
imgUrl5="<%=pic5%>";
imgtext5="<%=text5%>"
imgLink5=escape("news_view.asp?newsid=<%=id5%>");

// 自定义Flash的宽度、高度,以及文字高度
 var focus_width=442
 var focus_height=236
 var text_height=15
 var swf_height = focus_height+text_height
 
 var pics=imgUrl1+"|"+imgUrl2+"|"+imgUrl3+"|"+imgUrl4+"|"+imgUrl5
 var links=imgLink1+"|"+imgLink2+"|"+imgLink3+"|"+imgLink4+"|"+imgLink5
 var texts=imgtext1+"|"+imgtext2+"|"+imgtext3+"|"+imgtext4+"|"+imgtext5
 
 document.write('<object classid="clsid:d27cdb6e-ae6d-11cf-96b8-444553540000" codebase="http://fpdownload.,0,0,0" width="'+ focus_width +'" height="'+ swf_height +'">');
 document.write('<param name="allowScriptAccess" value="sameDomain"><param name="movie" value="focus.swf"><param name="quality" value="high"><param name="bgcolor" value="#F0F0F0">');
 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="pixviewer.swf" wmode="opaque" FlashVars="pics='+pics+'&links='+links+'&texts='+texts+'&borderwidth='+focus_width+'&borderheight='+focus_height+'&textheight='+text_height+'" menu="false" bgcolor="#F0F0F0" quality="high" width="'+ focus_width +'" height="'+ focus_height +'" allowScriptAccess="sameDomain" type="application/x-shockwave-flash" pluginspage="http://www. />');  document.write('</object>');
 </script>

问题在哪

我得到的连接 怎么是这样的 ,请大大帮忙看看 http://127.0.0.1/E_ReadNews.asp?newsid=495,E_ReadNews.asp?newsid=469,E_ReadNews.asp?newsid=401,E_ReadNews.asp?newsid=340,E_ReadNews.asp?newsid=331,E_ReadNews.asp?newsid=330,E_ReadNews.asp?newsid=327,E_ReadNews.asp?newsid=315,E_ReadNews.asp?newsid=311,E_ReadNews.asp?newsid=308,
搜索更多相关主题的帖子: 幻灯片 title where null 
2014-01-02 22:40
快速回复:关于幻灯片调用切换问题 ,急
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.038823 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved