批处理获取网页源码并将其赋值为批处理中的变量？

tshcc · 发表于 2014-11-29 00:56:56

RT，已知一网页不定期公布校验码，http://aaa.com/123/

该网页所有的源码只有一行，全部为所需的文本 XX123XX 文本为半角的英文、数字、字符组合。

计划用批处理完成操作：1、读取http://aaa.com/123/中的源码并在该批处理中赋值为一字符串变量；2、用该变量进行其他批处理操作。

现在写了第二步，请问大家这第一步该怎么实现呢？度娘了半天也没有头绪，烦死了。小白一只，谢谢大家啦！

tmplinshi · 发表于 2014-11-29 11:44:35

@echo off
curl "http://aaa.com/123/" | conset /p vcode=
echo "%vcode%"
pause

复制代码

curl.exe 和 conset.exe 请搜索本论坛或百度。

tshcc · 发表于 2014-11-30 12:04:50

回复 2# tmplinshi

谢谢版版，我是想通过纯脚本而不借助第三方来实现的。毕竟批处理是给小白在别的计算机上运行，难以安装curl等~

CrLf · 发表于 2014-11-30 13:54:54

举个栗子：

1>1/* :
@echo off
for /f "delims=" %%a in ('cscript -nologo -e:jscript "%~0"') do set "response=%%a"
set response
pause&exit /b
*/
with(new ActiveXObject('Msxml2.XMLHTTP')){
Open('GET','http://bbs.bathome.net/thread-33139-1-1.html',0)
setRequestHeader('CONTENT-TYPE','text/xml;charset=gb2312;')
Send()
WScript.Echo(readBy(responseBody,'gb2312'))
}
function readBy(bin,charset){
var steam = new ActiveXObject("ADODB.Stream")
steam.Type = 1
steam.Mode = 3
steam.Open()
steam.Write(bin)
steam.Position = 0
steam.Type = 2
steam.Charset = charset
return steam.ReadText
}

复制代码

zdj1974 · 发表于 2014-12-4 20:52:58

回复 4# CrLf

复制保存了，准备学习研究一下。
我想做一个脚本实现自动打开网页，输入查询字，回车，然后把查询结果弄下来，识别匹配出想要的内容存档！对我来说难度太大，下在学习。如果老师有空，不知能不能指点一下？

		自动登录	找回密码
密码			注册

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

[文本处理] 批处理获取网页源码并将其赋值为批处理中的变量？