Didconnect to expDB
expdbDisconnect(con)
con
a connection object as produced by dbConnect.
no return values
## Not run: con <- connect('filename') disconnect(con) ## End(Not run)