stringreplace not working?

n9mfk9 · May 15, 2007

Hi group

this is the input

this is the output i get

<body background==========================================================================================

====================================================================================================

==================== bgcolor="#FFFFFF" text="#000000" link="#3366FF" vlink="#9900FF" alink="#000066">

if Not FileExists(@ScriptDir & "/N9mfk_*.HTML") Then
    MsgBox(0,"There are no Files",@ScriptDir & "/n9mfk_*.html")
    Exit
    EndIf
IF Not FileExists(@ScriptDir & "\input")Then 
DirCreate (@ScriptDir & "\input")
EndIf
IF Not FileExists(@ScriptDir & "\output")Then 
DirCreate (@ScriptDir & "\output")
EndIf
If FileExists(@ScriptDir & "/N9mfk_*.HTML") Then
FileCopy(@ScriptDir & "/n9mfk_*.html",@ScriptDir & "\input",1)
EndIf
$size = DirGetSize(@ScriptDir &"/input/",1)
$number = $size[1]
For $count = 1 To $number
$FileIn = @ScriptDir & "\input\n9mfk_"&$count&".html"
$FileOut = @ScriptDir & "\output\n9mfk_"&$count&".html"
$FileInData = FileRead($FileIn, FileGetSize($FileIn))
$avSplitData = StringSplit($FileInData, "<TD", 1)
;MsgBox(0,"",$FileInData)
$FileOutData = $avSplitData[1]
For $n = 2 To $avSplitData[0]
    $End = StringInStr($avSplitData[$n], "</TD>", 0, -1)
    $EndLen = StringLen($avSplitData[$n]) - $End + 1
    $EndText = StringRight($avSplitData[$n], $EndLen)
    $avSplitData[$n] = StringTrimRight($avSplitData[$n], $EndLen)
  $FileOutData &= "<TD" & StringReplace($avSplitData[$n], "0", "Ø") & $EndText
 $FileOutData = StringReplace($FileOutData, "with","of " &$number &" with")
this is the bad line  $FileOutData = StringReplace($FileOutData, "background","background=")
Next 
$hFileOut = FileOpen($FileOut, 2)
FileWrite($hFileOut, $FileOutData)
FileClose($hFileOut)
FileClose($FileIn)
FileClose($FileOut)
Run('Notepad.exe "' & $FileOut & '"')
next

PsaltyDS · May 15, 2007

1. Do FileExists() and DirGetSize() accept forward slashes in the paths?

2. Your string split inside the loop is looking for "<TD", which does not occur in the input string you gave, and you don't seem to have any error checking for that condition.

Xenobiologist · May 15, 2007

Hi,

and what should it look like?

So long,

Mega

n9mfk9 · May 15, 2007

Hi,
and what should it look like?
So long,
Mega

here the full

input

<html>

<head>

<title>N9MFK Logbook</title>

</head>

N9MFK Logbook           Created on: 5/2/2007

<font face="Arial" size="2"

S-Type="REGENERATED" S-Format="%m/%d/%Y %H:%M"<!--webbot

bot="Timestamp" I-CheckSum="26219" endspan -->

<TR>

<TD ALIGN=center>CALL</TD><TD ALIGN=center>PFX</TD><TD ALIGN=center>BAND</TD><TD ALIGN=center>MODE</TD><TD ALIGN=center>RCVD</TD><TD ALIGN=center>SENT</TD><TD ALIGN=center>QSL-R</TD><TD ALIGN=center>QSL-S</TD><TD ALIGN=center>COUNTRY</TD><TD ALIGN=center>COUNTY</TD></TR>

<TR>

</TR>

<TR>

</TR>

<TR>

</TR>

<TR>

<TD ALIGN=center>RN6BY </TD><TD ALIGN=center>RN6 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>European Russia </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

</TR>

<TR>

