|
it
newsgroups
|
|||||||||||||||||||||||
|
|||||||||||||||||||||||
BLOB to MS Word via ASP/VBScript
an ASP that accesses an Oracle BLOB to extract MS Word documents (later to include excel, power point, pdf, and text). The document is stored there via Rational ClearCase. I'm able to access the data in the BLOB, but when I try to display it, all I get is the garbage-looking word format inside MS Word (as it would look if displayed in notepad or the browser itself). Any ideas, suggestions, pointers? I've tried several approaches with different types of errors (I'm new to ASPs and VBScript). For instance, when I try using ADODB.Stream, I can't seem to be able to write a file (to confirm I was opening the blob properly). The chosen directory does have open write permissions. set mstream = Server.CreateObject("ADODB.Stream") mstream.Type = 1 'adTypeBinary mstream.Open mstream.Write rs("data") mstream.SaveToFile "c:\test.doc", 2 'adSaveCreateOveWrite , also tried 1 for new file 'Response.BinaryWrite mstream.Read ' failes with type mismatch The most "successful" code is below. (There may be typos since I'm working on a separate test network and had to manually type the code here for posting. :-p) Using: ASP with VBScript IIS v??? (SysAdmin unavailable!) IE v5.5 Oracle 10 (OraOLEDB.Oracle since MSDAORA.1 was not returning anything) ADODB.Connection <% dbid = request.QueryString("dbid") Dim rs, sql, conn 'Clear existing HTTP header information Reponse.expires = 0 Response.Buffer = TRUE Reponse.Clear set conn = Server.CreateObject("ADODB.Connection") set rs = Server.CreateObject("ADODB.Recordset") conn.Open "Provider=OraOLEDB.Oracle;Data Source=oratest.rfc.net; User id=***;Password=***;" Reponse.ContentType = "application/msword" sql = "SELECT data FROM ATTACHMENTS_BLOB where ENTITY_DBID = '" & dbid "'" rs.open sql, conn Reponse.BinaryWrite rs("data") 'same results with .Value rs.close conn.close %> S. wrote:
Show quote > I've been researching this for two days without little success. I have Look at "Save BLOB to File Demo" here:> an ASP that accesses an Oracle BLOB to extract MS Word documents > (later to include excel, power point, pdf, and text). The document is > stored there via Rational ClearCase. > > I'm able to access the data in the BLOB, but when I try to display it, > all I get is the garbage-looking word format inside MS Word (as it > would look if displayed in notepad or the browser itself). Any ideas, > suggestions, pointers? I've tried several approaches with different > types of errors (I'm new to ASPs and VBScript). For instance, when I > try using ADODB.Stream, I can't seem to be able to write a file (to > confirm I was opening the blob properly). The chosen directory does > have open write permissions. > > > set mstream = Server.CreateObject("ADODB.Stream") > mstream.Type = 1 'adTypeBinary > mstream.Open > mstream.Write rs("data") > mstream.SaveToFile "c:\test.doc", 2 'adSaveCreateOveWrite , also tried > 1 for new file > 'Response.BinaryWrite mstream.Read ' failes with type mismatch > > > The most "successful" code is below. (There may be typos since I'm > working on a separate test network and had to manually type the code > here for posting. :-p) > > Using: > ASP with VBScript > IIS v??? (SysAdmin unavailable!) > IE v5.5 > Oracle 10 (OraOLEDB.Oracle since MSDAORA.1 was not returning > anything) > ADODB.Connection > > > <% > dbid = request.QueryString("dbid") > Dim rs, sql, conn > > 'Clear existing HTTP header information > Reponse.expires = 0 > Response.Buffer = TRUE > Reponse.Clear > > set conn = Server.CreateObject("ADODB.Connection") > set rs = Server.CreateObject("ADODB.Recordset") > conn.Open "Provider=OraOLEDB.Oracle;Data Source=oratest.rfc.net; User > id=***;Password=***;" > > Reponse.ContentType = "application/msword" > > sql = "SELECT data FROM ATTACHMENTS_BLOB where ENTITY_DBID = '" & dbid > "'" > rs.open sql, conn > > Reponse.BinaryWrite rs("data") 'same results with .Value > > rs.close > conn.close > > %> http://www.psoug.org/reference/dbms_lob.html Thousands of other Oracle demos can be found here: http://www.psoug.org/library.html including of UTL_FILE which can be used to write BLOB data to a file. -- Daniel A. Morgan University of Washington damor***@x.washington.edu (replace x with u to respond) Puget Sound Oracle Users Group www.psoug.org
Show quote
"S." <s.pastor***@gmail.com> wrote in message This might seem like a daft question but the client does have Word installednews:1193848987.311785.249930@v23g2000prn.googlegroups.com... > I've been researching this for two days without little success. I have > an ASP that accesses an Oracle BLOB to extract MS Word documents > (later to include excel, power point, pdf, and text). The document is > stored there via Rational ClearCase. > > I'm able to access the data in the BLOB, but when I try to display it, > all I get is the garbage-looking word format inside MS Word (as it > would look if displayed in notepad or the browser itself). Any ideas, > suggestions, pointers? I've tried several approaches with different > types of errors (I'm new to ASPs and VBScript). For instance, when I > try using ADODB.Stream, I can't seem to be able to write a file (to > confirm I was opening the blob properly). The chosen directory does > have open write permissions. > > > set mstream = Server.CreateObject("ADODB.Stream") > mstream.Type = 1 'adTypeBinary > mstream.Open > mstream.Write rs("data") > mstream.SaveToFile "c:\test.doc", 2 'adSaveCreateOveWrite , also tried > 1 for new file > 'Response.BinaryWrite mstream.Read ' failes with type mismatch > > > The most "successful" code is below. (There may be typos since I'm > working on a separate test network and had to manually type the code > here for posting. :-p) > > Using: > ASP with VBScript > IIS v??? (SysAdmin unavailable!) > IE v5.5 > Oracle 10 (OraOLEDB.Oracle since MSDAORA.1 was not returning > anything) > ADODB.Connection > > > <% > dbid = request.QueryString("dbid") > Dim rs, sql, conn > > 'Clear existing HTTP header information > Reponse.expires = 0 > Response.Buffer = TRUE > Reponse.Clear > > set conn = Server.CreateObject("ADODB.Connection") > set rs = Server.CreateObject("ADODB.Recordset") > conn.Open "Provider=OraOLEDB.Oracle;Data Source=oratest.rfc.net; User > id=***;Password=***;" > > Reponse.ContentType = "application/msword" > > sql = "SELECT data FROM ATTACHMENTS_BLOB where ENTITY_DBID = '" & dbid > "'" > rs.open sql, conn > > Reponse.BinaryWrite rs("data") 'same results with .Value > > rs.close > conn.close > > %> > right? You're comfortable that the content is Word and is stored with fidelity in the first place? -- Anthony Jones - MVP ASP/ASP.NET
Show quote
"S." <s.pastor***@gmail.com> wrote in message You should write the value of the field to the stream, and then you must set news:1193848987.311785.249930@v23g2000prn.googlegroups.com... > I've been researching this for two days without little success. I have > an ASP that accesses an Oracle BLOB to extract MS Word documents > (later to include excel, power point, pdf, and text). The document is > stored there via Rational ClearCase. > > I'm able to access the data in the BLOB, but when I try to display it, > all I get is the garbage-looking word format inside MS Word (as it > would look if displayed in notepad or the browser itself). Any ideas, > suggestions, pointers? I've tried several approaches with different > types of errors (I'm new to ASPs and VBScript). For instance, when I > try using ADODB.Stream, I can't seem to be able to write a file (to > confirm I was opening the blob properly). The chosen directory does > have open write permissions. > > > set mstream = Server.CreateObject("ADODB.Stream") > mstream.Type = 1 'adTypeBinary > mstream.Open > mstream.Write rs("data") the stream's position to 0, before trying to read it/pass the return to Response.BinaryWrite. Show quote > mstream.SaveToFile "c:\test.doc", 2 'adSaveCreateOveWrite , also tried The type should be "application/vnd.ms-word".> 1 for new file > 'Response.BinaryWrite mstream.Read ' failes with type mismatch > > > The most "successful" code is below. (There may be typos since I'm > working on a separate test network and had to manually type the code > here for posting. :-p) > > Using: > ASP with VBScript > IIS v??? (SysAdmin unavailable!) > IE v5.5 > Oracle 10 (OraOLEDB.Oracle since MSDAORA.1 was not returning > anything) > ADODB.Connection > > > <% > dbid = request.QueryString("dbid") > Dim rs, sql, conn > > 'Clear existing HTTP header information > Reponse.expires = 0 > Response.Buffer = TRUE > Reponse.Clear > > set conn = Server.CreateObject("ADODB.Connection") > set rs = Server.CreateObject("ADODB.Recordset") > conn.Open "Provider=OraOLEDB.Oracle;Data Source=oratest.rfc.net; User > id=***;Password=***;" > > Reponse.ContentType = "application/msword" -Mark Show quote > sql = "SELECT data FROM ATTACHMENTS_BLOB where ENTITY_DBID = '" & dbid > "'" > rs.open sql, conn > > Reponse.BinaryWrite rs("data") 'same results with .Value > > rs.close > conn.close > > %> >  
Other interesting topics
|
|||||||||||||||||||||||
