出来るのだASP Q&A掲示板(過去LOG)
訪問数 52046
昨日 889
今日 776 【PR】 パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。 |
![]() ![]() ![]() ![]() ![]() |
[2470] id取得後合致したidのレコードを表示させたい |
投稿者:まみさん 2002/08/13 20:45:32 |
こんばんわ!まみです。 いつもお世話になってます。 先程は2回にわたり、書き込みを間違えてしまい失礼致しました。 検索したレコードを表示するページで、 「個人詳細情報」ボタンをクリックしたら、URLに「個人情報id」を くっつけて、そのid値に合致したレコードを表示させたいのですが、 下記がそのソースになります。 どなたか、アドバイスを頂ければ幸いです。 宜しくお願い致します。 <html> <head> <title></title> <SCRIPT LANGUAGE="Javascript"> function chkB(){ if (k!==0){ var myObj=document.MyForm1.menid.value; var v = "http://****/ha_View.asp?id=" + id[myObj]; document.MyForm1.action=v; MyForm1.submit(); } } </SCRIPT> </head> <body bgcolor="#FFFFFF" text="#000000"> <FORM NAME="MyForm1" METHOD="POST" TARGET="f_Top"> <% Dim oCon,oRset,sConStr,SQL Dim Haken,Syozoku set oCon = Server.CreateObject("ADODB.Connection") sConStr = Application("ConCustomer") oCon.Open sConStr Haken = Request("H_ID") Syozoku = Request("B_ID") SQL = "SELECT * FROM 個人情報 WHERE 個人情報id = 個人情報id" If Haken <> "" AND Syozoku <> "" Then SQL = SQL & " AND (派遣会社管理No ='" & Haken & "') AND (所属コード='" & Syozoku & "')" ElseIf Haken <> "" AND Syozoku = "" Then SQL = SQL & " AND (派遣会社管理No='" & Haken & "')" ElseIf Haken = "" AND Syozoku <> "" Then SQL = SQL & " AND (所属コード='" & Syozoku & "')" End If SQL = SQL & " ORDER BY 個人情報id" Set oRset = oCon.Execute(SQL) %> <table width="100%" border="1" align="center"> <tr bgcolor="#ffc0cb" align="center"> <td width="5%" NOWRAP>氏名CD</td> <td width="8%" NOWRAP>氏名</td> <td>就業ステータス</td> <td width="40%">就業開始日</td> <td width="40%">各リンクボタン</td> </tr> <% Do Until oRset.EOF %> <tr> <td NOWRAP><%=oRset("氏名CD")%></td> <td NOWRAP><%=oRset("氏名")%></td> <td NOWRAP><%=oRset("就業ステータス")%></td> <td NOWRAP><%=oRset("就業開始日")%></td> <td NOWRAP> <input type="hidden" name="menid" value="<%=oRset("個人情報id")%>"> <INPUT TYPE="submit" onClick="chkB();" NAME="btn_Men" value="個人詳細情報"> </div></td> </tr> <% oRset.MoveNext Loop %> </table> </FORM> <% oRset.Close oCon.Close %> </body> </html> |
![]() ![]() |
![]() ![]() ![]() ![]() ![]() ![]() ![]() ![]() |
TreeBBS For ASP V.0.1.3 |