[VB6]Crystal Report & Mysql

[meodorienban]

Salve ragazzi

chiedo il vostro aiuto perchè in rete non trovo assolutamente nulla T_T e sto seriamente valutando la possibilità di disintegrare tutto .

Allora vado subito al dunque, ho un progetto in VB6 con un DB MYSQL , funziona tutto correttamente, inserisce modifica cancella e arrivato al momento di stampare il mio bellissimo report da problemi ! ( premetto che questo progetto era precedentemente abbinato ad un DB access e che solo da pochi giorni stà subendo un porting in MYSQL)

questo è il codice che utilizzo per la stampa del report

CrystalReport1.DiscardSavedData = True
    CrystalReport1.Connect = "DSN=wgretail_2011;UID=root;PWD=*****;DSQ=wgretail_2011"
    selection = "{fatture.numerofattura}= " & TXT_nfatt.Text & ""
    CrystalReport1.ReportFileName = App.Path & "\report\" & "fattura.rpt"
    CrystalReport1.Destination = crptToPrinter
    CrystalReport1.CopiesToPrinter = 2
    
   CrystalReport1.ReplaceSelectionFormula (selection)
   CrystalReport1.Action = 2
   CrystalReport1.DiscardSavedData = True

ricevo l'errore 20500 Not enough memory for the operation il quale ho già affrontato tempo fa con access e ho risolto connettendo il report al DB da VB6 creando un DNS tutto mio dato che con quello classico di cr8 non funzionava.
Ora mi trovo nella stessa identica situazione qui si blocca

CrystalReport1.Action = 2

e genera l'errore citato poco fa anche utilizzando un mio dns ( che è denominato wgretail_2011, il quale ha una connessione con il db mysql funzionante e testata) ed utilizzando la stringa di connessione da VB6

DSN=wgretail_2011;UID=root;PWD=59929603;DSQ=wgretail_2011

spero che qualcuno di voi sappia come aiutarmi vi ringrazio di tutto e vi auguro una buona giornata.

[meodorienban]

chiedo pietà , potete chiudere ho risolto.

Scrivo qui la soluzione per chi può essere interessato, ma è una cosa talmente stupida che mi vergogno a scrivere !

Nella selection formula trattavo un campo VARCHAR ovvero stringa e ho omesso gli " ' "
Quindi la soluzione del problema risiede nella modifica di questa riga

selection = "{fatture.numerofattura}= " & TXT_nfatt.Text & ""

IN QUESTA

selection = "{fatture.numerofattura}= '" & TXT_nfatt.Text & "'"

dove sono presenti i due " ' ".

Mi scuso ancora per il post probabilmente inutile !