edit a post

you need to include the file functions/functions_format_post.asp within any page that shows any data regarding posts.

and run the entry received by the query though the following functions.




        'If the post contains a quote or code block then format it
        If InStr(1, strMessage, "[ QUOTE=", 1) > 0 AND InStr(1, strMessage, "[/QUOTE]", 1) > 0 Then strMessage = formatUserQuote(strMessage)
        If InStr(1, strMessage, "[ QUOTE]", 1) > 0 AND InStr(1, strMessage, "[/QUOTE]", 1) > 0 Then strMessage = formatQuote(strMessage)
        If InStr(1, strMessage, "[ CODE]", 1) > 0 AND InStr(1, strMessage, "[/CODE]", 1) > 0 Then strMessage = formatCode(strMessage)
       



        'If the post contains a flash link then format it
        If blnFlashFiles Then
            If InStr(1, strMessage, "[FLASH", 1) > 0 AND InStr(1, strMessage, "[/FLASH]", 1) > 0 Then strMessage = formatFlash(strMessage)
            If InStr(1, strAuthorSignature, "[FLASH", 1) > 0 AND InStr(1, strAuthorSignature, "[/FLASH]", 1) > 0 Then strAuthorSignature = formatFlash(strAuthorSignature)
        End If
       
       
        'If the message has been edited parse the 'edited by' XML into HTML for the post
        If InStr(1, strMessage, "<edited>", 1) Then strMessage = editedXMLParser(strMessage)


        'Call the function to highlight search words if coming froma search page
        If strSearchKeywords <> "" Then strMessage = searchHighlighter(strMessage, sarySearchWord)


        'If the user wants there signature shown then attach it to the message
        If rsPost("Show_signature") AND strAuthorSignature <> "" Then strMessage = strMessage & "<!-- Signature --><br /><br />__________________<br />" & strAuthorSignature & "<!-- Signature -->"

       

please note an extra space has been but between the first lines (code, quote etc)


Edited by dj air - 05 August 2005 at 5:53pm