ASP: Errore query in caso di apostrofo

[LupinI]

Premetto di essere un programmatore dilettante.
Mi permetto di chiedere al forum un aiuto alla soluzione di questo problema che descrivo di seguito.

Set rsComune = Server.CreateObject("ADODB.Recordset")
sql = "SELECT codice_comune FROM dati WHERE nome_comune = '" & comune & ".mdb'"
rsComune.Open sql,objConn,1,4

Se la variabile "comune" contiene un apostrofo la query mi genera questo errore di sintassi con riferimento alla seconda riga in quanto l'apostrofo stesso compromette la sintassi della query:

[Microsoft][Driver ODBC Microsoft Access] Errore di sintassi (operatore mancante) nell'espressione della query 'nome_comune = 'CITTA' .mdb''

Qualcuno può aiutarmi a risolvere questo problema?

[vic53]

Premetto di essere un programmatore dilettante.
Mi permetto di chiedere al forum un aiuto alla soluzione di questo problema che descrivo di seguito.

Set rsComune = Server.CreateObject("ADODB.Recordset")
sql = "SELECT codice_comune FROM dati WHERE nome_comune = '" & comune & ".mdb'"
rsComune.Open sql,objConn,1,4

Se la variabile "comune" contiene un apostrofo la query mi genera questo errore di sintassi con riferimento alla seconda riga in quanto l'apostrofo stesso compromette la sintassi della query:

[Microsoft][Driver ODBC Microsoft Access] Errore di sintassi (operatore mancante) nell'espressione della query 'nome_comune = 'CITTA' .mdb''

Qualcuno può aiutarmi a risolvere questo problema?

ciao

perchè non gli togli l'apice singolo o doppio alla variabile comune prima di usarla nella query?
tipo...

comune=replace(comune,"'","")

[LupinI]

il nome del database da aprire contiene l'apice, se lo tolgo non lo trova

[Vincent.Zeno]

devi raddoppiare l'apice della variabile prima si eseguire la query

un nome di file con l'apostrofo prima o poi ti darà sempre problemi, sarebbe meglio evitare

[vic53]

il nome del database da aprire contiene l'apice, se lo tolgo non lo trova

allora MODIFICA LA QUERY

sql = "SELECT codice_comune FROM dati WHERE nome_comune = """ & comune & ".mdb"""

[optime]

Set rsComune =Server.CreateObject("ADODB.Recordset")
sql ="SELECT codice_comune FROM dati WHERE nome_comune = '"&Replace(comune, "'", "''") &".mdb'"
rsComune.Open sql,objConn,1,4

[LupinI]

Benissimo, problema risolto.

Con la soluzione di vic53 mi crea problemi perché al nome file aggiunge una parentesi quatra all'inizio ed alla fine.

Col suggerimento di optime tutto ok.

Grazie infinite a tutti

[optime]

optime!