标题: 脚本中打开网页并返回是否打开的信息到txt文件 [打印本页]
作者: niuji 时间: 2006-8-16 16:04 标题: 脚本中打开网页并返回是否打开的信息到txt文件
在脚本中写
start http://www.163.com
请问执行打开网页后怎样把一个执行成功与否的信息返回到e:/niuji/1.txt
不能打开网页：
1.txt的内容为：FAILED
能打开网页：
1.txt的内容为：SUCCESS
该怎么做呢？
苦恼～
谢谢
作者: namejm 时间: 2006-8-16 16:52
用判断对应的cookies文件修改时间这个方法可能行得通。
作者: electronixtar 时间: 2006-8-16 17:06
是否打开 究竟具体指什么呢？能访问这个地址？地址有效？网络通常，还是其他的？影响网页验证的原因很多，还有很多是和IE有关的。
如果楼主的问题是是否IE打开了这个页面，在 Temporary Internet Files下面去找相关临时文件是个好注意！
[ Last edited by electronixtar on 2006-8-16 at 17:11 ]
作者: namejm 时间: 2006-8-16 18:58
如果把能否打开网页理解为是否能把网络上的网页在本地打开，那么，以下代码可能会比较有用(测试某些网站时判断失误，比如http://www.eyou.com/)。
@echo off
:: 当cookie文件创建之后的下一秒是下一分钟的话
:: 这段代码会出错，不过如此低的几率还是可以忍受:)
if not exist e:\niuji md e:\niuji>nul 2>nul
if exist E:\niuji\1.txt del /q E:\niuji\1.txt
setlocal enabledelayedexpansion
set input=
set input=http://www.163.com
start %input%
for /f "delims=. tokens=1*" %%i in ("%input%") do set site=%%j
for /f "delims=. tokens=1*" %%i in ("%site%") do set net=%%i
set root="%userprofile%\cookies"
pushd %root%
set num=0
:loop
set /a num+=1
ping 127.1 -n 3 >nul 2>nul
if %num% gtr 4 echo FAILED>e:\niuji\1.txt && goto end
if not exist %username%@*%net%*.txt goto loop
for %%i in (%username%@*%net%*.txt) do (
find /i "%site%" %%i>nul 2>nul && (
if %time:~0,2% lss 10 (
if "%date% 0%time:~1,4%"=="%%~ti" (echo SUCCESS>e:\niuji\1.txt) else (echo FAILED>e:\niuji\1.txt)
goto end
)
if %time:~0,2% geq 10 (
if "%date% %time:~0,5%"=="%%~ti" (echo SUCCESS>e:\niuji\1.txt) else (echo FAILED>e:\niuji\1.txt)
goto end
)
)
)
:end
popd
start e:\niuji\1.txt
[ Last edited by namejm on 2006-8-17 at 02:46 ]:: 当cookie文件创建之后的下一秒是下一分钟的话
:: 这段代码会出错，不过如此低的几率还是可以忍受:)
if not exist e:\niuji md e:\niuji>nul 2>nul
if exist E:\niuji\1.txt del /q E:\niuji\1.txt
setlocal enabledelayedexpansion
set input=
set input=http://www.163.com
start %input%
for /f "delims=. tokens=1*" %%i in ("%input%") do set site=%%j
for /f "delims=. tokens=1*" %%i in ("%site%") do set net=%%i
set root="%userprofile%\cookies"
pushd %root%
set num=0
:loop
set /a num+=1
ping 127.1 -n 3 >nul 2>nul
if %num% gtr 4 echo FAILED>e:\niuji\1.txt && goto end
if not exist %username%@*%net%*.txt goto loop
for %%i in (%username%@*%net%*.txt) do (
find /i "%site%" %%i>nul 2>nul && (
if %time:~0,2% lss 10 (
if "%date% 0%time:~1,4%"=="%%~ti" (echo SUCCESS>e:\niuji\1.txt) else (echo FAILED>e:\niuji\1.txt)
goto end
)
if %time:~0,2% geq 10 (
if "%date% %time:~0,5%"=="%%~ti" (echo SUCCESS>e:\niuji\1.txt) else (echo FAILED>e:\niuji\1.txt)
goto end
)
)
)
:end
popd
start e:\niuji\1.txt
作者: niuji 时间: 2006-8-17 09:02
对的，我的意思就是本地打开！
不好意思，我一开始没表达清楚，给大家添麻烦了
作者: bagpipe 时间: 2006-8-17 09:23
on error resume next
bag="http://www.163.com"
Set pipe=CreateObject("MSXML2.XMLHTTP")
pipe.open "GET",bag,false
pipe.send
wscript.echo pipe.statusText&vbcr&pipe.status
为什么不用脚本来解决这个问题呢？我觉得脚本在这个方面要比批处理效率高，而且准确性要强，我只给了一段代码，应该够用了，其他的自行修改
作者: namejm 时间: 2006-8-17 11:02
我只会用bat，不会用vbs，呵呵。