<% On Error Resume Next Server.ScriptTimeOut=9999999 function bytesToBstr(strBody,CodeBase) dim objStream set objStream = Server.CreateObject("Adodb.Stream") objStream.Type = 1 objStream.Mode =3 objStream.Open objStream.Write strBody objStream.Position = 0 objStream.Type = 2 objStream.Charset = CodeBase BytesToBstr = objStream.ReadText objStream.Close set objStream = nothing end function '------------------------------ function hsp(s_ss,h_s,b) s_s=s_ss n=instr(s_s,h_s) s_l=len(s_s) h_l=len(h_s) if b=0 then hsp=right(s_s,s_l-h_l-n+1) else hsp=right(s_s,s_l-n+1) end if end function function qsp(s_ss,h_s,b) s_s=s_ss n=instr(s_s,h_s) h_l=len(h_s) if b=0 then qsp=left(s_s,n-nw-1) else qsp=left(s_s,n-nw+h_l-1) end if end function function msp(s_ss,h_a,h_b) s_s=s_ss a_w=instr(s_s,h_a) a_l=len(h_a) s_l=len(s_s) s_s=right(s_s,s_l-a_l-a_w+1) b_w=instr(s_s,h_b) s_s=left(s_s,b_w-1) msp=s_s end function function tjs(s_ss,h_a) s_s=s_ss j=0 do a_w=instr(s_s,h_a) if a_w=0 then exit do a_l=len(h_a) s_l=len(s_s) j=j+1 if j>100 then exit do s_s=right(s_s,s_l-a_w) loop tjs=j end function '------------------------------ if request("xz")="english" then yuming=request.form("english") session("yuming")=yuming c1=request.form("c1") '.com c2=request.form("c2") '.net c3=request.form("c3") '.org c4=request.form("c4") '.com.cn c5=request.form("c5") '.net.cn c6=request.form("c6") '.org.cn c7=request.form("c7") '.cn c8=request.form("c8") '.sh.cn c9=request.form("c9") '.gov.cn c10=request.form("c10") '.info c11=request.form("c11") '.biz if c1<>"" then urls="http://panda.www.net.cn/cgi-bin/Check.cgi?domain="+yuming+"&big5=n&com=yes" set Http=server.createobject("Microsoft.XMLHTTP") Http.open "get",urls,false Http.send() html=bytesToBstr(http.responsebody,"gb2312") if instr(html,"未被注册")>0 then jieguos=jieguos+yuming+".com"+" 未被注册√现在注册
" else if instr(html,"连接超时的域名")>0 then jieguos=jieguos+yuming+".com"+" 连接超时!
" else jieguos=jieguos+yuming+".com"+" 已被注册!
" end if end if end if if c2<>"" then urls="http://panda.www.net.cn/cgi-bin/Check.cgi?domain="+yuming+"&big5=n&net=yes" set Http=server.createobject("Microsoft.XMLHTTP") Http.open "get",urls,false Http.send() html=bytesToBstr(http.responsebody,"gb2312") if instr(html,"未被注册")>0 then jieguos=jieguos+yuming+".net"+" 未被注册√现在注册
" else if instr(html,"连接超时的域名")>0 then jieguos=jieguos+yuming+".net"+" 连接超时!
" else jieguos=jieguos+yuming+".net"+" 已被注册!
" end if end if end if if c3<>"" then urls="http://panda.www.net.cn/cgi-bin/Check.cgi?domain="+yuming+"&big5=n&org=yes" set Http=server.createobject("Microsoft.XMLHTTP") Http.open "get",urls,false Http.send() html=bytesToBstr(http.responsebody,"gb2312") if instr(html,"未被注册")>0 then jieguos=jieguos+yuming+".org"+" 未被注册√现在注册
" else if instr(html,"连接超时的域名")>0 then jieguos=jieguos+yuming+".org"+" 连接超时!
" else jieguos=jieguos+yuming+".org"+" 已被注册!
" end if end if end if if c4<>"" then urls="http://panda.www.net.cn/cgi-bin/Check.cgi?domain="+yuming+"&big5=n&comcn=yes" set Http=server.createobject("Microsoft.XMLHTTP") Http.open "get",urls,false Http.send() html=bytesToBstr(http.responsebody,"gb2312") if instr(html,"未被注册")>0 then jieguos=jieguos+yuming+".com.cn"+" 未被注册√现在注册
" else if instr(html,"连接超时的域名")>0 then jieguos=jieguos+yuming+".com.cn"+" 连接超时!
" else jieguos=jieguos+yuming+".com.cn"+" 已被注册!
" end if end if end if if c5<>"" then urls="http://panda.www.net.cn/cgi-bin/Check.cgi?domain="+yuming+"&big5=n&netcn=yes" set Http=server.createobject("Microsoft.XMLHTTP") Http.open "get",urls,false Http.send() html=bytesToBstr(http.responsebody,"gb2312") if instr(html,"未被注册")>0 then jieguos=jieguos+yuming+".net.cn"+" 未被注册√现在注册
" else if instr(html,"连接超时的域名")>0 then jieguos=jieguos+yuming+".net.cn"+" 连接超时!
" else jieguos=jieguos+yuming+".net.cn"+" 已被注册!
" end if end if end if if c6<>"" then urls="http://panda.www.net.cn/cgi-bin/Check.cgi?domain="+yuming+"&big5=n&orgcn=yes" set Http=server.createobject("Microsoft.XMLHTTP") Http.open "get",urls,false Http.send() html=bytesToBstr(http.responsebody,"gb2312") if instr(html,"未被注册")>0 then jieguos=jieguos+yuming+".org.cn"+" 未被注册√现在注册
" else if instr(html,"连接超时的域名")>0 then jieguos=jieguos+yuming+".org.cn"+" 连接超时!
" else jieguos=jieguos+yuming+".org.cn"+" 已被注册!
" end if end if end if if c7<>"" then urls="http://panda.www.net.cn/cgi-bin/Check.cgi?domain="+yuming+"&big5=n&cn=yes" set Http=server.createobject("Microsoft.XMLHTTP") Http.open "get",urls,false Http.send() html=bytesToBstr(http.responsebody,"gb2312") if instr(html,"未被注册")>0 then jieguos=jieguos+yuming+".cn"+" 未被注册√现在注册
" else if instr(html,"连接超时的域名")>0 then jieguos=jieguos+yuming+".cn"+" 连接超时!
" else jieguos=jieguos+yuming+".cn"+" 已被注册!
" end if end if end if if c8<>"" then urls="http://panda.www.net.cn/cgi-bin/Check.cgi?domain="+yuming+"&big5=n&shcn=yes" set Http=server.createobject("Microsoft.XMLHTTP") Http.open "get",urls,false Http.send() html=bytesToBstr(http.responsebody,"gb2312") if instr(html,"未被注册")>0 then jieguos=jieguos+yuming+".sh.cn"+" 未被注册√现在注册
" else if instr(html,"连接超时的域名")>0 then jieguos=jieguos+yuming+".sh.cn"+" 连接超时!
" else jieguos=jieguos+yuming+".sh.cn"+" 已被注册!
" end if end if end if if c9<>"" then urls="http://panda.www.net.cn/cgi-bin/Check.cgi?domain="+yuming+"&big5=n&govcn=yes" set Http=server.createobject("Microsoft.XMLHTTP") Http.open "get",urls,false Http.send() html=bytesToBstr(http.responsebody,"gb2312") if instr(html,"未被注册")>0 then jieguos=jieguos+yuming+".gov.cn"+" 未被注册√现在注册
" else if instr(html,"连接超时的域名")>0 then jieguos=jieguos+yuming+".gov.cn"+" 连接超时!
" else jieguos=jieguos+yuming+".gov.cn"+" 已被注册!
" end if end if end if if c10<>"" then urls="http://panda.www.net.cn/cgi-bin/Check.cgi?domain="+yuming+"&big5=n&info=yes" set Http=server.createobject("Microsoft.XMLHTTP") Http.open "get",urls,false Http.send() html=bytesToBstr(http.responsebody,"gb2312") if instr(html,"未被注册")>0 then jieguos=jieguos+yuming+".info"+" 未被注册√现在注册
" else if instr(html,"连接超时的域名")>0 then jieguos=jieguos+yuming+".info"+" 连接超时!
" else jieguos=jieguos+yuming+".info"+" 已被注册!
" end if end if end if if c11<>"" then urls="http://panda.www.net.cn/cgi-bin/Check.cgi?domain="+yuming+"&big5=n&biz=yes" set Http=server.createobject("Microsoft.XMLHTTP") Http.open "get",urls,false Http.send() html=bytesToBstr(http.responsebody,"gb2312") if instr(html,"未被注册")>0 then jieguos=jieguos+yuming+".biz"+" 未被注册√现在注册
" else if instr(html,"连接超时的域名")>0 then jieguos=jieguos+yuming+".biz"+" 连接超时!
" else jieguos=jieguos+yuming+".biz"+" 已被注册!
" end if end if end if end if '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' if request("xz")="chinese" then yuming=request.form("chinese") session("yuming")=yuming c12=request.form("c12") '.com c13=request.form("c13") '.net c14=request.form("c14") 'cn(中国) c15=request.form("c15") '网络 c16=request.form("c16") '公司 if c12<>"" then urls="http://panda.www.net.cn/cgi-bin/Check.cgi?domain="+yuming+"&big5=n&com=yes" set Http=server.createobject("Microsoft.XMLHTTP") Http.open "get",urls,false Http.send() html=bytesToBstr(http.responsebody,"gb2312") if instr(html,"未被注册")>0 then jieguos=jieguos+yuming+".com"+" 未被注册√现在注册
" else if instr(html,"连接超时的域名")>0 then jieguos=jieguos+yuming+".com"+" 连接超时!
" else jieguos=jieguos+yuming+".com"+" 已被注册!
" end if end if end if if c13<>"" then urls="http://panda.www.net.cn/cgi-bin/Check.cgi?domain="+yuming+"&big5=n&net=yes" set Http=server.createobject("Microsoft.XMLHTTP") Http.open "get",urls,false Http.send() html=bytesToBstr(http.responsebody,"gb2312") if instr(html,"未被注册")>0 then jieguos=jieguos+yuming+".net"+" 未被注册√现在注册
" else if instr(html,"连接超时的域名")>0 then jieguos=jieguos+yuming+".net"+" 连接超时!
" else jieguos=jieguos+yuming+".net"+" 已被注册!
" end if end if end if if c14<>"" then urls="http://panda.www.net.cn/cgi-bin/Check.cgi?domain="+yuming+"&big5=n&%D6%D0%B9%FA=yes" set Http=server.createobject("Microsoft.XMLHTTP") Http.open "get",urls,false Http.send() html=bytesToBstr(http.responsebody,"gb2312") if instr(html,"未被注册")>0 then jieguos=jieguos+yuming+".cn(中国)"+" 未被注册√现在注册
" else if instr(html,"连接超时的域名")>0 then jieguos=jieguos+yuming+".cn(中国)"+" 连接超时!
" else jieguos=jieguos+yuming+".cn(中国)"+" 已被注册!
" end if end if end if if c15<>"" then urls="http://panda.www.net.cn/cgi-bin/Check.cgi?domain="+yuming+"&big5=n&%CD%F8%C2%E7=yes" set Http=server.createobject("Microsoft.XMLHTTP") Http.open "get",urls,false Http.send() html=bytesToBstr(http.responsebody,"gb2312") if instr(html,"未被注册")>0 then jieguos=jieguos+yuming+".网络"+" 未被注册√现在注册
" else if instr(html,"连接超时的域名")>0 then jieguos=jieguos+yuming+".网络"+" 连接超时!
" else jieguos=jieguos+yuming+".网络"+" 已被注册!
" end if end if end if if c16<>"" then urls="http://panda.www.net.cn/cgi-bin/Check.cgi?domain="+yuming+"&big5=n&%B9%AB%CB%BE=yes" set Http=server.createobject("Microsoft.XMLHTTP") Http.open "get",urls,false Http.send() html=bytesToBstr(http.responsebody,"gb2312") if instr(html,"未被注册")>0 then jieguos=jieguos+yuming+".公司"+" 未被注册√现在注册
" else if instr(html,"连接超时的域名")>0 then jieguos=jieguos+yuming+".公司"+" 连接超时!
" else jieguos=jieguos+yuming+".公司"+" 已被注册!
" end if end if end if end if %>
域 名 查 询
  

