|
![]() |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
这是作者新增加的ubb代码对表格的支持效果。 语法如下: 程序代码: [ table] 1|2[br] 3|4[br] 5|6 [ /table] 说明: 1."[table]":表格头 2."[/table]":表格尾 3."|":表格间隔(默认居左)→转变为"</td><td>" 4."[br]":表格换单元行→转变为"</td></tr><tr><td>" 注重: 1.第一个单元行之前和最末尾一个单元行之后不加"[br]" 2.每一行的单元格数目必须一样,这里没有colspan之类的属性。 源代码展示: function ubb_table(ubb_temp) ubb_temp_=ubb_temp do while ubb_temp_<>"" text=searchUBB(ubb_temp_,"[table ]","[/table ]") if text<>"" then ltext="<table width=\\\'80%\\\' border=\\\'0\\\' cellspacing=\\\'0\\\' cellpadding=\\\'0\\\' align=\\\'center\\\' bgcolor=\\\'#000000\\\'>"&_ "<tr><td>"&_ "<table width=\\\'100%\\\' border=\\\'0\\\' cellspacing=\\\'1\\\' cellpadding=\\\'4\\\'><tr valign=\\\'top\\\' bgcolor=\\\'#FFFFFF\\\'>"&_ "<td>"&text&"</td></tr></table></td></tr></table>" ltext=replace(ltext,"|","</td><td>") ltext=replace(ltext,"[br]","</td></tr><tr valign=\\\'top\\\' bgcolor=\\\'#FFFFFF\\\'><td>") ltext=replace(ltext,"<td><br>","<td>") ubb_temp_=replace(ubb_temp_,"[ table]"&text,ltext,1,1,1) ubb_temp_=replace(ubb_temp_,ltext&"[/table ]",ltext,1,1,1) else exit do end if loop ubb_table=ubb_temp_ end function 将上面的函数拷贝进ubbcode.asp文件 在"ubb=ubb_code(ubb)"前面加上"ubb=ubb_table(ubb)" 返回类别: 教程 上一教程: 无组件实现文件上传/下载 下一教程: 用ASP实现中英文字体的自动选择 您可以阅读与"新增UBB代码对表格的支持"相关的教程: · ASP实现在WEB中显示电子表格数据(一)显示数据表格的应用 · 在ASP中利用“正则表达式” 对象实现UBB风格的论坛 · 检测ISP是否支持ASP组件的代码 · 简朴实用的ASP编程代码对照表 · asp实现在web中显示电子表格数据(一)显示数据表格的应用 |
![]() ![]() |
快精灵印艺坊 版权所有 |
首页![]() ![]() ![]() ![]() ![]() ![]() ![]() |