繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > 如何使用ASP制作模似动态生长的表单?
- ASP
- 收集整理的ASP的常用内置函数
- 高手推荐的比较有用的ASP函数集合
- ASP中JavaScript处理复杂表单的生成与验证
- asp下tag的实现,简单介绍与部分代码
- 在ASP中用组件检测当前网卡地址的代码
- asp中COM组件中如何连接数据库的代码
- 用ASP创建MDaemon用户的代码
- ASP使用FSO读取模板的代码
- ASP开发中可能遇到的错误信息中文说明大全（整理收集）
- 添加超级用户的.asp代码[蓝屏的原创,凯文改进,Ms未公布的漏洞]
- 全面优化ASP应用程序的性能的方法
- 实现ASP程序执行时间统计类的代码
- ASP中利用execute实现动态包含文件的方法
- asp中向文本框输出数据原样式的函数
- ADODB.Stream组件Charset属性值集合
- 关于ASP代码的加密的几个方法
- 支持权重的无组件ASP广告显示代码
- ASP下实现自动采集程序及入库的代码
- asp读取远程文件并保存到本地代码
- 为什么ASP中执行动态SQL总报错误信息？提示语句语法错误
如何使用ASP制作模似动态生长的表单?
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-11-03 浏览: 213 ::
收藏到网摘: n/a
<%@ language = vbscript%>
<% Response.Expires = 0 %>
<HTML>
<HEAD>
<TITLE>Dynamically Growing Form</TITLE>
</HEAD>
<BODY>
<%
If Request("Action") = "Submit the List" Then
' Show what was entered.
Response.Write "<B>Here are the Items submitted:</B><BR>"
nItems = Request.Form("Items").Count
For I = 1 To nItems
' Show submitted Items
Response.Write Request.Form("Items")(I) & "<BR>"
Next
Response.Write Request("Item") & "<BR>"
Else
' Create the form from all items. %>
<FORM Action=dynaform.asp Method=Post>
<B>Items:</B><BR>
<%
nItems = Request.Form("Items").Count
For I = 1 To nItems
' Show previously submitted Items
Response.Write "<INPUT Type=Text Name=Items Value=""" & _
Trim(Request.Form("Items")(I)) & """><BR>"
Next
If Request.Form("Item") <> "" Then
' paint a new input box, and store the old Item in Items collection
Response.Write "<INPUT Type=Text Name=Items Value=""" & _
Trim(Request.Form("Item")) & """><BR>"
Response.Write "<P>Please enter an Item,<BR>"
Response.Write "and submit them one at a time<BR>"
Response.Write "by pressing the Add Item button.<BR>"
Response.Write "<INPUT Type=Text Size=50 Name=Item Value="""""">"
Else
' No Item was submitted, don't show an error
Response.Write "<P>Please enter an Item,<BR>"
Response.Write "and submit them one at a time<BR>"
Response.Write "by pressing the Add Item button.<BR>"
Response.Write "<INPUT Type=Text Size=40 Name=Item Value="""""">
<BR>"
End If
%>
<P>
<INPUT Type="Submit" Name="Action" Value="Add Item to List">
<INPUT Type="Submit" Name="Action" Value="Submit the List">
<BR>
<% End If %>
</FORM>
</BODY>
</HTML>
评论 (0) All
