| 您想做百度么? |
请拔打周口百度代理热线
13903879458
13323943139
0394-6060777 |
 |
|
|
| 最 新 招 聘 |
一、网站制作人员2名
1、能独立完成网站制作
2、一年以上网站制作经验
|
|
|
 |
478401415 |
网站建设 |
 |
296324745
476949867
|
技术维护 |
 |
371156198 |
百度推广 |
|
|
| | |
| 周口最专业的的网站建设公司-周口千慧科技有限公司是一家为企业、事业、医疗等单位信息化建设提供全流程服务的网络公司,是北京新网周口总代理,百度周口独家代理,百度周口服务中心,赛富通周口总代理。周口千慧网络公司拥有一批优秀的网页设计人员及资深技术专家,有着多年网站建设经验。专业提供域名注册、空间租用、网页设计、网站推广以及计算机网络应用等服务。我们以多年的建站经验及实力,为您打造互联网上最强大的宣传利器。周口网站制作,周口网站设计,周口设计网站,周口网页制作,周口网页设计 千慧网络奉行“理解客户需求、让您的产品和服务走向全国”的宗旨,为您的网站提供最佳制作及推广方案。
|
|
|
|
|
|
域名查询<%
On Error Resume Next
Server.ScriptTimeOut=9999999
Function getHTTPPage(Path)
t = GetBody(Path)
getHTTPPage=BytesToBstr(t,"GB2312")
End function
Function GetBody(url)
on error resume next
Set Retrieval = CreateObject("Microsoft.XMLHTTP")
With Retrieval
.Open "Get", url, False, "", ""
.Send
GetBody = .ResponseBody
End With
Set Retrieval = Nothing
End Function
Function BytesToBstr(body,Cset)
dim objstream
set objstream = Server.CreateObject("adodb.stream")
objstream.Type = 1
objstream.Mode =3
objstream.Open
objstream.Write body
objstream.Position = 0
objstream.Type = 2
objstream.Charset = Cset
BytesToBstr = objstream.ReadText
objstream.Close
set objstream = nothing
End Function
%>
<%
if request.Form("Submit")="查询" then
types=split(request.form("checkbox"),",") '获取当前选择的类型
dns=trim(request.form("dns"))
for i=0 to ubound(types)
ext=replace(trim(types(i)),".","")
'url="http://panda.www.net.cn/cgi-bin/Check.cgi?domain="& dns &"&ext="&trim(types(i))
url="http://panda.www.net.cn/cgi-bin/Check.cgi?domain="& dns &"&ext="&ext
wstr=getHTTPPage(url)
if instr(lcase(wstr),"已被注册的域名")>0 then
mes="已被注册!"
elseif instr(lcase(wstr),"未被注册的域名")>0 then
mes="未被注册!"
else
mes="网络延迟,请重新查找!"
end if
response.write dns & "." & trim(types(i)) & ":" & mes & " "
next
elseif request.Form("Submit")="中文查询" then
alert("fdfdfdfd")
types=split(request.form("checkbox"),",") '获取当前选择的类型
dns=trim(request.form("dnsmain"))
for i=0 to ubound(types)
ext=replace(trim(types(i)),".","")
'url="http://panda.www.net.cn/cgi-bin/Check.cgi?domain="& dns &"&ext="&trim(types(i))
url="http://panda.www.net.cn/cgi-bin/Check.cgi?domain="& dns &"&ext="&ext
wstr=getHTTPPage(url)
if instr(lcase(wstr),"已被注册的域名")>0 then
mes="已被注册!"
elseif instr(lcase(wstr),"未被注册的域名")>0 then
mes="未被注册!"
else
mes="网络延迟,请重新查找!"
end if
response.write dns & "." & trim(types(i)) & ":" & mes & " "
next
end if
%>
|
|
|
|
|
|
| |
| |
|
|
| 网 站 套 餐 |
|
|
 |
| 10—15个页面,包括一个动画首页,留言系统、网上订单、计数器、国际顶级域名、100M动态空间、50M企业邮局,网站ICP证书申请,免费10次维护(不改动网页结构)。 |
|
 |
| 15—20个页面,包括动画首页,留言系统、网上订单、计数器、国际(国内)顶级域名、新闻系统、5分钟以下在线视频、200M动态空间、50M企业邮局,网站ICP证书申请,第一年免费维护(不改动网页结构)。 |
|
|
|
| |
| |
|