用SQL Server为Web浏览器提供图像-会员卡,广州印刷,深圳印刷,印刷公司,名片,彩页,名片设计,设计教程,名片制作,彩色名片,名片模板,贵宾卡,pvc卡,设计欣赏,深圳名片,广州名片,business card design

首页	名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash

» 彩色名片
» PVC卡
» 彩色磁性卡
» 彩页/画册
» 个性印务
» 彩色不干胶
» 明信片
   » 明信片
   » 彩色书签
   » 门挂
» 其他产品与服务
   » 创业锦囊
   » 办公用品
   » 信封、信纸
   » 便签纸、斜面纸砖
   » 无碳复印纸
   » 海报
   » 大篇幅印刷
   » KT板
   » 海报
   » 横幅

用SQL Server为Web浏览器提供图像
建立Web项目和设置数据库连接

在注册了 ImageLoader 动态链接库之后，我们就可以建立Web项目了。我们使用微软Visual InterDev 1.0 建立ASP页面以及到微SQL Server数据库的数据连接。

首先，打开微软Visual InterDev。在文件File 菜单里，选择新建（New）菜单项。在出现的对话框里，选中Web项目向导，在项目名称字段里输入ImageLoad 。单击确定（OK），完成后面两步，结束向导。

可以看到， Visual InterDev 在工作空间（Workspace）窗口里自动地生成了一个文件，叫做Global.asa。在用户第一次查看Web程序里的页面里，就会自动生成这个文件。要连接SQL Server里的数据库，选择项目 | 加入项目（Project |Add To Project），然后选择数据连接（Data Connection）。这里，选择数据源对话框出现，我们必须定义一个数据源名称（DSN）。

单击新建（New）按钮，在列出的可用数据驱动程序列表里，选择SQL Server，然后单击下一步（Next）。接着，在输入框里输入 Grocevb 作为DSN。接下来的几步很轻易完成，不再详述。

下面，出现了SQL Server 登录对话框。输入服务器名称，登录ID和口令，并单击选项（Option）按钮。从列出的可用数据库列表里，选择Grocevb，单击确定（OK）。在结束了全部以上步骤之后，就返回到了选择数据源对话框。在这里，从DSN列表里单击文件名 Grocevb.dsn，然后完成后面几步结束这段操作。

现在，可以双击Global.asa，查看以上步骤在这个文件里生成的代码。代码定义了连接SQL Server数据库所必需的一些变量。

为了初始化类 clsImageLoader ，必须在Global.asp的开始放两行代码。我们在列表 C里列出了Global.asa里的代码。注重clsImageLoader 是一个会话范围内的对象。

列表 C: Global.asa

