sjcx.asp

来自「该程序包中附有“手机归属地查询接口_ASP版[v1.0.0910]”源码」· ASP 代码 · 共 43 行

<!--
'================================================================
' 本程序供学习交流之用，可以自由转载免费使用；转载时请保留如下信息：
' 发布网站：http://www.hi5360.com	网站名称：电子商务之家·hi5360.com
' Copyright (C) 2008 HI5360.COM All Rights Reserved.
' ===============================================================
-->

<!--#include file="StealClass.asp"-->
<%
Dim mySTL,outstr,url,vPost,vMethod
vPost=Request.Form("hiCode")

set mySTL=new clsSteal
mySTL.src="http://www.ip138.com:8080/search.asp"
mySTL.rqst="action=mobile&mobile="&vPost
mySTL.send("POST")
outstr=ExHTML()

response.write(outstr)
response.write("<br><center>(手机归属地数据版权归IP138.COM所有)</center>")

function ExHTML()
	mySTL.cut "<br>","<br/>"

	mySTL.exch "++ ip138.com查询结果 ++","<font color=white>hi5460.com手机归属地 查询结果</font>"
	mySTL.exch "更详细的..",""
	mySTL.exch "您查询的",""
	mySTL.exch "width=*","width=150"
	mySTL.exch "width=349","width=280"
	mySTL.exch ": collapse",":collapse; font-family:宋体; font-size:12px;"	

	ExHTML=mySTL.value
end function
%>

<SCRIPT LANGUAGE="JavaScript">
<!--
window.onload=function(){self.resizeTo(400,350);}
//-->
</script>