對於ASP高手當然沒什麼用了，但是對於剛入門的初學者和美工就有些用處了。
Function selectdo(a,d,b,c)
Response.write"<select name='"&a&"'><option>"&d&"</option>"
for i=b to c
if i<10 then
i="0"&i
end if
Response.write"<option>"&i&"</option>"
next
Response.write"</select>"
End Function
在此基礎上還可以擴充出更完整的SELECT表單。