RadarBob
07-19-2002, 07:38 PM
The following code is not executing the imbedded IF or the DO UNTIL that's supposed to build the options of the <select> object. Additionally the rest of the form beyond this point does not build at all. The <select> object below is the only form object that uses ASP. The recordset is being populated before getting here. Can you see any problems?
<tr>
<td border="3" valign="middle" align="center" width="-1" height="228">
Available Keywords<br><br>
<%
rsAllDBKeywords.MoveFirst()
%>
<!-- The list of existing keywords -->
<select size="14" name="oldList" width="300" multiple tabindex="1"
onKeyPress="return findOption(this)">
/////////// seems to work to this point only ///////////////////
<%
if rsAllDBKeywords.EOF then
%>
<option value="00"><--empty--></option>
<%
else
Do until rsDBAllKeywords.EOF
%>
<option style="background-color:lightgrey"><%Response.write rsAllDBKeywords.fields("Keyword").value%> </option>
<%
rsAllDBKeywords.MoveNext()
loop
end if
<tr>
<td border="3" valign="middle" align="center" width="-1" height="228">
Available Keywords<br><br>
<%
rsAllDBKeywords.MoveFirst()
%>
<!-- The list of existing keywords -->
<select size="14" name="oldList" width="300" multiple tabindex="1"
onKeyPress="return findOption(this)">
/////////// seems to work to this point only ///////////////////
<%
if rsAllDBKeywords.EOF then
%>
<option value="00"><--empty--></option>
<%
else
Do until rsDBAllKeywords.EOF
%>
<option style="background-color:lightgrey"><%Response.write rsAllDBKeywords.fields("Keyword").value%> </option>
<%
rsAllDBKeywords.MoveNext()
loop
end if