- 积分
- 236
- 明经币
- 个
- 注册时间
- 2004-12-6
- 在线时间
- 小时
- 威望
-
- 金钱
- 个
- 贡献
-
- 激情
-
|
下面这个网页可以正常显示dwf文件(利用Autodesk Express Viewer工具) cad_view.asp <% if Request.QueryString ("pipe_num")<>"" then pipe_num=Request.QueryString ("pipe_num") else pipe_num=543 end if %> <html> <body> <tr height="90%"> <td colspan="10" align="center"> <object id = "viewer" classid="clsid:A662DA7E-CCB7-4743-B71A-D817F6D575DF" codebase="http://www.autodesk.com/global/expressviewer/installer/ExpressViewerSetup.cab" width="100%" height="100%" > <param name = "Src" value="images/<%=pipe_num%>.dwf"> </td> </tr> <br> </body> </html>
前面是在images文件夹里有几个dwf文件,可以显示,如果我的dwf文件以Binary 存在数据苦里,该如何显示啊?????? <% dim s,dwf,num if Request.QueryString ( "pipe_num ") < > " " then num=Request.QueryString ( "pipe_num ") else num=543 end if set connGraph=server.CreateObject( "ADODB.connection ") conngraph.ConnectionString =session( "connection_string ") conngraph.Open set rec=server.createobject( "ADODB.recordset ") strsql= "select * from pipe_map where pipe_num=' "&num& "' " rec.open strsql,connGraph,1,1 Response.ContentType = "image/dwf" '什么意思?小弟不懂? Response.BinaryWrite rec("pipe_map").GetChunk(750000)
set rec=nothing set connGraph=nothing % > <html > <body > <br > <tr height= "90% " > <td colspan= "10 " align= "center " > <object id = "viewer " classid= "clsid:A662DA7E-CCB7-4743-B71A-D817F6D575DF " codebase= "http://www.autodesk.com/global/expressviewer/installer/ExpressViewerSetup.cab " width= "100% " height= "100% " > <param name = "Src " value= "<%=dwf%> " > </td > </tr > <br > </body > </html >
|
|