errore nel popolare menu a tendina

[tosto73]

mi aspetterei che venisse popolata il menu a tendina con le categorie e il valore scelto selezionato ma non popola nulla
sapete dirmi dove sbaglio?

Grazie-.

----code ----------------------------

<select name="categoria" size=1 class="cell" id="categoria">
<%
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & server.MapPath("/dbase/db.mdb")

set objRS=server.createObject("ADODB.Recordset")
sql="SELECT * FROM categorie ORDER BY categoria asc"
objRS.Open sql, objConn


if not objRS.EOF then
do while not objRS.EOF


if objRS("categorialocale") = Cint(categoriascelta) then
response.write "<option value='"& objRS("categorialocale")&"' SELECTED>"& objRS("categorialocale")&"</option>"
else
response.write "<option value='"& objRS("categorialocale")&"'>"& objRS("categorialocale")&"</option>"
end if


objRS.MoveNext
Loop
end if

objRS.Close
set objRS=nothing

objConn.Close
set objConn=nothing
%>
</select>

[seafarer]

se errori di connessione al db non ne fa, sintassi mi sembra giusta allora potrei pensare a db vuoto...ma nell'html generato non c'è nulla di tutto ciò che hai scritto?

[Mems]

la variabile categoriascelta a cosa è uguale?
in che modo la movimenti?
mi pare che manca una request...

[seafarer]

penso che categoriascelta sia una variabile che ha già "requestato" prima cmq requestata o no dovrebbe andare sempre nell'else,no? :master:

[Mems]

Originariamente inviato da seafarer
penso che categoriascelta sia una variabile che ha già "requestato" prima cmq requestata o no dovrebbe andare sempre nell'else,no? :master:

Il fatto di non vedere in quel codice la request mi induce a pensare che non l'abbia "requestata"...

Ad ogni modo, il problema potrebbe essere pure che il campo "categorialocale" della tabella del database non contenga un numero oppure il campo, anche contenendo un numero, non sia di tipo numerico.
A questo punto consiglio (dando per scontato che abbia fatto la request di cui sopra):

if cint(objRS("categorialocale")) = Cint(categoriascelta) then

[tosto73]

in effetti hai ragione l'esempio che mi era stato dato si riferica ad un campo id sicuramente numerico io ho sostituito con un campo stringa

qui prelevo i valori

--- code ----------------------
<%
'da qui in poi cerco il record con questo username
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("/dbase/db.mdb")

set objRS=server.createObject("ADODB.Recordset")

'controllo se l'utente è effettivamente registrato
sql = "SELECT * FROM locali WHERE username = '" & username2 & "'"

objRS.Open sql, objConn,3,3
dim categoriascelta
categoriascelta =objRS("categorialocale")
%>

mentre poi ho modificato cosi

--- code --------------------------------

if objRS("categorialocale") = categoriascelta then
response.write "<option value='"& objRS("categorialocale")&"' SELECTED>"& objRS("categorialocale")&"</option>"
else
response.write "<option value='"& objRS("categorialocale")&"'>"& objRS("categorialocale")&"</option>"
end if



ma pare non vada lo stesso

[Mems]

Tosto, un paio di occhiali no, eh?
Guarda bene cosa ho scritto io prima.
Ho fatto il typecasting (cint) del dato preso dal db...

[tosto73]

mmmmm??? ok mo vedo però li ho come vedi dal mio disegnino
dovrò potenziali

:quote:

[tosto73]

ci sono riuscito, facevo riferimento al campo categorialocale che era relativo al recorset precedente mentre nella tabella categorie si chiama categoria e non categorialocale.

pardon!

[tosto73]

ad inizio pagina assegno alla variabile pippo un valore preso dal mio db

poi vorrei screvire tale valore nella textbox

<td> <input name="pippo" id="pippo" value=<%response.write pippo %> size="45" maxlength="40">


ma non lo scrive, sbaglio la sintassi?