以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  关于读取文本文件  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=7377)

--  作者:sophia
--  发布时间:2010/6/12 13:44:00
--  关于读取文本文件
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.rar

求助:读取指定的文本文件,并放入相应的字段
--  作者:狐狸爸爸
--  发布时间:2010/6/12 13:49:00
--  

Dim s As string = FileSys.ReadAllText("c:\\data\\table.txt")

Tables("XXX").Current("yyyy") = s


--  作者:sophia
--  发布时间:2010/6/12 14:14:00
--  

是要把文本文件里的内容拆分开分别送给当前表的其中几个字段,不是把文本文件的整体内容赋值给某个字段。例子窗口中有说明的。


--  作者:sophia
--  发布时间:2010/6/12 14:17:00
--  
要读取的文本文件(wz.txt)是以逗号为分隔符的,我已经传了上来,在项目文件夹下。
--  作者:狐狸爸爸
--  发布时间:2010/6/12 14:20:00
--  

Dim s() As string = FileSys.ReadAllText("c:\\data\\table.txt").split(",")

Tables("XXX").Current("姓名") = s(0).Trim()
Tables("XXX").Current("性别") = s(1).Trim()
Tables("XXX").Current("名族") = s(2).Trim()

....


--  作者:sophia
--  发布时间:2010/6/12 14:42:00
--  

图片点击可在新窗口打开查看此主题相关图片如下:1.jpg
图片点击可在新窗口打开查看
执行后怎么显示这样(文本框内没有内容),是不支持汉字吗?
--  作者:狐狸爸爸
--  发布时间:2010/6/12 14:47:00
--  
Dim s() As String = FileSys.ReadAllText("c:\\wz.txt", Encoding.Default).Split(",")
--  作者:sophia
--  发布时间:2010/6/12 15:41:00
--  
图片点击可在新窗口打开查看 顶!