Dim wb As New WeUI '定义一个基于weui框架的网页生成器
Dim e As RequestEventArgs = args(0)
Dim u As String = e.cookies("name")
With wb.AddTable("","Table1")
.Alternate = 3
Dim nms() As String = {"日期","报备人","推荐人","返利","用户姓名","用户电话","楼盘","单元房号","风格偏好","备注" }
.Head.AddRow(nms)
For Each r As DataRow In DataTables("终端用户").sqlSelect("","", "日期 Desc")
With .Body.AddRow(r("日期"),r("报备人"),r("推荐人"),r("返利"),r("用户姓名"),r("用户电话"),r("楼盘"),r("单元房号"),r("风格偏好"),r("备注"))
End With
Next
End With
e.WriteString(wb.Build)
用户电话 苹果直接可以拨打 安卓不行 怎么实现呢
[此贴子已经被作者于2018/2/26 22:35:02编辑过]
加好友 
发短信
Post By：2018/2/26 22:35:00 [只看该作者]
