Da Access con una semplice macro "TrasferisciFogliodicalcolo" selezioni la tabella che vuoi esportare in un file XLS. Poi con Calc o Excel te lo salvi in CSV.
Una volta che hai il csv puoi usare le classi di MD9327 oppure per MySql puoi usare una semplice query. Ecco l'esempio
DIM sql AS String
Dialog.Path = User.Home
Dialog.Filter = ["*.csv", "file csv"]
Dialog.Title = "Apri file csv"
IF Dialog.OpenFile() THEN RETURN
sql = "LOAD DATA LOCAL INFILE '"
sql &= Dialog.Path
sql &= "' INTO TABLE miatabella FIELDS TERMINATED BY ';' enclosed by '' LINES TERMINATED BY '\n' (codice, descrizione, prezzo)"
MODMain.$conn.Exec(sql)
vorrei usare il metodo di connessione del mio "vecchio" database ODBC che si chiama "mioODBC.mdb".
Ho seguito la tua guida ed ho installato i due pacchetti e poi configurato i driver come hai indicato.
Ho fatto anche la prova da terminale "isql nome_connessione" ed è andata in porto correttamente (ho anche eseguito una Query SQL che mi ha restituito dei record).
Poi però quando tento di connettermi da Gambas3 al suddetto DB Access... Gambas3 mi va in crash (restituendomi l'errore: il programma si è bloccato inaspettatamente con un segnale #11...)
Public Function connessioneODBC() As Result
Dim $Conn As New Connection
Dim sql As String
Dim hRis As Result
With $Conn
.Type = "odbc"
.Host = "mioODBC" (ossia il nome che ho usato nella configurazione del System_DNS...)
.User = "admin"
End With
$Conn.Open()
$Conn.Begin
sql = "SELECT * FROM mia_tabella"
hRis = $Conn.EXEC(sql)
If hRis.Available Then
Print "La tabella esiste"
Return hRis
Endif
$Conn.Close
End
Dove sbaglio? ???
PS. Nei tanti tentativi di connessione alcune volte il programma non va in crash, però in "console" mi scrive "Error at Line : syntax error near BEGIN". ???
PPS. Nel progetto ho spuntato sia il componente "gb.db" che il componente "gb.db.odbc".