<%@ Language="VBScript" %> <% Option Explicit %> 一坪ショップのthriftlink.com <% ' TimeOut判定用セッション Session( "cart_timeout" ) = "alive" %> <% '------------------------------------------------------------------------------ ' 関数名　： カテゴリリスト生成関数 ' 機能　　：カテゴリリストのＨＴＭＬを作成する。 ' 呼出形式：MakeCategorySelect(strName) ' 引数　　：strName [in] リストの名前 ' 戻り値　：なし '------------------------------------------------------------------------------ Function MakeCategorySelect(strName) Dim objCon ' コネクション Dim strSQL ' SQLバッファ Dim objRs ' レコードセット Set objCon = Server.CreateObject("ADODB.Connection") objCon.Open(CL_ACCESS_DSN) strSQL = "SELECT * FROM カテゴリ" & _ " ORDER BY カテゴリコード;" Set objRs = objCon.Execute(strSQL) With Response .Write(" " & VbCrLf) End With objRs.Close objCon.Close Set objRs = Nothing Set objCon = Nothing End Function %>

Pattern1
1 2 3
　
デザイン背景色 デザイン背景色 デザイン背景色
　
Pattern2
4 5 6
デザイン背景色 デザイン背景色 デザイン背景色
　
Pattern3
7 8 9
デザイン背景色 デザイン背景色 デザイン背景色
　

上記のH.P.の作成をご希望の方は、下記の申し込みフォーム（URL）から
お願い致します。http://www.thriftmall.net/hp/form.html
また、H.P.作成に際し、商品の撮影が必要になります。
商品によっては撮影が出来ない場合もありますのでご了承下さい。
（25cm×25cm×15cm以上の商品は撮影不可）