<TD ALIGN=center>ES1QD </TD><TD ALIGN=center>ES1 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Estonia </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>F5NSB </TD><TD ALIGN=center>F5 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>55 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>France </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>IK6BRJ </TD><TD ALIGN=center>IK6 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Italy </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>S58N </TD><TD ALIGN=center>S58 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Slovenia </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>4X4BO </TD><TD ALIGN=center>4X4 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Israel </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>IK7QHH </TD><TD ALIGN=center>IK7 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>55 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Italy </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>OK2PBM </TD><TD ALIGN=center>OK2 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>43 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Czech Republic </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>S51GL </TD><TD ALIGN=center>S51 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>58 </TD><TD ALIGN=center>53 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Slovenia </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>PY2TO </TD><TD ALIGN=center>PY2 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Brazil </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>JE1RXJ </TD><TD ALIGN=center>JE1 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Japan </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>AL2J </TD><TD ALIGN=center>AL2 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>55 </TD><TD ALIGN=center>53 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Alaska </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>PA3GSU </TD><TD ALIGN=center>PA3 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Netherlands </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>FS/AH8DX </TD><TD ALIGN=center>FS0 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Saint Martin </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>8P6SH </TD><TD ALIGN=center>8P6 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Barbados Island </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

</TR>

<TR>

<TD ALIGN=center>M0SDX </TD><TD ALIGN=center>M0 </TD><TD ALIGN=center>20M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>53 </TD><TD ALIGN=center>53 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>England </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>JE1RXJ </TD><TD ALIGN=center>JE1 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>54 </TD><TD ALIGN=center>53 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Japan </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>OQ4AMX </TD><TD ALIGN=center>OQ4 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Belgium </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>M0TTT/POTA </TD><TD ALIGN=center>M0 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>England </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>SM5CAK </TD><TD ALIGN=center>SM5 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Sweden </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>DL5ME </TD><TD ALIGN=center>DL5 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Federal Republic of </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>OK1KDT </TD><TD ALIGN=center>OK1 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Czech Republic </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>VP2EWC </TD><TD ALIGN=center>VP2 </TD><TD ALIGN=center>15M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Anguilla </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>PI5EHV </TD><TD ALIGN=center>PI5 </TD><TD ALIGN=center>15M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Netherlands </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>PJ7LT </TD><TD ALIGN=center>PJ7 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Sint Maarten, Saba, </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>HK3AXY </TD><TD ALIGN=center>HK3 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>56 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Colombia </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>OE5BJN </TD><TD ALIGN=center>OE5 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>58 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Austria </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>SM5CAK </TD><TD ALIGN=center>SM5 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>56 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Sweden </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>G0JMZ </TD><TD ALIGN=center>G0 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>58 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>England </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>F5BBD </TD><TD ALIGN=center>F5 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>France </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>HB9BYX </TD><TD ALIGN=center>HB9 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>58 </TD><TD ALIGN=center>55 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Switzerland </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>KC4AAA </TD><TD ALIGN=center>KC4 </TD><TD ALIGN=center>20M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>54 </TD><TD ALIGN=center>54 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Antarctica </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

</TR>

<TR>

<TD ALIGN=center>ER3CT </TD><TD ALIGN=center>ER3 </TD><TD ALIGN=center>15M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>55 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Moldova </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>CT1EWX </TD><TD ALIGN=center>CT1 </TD><TD ALIGN=center>15M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>55 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Portugal </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>VK9NS </TD><TD ALIGN=center>VK9 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>53 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Norfolk Island </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>SP3EPK </TD><TD ALIGN=center>SP3 </TD><TD ALIGN=center>20M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Poland </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>9K2KS </TD><TD ALIGN=center>9K2 </TD><TD ALIGN=center>20M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>55 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Kuwait </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

</TR>

<TR>

<TD ALIGN=center>IK0VV </TD><TD ALIGN=center>IK0 </TD><TD ALIGN=center>20M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Italy </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>F5BBD </TD><TD ALIGN=center>F5 </TD><TD ALIGN=center>20M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>France </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>PU1XBZ </TD><TD ALIGN=center>PU1 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Brazil </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>OM5DP </TD><TD ALIGN=center>OM5 </TD><TD ALIGN=center>15M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>56 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Slovakia </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>ON5UR </TD><TD ALIGN=center>ON5 </TD><TD ALIGN=center>10M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Belgium </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

</TR>

</TABLE>

Page Number: 1 with 50 QSOs Listed.

</body>

</html>

here what i get for output

<html>

<head>

<title>N9MFK Logbook</title>

</head>

<body background==========================================================================================

====================================================================================================

==================== bgcolor="#FFFFFF" text="#000000" link="#3366FF" vlink="#9900FF" alink="#000066">

N9MFK Logbook           Created on: 5/2/2007

<font face="Arial" size="2"

