开发学院数据库 MSSQL Server 用SQL Server为Web浏览器提供图像（四）(转) 阅读

用SQL Server为Web浏览器提供图像（四）(转)

　2007-11-11 05:20:33　来源：WEB开发网　闂傚倸鍊搁崐鎼佸磹閹间礁纾归柟闂寸绾剧懓顪冪€ｎ亜顒㈡い鎰Г閹便劌顫滈崱妤€骞婄紓鍌氬€瑰銊╁箟缁嬫鍚嬮柛顐線缂冩洟姊婚崒娆戭槮婵犫偓闁秵鎯為幖娣妼缁愭鏌″搴′簽濞戞挸绉甸妵鍕冀椤愵澀娌梺缁樻尪閸庣敻寮婚敐澶婂嵆闁绘劖绁撮崑鎾诲捶椤撴稑浜炬慨妯煎亾鐎氾拷

闂傚倸鍊搁崐鎼佸磹閹间礁纾归柟闂寸绾剧懓顪冪€ｎ亝鎹ｉ柣顓炴閵嗘帒顫濋敐鍛婵°倗濮烽崑娑⑺囬悽绋挎瀬闁瑰墽绮崑鎰版煙缂佹ê绗ч柍褜鍓﹂崣鍐潖閸濆嫅褔宕惰娴犲ジ姊虹拠鑼闁煎綊绠栭幃楣冩倻閽樺鎽曢梺闈涱檧婵″洭宕㈤悽鍛娾拺閻熸瑥瀚烽崯蹇涙煕閻樺磭澧甸柕鍡楀€圭缓浠嬪川婵犲嫬骞堥梺纭呭閹活亞妲愰弴鐔哄ⅰ闂傚倷绶氬ḿ褍煤閵堝洠鍋撳顐㈠祮闁绘侗鍣ｉ獮鎺懳旈埀顒傜不閿濆棛绡€闂傚牊绋戦弳娆徝瑰⿰鍫㈢暫闁哄矉缍佹慨鈧柍鎯版硾濠€杈ㄧ珶閺囩喓绡€婵﹩鍘鹃崢鐢告⒑缂佹ê濮﹂柛鎾村哺閹ɑ娼忛妸銈囩畾闂佸湱绮敮鐐存櫠濞戞氨纾肩紓浣贯缚濞插鈧娲栧畷顒冪亙闂佸憡鍔曢崯鐘诲礈濠靛牊宕叉繛鎴炨缚閺嗗棗鈹戦悩杈厡闁轰焦鐗滅槐鎾存媴娴犲鎽甸梺鍦嚀濞层倝鎮鹃悜钘夌闁规惌鍘介崓鐢告⒑閻熸澘鎮侀柣鎺炵畵閹骞栨担鍏夋嫽婵炶揪绲块崕銈夊吹閳ь剟姊洪幖鐐测偓鏍偋閻樿崵宓侀煫鍥ㄧ⊕閺呮悂鏌ㄩ悤鍌涘

