pic_displayacc.asp

来自「ASP网页」· ASP 代码 · 共 37 行

ASP
37
字号

<%@ LANGUAGE="VBscript" %>
<%
Response.Buffer = true
Response.Expires = 0
%>
<!-- #include file="../dsn.asp" -->
<%
keyno=Request.QueryString("keyno")
code=Request.QueryString("code")
%>
<html>
<head>
<title>ͼƬ</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</head>
<body>
<% 
Response.Buffer = 1
Response.Clear
Response.ContentType="image/*"

set cn=server.CreateObject("ADODB.Connection")
cn.Open mycnstr
set rs=server.createobject("ADODB.recordset") 

sqltext="select picfile from picfiles where code='"+code+"' and keyno="&keyno
rs.Open sqltext,cn,1,1
Response.BinaryWrite(rs("picfile"))

rs.Close()
cn.Close()
%> 
</body>
</html>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?