S-Type="REGENERATED" S-Format="%m/%d/%Y %H:%M"<!--webbot

bot="Timestamp" I-CheckSum="26219" endspan -->

<TR>

<TD ALIGN=center>CALL</TD><TD ALIGN=center>PFX</TD><TD ALIGN=center>BAND</TD><TD ALIGN=center>MODE</TD><TD ALIGN=center>RCVD</TD><TD ALIGN=center>SENT</TD><TD ALIGN=center>QSL-R</TD><TD ALIGN=center>QSL-S</TD><TD ALIGN=center>COUNTRY</TD><TD ALIGN=center>COUNTY</TD></TR>

<TR>

</TR>

<TR>

</TR>

<TR>

</TR>

<TR>

<TD ALIGN=center>RN6BY </TD><TD ALIGN=center>RN6 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>European Russia </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

</TR>

<TR>

<TD ALIGN=center>ES1QD </TD><TD ALIGN=center>ES1 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Estonia </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>F5NSB </TD><TD ALIGN=center>F5 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>55 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>France </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>IK6BRJ </TD><TD ALIGN=center>IK6 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Italy </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>S58N </TD><TD ALIGN=center>S58 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Slovenia </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>4X4BO </TD><TD ALIGN=center>4X4 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Israel </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>IK7QHH </TD><TD ALIGN=center>IK7 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>55 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Italy </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>OK2PBM </TD><TD ALIGN=center>OK2 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>43 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Czech Republic </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>S51GL </TD><TD ALIGN=center>S51 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>58 </TD><TD ALIGN=center>53 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Slovenia </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>PY2TO </TD><TD ALIGN=center>PY2 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Brazil </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>JE1RXJ </TD><TD ALIGN=center>JE1 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Japan </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>AL2J </TD><TD ALIGN=center>AL2 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>55 </TD><TD ALIGN=center>53 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Alaska </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>PA3GSU </TD><TD ALIGN=center>PA3 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Netherlands </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>FS/AH8DX </TD><TD ALIGN=center>FSØ </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Saint Martin </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>8P6SH </TD><TD ALIGN=center>8P6 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Barbados Island </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

</TR>

<TR>

<TD ALIGN=center>MØSDX </TD><TD ALIGN=center>MØ </TD><TD ALIGN=center>2ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>53 </TD><TD ALIGN=center>53 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>England </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>JE1RXJ </TD><TD ALIGN=center>JE1 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>54 </TD><TD ALIGN=center>53 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Japan </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>OQ4AMX </TD><TD ALIGN=center>OQ4 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Belgium </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>MØTTT/POTA </TD><TD ALIGN=center>MØ </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>England </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>SM5CAK </TD><TD ALIGN=center>SM5 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Sweden </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>DL5ME </TD><TD ALIGN=center>DL5 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Federal Republic of </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>OK1KDT </TD><TD ALIGN=center>OK1 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Czech Republic </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>VP2EWC </TD><TD ALIGN=center>VP2 </TD><TD ALIGN=center>15M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Anguilla </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>PI5EHV </TD><TD ALIGN=center>PI5 </TD><TD ALIGN=center>15M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Netherlands </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>PJ7LT </TD><TD ALIGN=center>PJ7 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Sint Maarten, Saba, </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>HK3AXY </TD><TD ALIGN=center>HK3 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>56 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Colombia </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>OE5BJN </TD><TD ALIGN=center>OE5 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>58 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Austria </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>SM5CAK </TD><TD ALIGN=center>SM5 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>56 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Sweden </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>GØJMZ </TD><TD ALIGN=center>GØ </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>58 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>England </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>F5BBD </TD><TD ALIGN=center>F5 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>France </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>HB9BYX </TD><TD ALIGN=center>HB9 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>58 </TD><TD ALIGN=center>55 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Switzerland </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>KC4AAA </TD><TD ALIGN=center>KC4 </TD><TD ALIGN=center>2ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>54 </TD><TD ALIGN=center>54 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Antarctica </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

</TR>

<TR>

<TD ALIGN=center>ER3CT </TD><TD ALIGN=center>ER3 </TD><TD ALIGN=center>15M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>55 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Moldova </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>CT1EWX </TD><TD ALIGN=center>CT1 </TD><TD ALIGN=center>15M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>55 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Portugal </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>VK9NS </TD><TD ALIGN=center>VK9 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>53 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>Norfolk Island </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>SP3EPK </TD><TD ALIGN=center>SP3 </TD><TD ALIGN=center>2ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Poland </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>9K2KS </TD><TD ALIGN=center>9K2 </TD><TD ALIGN=center>2ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>55 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Kuwait </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

