| ghs_79
35745
|
2008/10/13 18:46:30 |
在登录过程执行到下面第二句出错。
SocketWrite(BuildSIPRequest('R', [], LOGON_REQUEST_ARG, GetNextRegisterCount()));
GetSIPResponse('R', ResponseMsg);
准确位置是过程
function ReadASIPResponse(var SIPMsg: string): string;
....
CmdLine := SocketReadLn(); // SIP 响应头
中执行到此句话，就结束了。然后就提示账号错误或网络故障，无法登录了。 |
| ghs_79
35744
|
2008/10/13 18:39:42 |
| 我是通过电信光纤上网的(在公司内部)，程序还是登录不了，测试的是作者发的D7版本程序，并且作者带的exe也登录不了。 |
| coolcalf
35743
|
2008/10/13 16:09:06 |
| 测试通过，短信延迟了许久，但是收到了，可能是移动的问题。 |
| coolcalf
35741
|
2008/10/13 15:26:38 |
作用最新 2008-10-13 12:40:28 d7+indy9版本，能够正常登录，并列出部分好友（好象列表不太正确），但尝试给自己，给别人发送消息均显示“【系统提示】:短信发送完毕！”，但实际上收不到。
测试地点，四川江油。61.139.35.x |
| scxujie
35740
|
2008/10/13 14:57:17 |
| OK，赞一个 |
| hmilyygq
35738
|
2008/10/13 12:40:28 |
Delphi7+Indy9版本的我已经上传到网上，链接是：
http://www.namipan.com/d/hmilyygq_Delphi_GreenFetion_D7_Src.rar/7ef36335938c960adcee76e6699601265047538c9eb90700
稍后将上传到盒子 |
| ygm_mm
35737
|
2008/10/13 12:19:35 |
| 非常感谢。 |
| hmilyygq
35736
|
2008/10/13 12:04:49 |
请注意，如果登录不了，请把下面代码反注释：
// 获取登录服务器和通信服务器地址
Request := TStringList.Create;
try
try
IdHTTP1.ReadTimeout := 3000;
IdHTTP1.ConnectTimeout := 3000;
Request.Text := '<config><user mobile-no="13710011001" /><client type="PC" version="3.3.0370" platform="W5.1" /><servers version="0" /><service-no version="37" /></config>';
XMLReader.XML.Text := IdHTTP1.Post('http://nav.fetion.com.cn/nav/getsystemconfig.aspx', Request);
XMLReader.Active := True;
ExploreNode(XMLReader.Node);
except
end;
finally
Request.Free;
end;
并把下面这句
Request.Text := '<config><user mobile-no="13710011001" /><client type="PC" version="3.3.0370" platform="W5.1" /><servers version="0" /><service-no version="37" /></config>';
改为：
Request.Text := '<config><user mobile-no="'+PhoneNum+'" /><client type="PC" version="3.3.0370" platform="W5.1" /><servers version="0" /><service-no version="37" /></config>';
因为我当初调试的时候把通信服务器的IP固定为221.176.31.36，这个是长沙的服务器，看来飞信服务器在不同的区域通信服务器的IP是不一样的，在登录之前需要根据手机号码来获取当地的通信服务器IP
代码的登录过程没有问题，如有疑问可以到我给出的链接看看具体的登录过程：
飞信协议分析， http://hi.baidu.com/nathan2007/blog/category/%B7%C9%D0%C5%D0%AD%D2%E9%B7%D6%CE%F6 |
| ghs_79
35735
|
2008/10/13 12:02:06 |
要在D7下编译，把IdTCPClient1.Socket.ReadLn改为IdTCPClient1.ReadLn
新版本还是无法登录：包括作者发布的EXE。 |
| coolcalf
35734
|
2008/10/13 11:17:12 |
10月13日 11时下载的文件
不能登录
不会这么快就被飞信给屏蔽了吧
谁能改下在d7下编译 |
| scxujie
35730
|
2008/10/13 8:14:17 |
| 新版还是无法登录啊 |
| zhouwen
35729
|
2008/10/13 0:11:34 |
| 恩，不错呀，前几天还动了这个念头，可惜技术不到家 |
| ygm_mm
35728
|
2008/10/12 23:58:26 |
| 登录过程有什么特殊限制，为什么还是无法登录。 |
| jemsn
35725
|
2008/10/12 20:35:43 |
----------
Greenfetion
----------
帐号错误或网络故障，无法登录。
----------
OK
----------
新版试过，一样不能登录！ |
| hmilyygq
35720
|
2008/10/12 15:54:33 |
| 在盒子ftp上，新上传的文件名是hmilyygq_Delphi_GreenFetion_new.rar |
| ybj316
35718
|
2008/10/12 14:42:26 |
| 程序似乎做的不够健壮！还是无法登陆！！ |
| hmilyygq
35715
|
2008/10/12 13:09:34 |
非常抱歉，上次发布前由于我这里网络的问题，测试飞信的登录过程没有问题，现在才发现登录过程有问题，因此对登录过程进行了修正。
新版本已经发布到盒子的FTP上了，请下载新版本的GreenFetion，请站长帮忙更新或者把上一个版本的删除，见谅！ |
| hmilyygq
35713
|
2008/10/12 12:28:52 |
| 另外更正一下，使用的Indy版本为10 |
| hmilyygq
35712
|
2008/10/12 12:24:17 |
| 请使用Delphi2007编译，我试过Delphi7下不能编译 |
| ybj316
35711
|
2008/10/12 10:52:27 |
| 不能登陆啊！有登录成功的吗？ |
