Hola, alguien tuvo un problema para abrir con xojo una base de datos .mdb en linux.
Tengo el siguiente codigo:
Dim db As New ODBCDatabase
dim rs as recordset
dim medi as integer =0
dim precio as double= 0
dim laexistencia as double=0
dim elcamino as string=""
el camino="/home/javier/Documentos/Inventario/stock.mdb"
db.DataSource = "Driver={Microsoft Access Driver (.mdb)};Dbq="+elcamino + “;Uid=Admin;Pwd=;”
If Not db.Connect Then
MsgBox “Error”
Close
else
rs=db.SQLSelect(“SELECT * FROM articulos”)
if rs<>nil then
do until rs.eof
laexistencia=laexistencia+rs.field(“existencia”).doublevalue
medi=medi+1
if rs.field(“existencia”).doublevalue>0 then
precio=precio+rs.field(“preciounitario”).DoubleValuers.field(“existencia”).doublevalue
else
precio=precio+0
end if
rs.movenext
loop
else
msgbox(“No hay registros”)
db.close
return
end if
end if
En windows funciona perfecto con el siguiente valor en la variable elcamino
elcamino=“c:\Inventario\stock.mdb”
Alguna idea o consejo?
Gracias