邮编区号查询版附源码的
昨天看了一下Macromedia的Flex技术,感觉很不错,于是把刚做好的邮编区号查询Js+Xml版改装了一下弄出了这个邮编区号查询flex版(这可是我的第一个flex程序哦^O^)。 源码压缩包中除了包含flex的源文件ml外,还有编译生成的flash文件,要是你那里没有flex的运行环境,就用邮编区号查询flash版好了,不过Flash播放插件得是最新的7.0才可以使用。
下面是相关的核心代码:
1、l文件代码(这里只列了5条,明白他的结构就可以):
?xml version=\"1.0\" encoding=\"gb2312\"?
!-- 邮编区号数据 --
有针对性地培养创新型人才。 MyData
Item Province=\"北京\" County=\"北京\" Zipcode=\"100000\" Areacode=\"010\" /
Item Province=\"北京\" County=\"通县\" Zipcode=\"101100\" Areacode=\"010\" /
Item Province=\"北京\" County=\"昌平\" Zipcode=\"102200\" Areacode=\"010\" /
Item Province=\"北京\" County=\"大兴\" Zipcode=\"102600\" Areacode=\"010\" /
Item Province=\"北京\" County=\"密云\" Zipcode=\"101500\" Areacode=\"010\" /
/MyData
2、ml文件代码:
?xml version=\"1.0\" encoding=\"utf-8\"?
mx:Application xmlns:mx=\"\" pageTitle=\"全国邮编区号查询Flex版\"
mx:Model id=\"myZIP\" source=\"l\"/mx:Model
mx:Panel title=\"全国邮编区号查询\" width=\"500\" height=\"90\" fontSize=\"14\" fontFamily=\"宋体\" verticalAlign=\"middle\" textAlign=\"center\"
mx:HBox marginLeft=\"30\"
mx:ComboBox id=\"strField\" width=\"70\"
mx:dataProvider
mx:Array
mx:Object label=\"省份\" data=\"Province\"/
mx:Object label=\"地区\" data=\"County\"/
mx:Object label=\"邮编\" data=\"Zipcode\"/
mx:Object label=\"区号\" data=\"Areacode\"/
/mx:Array
/mx:dataProvider
/mx:ComboBox
mx:ComboBox id=\"strReg\" width=\"100\"
mx:dataProvider
mx:Array
mx:Object label=\"等于\" data=\"=\"/
mx:Object label=\"包含\" data=\"Like\"/
mx:Object label=\"以...开头\" data=\"Start\"/
/mx:Array
/mx:dataProvider
/mx:ComboBox
mx:TextInput textAlign=\"left\" id=\"strKey\" text=\"山东\"/
mx:Button label=\"查询\" fontSize=\"12\" click=\"Search();\"/
/mx:HBox
/mx:Panel
mx:Script
![CDATA[
function Search(){
var my_Keyarray:Array=lit(\" \");
var my_Key=\"\";
for(var i:Number = 0; imy_ngth; i++){
if(my_Keyarray[i]!=\"\"){
my_Key+=my_Keyarray[i];
}
}
xt=my_Key;
if(xt==\"\"){
alert(\"关键词不可为空!\",\"系统提示\");
}else{
var my_array:Array =em;
var ok_array:Array=new Array();
var my_Field,my_Reg
for(var i:Number = 0; imy_ngth; i++){
var myFieldValue;
switch(ta){
case \"Province\" :
myFieldValue=my_array[i].Province;
break;
case \"County\" :
myFieldValue=my_array[i].County;
break;
case \"Zipcode\" :
myFieldValue=my_array[i].Zipcode;
break;
case \"Areacode\" :
myFieldValue=my_array[i].Areacode;
break;
default :
myFieldValue=my_array[i].Province;
}
switch(ta){
case \"=\" :
if(myFieldValue==xt){
ok_sh(my_array[i]);
}
break;
case \"Like\" :
if(dexOf(xt)-1){
ok_sh(my_array[i]);
}
break;
case \"Start\" :
if(dexOf(xt)==0){
ok_sh(my_array[i]);
}
break;
default :
if(myFieldValue==xt){
ok_sh(my_array[i]);
}
break;
}
}
//alert(ok_String());
taProvider=ok_array;
if(dexOf(\"...\")-1){
tle=\"搜索\"+bstring(0,dexOf(\"...\"))+\"【\"+xt+\"】\"+bstr(dexOf(\"...\")+3)+\"的【\"+bel+\"】,共找到\"+ok_String()+\"条信息。\";
}else{
tle=\"搜索\"+bel+\"【\"+xt+\"】的【\"+bel+\"】,共找到\"+ok_String()+\"条信息。\";
}
}
}
]]
/mx:Script
mx:Panel id=\"Result\" width=\"500\" height=\"400\" fontSize=\"14\" fontFamily=\"宋体\"
mx:DataGrid id=\"Show\" height=\"100%\" width=\"100%\"
mx:columns
mx:Array
mx:DataGridColumn columnName=\"Province\" headerText=\"省份\"/
mx:DataGridColumn columnName=\"County\" headerText=\"地区\"/
mx:DataGridColumn columnName=\"Zipcode\" headerText=\"邮编\"/
mx:DataGridColumn columnName=\"Areacode\" headerText=\"区号\"/
/mx:Array
/mx:columns
/mx:DataGrid
/mx:Panel
mx:Style
global {
font-family: 宋体;font-size: 12px;
}
/mx:Style
/mx:Application
广州治疗妇科习惯性流产医院武汉男科哪家好
地奥氨贝
- 上一页:邮件这个老古董为什么能参加世界互联网大会呢
- 下一页:邹作基前大银行当天风险分析都用
-
不放空调,一人高烧抽搐进ICU:宝宝吹空调得放26℃?误解可大了
大家好,我是你们的秘书长~用娘心事件调查育儿基础知识原因,为宝妈们拨...
2024-12-29
-
农业农村部:支持有条件的周边地区将亩均建设投入逐步达到3000元
中国网财经7翌年6日讯 今天,农耕农村部刊发对十三届全国人大五次会议第3...
2024-12-27
-
中芯国际等4家公司纳入成份股
5 月末 20 日,恒指母公司公布季检结果,将中芯国际等 4 家母公司纳入恒指,...
2024-12-22
-
何洁真应该减瘦身了,穿西装配半身裙真不咋瘦,体态看着有些圆润
每次谈起“外套”这样的单品,都觉得它是很神秘的共存,即便是那么多的人...
2024-12-14
-
子夜平安.铜镀金转花转水法大吉葫芦钟
大钟声平安.锌石制转回花转回水法大吉形如大钟 很高94cm*长38*cm*宽30cm 重33kg...
2024-11-30
-
不可忘失自己清净心,这就是道
只不过的人没有人人有觉堂,吊什么香呢?没有人人有。惠能说是:“不论如...
2024-11-23