在經典ASP中填充SQL的下拉列表

我試圖強制用戶在添加記錄時只選擇某些值。所以很自然我使用下拉菜單，但我希望選項由數據庫中的特定字段填充。我想我會做一個Do/Loop，但我顯然做錯了什麼。在經典ASP中填充SQL的下拉列表

Dim dstrSQL 
Dim drs 
    dstrSQL = "SELECT EventID FROM Events" 
    set conn2 = CreateObject("ADODB.Connection") 
    conn2.open CONN_STRING 
    set drs = conn2.execute(dstrSQL) 
    conn2.close: set conn2 = nothing 
Do 
     Response.Write "<option value=" & drs.Fields(0) & " >" & drs.Fields(0) & "</option>" 
     drs.MoveNext 
Loop

來源

2010-01-09 maczealot

已經很長時間了。就像這樣：

conn2.open CONN_STRING 
set drs = conn2.execute(dstrSQL) 

do while not drs.eof %> 

    <option value="<%= drs.Fields(0) %>" ><%= drs.Fields(0) %></option> 
    <% drs.MoveNext 
Loop 
conn2.close 
set conn2 = nothing %>

來源

2010-01-09 02:34:17 mark123

太棒了，超級快！感謝一堆=） – maczealot 2010-01-09 02:38:06

我似乎還記得需要使用字段的.Value屬性，所以你會在循環內有drs.Fields（0）.Value。可能是錯誤的，但... – 2010-01-09 02:38:46

很高興提供幫助。 :) – mark123 2010-01-09 02:38:56

在經典ASP中填充SQL的下拉列表

回答

相關問題