求助数据读取问题

shiyiming

有如下形式的txt文件形式：要求部分读取如下内容，遇到#Fields:时便读取信息，其他信息不用读取，请教高手如何写代码？
#Software: Microsoft Internet Information Services 6.0
#Version: 1.0
#Date: 2008-07-18 10:53:21
#Fields: date time s-sitename s-ip cs-method cs-uri-stem cs-uri-query s-port cs-username c-ip cs(User-Agent) sc-status sc-substatus sc-win32-status
2008-07-18 10:53:21 W3SVC1246049203 72.15.206.27 GET /default.asp - 80 - 72.15.206.27 Mozilla/4.0+(compatible;+MSIE+7.0;+Windows+NT+5.2;+.NET+CLR+1.1.4322;+.NET+CLR+2.0.50727) 200 0 0
#Software: Microsoft Internet Information Services 6.0
#Version: 1.0
#Date: 2008-07-18 10:55:19
#Fields: date time s-sitename s-ip cs-method cs-uri-stem cs-uri-query s-port cs-username c-ip cs(User-Agent) sc-status sc-substatus sc-win32-status
2008-07-18 10:55:19 W3SVC1246049203 72.15.206.31 GET /default.asp - 80 - 72.15.206.31 Mozilla/4.0+(compatible;+MSIE+7.0;+Windows+NT+5.2;+.NET+CLR+1.1.4322;+.NET+CLR+2.0.50727) 200 0 0
2008-07-18 10:55:19 W3SVC1246049203 72.15.206.31 GET /favicon.ico - 80 - 72.15.206.31 Mozilla/4.0+(compatible;+MSIE+7.0;+Windows+NT+5.2;+.NET+CLR+1.1.4322;+.NET+CLR+2.0.50727) 404 0 2
2008-07-18 10:55:32 W3SVC1246049203 72.15.206.31 GET /default.asp - 80 - 72.15.206.31 Mozilla/4.0+(compatible;+MSIE+7.0;+Windows+NT+5.2;+.NET+CLR+1.1.4322;+.NET+CLR+2.0.50727) 200 0 0
2008-07-18 10:57:08 W3SVC1246049203 72.15.206.31 GET /default.asp - 80 - 72.15.206.31 Mozilla/4.0+(compatible;+MSIE+7.0;+Windows+NT+5.2;+.NET+CLR+1.1.4322;+.NET+CLR+2.0.50727) 200 0 0
2008-07-18 10:57:23 W3SVC1246049203 72.15.206.31 GET /Default.asp - 80 - 210.74.133.34 Mozilla/4.0+(compatible;+MSIE+6.0;+Windows+NT+5.1;+SV1;+.NET+CLR+2.0.50727) 200 0 0
2008-07-18 10:57:47 W3SVC1246049203 72.15.206.31 GET /default.asp - 80 - 210.74.133.34 Mozilla/4.0+(compatible;+MSIE+6.0;+Windows+NT+5.1;+SV1;+.NET+CLR+2.0.50727) 200 0 0
#Software: Microsoft Internet Information Services 6.0
#Version: 1.0
#Date: 2008-07-18 18:32:58
#Fields: date time s-sitename s-ip cs-method cs-uri-stem cs-uri-query s-port cs-username c-ip cs(User-Agent) sc-status sc-substatus sc-win32-status
2008-07-18 18:32:58 W3SVC1246049203 72.15.206.31 GET /Default.asp - 80 - 24.91.118.22 Mozilla/4.0+(compatible;+MSIE+6.0;+Windows+NT+5.1;+SV1;+.NET+CLR+1.1.4322;+.NET+CLR+2.0.50727) 200 0 0
2008-07-18 18:39:13 W3SVC1246049203 72.15.206.31 GET /Default.asp - 80 - 24.91.118.22 Mozilla/4.0+(compatible;+MSIE+6.0;+Windows+NT+5.1;+SV1;+.NET+CLR+1.1.4322;+.NET+CLR+2.0.50727) 200 0 0
#Software: Microsoft Internet Information Services 6.0
#Version: 1.0
#Date: 2008-07-18 19:02:25
#Fields: date time s-sitename s-ip cs-method cs-uri-stem cs-uri-query s-port cs-username c-ip cs(User-Agent) sc-status sc-substatus sc-win32-status
2008-07-18 19:02:25 W3SVC1246049203 72.15.206.31 GET /Default.asp - 80 - 24.91.118.22 Mozilla/4.0+(compatible;+MSIE+6.0;+Windows+NT+5.1;+SV1;+.NET+CLR+1.1.4322;+.NET+CLR+2.0.50727) 200 0 0

shiyiming

[code:9z854kjm]
options validvarname=any;
data temp;
infile 'pathto\log.txt'  end=eof;
retain re;
if _n_=1 then
        re = prxparse('/^\d\d\d\d-\d\d-\d\d$/');

input @1 type $;
if type='#Fields:' then do;
        input @1 datestr:$10. @;
        do until(eof or not prxmatch(re, datestr));
                date = input(datestr, yymmdd10.);
                input        time:time8.
                                's-sitename'n:$15.
                                's-ip'n:$15.
                                'cs-method'n:$10.
                                'cs-uri-stem'n:$255.
                                'cs-uri-query'n:$10.
                                's-port'n:$5.
                                'cs-username'n:$20.
                                'c-ip'n:$15.
                                'cs(User-Agent)'n:$255.
                                'sc-status'n:3.
                                'sc-substatus'n:1.
                                'sc-win32-status'n:1.
                                ;
                output;
                if not eof then input @1 datestr:$10. @;
        end;
end;
format date yymmdd10. time time8.;
drop type datestr;
run;
[/code:9z854kjm]
其实您最好手工做，经济危机的根本在生产力过剩。
我的意思是说，您最好把每段数据都拷贝到另一个文本文件里，然后再用那IMPORT WIZARD。这样比较稳妥。

shiyiming

完全看不出TXT怎么断的行，想帮也帮不上忙。

shiyiming

谢谢高手，非常感谢，能告诉我你的邮箱么？有空跟你学习一下？？