当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP实现动态添加表单内容的实例程序

ASP
asp实现取得数组中的最大值的代码
asp 将日期格式化为需要的格式
asp 下产生任意位数随机密码的代码
asp下返回以千分位显示数字格式化的数值
asp重定向页面的方法总结
asp下去除数组中重复的项的方法
asp下实现 重新排序数字数组的代码
asp 验证输入网址是否有效并可以访问 与正则验证输入网址
asp验证Ip格式的函数
asp实现生成由数字，大写字母，小写字母指定位数的随机数
asp 格式化sql中的like字符串
asp 实现显示所有的服务器变量值的函数
asp 取得用户真实IP，对代理地址仍然有效的函数
asp 通用数据库连接过程函数
asp 字符串截取函数
asp下实现格式化文件大小以MB显示的函数
asp 下用正则表达式检测邮箱格式的函数
asp 实现检测字符串是否为纯字母和数字组合的函数
asp代码实现检测组件是否安装的函数
asp通过JMAIL实现通用发送函数

No. « 63 64 65 66 »

技术文章搜索

关键字

ASP实现动态添加表单内容的实例程序

出处:互联网   整理: 软晨网（RuanChen.com）   发布: 2009-08-14   浏览: 265 ::
收藏到网摘: n/a

很多时候，不知道需要表单的数目，就需要能对表单进行数量的控制。收集了如下两个效果：

以下为引用的内容：
<html>
<body>
<form name="form1">
<table id="tb1" border=0>
   <tr><td><a href="#" onclick="return addFj()">添加附件</a></td></tr>
</table>
<input type="hidden" name="fjCnt" value="1" />
</form>
</body>
</html>
<script language="javascript">
  function addFj()
  {
      var oTb = document.getElementById("tb1");
      var oTr = oTb.insertRow(0);
      var name = "thefilename"+document.form1.fjCnt.value;
      document.form1.fjCnt.value=parseInt(document.form1.fjCnt.value)+1;
      oTr.insertCell(0).innerHTML = "<input id='file' name='"+name+"' type=file style='width:400px;'> <input type=button onclick='return delFj(this)' value='删除'>"
      return false;
  }
  function delFj(obj)
  {
      obj.parentElement.parentElement.removeNode(true);
      return false;
  }
</script>

以下为引用的内容：
<HTML>
<HEAD>
<STYLE TYPE="text/css">
<!--
.p9{ font-size: 9pt; font-family: 宋体 }
td {font-size: 9pt}
.tx {height: 16px; width: 30px; border-color: black black #000000; border-top-width: 0px; border-right-width: 0px; border-bottom-width: 1px; border-left-width: 0px; font-size: 9pt; background-color: #eeeeee; color: #0000FF}
.tx2 {height: 16px;border-top-width: 0px; border-right-width: 0px; border-bottom-width: 1px; border-left-width: 0px; font-size: 9pt; color: #0000FF; border-left-color:#000000; border-right-color:#000000; border-top-color:#000000; border-bottom-color:#000000}
.bt {border-left:1px solid #C0C0C0; border-top:1px solid #C0C0C0; font-size: 9pt; border-right-width: 1; border-bottom-width: 1; height: 16px; width: 80px; background-color: #EEEEEE; cursor: hand; border-right-style:solid; border-bottom-style:solid}
.tx1 { width: 400 ;height: 20px; font-size: 9pt; border: 1px solid; border-color: black black #000000; color: #0000FF}
-->
</STYLE>
<SCRIPT LANGUAGE="vbscript">
function addfile()
dim str
str="<table>"
if not IsNumeric (window.form1.filenum.value) then window.form1.filenum.value =1
for i=1 to window.form1.filenum.value
str=str&"<tr><td valign='middle'>文件"&i&":</td><td><input type='file' name='file"&i&"' class='tx1' value size='20'>　　保存为<input type='text' name='file"&i&"' size='20' class='tx2'></td></tr>"
next
window.uptd.innerHTML =str&"</table>"
end function
</SCRIPT>
<SCRIPT LANGUAGE="JavaScript">
<!--
function Show()
{
var allnum =document.form1.filenum.value;//获取有几个file
for (i=0;i<allnum;i++)
{
alert("文件框的Name:file"+i);
}
return false;
}
//-->
</SCRIPT>
<TITLE></TITLE>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312"></HEAD>
<BODY BGCOLOR="#ffffff" CLASS="p9" onLoad="addfile()">
<FORM METHOD="post" NAME="form1" ACTION="savetofile.asp" ENCTYPE="multipart/form-data">
  <TABLE BORDER="0" ALIGN="center" CELLPADDING="0" CELLSPACING="0">
    <TR>
      <TD><DIV ALIGN="center"><FONT COLOR="#0000ff" SIZE="5">保存到文件</FONT></DIV></TD>
    </TR>
    <TR>
      <TD><TABLE WIDTH="750" BORDER="1" ALIGN="center" CELLPADDING="0" CELLSPACING="0" BORDERCOLOR="#111111" STYLE="BORDER-COLLAPSE: collapse">
          <TR>
            <TD HEIGHT="27" COLSPAN="2">上传
              <INPUT NAME="filenum" CLASS="tx2" VALUE="1" SIZE="4">
              个文件　　
              <INPUT TYPE="button" NAME="Button" CLASS="bt" onClick="addfile" VALUE="设 定">
            </TD>
          </TR>
          <TR>
            <TD> <DIV ID="uptd"> </DIV></TD>
          </TR>
          <TR>
            <TD HEIGHT="30" COLSPAN="2" ALIGN="middle">
              <INPUT TYPE="Button" NAME="Button" CLASS="bt" VALUE="看看有几个框" onclick="Show()">
  <INPUT TYPE="submit" NAME="Button" CLASS="bt" VALUE="上 传">
              　　
              <INPUT TYPE="reset" NAME="Button" CLASS="bt" VALUE="重 置">
            </TD>
          </TR>
        </TABLE></TD>
    </TR>
 
  </TABLE>
</FORM>
</BODY>
</HTML>

在asp中，动态表单可按普通表单一样进行提交。简易的方法是设定一个固定表单的name，当有多个表单提交时，各表单数据会自动用"，"隔开，然后用split进行分割，再循环进行分别提交。如下：  

以下为引用的内容：
 <%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<script language="javascript">
function addTxtProductNameBox()
  {
      var oTb = document.getElementById("TableProductName");
      var oTr = oTb.insertRow(0);
      oTr.insertCell(0).innerHTML ="<input name='txtProductName' type='text'><input type=button onclick='return delTxtProductNameBox(this)' value='删除'>"
      return false;
  }
  function delTxtProductNameBox(obj)
  {
      obj.parentElement.parentElement.removeNode(true);
      return false;
  }
</script>
<% dim rs3,sql3,productNameArray
    if productName<>"" then
    set rs3=server.CreateObject ("ADODB.RecordSet")
    sql3="select * from AmdiProduct"
    rs3.open sql3,conn,3,2
    productNameArray=split(productName,",")
    for i = 0 to ubound(productNameArray)
    rs3.addnew
    rs3("CompanyID")=companyId
    rs3("ProductName")=productNameArray(i)
    rs3.update
    next
    rs3.close   
                set rs3=nothing
    end if
%>
<form name="form1" method="post" action="">
产品名称:<a href="#" onclick="addTxtProductNameBox()">添加产品名称</a>
<table id="TableProductName" border=0>
   <tr><td> </td></tr>
</table>
<input name="submit" type="submit" id="submit" value="== 提交 ==" />
</form>