老师：关于自动上报位置：我把存储在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
按照代码不添加行，什么显示也没有，不知道问题在哪里？
加好友 
发短信
Post By：2018/6/14 13:47:00 [只看该作者]
