<!--CodeS-->
for index := 0 to HTMLStr.Count-1 do
begin
//memo1.Lines.Add(HTMLStr.strings[index]);
gcodeStr := Pos(':goASPPage(', HTMLStr.strings[index])+11;
HTMLDoc := copy(HTMLStr.strings[index], gcodeStr,18);
if (HTMLDoc <> '') and (HTMLDoc <> HTMLDocOld) then memo1.Lines.Add(HTMLDoc);
HTMLDocOld := HTMLDoc;
end;
<!--CodeE-->
<!--CodeS-->
--- 무조건 추출되는 결과물 ---
tdbc>12/21 14:00</
tdbc></TD>
tdbc><A href="java
'20061217451','00'
tdcc>일반</TD>
'20061217451','00'
tdc>광주광역시교육
tdc>수의(총액)</TD
tdcc>12/20 10:00</
tdcc></TD>
tdcc><A href="java
'20061216254','01'
tdbc>변경</TD>
'20061216254','01'
tdb>경기도교육청 ?
tdb>제한(총액)규격
tdbc>12/21 12:00</
tdbc></TD>
tdbc><A href="java
'20061214375','00'
tdcc>일반</TD>
'20061214375','00'
tdc>서울특별시 도?
tdc>수의(총액)</TD
tdcc>12/19 13:00</
tdcc></TD>
tdcc><A href="java
'20061217438','00'
tdbc>일반</TD>
'20061217438','00'
tdb>경기도교육청 ?
tdb>제한(총액)</TD
tdbc>12/22 15:00</
tdbc></TD>
tdbc><A href="java
=2>
line colSpan=9></T
lSpacing=0 cellPad
=15>
/TR>
<!--CodeE-->
<!--CodeS-->
--- 원하는 결과물 ---
'20061217451','00'
'20061217451','00'
'20061216254','01'
'20061216254','01'
'20061214375','00'
'20061214375','00'
'20061217438','00'
'20061217438','00'
.
.
<!--CodeE-->
그나마 문법도 제대로 몰라서 겨우겨우 코딩했는데요.
Pos() 문에서 정상적으로 추출되는 것 같은데, 무작위로 모든 문자열을 가져오는 것 같습니다.
원하는 결과물을 얻으려면 어떻게 처리하는 것이 옳을지 답변 부탁드려요.ㅠ.ㅜ
지금 코드를 보니 0을 검사하는 부분이 없네요.
그러면 저 코드로는... 검색결과가 없는 모든 줄 마다 11번