ASP 写的自动生成SELECT 表单的函数

对于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表单。

内容版权声明:除非注明,否则皆为本站原创文章。

转载注明出处:http://www.heiqu.com/3500.html