问题帖子来源：
http://www.leadbbs.com/a/a.asp?B=30&ID=2554907
http://www.leadbbs.com/a/a.asp?B=30&ID=2554370
原始修改提供者：WENSUI
原始修改参考帖：
boards.asp修改法地址：http://w.leadbbs.com/a/a.asp?B=200&ID=2044690
_boards.asp修改法地址：http://w.leadbbs.com/a/a.asp?B=200&ID=2045513
演示图片：http://family.179net.com/bbs/images/upload/2007/04/15/154752.jpg
作用：所有风格模板将带自定义横排版面，其他未横排版面使用风格自定义模板。
修改方法：
打开boards.asp文件。
1：删除以下蓝色语句，共三处：
A：
[color=blue]<%
If LMT_SimpleHomePage = 1 Then
If GetBinarybit(GBL_TempletFlag,1) = 1 Then
Server.ExeCute("inc/Templet/" & GBL_TempletID & "_0.JS")
Else%>[/color]
B:
}<% [color=blue]End If
Else[/color]
If GetBinarybit(GBL_TempletFlag,2) = 1 Then
Server.ExeCute("inc/Templet/" & GBL_TempletID & "_1.JS")
Else%>
C：
}<%[color=blue]End If[/color]
Dim BoardID,ForumPass
2：添加横排版块模板：
搜索语句：
function displayboard(BoardID,BoardAssort,BoardName,AssortName)
...............
...............
...............
if(num>4)num=0;
}
替换为：横排代码模板下载：http://qjiao.w3.elkj.net/1.js
也可以参考多栏模板代码
3：定义模板样式参数：
搜索语句：
Response.Write VbCrLf & "displayboard(" & BoardID & "," & GetData(1,0) & ",""" & Replace(Replace(GetData(0,0),"\","\\"),"""","\""") & """,""" & Replace(Replace(GetData(14,0),"\","\\"),"""","\""") & """);"
替换为：
Response.Write VbCrLf & "displaysboard(" & BoardID & "," & GetData(1,0) & ",""" & Replace(Replace(GetData(0,0),"\","\\"),"""","\""") & """,""" & Replace(Replace(Replace(GetData(2,0),"\","\\"),"""","\"""),VbCrLf,"\n") & """,""" & Replace(Replace(GetData(3,0),"\","\\"),"""","\""") & """,""" & GetData(4,0) & """," & GetData(29,0) & "," & GetData(30,0) & ",""" & ForumPass & """," & GetData(19,0) & ",""" & Replace(Replace(Replace(GetData(20,0),"\","\\"),"""","\"""),"<","<") & """,""" & Replace(Replace(GetData(10,0),"\","\\"),"""","\""") & """," & GetData(9,0) & ",""" & Replace(Replace(GetData(14,0),"\","\\"),"""","\""") & """," & GetData(31,0) & "," & GetData(32,0) & ",""" & Replace(Replace(GetData(21,0),"\","\\"),"""","\""") & """,""" & GetData(22,0) & """,""" & GetData(23,0) & """,0,""" & GetData(27,0) & """,""" & Replace(Replace(Replace(GetData(35,0),"\","\\"),"""","\"""),"<","<") & """);"
4：自定义横排显示的区版序号
搜索语句：If LMT_SimpleHomePage = 0 Then
修改为：
If LMT_SimpleHomePage = 0 and GetData(1,0)<>[color=red]7[/color] and GetData(1,0)<>[color=red]11[/color] Then
其中的“7”和“11”表示自定义区版序号，可任意定义，想横排显示哪个区就哪个区。需要显示更多只需要添加 and GetData(1,0)<>[color=red]11[/color]这句在其中就可以了。例如：
If LMT_SimpleHomePage = 0 and GetData(1,0)<>[color=red]7[/color] and GetData(1,0)<>[color=red]11[/color] and GetData(1,0)<>[color=red]15[/color] and GetData(1,0)<>[color=red]21[/color] Then
5：附录该问题的其他未经横排显示的模板样式，请在后台模板参数中添加，将某风格选取该模板。
SSSS1模板下载：http://qjiao.w3.elkj.net/2.js
也可参考SSSS模板
