以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  写入手机通讯录  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=176297)
--  作者：yifan3429
--  发布时间：2022/4/7 19:31:00
--  写入手机通讯录
有一个表格 姓名 电话 住址 备注
如何写入手机通讯录
下面是拨打号码  我想直接写入手机通讯录 怎么搞


Dim nms() As String = {"用户姓名","单元房号","用户手机","短讯"}    .Head.AddRow(nms)
    Dim cnt As Integer
    For Each r As DataRow In DataTables("客户_终端用户").sql Se lect("楼盘 like \'珠江颐德%\'")
        cnt = cnt + 1
        With .Body.AddRow(cnt,r("用户姓名"),r("单元房号"),"<a href=\'tel:" & r("用户手机") & "\' >"  & "拨号联系</a>","<a href=\'sms:" & r("用户手机") & "\' >"  & "保存</a>" )
            
        End With
        
    Next
[此贴子已经被作者于2022/4/7 19:35:09编辑过]
--  作者：有点蓝
--  发布时间：2022/4/7 20:27:00
--  
没有办法，网页没有操作手机通讯录的权限
--  作者：yifan3429
--  发布时间：2022/4/8 13:00:00
--  
 那怎么可以做到呢
--  作者：有点蓝
--  发布时间：2022/4/8 13:38:00
--  
打包为app，调用打包软件提供的接口操作。

打包软件有hbuilder：http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=106991&replyID=&skin=1