List 8-21　支払い方法と配送先入力のページ（pay.asp） 


  1： <!-- #include file="allproducts.asp" -->
  2： <HTML>
  3： <BODY>
  4： <H1>支払い方法と配送先の選択</H1>
  5： <FORM METHOD="POST" ACTION="submit.asp">
  6： <INPUT TYPE="RADIO" NAME="pay" VALUE="1" CHECKED>クレジットカード<BR>
  7： <INPUT TYPE="RADIO" NAME="pay" VALUE="2">代金引換<BR>
  8： <INPUT TYPE="RADIO" NAME="pay" VALUE="3">銀行振込<BR>
  9： 配送先:<INPUT TYPE="TEXT" NAME="ADDRESS" SIZE="60"><BR>
 10： <%
 11：   ' ここにHIDDENを使ってproducts.aspページで選択された商品を
 12：   ' 埋め込むようにする
 13：   For i = 0 To UBOUND(Products)
 14： %>
 15：     <INPUT TYPE="HIDDEN" NAME="<%= i%>" VALUE="<%= Request(i) %>">
 16： <%
 17：   Next
 18： %>
 19： <INPUT TYPE="SUBMIT" VALUE="次のページへ">
 20： </FORM>
 21： </BODY>
 22： </HTML>