Query SELECT che non funziona

[orcim]

Cosa c'è di sbagliato in questo code, che non dà errroe ma non mi restituisce i dati nella select?:

<select size="1" name="pCargo">
                <option>Selezionare</option>
                <%
                                               
sql = "SELECT pCargo FROM pCargo"
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, cn, 3, 3

On Error Resume Next
rs.MoveFirst  
Do While Not rs.EOF%>

                      <option value=<%=rs("pCargo")%>><%=rs("pCargo")%></option>
<%
rs.MoveNext
Loop
rs.Close
set rs = Nothing
%>
              </select>