asp抓取html的table的某一列,ASP完成动态生成网页中表格的行和列

ASP完成动态生成网页中表格的行和列

有时分，需求在某个表格列内放肯定数量的文字和图片，并需求随着记载数动态的显示肯定的行数和列数，比如在一行内显示4张图片抑或是5张图片，用Table完成的时分有时分很难判别tr或许td的完结地位，这里我写了一段代码，能实时判别行列的完结地位，记载集中的数据无余时能主动减少空tr和td。

测试用表格

'Create Table Test(id int,sTitle varchar(50))

程序代码

'测试每行排4列，排四行

dim i,j

dim iRsCount,iRows

dim perLines

perLines=4  '每行需显示的列数

set objRs=server.CreateObject("adodb.recordset")

objRs.open "select top 16 * from Test order by id",conn,3,1

if not objRs.eof then

response.write ""&vbcrlf

iRsCount=objRs.recordcount  '取得实践的记载数

iRows=int(iRsCount/perLines) '计算可失去的行数

if iRows<1 then

iRows=1

else

if iRsCount mod perLines=0 then

iRows=int(iRsCount/perLines)

else

iRows=int(iRsCount/perLines)+1

end if

end if

i=1

while not objRs.eof

for i=1 to iRows

response.write "

"&vbcrlf

for j=1 to perLines

If Not objRs.eof then

response.write ""&objRs("sTitle")&""&vbcrlf

Else

response.write "

"&vbcrlf

End if

if not objRs.eof then objRs.movenext

next

response.write "

"&vbcrlf

next

Wend

response.write ""

end if

objRs.close

set objRs=nothing