关于GUI登陆新浪微薄，但是新浪微薄站的网页中没有表单，无法得到相应控件。(已解决)

thesnow

我知道C++能写一个音乐播放器,但是我翻遍ANSI C++的文档也没见介绍啊?

yiruirui

回复 16# thesnow

你说的方法是获取网页源码吗？然后用正则表达式？
http://www.autoitx.com/forum.php ... 85&highlight=IE  这个帖子吧？

thesnow

1.成功后应该出现个文本啥的.(已成功登录,退出什么的)(检测这个对象存不存在)
2.成功后应该有不同的文本,检测这个文本存不存在.

yiruirui

回复 18# thesnow

难到方法就是读取网页原代码吗?从点击登陆之后的原代码中获取信息?
我刚测试了一下,http://pass.kingsoft.com/ksgweb/jsp/login/Register.jsp
在登陆前后的原代码就没有变的.你不想告诉我太多没关系,我只想知道服务器返回的那些信息(比如密码错误等)都放在什么地方?如果可以从网页中得到,请告诉哪个网页就OK.

thesnow

举个例子:
http://my.qq.com/
1.成功后应该出现个文本啥的.(已成功登录,退出什么的)(检测这个对象存不存在)
打开有个用户登录的按钮.
2.成功后应该有不同的文本,检测这个文本存不存在.
登录后有个"欢迎您XXX"的文本和一个退出按钮.

思路比实现重要.我给你写出代码,你没明白,等于没写.

guland

回复 1# yiruirui

拿去自己改吧,没有技术含量

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("登录新浪微博", 617, 516, 192, 124)
$Obj = _IECreateEmbedded()
$Obj_ctrl = GUICtrlCreateObj($Obj, 0, 0, 614, 476)
$Label1 = GUICtrlCreateLabel("用户名:", 6, 488, 43, 17)
$Input1 = GUICtrlCreateInput("", 50, 486, 121, 21)
$Label2 = GUICtrlCreateLabel("密码:", 178, 488, 31, 17)
$Input2 = GUICtrlCreateInput("", 210, 486, 121, 21)
$Button1 = GUICtrlCreateButton("登录", 346, 484, 75, 25)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

While 1
        $nMsg = GUIGetMsg()
        Switch $nMsg
                Case $GUI_EVENT_CLOSE
                        Exit
                Case $Button1
                        _login(GUICtrlRead($Input1),GUICtrlRead($Input2))
        EndSwitch
WEnd

Func _login($name,$pass)
$oHTTP = ObjCreate("microsoft.xmlhttp")
$oHTTP.Open("post","http://login.sina.com.cn/sso/login.php?client=ssologin.js(v1.3.9)",false)
$oHTTP.setRequestHeader("Cache-Control", "no-cache")
$oHTTP.setRequestHeader("Content-Type","application/x-www-form-urlencoded")  
$oHTTP.setRequestHeader("Content-Length","298")
$oHTTP.Send("service=miniblog&client=ssologin.js(v1.3.9)&entry=miniblog&encoding=utf-8&gateway=1&savestate=0&from=&useticket=0&username="&$name&"&password="&$pass&"&url=http:\\t.sina.com.cn\ajaxlogin.php?framelogin=1&callback=parent.sinaSSOController.feedBackUrlCallBack&returntype=META")
$a = $oHTTP.responseText 
if StringInStr($a,"sina sso crossdomain") then 
_IENavigate($Obj, "http://t.sina.com.cn")
Else
        MsgBox(0,"","用户名或密码错误!")
EndIf
EndFunc

yiruirui

回复 21# guland


    多谢斑竹！