</TR>

<TR>

<TD ALIGN=center>IKØVV </TD><TD ALIGN=center>IKØ </TD><TD ALIGN=center>2ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Italy </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>F5BBD </TD><TD ALIGN=center>F5 </TD><TD ALIGN=center>2ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>France </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>PU1XBZ </TD><TD ALIGN=center>PU1 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Brazil </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>OM5DP </TD><TD ALIGN=center>OM5 </TD><TD ALIGN=center>15M </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>56 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Slovakia </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

<TD ALIGN=center>ON5UR </TD><TD ALIGN=center>ON5 </TD><TD ALIGN=center>1ØM </TD><TD ALIGN=center>SSB </TD><TD ALIGN=center>59 </TD><TD ALIGN=center>57 </TD><TD ALIGN=center>Y </TD><TD ALIGN=center>&nbsp </TD><TD ALIGN=center>Belgium </TD><TD ALIGN=center>&nbsp </TD>

</TR>

<TR>

</TR>

</TABLE>

Page Number: 1 of 4 with 50 QSOs Listed.

</body>

</html>

this line

<body background==========================================================================================

====================================================================================================

==================== bgcolor="#FFFFFF" text="#000000" link="#3366FF" vlink="#9900FF" alink="#000066">

should be

how can i fix this

PsaltyDS · May 15, 2007

this line
<body background==========================================================================================
====================================================================================================
====================================================================================================
====================================================================================================
====================================================================================================
==================== bgcolor="#FFFFFF" text="#000000" link="#3366FF" vlink="#9900FF" alink="#000066">

should be
<body background= bgcolor="#FFFFFF" text="#000000" link="#3366FF" vlink="#9900FF" alink="#000066">

Wow! You have a real flair for "the hard way!"

This works for me (saved your input as Test.txt, wrote output to Test_Out.txt):

$FileIn = @ScriptDir & "\test.txt"
$FileOut = @ScriptDir & "\Test_Out.txt"

$FileOutData = StringReplace(FileRead($FileIn, FileGetSize($FileIn)), "<body background bgcolor", "<body background= bgcolor", 1)

$hFileOut = FileOpen($FileOut, 2)
FileWrite($hFileOut, $FileOutData)
FileClose($hFileOut)

Run('Notepad.exe "' & $FileOut & '"')

Edited May 15, 2007 by PsaltyDS

n9mfk9 · May 15, 2007

Hi PsaltyDS,

what wood the easy way to do this in one piece of code

here what i started with

$FileIn = @ScriptDir & "\TestIn.html"
$FileOut = @ScriptDir & "\TestOut.html"
$FileInData = FileRead($FileIn, FileGetSize($FileIn))
$avSplitData = StringSplit($FileInData, "<TD", 1)
$FileOutData = $avSplitData[1]
For $n = 2 To $avSplitData[0]
    $End = StringInStr($avSplitData[$n], "</TD>", 0, -1)
    $EndLen = StringLen($avSplitData[$n]) - $End + 1
    $EndText = StringRight($avSplitData[$n], $EndLen)
    $avSplitData[$n] = StringTrimRight($avSplitData[$n], $EndLen)
    
    $FileOutData &= "<TD" & StringReplace($avSplitData[$n], "0", "Ø") & $EndText
