Updating a Pull Down List from the Database

Hi Folks,

I have a db populated pull down list

<form>
 <select id="s1" name="s1" multiple>
                  
                        <%
                              dim adoRs1,vequipid,vequipmentlist
                              
                              strSql1 = "Select * from A_equipmentlist ORDER by equipmentlist"
                              set adoRS1 = GetDBConnection().execute(strsql1)
                              Do While NOT adoRS1.EOF
                                    vequipid = adoRS1.fields("equipid")
                                    vequipmentlist = adors1.fields("equipmentlist")
                        %>
           
                       <option value="<%=vequipid%>"><%=vequipmentlist%></option>
                         <%
                        
                                    adoRS1.MoveNext
                                Loop
                                
                                    adoRS1.close
                                set adoRS1 = nothing
                              GetDBConnection().close
                        %>
                    </select>       

<input name="submit" type="submit" value="Save">
</form>

I am adding values to this pulldown list via a database add

<%
      IF Request.Form("submit") = "Save" THEN
            strSQLFrm = "INSERT INTO A_equipmentlist (equipmentlist) Values('" & Request.Form("addequipmentlist") & "')"

            set adoRSfrm = GetDBConnection().execute(strSQLFrm)
            set adorsfrm = nothing  ' Close the Recordset Connection
            GetDBConnection().close ' Close the Database Connection
      End IF            
      
%>

This code above works fine, as the data is entered into the database, but the pull down list does not show the recently added content, even though it is in the database

If I add Response.Redirect to come back to the same page, all the page values disappers

Right now I have a text entry field and a save button.

Save button adds the text to the database, how can I refresh the pull down menu so that it shows the latest added information.

Thanks

RGStart Free Trial