存档
最近有个工作，知道了域名，把ip导出来，大约800多条记录，一个一个查麻烦了。有没有其他方法能让asp通过域名查IP呢？
在网上搜索了一下，asp通过域名查ip需要安装一个TCPIP.DNS的组件。我下载了一个测试了一下，效率并不是很高。
一般查询域名的ip的方法是ping一下，得到一个ip。我们先用VBScript测试。
Function strCut(strContent,StartStr,EndStr,CutType)
Dim strHtml,S1,S2
strHtml = strContent
On Error Resume Next
Select Case CutType
Case 1
S1 = InStr(strHtml,StartStr)
[...]
想下一个CentOS玩玩，在线太慢，想到局域网内有个公共文件共享的服务器，开了ftp。
所处于一个超级内部局域网。我的机器ip为10.1.0.175，公共数据存储在10.0.0.254。用FlashFxp拉下来，速度很快，竟然能达到8MB。但是到数据2G的时候，就停止了。难道FlashFxp传输超过2g文件不可以吗？
在网上找到很久，也没有找到解决办法，忽然想到了Windows自带了一个ftp。连上去，一会就下载完了。还是Windows自带的好哦。
以前写过一篇PushWeb 采集站点信息发布的最佳方案(http://www.miaoqiyuan.cn/p/pushweb)，用了很久，现在数据量大了，导入速度很慢(主要原因是导入一条记录，自动修复一次数据)，在此，我修改了一下代码，暂且算是升级到1.01吧：
‘pushWeb 1.01
‘刷新时间
const pushWeb_flush_Time=600000
‘数据库路径
const pushWeb_dbPath="D:\WebDesign\Products\pushWeb\DB\PushWebDB.mdb"
function pushWeb()
on error resume next
dim conn,rs,push_id,push_webid,push_sql
dim web_db,web_name
dim push_Arr,push_str
set conn=createobject("ADODB.connection")
conn.open "provider=microsoft.jet.oledb.4.0;data source="&pushWeb_dbPath
set rs=conn.execute("select push_webid from push")
if rs.eof then
push_id=0
wscript.echo "没有更新，"&pushWeb_flush_Time/1000&"秒后再检查…"
else
push_webid=rs(0)
end if
rs.close
set rs=nothing
if push_webid<>0 then
‘载入站点信息
set rs=conn.execute("select web_name,web_db from web where web_id="&push_webid)
if not rs.eof then
web_name=rs(0)
web_db=rs(1)
else
wscript.echo "错误的任务请求，"&pushWeb_flush_Time/1000&"秒后再检查…"
exit function
end if
rs.close
set rs=nothing
‘如果是合法的站点
if web_db<>"" and web_name<>"" then
wscript.echo "找到一个任务[站点名="&web_name&"]，导入中…"
‘创建新的连接对象
set newConn=CreateObject("ADODB.Connection")
newConn.open web_db
set rs=conn.execute("select push_sql from push where push_webid="&push_webid)
do while not rs.eof
push_sql=rs(0)
push_Arr=split(push_sql,vbCrlf)
for [...]
淘宝特种经营许可证如何取消，就这个问题我提交了淘宝网的客服。
淘宝客服的回复是：关于您反馈的问题，您可以登陆我的淘宝-我的交易-特种经营许可证-成人用品特种经营-点击“资质注销”，进行相关操作就可以了。感谢您对淘宝网支持，祝您生活愉快！
可是呢，按她的提示，根本找不到这种解决方法，怎么办呢？
今天猫七带您解决这个问题。因为淘宝经常改版的缘故，但是客服的回答还是n年前的标准答案，所以按客服的方法并不好找。而新版的卖家中心中又没有添加这个链接。我们直接打开http://service.taobao.com/support/qualify/index.htm，点资质注销就可以了~