Hola, alguno de vosotros ha trabajado alguna vez con base de datos en Access para Director? Estoy con ADOxtra para intentar visualizar los datos de la base de datos desde Director, pero algo hago mal q no funciona
Aqui os engancho el código para ver si alguien sabe donde podria estar el error....
MUCHAS GRACIAS
bSuccess=Init(xtra"ADOxtra")
put Version (xtra "ADOxtra")
cnn=createObject(xtra"ADOxtra",#connection)
if objectP(cnn) then
put "ADO version:"&&cnn.Version
else
put "Error:"&&cnn
end if
cnn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & the moviePath & "DemoDB.mdb")
if cnn.succeeded then
put "Connection state:"&&cnn.State
else
put "Error:"&&cnn.lastError
end if
connectionString=BuildConnectionString(xtra"ADOxtr a")
rst=cnn.Execute("SELECT * FROM DemoTable ORDER BY Name") -- Opening recordset
if rst.state=rst.adStateOpen then
repeat while not rst.eof -- Enumerating records
put rst.Fields["Name"] -- Processing record
rst.MoveNext() -- Moving to the next record.
end repeat
rst.close() -- Closing recordset
end if