Ciao a tutti,
ho provato a cercare in rete una soluzione al mio problema, ma per miei limiti, non sono giunto a capo del mio problema.
Ho la necessità di aggiungere un campo in una tabella che creo in questo modo:
strSQL = "SELECT SupportoDettaglio.[Acr Contr], SupportoDettaglio.[Descrizione Contratto], SupportoDettaglio.Elemento, SupportoDettaglio.[Codice Titolo], SupportoDettaglio.ISIN, SupportoDettaglio.[Des VM], SupportoDettaglio.Valore, SupportoDettaglio.[Descrizione Ente Emittente], SupportoDettaglio.[Patrimonio Dossier], SupportoDettaglio.[% su Patr Dossier], Null as [Ricalcola %], Null AS Sforamento, First(SupportoDatasim.[Perce min]) AS [Perce min], First(SupportoDatasim.[Perce MAX]) AS [Perce MAX], First(SupportoDatasim.[Linea Gestione]) AS [Linea Gestione], Null AS Tipologia INTO NEWSupportoDettaglio" strSQL = strSQL + " FROM SupportoDettaglio INNER JOIN SupportoDatasim ON (SupportoDettaglio.[Acr Contr] = SupportoDatasim.[Acr contratto]) AND (SupportoDettaglio.Elemento = SupportoDatasim.[Raggr Titoli])" strSQL = strSQL + " GROUP BY SupportoDettaglio.[Acr Contr], SupportoDettaglio.[Descrizione Contratto], SupportoDettaglio.Elemento, SupportoDettaglio.[Codice Titolo], SupportoDettaglio.ISIN, SupportoDettaglio.[Des VM], SupportoDettaglio.Valore, SupportoDettaglio.[Descrizione Ente Emittente], SupportoDettaglio.[Patrimonio Dossier], SupportoDettaglio.[% su Patr Dossier], Null, Null"visto che così facendo i campi che mi crea sono Binari, (vedi sotto i campi)
Null as [Ricalcola %], Null AS Sforamento, Null AS Tipologiaho pensato di bypassare il problema in questo modo:
If campoEsiste(CurrentDb, "NEWSupportoDettaglio", "Tipologia") = False Then DBEngine(0)(0).Execute "ALTER TABLE NEWSupportoDettaglio ADD COLUMN Tipologia TEXT(3)" If campoEsiste(CurrentDb, "NEWSupportoDettaglio", "Sforamento") = False Then DBEngine(0)(0).Execute "ALTER TABLE NEWSupportoDettaglio ADD COLUMN Sforamento TEXT(25)" If campoEsiste(CurrentDb, "NEWSupportoDettaglio", "Ricalcola%") = False Then DBEngine(0)(0).Execute "ALTER TABLE NEWSupportoDettaglio ADD COLUMN Ricalcola% DOUBLE"unico problema nella parte in rosso che mi restituisce il seguente errore "ERRORE DI SINTASSI NELLA DEFINIZIONE DEL CAMPO."
non riesco assolutamente a capire come correggerlo.
Grazie a tutti per eventuali dritte.
Ciaoooooo