Foxtable(狐表)用户栏目专家坐堂 → 关于短信发送


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

主题:关于短信发送

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


加好友 发短信
等级:三尾狐 帖子:719 积分:5181 威望:0 精华:1 注册:2008/9/24 10:41:00
关于短信发送  发帖心情 Post By:2011/3/29 11:16:00 [显示全部帖子]

各位老师,我按帮助中画了如下代码,怎么显示 04 错误

 

Dim url As String
Dim cm As WinForm.ComboBox = e.Form.Controls("ComboBox1")
Dim tx As WinForm.TextBox = e.Form.Controls("TextBox1")
Dim txx As WinForm.TextBox = e.Form.Controls("TextBox2")
Dim dr As DataRow = DataTables("收付类别").find("piao据类型 = '" & cm.value & "'")
Dim http As Object
url = "http://service.winic.org:8009/sys_port/gateway/?id= '" & cm.value & "' pwd= '" & dr("项目") & "' & to= '" & tx.value & "' & c & time="
http = CreateObject("MSXML2.XMLHTTP")
http.Open("get", url, False)
http.send()
MessageBox.Show("返回信息:" & http.responseText)

 

如下例子公式表名与列名与上面公式不同.

 

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.foxdb

[此贴子已经被作者于2011-3-29 13:10:38编辑过]

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


加好友 发短信
等级:三尾狐 帖子:719 积分:5181 威望:0 精华:1 注册:2008/9/24 10:41:00
  发帖心情 Post By:2011/3/29 11:34:00 [显示全部帖子]

主要是这个:

url = "http://service.winic.org:8009/sys_port/gateway/?id= '" & cm.value & "' pwd= '" & dr("项目") & "' & to= '" & tx.value & "' & c & time="

你帮看看有什么问题.


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


加好友 发短信
等级:三尾狐 帖子:719 积分:5181 威望:0 精华:1 注册:2008/9/24 10:41:00
  发帖心情 Post By:2011/3/29 13:11:00 [显示全部帖子]

以下是引用狐狸爸爸在2011-3-29 12:33:00的发言:
做个例子上来看看

已上传,帮请看看,哪个参数不对.


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


加好友 发短信
等级:三尾狐 帖子:719 积分:5181 威望:0 精华:1 注册:2008/9/24 10:41:00
  发帖心情 Post By:2011/3/29 15:57:00 [显示全部帖子]

url = "http://service.winic.org:8009/sys_port/gateway/?id=" & cm.value & " &pwd=" & dr("项目") & "To=" & tx.value & " &c&time="

 

狐爸帮看看,这个也不对呀.下面去掉如上连接,仍不行,为何?能否指定哪个镶嵌不符条件.

 

url = "http://service.winic.org:8009/sys_port/gateway/?id=" & cm.value & "pwd=" & dr("项目") & "To=" & tx.value & "c time="

[此贴子已经被作者于2011-3-29 16:02:42编辑过]

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


加好友 发短信
等级:三尾狐 帖子:719 积分:5181 威望:0 精华:1 注册:2008/9/24 10:41:00
  发帖心情 Post By:2011/3/29 16:22:00 [显示全部帖子]

以下是引用狐狸爸爸在2011-3-29 16:08:00的发言:

测试通过:

 

url = "http://service.winic.org:8009/sys_port/gateway/?id=" & cm.value & "&pwd=" & dr("第二列") & "&To=" & tx.text & "&c&time="

 

万分感谢,没有看清第一个& ,与其它语名有点不一样,每个字符前都要加上&.

再次感谢.

 

[此贴子已经被作者于2011-3-29 16:09:34编辑过]


 回到顶部