仓酷云
标题:
ASP网页编程之关于的无穷级联(省|市|县|乡|村|...)
[打印本页]
作者:
分手快乐
时间:
2015-1-16 23:36
标题:
ASP网页编程之关于的无穷级联(省|市|县|乡|村|...)
减少客户内IT专业人才缺乏带来的影响。ASP的客户员工利用浏览器进入相关的应用软件,简单易用,无需专业技术支持。index.asp
<html>
<head>
<title></title>
<metacontent="text/html;charset=gb2312"http-equiv="content-type">
<styletype="text/css"><!--
FONT{font-size:12px}
TD{font-size:12px}
A{color:#333399}
A:hover{color:#FF6600}
--></style>
<scriptlanguage="JavaScript"type="text/JavaScript"><!--
functionfunOnload(){
document.all.list_file.src="jscript_city.asp?base=0&sele=0-&elem=Select01";
}
//pBase级数,以0基,
//pSele是<option的value值
//pEle是下一级的表单名字
functionchgSelect(pBase,pSele,pElem){
//当改动了一个列表以后。扫除今后的列表的值。
for(i=parseInt(pElem.replace("Select",""));i<=5;i++){
vartmp="000"+i;
varpElem1=eval("document.Form1.Select"+tmp.substr(tmp.length-2));
pElem1.length=1;
pElem1.selectedIndex=0;
}
//JS用ASP失掉数据库的数据来更新上级列表
document.all.list_file.src="jscript_city.asp?base="+pBase+"&sele="+pSele+"&elem="+pElem;
}
//--></script>
<scriptid="list_file"language="JavaScript"type="text/JavaScript"src=""></script>
</head>
<bodybgcolor="#FFFFFF"leftmargin="0"topmargin="2"text="#333333"onload="funOnload();">
<formname="Form1">
<selectname="Select01"onchange="chgSelect(1,this.options[this.selectedIndex].value,Select02)">
<optionvalue="">省...</option>
</select>
<selectname="Select02"onchange="chgSelect(2,this.options[this.selectedIndex].value,Select03)">
<optionvalue="">市...</option>
</select>
<selectname="Select03"onchange="chgSelect(3,this.options[this.selectedIndex].value,Select04)">
<optionvalue="">县...</option>
</select>
<selectname="Select04"onchange="chgSelect(4,this.options[this.selectedIndex].value,Select05)">
<optionvalue="">乡...</option>
</select>
<selectname="Select05">
<optionvalue="">村...</option>
</select>
</form>
</body></html>
jscript_city.asp
<%
varBase下拉菜单品级
varSele所选择下拉菜单项的数据库ID
varElem下一级的表单称号
varBase=Request.QueryString("base")
varSele=Left(Request.QueryString("sele"),InStr(Request.QueryString("sele"),"-")-1)
varElem=Request.QueryString("elem")
varDistName=""
varAutoID=""
SetconDB=Server.CreateObject("ADODB.CONNECTION")
conDB.Open"Driver={MicrosoftAccessDriver(*.mdb)};DBQ="&Server.Mappath("db1.mdb")
sqlCommand="select*fromtable1wherefiled1="&varBase&"andfiled2="&varSele
SetrsRecord=conDB.Execute(sqlCommand)
WhileNotrsRecord.eof
varDistName=varDistName&chr(34)&rsRecord("filed3")&chr(34)
varAutoID=varAutoID&chr(34)&rsRecord("id")&chr(34)
rsRecord.movenext
IfNotrsRecord.EofThen
varDistName=varDistName&","
varAutoID=varAutoID&","
EndIf
Wend
Response.Write("varvarDistName=newArray("&varDistName&")"&vbcrlf)
Response.Write("varvarAutoID=newArray("&varAutoID&")"&vbcrlf)
Response.Write("varvarElem=eval("&chr(34)&"document.Form1."&varElem&chr(34)&")"&vbcrlf)
Response.Write("varElem.length=varDistName.length+1;"&vbcrlf)
Response.Write("for(vari=0;i<varDistName.length;i++){"&vbcrlf)
Response.Write("varElem.options[i+1].text=varDistName[i];"&vbcrlf)
Response.Write("varElem.options[i+1].value=varAutoID[i]+-+varDistName[i];"&vbcrlf)
Response.Write("}"&vbcrlf)
Response.Write("varElem.selectedIndex=0;"&vbcrlf)
%>
db1.mdb
-------------------------------------------------
福建厦门思明黄厝曾厝桉村
福建泉州丰泽西湖水头村</p>缺乏可以共同遵循的行业标准,ASP还处在发展初期,大家对它的理解不同,如产品和服务标准,收费标准等,不利于行业的健康发展。
作者:
不帅
时间:
2015-1-17 20:30
那么,ASP.Net有哪些改进呢?
作者:
透明
时间:
2015-1-21 07:45
下面简单介绍一下我学习ASP的方法,希望对想学习ASP的朋友有所帮助...
作者:
柔情似水
时间:
2015-1-23 21:36
我想问如何掌握学习节奏(先学什么再学什么)最好详细点?
作者:
第二个灵魂
时间:
2015-1-27 05:37
接下来就不能纸上谈兵了,最好的方法其实是实践。实践,只能算是让你掌握语言特性用的。而提倡做实际的Project也不是太好,因为你还没有熟练的能力去综合各种技术,这样只能使你自己越来越迷糊。
作者:
深爱那片海
时间:
2015-2-4 22:58
Response:从字面上讲是“响应”,因此这个是服务端向客户端发送东西的,例如Response.Write
作者:
仓酷云
时间:
2015-2-10 22:28
最近在学asp,不要问我为什么不直接学.net,因为公司网站是asp做的所以有这个需要,卖了本书asp入门到精通,对里面的六大内置对象老是记不住,还有很多属性和方法看的头晕。
作者:
莫相离
时间:
2015-3-1 16:43
接下来就不能纸上谈兵了,最好的方法其实是实践。实践,只能算是让你掌握语言特性用的。而提倡做实际的Project也不是太好,因为你还没有熟练的能力去综合各种技术,这样只能使你自己越来越迷糊。
作者:
飘灵儿
时间:
2015-3-10 19:58
尽管MS自己讲C#内核中更多的象VC,但实际上我还是认为它和Java更象一些吧。首先它是面向对象的编程语言,而不是一种脚本,所以它具有面向对象编程语言的一切特性,比如封装性、继承性、多态性等等,这就解决了刚才谈到的ASP的那些弱点。
作者:
若相依
时间:
2015-3-17 09:22
学习ASP其实应该上升到如何学习程序设计这种境界,其实学习程序设计又是接受一种编程思想。比如ASP如何学习,你也许在以前的学习中碰到过。以下我仔细给你说几点:
作者:
爱飞
时间:
2015-3-24 06:02
掌握asp的特性而且一定要知道为什么。
欢迎光临 仓酷云 (http://ckuyun.com/)
Powered by Discuz! X3.2