Question

ASP给变量赋值的问题

我现在想把以下语句整体放在一个变量Repeat里,再把Repeat变量的值传递给网页模板上的$show$,如何实现啊?

<table>
<tr>
<% i=0
do while not rs.eof
i=i+1%>
<td>显示数据库记录,每行显示2个</td>
<%if (i mod 2=0) and i>=2 then
response.write"</tr><tr>"
end if
rs.movenext
loop%>

如何把上面这些循环输出的代码都放在一个变量里啊?

Answer 1

dim Repeat

Repeat = "<table>" & vbCrlf
Repeat = Repeat + "<tr>" & vbCrlf

i=0
do while not rs.eof
i=i+1
Repeat = Repeat + "<td>显示数据库记录,每行显示2个</td>" & vbCrlf
if (i mod 2 = 0) and i>=2 then
Repeat = Repeat + "</tr><tr>"
end if
rs.movenext
loop

你的意思是这样吗？

Answer 2

如果你是为了实现读取一条数据的功能，完全没必要再声明什么，直接读取ID啊。ID在数据库里是唯一的。然后上一篇文章就是判断ID-1，下一篇就是ID+1，或者反过来。