Select con valori da Dbase

[Vitacillina]

Ciao, ho un problema con una select che preleva i dati da un dbase mysql; il codice è questo:

<SELECT size="1" NAME="List" multiple>
<option>Selezionare valore</option>
<%


strSql = "SELECT * "
strSQL = strSQL & " FROM "
strSQL = strSQL & " MGLU "
strSQL = strSQL & " ORDER BY "
strSQL = strSQL & " ID ASC "

Set Rs = Server.CreateObject("ADODB.Recordset")
Rs.Open strSql, objconn

If Not Rs.EOF Then
Do while NOT Rs.EOF

%>

<option value= "<% = Rs("DESCRIZIONE") %>"><% = Rs("DESCRIZIONE") %></option>

<% 

Rs.MoveNext
Loop
End If

Rs.Close
set Rs = nothing

%>


</SELECT>

Non riesco a far rimanere selezionato il primo valore estratto dalla tabella, quando si apre la pagina sul browser...

[wallrider]

<option SELECTED>Selezionare valore</option>

[Vitacillina]

Originariamente inviato da wallrider
<option SELECTED>Selezionare valore</option>

Grazie, ma vorrei già selezionato il primo valore estratto dalla query non "Selezionare valore"...

[Vitacillina]

Così, seleziona sempre tutti i valori della lista.

<SELECT size="1" NAME="List" multiple>
<option>Selezionare valore</option>

...


<option SELECTED value= "<% = Rs("descrizione") %>"><% = Rs("descrizione") %></option>

[Roby_72]

<SELECT size="1" NAME="List" multiple>
<option>Selezionare valore</option>
<%


strSql = "SELECT * "
strSQL = strSQL & " FROM "
strSQL = strSQL & " MGLU "
strSQL = strSQL & " ORDER BY "
strSQL = strSQL & " ID ASC "

Set Rs = Server.CreateObject("ADODB.Recordset")
Rs.Open strSql, objconn

If Not Rs.EOF Then
cont = 1
Do while NOT Rs.EOF

%>

<option value= "<% = Rs("DESCRIZIONE") %>"<%if cont = 1 then%> selected="selected"<%end if%>><% = Rs("DESCRIZIONE") %></option>

<% 
cont = 0
Rs.MoveNext
Loop
End If

Rs.Close
set Rs = nothing

%>


</SELECT>

Roby

[Vitacillina]

tantissime grazie !!!!