怎样从大文本档中（700 MB）读出有用的数据???

Question

 我现在从机器中自动生成的文档中读取，摘出有用的数据（大概八万条）进入数据库。首先 数据在文档里不是很有规律，除了有用数字外，还有些文字说明（无用）。怎样做可以既快用准确呢？谢谢 牛人给予解答。Scanheader msrange msend linkto your machine; scanend=345.443 scantime=37432
patch #1
msposition=0.0015;msintensity=234445
patch #2
msposition=0.0025;msintensity=122345
Scanheader msrange msend linkto your machine; scanend scantime我想要的内容：
msposition=0.0015;msintensity=234445
msposition=0.0025;msintensity=122345

Answer 1

使用Windows Index Service进行全文检索

Answer 2

参考VB的例子：
、管理：
   使用“计算机管理”，可以进行索引服务的管理。
   索引服务的管理主要包括Catalog(编目)和Scope(目录)
   
   使用脚本管理：
   Set objAdminIS = CreateObject("Microsoft.ISAdm")
   objAdminIS.Stop
   Set objCatalog = objAdminIS.AddCatalog("编目名称", "编目存储地址")
   objCatalog.AddScope("要进行编目的目录", "true:进行编目，false：不进行编目（排除该目录）","用户名(可选)","口令(可选)")
   objAdminIS.Start
   
2、进行检索 (VB)
   Set objConnection = CreateObject("ADODB.Connection")
   objConnection.ConnectionString = "provider=msidxs;"
   objConnection.Properties("Data Source") =   "system" 'system是IndexService默认建立的编目
   objConnection.Open
   Set objCommand = CreateObject("ADODB.Command")
   strQuery = "Select  directory, Path,Filename, Size, Contents from scope() Where  Freetext('关键字')"
   'SELECT 子句中可以使用的字段可以在 [计算机管理][索引服务][编目][属性]中查到
   'WHERE中可以使用 Size>5000 ,AND,OR,Path LIKE 'F:\%'等等   Set objRecordSet = objConnection.Execute(strQuery)
   Do While Not objRecordSet.EOF
        Debug.Print objRecordSet("directory"), objRecordSet("Filename"), objRecordSet("Size")
        objRecordSet.MoveNext
   Loop