Easp 邮编查询(easp.http)

<!--#include file="Easp/easp.asp" -->
<%
Dim tmp
Response.Charset = "UTF-8"
Easp.http.CharSet = "gb2312"
Easp.Http.Data = Array("zip:529200","action:zip2area")  '修改zip参数即可实现查询邮编!
tmp = Easp.http.Get("http://www.ip138.com/post/search.asp")
tmp = Easp.Http.SubStr("<td style=""padding-left:5%"" nowap class=tdc2>◎","</td>",0)
Easp.WN tmp
Easp.W "页面执行时间: " & Easp.ScriptTime & " 秒"
Set Easp = Nothing
%>


返回结果是:

广东 江门 台山市 邮编:529200 区号:0750
页面执行时间: 0.063 秒

EasyASP 是一个方便快速开发ASP的类,其中包含了数据库控制类 Easp.db ,具有同时对一个或多个数据库进行各类操作、调用MSSQL存储过程及记录集分页等功能。EasyASP 同时提供了大量实用的ASP通用过程及方法,可以简化大部分的ASP操作。EasyASP 目前提供下载的是VBScript版。

EasyASP 官方网站:http://easp.lengshi.com/,以上使用的是2.2版本,可在论坛进行下载!
原文地址:https://www.cnblogs.com/edielei/p/2091251.html