Foxtable(狐表)用户栏目专家坐堂 → [求助]自动上报位置无法存储在foxtable钟


  共有1668人关注过本帖平板打印复制链接

主题:[求助]自动上报位置无法存储在foxtable钟

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


加好友 发短信
等级:幼狐 帖子:104 积分:1044 威望:0 精华:0 注册:2015/2/9 21:01:00
[求助]自动上报位置无法存储在foxtable钟  发帖心情 Post By:2018/6/14 13:47:00 [只看该作者]

老师:关于自动上报位置:我把存储在txt的文件修改存储到foxtable中,但用户自动上报的时候,就是不存储,无任何显示
 Case "LOCATION" '自动上报地理位置事件
   Dim y As String = xo("Longitude"'经度
   Dim x As String = xo("Latitude"'纬度
   Filesys.WriteAllText(logFile , OpenID & "在" & CreateTime & "的位置为:" & x & "|" & y & vbcrlf , True)

我自己的代码
 Case "LOCATION" '自动上报地理位置事件

   Dim OpenID As String  = xo("FromUserName") 
   Dim CreateTime As Date = st.AddSeconds(xo("CreateTime")) 
  Dim y As String = xo("Longitude"'经度
  Dim x As String = xo("Latitude"'纬度
   Dim dr as datarow = datatables("location").addnew()
   dr("FromUserName") = OpenID
   dr("CreateTime") = CreateTime
   dr("Longitude") = y
   dr("Latitude") = x
   dr.saave()

location表
FromUserName CreateTime MsgType Latitude Longitude Precision

按照代码不添加行,什么显示也没有,不知道问题在哪里?


 回到顶部