Last chance! 50% off unlimited learning
Sale ends in
mongo.gridfile.get.filename(gridfile)
gridfile
mongo.gridfs
, mongo.gridfs.find
,
mongo.gridfile, mongo.gridfile.get.descriptor
,
mongo.gridfile.get.length
,
mongo.gridfile.get.chunk.size
,
mongo.gridfile.get.chunk.count
,
mongo.gridfile.get.content.type
,
mongo.gridfile.get.upload.date
,
mongo.gridfile.get.md5
,
mongo.gridfile.get.metadata
,
mongo.gridfile.get.chunk
,
mongo.gridfile.get.chunks
,
mongo.gridfile.read
, mongo.gridfile.seek
,
mongo.gridfile.pipe
.
mongo <- mongo.create()
if (mongo.is.connected(mongo)) {
gridfs <- mongo.gridfs.create(mongo, "grid")
# find a GridFS file uploaded midnight July 4, 2008
buf <- mongo.bson.buffer.create()
mongo.bson.buffer.append(buf, "uploadDate",
strptime("07-04-2008", "%m-%d-%Y"))
query <- mongo.bson.from.buffer(buf)
gf <- mongo.gridfs.find(gridfs, query)
if (!is.null(gf)) {
print(mongo.gridfile.get.filename(gf))
mongo.gridfile.destroy(gf)
}
mongo.gridfs.destroy(gridfs)
}
Run the code above in your browser using DataLab