仓酷云

 找回密码
 立即注册
搜索
热搜: 活动 交友 discuz
查看: 335|回复: 7
打印 上一主题 下一主题

[学习教程] ASP网站制作之ASP完成静态增加表单内容的实例程序

[复制链接]
莫相离 该用户已被删除
跳转到指定楼层
楼主
发表于 2015-1-16 22:21:19 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
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>

[Ctrl+A全体选择提醒:你可先修正部分代码,再按运转]
  效果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>

[Ctrl+A全体选择提醒:你可先修正部分代码,再按运转]
在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做网站,开发效率高,使用人数少,减少不必要的开销。交互性是互动方式,是有开发人员决定的。
分手快乐 该用户已被删除
沙发
发表于 2015-1-19 09:20:01 | 只看该作者
Application:这个存储服务端的数据,如果不清除,会直到web应用程序结束才清除(例如重启站点)
简单生活 该用户已被删除
板凳
发表于 2015-1-24 16:50:50 | 只看该作者
还有如何才能在最短的时间内学完?我每天可以有效学习2小时,双休日4小时。
再见西城 该用户已被删除
地板
发表于 2015-2-7 18:54:33 | 只看该作者
先学习用frontpage熟悉html编辑然后学习asp和vbscript建议买书进行系统学习
愤怒的大鸟 该用户已被删除
5#
发表于 2015-2-23 00:41:18 | 只看该作者
ASP主要是用好六个对象,其实最主要的是用好其中两个:response和request,就可以随心所欲地控制网页变换和响应用户动作了。
小女巫 该用户已被删除
6#
发表于 2015-3-7 05:14:24 | 只看该作者
最近在学asp,不要问我为什么不直接学.net,因为公司网站是asp做的所以有这个需要,卖了本书asp入门到精通,对里面的六大内置对象老是记不住,还有很多属性和方法看的头晕。
深爱那片海 该用户已被删除
7#
发表于 2015-3-14 12:47:26 | 只看该作者
Session:这个存储跟客户端会话过程的数据,默认20分钟失效
飘灵儿 该用户已被删除
8#
发表于 2015-3-21 09:05:13 | 只看该作者
哪些内置对象是可以跳过的,或者哪些属性和方法是用不到的?
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ|Archiver|手机版|仓酷云 鄂ICP备14007578号-2

GMT+8, 2024-12-23 14:19

Powered by Discuz! X3.2

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表