and as a BTW
if CurrentControl.ServiceName =
"stardiv.one.form.component.ImageControl" then
dim oStream as object
oStream = CurrentControl.BoundField.getBinaryStream
prepStatement.setBinaryStream( fldcnt, oStream, oStream.Length )
else
prepStatement.setString( fldcnt,
CurrentControl.BoundField.getString )
end if
Does work, quite well.
Drew
---------------------------------------------------------------------
To unsubscribe, e-mail: dev-unsubscr...@dba.openoffice.org
For additional commands, e-mail: dev-h...@dba.openoffice.org