省市二级联动(vb代码)

webform2.aspx

<%@ Page Language="vb" AutoEventWireup="false" Codebehind="WebForm2.aspx.vb" Inherits="salonmaster.WebForm2"%>
省市二级联动(vb代码)

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
省市二级联动(vb代码)

<HTML>

<HEAD>

<title>WebForm1</title>
省市二级联动(vb代码)

//jb函数会根据不同的浏览器初始化个xmlhttp对象
省市二级联动(vb代码)

function jb()
省市二级联动(vb代码)

{

var A=null;
省市二级联动(vb代码)

try

{

A=new ActiveXObject("Msxml2.XMLHTTP");
省市二级联动(vb代码)

}

catch(e)

{

try

{

A=new ActiveXObject("Microsoft.XMLHTTP");
省市二级联动(vb代码)

}

catch(oc)

{

A=null

}

if ( !A && typeof XMLHttpRequest != "undefined" )
省市二级联动(vb代码)

{

A=new XMLHttpRequest()
省市二级联动(vb代码)

}

return A

}

//下面Go函数是父列表框改变的时候调用，参数是选择的条目
省市二级联动(vb代码)

function Go(obj)
省市二级联动(vb代码)

{

//得到选择框的下拉列表的value
省市二级联动(vb代码)

var svalue = obj.value;
省市二级联动(vb代码)

//定义要处理数据的页面
省市二级联动(vb代码)

var weburl = "webform2.aspx?parent_id="+svalue;
省市二级联动(vb代码)

//初始化个xmlhttp对象
省市二级联动(vb代码)

var xmlhttp = jb();
省市二级联动(vb代码)

//提交数据，第一个参数最好为get，第三个参数最好为true
省市二级联动(vb代码)

xmlhttp.open("get",weburl,true);
省市二级联动(vb代码)

// alert(xmlhttp.responseText);
省市二级联动(vb代码)

//如果已经成功的返回了数据
省市二级联动(vb代码)

xmlhttp.onreadystatechange=function()
省市二级联动(vb代码)

{

if(xmlhttp.readyState==4)//4代表成功返回数据
省市二级联动(vb代码)

{

var result = xmlhttp.responseText;//得到服务器返回的数据
省市二级联动(vb代码)

//先清空dListChild的所有下拉项
省市二级联动(vb代码)

document.getElementById("dListChild").length = 0;
省市二级联动(vb代码)

//给dListChild加个全部型号的,注意是Option不是option
省市二级联动(vb代码)

document.getElementById("dListChild").options.add(new Option("所有城市","0"));
省市二级联动(vb代码)

if(result!="")//如果返回的数据不是空
省市二级联动(vb代码)

{

//把收到的字符串按照，分割成数组
省市二级联动(vb代码)

var allArray = result.split(",");
省市二级联动(vb代码)

//循环这个数组，注意是从1开始，因为收到的字符串第一个字符是，号，所以分割后第一个数组为空
省市二级联动(vb代码)

for(var i=1;i<allArray.length;i++)
省市二级联动(vb代码)

{

//在把这个字符串按照|分割成数组
省市二级联动(vb代码)

var thisArray = allArray[i].split("|");
省市二级联动(vb代码)

//为dListChild添加条目
省市二级联动(vb代码)

document.getElementById("dListChild").options.add(new Option(thisArray[1].toString(),thisArray[0].toString()));
省市二级联动(vb代码)

}

//发送数据，请注意顺序和参数，参数一定为null或者""
省市二级联动(vb代码)

xmlhttp.send(null);
省市二级联动(vb代码)

}

</script>

</HEAD>

<body MS_POSITIONING="GridLayout">
省市二级联动(vb代码)

<form id="Form1" method="post" runat="server">
省市二级联动(vb代码)

<asp:dropdownlist id="dListParent" style="Z-INDEX: 101; LEFT: 160px; POSITION: absolute; TOP: 56px"
省市二级联动(vb代码)

runat="server" onchange="Go(this)">
省市二级联动(vb代码)

</asp:dropdownlist>
省市二级联动(vb代码)

<asp:dropdownlist id="dListChild" style="Z-INDEX: 102; LEFT: 304px; POSITION: absolute; TOP: 56px"
省市二级联动(vb代码)

runat="server"></asp:dropdownlist><asp:button id="Button1" style="Z-INDEX: 103; LEFT: 176px; POSITION: absolute; TOP: 128px" runat="server"
省市二级联动(vb代码)

Text="提交"></asp:button>
省市二级联动(vb代码)

<asp:Label id="Label1" style="Z-INDEX: 104; LEFT: 168px; POSITION: absolute; TOP: 24px" runat="server">Label</asp:Label>
省市二级联动(vb代码)

</form>

</body>

</HTML>

后台代码

Imports System.Data.OleDb

呵呵...参考C#联动的.附加上个数据库...不过还没有写三级联运呢..