# NOT RUN {
# New empty .odb file
odbFile <- tempfile(fileext=".odb")
odb.create(odbFile, overwrite="do")
ODB <- odb.open(odbFile)
# Is the connection closed ?
print(isClosed(ODB))
# Save changes in the .odb file
odb.close(ODB, write=TRUE)
# And now ?
print(isClosed(ODB))
# }
Run the code above in your browser using DataLab