uso una form per una serie di tendine popolate da una query su db access per impostare i filtri di una ricerca però da browser mi fa vedere solo il primo oggetto del form e non lo popola nemmeno.
la prima istruzione asp è
<% set Rs = Cn.Execute("SELECT IDNazione, Descrizione from Nazione order by Descrizione")
...
grazie a tutti
Prova a guardare questo 3D se può in parte schiarirti le idee
che mi hai indicato ma il mio problema rimane. per essere più chiaro riporto il codice:
il risultato è una "tendina" nazione vuota e non compare la nessun altro poggetto in seguito.<body link="#000000" vlink="#000000" alink="#000000">
<%
Set Cn = Server.CreateObject("ADODB.Connection")
Cn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("miodb.mdb")
%>
<form action="result.asp" method="post">
<table border=1 style="font-family: Verdana; font-size: 10 pt; font-weight: bold">
<tr>
<td>Nazione</td>
<td>
<select name="Nazione">
<%
set Rs = Cn.Execute("SELECT IDNazione, Descrizione from Nazione order by Descrizione")
if Rs.BOF and Rs.EOF then
else
rs.movefirst
while not rs.eof
response.write "<option value='" & rs.fields("IDNazione").value & "'>" & rs.fields("Nazione").value & "</option>"
rs.movenext
wend
end if
Rs.close
set Rs=nothing
%>
</select>
</td>
</tr>
<tr>
<td>Nome Azienda</td>
<td><input type="text" name="NomeAzienda" size="20"></td>
</tr>
... etc etc ...
Prova così:
e fai saperecodice:<body link="#000000" vlink="#000000" alink="#000000"> <% set conn = server.createObject("ADODB.Connection") conn.open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & server.mapPath("miodb.mdb") sql = "SELECT * FROM nazione ORDER BY descrizione" set rs = conn.execute(sql) if not rs.eof then %> <form action="result.asp" method="post"> <table border=1 style="font-family: Verdana; font-size: 10 pt; font-weight: bold"> <tr> <td>Nazione</td> <td> <select name="oggetto"> <option value="0">SELEZIONA</option> <% do until rs.eof %> <option value="<%=rs("IDNazione")%>"><%=rs("Nazione")%></option> <% rs.moveNext loop %> </select> <% end if rs.close set rs = nothing conn.close set conn = nothing %> </td> </tr> <tr> <td>Nome Azienda</td> <td><input type="text" name="NomeAzienda" size="20"></td> </tr>
ottimo e abbondante :quote:
grazie mille
Prego!
Permessi di invio
Rispondi quotando