出来るのだＡＳＰ Ｑ＆Ａ掲示板（過去ＬＯＧ） 　訪問数 52046 昨日 889 今日 776
     【PR】 パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。
Topに戻る 掲示板に戻る 検索 削除 管理者
[5092] アクセスのテーブルデータが・・・
投稿者：ひでぞうさん 2005/07/04 15:45:08
お世話になります。
ASP経由でアクセスのデータを公開しております。
その際、テーブルのデータがテーブルの
順番どおりに表示してくれません。
新規に入力しても、おかしな順番で表示されます。
更新かけても表示自体は直りません。
ソース自体に何か問題があるのでしょうか
ソースは下記のようにしております。
Set ObjConn = Server.CreateObject("ADODB.Connection")
ObjConn.open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & _
Server.Mappath("gyoumu.mdb")
Set ObjRS = Server.CreateObject("ADODB.Recordset")
StrSQL = "select * from gyoumuAll"
ObjRS.Open StrSQL, ObjConn


End If

%>
<html>
<head>
<title>受注状況</title>
</head>
<body>
<h2>受注状況</h2>
<table width="100%" border="1">
<tr>
<td bgcolor="#C0C0C0"><small><small><b>受付日付</b></small></small></td>
<td bgcolor="#C0C0C0"><small><small><b>種類</b></small></small></td>
<td bgcolor="#C0C0C0"><small><small><b>本部</b></small></small></td>
<td bgcolor="#C0C0C0"><small><small><b>依頼元</b></small></small></td>
<td bgcolor="#C0C0C0"><small><small><b>窓口</b></small></small></td>
<td bgcolor="#C0C0C0"><small><small><b>社内作業</b></small></small></td>
<td bgcolor="#C0C0C0"><small><small><b>最終見積(金額)</b></small></small></td>
<td bgcolor="#C0C0C0"><small><small><b>受注（日）</b></small></small></td>
<td bgcolor="#C0C0C0"><small><small><b>外注担当</b></small></small></td>
<td bgcolor="#C0C0C0"><small><small><b>請求書</b></small></small></td>
<td bgcolor="#C0C0C0"><small><small><b>処理月</b></small></small></td>
<td bgcolor="#C0C0C0"><small><small><b>外注費（金額）</b></small></small></td>
<td bgcolor="#C0C0C0"><small><small><b>外注費発生月</b></small></small></td>
</tr>
<% Do until ObjRS.eof %>
<tr>
<td><small><small><% = ObjRS("受付日付") %></small></small></td>
<td><small><small><% = ObjRS("種類") %></small></small></td>
<td><small><small><% = ObjRS("本部") %></small></small></td>
<td><small><small><% = ObjRS("依頼元") %></small></small></td>
<td><small><small><% = ObjRS("窓口") %></small></small></td>
<td><small><small><% = ObjRS("社内作業") %></small></small></td>
<td><small><small><% = ObjRS("最終見積(金額)") %></small></small></td>
<td><small><small><% = ObjRS("受注（日）") %></small></small></td>
<td><small><small><% = ObjRS("外注担当") %></small></small></td>
<td><small><small><% = ObjRS("請求書") %></small></small></td>
<td><small><small><% = ObjRS("処理月") %></small></small></td>
<td><small><small><% = ObjRS("外注費（金額）") %></small></small></td>
<td><small><small><% = ObjRS("外注費発生月") %></small></small></td>
</tr>
<%
ObjRS.MoveNext
Loop

%>
</table>
<%
'データベースを閉じます。
ObjRS.Close
Set ObjRS = Nothing
ObjConn.Close
Set ObjConn = Nothing
%>
DBに使用していますアクセスは2000、Serverは2000、IIS5.0です。
よろしくお願い致します。
アクセスのテーブルデータが・・・ 　 ひでぞうさん [2005/07/04 15:45:08] [5092]
　 Re:アクセスのテーブルデータが・・・ 　 morさん [2005/07/04 16:50:28] [5093]
　 　 Re:アクセスのテーブルデータが・・・ 　 ひでぞうさん [2005/07/04 23:43:36] [5094]
　 　 　 Re:アクセスのテーブルデータが・・・(いけました) 　 ひでぞうさん [2005/07/05 23:25:35] [5099]

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