或者，原来的js代码不变，这样写
wb.AppendHTML("setAjaxOptions('szshi','p_quyu_get.htm','szs',false)</script>")
wb.AppendHTML("<script>auto_display(""szshi"",""" & suozaishi & """)</script>") '引入脚本文件(所在市)
把代码拷贝2份即可
加好友 
发短信
Post By：2017/5/3 9:40:00 [只看该作者]
