出来るのだＡＳＰ Ｑ＆Ａ掲示板（過去ＬＯＧ） 　訪問数 52046 昨日 889 今日 776
     【PR】 パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。
Topに戻る 掲示板に戻る 検索 削除 管理者
[2138] 難しいですね・・・
投稿者：HELPUPさん 2002/06/07 11:42:21
こんにちは。

北岳さん、くっくさん　ご丁寧に教えていただき
ありがとうございました。

とりあえず下記ＵＲＬを参考に作成してみましたが
画像は表示されませんでした。

http://www.microsoft.com/JAPAN/support/kb/articles/J041/0/56.asp

*****< s_gazou.asp >***************************************
<%@Language="VBScript" %>
<%
Response.Expires=0
Response.Buffer=TRUE
Response.Clear

Response.ContentType="Image/gif"
Set rs=Server.CreateObject("ADODB.Recordset")
Set db=Server.CreateObject("ADODB.Connection")
db.Provider="Microsoft.Jet.OLEDB.4.0"
db.Mode=1
db.ConnectionString="d:\社員検索システム.mdb"
db.Open

SQL="SELECT * FROM T_社員マスター" & _
" WHERE 社員番号='" & ("GAZOU_KEY") & "'"

Set rs=db.Execute(SQL)

Response.BinaryWrite rs("画像データ")
Response.End
%>
*****< s_search.asp >**************************************
<%@Language="VBScript" %>
<%
If Request.Form="" Then
%>
<HTML>
<HEAD>
<TITLE>社員検索システム</TITLE>
</HEAD>
<BODY>
<form method="POST" action="s_search.asp">
<tr>
<td align="right">社員番号：</td>
<TD><input type="text" name="SBAN" / ></TD>
<TD><input type="submit" value="検索" /></TD>
</tr>
</form>
<%
Else
set rs=Server.CreateObject("ADODB.Recordset")
set db=Server.CreateObject("ADODB.Connection")
db.Provider="Microsoft.Jet.OLEDB.4.0"
db.Mode=1
db.ConnectionString="d:\社員検索システム.mdb"
db.Open
SQL="SELECT * FROM T_社員マスター" & _
" WHERE 社員番号='" & Request.Form("SBAN") & "'"

rs.Open SQL,db,3,3
%>
<% Do While Not rs.EOF %>
<td><%=rs("社員番号") %></td>
<%
Session.Contents("G_KEY")=rs("社員番号")
%>
<td><IMG src="s_gazou.asp"></td>
<%
rs.MoveNext
Loop
End If
%>
</body>
</html>
***********************************************************

以上の様に北岳さんが指摘されたとおり、
自分的には？バイナリデータとして取り出したつもりなのですが・・・

現在は、上記ＡＳＰを保留にして紹介していただいた
ＤＯＯＤＬＥ２を使用してみようと解析中なのですが・・・
（悪戦苦闘であります）



Ａｃｃｅｓｓデータベースでのバイナリデータの作成について 　 HELPUPさん [2002/06/05 11:16:45] [2133]
　 Re:Ａｃｃｅｓｓデータベースでのバイナリデータの作成について 　 くっくさん [2002/06/05 19:36:21] [2134]
　 　 Re:Ａｃｃｅｓｓデータベースでのバイナリデータの作成について 　 北岳さん [2002/06/06 10:05:25] [2135]
　 　 　 Ａｃｃｅｓｓファイルサイズ上限 　 北岳さん [2002/06/06 20:03:07] [2137]
　 　 　 難しいですね・・・ 　 HELPUPさん [2002/06/07 11:42:21] [2138]
　 　 　 　 Re:難しいですね・・・ 　 HELPUPさん [2002/06/07 13:21:40] [2139]

TreeBBS For ASP V.0.1.3
Program By ＹａｓＮｅｔ