웹 페이지 전체에서 쿼리 결과가 유지되지 않습니다.

Question

저는 VB에서 매우 새로 워서 드롭 다운 메뉴를 채우지 못하는 값에 문제가 있는지 확인하도록 요청 받았습니다. 아래의 코드는 첫 번째 드롭 다운 메뉴를 채우지 만 두 번째 드롭 다운 메뉴는 비어 있습니다. SQL 복사 및 붙여 넣기를 실행하여 rs 변수를 다시 작성하면 내 드롭 다운 메뉴가 채워집니다.

나는 변수를 올바르게 보존하지 않을 것이라고 확신하지만, 내가 말했던 것처럼 나는 VB에서 매우 익숙하다. 내가 rs을 통해 루프 같은 코드를 사용하여 다운 상자 내 두 번째 드롭을 만들 갈 때

<%  
    sql = ""  
    sql = sql & "EXECUTE dbo.web_FetchPlans @ID = " & ID  
    Set rs = objConn.execute(sql)  
%> 

<select name="first" type="text" ">  
    <option value="">Please select ...</option> 

    <% if not rs.eof then 
      rs.moveFirst() 
      do while not rs.EOF 
    %> 

<% 

if not rs.eof then  
    rs.moveFirst()  
    do while not rs.EOF 
%> 

<option value="<%=rs("productCode")%>"><%=rs("productName")%></option> 

<% 
rs.moveNext() 
loop 
    end if  
%> 


</select> 

그래서, 내 옵션은 비어 있습니다.

Answer 1

문제는이 코드에 누워 있습니다 -

<% if not rs.eof then 
     rs.moveFirst() 

당신이 목록 아래로 두 번째 드롭에 도달 무렵 rs.moveFirst()이 발생하지 않으며 루프가 즉시 종료됩니다 있도록 rs.EOF 조건이 true가됩니다.