- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 如何提取值写入文本中？ (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=61261)
-- 发布时间：2014/12/9 22:11:00
-- 如何提取值写入文本中？
请教如何把狐表中的值（如图）
此主题相关图片如下：提取.jpg
提出按以下格式写入一个文本中？
102.9,25.13,67 102.8,25.12,67 102.8,25.11,67
看了帮助文档，大概知道用WriteAllText来实现，但如何取值设置格式写入就不知了，请专家指教。谢谢
-- 发布时间：2014/12/9 22:15:00
--
Dim str As String = ""
For Each dr As DataRow In DataTables("表A").DataRows
str &= dr("第一列") & "," & dr("第二列") & vbcrlf
Next
msgbox(str)
-- 发布时间：2014/12/9 22:41:00
--
按照老师的代码可以，但我加上怎么我加一列“高度”就不行了？
Dim str As String = ""
For Each dr As DataRow In DataTables("表A").DataRows
str& = dr("经度") & "," & dr("纬度") "," & dr("高度") & vbcrlf
Next
msgbox(str)
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:写入内容.foxdb |
-- 发布时间：2014/12/9 22:43:00
--
Dim str As String = ""
For Each dr As DataRow In DataTables("表A").DataRows
str &= dr("经度") & "," & dr("纬度") & "," & dr("高度") & vbcrlf
Next
msgbox(str)
-- 发布时间：2014/12/9 23:05:00
--
好了。
麻烦问问以下代码啥意思：
1. Dim str As String = ""
2. str &= dr("经度") & "," & dr("纬度") & "," & dr("高度") & vbcrlf
1中的：= ""
2中的： str &=
谢谢！
-- 发布时间：2014/12/9 23:30:00
--
1、是赋值，空值
2、等同于 str = str & dr("经度") & "," & dr("纬度") & "," & dr("高度") & vbcrlf
-- 发布时间：2014/12/10 10:56:00
--
这么晚了还在回复，辛苦了，谢谢！
-- 发布时间：2015/3/29 16:08:00
--
在狐表中看到合成的字符串是分行（有回车符vbcrlf），但通过maisender发送后，收到的邮件正文中则没有一个分行（一个长字符串），为什么？能解决吗？谢谢
-- 发布时间：2015/3/29 16:13:00
--
呃，不可能的 只要加了 vbcrlf，就一定会换行。我测试没问题。
-- 发布时间：2015/3/29 18:55:00
--
老师，我试过帮助里的方法，是会换行的，但我用的是论坛方法：http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=31298&authorid=0&page=0&star=1就没有换行。
帮助中的方法没有，发送是否成功的提示，能加上吗？