Foxtable(狐表)用户栏目专家坐堂 → 短信猫问题


  共有2693人关注过本帖树形打印复制链接

主题:短信猫问题

帅哥哟,离线,有人找我吗?
lshshlxsh
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:658 积分:7890 威望:0 精华:0 注册:2013/12/11 17:49:00
短信猫问题  发帖心情 Post By:2015/8/18 15:12:00 [只看该作者]

If e.Content.StartsWith("@@") Then '如果信息是以约定的@@开始
Dim vals() As String = e.Content.Trim("@").Split("@")
Dim
ret As
String
If vals.Length = 4 Then '如果数组长度等于4
If vals(0) > "" AndAlso vals(1) > "" Then '且提交了客户名称和产品名称
Dim Quantity As Integer
Dim Price As Double
If Integer.TryParse(Vals(2), Quantity) '如果数量格式正确
If Double.TryParse(Vals(3), Price) Then '如果单价格式正确
Dim dr As DataRow = DataTables("订单").AddNew()
dr(
"客户") = vals(0)
dr(
"产品") = vals(1)
dr(
"数量") = vals(2)
dr(
"单价") = vals(3)
ret =
"提交成功:" & e.Content
End
If
End If
End If
End If
If ret = "" Then
ret =
"格式错误:" & e.Content
End
If
FoxSms.DelMsgForIndex(e.Index) '从SIM卡删除此短信
FoxSMS.SendMsg(e.FromNumber,ret)
'回复短信,告诉业务员,此订单是否提交成功
End
If



请问一下 帮助里 发送短信的代码   我短信发送  @@www@kk@11@22   出错   但是发送  @@我我我@kk@11@22  就成功

我如果发送 @@www@kk@11@22 代码 短信猫接收到的内容为空,请问这是什么原因?


 回到顶部
帅哥哟,离线,有人找我吗?
大红袍
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/8/18 15:23:00 [只看该作者]

换一个分割符,如发送

 

##www#kk#11#22


 回到顶部