账号通
    

账号  

密码  

8018

查看

11

回复
主题:[原创]留言板(论坛)调用个性修改 资料汇总大全 [收藏主题] 本贴被认定为精华 转到:  
w6688 当前离线

128

主题

0

广播

0

粉丝
添加关注
级别:一年级

用户积分:679 分
登录次数:55 次
注册时间:2009/11/24
最后登录:2011/1/8
w6688 发表于:2009/12/15 18:19:00   | 只看该作者 查看该作者主题 楼主 
科汛在线网校系统


首页调用最新留言(论坛)
select top 10 subject,id from KS_GuestBook order by id desc
循 环 体


[loop=10]
<li>.<a href="/guestbook/display.asp?id={$Field(id,num,1,)}" target="_blank">{$Field(subject,Text,30,...,0,)}</a></li>
[/loop]


 


 


系统函数标签里->其它->论坛帖子调用


 


留言板css定义
在images文件夹的index.css里注明有“/*留言系统*/”的
而且留言模版页里面也是带有CSS的,两个文件都看看


 


实现最新留言标题和回复内容
select top 10 AddTime,ID,Memo,UserName from KS_GuestBook where verific=1 order by id desc


在这查询语句中在加上回复字段!


 


调用网站留言(也就是最新几条留言记录)


