中国DOS联盟

生成论坛登录文件,运行此文件则登录.

@echo off

::::::::CN-DOS BBS Login {s11ss 2007-10-13}::::::::

setlocal enabledelayedexpansion

if "%1" equ "" (

	echo 参数一：用户名，如user

	echo 参数二：密码，如123456

	echo 参数三：是否将当前文件夹下生成的文件cn-dos.hta移到收藏夹/m（移）或/f（不移）

	echo 例如：%0 user 123456 /m

	pause>nul

	goto :eof

)

set u=%1

set p=%2

set a=%3

< "%~f0" more +44 >cn-dos.hta

set t=^>^>t.vbs echo

call :e %u%

set user=de^(array^(!encoded!^)^)

call :e %p%

set pwd=de^(array^(!encoded!^)^)

del t.t

set t=^>^>cn-dos.hta echo

%t% location="http://www.cn-dos.net/forum/logging.php?action=login"+"&"+"cookietime=0"+"&"+"username="+%user%+"&"+"password="+%pwd%+"&"+"loginsubmit=."

%t% close()

%t% ^</script^>

%t% ^<hta:application

%t% showInTaskBar=no

%t% /^>

if not "%a%" equ "/m" goto :eof

move cn-dos.hta "%userprofile%"\Favorites

goto :eof

:e

%t% for i=1 to len("%1")

%t% 	one=mid("%1",i,1)

%t% 	if i=1 then 

%t%			encoded=asc(one)+100*5+20

%t% 	else 

%t%			encoded=encoded^&chr(44)^&(asc(one)+100*5+20)

%t%		end if

%t% next

%t% CreateObject("Scripting.FileSystemObject").CreateTextFile("t.t").write(encoded)

cscript //nologo t.vbs & del t.vbs

set/p encoded=<t.t

goto :eof

<script language="javascript">

window.moveTo(screen.width,screen.height);

</script>

<script language="vbscript">

function de(x)

	decoded=x

	for i=0 to ubound(decoded)

		s=s&chr(decoded(i)-100*5-20)

	next

	de=s

end function

Last edited by s11ss on 2007-10-13 at 11:08 AM ]

学习&&加分

真是好东西。希望能详细讲解一下。也可以用于其它论坛登录啊。不错。

好东东，加分！

s11ss兄你好，小弟想下载下面的地址，然后保存到一个html文件中，由于要认证
前些时间用 CURL 工具下载不到。
如果 你有时间 可否写一个jave脚本，或者用 curl 工具得到下面地址的html文件呢？
先谢谢了！！！先加分支持。


http://bbs.chinaunix.net/viewthread.php?tid=452942

Last edited by junchen2 on 2007-10-13 at 02:31 PM ]

fengjing001, 修改此处即可:

%t% location="http://www.cn-dos.net/forum/logging.php?action=login"+"&"+"cookietime=0"+"&"+"username="+%user%+"&"+"password="+%pwd%+"&"+"loginsubmit=."

Originally posted by junchen2 at 2007-10-13 02:26 PM:
s11ss兄你好，小弟想下载下面的地址，然后保存到一个html文件中，由于要认证
前些时间用 CURL 工具下载不到。
如果 你有时间 可否写一个jave脚本，或 ...

正在研究中....

Originally posted by junchen2 at 2007-10-13 02:26 PM:
s11ss兄你好，小弟想下载下面的地址，然后保存到一个html文件中，由于要认证
前些时间用 CURL 工具下载不到。
如果 你有时间 可否写一个jave脚本，或 ...

没屏蔽右键啊，查看源文件——文件——另存为——"c:\ok.html"

是这样的，我想在命令行中调用，然后我将下载下来的html文件一些信息提取出来

我现在就是 不能得到要认证 的页面，就差这一步，花了我不少时间，由于没有学vbscript

JSscript，PHP等知识，害苦我了， 期待中！！！

Last edited by junchen2 on 2007-10-13 at 03:12 PM ]

Originally posted by junchen2 at 2007-10-13 03:01 PM:
是这样的，我想在命令行中调用，然后我将下载下来的html文件一些信息提取出来

我现在就是 不能得到要认证 的页面，就差这一步，花了我不少时间 ...

要认证 的页面?认证什么啊?
不好意思,我不是高手,也就懂一点儿,爱莫能助啊~~~~~~~~

是用户名 和 密码 ，在兄弟的上面的代码学到不少东西，支持再发作品，奉贤代码。

Originally posted by junchen2 at 2007-10-13 04:51 PM:
支持再发作品，奉贤代码。

谢谢支持啊~~~~~~~~~

对论坛都熟练到着地步了?
佩服佩服。。

Originally posted by knoppix7 at 2007-10-13 05:42 PM:
对论坛都熟练到着地步了?
佩服佩服。。

前辈又见笑了,
其实很简单的,就是把网址搞出来就行了.

谢谢slss的热心答复！