Next
$hFileOut = FileOpen($FileOut, 2)
FileWrite($hFileOut, $FileOutData)
FileClose($hFileOut)
Run('Notepad.exe "' & $FileOut & '"')
oÝ÷ Ú«{Z¶(Z½éèÁ«¢+Ø(()¥9½Ð¥±á¥ÍÑÌ¡MÉ¥ÁÑ¥ÈµÀìÅÕ½Ðì½8åµ|¨¹!Q50ÅÕ½Ðì¤Q¡¸(%5Í    ½à À°ÅÕ½ÐíQ¡ÉÉ¹¼¥±ÌÅÕ½Ðì±MÉ¥ÁÑ¥ÈµÀìÅÕ½Ðì½¸åµ|¨¹¡Ñµ°ÅÕ½Ðì¤(%á¥Ð(%¹%)%9½Ð¥±á¥ÍÑÌ¡MÉ¥ÁÑ¥ÈµÀìÅÕ½ÐìÀäÈí¥¹ÁÕÐÅÕ½Ðì¥Q¡¸)¥É
ÉÑ¡MÉ¥ÁÑ¥ÈµÀìÅÕ½ÐìÀäÈí¥¹ÁÕÐÅÕ½Ðì¤)¹%)%9½Ð¥±á¥ÍÑÌ¡MÉ¥ÁÑ¥ÈµÀìÅÕ½ÐìÀäÈí½ÕÑÁÕÐÅÕ½Ðì¥Q¡¸)¥É
ÉÑ¡MÉ¥ÁÑ¥ÈµÀìÅÕ½ÐìÀäÈí½ÕÑÁÕÐÅÕ½Ðì¤)¹%)%¥±á¥ÍÑÌ¡MÉ¥ÁÑ¥ÈµÀìÅÕ½Ðì½8åµ|¨¹!Q50ÅÕ½Ðì¤Q¡¸)¥±
½Áä¡MÉ¥ÁÑ¥ÈµÀìÅÕ½Ðì½¸åµ|¨¹¡Ñµ°ÅÕ½Ðì±MÉ¥ÁÑ¥ÈµÀìÅÕ½ÐìÀäÈí¥¹ÁÕÐÅÕ½Ðì°Ä¤)¹%(ÀÌØíÍ¥éô¥ÉÑM¥é¡MÉ¥ÁÑ¥ÈµÀìÅÕ½Ðì½¥¹ÁÕÐ¼ÅÕ½Ðì°Ä¤(ÀÌØí¹ÕµÈôÀÌØíÍ¥élÅt)½ÈÀÌØí½Õ¹ÐôÄQ¼ÀÌØí¹ÕµÈ(ÀÌØí¥±%¸ôMÉ¥ÁÑ¥ÈµÀìÅÕ½ÐìÀäÈí¥¹ÁÕÐÀäÈí¸åµ|ÅÕ½ÐìµÀìÀÌØí½Õ¹ÐµÀìÅÕ½Ðì¹¡Ñµ°ÅÕ½Ðì(ÀÌØí¥±=ÕÐôMÉ¥ÁÑ¥ÈµÀìÅÕ½ÐìÀäÈí½ÕÑÁÕÐÀäÈí¸åµ|ÅÕ½ÐìµÀìÀÌØí½Õ¹ÐµÀìÅÕ½Ðì¹¡Ñµ°ÅÕ½Ðì(ÀÌØí¥±%¹Ñô¥±I ÀÌØí¥±%¸°¥±ÑM¥é ÀÌØí¥±%¸¤¤(ÀÌØíÙMÁ±¥ÑÑôMÑÉ¥¹MÁ±¥Ð ÀÌØí¥±%¹Ñ°ÅÕ½Ðì±ÐíQÅÕ½Ðì°Ä¤((í5Í   ½à À°ÅÕ½ÐìÅÕ½Ðì°ÀÌØí¥±%¹Ñ¤(ìÀÌØí¥±%¹ÑôMÑÉ¥¹IÁ± ÀÌØí¥±¥¹Ñ°ÅÕ½ÐíÉ½Õ¹ÅÕ½Ðì°ÅÕ½ÐíÉ½Õ¹ôÅÕ½Ðì¤((ÀÌØí¥±=ÕÑÑôÀÌØíÙMÁ±¥ÑÑlÅt)½ÈÀÌØí¸ôÈQ¼ÀÌØíÙMÁ±¥ÑÑlÁt(ÀÌØí¹ôMÑÉ¥¹%¹MÑÈ ÀÌØíÙMÁ±¥ÑÑlÀÌØí¹t°ÅÕ½Ðì±Ðì½QÐìÅÕ½Ðì°À°´Ä¤(ÀÌØí¹1¸ôMÑÉ¥¹1¸ ÀÌØíÙMÁ±¥ÑÑlÀÌØí¹t¤´ÀÌØí¹¬Ä(ÀÌØí¹QáÐôMÑÉ¥¹I¥¡Ð ÀÌØíÙMÁ±¥ÑÑlÀÌØí¹t°ÀÌØí¹1¸¤(ÀÌØíÙMÁ±¥ÑÑlÀÌØí¹tôMÑÉ¥¹QÉ¥µI¥¡Ð ÀÌØíÙMÁ±¥ÑÑlÀÌØí¹t°ÀÌØí¹1¸¤((ÀÌØí¬ôÅÕ½ÐíÉ½Õ¹ôÅÕ½ÐíÐ(ÀÌØí¥±=ÕÑÑµÀìôÅÕ½Ðì±ÐíQÅÕ½ÐìµÀìMÑÉ¥¹IÁ± ÀÌØíÙMÁ±¥ÑÑlÀÌØí¹t°ÅÕ½ÐìÀÅÕ½Ðì°ÅÕ½Ðï`ÅÕ½Ðì¤µÀìÀÌØí¹QáÐ(ÀÌØí¥±=ÕÑÑôMÑÉ¥¹IÁ± ÀÌØí¥±=ÕÑÑ°ÅÕ½ÐíÝ¥Ñ ÅÕ½Ðì°ÅÕ½Ðí½ÅÕ½ÐìµÀìÀÌØí¹ÕµÈµÀìÅÕ½ÐìÝ¥Ñ ÅÕ½Ðì¤(ÀÌØí¥±=ÕÑÑôMÑÉ¥¹IÁ± ÀÌØí¥±=ÕÑÑ°ÅÕ½ÐíÉ½Õ¹ÅÕ½Ðì°ÀÌØí¬¤()9áÐ((ÀÌØí¡¥±=ÕÐô¥±=Á¸ ÀÌØí¥±=ÕÐ°È¤)¥±]É¥Ñ ÀÌØí¡¥±=ÕÐ°ÀÌØí¥±=ÕÑÑ¤)¥±
±½Í ÀÌØí¡¥±=ÕÐ¤)¥±
±½Í ÀÌØí¥±%¸¤)¥±
±½Í ÀÌØí¥±=ÕÐ¤)IÕ¸ Ìäí9½ÑÁ¹áÅÕ½ÐìÌäìµÀìÀÌØí¥±=ÕÐµÀìÌäìÅÕ½ÐìÌäì¤()¹áÐ(

thanks for any help

xcal · May 15, 2007

How about...

#include <string.au3>
$file = FileRead('test.txt')
$between = _StringBetween($file, 'background=', 'bgcolor')
$result = StringReplace($file, $between[0], ' ')
$output = FileOpen('test_out.txt', 2)
FileWrite($output, $result)
Run('notepad.exe ' & @ScriptDir & '\test_out.txt')
FileClose($output)

(test.txt had the text with all the = signs.)

PsaltyDS · May 15, 2007

Smarter people than me (which is almost everybody, and by definition leaves me out) would get that in just three lines with REGEXP (regular expressions). The Greek hieroglyphics involved with RegExp make my hair hurt, though, so the important point is does what you have now work? Are you getting the right output now?

Edited May 15, 2007 by PsaltyDS

n9mfk9 · May 15, 2007

Smarter people than me (which is almost everybody, and by definition leaves me out) would get that in just three lines with REGEXP (regular expressions). The Greek hieroglyphics involved with RegExp make my hair hurt, though, so the important point is does what you have now work? Are you getting the right output now?

if Not FileExists(@ScriptDir & "/N9mfk_*.HTML") Then
    MsgBox(0,"There are no Files",@ScriptDir & "/n9mfk_*.html")
    Exit
    EndIf
IF Not FileExists(@ScriptDir & "\input")Then 
DirCreate (@ScriptDir & "\input")
EndIf
IF Not FileExists(@ScriptDir & "\output")Then 
DirCreate (@ScriptDir & "\output")
EndIf
If FileExists(@ScriptDir & "/N9mfk_*.HTML") Then
FileCopy(@ScriptDir & "/n9mfk_*.html",@ScriptDir & "\input",1)
EndIf
$size = DirGetSize(@ScriptDir &"/input/",1)
$number = $size[1]
For $count = 1 To $number
$FileIn = @ScriptDir & "\input\n9mfk_"&$count&".html"
$FileOut = @ScriptDir & "\output\n9mfk_"&$count&".html"
$FileInData = FileRead($FileIn, FileGetSize($FileIn))
$avSplitData = StringSplit($FileInData, "<TD", 1)

;MsgBox(0,"",$FileInData)
;$FileInData = StringReplace($FileinData, "background","background=")

$FileOutData = $avSplitData[1]
For $n = 2 To $avSplitData[0]
    $End = StringInStr($avSplitData[$n], "</TD>", 0, -1)
    $EndLen = StringLen($avSplitData[$n]) - $End + 1
    $EndText = StringRight($avSplitData[$n], $EndLen)
    $avSplitData[$n] = StringTrimRight($avSplitData[$n], $EndLen)
  
  $back = "background="
  $FileOutData &= "<TD" & StringReplace($avSplitData[$n], "0", "Ø") & $EndText
  $FileOutData = StringReplace($FileOutData, "with","of " &$number &" with")
 $FileOutData = StringReplace($FileOutData, "background",$back)

Next 

$hFileOut = FileOpen($FileOut, 2)
FileWrite($hFileOut, $FileOutData)
FileClose($hFileOut)
FileClose($FileIn)
FileClose($FileOut)
Run('Notepad.exe "' & $FileOut & '"')

next 
oÝ÷ Ù«¢+Ø)Ñ¡¥Ì±¥¹¥Ì¹½ÐÝ½É¥¹(ÀÌØí¬ôÅÕ½ÐíÉ½Õ¹ôÅÕ½Ðì((ÀÌØí¥±=ÕÑÑôMÑÉ¥¹IÁ± ÀÌØí¥±=ÕÑÑ°ÅÕ½ÐíÉ½Õ¹ÅÕ½Ðì°ÀÌØí¬¤()¤Ðôôôôôôôôôôôôôôôôô¥¹ÍÑ½ô(

thanks beau

Xenobiologist · May 15, 2007

Hi,

try this :

$FileOutData = FileWrite(FileOpen(@ScriptDir & "\gleich_Out.txt", 10), StringRegExpReplace(StringRegExpReplace(FileRead(@ScriptDir & "\gleich.txt", FileGetSize(@ScriptDir & "\gleich.txt")), '[=]{10,}([\n|\r]){2,}', ''), '[=]{10,}', ''))
Run('Notepad.exe "' & $FileOut & '"')

So long,

Mega

You need your file pathes!

PsaltyDS · May 15, 2007

this line is not working 
$back = "background="

$FileOutData = StringReplace($FileOutData, "background",$back)

i get ================= instead of =

thanks beau

Ahh. That's because the search term you are matching is not specific enough, and you are re-replacing the same thing over and over again in the loop. Look at it this way:

1. You start off with "<body background bgcolor...", and get a match on the underlined part so you do the replace.

2. Now you have: "<body background= bgcolor...", which is what you wanted, but...

3. You go in and do the replace AGAIN and find a match on: "<body background= bgcolor...", so you do the replace.

4. Now you have: "<body background== bgcolor...", which already going wrong.

5. Match again on: "<body background== bgcolor...", replace again, and you get: "<body background=== bgcolor..."

6. etc., etc.

This is why in the code I posted earlier the match was made on "<body background bgcolor" because once the replace is made that part won't match any more.

Xenobiologist · May 15, 2007

Hi,

is my code an alternative for you?

So long,

Mega

n9mfk9 · May 22, 2007

Is there a bater way to do this

this is the text i wet to find

<title>N9MFK Logbook</title>

the stingreplace is doing 123 123 123 if there no other text to look for what can i do

$FileOutData = StringReplace($FileOutData,"<title>N9MFK Logbook</title>", "<title> N9MFK Logbook</title>" & "123",1)

thanks

GMK · May 22, 2007

Going with your original code, this worked for me:

If Not FileExists(@ScriptDir & "\N9mfk_*.HTML") Then
   MsgBox(0, "There are no Files", @ScriptDir & "\n9mfk_*.html")
   Exit
EndIf
If Not FileExists(@ScriptDir & "\input") Then
   DirCreate(@ScriptDir & "\input")
EndIf
If Not FileExists(@ScriptDir & "\output") Then
   DirCreate(@ScriptDir & "\output")
EndIf
If FileExists(@ScriptDir & "\N9mfk_*.HTML") Then
   FileCopy(@ScriptDir & "\n9mfk_*.html", @ScriptDir & "\input", 1)
EndIf
$size = DirGetSize(@ScriptDir & "\input\", 1)
$number = $size[1]
For $count = 1 To $number
   $FileIn = @ScriptDir & "\input\n9mfk_" & $count & ".html"
   $FileOut = @ScriptDir & "\output\n9mfk_" & $count & ".html"
   $FileInData = FileRead($FileIn, FileGetSize($FileIn))
   $avSplitData = StringSplit($FileInData, "<TD", 1)
   ;MsgBox(0,"",$FileInData)
   $FileOutData = $avSplitData[1]
   For $n = 2 To $avSplitData[0]
      $End = StringInStr($avSplitData[$n], "</TD>", 0, -1)
      $EndLen = StringLen($avSplitData[$n]) - $End + 1
      $EndText = StringRight($avSplitData[$n], $EndLen)
      $avSplitData[$n] = StringTrimRight($avSplitData[$n], $EndLen)
      $FileOutData &= "<TD" & StringReplace($avSplitData[$n], "0", "Ø") & $EndText
      $FileOutData = StringReplace($FileOutData, "with", "of " & $number & " with")
      $FileOutData = StringReplace($FileOutData, " background "," background= ")
      $FileOutData = StringReplace($FileOutData,"<title>N9MFK Logbook</title>", "<title> N9MFK Logbook</title>" & "123",1)
   Next
   $hFileOut = FileOpen($FileOut, 2)
   FileWrite($hFileOut, $FileOutData)
   FileClose($hFileOut)
   FileClose($FileIn)
   FileClose($FileOut)
   Run('Notepad.exe "' & $FileOut & '"')
Next

n9mfk9 · May 22, 2007

hi gmk if you take the space out of this line then i get the error 123123123

, "<title>N9MFK Logbook</title>" & "123",1)

Going with your original code, this worked for me:

If Not FileExists(@ScriptDir & "\N9mfk_*.HTML") Then
   MsgBox(0, "There are no Files", @ScriptDir & "\n9mfk_*.html")
   Exit
EndIf
If Not FileExists(@ScriptDir & "\input") Then
   DirCreate(@ScriptDir & "\input")
EndIf
If Not FileExists(@ScriptDir & "\output") Then
   DirCreate(@ScriptDir & "\output")
EndIf
If FileExists(@ScriptDir & "\N9mfk_*.HTML") Then
   FileCopy(@ScriptDir & "\n9mfk_*.html", @ScriptDir & "\input", 1)
EndIf
$size = DirGetSize(@ScriptDir & "\input\", 1)
$number = $size[1]
For $count = 1 To $number
   $FileIn = @ScriptDir & "\input\n9mfk_" & $count & ".html"
   $FileOut = @ScriptDir & "\output\n9mfk_" & $count & ".html"
   $FileInData = FileRead($FileIn, FileGetSize($FileIn))
   $avSplitData = StringSplit($FileInData, "<TD", 1)
   ;MsgBox(0,"",$FileInData)
   $FileOutData = $avSplitData[1]
   For $n = 2 To $avSplitData[0]
      $End = StringInStr($avSplitData[$n], "</TD>", 0, -1)
      $EndLen = StringLen($avSplitData[$n]) - $End + 1
      $EndText = StringRight($avSplitData[$n], $EndLen)
      $avSplitData[$n] = StringTrimRight($avSplitData[$n], $EndLen)
      $FileOutData &= "<TD" & StringReplace($avSplitData[$n], "0", "Ø") & $EndText
      $FileOutData = StringReplace($FileOutData, "with", "of " & $number & " with")
      $FileOutData = StringReplace($FileOutData, " background "," background= ")
      $FileOutData = StringReplace($FileOutData,"<title>N9MFK Logbook</title>", "<title> N9MFK Logbook</title>" & "123",1)
   Next
   $hFileOut = FileOpen($FileOut, 2)
   FileWrite($hFileOut, $FileOutData)
   FileClose($hFileOut)
   FileClose($FileIn)
   FileClose($FileOut)
   Run('Notepad.exe "' & $FileOut & '"')
Next

GMK · May 22, 2007

hi gmk if you take the space out of this line then i get the error 123123123
, "<title>N9MFK Logbook</title>" & "123",1)

Maybe this line will work better:

$FileOutData = StringReplace($FileOutData,"<title>N9MFK Logbook</title>" & @CR, "<title>N9MFK Logbook</title>" & "123" & @CR,1)

stringreplace not working?

Recommended Posts

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Create an account or sign in to comment

Create an account

Sign in

Recently Browsing 0 members