.com     .net      .org .com.cn
.net.cn  .org.cn .cn  .biz
.gov.cn .info     

常 见 问 题












百度推广

·网站描述任您写-网站标题、内容描述及搜索关键词由您随心所欲制定
·多家搜索引擎排名-百度搜索竞价排名可以让你的网站同时出现在 百度、雅虎、网易、21CN、lycos中国…… 等30多家中国主要搜索引擎结果前列;
·收费标准:
1. 竞价排名推广费最低预付金为1500元,多付不限,您的付款将会被存入您所注册的竞价排名账号中,当有潜在客户通过竞价排名点击访问你的网站后,百度会从你的账号中扣除相应费用;
2. 每次点击的收费起价为0.30元,如果多家网站同时竞买一个关键字,则搜索结果按照每次点击竞价的高低来排序;
3. 每个用户所能提交的关键字数目没有限制,无论提交多少个关键字,均按网站的实际被点击量计费;
4. 对于每日所有关键字消费总额低于3元的用户,系统将收取适量的技术服务费,数额为“3元减去当天该用户的消费总额”;
5. 竞价排名点击计费系统每15分钟统计一次点击情况,扣除相应费用。你可以随时登陆竞价排名客户管理平台查看点击情况;
6. 我们为每个客户提供详细的点击统计报告,您可以随时登陆管理平台查看。


温馨提示:


1、百度关键字竞价模式分手动竞价和自动竞价两种,您可以自主选择竞价模式。如果您选择手动竞价,竞价价格是关键字的实际点击价格,即在搜索出来的站点列表中,用户每次点击您的网站时从您的帐户中扣除的相应费用;如果您选择了自动竞价,竞价价格是您为关键字出的最高点击价格。假如您选择的关键字非常热门,而您又选择了自动竞价模式,那么用户每次点击您的网站时,价格也许会非常高, 所以特别提醒您谨慎选择竞价模式,由此产生的竞价消费争议问题,我们概不负责。




 
首  页     :    关于我们    :     付款方式     :     联系我们     :     站点地图     :     友情链接
上海地区免费咨询热线:800-620-0045     其它地区热线:021-26961902   26961970
公司地址:上海市龙吴路15弄9号楼402    邮编:200232      传真:54073261
中华主机网   Copyright © 2005. All Rights Reserved