Apici, doppi apici, database, where, e...basta!

[Dr AsP]

Ciao a tutti,

vengo subito al sodo

ho:

		
If Nome <> "" Then
   CondWhere = "Nome = '""" &Nome& """'"
End If
If Trim(Cognome) <> "" Then
   If CondWhere <> "" Then
      CondWhere = CondWhere & " AND Cognome =  ' "&Cognome&" "'"
   Else
      CondWhere = " Cognome =  '""" "&Cognome&" "'"
   End If
End If

SubOpenConn("magazzino.mdb")
StrSQL = "SELECT * FROM rappresentanti WHERE "&CondWhere

Il problema sono gli apici e doppia apici. Ho provato in tutti i modi e in tutti i modi mi da errore.

Mi sapete dire come sistemare gli apici di Nome e Cognome in modo da poterli inserire, tramite CondWhere nell'istruzione della select??

[U235]

cioe' vuoi prima inserirli in una variabile e poi con questa variabile creare la select da inviare al db, oppure non riesci a far quadrare la query?


se è la prima prova con chr(34)

[Dr AsP]

Cioè, intendi per esempio, così:

CondWhere = " Cognome ='"&chr(34)&Cognome&chr(34)&"'"


In questo modo non mi da errore ma il risultato è sempre 'record non trovato'

[santino83_11_04]

io non l'ho capito cosaa vuoi fare...

[Dr AsP]

Originariamente inviato da santino83_11_04
io non l'ho capito cosaa vuoi fare...

Vedi il codice all'inizio ^ ?

Ecco, vorrei far andare quello

[U235]

cognome = "tuo cognome"
CondWhere = " Cognome =' " & cognome & " ' "

per capirci megòlio :

cognome è una variabile, CondWhere è un altra variabile, Cognome e parte della query, quindi...

dentro CondWhere metti la parte della query tra doppi apici (perche è testo) che indica la colonna del db, aggiungi un apice singolo che fa sempre parte della query (sempre testo), chiudi i doppi apici e concateni con "&" il valore della variabile, dopodichè devi chiudere l'apice singolo concatenandolo dopo aver immesso il valore sempre con "&" quindi essendo anch'esso (l'apice singolo) testo deve essere racchiuso tra doppi apici.

tutto chiaro ?

[santino83_11_04]

dim flag
flag=0
StrSQL = "SELECT * FROM rappresentanti WHERE "
if trim(nome)<>"" then strSql=strSql & "nome='" & replace(nome,"'","''") & "'": flag=1
if trim(cognome)<>"" then
if flag=1 then strSql=strSql & " and "
strSql=strSql & "cognome='" & replace(cognome,"'","''") & "'"
end if