解决了；  谢谢各位， cookies 的问题 - =

Joker4tb 发表于 2017-2-4 14:01
整数型全局变量，msg_Type 为 0 时用爱乐赞平台的，msg_Type 为 1 时用易码平台的

能通俗讲一下是哪里出错么，我第二个软也是一样问题，第一次成功 第二次失败

Joker4tb 发表于 2017-2-4 14:01
整数型全局变量，msg_Type 为 0 时用爱乐赞平台的，msg_Type 为 1 时用易码平台的

整老多都是不行 不是成功1次失败1次 就是成功2次失败1次 - -

1434764001 发表于 2017-2-4 13:39
msg_Type 这个是什么啊

整数型全局变量，msg_Type 为 0 时用爱乐赞平台的，msg_Type 为 1 时用易码平台的

Joker4tb 发表于 2017-2-3 18:25
把我的代码拷贝过去用就行啊。不要的平台你就删掉。

msg_Type 这个是什么啊

1434764001 发表于 2017-2-3 12:06
我的代码里哪里写错了- = 发的这些我看不懂-

把我的代码拷贝过去用就行啊。不要的平台你就删掉。

单双号限行

Joker4tb 发表于 2017-2-3 10:15
[e=4].版本 2

.子程序 短xin_获取号码, 逻辑型

我的代码里哪里写错了- = 发的这些我看不懂-

  

子程序名	返回值类型	公开	备 注
短xin_获取号码	逻辑型
参数名	类 型	参考	可空	数组	备 注
revCode	文本型				返回手机号
项目ID号	文本型

变量名	类 型	静态	数组	备 注
Code	文本型
Ercode	文本型

如果真 (msg_Type ＝ 0)
如果真 (项目ID号 ＝ “”)
项目ID号 ＝ “1110”  ' 默认项目ID

如果 (爱乐赞_获取一个手机号 (msg_Token, 项目ID号, , Code) ＝ 真)
revCode ＝ Code
返回 (真)
revCode ＝ Code
返回 (假)


如果真 (msg_Type ＝ 1)
如果真 (项目ID号 ＝ “”)
项目ID号 ＝ “666” ' 默认项目ID
如果 (E码获取手机号码 (msg_Token, 项目ID号, Code, , Ercode, , , , 编码_URL编码 (指定区域号码, , 真)) ＝ 真)
revCode ＝ Code
返回 (真)
revCode ＝ Ercode
返回 (假)


revCode ＝ “短xin-号码获取失败”
返回 (假)

.版本 2<br /> <br /> .子程序 短xin_获取号码, 逻辑型<br /> .参数 revCode, 文本型, 可空, 返回手机号<br /> .参数 项目ID号, 文本型, 可空<br /> .局部变量 Code, 文本型<br /> .局部变量 Ercode, 文本型<br /> <br /> <br /> .如果真 (msg_Type ＝ 0)<br />     .如果真 (项目ID号 ＝ “”)<br />         项目ID号 ＝ “1110”  ' 默认项目ID<br />     .如果真结束<br /> <br />     .如果 (爱乐赞_获取一个手机号 (msg_Token, 项目ID号, , Code) ＝ 真)<br />         revCode ＝ Code<br />         返回 (真)<br />     .否则<br />         revCode ＝ Code<br />         返回 (假)<br />     .如果结束<br /> <br /> .如果真结束<br /> <br /> .如果真 (msg_Type ＝ 1)<br />     .如果真 (项目ID号 ＝ “”)<br />         项目ID号 ＝ “666” '默认项目ID<br />     .如果真结束<br />     .如果 (E码获取手机号码 (msg_Token, 项目ID号, Code, , Ercode, , , , 编码_URL编码 (指定区域号码, , 真)) ＝ 真)<br />         revCode ＝ Code<br />         返回 (真)<br />     .否则<br />         revCode ＝ Ercode<br />         返回 (假)<br />     .如果结束<br /> <br /> .如果真结束<br /> <br /> revCode ＝ “短xin-号码获取失败”<br /> 返回 (假)

'==================================

  

子程序名	返回值类型	公开	备 注
短xin_取短xin	逻辑型		成功返回6位验证码。失败返回：手机号 + “,未接收到短xin”
参数名	类 型	参考	可空	数组	备 注
手机号码	文本型
revCode	文本型
项目ID号	文本型

