Hej,
Har en liten kodsnutt som jag hittat i arkivet här på sidan, men det verkar vara något fel med den. Det som ska göras är att hämta datat i kolumnen SERVER och visa dem i drop down menyn. Koden ser ut så här:
<code>
<SELECT name="SERVER">
<option selected value="valj">-- Välj Server --</option>

<% Do Until rs.EOF %>
<option value="<%=rs.Fields("SERVER")%>"><%= rs.Fields("SERVER")%></option>
<% rs.MoveNext %>
<% Loop %>
</select>

<%
Set objCon = Server.CreateObject("ADODB.Connection")
objCon.Open "Driver={MIMER};Database=mimerdb;Uid=Fredrik;Pwd=tupac6;"
Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open "SELECT * FROM AGARE.SERVER", objCon

rs.Open objCon, 3, 3

%>
</code>
Felet jag får är Object required: '' vid <% Do Until rs.EOF %>
Någon som har en aning?

Du måste öppnarecordsetet innan du kan loopa igenom det. Dessutom skall du stänga objekten efter dig för att frigöra resurser.
<code>
<SELECT name="SERVER">
<option selected value="valj">-- Välj Server --</option>
<%

Set objCon = Server.CreateObject("ADODB.Connection")
objCon.Open "Driver={MIMER};Database=mimerdb;Uid=Fredrik;Pwd=tupac6;"

Set rs = Server.CreateObject("ADODB.RecordSet")
rs.Open "SELECT * FROM AGARE.SERVER", objCon

Do Until rs.EOF
Response.Write "<option value=""" & rs.Fields("SERVER") & """>" & rs.Fields("SERVER") & "</option>"
rs.MoveNext
Loop

rs.Close
Set rs = Nothing

objCon.Close
Set objCon = Nothing
%>
</select>
</code>

Såklart (!), Stort tack till dig Andreas.