902
社区成员
8891
社区内容
- 主页
我想用TClientSocket做一个登录网站的登录工具（输入用户名，密码后登录），该如何做？
比如我想通过该软件登录www.163.com，
在edit1.text输入我在163的用户名“heihei”,
在edit2.text输入我在163的密码“123456”
点击确定按钮后我就登录www.163.com了，并根据我的要求去我想去的地方（比如进入163的邮箱），还要获得当前网页的源文件（注：决不使用WebBrowser1.Navigate方法），并始终监听网页的变化，如果网页发生跳转，程序将始终跟踪，直到我关闭为止。
事关重大，多谢各位，最好有源代码。
QQ：82276899
在edit1.text输入我在163的用户名“heihei”,
在edit2.text输入我在163的密码“123456”
点击确定按钮后我就登录www.163.com了，并根据我的要求去我想去的地方（比如进入163的邮箱），还要获得当前网页的源文件（注：决不使用WebBrowser1.Navigate方法），并始终监听网页的变化，如果网页发生跳转，程序将始终跟踪，直到我关闭为止。
事关重大，多谢各位，最好有源代码。
QQ：82276899
...全文
cbchen 2005年03月21日
bcb的安装目录下example\fastnet\http下有个例子程序,你可以参考那个
huaqglxy2004 2005年03月21日
TClientSocket控件名为:csE
在发送按钮中加入:
csE->Socket->SendText("193");
在csE的OnConnect事件中:csE->Tag = 0;
在csE的OnDisConnect事件中:csE->Close();
在csE的OnError事件中: ErrorCode = 0;
在csE的OnRead事件中: sData =Socket->ReceiveText();
对接受到的sData进行处理就可以了.我已经完成了所有代码的编写.
我做的类似你的东西.
可以和我联系:devil2008@126.com
在发送按钮中加入:
csE->Socket->SendText("193");
在csE的OnConnect事件中:csE->Tag = 0;
在csE的OnDisConnect事件中:csE->Close();
在csE的OnError事件中: ErrorCode = 0;
在csE的OnRead事件中: sData =Socket->ReceiveText();
对接受到的sData进行处理就可以了.我已经完成了所有代码的编写.
我做的类似你的东西.
可以和我联系:devil2008@126.com
netsys2 2005年03月21日
就用CB自带的Internet控件吧