写了几个类,希望对大家有用。

formhandler.asphtmlbody%Dim RequestMethod
RequestMethod = Request.ServerVariables(“REQUEST_ METHOD”)

1.日历


获取REQUEST_METHOD的数值,并把它存入本地的变量中.当Web页面被表单标记的Action参数调用时,REQUESTMETHOD的数值为Post.其他时候,
用户直接向浏览器中键入地址,刷新页面,或单击页面的一个链接而调用页面,REQUEST_METHOD的数值是Get.If
RequestMethod = “GET” Then

[Ctrl+A 全选 注:如需引入外部Js需刷新才能执行]


检查REQUEST-METHOD的数值.If结构含有一个块代码,当条件为真时被执行,含有一个Else块,条件为假时被执.刷新页面.

2.简单的下拉菜单

%噢,您现在不能刷新并浏览屏幕当前内容!如果想更改表单数据,请用后退键回到表单,或按提交返回.%Else
%欢迎光临随风起舞!

 

‘ 按下表单提交按钮显示.

命令一

%= Request.Form(“Name”) %.P您最喜欢的国产汽车:

命令二

%DIM favCaramrefavCaramre = Request.Form(“Caramre”)If favCaramre =
“OLYMPUS ” Then Response.Write(“噢,请稍候!”) Response.Write(“PA BOLYMPUS
/B?”)Else Response.Write(favCaramre & “.P棒极了!”)End If%%End
If%/body/html

命令三

命令四

澳门新葡亰手机版,命令五

命令六

命令七

命令八

菜单一   菜单二   菜单三   菜单四

[Ctrl+A 全选 注:如需引入外部Js需刷新才能执行]

3. QQ菜单效果

[Ctrl+A 全选 注:如需引入外部Js需刷新才能执行]

4.对联效果

对联内容

[Ctrl+A 全选 注:如需引入外部Js需刷新才能执行]