Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Sintassi comando DoCmd.RunSql

501 views
Skip to first unread message

Michele

unread,
Jul 30, 2009, 6:46:03 AM7/30/09
to
Ciao
di seguito riporto il codice che ho ricavato dal visualizza SQL di una Query
con l'intento di eseguirla via codice:
DoCmd.RunSql "UPDATE Tabella1 SET Tabella1.Com = Replace([Com],"'"," ")" & _
"WHERE (((Tabella1.Com) Like "*'*"));"
il problema nasce perch� gli apici presenti nella funzione Replace ed anche
nel criterio Like vanno in conflitto con l'istruzione RunSql.
Nel precisare che il valore da sostituire con uno spazio vuoto nella
funzione Replace � un apostrofo, lo stesso dicasi per il criterio like in
questo caso racchiuso tra *.
Un grazie a tutti ed uno in particolare a Massimo che in precedenza mi aveva
dato una dritta sull'utilizzo della funzione Replace (Re: Eliminare, nei
dati di una tabella, l'apostrofo via codice).
Ciao
Michele


--------------------------------
Inviato via http://arianna.libero.it/usenet/

Alot

unread,
Jul 30, 2009, 6:55:21 AM7/30/09
to
On 30 Lug, 12:46, mi...@inwind.it (Michele) wrote:
> Ciao
> di seguito riporto il codice che ho ricavato dal visualizza SQL di una Query
> con l'intento di eseguirla via codice:
> DoCmd.RunSql "UPDATE Tabella1 SET Tabella1.Com = Replace([Com],"'"," ")" & _
> "WHERE (((Tabella1.Com) Like "*'*"));"
> il problema nasce perchè gli apici presenti nella funzione Replace ed anche

> nel criterio Like vanno in conflitto con l'istruzione RunSql.
> Nel precisare che il valore da sostituire con uno spazio vuoto nella
> funzione Replace è un apostrofo, lo stesso dicasi per il criterio like in

> questo caso racchiuso tra *.
> Un grazie a tutti ed uno in particolare a Massimo che in precedenza mi aveva
> dato una dritta sull'utilizzo della funzione Replace (Re: Eliminare, nei
> dati di una tabella, l'apostrofo via codice).
> Ciao
> Michele
>
> --------------------------------
> Inviato viahttp://arianna.libero.it/usenet/

utilizza chr()
ad esempio chr(34) per le virgolette "...
etc (vedi guida in linea)

F.

Alessandro Cara

unread,
Jul 30, 2009, 7:56:55 AM7/30/09
to
Michele ha scritto:

> Ciao
> di seguito riporto il codice che ho ricavato dal visualizza SQL di una Query
> con l'intento di eseguirla via codice:
> DoCmd.RunSql "UPDATE Tabella1 SET Tabella1.Com = Replace([Com],"'"," ")" & _
> "WHERE (((Tabella1.Com) Like "*'*"));"
> il problema nasce perchￜ gli apici presenti nella funzione Replace ed anche

> nel criterio Like vanno in conflitto con l'istruzione RunSql.
> Nel precisare che il valore da sostituire con uno spazio vuoto nella
> funzione Replace ￜ un apostrofo, lo stesso dicasi per il criterio like in

> questo caso racchiuso tra *.
Il criterio like non ti serve. Non e' che impostandolo guadagni nel
tempo di esecuzione della update.
--
ac

almorel

unread,
Jul 30, 2009, 9:06:38 AM7/30/09
to
On 30 Lug, 13:56, Alessandro Cara <a...@ay-1anetwork.it> wrote:
> Michele ha scritto:> Ciao
> > di seguito riporto il codice che ho ricavato dal visualizza SQL di una Query
> > con l'intento di eseguirla via codice:
> > DoCmd.RunSql "UPDATE Tabella1 SET Tabella1.Com = Replace([Com],"'"," ")" & _
> > "WHERE (((Tabella1.Com) Like "*'*"));"
> > il problema nasce perchè gli apici presenti nella funzione Replace ed anche

> > nel criterio Like vanno in conflitto con l'istruzione RunSql.
> > Nel precisare che il valore da sostituire con uno spazio vuoto nella
> > funzione Replace è un apostrofo, lo stesso dicasi per il criterio like in

> > questo caso racchiuso tra *.
>
> Il criterio like non ti serve. Non e' che impostandolo guadagni nel
> tempo di esecuzione della update.
> --
> ac

Voglio proporre un piccolo suggerimento avendo anch'io avuto problemi
con gli apostrofi:
li ho risolti a monte sostituendo, dove necessario, l' apostrofo con
chr(96) che assomiglia all'apostrofo,
va benissimo per la leggibilità e non rompe le scatole nelle query
SQL.
Saluti a tutti
Alberto Morelli

Alessandro Cara

unread,
Jul 30, 2009, 9:14:01 AM7/30/09
to
almorel ha scritto:

> On 30 Lug, 13:56, Alessandro Cara <a...@ay-1anetwork.it> wrote:
>> Michele ha scritto:> Ciao
>>> di seguito riporto il codice che ho ricavato dal visualizza SQL di una Query
>>> con l'intento di eseguirla via codice:
>>> DoCmd.RunSql "UPDATE Tabella1 SET Tabella1.Com = Replace([Com],"'"," ")" & _
>>> "WHERE (((Tabella1.Com) Like "*'*"));"
>>> il problema nasce perch� gli apici presenti nella funzione Replace ed anche

>>> nel criterio Like vanno in conflitto con l'istruzione RunSql.
>>> Nel precisare che il valore da sostituire con uno spazio vuoto nella
>>> funzione Replace � un apostrofo, lo stesso dicasi per il criterio like in

>>> questo caso racchiuso tra *.
>> Il criterio like non ti serve. Non e' che impostandolo guadagni nel
>> tempo di esecuzione della update.
>> --
>> ac
>
> Voglio proporre un piccolo suggerimento avendo anch'io avuto problemi
> con gli apostrofi:
> li ho risolti a monte sostituendo, dove necessario, l' apostrofo con
> chr(96) che assomiglia all'apostrofo,
> va benissimo per la leggibilit� e non rompe le scatole nelle query
> SQL.
L'apostrofo non e' mai stato un problema, e' sufficiente raddoppiarlo
i.e. replace(campo,"'","''") that's all
--
ac
0 new messages