仓酷云

标题: ASP网站制作之从数据库中读取纪录的静态列表(无初始... [打印本页]

作者: 金色的骷髅    时间: 2015-1-16 23:12
标题: ASP网站制作之从数据库中读取纪录的静态列表(无初始...
对于中小型web应用来说,php有很强的竞争力,linux+apache+mysql+php(lamp)的组合几乎可以胜任绝大多数网站的解决方案,对于大型应用来讲,对于系统架构要求更高,需要有成熟的框架支持,jsp的struts是个不错的框架,国内介绍它的资料也非常多,应用逐渐广泛起来。asp就不用说了,静态|数据|数据库这里是以省分和乡村为例,因为用到数据库,请先创建数据库dlist.mdb

数据库称号:dlist.mdb


省分表称号:Province
字段有:p_id(范例:主动编号),p_name(范例:文本,省分称号)

乡村表称号:City
字段有:c_id(范例:主动编号),c_pid(范例:文本,省分称号,即是Province表中的p_name),c_name(范例:文本,乡村称号)


源程序以下,保留为ASP文件便可实行。
------------------------------------------------------------
<%
dimid
id=request.QueryString("id")

ifid="1"then
response.Write"<br>"&request.Form("lstb")
response.Write"<br>"&request.Form("lsts")
endif

%>
<html>
<head>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
<title>JS静态列暗示例</title>
<scriptlanguage="JavaScript">
<!--
varsSort=newArray();
varnum=0;
<%
dimconn,rs,grs,i,j,pstr
pstr=""
setconn=server.createobject("adodb.connection")
setrs=server.createobject("adodb.recordset")
setgrs=server.createobject("adodb.recordset")
conn.open"Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&Server.mappath("dlist.mdb")
写省分JS数组
rs.open"select*fromprovince;",conn,1,1
fori=0tors.recordcount-1
pstr=pstr&"<optionvalue="""&rs("p_name")&""">"&rs("p_name")&"</option>"
getsub(rs("p_name"))
rs.movenext
next

rs.close()
setrs=nothing
setgrs=nothing

依据省分写乡村JS数组的历程
subgetsub(pname)
grs.open"select*fromcitywherec_pid="&pname&";",conn,1,1
forj=1togrs.recordcount
response.write"sSort[num++]=newArray("""&grs("c_name")&""","""&pname&""");"&vbCrlf
grs.movenext
next
grs.close()
endsub
%>

varnsSortCount=num;

functionsdbSortChange(cmbsdbSort,cmbsSort)
{
varnSelsdbSort=cmbsdbSort.selectedIndex;
varssdbSort=cmbsdbSort.options[nSelsdbSort].value;

cmbsSort.length=0;
cmbsSort.options[0]=newOption(-请选择-,);
for(vari=0;i<nsSortCount;i++)
{
if(sSort[i][1]==ssdbSort)
{
cmbsSort.options[cmbsSort.length]=newOption(sSort[i][0],sSort[i][0]);
}
}
}

functionInitsSort(cmbsdbSort,cmbsSort)
{
varnSelsdbSort=cmbsdbSort.selectedIndex;
varssdbSort=cmbsdbSort.options[nSelsdbSort].value;
varssSort=cmbsSort.options[0].value;


cmbsSort.length=0;
cmbsSort.options[0]=newOption(-请选择-,);
varn=0;
for(vari=0;insSortCount;i++)
{
if(sSort[i][1]==ssdbSort)
{
cmbsSort.options[cmbsSort.length]=newOption(sSort[i][0],sSort[i][0]);

if(sSort[i][0]==ssSort)
cmbsSort.options[cmbsSort.length-1].selected=true;
}
}
}

//-->
</script>
</head>

<body>
<p></p>
<p></p>
<p></p>
<formaction="index.asp?id=1"method="post"name="frmdlist"id="frmdlist">
<tablewidth="408"border="0"align="center"cellpadding="2"cellspacing="2">
<tr>
<tdwidth="400"align="center">JS静态列暗示例</td>
</tr>
<tr>
<tdalign="center"><%response.write"<selectname=""lstb""style=""width:200""onChange=""sdbSortChange(this,frmdlist.lsts);"">"&pstr&"</select>"%>
</td>
</tr>
<tr>
<tdalign="center"></td>
</tr>
<tr>
<tdalign="center"><selectstyle="width:200"name="lsts"id="lsts">
</select>
</td>
</tr>
</table>
<palign="center">
</p>
<palign="center"></p></p>问题是他们究竟是喜欢他们是使用软件时,速度快还是速度慢好.(当然在3秒以内).无论是他们输入资料时,查找资料时,分析资料时.
作者: 不帅    时间: 2015-1-20 08:09
那么,ASP.Net有哪些改进呢?
作者: 飘飘悠悠    时间: 2015-1-28 20:52
不是很难但是英文要有一点基础网上的教程很少有系统的详细的去买书吧,另不用专门学习vb关于vbscript脚本在asp教材都有介绍
作者: admin    时间: 2015-2-5 18:44
我想问如何掌握学习节奏(先学什么再学什么)最好详细点?
作者: 小女巫    时间: 2015-2-13 03:52
你可以通过继承已有的对象最大限度保护你以前的投资。并且C#和C++、Java一样提供了完善的调试/纠错体系。
作者: 莫相离    时间: 2015-3-3 13:05
以上是语言本身的弱点,在功能方面ASP同样存在问题,第一是功能太弱,一些底层操作只能通过组件来完成,在这点上是远远比不上PHP/JSP,其次就是缺乏完善的纠错/调试功能,这点上ASP/PHP/JSP差不多。
作者: 蒙在股里    时间: 2015-3-11 11:04
从事这个行业,那么你可以学ASP语言,简单快速上手,熟练dreamweav排版,写asp代码,熟练photoshop处理图片,打好基础就行了
作者: 小妖女    时间: 2015-3-18 07:22
Request:从字面上讲就是“请求”,因此这个是处理客户端提交的东东的,例如Resuest.Form,Request.QueryString,或者干脆Request("变量名")
作者: 金色的骷髅    时间: 2015-3-25 13:18
Response:从字面上讲是“响应”,因此这个是服务端向客户端发送东西的,例如Response.Write




欢迎光临 仓酷云 (http://ckuyun.com/) Powered by Discuz! X3.2