介绍
使用WatiN模拟网页操作,可以实现网站的自动登录发帖等等....自个儿联想吧!
背景知识
Watin是一个面向.net的Web自动化测试开源项目。想要了解更多的知道参考官方网站 http://watin.org/
代码
1
//
自动登录QQ微博发贴
2 WatiN.Core.IE ie = new WatiN.Core.IE( " http://www.qq.com " );
3 ie.ShowWindow(WatiN.Core.Native.Windows.NativeMethods.WindowShowStyle.Maximize);
4 // 单击登录div
5 ie.Div(WatiN.Core.Find.ById( " mblog_login_button " )).Click();
6 ie.WaitForComplete( 3 );
7 var name = Find.ByName( " u " );
8 if (name != null )
9 textBox1.Text = name.ToString();
10 // 向网页texbox输入文字 (注意电脑上不要运行qq,否则还要处理快速登录链接)
11 ie.TextField(WatiN.Core.Find.ByName( " u " )).TypeText( " 402059985 " );
12 ie.TextField(WatiN.Core.Find.ByName( " p " )).TypeText( " 123456789 " );
13 // 单击登录button
14 ie.Button(WatiN.Core.Find.ById( " login_button " )).Click();
15 // 单击链接
16 ie.Link(WatiN.Core.Find.ByLabelText( " 剑指偏锋(@a402059985) " )).Click();
17
18 // 在下一页去处理发帖
19 ie.TextField(Find.ByName( " content " )).TypeText( " 大家好,自动工具发的,不是我发的谢谢! " );
20 ie.Button(Find.ByValue( " 发送 " )).Click();
21
22 /*
23 * 自动登录163
24 using (IE ie = new IE(" http://163.com "))
25 {
26 ie.ShowWindow(WatiN.Core.Native.Windows.NativeMethods.WindowShowStyle.Maximize);
27 ie.TextField(Find.ById("login_username")).TypeText("username");
28 ie.TextField(Find.ById("login_password")).TypeText("password");
29 ie.Element(Find.ByValue("登录")).Click();
30 }
31 */
2 WatiN.Core.IE ie = new WatiN.Core.IE( " http://www.qq.com " );
3 ie.ShowWindow(WatiN.Core.Native.Windows.NativeMethods.WindowShowStyle.Maximize);
4 // 单击登录div
5 ie.Div(WatiN.Core.Find.ById( " mblog_login_button " )).Click();
6 ie.WaitForComplete( 3 );
7 var name = Find.ByName( " u " );
8 if (name != null )
9 textBox1.Text = name.ToString();
10 // 向网页texbox输入文字 (注意电脑上不要运行qq,否则还要处理快速登录链接)
11 ie.TextField(WatiN.Core.Find.ByName( " u " )).TypeText( " 402059985 " );
12 ie.TextField(WatiN.Core.Find.ByName( " p " )).TypeText( " 123456789 " );
13 // 单击登录button
14 ie.Button(WatiN.Core.Find.ById( " login_button " )).Click();
15 // 单击链接
16 ie.Link(WatiN.Core.Find.ByLabelText( " 剑指偏锋(@a402059985) " )).Click();
17
18 // 在下一页去处理发帖
19 ie.TextField(Find.ByName( " content " )).TypeText( " 大家好,自动工具发的,不是我发的谢谢! " );
20 ie.Button(Find.ByValue( " 发送 " )).Click();
21
22 /*
23 * 自动登录163
24 using (IE ie = new IE(" http://163.com "))
25 {
26 ie.ShowWindow(WatiN.Core.Native.Windows.NativeMethods.WindowShowStyle.Maximize);
27 ie.TextField(Find.ById("login_username")).TypeText("username");
28 ie.TextField(Find.ById("login_password")).TypeText("password");
29 ie.Element(Find.ByValue("登录")).Click();
30 }
31 */