Apostrofo in stringa SQL vba



  • Apostrofo in stringa SQL vba
    di Salvo18 (utente non iscritto) data: 23/09/2015 17:11:02

    Buonasera,
    ho una stringa SQL di cui mi servo per fare una select sul mio database in mysql. Per gestire il carattere apostrofo(') faccio un replace con il doppio apice('') per non incorrere in errore. Il problema è che poi mi ritrovo il doppio apice anche sul db. Non viene effettuata la sostituzione. come mai? grazie per l'aiuto


     
    dim x,a,sSQL as String
    
    x="d'Aosta"
    a=replace(x,"'","''")
    sSQL = "SELECT MAX(Id) FROM tblcustomer WHERE Name=" & a
    
    conn1.Execute sSQL2, , 1


  • split e concatena con condizione
    di blank (utente non iscritto) data: 23/09/2015 17:11:04

    Buongiorno

    vi scrivo per chiedere il vostro prezioso aiuto in relazione ad una estrazione di dati.
    Entrando nel merito ho un range di celle es a1:a30 foglio1 nelle quali ho dati disposti in coppia es.
    alfa1 |beta1|alfa2 |beta2
    cod10 | 1,2,3|cod18|3,11,8 ecc
    cod17 | 1,2,3|cod12|3,4,9 ecc
    cod13 | 1,2,3|cod11|3,4,8 ecc
    ecc

    La mia esigenza è quella di copiare in un'unica cella di un altro foglio2 i dati concatenati relativi alle sequenze alfa beta, ripetendo alfa per ogni valore in beta separato da virgola, questo per tutto il range fino all'ultima cella valorizzata.

    Quanto sopra deve avvenire rispettando una sintassi presica, per spiegarmi meglio farò un esempio del risultato da ottenere:
    nella cella a1 foglio2 (cod10|cod10)(|)(||1)"(cod10|cod10)(|)(||2)"(cod10|cod10)(|)(||3)"(cod18|cod18)(|)(||3)"(cod18|cod18)(|)(||11)"(cod18|cod18)(|)(||8)"
    nella cella 2 foglio2 (cod17|cod17)(|)(||1)"(cod17|cod17)(|)(||2)"(cod17|cod17)(|)(||3)"(cod12|cod12)(|)(||3)"(cod12|cod12)(|)(||4)"(cod12|cod12)(|)(||9)"
    ecc
    So che è un pò complicato, almeno per me ma per voi immagino sia gioco da ragazzi
    Spero di essermi spiegata bene
    Attendo con fiducia una soluzione
    grazie
    A presto