中国DOS联盟

http://www.netyi.net/ is a large and good e-book download website with a lot of materials uploaded by netizens. But generally, downloading things requires points (I spent more than ten yuan when I just registered). You can earn points by sending text messages and logging in (1 point per day), so I need to log in to http://www.netyi.net/jsLoginStatus.aspx once every day.

After packet capturing, it is post login. After thinking about it for a few days, I still can't log in. I don't know where the mistake is.

echo off
curl -c Cookie_netyi.txt "http://www.netyi.net/jsLoginStatus.aspx"
curl -H "Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-shockwave-flash, application/x-icq, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, */*" -d "Content-Type: application/x-www-form-urlencoded UserName=***&Password=***&Submit.x=0&Submit.y=0" -b Cookie_netyi.txt http://www.netyi.net/jsLoginStatus.aspx?returnUrl=%2fjsLoginStatus.aspx%3fguid%3d0638a989-eeac-400c-b265-ed1df0c7114d >>netyi.htm
pause

Last edited by kioskboy on 2008-9-7 at 03:53 PM ]

If curl can't be implemented, can a VBS script work? Double-clicking can quickly log in.

Brother gxsanhen provided an AutoIt solution in the group. I wonder if it can be implemented with VBS, calling Brother slore.

AutoIt is good, but it still needs to be compiled.
In the case of no other way, I will consider methods like sendkeys for simulated login.
Curl should work, right? Is there anyone who can tell me whether using curl can log in to this website, yes or no?

curl -c Cookie_netyi.txt -d "UserName=***&Password=***&Submit=登录" http://www.netyi.net/jsLoginStatus.aspx?returnUrl=%2fjsLoginStatus.aspx%3fguid%3dae1f8e99-d322-44b0-8288-abc376a6a154
::Use the correct account and password to log in, and save the login information in Cookie_netyi.txt

Set ie = CreateObject("Internetexplorer.Application")
ie.Navigate "http://www.netyi.net/jsLoginStatus.aspx"
ie.Visible = True
While ie.Busy or ie.ReadyState <> 4
Wend
ie.Document.form2.UserName.value = "slore"
ie.Document.form2.Password.value = "slorelee"
ie.Document.form2.submit

Why not search well? I'm too lazy to write. Such a simple code don't tell me you don't understand. I searched according to the keywords I said and clicked the second link, modified the url and form name, and it can be used. I don't know why so many people like to take things ready-made... I hope it's not just as lazy as me, but that they can write it themselves. At least know the idea to achieve it. After all, such scripts are not universal, and there are too few usable places. So please write such targeted scripts yourself. If you don't understand, learn to search...

Brother slore finally made a move, learn.

After successful login, can you automatically click "Logout" again?

I looked at the website code after logging in. "Logout" is a hyperlink:
<td><img src="images/3003.gif" width="9" height="9"><a href="/quit.aspx?returnUrl=%2fjsLoginStatus.aspx%3fguid%3d0833ef28-c56b-411f-85a4-3ffdf4a81d56">Logout</a></td>

Does this also enable logging into some email boxes that don't require captchas??

```vb
Set ie = CreateObject("InternetExplorer.Application")
ie.Navigate "http://www.netyi.net/quit.aspx?returnUrl=%2fjsLoginStatus.aspx"

ie.Visible = True 'Set whether this IE object is visible here.

While ie.Busy Or ie.ReadyState <> 4: Wend

ie.Document.form2.UserName.value = "slore"
ie.Document.form2.Password.value = "slorelee"
ie.Document.form2.Submit

While ie.Busy Or ie.ReadyState <> 4: Wend

WSH.Sleep 1000 'This sentence is to let you see the successful login. Without this, the next sentence will exit directly.
ie.Navigate "http://www.netyi.net/quit.aspx?returnUrl=%2fjsLoginStatus.aspx"

While ie.Busy Or ie.ReadyState <> 4: Wend
ie.Quit 'You can decide whether to have it or not according to the situation. You can understand what it means by yourself.
```

Got it, thanks a lot!

Thank you everyone, thank you all the experts!