出来るのだＡＳＰ Ｑ＆Ａ掲示板（過去ＬＯＧ） 　訪問数 52046 昨日 889 今日 776
     【PR】 パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。
Topに戻る 掲示板に戻る 検索 削除 管理者
テーブルの文字を取得って出来ますか？ 　 cozyさん [2002/01/08 20:10:45] [1351]
　 Re:テーブルの文字を取得って出来ますか？ 　 Tomitomiさん [2002/01/09 0:35:58] [1352]
　 　 Re:テーブルの文字を取得って出来ますか？ 　 cozyさん [2002/01/09 10:21:04] [1353]
[1351] テーブルの文字を取得って出来ますか？
投稿者：cozyさん 2002/01/08 20:10:45
はじめまして。
初心者で参考書などを見ながら四苦八苦していて、どうしても解らないので投稿させていただきました。
今、Access2000でデータｰベースを作っています。ごくごく簡単なデータベースです。VBScriptとHTMLを使いIEからデータベースを操作できるものを作っています。
dbの中身をテーブルで一覧表示させ、そのテーブルのはじに編集、削除、詳細というボタンを付けて、それぞれの処理に飛ばしたいのですが、そこでテーブルに一覧表示されている文字を取得したいのですが、そんなことって出来るのでしょうか？
初心者のもので恥ずかしいのですが、ソースを載せますのでよろしくお願いします。

<%@ LANGUAGE="VBSCRIPT" %>
<html>
<head>
<title>トスネット</title>
</head>
<body>

<table>
<tr>
<td>全件表示</td>
<td width="150" align="right"><a href="index.htm">メイン画面へ</a></td>
</tr>
</table>
<br>
<table border="1" cellpadding="4">
<tr>
<th colspan="3"></th>
<th>内部ID番号</th><th>登録日付</th><th>お客様名</th><th>担当者名</th><th>内容</th>
</tr>

<%
Dim work

'=========================================================
'１、データベースを開く
'２、データベースからデータを取り出す
'=========================================================
Dim Conn,SQL,RS
db1=server.mappath("db1.mdb")
DBName="Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & db1
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.open DBName
SQL = "select * from トスネット"
Set RS = Server.CreateObject("ADODB.Recordset")
RS.Open SQL, Conn,3,3

'=========================================================
'３、取り出したデータをHTMLに書き出す
'=========================================================
response.write RS.recordcount & "件が登録されています"
Do until rs.eof
%>

<tr>
<form method="post" action="edi.asp">
<td>
<input type="hidden" name="id" value=<%=id%>>
<input type="submit" value="編集">
</td>
</form>
<form method="post" action="del.asp">
<td>
<input type="hidden" name="id" value=<%=id%>>
<input type="submit" value="削除">
</td>
</form>
<form method="post" action="show.asp">
<td>
<input type="hidden" name="id" value=<%=id%>>
<input type="submit" value="詳細">
</td>
</form>
<td align="right"><%=rs("id")%></td>
<td><%=rs("date")%></td>
<td><%=rs("name1")%></td>
<td><%=rs("name2")%></td>
<td>
<%
work = rs("work")
if len(work) > 20 then
response.write left(work,20)&"..."
else
response.write work
end if
%>
</td>
</tr>

<%
rs.movenext
loop

'=========================================================
'４、データベースを閉じる
'=========================================================
rs.close
Conn.close
%>

</table>
</body>
</html>

[1352] Re:テーブルの文字を取得って出来ますか？
投稿者：Tomitomiさん 2002/01/09 0:35:58
こんばんわ、Tomitomiです。

> dbの中身をテーブルで一覧表示させ、そのテーブルのはじに編集、削除、詳細というボタンを付けて、それぞれの処理に飛ばしたいのですが、そこでテーブルに一覧表示されている文字を取得したいのですが、そんなことって出来るのでしょうか？

テーブルの文字列を取得したいのはよくあることですね。
ちょっと考え方を変えれば簡単です。
表示している文字列をForm内にhiddenで書いてあげるのです。

><form method="post" action="show.asp">
><td>
><input type="hidden" name="id" value=<%=id%>>
><input type="submit" value="詳細">
></td>
></form>
><td align="right"><%=rs("id")%></td>
><td><%=rs("date")%></td>
><td><%=rs("name1")%></td>
><td><%=rs("name2")%></td>
><td>
><%

を

<form method="post" action="show.asp">
<td>
<input type="hidden" name="id" value=<%=id%>>
<input type="submit" value="詳細">

'========== これを追加してあげる。 =======================
<input type="hidden" name="date" value=<%=s("date")%>>
<input type="hidden" name="name1" value=<%=rs("name1")%>>
<input type="hidden" name="name2" value=<%=rs("name2")%>>
'=========================================================

</td>
</form>
<td align="right"><%=rs("id")%></td>
<td><%=rs("date")%></td>
<td><%=rs("name1")%></td>
<td><%=rs("name2")%></td>
<td>
<%

こうする。
[1353] Re:テーブルの文字を取得って出来ますか？
投稿者：cozyさん 2002/01/09 10:21:04
> こんばんわ、Tomitomiです。
>
> > dbの中身をテーブルで一覧表示させ、そのテーブルのはじに編集、削除、詳細というボタンを付けて、それぞれの処理に飛ばしたいのですが、そこでテーブルに一覧表示されている文字を取得したいのですが、そんなことって出来るのでしょうか？
>
> テーブルの文字列を取得したいのはよくあることですね。
> ちょっと考え方を変えれば簡単です。
> 表示している文字列をForm内にhiddenで書いてあげるのです。
>
> ><form method="post" action="show.asp">
> ><td>
> ><input type="hidden" name="id" value=<%=id%>>
> ><input type="submit" value="詳細">
> ></td>
> ></form>
> ><td align="right"><%=rs("id")%></td>
> ><td><%=rs("date")%></td>
> ><td><%=rs("name1")%></td>
> ><td><%=rs("name2")%></td>
> ><td>
> ><%
>
> を
>
> <form method="post" action="show.asp">
> <td>
> <input type="hidden" name="id" value=<%=id%>>
> <input type="submit" value="詳細">
>
> '========== これを追加してあげる。 =======================
> <input type="hidden" name="date" value=<%=s("date")%>>
> <input type="hidden" name="name1" value=<%=rs("name1")%>>
> <input type="hidden" name="name2" value=<%=rs("name2")%>>
> '=========================================================
>
> </td>
> </form>
> <td align="right"><%=rs("id")%></td>
> <td><%=rs("date")%></td>
> <td><%=rs("name1")%></td>
> <td><%=rs("name2")%></td>
> <td>
> <%
>
> こうする。

こんにちは、cozyです。
Tomitomiさん、レス有難う御座いました。
言われてみれば、そのとうりですね。レスを見てチョッと恥ずかしかったです。本当に初心者でスミマセン。
一気に解決することが出来ました。本当に有難う御座いました。
また、どうしても行詰まった時は、こちらにお世話になりたいと思いますので、その時はお付き合いのほどよろしくお願い致します。
それでは、有難う御座いました。

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