Question

asp 中do while语法

我要从数据库(access)中读一个表的记录在网页的Select下拉框里显示出来

<select name="select">
<%
sql="select * from trade"
set rs=server.CreateObject("adodb.recordset")
do
{
....
}
<option selected value="1">按省份</option>
<%while%>

%>

do while
不知道怎么写

Answer 1

<select name="select">
<%
sql="select * from trade"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1 '要加这句才能打开记录集

'下面是循环
do while not rs.eof
'ASP里不能用{}
'这下面是你显示要输出的内容
.....
rs.movenext
loop
%>

我的一个实例程序:
<%

Set Rs=conn.Execute("Select Top "&TopNum&" * From Friendblog Where User_Belong="&Session("User_ID")&" Order By Blog_ID")

If Not Rs.Eof Then

Do While Not Rs.Eof

%>

<div id="blog<%=Rs("Blog_ID")%>">

<div id="textlist-user"><a class="Toplink" href="./Getuser.asp?userid=<%=Rs("Blog_User")%>" target="_blank"><strong><%=Rs("Truename")%></strong></a> <span class="Toplink">发表日志</span></div> <div id="textlist-title"><a onClick="blog<%=Rs("Blog_ID")%>.style.display='none'" href="./Blog_Oper.asp?menu=getBlog&Blog_ID=<%=Rs("Blog_ID")%>" target="_blank"><%=Rs("Blog_Title")%></a></div><div id="textlist-time"><%=Rs("Blog_Time")%></div>

</div>

<%

Rs.Movenext

Loop
%>

这里有个源程序: http://hi.baidu.com/2008young/blog/item/5985d0f8fd7b070cd9f9fd99.html

Answer 2

<%while not rs.eof%>
<option selected value="1">按省份</option>
<%wend%> 读出来的数据放哪？

Answer 3

要显示在下拉框中<option selected value="1"><%=rs(0)%></option>

Answer 4

do while not rs.eof
.....
rs.movenext
loop