Errore connesione sql (VB6)

[gaullo]

Ciao ragazzi, mi esce un errore strano. Ecco come mi connetto al db

Set conn = New ADODB.Connection
Set rs = New ADODB.Recordset

conn.ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & App.Path & "\winterthur.mdb"
conn.Open

SQL = "SELECT [regione].[regione], [sede].[città], [sede].[indirizzo], [sede].[cognomeR], [sede].[nomeR], [tipologias].[tipologiasede], [statosede].[stato], [sede].[idsede] FROM statosede INNER JOIN (regione INNER JOIN (tipologias INNER JOIN sede ON [tipologias].[idtipologias]=[sede].[idtipologias]) ON [regione].[idregione]=[sede].[idregione]) ON [statosede].[idstatoS]=[sede].[idstatoS] where (((sede.città) = ""Torino""));"


rs.Open SQL, conn, 3, 3

non fate caso alla complessita della query, il problema lo da quando gli ho aggiunto il where...
Se non ricordo male i due "3" dell'ultima riga del codice indicano alcune propità che non ricordo... potrebbe essere li l'errore?!?!?

l'errore è il seguente:
[Microsoft][ODBC Microsoft Access Driver] Too few parameters
Expeted 1.

Superfluo assicurarvi che la queri funz benissimo.
Cosa sto sbagliando??

[ladyBlu]

io toglierei il ";" alla fine della query "SELECT..."...

dove ti si genera esattamente questo errore?

[optime]

"... where [sede].[città] = 'Torino'"

[ladyBlu]

Originariamente inviato da optime

"... where [sede].[città] = 'Torino'"

allora gli conviene scrivere:

"... where [sede].[città] = """Torino""""

così non gli si creano problemi con gli eventuali apostrofi...

[optime]

Originariamente inviato da ladyBlu
allora gli conviene scrivere:

"... where [sede].[città] = """Torino""""

così non gli si creano problemi con gli eventuali apostrofi...

non ne sarei cosi' sicuro

questa e' la soluzione

Dim sLocalita As String, sSQL AS String
sLocalita = "L'Aquila"
sLocalita=Replace(sLocalita, "'", "''")
sSQL="... where [sede].[città] = '" & sLocalita & "'"

[gaullo]

Grazie raga, mi è bastato sostituire le " con '
scusate se risp così tardi, ma stavo mangiando.
Grazie ancora