" & vbcrlf response.write "
" & vbcrlf response.write line(i) & "
" response.write " | " & vbcrlf response.write "
" & vbcrlf else 'The rest is data dat1=" " dat2=" " dat3=" " txt=split(line(i)," ",-1) for j=0 to ubound(txt) if txt(j)<>"" then if dat1=" " then dat1=txt(j) elseif dat2=" " then dat2=txt(j) elseif dat3=" " then dat3=txt(j) end if end if next if dat3=" " and dat2<>" " then dat3=dat2 dat2=" " end if response.write "
" response.write "
| " & vbcrlf response.write dat1 response.write " | " & vbcrlf response.write "
" & vbcrlf response.write dat2 response.write " | " & vbcrlf response.write "
" & vbcrlf response.write dat3 response.write " | " & vbcrlf response.write "
" & vbcrlf end if next response.write "
