以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助] 如何 FileSys 去掉文本文件中的前两行字符？  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=3840)
--  作者：wcs
--  发布时间：2009/8/8 23:56:00
--  [求助] 如何 FileSys 去掉文本文件中的前两行字符？

文本文件中现在这些字符：
[oledb]
; Everything after this line is an OLE DB initstring
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\\foxtable\\release0702\\数据采集\\新建 Microsoft Office Access 应用程序.mdb;Persist Security Info=False


这是用  Process  打开一个  数据链接.udl  文件后，在数据链接属性窗口设置好的内容

我用改文件名的办法将  数据链接.udl  改为  数据链接.txt  文件

然后用 filesys.ReadAllText  读取文件内容取得的  连接字符串。

现在我想将这此字符串运用到  “运行中创建数据源”  AddConnection  的字符串中

但是，这个文本文件中的前两行内容如何去掉，是个问题!!


[此贴子已经被作者于2009-8-8 23:57:25编辑过]
--  作者：yangming
--  发布时间：2009/8/9 10:38:00
--  
ReadAllText  只能是一次性读取全部内容
--  作者：czy
--  发布时间：2009/8/9 10:47:00
--  
这样?

Dim s As string = FileSys.ReadAllText("d:\\数据链接.txt")
Dim Values() As String = s.Split(chr(13))
Output.Show(Values(2))    
--  作者：czy
--  发布时间：2009/8/9 10:50:00
--  
这样?

Dim s As string = FileSys.ReadAllText("d:\\数据链接.txt")
Dim Values() As String = s.Split(chr(13))
AddConnection("test",Values(2))
--  作者：wcs
--  发布时间：2009/8/9 14:54:00
--  

试试看!
--  作者：wcs
--  发布时间：2009/8/9 15:21:00
--  
OK了~!