My code is:
OLEStorage olestore
OLEStream olestr
olestore = create olestorage
olestr = create olestream
li_ris = ole_1.SaveAs(olestore,"file_a") //len of ole_1.objectdata = 13424
if li_ris <> 0 then
messagebox("","Error: " + string(li_ris))
return
else
\\.........
end if
Someone can help me, please?
Thanks in advance,
Michela
--
Bill Green[TeamSybase]
VP - Power3
http://www.power3.com
"michela" <michela@michela> wrote in message
news:uFb5#UgRDHA.81@forums-2-dub...