博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

随笔分类 -  可复用函数语句

摘要:'注释:Sub eb_Sheng_CloseUp() dim Arr,Dic eb_shi.Clear StrSql = "Select 城市 From 邮编区号 Where 省份 = '"+eb_Sheng.Text+"'" StrRet = DBEngine.WebFunction("SqlQuery",StrSql,"")GetArrFromXML Dic,Arr,strRet FOR i=... 阅读全文

posted @ 2006-04-15 15:18 智岛软件 阅读(435) 评论(0) 推荐(0)