出来るのだASP Q&A掲示板(過去LOG)  訪問数 52046 昨日 889 今日 776
    【PR】 パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。
Topに戻る 掲示板に戻る 検索 削除 管理者

[1124] データベースの内容を表示させる方法
投稿者:まどかさん 2001/11/28 19:19:22
 昨日もお世話になりました、まどかと申します。
今回、検索対象のデータベースの内容を画面に表示させようとしています。
例えば、db1にAコード、Bコードのフィールドがあったとします。
ただ、db1の対象レコードを画面に表示する方法は、本を見てできました。今回やりたいのは、db1のAコードに対応するdb2のAコード名称も一緒に表示させたいのです。
 表示画面のフィールドがAコード、Aコード名称、Bコードになるように表示させたいのですが。
 参考にした「今日からできるASP3.0」サンプルは以下の通りです。
---disp.asp---

<%@Language="VBScript" %>
<html>
<head>
<title>データベースをテーブル整形</title>
</head>
<body>
<!-- #INCLUDE File="db2table.asp" -->
<%
db2Table "SELECT * FROM mngUsr","../../master.mdb"
%>
</body>
</html>

---db2table.asp---
<%
Sub db2table(sql,dbName)
Set db=Server.CreateObject("ADODB.Connection")
db.Provider="Microsoft.Jet.OLEDB.4.0"
db.Mode=1
db.ConnectionString=Server.MapPath(dbName)
db.Open
Set rs=db.Execute(sql)
Response.Write "<table border='1'><tr>"
For i=0 To rs.Fields.Count-1
Response.Write "<th>" & rs.Fields.Item(i).Name & "</th>"
Next
Response.Write "</tr>"
Do Until rs.EOF
Response.Write "<tr>"
For i=0 To rs.Fields.Count-1
Response.Write "<td>" & rs.Fields.Item(i).Value & "<br /></td>"
Next
Response.Write "</tr>"
rs.MoveNext
Loop
Response.Write "</table>"
rs.Close
db.Close
Set db=Nothing
End Sub
%>
二重ループになっているところを変えればいいのかと思うのですが、
よくわからないので、ご教授ください。
あの、もしかして、本の内容を記述するのはまずいのでしょうか?
それなら、すぐに消しますのでいってください!

データベースの内容を表示させる方法   まどかさん [2001/11/28 19:19:22] [1124]
  発言者により削除されました!! 通りすがりのASPerさん [2001/11/28 19:57:55] [1126]
  Re:データベースの内容を表示させる方法   Tomitomiさん [2001/11/29 15:49:16] [1136]
  【解答例】1.CSVからMDBの作成   北岳さん [2001/11/29 18:04:01] [1147]
    【解答例】2.ASPの作成   北岳さん [2001/11/29 18:06:46] [1148]
  Re:データベースの内容を表示させる方法   まどかさん [2001/11/30 12:48:36] [1160]
    Re:データベースの内容を表示させる方法   北岳さん [2001/11/30 13:38:03] [1163]
      発言者により削除されました!! まどかさん [2001/12/05 12:44:04] [1209]
    Re:データベースの内容を表示させる方法   Tomitomiさん [2001/11/30 13:41:03] [1164]


TreeBBS For ASP V.0.1.3
Program By YasNet