首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

VB WEBBROWSER怎么自动选择网页省市两级互联上拉菜单

2013-01-02 
VB WEBBROWSER如何自动选择网页省市两级互联下拉菜单网页部分源码:tdselect id_province name_pro

VB WEBBROWSER如何自动选择网页省市两级互联下拉菜单
网页部分源码:

<td>
<select id="_province" name="_province"size=1 onchange="fill(dist, province[this.selectedIndex].dist);">
    <option value=0> 请选择 </option>
</select> 
<select id="dist" name="dist" size=1 >
    <option value=0> 请选择 </option>
</select>
</td> 


SCRIPT部分源码:
<script>
function Addr(name) {
this.name = name;

this.toString = function() {
return this.name;
}
}

function createAreaArrayByList(names) {
list = names.split(' ');
var array = new Array();
for(i in list) {
//alert( list[i] );
if(trim ( list[i] ) != '') {// 忽略全是空格的数据
array.push ( new Addr( trim( list[i] ) ) );
}
}

return array;
}

function trim(str){  
 return str.replace(/(^\s*)|(\s*$)/g, "");
}
// 省市二级的数据结构!!!
// 省/直辖市定义
var province =  createAreaArrayByList("请选择 北京市  上海市  天津市 重庆市  海南省  河北省 山西省 内蒙古自治区 辽宁省 吉林省 黑龙江省 江苏省 浙江省 安徽省 福建省 江西省 山东省 河南省 湖北省 湖南省 广东省 广西壮族自治区 四川省 贵州省 云南省 西藏自治区 陕西省 甘肃省 青海省 宁夏回族自治区 新疆维吾尔自治区  香港特别行政区 澳门特别行政区 台湾 国外");// 多个省请以空格隔开
province[0].dist = createAreaArrayByList("请选择");
//北京市
province[1].dist = createAreaArrayByList("东城区 西城区 崇文区 宣武区 朝阳区 丰台区 石景山区 海淀区 门头沟区 房山区 通州区 顺义区 昌平区 大兴区 怀柔区 平谷区 密云县 延庆县");
// 上海市

<中间省略..........>

province[35].dist = createAreaArrayByList("国外");
</script>

我想通过WEBBROWSER实现自动选择省-市的功能,在网上查了好欠都无法解决,还请各位大大帮忙!

解决后有加分!
[解决办法]
我想通过WEBBROWSER实现自动选择省-市的功能,在网上查了好欠都无法解决,还请各位大大帮忙!


给个思路吧,肯定能解决

1、如果你用的是WEBBROWSER,那么你可以获得源代码
2、既然有源代码你什么都能搞,你可以把你想要的那个选项增加一个select就ok了
3、然后将代码回写到webbrowser中即可
[解决办法]

set x=webbrowser.document.all("_province")
Call x.onchange

执行一次onchange就行

PS:这网页太熟悉了,前几天刚帮人写了一个这玩意

热点排行