Newsgroup: it.comp.appl.access
Titolo: SQL e parametro AND

Buona sera a tutti,
premetto di essere assolutamente consapevole di essermi "intrippato"
contro un problema estremamente banale ma, al momento non ne vengo
fuori ...
uso la seguente stringa SQL per effettuare una ricerca ma sicuramente
o le " o qualche altra cosa non mi fa funzionare la parte aggiuntiva
di parametro AND:
 
            strsql = "SELECT PRG_ID, PRG_COD, PRG_ALQ, PRG_DESCR,
PRG_VALORE " & _
            "FROM [PROGRAMMI] " & _
            "WHERE ((PRG_COD Like " & Chr$(34) & "*" & _
            strR & "*" & Chr$(34) & " & " And (PRG_VALORE)<> & ")"
 
questa è solo una delle tantissime prove che ho fatto ma tra messaggi
di "tipo non corrispondente" ed errori di debug vari non riesco a
superare questo "muro" ...
Grazie anticipatamente per l'aiuto.
Buona prosecuzione di serata
 
Francesco

 superare questo "muro" ...
 
Ci sono troppe parentesi e alla fine manca il valore o variabile
che vuoi paragonare con PRG_VALORE.
La sintassi giusta dipende anche delle tipi di dati di PRG_COD
e PRG_VALORE. Se p.e. il primo � un testo e il secondo un numero,
puoi provarlo cos�:
 
strsql = _
"SELECT PRG_ID, PRG_COD, PRG_ALQ, PRG_DESCR, PRG_VALORE " & _
"FROM PROGRAMMI " & _
"WHERE PRG_COD Like " & Chr$(34) & "*" & strR & "*" & Chr$(34) & _
" And PRG_VALORE <> " & lngPippo
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 
 
 


Karl grazie ... funziona,
come al solito sei SEMPRE presente a risolvere i nostri dubbi ...
sapevo di essermi ingarbugliato su una banalità.
A te ed a tutti i frequentatori del NG una buona serata.
 
Francesco

 > >             strR & "*" & Chr$(34) & " & " And (PRG_VALORE)<> & ")"
 
Quando mi incarto su query così, metto prima la stringa in una casella
di testo per vedere il risultato effettivo.
  strsql = "SELECT PRG_ID, PRG_COD, PRG_ALQ, PRG_DESCR,
    PRG_VALORE " & _
    "FROM [PROGRAMMI] " & _
    "WHERE ((PRG_COD Like " & Chr$(34) & "*" & _
    strR & "*" & Chr$(34) & " & " And (PRG_VALORE)<> & ")"
Forms!maschera1!testo0=strsql
Currentdb.Execute strsql
 
Se mi si blocca o fa cose strane, controllo il risultato nella casella
di testo.
Riccardo Baldinotti

 > >             strR & "*" & Chr$(34) & " & " And (PRG_VALORE)<> & ")"
 
Quando mi incarto su query cosě, metto prima la stringa in una casella
di testo per vedere il risultato effettivo.
  strsql = "SELECT PRG_ID, PRG_COD, PRG_ALQ, PRG_DESCR,
    PRG_VALORE " & _
    "FROM [PROGRAMMI] " & _
    "WHERE ((PRG_COD Like " & Chr$(34) & "*" & _
    strR & "*" & Chr$(34) & " & " And (PRG_VALORE)<> & ")"
Forms!maschera1!testo0=strsql
Currentdb.Execute strsql
 
Se mi si blocca o fa cose strane, controllo il risultato nella casella
di testo.
Riccardo Baldinotti
_________Risposta:
hanno inventato la finestra immediata, che fa questo mestiere
Continuiamo cosě, tagliamo sempre posti di lavoro... ;-)
MA
 
 
 
 

 di testo.
Imparare a usare il debug e modificare (fino ad OK o finche' ci si 
stufa) mentre e' in esecuzione no ehhhh?  ;-{)
Fermo restando che (se PRG_COD non contiene apici) l'interpretazione 
puo' essere piu' chiara se:
 
...."where PRG_COD like '*" & str & "*' and PRG_Valore <> " & x
 
 
 
-- 
 
ac (x=y-1)

 stufa) mentre e' in esecuzione no ehhhh?  ;-{)
 
Ehm, l'idea era quella, ignorando come ignoro gli strumenti canonici.
Il problema è che quando  mi esce l'errore volevo beccare da qualche
parte la stringa.
 
Per MA: vuoi dire che un Debug.Print mi darebbe lo stesso risultato?
Eh...
 
Abbiate pietà...
Riccardo Baldinotti

 Francesco
 
Dim VAR as String:
" WHERE [FieldName]='" & VAR & "' ...
 
 
Dim VAR As Currency:
" WHERE [FieldName]=" & VAR & " ...
 
 
Dim VAR As Date:
" WHERE [FieldName]=#" & Format(#VAR#, "mm/dd/yyyy") & "# ...
 
Bruno
 
PS
==
Se devi inserire in VAR:
Da "HOYT" si mangia bene e si beve meglio:
 
VAR = "Da """"HOYT"""" si mangia bene e si beve meglio"
 
 

"Riccardo Baldinotti"  ha scritto nel messaggio 
news:e2784cfe-e3b7-4460...@g7g2000vbv.googlegroups.com...

__________________________Risposta:
Anche meglio.
Perché tu puoi mettere il Debug.Print oppure passare il cursore sulla 
variabile per vederne il contenuto
e correggerlo mentre ne segui il debug
MA