Ciao ragazzi,
ho un problema con un recordset.
Se estraggo la query e la eseguo da access risulta piena,
mentre nello script qua sotto si verifica rs.eof = true,
e non mi entra nel ciclo.
Cosa posso verificare?
codice:ACC = "select offerte.offerta,offerte.mq_comm,offerte.locali,offerte.tipologia,offerte.costo_E,offerte.latitudine,offerte.longitudine,offerte.indirizzo,offerte.cap," ACC = ACC & " '" & indirizzo & "' + foto1 as foto" ACC = ACC & " from offerte" ACC = ACC & " where" ACC = ACC & " offerte.cap like'*" & comune & "*'" if cstr(request.Form("R_tipo")) = "VE" then ACC = ACC & " and offerte.tipo ='Vendita'" else ACC = ACC & " and offerte.tipo ='Affitto'" end if 'zona if cstr(request.Form("localita")) <> "" and cstr(request.Form("localita")) <> "0" then ACC = ACC & " and offerte.zona='" & request.Form("localita") & "'" end if 'tipologia if cstr(request.Form("R_tipologia0")) <> "" and cstr(request.Form("R_tipologia0")) <> "0" then ACC = ACC & " and offerte.tipologia = '" & request.Form("R_tipologia0") & " '" end if 'prezzo_tolleranza if cstr(request.Form("prezzo_tolleranza")) <> "" and cstr(request.Form("prezzo_tolleranza")) <> "0" then ACC = ACC & " and offerte.costo_E <= " & request.Form("prezzo_tolleranza") end if 'auto box if cstr(request.Form("R_autobox")) <> "" then ACC = ACC & " and offerte.autobox = '" & request.Form("R_autobox") & " '" end if 'locali if cstr(request.Form("R_locali")) <> "" then ACC = ACC & " and offerte.locali = " & request.Form("R_locali") end if set RS = Conn.Execute(ACC) while not RS.EOF if IsNull(rs("latitudine")) = true then ChiediCoordinate() else Response.write rs("latitudine") end if rs.movenext wend

Rispondi quotando