Salve ragazzi, ho un piccolo problemino: valorizzo una stringa con una query: mystring= "Select * from nome_tab where campo_Access ='variabile' ..."
adesso quando faccio il <% response.write mystring %> mi visualizza la query e non il risultato con i dati.... da cosa può dipendere?
grazie 1000
beh... se fai il response.write di una stringa è normale che ti visualizzi la stringa
se vuoi fare una query su database e stampare il risultato devi creare l'oggetto Connection (ADODB.Connection) ed aprire la connessione al tuo database, con l'oggetto recordset (ADODB.Recordset) fai la query e poi fai un ciclo per stampare i vari record.
Mi sa che ti mancano un po' di basi :master:
forse mi sono spiegato troppo in fretta... ho aperto sia la connessione , sia il recordset ed effettuo anke il il ciclo while .eof... ma visualizzo sempre la stessa stringa
posta un po' di codice che vediamo
<%@ Language=VBScript %>
<% Option Explicit %>
<%
' Controllo se trattasi di utente autenticato
if Session("autenticato") <>"OK" then
Response.Redirect("index.asp")
end if
' Creo variabili per la Connessione ed il Recordset
Dim cn
Dim rs
Dim Estraggo
Dim dato_form_partner
Dim dato_form_regione
Dim dato_form_prodotti
' Creo un istanza per la Connessione ed una per il Recordset
Set cn= Server.CreateObject("ADODB.Connection")
Set rs= Server.CreateObject("ADODB.Recordset")
' Apro la connessione al Database
cn.Open "driver={Microsoft access Driver (*.mdb)};dbq=" & Server.mappath("\Tutorial\Appoggio.mdb")
dato_form_partner= Replace(Request.Form("sel_dati_partner"),"'","''")
dato_form_regione= Replace(Request.Form("sel_dati_regione"),"'","''")
dato_form_prodotti= Replace(Request.Form("sel_dati_prodotti"),"'","''" )
Estraggo= "Select Partner, Regione, Win_Back_Tot from Dati_Tdb where partner='"&dato_form_partner&"' and regione='"&dato_form_regione&"' order by 1"
' Apro il Recordset
rs.Open Estraggo, cn
%>
<html>
<body>
<table>
<% While rs.eof = false
%>
<TR>
<td> <% Response.Write Estraggo %> </TD>
</TR>
<%
rs.movenext
Wend
%>
</TABLE>
<%
' Chiudo il Recordset
rs.Close
cn.close
Set cn= nothing
%>
</BODY>
</HTML>
grazie 1000 :quote:
questo stampa la query
se vuoi stampare tutti i campi del record puoi farecodice:Response.Write Estraggo
codice:<table> <% While rs.eof = false %> <TR><% for each field in rs.Fields%> <td><% Response.Write field.value %></TD><% next%> </TR> <% rs.movenext Wend %> </TABLE>
scusa l' ignoranza ma devo lasciare fiield e fields o devo sostituire con i campi di tabella e con il nome di tabella?
no Entiendo su idioma
scusami cosa vuoi dire?-...
Non riesco proprio a risolvere la situation :master:
l'esempio che t'ho fatto stampa tutti i campi (fields) del recordset. Nel tuo caso stamperà Partner, Regione e Win_Back_TotOriginariamente inviato da zzzzzzzzzz
scusa l' ignoranza ma devo lasciare fiield e fields o devo sostituire con i campi di tabella e con il nome di tabella
hai provato?
Permessi di invio
Rispondi quotando