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

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