变量名	类 型	静态	数组	备 注
Code	文本型
Code2	文本型
Idx	整数型

' 爱乐赞_获取验证码 (, , , , , , , )
如果真 (msg_Type ＝ 0)  ' 爱乐赞
如果真 (项目ID号 ＝ “”)
项目ID号 ＝ “1910”

如果 (爱乐赞_获取验证码 (msg_Token, 手机号码, 项目ID号, “6”, “jktools”, Code2, Code) ＝ 真)
如果真 (取文本长度 (Code) ＝ 6)
revCode ＝ Code
返回 (真)

如果 (寻找文本 (Code2, “3秒再试”, , 假) ＞ 0)
revCode ＝ 手机号码 ＋ “,未接收到短xin”
返回 (假)
revCode ＝ Code2
返回 (假)



如果真 (msg_Type ＝ 1)  ' 易码
如果真 (项目ID号 ＝ “”)
项目ID号 ＝ “496”

如果 (E码获取单个消息 (msg_Token, 项目ID号, 手机号码, Code, Code2) ＝ 真)
Code ＝ 子文本替换 (Code, “：”, “:”, , , 真)
Idx ＝ 寻找文本 (Code, “:”, , 假)
revCode ＝ 取文本中间 (Code, Idx ＋ 1, 6)
返回 (真)
如果 (寻找文本 (Code2, “没有短xin”, , 假) ＞ 0)
revCode ＝ 手机号码 ＋ “,未接收到短xin”
返回 (假)
revCode ＝ Code2
返回 (假)



返回 (假)

.版本 2<br /> <br /> .子程序 短xin_取短xin, 逻辑型, , 成功返回6位验证码。失败返回：手机号 + “,未接收到短xin”<br /> .参数 手机号码, 文本型<br /> .参数 revCode, 文本型, 可空<br /> .参数 项目ID号, 文本型, 可空<br /> .局部变量 Code, 文本型<br /> .局部变量 Code2, 文本型<br /> .局部变量 Idx, 整数型<br /> <br /> ' 爱乐赞_获取验证码 (, , , , , , , )<br /> .如果真 (msg_Type ＝ 0)  ' 爱乐赞<br />     .如果真 (项目ID号 ＝ “”)<br />         项目ID号 ＝ “1910”<br />     .如果真结束<br /> <br />     .如果 (爱乐赞_获取验证码 (msg_Token, 手机号码, 项目ID号, “6”, “jktools”, Code2, Code) ＝ 真)<br />         .如果真 (取文本长度 (Code) ＝ 6)<br />             revCode ＝ Code<br />             返回 (真)<br />         .如果真结束<br /> <br />     .否则<br />         .如果 (寻找文本 (Code2, “3秒再试”, , 假) ＞ 0)<br />             revCode ＝ 手机号码 ＋ “,未接收到短xin”<br />             返回 (假)<br />         .否则<br />             revCode ＝ Code2<br />             返回 (假)<br />         .如果结束<br /> <br />     .如果结束<br /> <br /> .如果真结束<br /> <br /> .如果真 (msg_Type ＝ 1)  ' 易码<br />     .如果真 (项目ID号 ＝ “”)<br />         项目ID号 ＝ “496”<br />     .如果真结束<br /> <br />     .如果 (E码获取单个消息 (msg_Token, 项目ID号, 手机号码, Code, Code2) ＝ 真)<br />         Code ＝ 子文本替换 (Code, “：”, “:”, , , 真)<br />         Idx ＝ 寻找文本 (Code, “:”, , 假)<br />         revCode ＝ 取文本中间 (Code, Idx ＋ 1, 6)<br />         返回 (真)<br />     .否则<br />         .如果 (寻找文本 (Code2, “没有短xin”, , 假) ＞ 0)<br />             revCode ＝ 手机号码 ＋ “,未接收到短xin”<br />             返回 (假)<br />         .否则<br />             revCode ＝ Code2<br />             返回 (假)<br />         .如果结束<br /> <br />     .如果结束<br /> <br /> .如果真结束<br /> <br /> 返回 (假)

补充内容 (2017-2-3 10:16):
msgToken 是登录成功后返回的那个 token