很少在CSDN 发文章,这是第一次,嘻嘻··源码很简单,贴一部分核心源码!
Class1 cl = (Class1)e.Argument;
string url = "http://q32.3g.qq.com/g/s?sid=" + cl.QQsid + "&3G_UIN=" + cl.QQ + "&saveURL=0&aid=nqqChat";
string html = ge.gethtml(url);
if (html.IndexOf("聊天-3GQQ") != -1)
{
string QQname = null;
//添加服务QQ
if (html.IndexOf("临时会话聊天") != -1)
{
QQname = Toreget2(html, @"(?<=u=)\d{5,11}");
}
string ss = Toreget2(html, "(?<=与).{1,10}(?=聊天-3GQQ)");
if (ss != null)
{ QQname = ss; }
string QQ = Toreget2(html, @"(?<=u=)\d{5,11}");
Class2 c2 = new Class2();
c2.Tn = null;
c2.SeQQnum = Int32.Parse(QQ);
c2.SeQQ = QQname;
bool bi = false;
foreach (Class2 s in listBox1.Items)
{
if (s.SeQQnum == Int32.Parse(QQ))
{
bi = true;
c2 = s;
}
}
if (!bi)
{
listBox1.BeginInvoke(new EventHandler(DataUI), c2);
}
//==============================
html = html.Replace("</a>", "");
html = html.Replace("<br/>", "");
html = html.Replace("\r\n", "");
html = html.Replace("<", "");
html = html.Replace(">", "");
string QQmsg = Toreget2(html, @"(?<= \d+:\d+:\d{2}).+(?= input)");
if (QQmsg != null)
{
c2.Msg = QQmsg;
linb2.BeginInvoke(new EventHandler(DataUI2), c2);
bool OK = false;
Class1 c1 = (Class1)linbQQ.Tag;
string Txt = "";
c2 = Run(QQmsg, c2, out Txt);
listBox1.BeginInvoke(new EventHandler(DataUI3), c2);
SendMessage(c1.QQsid, c2.SeQQnum, Txt, out OK);
}
}
}
有需要的朋友可以找我!当然要等价交换。呵呵!!不要说我小气,大家互相学习嘛。
这里简单说一下功能:
1、 QQ 帐号密码登陆,登陆不上可能要验证码,可以先用电脑上一次3G QQ 登陆成功后在到软件登陆,这样就可以正常登陆了。
2、自定义回复内容,这个是必须的。
3、支持添加,保存你内容列表XML 格式的。
4、……
可能有一些BUG 大家可以给点意见。
有图有真像
回复列表1
回复列表2
记录聊天内容:
正在服务的QQ号列表:
下载连接: