Ok it is done!
Thank you.. <

okay.. I tried this, the new read message is changed ok but it's still not showing the message body copy-
where did I go wrong? http://www.rattlebrain.com/~sokkmonkey/inc_subscription.txt

Likewise if I was to add the following to strip the HTML and netcode, where would be a good place to stick it?
Function StripCode(ByVal fString)
if fString = "" or IsNull(fString) then
fString = " empty string test"
elseif strAllowForumCode = "1" then
'filter out forumcode
fStringLeft = ""
fFound = False
Do While InStr(fString, "[")
fFound = True
fStringLeft = fStringLeft & " " & Left(fString, InStr(fString, "[")-1)
fString = MID(fString, InStr(fString, "]") + 1)
Loop
StripCode = fStringLeft & fString
If Not fFound Then StripCode = fString
elseif strAllowHTML = "1" then
' filter out html code

fStringLeft = ""
fFound = False
Do While InStr(fString, "<")
fFound = True
fStringLeft = fStringLeft & " " & Left(fString, InStr(fString, "<")-1)
fString = MID(fString, InStr(fString, ">") + 1)
Loop
StripCode = fStringLeft & fString
If Not fFound Then StripCode = fString
end if
if strBadWordFilter = "1" then
fString = ChkBadWords(fString)
end if
StripCode = fString
End Function<

If all you want is to break-up the various replies, that shouldn't be too difficult. The following modification should give you a blank line between replies.
Change this line:
strSubject = strForumTitle & " - Reply to a posting"

to say:
strSubject = "<br><br>" & strForumTitle & " - Reply to a posting"<

you need an & after the string and before the vbNewline, like so

strMessage = strMessage & "You can view the posting by logging onto the Patrol Reps Forum " & vbNewline<