以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  WeUI如何接收手机短信中超链接中的变量  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=192381)
--  作者：lanbor
--  发布时间：2024/6/19 21:49:00
--  WeUI如何接收手机短信中超链接中的变量
场景1，我发条手机短信给客户：
请通过以下链接对本次购买进行评价 http://www.xxx.com:999/satifion.htm?sono=\'HW2419\'&tel1=\'123458888\'&sodate=\'2024-06-01\'

场景2
用户收到短信后，点开短信链接，自动在手机浏览器中打开网页satifion.htm
Select Case e.Path
    Case "satifion.htm"
        Functions.Execute("Satisfion_Create", e)
    Case "login1.htm"
        Functions.execute("login1", e) \'用户登记
    Case "exit1.htm"
        Functions.execute("exit1", e) \'退出系统
    Case Else
        e.WriteString("糟糕,主要文件丢火星上去了!")
End Select
e.WriteString(wb.Build)

场景3
以下是 Satisfion_Create 网页函数开始

Dim e As RequestEventArgs = args(0)
Dim wb As New weui
wb.title = "客户购买评价"
Dim _sono As Integer = e.GetValues("sono") 
Dim _tel1 As Integer = e.GetValues("tel1")
Dim _sodate As Integer = e.GetValues("sodate")
Dim PageURL = "login1.htm"
If e.PostValues.Count = 0 Then \'生成评价页面
    Dim dr As DataRow = DataTables("Satisfion_list").SQLFind("[SONumber]= \'" & _sono & "\' and [c_tel1]= \'" & _tel1 & "\' and [SODate]=\'" & _sodate & "\'")
    If dr IsNot Nothing Then
    弹出评价页面和内容
    end if
\'...............
请教专家：
应该在哪个场景取出短信中的变量值？
如何取出变更值？
感谢专家？


[此贴子已经被作者于2024/6/19 21:53:51编辑过]
--  作者：有点蓝
--  发布时间：2024/6/20 8:06:00
--  
上面【e.GetValues("sono") 】这种代码就是取变量值呀

发链接的时候把链接里面的单引号去掉
http://www.xxx.com:999/satifion.htm?sono=HW2419&tel1=123458888&sodate=2024-06-01