もちろん、ASPの専門家にとっては役に立たないが、始めたばかりの初心者やアーティストにとっては役に立ちます。
関数selectdo（a、d、b、c）
Response.Write "<select name = '"＆a＆ "'> <option>"＆d＆ "</option>"
i = bからc
Iの場合
i = "0"＆i
ifを終了します
respons.write "<option>"＆i＆ "</option>"
次
Response.Write "</select>"
エンド関数
これに基づいて、より完全な選択フォームを展開できます。