以文本方式查看主题

-  泥客论坛(十几年前的回忆)  (http://kesonic.com/bbs/index.asp)
--  ☆网页制作☆  (http://kesonic.com/bbs/list.asp?boardid=81)
----  如何在首页调用flash时钟  (http://kesonic.com/bbs/dispbbs.asp?boardid=81&id=6850)

--  作者:小轲
--  发布时间:2004/12/4 20:00:38

--  如何在首页调用flash时钟

后台管理,风格界面模板总管理,分页面模板(page_index)界面风格

把template.html(0)修改为:

<!--index.asp##首页顶部表格-->

<br><table cellspacing=1 cellpadding=3 align=center border=0 width={$width}><tr><td align=center width=100% valign=middle colspan=2>

<a href="javascript:openScript(\'announcements.asp?action=showone&boardid=0\',500,400)"><B>{$news}</B></a>({$newstime})

</td></tr></table>

<table cellspacing=1 cellpadding=3 align=center class=tableBorder1><tr>

<th width="100%" height="24" colspan="3">

</th></tr>

<tr><td class=tableBody1 align=center width="*" >

{$myinfo}

<td valign="middle" bgcolor="#F0F0F0" class=tableBody1>

<TABLE border=0 width="98%" align=center><tr><td height=22>

共有<B>{$UserNum}</B>位会员

</td><td>

<a href="toplist.asp?orders=2">新进来宾</a> <a href=dispuser.asp?name={$lastUser} target=_blank><b>{$lastUser}</b></a></td>

</tr><tr><td height="1" bgcolor={$bgcolor} colspan="2"></td></tr><TR><TD>

今日发贴:<FONT COLOR={$alertcolor}><B>{$TodayNum}</B></FONT> 篇</td><TD>

主题总数:<b>{$TopicNum}</b> 篇

</td></tr><tr><td>

昨日发贴:<B>{$YesTerdayNum}</B> 篇

</td><td>

帖子总数:<b>{$PostNum}</b> 篇

</td></tr>

<tr><td>

最高日发贴:<font title="发生日期: [{$MaxPostDate}"><B>{$MaxPostNum}</B></font> 篇</td><td>建站天数:<b>{$BuildDayNum}</b> 天</td></tr></table>

</td><td align="center" class=tableBody1 valign="middle"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="100" height="100" align="middle">

    <param name="movie" value="Images/clock.swf">

    <param name="quality" value="high">

     <param name="WMODE" value="transparent">

    <embed src="Images/clock.swf" width="100" height="100" align="middle" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" scale="noborder" bgcolor="#E4E8EF"></embed>

  </object>

</td></td>

</tr><tr><td class=tableBody2 align="center" colspan="3" height="25" width="100%">

<a href=query.asp?stype=3&pSearch=0&nSearch=0>查看新贴</a> <font face=Wingdings color=666666>v</font> <a href=query.asp?stype=4&pSearch=0&nSearch=0>热门话题</a> <font face=Wingdings color=666666>v</font> <a href=toplist.asp?orders=1>发贴排行</a> <font face=Wingdings color=666666>v</font> <a href=toplist.asp?orders=7>用户列表</a></td></tr>

</table><br>

其中的clock.swf为时钟FLASH文件

还需要在index.asp文件中找到

TempStr=Replace(TempStr,"{$MaxPostDate}",Dvbbs.CacheData(13,0))

在其下加入

    TempStr=Replace(TempStr,"{$BuildDayNum}",datediff("d",Dvbbs.forum_setting(74),date()))


--  作者:蓝静儿
--  发布时间:2004/12/5 9:45:31

--  

太麻烦了吧

好难哦

一个不小心肯定全错


--  作者:flyingtime
--  发布时间:2004/12/7 18:45:39

--  
你的坛子就是这么改的吗?小轲!?!
--  作者:小轲
--  发布时间:2004/12/7 19:18:18

--  

yes


--  作者:flyingtime
--  发布时间:2004/12/8 13:35:12

--  
都在后台改吗?
--  作者:flyingtime
--  发布时间:2004/12/8 13:40:06

--  
其中的为时钟FLASH文件

clock.swf能给我吗?


--  作者:flyingtime
--  发布时间:2004/12/8 14:38:31

--  

小轲这是怎么回事啊?

Microsoft VBScript 编译器错误 错误 \'800a0401\'

语句未结束

/index.asp,行 44

TempStr=Replace(TempStr,"{$MaxPostDate}",Dvbbs.CacheData(13,0))                                                      TempStr=Replace(TempStr,"{$BuildDayNum}",datediff("d",Dvbbs.forum_setting(74),date()))---------------------------------------------------------------------------------------------------------------------^

--  作者:flyingtime
--  发布时间:2004/12/8 14:47:20

--  

不改的话是这样

http://shike.jx828.net/index.asp


--  作者:flyingtime
--  发布时间:2004/12/8 17:23:37

--  
建站天数显不出来?!是代码?!
--  作者:小轲
--  发布时间:2004/12/8 17:27:08

--  

代码是没有错的

你看看是不是多了空格?

用记事本修改,不要用frontpage