ASP网站制作之ASP完成静态增加表单内容的实例程序
ASP在国内异常流行，因为国内大多使用的是盗版的Windows和盗版的SQLServer，而ASP＋COM＋SQLServer实际上也是一种不错的搭配，其性能也不输于PHP+MYSQL，特别是Windows系统和SQLServer都有图形界面，比APACHE和MYSQL易于维护，因此对于不重视知识产权的国家来说也是一种不错的选择。程序|静态 良多时分，不晓得必要表单的数量，就必要能对表单举行数目的把持。搜集了以下两个效果：效果1:
<html><body><formname="form1"><tableid="tb1"border=0><tr><td><ahref="#">增加附件</a></td></tr></table><inputtype="hidden"name="fjCnt"value="1"/></form></body></html><scriptlanguage="javascript">functionaddFj(){varoTb=document.getElementById("tb1");varoTr=oTb.insertRow(0);varname="thefilename"+document.form1.fjCnt.value;document.form1.fjCnt.value=parseInt(document.form1.fjCnt.value)+1;oTr.insertCell(0).innerHTML="<inputid=filename="+name+"type=filestyle=width:400px;><inputtype=button>"returnfalse;}functiondelFj(obj){obj.parentElement.parentElement.removeNode(true);returnfalse;}</script>
效果2:
<HTML><HEAD><STYLETYPE="text/css"><!--.p9{font-size:9pt;font-family:宋体}td{font-size:9pt}.tx{height:16px;width:30px;border-color:blackblack#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:1pxsolid#C0C0C0;border-top:1pxsolid#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:1pxsolid;border-color:blackblack#000000;color:#0000FF}--></STYLE><SCRIPTLANGUAGE="vbscript">functionaddfile()dimstrstr="<table>"ifnotIsNumeric(window.form1.filenum.value)thenwindow.form1.filenum.value=1fori=1towindow.form1.filenum.valuestr=str&"<tr><tdvalign=middle>文件"&i&":</td><td><inputtype=filename=file"&i&"class=tx1valuesize=20> 保留为<inputtype=textname=file"&i&"size=20class=tx2></td></tr>"nextwindow.uptd.innerHTML=str&"</table>"endfunction</SCRIPT><SCRIPTLANGUAGE="JavaScript"><!--functionShow(){varallnum=document.form1.filenum.value;//猎取有几个filefor(i=0;i<allnum;i++){alert("文件框的Name:file"+i);}returnfalse;}//--></SCRIPT><TITLE></TITLE><METAHTTP-EQUIV="Content-Type"CONTENT="text/html;charset=gb2312"></HEAD><BODYBGCOLOR="#ffffff"CLASS="p9"><FORMMETHOD="post"NAME="form1"ACTION="savetofile.asp"ENCTYPE="multipart/form-data"><TABLEBORDER="0"ALIGN="center"CELLPADDING="0"CELLSPACING="0"><TR><TD><DIVALIGN="center"><FONTCOLOR="#0000ff"SIZE="5">保留到文件</FONT></DIV></TD></TR><TR><TD><TABLEWIDTH="750"BORDER="1"ALIGN="center"CELLPADDING="0"CELLSPACING="0"BORDERCOLOR="#111111"STYLE="BORDER-COLLAPSE:collapse"><TR><TDHEIGHT="27"COLSPAN="2">上传<INPUTNAME="filenum"CLASS="tx2"VALUE="1"SIZE="4">个文件 <INPUTTYPE="button"NAME="Button"CLASS="bt"VALUE="设定"></TD></TR><TR><TD><DIVID="uptd"></DIV></TD></TR><TR><TDHEIGHT="30"COLSPAN="2"ALIGN="middle"><INPUTTYPE="Button"NAME="Button"CLASS="bt"VALUE="看看有几个框"><INPUTTYPE="submit"NAME="Button"CLASS="bt"VALUE="上传"> <INPUTTYPE="reset"NAME="Button"CLASS="bt"VALUE="重置"></TD></TR></TABLE></TD></TR></TABLE></FORM></BODY></HTML>
在asp中，静态表单可按一般表单一样举行提交。浅易的办法是设定一个流动表单的name，当有多个表单提交时，各表双数据会主动用"，"离隔，然后用split举行支解，再轮回举行分离提交。以下：
<%@LANGUAGE="VBSCRIPT"CODEPAGE="936"%>
<scriptlanguage="javascript">
functionaddTxtProductNameBox()
{
varoTb=document.getElementById("TableProductName");
varoTr=oTb.insertRow(0);
oTr.insertCell(0).innerHTML="<inputname=txtProductNametype=text><inputtype=button>"
returnfalse;
}
functiondelTxtProductNameBox(obj)
{
obj.parentElement.parentElement.removeNode(true);
returnfalse;
}
</script>
<%dimrs3,sql3,productNameArray
ifproductName""then
setrs3=server.CreateObject("ADODB.RecordSet")
sql3="select*fromAmdiProduct"
rs3.opensql3,conn,3,2
productNameArray=split(productName,",")
fori=0toubound(productNameArray)
rs3.addnew
rs3("CompanyID")=companyId
rs3("ProductName")=productNameArray(i)
rs3.update
next
rs3.close
setrs3=nothing
endif
%>
<formname="form1"method="post"action="">
产物称号:<ahref="#">增加产物称号</a>
<tableid="TableProductName"border=0>
<tr><td></td></tr>
</table>
<inputname="submit"type="submit"id="submit"value="==提交=="/>
</form>
楼上说交互性不好，太牵强了吧。在微软提供的一套框架中，利用asp做网站，开发效率高，使用人数少，减少不必要的开销。交互性是互动方式，是有开发人员决定的。 Application:这个存储服务端的数据，如果不清除，会直到web应用程序结束才清除(例如重启站点) 还有如何才能在最短的时间内学完?我每天可以有效学习2小时，双休日4小时。 先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习 ASP主要是用好六个对象，其实最主要的是用好其中两个：response和request，就可以随心所欲地控制网页变换和响应用户动作了。 最近在学asp，不要问我为什么不直接学.net，因为公司网站是asp做的所以有这个需要，卖了本书asp入门到精通，对里面的六大内置对象老是记不住，还有很多属性和方法看的头晕。 Session:这个存储跟客户端会话过程的数据，默认20分钟失效 哪些内置对象是可以跳过的，或者哪些属性和方法是用不到的?
页:
[1]