忘了,应该从库中读取了
dim linmax,i
linmax = 225
i = 1
do not rs.eof and i<3
title = rs("title")
if len(title) < linmax then
response.write "<a href='111.htm' target='_blank'>"&title&"</a>"
linmax = linmax - len(title)
end if
i = i + 1
rs.movenext
loop
linmax=225
for i=1 to 3
if len(title) < linmax then
response.write "<a href=111.htm target=_blank>"&title&"</a>"
linmax=linmax - len(title)
end if
next
dim linemax
linemax=你所希望的一行的字符数
do
linemax=linemax-len(rs("title"))
if linemax>0 then
response.write rs("title")+空格
else if
response.write left(rs("title"),linemax)+换行
linemax=你所希望的一行的字符数
end if