[select top 10  AddTime,ID,Subject from KS_GuestBook order by id desc


 


[loop=8]
<table width="100%" height="20" border="0" cellpadding="0" cellspacing="0">
<tr>
<td>·<a href="/GuestBook/display.asp?id={$Field(ID,Num,0,2)}" target="_blank"  title="{$Field(Subject,Text,0,...,0,)}">{$Field(Subject,Text,14,,0,暂时无留言咨询)}</a><font color="666666"> ({$Field(AddTime,Date,MM-DD)}) </font></td>
</tr>
</table>
[/loop]
<div align=right><a target=_blank href=/GuestBook>更多...</a></div>


 


 


首页最新留言8条调用


 


 我在首页调用最新8条留言,按照系统原带的SQL留言标签修改成{SQL_最新帖子(8)} : select top {$Param(0)} ID,Subject,AddTime from KS_GuestBook where verific=1
order by addtime desc  
order by id desc
[loop={$Param(0)}]  ·{$Field(Subject,Text,31,,0,)} 
 

<table border="0" width="99%" align="center" cellpadding="0" cellspacing="0" class="announce">
[loop={$Param(0)}]
<tr>
 <td height="19" align="left">·<a target="_blank" href="{$GetSiteUrl}guestbook/display.asp?id={$Field(ID,GetInfoUrl,0,2)}">{$Field(Subject,Text,31,,0,)}</a></td>
 <td align="right">{$Field(AddTime,Date,MM-DD)}</td>
</tr>
<tr><td background="{$GetSiteUrl}images/m-dot.gif" height="1" colspan="2"></td></tr>
[/loop]
</table>


 


留言本放到首页
直接将留言本的留言代码复制到首页就差不多了,自己稍加修饰下便是了


<form action="/guestbook/Save_Post.asp" method="post" name="myform" onSubmit="return datacheck();">


 


注意红色的地址


 


调用出最新回复一问一答的形式,点击还能进入问题


select top 10 AddTime,Subject,content from KS_GuestBook a,KS_GuestReply b where a.id=b.topicid order by a.id desc


 


[loop=10]


<li>问:{$Field(Subject,Text,0,...,0,)}     {$Field(AddTime,Text,0,...,0,)}<br>


答:{$Field(content,Num,0,2)}</li>


[/loop]


 


首页的留言板如何调用一个分类? 


 select top 10 AddTime,ID,Memo,UserName from KS_GuestBook order by id desc


加上条件了,看看以下行不行


select top 10 AddTime,ID,Memo,UserName from KS_GuestBook  where boardid=分类ID order by id desc


[loop=10]
<div class="side_hotnav">
&nbsp;<font color=green>♀</font>
<font color=red>{$Field(UserName,Text,10,...,2,)}:</font>
<a href="/GuestBook/display.asp?id={$Field(ID,Text,0,...,0,)}" target="_blank">
{$Field(Memo,Text,47,...,2,)}</a>
</DIV>
[/loop]


 


1.最新帖子调用


 


第一步 sql标签名称: 最新帖子


数 据 源: KesionCMS主数据库


ajax输出:否


标签类型:普通标签


 


第二步参数说明:调用条数


sql语句:select top {$Param(0)} ID,Subject,AddTime from KS_GuestBook where verific=1 order by addtime desc


 


第三步:sql标签循环体


<table border="0" width="99%" align="center" cellpadding="0" cellspacing="0" class="announce">
[loop={$Param(0)}]
<tr>
 <td height="25" align="left">·<a target="_blank" href="{$GetSiteUrl}guestbook/display.asp?id={$Field(ID,GetInfoUrl,0,2)}">{$Field(Subject,Text,35,,0,)}</a></td>
 <td align="right">{$Field(AddTime,Date,YYYY-MM-DD)}</td>
</tr>
<tr><td background="{$GetSiteUrl}images/m-dot.gif" height="1" colspan="2"></td></tr>
[/loop]
</table>


 


最后一步,在模型里调用


{SQL_最新帖子(10)}


 


 


2.最新评论调用


 


第一步  sql标签名称: 最新评论


数 据 源: KesionCMS主数据库


ajax输出:否


标签类型:普通标签


 


第二步 参数说明:调用条数


sql语句:select top 12 ID,ChannelID,InfoID,Content,AddDate from KS_Comment where verific=1 order by adddate desc


第三步:sql标签循环体


[loop=12]
<img src="/UpFiles/blue.gif" border="0"><a target="_blank" title="{$Field(Content,Text,0,...,2,)}" href="/plus/Comment.asp?ChannelID={$Field(channelid,Num,0,2)}&ClassID={$Field(classid,Num,0,2)}&InfoID={$Field(infoid,Num,0,2)}">{$Field(content,Text,46,...,2,)}</a> ({$Field(AddDate,Date,MM-DD)})<br />
[/loop]


 


最后一步,在模型里调用


{SQL_最新评论(10)}


 


3.最新留言调用


 


第一步


sql标签名称: 最新留言


数 据 源: KesionCMS主数据库


ajax输出:否


标签类型:普通标签


 


第二步


参数说明:调用条数


sql语句:select top 10 id,AddTime,Memo,Name from KS_GuestBook order by id desc第三步:


 


sql标签循环体


 


[loop=7]
<img border="0" src="/images/editfile.gif">[{$Field(Name,Text,10,...,2,)}]-{$Field(Memo,Text,36,...,2,)} ({$Field(AddTime,Date,MM-DD)})
<br />
[/loop]


 


 


最后一步,在模型里调用


 


{SQL_最新留言(10)}
 


div布局下留言板之签写留言当前心情头像的修改方法  







文件:Post.asp
行数:101(按钮)和103(头像)


解决方法:在网站调用的css文件中加上一下代码:
/*浮动样式,可以自定义*/
.left {float:left;}
.right {float:right;}


在该文件代码中添加调用的浮动样式,修改后的代码如下:
Function EmotList()
         Dim I
    For I=1 To 30
    EmotList=EmotList & "<input class=""left"" type=""radio"" name=""txthead"" value=""" & I & """"
     IF I=1 Then EmotList=EmotList & " Checked"
     EmotList=EmotList & " ><img class=""left"" src=""../Images/Face1/Face" & I & ".gif"" border=""0"">"
     IF I Mod 15=0 Then EmotList=EmotList & "<BR>"
    Next
    End Function


IF I Mod 15=0 表示每行15个,输出15个后换行,因为一共有30个表情,所以15个一行的话就是两行,如果你需要自己设置行数,请自己计算



 

 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
w6688 当前离线

128

主题

0

广播

0

粉丝
添加关注
级别:一年级

用户积分:679 分
登录次数:55 次
注册时间:2009/11/24
最后登录:2011/1/8
w6688 发表于:2010/6/12 17:34:00   | 只看该作者 查看该作者主题 沙发 
科汛在线考试系统(NET)
http://bbs.kesion.com/dispbbs.asp?BoardID=41&ID=121933&replyID=&skin=1
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
lym888 当前离线

340

主题

1

广播

0

粉丝
添加关注
级别:三年级

用户积分:1131 分
登录次数:150 次
注册时间:2007/11/12
最后登录:2018/1/24
lym888 发表于:2010/3/15 16:25:00   | 只看该作者 查看该作者主题 藤椅 
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
rieycd 当前离线

58

主题

0

广播

0

粉丝
添加关注
级别:学前班

用户积分:425 分
登录次数:36 次
注册时间:2010/2/4
最后登录:2013/8/14
rieycd 发表于:2010/3/15 9:58:00   | 只看该作者 查看该作者主题 板凳 
科汛智能建站系统
先保留,修改的时候看看。。。
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
hermes0911 当前离线

38

主题

0

广播

0

粉丝
添加关注
级别:学前班

用户积分:147 分
登录次数:31 次
注册时间:2010/1/28
最后登录:2010/5/1
hermes0911 发表于:2010/3/15 9:44:00   | 只看该作者 查看该作者主题 报纸 
科汛在线网校系统

楼主强悍,就是偶目前的水平看不懂,要是能附上演示的图片就好了。

 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
huntway 当前离线

22

主题

0

广播

0

粉丝
添加关注
级别:学前班

用户积分:147 分
登录次数:11 次
注册时间:2009/12/15
最后登录:2010/4/25
huntway 发表于:2009/12/16 11:11:00   | 只看该作者 查看该作者主题 地板 
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
56look 当前离线

807

主题

26

广播

12

粉丝
添加关注
级别:七年级

用户积分:5898 分
登录次数:575 次
注册时间:2007/3/25
最后登录:2020/3/29
56look 发表于:2009/12/16 9:22:00   | 只看该作者 查看该作者主题 7楼 
科汛在线考试系统(NET)
本站进行转帖,感谢提供。
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
ks1w 当前离线

2796

主题

4

广播

1

粉丝
添加关注
级别:大一

用户积分:14338 分
登录次数:665 次
注册时间:2006/11/3
最后登录:2019/7/26
ks1w 发表于:2009/12/15 19:55:00   | 只看该作者 查看该作者主题 8楼 
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
zhuziai 当前离线

153

主题

0

广播

0

粉丝
添加关注
级别:一年级

用户积分:1079 分
登录次数:37 次
注册时间:2008/9/20
最后登录:2010/7/27
zhuziai 发表于:2009/12/15 19:36:00   | 只看该作者 查看该作者主题 9楼 
这个的确不错。精华的好。但如果有载图更好了
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
一生有你 当前离线

10439

主题

0

广播

18

粉丝
添加关注
级别:版主

用户积分:72521 分
登录次数:1969 次
注册时间:2006/7/1
最后登录:2021/8/25
一生有你 发表于:2009/12/15 18:55:00   | 只看该作者 查看该作者主题 10楼 
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
<上一主题 | 下一主题 >
Powered By KesionCMS Version X1
厦门科汛软件有限公司 © 2006-2016 页面执行0.25000秒 powered by KesionCMS 9.0