<OBJECT RUNAT=Server SCOPE=Session ID=objImageLoader PROGID=\"ImageLoader.clsImageLoader\">
</OBJECT>
<SCRIPT LANGUAGE=VBScript RUNAT=Server>
Sub Session_OnStart
    Session(\"Grocevb_ConnectionString\") = \"DRIVER=SQL Server; SERVER=(local);
                 UID=sa;PWD=;APP=Microsoft (R) Developer Studio;WSID=JIA;
                 DATABASE=Grocevb;UseProcForPrepare=0\"
    Session(\"Grocevb_ConnectionTimeout\") = 15
    Session(\"Grocevb_CommandTimeout\") = 30
    Session(\"Grocevb_RuntimeUserName\") = \"sa\"
    Session(\"Grocevb_RuntimePassword\") = \"\"
End Sub

Sub Session_OnEnd
  set objImageLoader = Nothing
End Sub

</SCRIPT>

建立ASP页面

为了连接到数据库，并和ImageLoader这个动态链接库通信，我们在Web项目里建立了一个ASP文件。方式是在文件（File）菜单里选择新建（New）菜单项，在文件（Files）标签卡中选择ASP页面图标，在输入框里输入文件名称。我们把这个页面命名为default.asp。在efault.asp 里包含的代码如列表 D所示。

列表 D: default.asp

<% Set dbConn = Server.CreateObject(\"ADODB.Connection\")
   dbConn.ConnectionTimeout = Session(\"Grocevb_ConnectionTimeout\")
   dbConn.CommandTimeout = Session(\"Grocevb_CommandTimeout\")
   dbConn.Open Session(\"Grocevb_ConnectionString\"), Session(\"Grocevb_RuntimeUserName\"), _
                                                    Session(\"Grocevb_RuntimePassword\")

   Set cmdTemp = Server.CreateObject(\"ADODB.Command\")
   Set rstProduct = Server.CreateObject(\"ADODB.Recordset\")
       cmdTemp.CommandText = \"SELECT prod_id, prod_name, prod_desc, prod_unitprice, & _
                               \" prod_unitquant, prod_imagetype \" & _
                               \"FROM Products ORDER BY prod_name\"
       cmdTemp.CommandType = 1
       Set cmdTemp.ActiveConnection = dbConn
       rstProduct.Open cmdTemp, , 0, 1

       objImageLoader.DbName = \"Grocevb\"
       objImageLoader.TableName = \"Products\"
       objImageLoader.NameOfImageColumn = \"prod_image\"
       objImageLoader.NameOfImageTypeColumn = \"prod_imagetype\"
       objImageLoader.NameOfImageIdColumn = \"prod_id\"
       objImageLoader.OpenConnection
%>

<HTML>
<HEAD>
<TITLE>从SQL Server装载图片的示例</TITLE>
</HEAD>
<BODY bgcolor=\"#FFFFFF\" TOPMARGIN=8 LEFTMARGIN=4>
  <%Do While Not rstProduct.EOF %>
  <%ProdId = rstProduct(\"prod_id\") %>
  <% objImageLoader.CreateTempImageFile(ProdId) %>
  <% FileName =  \"images/\" & objImageLoader.ImageFile(ProdId) %>

  <TABLE border=1 cellpadding=0 cellspacing=0 width=100%>
   <TABLE border=0 cellpadding=5 cellspacing=0 width=100% cols=2>
      <td width=30%>
         <IMG ALIGN=BOTTOM SRC= <% =FileName %>>
         <p> </p>
      <font size=2>Image type: <% = rstProduct(\"prod_imagetype\") %>
      </td>
      <td width=70%>
          <p align=center><font size=4><% =rstProduct(\"prod_name\") %></font></p>
          <p align=center><% =rstProduct(\"prod_desc\") %></p>
      </td>
    </TABLE>
    <p> </p>
  <TABLE border=0 cellpadding=5, cellspacing=0 width=100% cols=2>
      <td width=50%>
         <p align=left>Unit quantity: <% = rstProduct(\"prod_unitquant\") %></P>
      </td>
      <td width=50%>
         <p align=left>Unit price: <% =rstProduct(\"prod_unitprice\") %></p>
      </td>
   </TABLE>
  </TABLE>
  <p> </p>
<% rstProduct.MoveNext %>
<% Loop %>
</BODY>
</HTML>

注重：类ImageLoader 里定义的CreateTempImageFile 方式和ImageFile 属性（只读）需要图片ID作为参数。在这个例子里，图片ID就是表Products的主要害字(prod_id) 。所以， prod_id 的值必须传递给动态链接库。

总结

在这篇文章里，我们演示了一个方式，使用ActiveX动态链接库和ASP，可以从微软SQL Server服务器把图片装载到Web浏览器。它已经表明，这个方式在迅速开发、轻易使用和自定义Web页面的灵活上都有优势。动态链接库被用来连接数据库，提取图片数据，把图片数据放入文件。ASP页面则负责与SQL数据库和动态链接库通信。我们已经介绍了设置SQL数据库和Web项目的操作过程。

虽然这篇文章里的动态链接库和数据库的功能做了简化，但这里介绍的步骤对于其它任何强盛复杂的Web项目都是有效的。

返回类别: 教程
上一教程: 使用SQL Server 7.0建立一个安全的数据库的最好方式是
下一教程: 用T-SQL导入文件数据到SQL Server

您可以阅读与"用SQL Server为Web浏览器提供图像"相关的教程:
· 用SQL SERVER为WEB浏览器提供图像(一)
· 用SQL SERVER为WEB浏览器提供图像
· 用SQL SERVER为WEB浏览器提供图像(三)
· 用SQL SERVER为WEB浏览器提供图像(四)
· 用SQL SERVER为WEB浏览器提供图像(二)


	快精灵印艺坊版权所有	首页会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店网站地图关于我们友情链接