ASP控制表格的行列来显示数据
2008-02-23 09:39:23来源:互联网 阅读 ()
下面是一个使用数组以表格显示几行几列的简单的示列代码,希望对您有所帮助。
<%
function tablebody(arr,cols,functionstr)
'arr为数组
'cols为列数
'functionstr为输出内容用的function,没有为空
dim allnum,i,j
allnum = ubound(arr)
for i = 0 to (allnum/cols)
Response.write (VbTab &"<tr>" & VbNewLine)
for j = 0 to (cols-1)
ij = (i*cols j)
Response.write (VbTab & VbTab &"<td width="""& formatnumber(100/cols,0) &"%"">")
if ij <= allnum then
if len(functionstr) > 0 then
execute(""& functionstr &"(arr(ij))")
else
Response.write (arr(ij))
end if
else
Response.write (" ")
end if
Response.write ("</td>" & VbNewLine)
next
Response.write (VbTab &"</tr>" & VbNewLine)
next
end function
function test1(str)
Response.write ("<div align=""center"">"& str &"</div>")
end function
'示例1
dim kk(9)
for k = 0 to 9
kk(k) = k 1
next
%>
<table border="1" width="600" cellpadding="2">
<蔿l tablebody(kk,1,"")%>
</table>
<hr>
<table border="1" width="600" cellpadding="2">
<蔿l tablebody(kk,4,"test1")%>
</table>
<hr>
<table border="1" width="600" cellpadding="2">
<蔿l tablebody(kk,5,"")%>
</table>
<hr>
<%
dim wwwstr,wwwarr
wwwstr = "51windows.Net|blueidea.com|google.com|yahoo.com|msn.com.cn|csdn.net|ipark.cn|1kg.cn"
wwwarr = split(wwwstr,"|")
function urltest1(str)
Response.write ("<a href=""http://www."& str &""" target=""_blank"">"& str &"</a>")
end function
function urltest2(str)
Response.write ("<button style=""width:100%;"" onclick=""window.open('http://www."& str &"','','')"">"& str &"</button>")
end function
%>
<table border="1" width="480" cellpadding="2">
<蔿l tablebody(wwwarr,3,"urltest1")%>
</table>
<hr>
<table border="2" width="480" cellpadding="2" cellspacing="2" >
<蔿l tablebody(wwwarr,4,"urltest2")%>
</table>
标签:
版权申明:本站文章部分自网络,如有侵权,请联系:west999com@outlook.com
特别注意:本站所有转载文章言论不代表本站观点,本站所提供的摄影照片,插画,设计作品,如需使用,请与原作者联系,版权归原作者所有
IDC资讯: 主机资讯 注册资讯 托管资讯 vps资讯 网站建设
网站运营: 建站经验 策划盈利 搜索优化 网站推广 免费资源
网络编程: Asp.Net编程 Asp编程 Php编程 Xml编程 Access Mssql Mysql 其它
服务器技术: Web服务器 Ftp服务器 Mail服务器 Dns服务器 安全防护
软件技巧: 其它软件 Word Excel Powerpoint Ghost Vista QQ空间 QQ FlashGet 迅雷
网页制作: FrontPages Dreamweaver Javascript css photoshop fireworks Flash