コードコピーは次のとおりです。
<％
'+------------------------------------+
'|可変設定
'+------------------------------------+
ctitle = "すべてのアップロードされた写真（注：以下はすべて画像フォルダーの下の写真です、すべてが有効な写真ではない！）" '名前
cpictype = "jpeg、jpg、gif、png、bmp" 'イメージタイプ（ "、"画像形式を分離）
Cheight = 120'thumbnailの高さ
cwidth = 120 'サンバウト幅
Ceachlinemax = 5'Number行ごとに表示されます
CeachPageMax =ページごとに表示されている20'Numberの写真
pic_path = "/uploadpic/" '写真がある場所にパスを設定します
'+------------------------------------+
'|関数を定義します
'+------------------------------------+
functiongetext（name）
getext = right（name、3）
エンド機能
functionispic（filename、pictype）
ext = getext（filename）
ispic = false
TypeList = split（pictype、 "、"）
forii = lbound（Typelist）Toubound（Typelist）
ifucase（ext）= ucase（Typelist（ii））then
ispic = true
exitfor
endif
次
エンド機能
functionpagebar（ページ、pagetotal）
respons.write "[<ahref ="＆request.servervariables（ "script_name"）＆ "page ="＆（page-1）＆ "title = previousページ>前のページ</a>]"
respons.write "<ahref ="＆request.servervariables（ "script_name"）＆ "？page = 1title = home> <<</a>"
i = pagestart
dowhilei <ページ
respons.write "<ahref ="＆request.servervariables（ "script_name"）＆ "？page ="＆i＆ "" page "＆i＆" "> ["＆i＆ "</a>"
i = i+1