最奇怪的问题
用火车头或者SS自带采集来踩http://ph83.com/news/Article.aspx?AID=434得到的都是空白,在火车头里测试采集页面也是空白,获得源码也是空白!用浏览器可以访问!
头一回遇到,请教高手! 试了一下,果然如LZ所说,是ASPX的页面,这种页面遇到的情况还真多,上次和FAL说的另一个也是ASPX的页上面全是乱码,有意思的很,是ASP。NET所致吧???
<script language="vbscript">
Function Inputtxt(Text1, Txt, INP, CN)
Ok = 0
dim i
For i = 1 To Len(Text1)
BTxt = Mid(Text1, i, 1)
If INP = "排除" Then
If InStr(1, Txt, BTxt, 1) > 0 Then '排除
Ok = -1
Exit For
End If
Else
If InStr(1, Txt, BTxt, 1) < 1 and AscW(BTxt) < 255 and AscW(BTxt) > 0 Then '输入
Ok = -1
Exit For
End If
End If
If AscW(BTxt) > 255 or AscW(BTxt) < 0 Then
Ok = Ok + 2
Else
Ok = Ok + 1
End If
If (AscW(BTxt) > 255 or AscW(BTxt) < 0) And CN = "CN" Then
Ok = -1
Exit For
end if
Next
If Ok = -1 Then
Inputtxt = -1
Else
Inputtxt = Ok
End If
End Function
Function test1()
txt=Inputtxt(trim(document.fs.Fname.value), ">""<'" & Chr(13) & Chr(10), "排除", "")
if txt<0 or txt>20 then
'if txt=0 then msgbox "名称不能为空!"
if txt>20 then msgbox "标题不能多于20个字符!"
if txt=-1 then msgbox "标题称输入了非法字符!"
test1=false
document.fs.Fname.focus
exit function
end if
txt=Inputtxt(trim(document.fs.LX.value), ">""<'" & Chr(13) & Chr(10), "排除", "")
if txt<0 or txt>100 then
'if txt=0 then msgbox "名称不能为空!"
if txt>100 then msgbox "联系不能多于100个字符!"
if txt=-1 then msgbox "联系称输入了非法字符!"
test1=false
document.fs.LX.focus
exit function
end if
txt=Inputtxt(trim(document.fs.Msgs.value), "", "排除", "")
if txt<1 or txt>1000 then
if txt=0 then msgbox "内容不能为空!"
if txt>1000 then msgbox "内容不能多于1000个字符!"
if txt=-1 then msgbox "内容输入了非法字符!"
test1=false
document.fs.Msgs.focus
exit Function
end if
end function
</script>
<script language=vbscript src=ClickIN.aspx?Aid=434></script>
<script language=vbscript src=../js/bottom.vbs></script>
<script src="http://count.ph83.com/Counter/Counter.asp?Site_ID=13"></script>
是这段代码所致??唉,还没学完ASP,看来ASP.net是咄咄逼人啊!!! 有什么解决办法? 估计服务器端增加了浏览器识别系统,非IE浏览器将无法读取数据。我用迅雷或快车均没有解决这个问题。
页:
[1]