- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
如何从数据库中调出个人档案?.doc
如何从数据库中调出个人档案?
我正在开发一个档案管理系统,需要从数据库中同时调出图像及相关的文字说明,可我只做到了单纯地显示图片,像有一个数据库CHUNFENG,在数据库中有一个叫CHUNF_INFO的表,表中有一个WORK的NAME列,查出CHUNF_ID=6806的人的相片:
%@ LANGUAGE=VBSCRIPT %%Response.Expires = 0Response.Buffer = TRUEResponse.Clear 清除存在的HTTP表头信息Response.ContentType = image/gif
更改表头信息映射被选出的图片Set cn = Server.CreateObject(ADODB.Connection)cn.Open DSN=myDSN;UID=sa;PWD=;DATABASE=chunfengSet rs = cn.Execute(SELECT work FROM chunf_INFO WHERE chunf_id=6806)Response.BinaryWrite rs(work)Response.End%显示图象需要CONTENT=IMAGE/GIF或CONTENT=IMAGE/JPEG语句,而显示文字信息HTML的HEAD中的语句为CONTENT=TEXT/HTML,显然,我们无法同时用一个ASP文件就把文字信息和图象都处理完。该如何做呢?
我们的处理技巧是,解决的办法是:用一个单独的ASP文件处理图象,然后在处理文字信息的ASP文件中调用这个处理图像的文件。假设SQL SERVER数据库CHUNFENG,存在表名CHUNF_TABLE,我们要从CHUNF_TABLE中查出ID=88510的人员的信息,包括姓名、年龄和照片:
chunfeng.htm
创建查询表单htmlhead/headbodyform method=POST action=SEARCH.ASPp请输入编号:input type=text name=T1 size=20inputtype=submit value=提交 name=B1input type=reset value=重写 name=B2/p/form/body/html
search.asphtmlheadmeta http-equiv=content-type content=text/html;charset=gb2312title精彩春风之查询结果/title/headbody bgColor=Azure%session(CHUNFENG_ID)=Request.Form(T1)
注意这个session变量,在images.asp图象处理文件中再次被调用 temp_id=session(CHUNFENG_ID)font size=4 color=OrangeRed查询结果:/font%set conntemp=server.createobject(adodb.connection)conntemp.open dsn=CHUNFENG;uid=sa;pwd=SAset rstemp=conntemp.execute(select * from CHUNF_TABLE where chunfeng=temp_id)%% put headings on the table of field names nobody=噢,数据库里没有您要找的资料!%
判断是否存在记录%if rstemp.eof then %font size=5 color=OrangeRed %Response.Write(nobody)%/font%else%div align=centercentertable border=1 width=73% height=399trtd width=21% height=49 align=centerp align=center姓名/tdtd width=30% height=49 align=centerfont size=4 color=OrangeRed%=rstemp(0)%/font/td/tdtrtd width=21% height=47p align=center年龄/tdtd width=30% height=47 align=centerfont size=4 color=OrangeRed%=rstemp(0)%/font/td/trtrtd width=49% height=146 rowspan=3 colspan=2img src=images.asp/td
/tr
文档评论(0)