濠电姷鏁告慨鐑藉极閸涘﹥鍙忛柣鎴ｆ閺嬩線鏌涘☉姗堟敾闁告瑥绻戦妵鍕箻閸楃偟浠肩紓浣哄閸ㄥ爼寮诲☉銏犵疀闂傚牊绋掗悘鍫ユ倵閻熺増鍟炵紒璇插暣婵＄敻宕熼姘鳖啋闁诲酣娼ч幗婊堟偩婵傚憡鈷戠痪顓炴媼濞兼劖绻涢懠顒€鏋庢い顐㈢箳缁辨帒螣閼测晜鍤岄梻渚€鈧偛鑻晶顔肩暆閿濆牆鍔垫い锔界叀閹繝濡舵径瀣帾闂佸壊鍋呯换鍐磻椤忓懐绠剧€瑰壊鍠曠花濠氬箚閻斿吋鈷戦悗鍦У閵嗗啴鏌ら崘鑼煟鐎规洘绻堥弫鍐焵椤掑嫧鈧棃宕橀鍢壯囨煕閳╁喚娈橀柣鐔稿姍濮婃椽鎮℃惔鈩冩瘣闂佺粯鐗曢妶绋跨暦閻戞ḿ绡€闁搞儜鍐ㄧギ闂備線娼ф蹇曟閺囥垹鍌ㄦい蹇撶墛閳锋垿鏌熼懖鈺佷粶闁告梹顨婇弻锟犲川椤旈敮濮囩紓浣稿€圭敮鐔妓囩€靛摜纾奸弶鍫涘妼缁楁碍绻涢悡搴ｇ闁糕斁鍓濋幏鍛存煥鐎ｅ灚缍楅梻鍌氬€峰ù鍥ь浖閵娾晜鍊块柨鏇炲€哥粻鏌ユ煕閵夘喖澧柡瀣╃窔閺岀喖宕滆鐢盯鏌￠崨顔藉€愰柡灞诲姂閹倝宕掑☉姗嗕紦闂傚倸鍊搁崐鎼佸磹閹间礁纾归柟闂寸绾剧懓顪冪€ｎ亜顒㈡い鎰Г閹便劌顫滈崱妤€骞婄紓鍌氬€瑰銊╁箟缁嬫鍚嬮柛顐線缂冩洟姊婚崒娆戭槮婵犫偓闁秵鎯為幖娣妼缁愭鏌″搴′簽濞戞挸绉甸妵鍕冀椤愵澀娌梺缁樻尪閸庣敻寮婚敐澶婂嵆闁绘劖绁撮崑鎾诲捶椤撴稑浜炬慨妯煎亾鐎氾拷　　闂傚倸鍊搁崐鎼佸磹閹间礁纾归柟闂寸绾惧綊鏌ｉ幋锝呅撻柛銈呭閺屻倝宕妷锔芥瘎婵炲濮靛銊ф閹捐纾兼繛鍡樺笒閸橈紕绱撴笟鍥ф珮闁搞劌鐖兼俊鎾礃椤旂厧绐涢梺鍝勵槹閸ㄥ綊宕㈠ú顏呭€垫鐐茬仢閸旀碍銇勯敂璇茬仸鐎规洩绻濋獮搴ㄦ嚍閵壯冨妇闂傚⿴鍋勫ú锕€煤閺嶃劎澧￠梻鍌欐祰椤曆呪偓鍨浮瀹曟粓鎮㈡總澶嬬稁闂佹儳绻愬﹢杈╁閸忛棿绻嗘い鏍ㄧ閹牊銇勯銏㈢劯婵﹥妞藉畷鐑筋敇濞戞瑥鐝遍梻浣呵归鍛涘┑瀣畾闁逞屽墯閵囧嫯绠涢幘瀵搞偐濠碘槅鍨扮€氭澘顫忓ú顏勪紶闁告洦鍓氶幏鍗炩攽閻愭彃绾у畝锝呮健楠炴垿濮€閻橆偅鏂€婵犵數濮寸€氼噣寮堕幖浣光拺闁告繂瀚婵嗏攽椤旀儳鍘撮柟顔诲嵆婵＄兘鍩￠崒妤佸濠电偠鎻徊浠嬪箹椤愩倖鏆滈悹杞拌閻斿棝鏌ｉ悢宄扮盎闁衡偓閼姐倗纾奸柛灞炬皑瀛濆Δ妤婁簷閸楀啿鐣烽悡搴僵闁挎繂鎳嶆竟鏇㈡⒑閸濆嫬鏆欓柣妤€妫涚划鍫ュ礃閳瑰じ绨婚棅顐㈡搐濞寸兘藝閿曗偓闇夋繝濠傜墢閻ｆ椽鏌＄仦璇插闁宠鍨垮畷鍗炩槈閹典礁浜炬俊銈傚亾妞ゎ叀鍎婚¨渚€鏌涢悩宕囧⒌婵犫偓娓氣偓濮婅櫣绱掑Ο鏇熷灴閹兘濡疯閸嬫挸顫濋悡搴㈢亾缂備緡鍠氱划顖炲Χ閿濆绀冮柍鍝勫暙楠炲牊淇婇悙顏勨偓鏍礉閹达箑纾归柡鍥ュ灩閸戠娀骞栧ǎ顒€濡介柣鎾跺枛閻擃偊宕惰閸庡繘鏌涢弮鈧划鎾诲蓟閺囥垹鐐婄憸宥夘敂椤撶姭鍋撳▓鍨灍婵炲吋鐟ㄩ悘鎺楁⒑閸涘﹦绠撻悗姘煎墲椤ゅ倹绻濈喊澶岀？闁稿鍨垮畷鎰板箣閿曗偓閸ㄥ倹绻涘顔荤凹闁稿绻濋弻宥夊传閸曨剙娅ｇ紓浣哄У閻楃娀寮诲澶婄厸濞达絽鎲″▓鏌ユ⒑缁嬫寧鎹ｉ柛鐘崇墵瀵寮撮姀鐘靛€為悷婊冪Ф閼鸿鲸绻濆顓犲幍闂佸憡鍨崐鏍偓姘炬嫹

核心提示：建立Web项目和设置数据库连接在注册了 ImageLoader 动态链接库之后，我们就可以建立Web项目了，用SQL Server为Web浏览器提供图像（四）(转)，我们使用微软Visual InterDev 1.0 建立ASP页面以及到微软sql server(WINDOWS平台上强大的数据库平台)数据库的数据连接，

　　建立Web项目和设置数据库连接

在注册了 ImageLoader 动态链接库之后，我们就可以建立Web项目了。我们使用微软Visual InterDev 1.0 建立ASP页面以及到微软sql server(WINDOWS平台上强大的数据库平台)数据库的数据连接。

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

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

单击新建（New）按钮，在列出的可用数据驱动程序列表里，选择sql server(WINDOWS平台上强大的数据库平台)，然后单击下一步（Next）。接着，在输入框里输入 Grocevb 作为DSN。接下来的几步很容易完成，不再详述。

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

现在，可以双击Global.asa，查看以上步骤在这个文件里生成的代码。代码定义了连接sql server(WINDOWS平台上强大的数据库平台)数据库所必需的一些变量。

为了初始化类 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(WINDOWS平台上强大的数据库平台); 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。在default.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(WINDOWS平台上强大的数据库平台)装载图片的示例</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(WINDOWS平台上强大的数据库平台)服务器把图片装载到Web浏览器。它已经表明，这个方法在快速开发、容易使用和自定义Web页面的灵活上都有优势。动态链接库被用来连接数据库，提取图片数据，把图片数据放入文件。ASP页面则负责与SQL数据库和动态链接库通信。我们已经介绍了设置SQL数据库和Web项目的操作过程。

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