|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
在实现ERP等高端的ASP应用时,用户需要提供核心的经营资料,需要ASP商有很高的信用度。楼上说交互性不好,太牵强了吧。在微软提供的一套框架中,利用asp做网站,开发效率高,使用人数少,减少不必要的开销。交互性是互动方式,是有开发人员决定的。收集<%@Language=VBScript%>
<HTML>
<HEAD>
<METANAME="GENERATOR"Content="MicrosoftVisualStudio6.0">
</HEAD>
<BODY>
<%
ifRequest.ServerVariables("http_method")="POST"andRequest.Form("submit")"跳到"then
假如按POST体例提交表单内容
setconn=server.CreateObject("adodb.connection")
conn.ConnectionString="dsn=testsys"
conn.Open
strstid=Request.Form("stid")
strstname=Request.Form("stname")
ifRequest.Form("submit")="到场"then
假如实行到场先生信息的哀求
strsql="select*fromstudentinfowherestid="&strstid&""
依据要到场的先生学号查询数据库的表studentinfo中是不是存在该先生的纪录
setmrs1=conn.Execute(strsql)
ifnot(mrs1.BOFandmrs1.EOF)then
假如要到场的先生学号已存在,则提醒从头输出信息
Response.Write"该学号已存在,请从头输出先生信息<br>"
Response.Write"<ahref=taddstudent.asp?page="&request("page")&"&stname="&strstname&"&stid="&strstid&">前往</a>"
else
假如要到场的先生学号不存在,则向数据库中到场该先生信息
strsql="insertintostudentinfo(stname,stid)values("&strstname&","&strstid&")"
conn.Execute(strsql)
strstid=""
strstname=""
endif
endif
ifRequest.Form("submit")="删除"then
假如是删除先生信息哀求
strsql="delete*fromstudentinfowherestid="&strstid&""
删除先生信息
conn.Execute(strsql)
删除先生的测验成就
strsql="delete*fromscorewherestid="&strstid&""
conn.Execute(strsql)
strstid=""
strstname=""
endif
conn.Close
setconn=nothing
else
strstname=Request.QueryString("stname")
strstid=Request.QueryString("stid")
endif
%>
<FORMaction="taddstudent.asp"method=POSTid=form1name=form1>
<P><FONTface="幼圆"size=3color=Crimson>先生信息</FONT><BR>
<FONTface=""size=3>姓名:
<INPUTid=stnamename=stnamevalue=<%=strstname%>></FONT><BR>
<FONTface=""size=3>学号:
<INPUTid=stidname=stidvalue=<%=strstid%>></FONT>
<FONTface=""size=3>
<INPUTid=submit1name=submittype=submitvalue=到场>
<INPUTid=submit2name=submittype=submitvalue=删除>
</FONT></P><FONTface=""size=3>
<HR>
</FONT>
<P>
<TABLEborder=0cellPadding=1cellSpacing=1width=75%>
<TRbgcolor=Honeydew>
<TD>姓名</TD>
<TD>学号</TD></TR>
<%
setmrs=server.CreateObject("adodb.recordset")
mrs.ActiveConnection="dsn=testsys"
mrs.Source="select</p>asp可以轻松地实现对页面内容的动态控制,根据不同的浏览者,显示不同的页面内容。而浏览者一点觉察不出来,就像为他专门制作的页面一样。使用各种各样的组件,asp可以完成无比强大的功能。 |
|