Dim OraDyn as OraDynaset, OraPhoto as OraBFile, OraMusic as OraBFile 
Set OraDyn = OraDb.CreateDynaset("select * from Multimedia_tab", ORADYN_DEFAULT) 
Set OraMusic = OraDyn.Fields("Music").Value
Set OraPhoto = OraDyn.Fields("Photo").Value
 
'Edit the first row and initiliaze the "Photo" column: 
OraDyn.Edit 
OraPhoto.DirectoryName = "PHOTO_DIR" 
OraPhoto.Filename = "Washington_photo" 
OraDyn.Update
