Asp classic ime，所以我选择John的选项：存储记录数据并每次重建HTML。这样，每次的选择都会有所不同。 <%sql = "SELECT personType_Id, personTypeName FROM PersonTypes ORDER BY pers_Asp Classic

Asp classic ime，所以我选择John的选项：存储记录数据并每次重建HTML。这样，每次的选择都会有所不同。 <%sql = "SELECT personType_Id, personTypeName FROM PersonTypes ORDER BY pers

asp-classic

Asp classic ime，所以我选择John的选项：存储记录数据并每次重建HTML。这样，每次的选择都会有所不同。 <%sql = "SELECT personType_Id, personTypeName FROM PersonTypes ORDER BY pers,asp-classic,Asp Classic,ime，所以我选择John的选项：存储记录数据并每次重建HTML。这样，每次的选择都会有所不同。 <%sql = "SELECT personType_Id, personTypeName FROM PersonTypes ORDER BY personTypeName" Set DB = ConnectRead () Set rs = DB.Execute (sql)%> <select name="personType_Id"> <option valu

ime，所以我选择John的选项：存储记录数据并每次重建HTML。这样，每次的选择都会有所不同。

<%sql = "SELECT personType_Id, personTypeName FROM PersonTypes ORDER BY personTypeName"
Set DB = ConnectRead ()
Set rs = DB.Execute (sql)%>
<select name="personType_Id">
    <option value="">All</option>
<%  WHILE NOT (rs.EOF) %>
<option value="<%=rs ("personType_Id")%>" <%IF (CINT(searchPersonTypeId) = rs("personType_Id")) THEN Response.Write("Selected") %>><%=rs ("personTypeName")%></option>
<% rs.MoveNext()
   WEND %>
</select>
<% db_CloseRs rs
   db_CloseConn DB  %>

html = GetHtmlForSelect("personType")

Function GetHtmlForSelect(selectName)
   If IsEmpty(Application(selectName)) Then
      'retrieve from database
      Application(selectName) = BuildHtmlWithdatabase(selectName)
   End If
   Return Application(selectName)
End Function