Loading ...
Sorry, an error occurred while loading the content.

Clip to change @ to HTML numeric equivelant in Email addresses, afetr making into a LINK

Expand Messages
  • Jeffery Scism
    I have modified my highlighted email address to HTML link clip to make the @ symbol substitution. 1. Highlight an email address in a HTML document, click
    Message 1 of 8 , Oct 8, 2005
    • 0 Attachment
      I have modified my "highlighted email address" to HTML link clip to make
      the @ symbol substitution.


      1. Highlight an email address in a HTML document, click this Clip.
      2 The email address is converted to a emailto: link THEN the @ symbols
      are replaced with @

      This is reported to reduce harvesting of email addresses from websites.

      Another (more effective) way is to convert all text in the link to html
      Numeric equivalents, but I don't know how to do that in a clip.

      ^!InsertHtml <B><A HREF="mailto:^&">^&</A></B>
      ^!Replace @ >> @ BA

      --
      ~~

      Jeffery G. Scism, IBSSG
      Local Coordinator Representative,
      NE/NC Region, USGenWeb Project

      http://usgenweb.org/
    • marker@us421.com
      Hi Jeffrey, Somewhere in my travels I found a clip someone had written called HideEmail. It converts anything you select to ASCII. In my experiments, the
      Message 2 of 8 , Oct 8, 2005
      • 0 Attachment
        Hi Jeffrey,

        Somewhere in my travels I found a clip someone had written called
        HideEmail. It converts anything you select to ASCII. In my
        experiments, the conversion only completely protects the address if
        you convert the mailto as well, for example:

        <a href="mailto:me@...">me@...</a> would become

        <a
        href="mailto:me@e&
        #120;ample.com">me
        @example.com</
        a>

        I would like to be able to tell you where I got the clip, but there is
        no link. The author is Christopher Dray. I hope it is appropriate to
        copy it here.
        Karen
        NOTE: This clip only converts printable characters from the lower 128
        characters of the ISO 8859-1 character set (ASCII).

        Convert
        ^!Set %selection%=^$GetSelection$

        ^!IF ^$GetSelSize$ > 0 PROCESS

        ^!Prompt You have not made a selection!
        ^!Goto EXIT

        :PROCESS

        ^!Set %asciiset%=" !
        #$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefgh
        ijklmnopqrstuvwxyz{|}~"
        ^!Set %dblquote%="
        ^!Set %equlsign%==
        ^!Set %grtrthan%=>

        ^!Set %length%=^$StrSize(^%selection%)$
        ^!Set %index%=1
        ^!Set %replacement%=^%EMPTY%

        :CONVERTLOOP

        ^!Set %char%=^$StrIndex(^%selection%;^%index%)$

        ^!IF "^%char%" <> "^%dblquote%" LOOKUP

        ^!Set %value%=34
        ^!Goto APPENDVALUE

        :LOOKUP

        ^!Set %value%=^$StrPos(^%char%;^%asciiset%;True)$
        ^!Inc %value% 31

        ^!IfInRange ^%value% 32..126 APPENDVALUE

        ^!Set %value%=32

        :APPENDVALUE

        ^!Append %replacement%="&#"
        ^!Append %replacement%=^%value%
        ^!Append %replacement%=^%SC%

        :SKIPAPPEND

        ^!Inc %index%
        ^!IF ^%index% <= ^%length% CONVERTLOOP

        ^%replacement%

        On Sat, 08 Oct 2005 11:26:37 -0700, Jeffery Scism brightened my day
        with:
        > This is reported to reduce harvesting of email addresses from
        > websites.
        >
        > Another (more effective) way is to convert all text in the link to
        > html
        > Numeric equivalents, but I don't know how to do that in a clip.
      • Rudolf Horbas
        Hi Jeffery, ... There s a clip by Chris Barnhill that does exacly that. As the URI in the clip:about is no longer valid, I ll post the clip here (kind of
        Message 3 of 8 , Oct 8, 2005
        • 0 Attachment
          Hi Jeffery,

          > Another (more effective) way is to convert all text in the link to html
          > Numeric equivalents, but I don't know how to do that in a clip.

          There's a clip by Chris Barnhill that does exacly that.
          As the URI in the clip:about is no longer valid, I'll post the clip here
          (kind of longish, but ist works well).

          (Hope the specialchars survive mail transport.)

          HTH,
          Rudi

          H=";About This Library"
          Created by: Chris Barnhill
          scorpio@...
          http;//www.txdirect.net/~scorpio

          To encode the characters in a document to their HTML equivalents, simply
          select the text and then run the clip "ASCII - HTML". To decode HTML
          characters, select the code and then click "HTML - ASCII".

          This clip can be very useful in disguising information on a web page
          from certain types of bots on the internet as well as making it
          difficult for others to steal code from your web page.

          H="ASCII - HTML"
          ^!REPLACE "&" >> "*&*" HTSA
          ^!REPLACE "#" >> "*#*" HTSA
          ^!REPLACE ";" >> "*;*" HTSA
          ^!REPLACE "*&*" >> "&" HTSA
          ^!REPLACE "*#*" >> "#" HTSA
          ^!REPLACE "*;*" >> ";" HTSA
          ^!REPLACE "1" >> "*1*" HTSA
          ^!REPLACE "2" >> "*2*" HTSA
          ^!REPLACE "3" >> "*3*" HTSA
          ^!REPLACE "4" >> "*4*" HTSA
          ^!REPLACE "5" >> "*5*" HTSA
          ^!REPLACE "6" >> "*6*" HTSA
          ^!REPLACE "7" >> "*7*" HTSA
          ^!REPLACE "8" >> "*8*" HTSA
          ^!REPLACE "9" >> "*9*" HTSA
          ^!REPLACE "0" >> "*0*" HTSA
          ^!REPLACE "*1*" >> "1" HTSA
          ^!REPLACE "*2*" >> "2" HTSA
          ^!REPLACE "*3*" >> "3" HTSA
          ^!REPLACE "*4*" >> "4" HTSA
          ^!REPLACE "*5*" >> "5" HTSA
          ^!REPLACE "*6*" >> "6" HTSA
          ^!REPLACE "*7*" >> "7" HTSA
          ^!REPLACE "*8*" >> "8" HTSA
          ^!REPLACE "*9*" >> "9" HTSA
          ^!REPLACE "*0*" >> "0" HTSA
          ^!REPLACE "&#38;" >> "&" HTSA
          ^!REPLACE "&#59;" >> ";" HTSA
          ^!REPLACE "&#35;" >> "#" HTSA
          ^!REPLACE "." >> "." HTSA
          ^!REPLACE "/" >> "/" HTSA
          ^!REPLACE "@" >> "@" HTSA
          ^!REPLACE """ >> """ HTSA
          ^!REPLACE "'" >> "'" HTSA
          ^!REPLACE "(" >> "(" HTSA
          ^!REPLACE ")" >> ")" HTSA
          ^!REPLACE "[" >> "[" HTSA
          ^!REPLACE "\" >> "\" HTSA
          ^!REPLACE "]" >> "]" HTSA
          ^!REPLACE ":" >> ":" HTSA
          ^!REPLACE "<" >> "<" HTSA
          ^!REPLACE "=" >> "=" HTSA
          ^!REPLACE ">" >> ">" HTSA
          ^!REPLACE "}" >> "}" HTSA
          ^!REPLACE "{" >> "{" HTSA
          ^!REPLACE "~" >> "~" HTSA
          ^!REPLACE "‘" >> "‘" HTSA
          ^!REPLACE "’" >> "’" HTSA
          ^!REPLACE " " >> " " HTSA
          ^!REPLACE "!" >> "!" HTSA
          ^!REPLACE "$" >> "$" HTSA
          ^!REPLACE "%" >> "%" HTSA
          ^!REPLACE "*" >> "*" HTSA
          ^!REPLACE "+" >> "+" HTSA
          ^!REPLACE "," >> "," HTSA
          ^!REPLACE "-" >> "-" HTSA
          ^!REPLACE "^" >> "^" HTSA
          ^!REPLACE "_" >> "_" HTSA
          ^!REPLACE "`" >> "`" HTSA
          ^!REPLACE "?" >> "?" HTSA
          ^!REPLACE "|" >> "|" HTSA
          ^!REPLACE "€" >> "€" HTSA
          ^!REPLACE "‚" >> "‚" HTSA
          ^!REPLACE "ƒ" >> "ƒ" HTSA
          ^!REPLACE "„" >> "„" HTSA
          ^!REPLACE "…" >> "…" HTSA
          ^!REPLACE "†" >> "†" HTSA
          ^!REPLACE "‡" >> "‡" HTSA
          ^!REPLACE "ˆ" >> "ˆ" HTSA
          ^!REPLACE "‰" >> "‰" HTSA
          ^!REPLACE "Š" >> "Š" HTSA
          ^!REPLACE "‹" >> "‹" HTSA
          ^!REPLACE "Œ" >> "Œ" HTSA
          ^!REPLACE "Ž" >> "Ž" HTSA
          ^!REPLACE "“" >> "“" HTSA
          ^!REPLACE "”" >> "”" HTSA
          ^!REPLACE "•" >> "•" HTSA
          ^!REPLACE "–" >> "–" HTSA
          ^!REPLACE "—" >> "—" HTSA
          ^!REPLACE "˜" >> "˜" HTSA
          ^!REPLACE "™" >> "™" HTSA
          ^!REPLACE "š" >> "š" HTSA
          ^!REPLACE "›" >> "›" HTSA
          ^!REPLACE "œ" >> "œ" HTSA
          ^!REPLACE "ž" >> "ž" HTSA
          ^!REPLACE "Ÿ" >> "Ÿ" HTSA
          ^!REPLACE "¡" >> "¡" HTSA
          ^!REPLACE "¢" >> "¢" HTSA
          ^!REPLACE "£" >> "£" HTSA
          ^!REPLACE "¤" >> "¤" HTSA
          ^!REPLACE "¥" >> "¥" HTSA
          ^!REPLACE "¦" >> "¦" HTSA
          ^!REPLACE "§" >> "§" HTSA
          ^!REPLACE "¨" >> "¨" HTSA
          ^!REPLACE "©" >> "©" HTSA
          ^!REPLACE "ª" >> "ª" HTSA
          ^!REPLACE "«" >> "«" HTSA
          ^!REPLACE "¬" >> "¬" HTSA
          ^!REPLACE "­" >> "­" HTSA
          ^!REPLACE "®" >> "®" HTSA
          ^!REPLACE "¯" >> "¯" HTSA
          ^!REPLACE "°" >> "°" HTSA
          ^!REPLACE "±" >> "±" HTSA
          ^!REPLACE "²" >> "²" HTSA
          ^!REPLACE "³" >> "³" HTSA
          ^!REPLACE "´" >> "´" HTSA
          ^!REPLACE "µ" >> "µ" HTSA
          ^!REPLACE "¶" >> "¶" HTSA
          ^!REPLACE "·" >> "·" HTSA
          ^!REPLACE "¸" >> "¸" HTSA
          ^!REPLACE "¹" >> "¹" HTSA
          ^!REPLACE "º" >> "º" HTSA
          ^!REPLACE "»" >> "»" HTSA
          ^!REPLACE "¼" >> "¼" HTSA
          ^!REPLACE "½" >> "½" HTSA
          ^!REPLACE "¾" >> "¾" HTSA
          ^!REPLACE "¿" >> "¿" HTSA
          ^!REPLACE "Þ" >> "Þ" HTSA
          ^!REPLACE "÷" >> "÷" HTSA
          ^!REPLACE "ø" >> "ø" HTSA
          ^!REPLACE "þ" >> "þ" HTSA
          ^!REPLACE "æ" >> "æ" HTSA
          ^!REPLACE "ß" >> "ß" HTSA
          ^!REPLACE "×" >> "×" HTSA
          ^!REPLACE "Ø" >> "Ø" HTSA
          ^!REPLACE "Ð" >> "Ð" HTSA
          ^!REPLACE "Æ" >> "Æ" HTSA
          ^!REPLACE "A" >> "A" HTSA
          ^!REPLACE "B" >> "B" HTSA
          ^!REPLACE "C" >> "C" HTSA
          ^!REPLACE "D" >> "D" HTSA
          ^!REPLACE "E" >> "E" HTSA
          ^!REPLACE "F" >> "F" HTSA
          ^!REPLACE "G" >> "G" HTSA
          ^!REPLACE "H" >> "H" HTSA
          ^!REPLACE "I" >> "I" HTSA
          ^!REPLACE "J" >> "J" HTSA
          ^!REPLACE "K" >> "K" HTSA
          ^!REPLACE "L" >> "L" HTSA
          ^!REPLACE "M" >> "M" HTSA
          ^!REPLACE "N" >> "N" HTSA
          ^!REPLACE "O" >> "O" HTSA
          ^!REPLACE "P" >> "P" HTSA
          ^!REPLACE "Q" >> "Q" HTSA
          ^!REPLACE "R" >> "R" HTSA
          ^!REPLACE "S" >> "S" HTSA
          ^!REPLACE "T" >> "T" HTSA
          ^!REPLACE "U" >> "U" HTSA
          ^!REPLACE "V" >> "V" HTSA
          ^!REPLACE "W" >> "W" HTSA
          ^!REPLACE "X" >> "X" HTSA
          ^!REPLACE "Y" >> "Y" HTSA
          ^!REPLACE "Z" >> "Z" HTSA
          ^!REPLACE "a" >> "a" HTSA
          ^!REPLACE "b" >> "b" HTSA
          ^!REPLACE "c" >> "c" HTSA
          ^!REPLACE "d" >> "d" HTSA
          ^!REPLACE "e" >> "e" HTSA
          ^!REPLACE "f" >> "f" HTSA
          ^!REPLACE "g" >> "g" HTSA
          ^!REPLACE "h" >> "h" HTSA
          ^!REPLACE "i" >> "i" HTSA
          ^!REPLACE "j" >> "j" HTSA
          ^!REPLACE "k" >> "k" HTSA
          ^!REPLACE "l" >> "l" HTSA
          ^!REPLACE "m" >> "m" HTSA
          ^!REPLACE "n" >> "n" HTSA
          ^!REPLACE "o" >> "o" HTSA
          ^!REPLACE "p" >> "p" HTSA
          ^!REPLACE "q" >> "q" HTSA
          ^!REPLACE "r" >> "r" HTSA
          ^!REPLACE "s" >> "s" HTSA
          ^!REPLACE "t" >> "t" HTSA
          ^!REPLACE "u" >> "u" HTSA
          ^!REPLACE "v" >> "v" HTSA
          ^!REPLACE "w" >> "w" HTSA
          ^!REPLACE "x" >> "x" HTSA
          ^!REPLACE "y" >> "y" HTSA
          ^!REPLACE "z" >> "z" HTSA
          ^!REPLACE "À" >> "À" HTSA
          ^!REPLACE "Á" >> "Á" HTSA
          ^!REPLACE "Â" >> "Â" HTSA
          ^!REPLACE "Ã" >> "Ã" HTSA
          ^!REPLACE "Ä" >> "Ä" HTSA
          ^!REPLACE "Å" >> "Å" HTSA
          ^!REPLACE "Ç" >> "Ç" HTSA
          ^!REPLACE "È" >> "È" HTSA
          ^!REPLACE "É" >> "É" HTSA
          ^!REPLACE "Ê" >> "Ê" HTSA
          ^!REPLACE "Ë" >> "Ë" HTSA
          ^!REPLACE "Ì" >> "Ì" HTSA
          ^!REPLACE "Í" >> "Í" HTSA
          ^!REPLACE "Î" >> "Î" HTSA
          ^!REPLACE "Ï" >> "Ï" HTSA
          ^!REPLACE "Ñ" >> "Ñ" HTSA
          ^!REPLACE "Ò" >> "Ò" HTSA
          ^!REPLACE "Ó" >> "Ó" HTSA
          ^!REPLACE "Ô" >> "Ô" HTSA
          ^!REPLACE "Õ" >> "Õ" HTSA
          ^!REPLACE "Ö" >> "Ö" HTSA
          ^!REPLACE "Ù" >> "Ù" HTSA
          ^!REPLACE "Ú" >> "Ú" HTSA
          ^!REPLACE "Û" >> "Û" HTSA
          ^!REPLACE "Ü" >> "Ü" HTSA
          ^!REPLACE "Ý" >> "Ý" HTSA
          ^!REPLACE "à" >> "à" HTSA
          ^!REPLACE "á" >> "á" HTSA
          ^!REPLACE "â" >> "â" HTSA
          ^!REPLACE "ã" >> "ã" HTSA
          ^!REPLACE "ä" >> "ä" HTSA
          ^!REPLACE "å" >> "å" HTSA
          ^!REPLACE "ç" >> "ç" HTSA
          ^!REPLACE "è" >> "è" HTSA
          ^!REPLACE "é" >> "é" HTSA
          ^!REPLACE "ê" >> "ê" HTSA
          ^!REPLACE "ë" >> "ë" HTSA
          ^!REPLACE "ì" >> "ì" HTSA
          ^!REPLACE "í" >> "í" HTSA
          ^!REPLACE "î" >> "î" HTSA
          ^!REPLACE "ï" >> "ï" HTSA
          ^!REPLACE "ð" >> "ð" HTSA
          ^!REPLACE "ñ" >> "ñ" HTSA
          ^!REPLACE "ò" >> "ò" HTSA
          ^!REPLACE "ó" >> "ó" HTSA
          ^!REPLACE "ô" >> "ô" HTSA
          ^!REPLACE "õ" >> "õ" HTSA
          ^!REPLACE "ö" >> "ö" HTSA
          ^!REPLACE "ù" >> "ù" HTSA
          ^!REPLACE "ú" >> "ú" HTSA
          ^!REPLACE "û" >> "û" HTSA
          ^!REPLACE "ü" >> "ü" HTSA
          ^!REPLACE "ý" >> "ý" HTSA
          ^!REPLACE "ÿ" >> "ÿ" HTSA

          H="HTML - ASCII"
          ^!REPLACE "A" >> "A" HTSA
          ^!REPLACE "B" >> "B" HTSA
          ^!REPLACE "C" >> "C" HTSA
          ^!REPLACE "D" >> "D" HTSA
          ^!REPLACE "E" >> "E" HTSA
          ^!REPLACE "F" >> "F" HTSA
          ^!REPLACE "G" >> "G" HTSA
          ^!REPLACE "H" >> "H" HTSA
          ^!REPLACE "I" >> "I" HTSA
          ^!REPLACE "J" >> "J" HTSA
          ^!REPLACE "K" >> "K" HTSA
          ^!REPLACE "L" >> "L" HTSA
          ^!REPLACE "M" >> "M" HTSA
          ^!REPLACE "N" >> "N" HTSA
          ^!REPLACE "O" >> "O" HTSA
          ^!REPLACE "P" >> "P" HTSA
          ^!REPLACE "Q" >> "Q" HTSA
          ^!REPLACE "R" >> "R" HTSA
          ^!REPLACE "S" >> "S" HTSA
          ^!REPLACE "T" >> "T" HTSA
          ^!REPLACE "U" >> "U" HTSA
          ^!REPLACE "V" >> "V" HTSA
          ^!REPLACE "W" >> "W" HTSA
          ^!REPLACE "X" >> "X" HTSA
          ^!REPLACE "Y" >> "Y" HTSA
          ^!REPLACE "Z" >> "Z" HTSA
          ^!REPLACE "a" >> "a" HTSA
          ^!REPLACE "b" >> "b" HTSA
          ^!REPLACE "c" >> "c" HTSA
          ^!REPLACE "d" >> "d" HTSA
          ^!REPLACE "e" >> "e" HTSA
          ^!REPLACE "f" >> "f" HTSA
          ^!REPLACE "g" >> "g" HTSA
          ^!REPLACE "h" >> "h" HTSA
          ^!REPLACE "i" >> "i" HTSA
          ^!REPLACE "j" >> "j" HTSA
          ^!REPLACE "k" >> "k" HTSA
          ^!REPLACE "l" >> "l" HTSA
          ^!REPLACE "m" >> "m" HTSA
          ^!REPLACE "n" >> "n" HTSA
          ^!REPLACE "o" >> "o" HTSA
          ^!REPLACE "p" >> "p" HTSA
          ^!REPLACE "q" >> "q" HTSA
          ^!REPLACE "r" >> "r" HTSA
          ^!REPLACE "s" >> "s" HTSA
          ^!REPLACE "t" >> "t" HTSA
          ^!REPLACE "u" >> "u" HTSA
          ^!REPLACE "v" >> "v" HTSA
          ^!REPLACE "w" >> "w" HTSA
          ^!REPLACE "x" >> "x" HTSA
          ^!REPLACE "y" >> "y" HTSA
          ^!REPLACE "." >> "." HTSA
          ^!REPLACE "/" >> "/" HTSA
          ^!REPLACE "@" >> "@" HTSA
          ^!REPLACE """ >> """ HTSA
          ^!REPLACE "'" >> "'" HTSA
          ^!REPLACE "(" >> "(" HTSA
          ^!REPLACE ")" >> ")" HTSA
          ^!REPLACE "[" >> "[" HTSA
          ^!REPLACE "\" >> "\" HTSA
          ^!REPLACE "]" >> "]" HTSA
          ^!REPLACE ":" >> ":" HTSA
          ^!REPLACE "<" >> "<" HTSA
          ^!REPLACE "=" >> "=" HTSA
          ^!REPLACE ">" >> ">" HTSA
          ^!REPLACE "}" >> "}" HTSA
          ^!REPLACE "{" >> "{" HTSA
          ^!REPLACE "~" >> "~" HTSA
          ^!REPLACE "‘" >> "‘" HTSA
          ^!REPLACE "’" >> "’" HTSA
          ^!REPLACE " " >> " " HTSA
          ^!REPLACE "!" >> "!" HTSA
          ^!REPLACE "$" >> "$" HTSA
          ^!REPLACE "%" >> "%" HTSA
          ^!REPLACE "*" >> "*" HTSA
          ^!REPLACE "+" >> "+" HTSA
          ^!REPLACE "," >> "," HTSA
          ^!REPLACE "-" >> "-" HTSA
          ^!REPLACE "^" >> "^" HTSA
          ^!REPLACE "_" >> "_" HTSA
          ^!REPLACE "`" >> "`" HTSA
          ^!REPLACE "?" >> "?" HTSA
          ^!REPLACE "|" >> "|" HTSA
          ^!REPLACE "€" >> "€" HTSA
          ^!REPLACE "‚" >> "‚" HTSA
          ^!REPLACE "ƒ" >> "ƒ" HTSA
          ^!REPLACE "„" >> "„" HTSA
          ^!REPLACE "…" >> "…" HTSA
          ^!REPLACE "†" >> "†" HTSA
          ^!REPLACE "‡" >> "‡" HTSA
          ^!REPLACE "ˆ" >> "ˆ" HTSA
          ^!REPLACE "‰" >> "‰" HTSA
          ^!REPLACE "Š" >> "Š" HTSA
          ^!REPLACE "‹" >> "‹" HTSA
          ^!REPLACE "Œ" >> "Œ" HTSA
          ^!REPLACE "Ž" >> "Ž" HTSA
          ^!REPLACE "“" >> "“" HTSA
          ^!REPLACE "”" >> "”" HTSA
          ^!REPLACE "•" >> "•" HTSA
          ^!REPLACE "–" >> "–" HTSA
          ^!REPLACE "—" >> "—" HTSA
          ^!REPLACE "˜" >> "˜" HTSA
          ^!REPLACE "™" >> "™" HTSA
          ^!REPLACE "š" >> "š" HTSA
          ^!REPLACE "›" >> "›" HTSA
          ^!REPLACE "œ" >> "œ" HTSA
          ^!REPLACE "ž" >> "ž" HTSA
          ^!REPLACE "Ÿ" >> "Ÿ" HTSA
          ^!REPLACE "¡" >> "¡" HTSA
          ^!REPLACE "¢" >> "¢" HTSA
          ^!REPLACE "£" >> "£" HTSA
          ^!REPLACE "¤" >> "¤" HTSA
          ^!REPLACE "¥" >> "¥" HTSA
          ^!REPLACE "¦" >> "¦" HTSA
          ^!REPLACE "§" >> "§" HTSA
          ^!REPLACE "¨" >> "¨" HTSA
          ^!REPLACE "©" >> "©" HTSA
          ^!REPLACE "ª" >> "ª" HTSA
          ^!REPLACE "«" >> "«" HTSA
          ^!REPLACE "¬" >> "¬" HTSA
          ^!REPLACE "­" >> "­" HTSA
          ^!REPLACE "®" >> "®" HTSA
          ^!REPLACE "¯" >> "¯" HTSA
          ^!REPLACE "°" >> "°" HTSA
          ^!REPLACE "±" >> "±" HTSA
          ^!REPLACE "²" >> "²" HTSA
          ^!REPLACE "³" >> "³" HTSA
          ^!REPLACE "´" >> "´" HTSA
          ^!REPLACE "µ" >> "µ" HTSA
          ^!REPLACE "¶" >> "¶" HTSA
          ^!REPLACE "·" >> "·" HTSA
          ^!REPLACE "¸" >> "¸" HTSA
          ^!REPLACE "¹" >> "¹" HTSA
          ^!REPLACE "º" >> "º" HTSA
          ^!REPLACE "»" >> "»" HTSA
          ^!REPLACE "¼" >> "¼" HTSA
          ^!REPLACE "½" >> "½" HTSA
          ^!REPLACE "¾" >> "¾" HTSA
          ^!REPLACE "¿" >> "¿" HTSA
          ^!REPLACE "Þ" >> "Þ" HTSA
          ^!REPLACE "÷" >> "÷" HTSA
          ^!REPLACE "ø" >> "ø" HTSA
          ^!REPLACE "þ" >> "þ" HTSA
          ^!REPLACE "æ" >> "æ" HTSA
          ^!REPLACE "ß" >> "ß" HTSA
          ^!REPLACE "×" >> "×" HTSA
          ^!REPLACE "Ø" >> "Ø" HTSA
          ^!REPLACE "Ð" >> "Ð" HTSA
          ^!REPLACE "z" >> "z" HTSA
          ^!REPLACE "À" >> "À" HTSA
          ^!REPLACE "Á" >> "Á" HTSA
          ^!REPLACE "Â" >> "Â" HTSA
          ^!REPLACE "Ã" >> "Ã" HTSA
          ^!REPLACE "Ä" >> "Ä" HTSA
          ^!REPLACE "Å" >> "Å" HTSA
          ^!REPLACE "Æ" >> "Æ" HTSA
          ^!REPLACE "Ç" >> "Ç" HTSA
          ^!REPLACE "È" >> "È" HTSA
          ^!REPLACE "É" >> "É" HTSA
          ^!REPLACE "Ê" >> "Ê" HTSA
          ^!REPLACE "Ë" >> "Ë" HTSA
          ^!REPLACE "Ì" >> "Ì" HTSA
          ^!REPLACE "Í" >> "Í" HTSA
          ^!REPLACE "Î" >> "Î" HTSA
          ^!REPLACE "Ï" >> "Ï" HTSA
          ^!REPLACE "Ñ" >> "Ñ" HTSA
          ^!REPLACE "Ò" >> "Ò" HTSA
          ^!REPLACE "Ó" >> "Ó" HTSA
          ^!REPLACE "Ô" >> "Ô" HTSA
          ^!REPLACE "Õ" >> "Õ" HTSA
          ^!REPLACE "Ö" >> "Ö" HTSA
          ^!REPLACE "Ù" >> "Ù" HTSA
          ^!REPLACE "Ú" >> "Ú" HTSA
          ^!REPLACE "Û" >> "Û" HTSA
          ^!REPLACE "Ü" >> "Ü" HTSA
          ^!REPLACE "Ý" >> "Ý" HTSA
          ^!REPLACE "à" >> "à" HTSA
          ^!REPLACE "á" >> "á" HTSA
          ^!REPLACE "â" >> "â" HTSA
          ^!REPLACE "ã" >> "ã" HTSA
          ^!REPLACE "ä" >> "ä" HTSA
          ^!REPLACE "å" >> "å" HTSA
          ^!REPLACE "ç" >> "ç" HTSA
          ^!REPLACE "è" >> "è" HTSA
          ^!REPLACE "é" >> "é" HTSA
          ^!REPLACE "ê" >> "ê" HTSA
          ^!REPLACE "ë" >> "ë" HTSA
          ^!REPLACE "ì" >> "ì" HTSA
          ^!REPLACE "í" >> "í" HTSA
          ^!REPLACE "î" >> "î" HTSA
          ^!REPLACE "ï" >> "ï" HTSA
          ^!REPLACE "ð" >> "ð" HTSA
          ^!REPLACE "ñ" >> "ñ" HTSA
          ^!REPLACE "ò" >> "ò" HTSA
          ^!REPLACE "ó" >> "ó" HTSA
          ^!REPLACE "ô" >> "ô" HTSA
          ^!REPLACE "õ" >> "õ" HTSA
          ^!REPLACE "ö" >> "ö" HTSA
          ^!REPLACE "ù" >> "ù" HTSA
          ^!REPLACE "ú" >> "ú" HTSA
          ^!REPLACE "û" >> "û" HTSA
          ^!REPLACE "ü" >> "ü" HTSA
          ^!REPLACE "ý" >> "ý" HTSA
          ^!REPLACE "ÿ" >> "ÿ" HTSA
          ^!REPLACE "1" >> "1" HTSA
          ^!REPLACE "2" >> "2" HTSA
          ^!REPLACE "3" >> "3" HTSA
          ^!REPLACE "4" >> "4" HTSA
          ^!REPLACE "5" >> "5" HTSA
          ^!REPLACE "6" >> "6" HTSA
          ^!REPLACE "7" >> "7" HTSA
          ^!REPLACE "8" >> "8" HTSA
          ^!REPLACE "9" >> "9" HTSA
          ^!REPLACE "0" >> "0" HTSA
          ^!REPLACE "&" >> "&" HTSA
          ^!REPLACE "#" >> "#" HTSA
          ^!REPLACE ";" >> ";" HTSA
        • Jeffery Scism
          Doesn t work for me. Hangs up on getting the selection. (claims no selection was made then exits) deleted Getselection size step, and it fails to convert, but
          Message 4 of 8 , Oct 8, 2005
          • 0 Attachment
            Doesn't work for me. Hangs up on getting the selection. (claims no
            selection was made then exits)

            deleted Getselection size step, and it fails to convert, but prints out
            the charactor string as plain text (abcdefg....)

            ~~

            Jeffery G. Scism, IBSSG
            Local Coordinator Representative,
            NE/NC Region, USGenWeb Project

            http://usgenweb.org/





            marker@... wrote:

            >Hi Jeffrey,
            >
            >Somewhere in my travels I found a clip someone had written called
            >HideEmail. It converts anything you select to ASCII. In my
            >experiments, the conversion only completely protects the address if
            >you convert the mailto as well, for example:
            >
            ><a href="mailto:me@...">me@...</a> would become
            >
            ><a
            >href="mailto:me@e&
            >#120;ample.com">me
            >@example.com</
            >a>
            >
            >I would like to be able to tell you where I got the clip, but there is
            >no link. The author is Christopher Dray. I hope it is appropriate to
            >copy it here.
            >Karen
            >NOTE: This clip only converts printable characters from the lower 128
            >characters of the ISO 8859-1 character set (ASCII).
            >
            >Convert
            >^!Set %selection%=^$GetSelection$
            >
            >^!IF ^$GetSelSize$ > 0 PROCESS
            >
            >^!Prompt You have not made a selection!
            >^!Goto EXIT
            >
            >:PROCESS
            >
            >^!Set %asciiset%=" !
            >#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefgh
            >ijklmnopqrstuvwxyz{|}~"
            >^!Set %dblquote%="
            >^!Set %equlsign%==
            >^!Set %grtrthan%=>
            >
            >^!Set %length%=^$StrSize(^%selection%)$
            >^!Set %index%=1
            >^!Set %replacement%=^%EMPTY%
            >
            >:CONVERTLOOP
            >
            >^!Set %char%=^$StrIndex(^%selection%;^%index%)$
            >
            >^!IF "^%char%" <> "^%dblquote%" LOOKUP
            >
            >^!Set %value%=34
            >^!Goto APPENDVALUE
            >
            >:LOOKUP
            >
            >^!Set %value%=^$StrPos(^%char%;^%asciiset%;True)$
            >^!Inc %value% 31
            >
            >^!IfInRange ^%value% 32..126 APPENDVALUE
            >
            >^!Set %value%=32
            >
            >:APPENDVALUE
            >
            >^!Append %replacement%="&#"
            >^!Append %replacement%=^%value%
            >^!Append %replacement%=^%SC%
            >
            >:SKIPAPPEND
            >
            >^!Inc %index%
            >^!IF ^%index% <= ^%length% CONVERTLOOP
            >
            >^%replacement%
            >
            > On Sat, 08 Oct 2005 11:26:37 -0700, Jeffery Scism brightened my day
            >with:
            >
            >
            >>This is reported to reduce harvesting of email addresses from
            >>websites.
            >>
            >>Another (more effective) way is to convert all text in the link to
            >>html
            >>Numeric equivalents, but I don't know how to do that in a clip.
            >>
            >>
            >
            >
            >
            >
            >
            >
            >
            >CSE HTML Validator Lite - it's free: http://home.earthlink.net/~5wink/dl/cselite652.exe
            >
            >Fookes Software Home: http://www.fookes.us/redir
            >
            >Yahoo! Groups Links
            >
            >
            >
            >
            >
            >
            >
            >
            >
            >
            >
            >


            [Non-text portions of this message have been removed]
          • marker@us421.com
            No doubt the problem is with me, as I am nowhere near the clip guru :) could this possibly work? I uploaded the clip to http://us421.com/HideEmail.clb and also
            Message 5 of 8 , Oct 8, 2005
            • 0 Attachment
              No doubt the problem is with me, as I am nowhere near the clip guru :)

              could this possibly work? I uploaded the clip to
              http://us421.com/HideEmail.clb and also created a zip and put it at
              http://us421.com/HideEmail.zip

              Maybe that helps.

              Karen

              On Sat, 08 Oct 2005 19:22:15 -0700, Jeffery Scism brightened my day
              with:
              > Doesn't work for me.
              > Jeffery G. Scism, IBSSG

              >> The author is Christopher Dray.
            • loro
              I ve used one by another Christopher. Found here: Lotta
              Message 6 of 8 , Oct 8, 2005
              • 0 Attachment
                I've used one by another Christopher. Found here:
                <http://notetab.com/html.php#Utilities>
                <http://notetab.com/clipbooks/hideemail.zip>

                Lotta
              • hsavage
                ... Karen, I was about to write a long boring email about trying this before. I decided to cut it short. I doubt very much if this method will serve it s
                Message 7 of 8 , Oct 8, 2005
                • 0 Attachment
                  marker@... wrote:
                  > No doubt the problem is with me, as I am nowhere near the clip guru :)
                  >
                  > could this possibly work? I uploaded the clip to
                  > http://us421.com/HideEmail.clb and also created a zip and put it at
                  > http://us421.com/HideEmail.zip
                  >
                  > Maybe that helps.
                  >
                  > Karen

                  Karen,

                  I was about to write a long boring email about trying this before. I
                  decided to cut it short.

                  I doubt very much if this method will serve it's purpose. By the time
                  the clip was written, mid 99, the scavengers, I think they're called
                  'mail crawlers',were probably already defeating this conversion.

                  ºvº
                  05.10.08
                  hrs > hsavage@...
                • Leigh Harrison
                  _____________________________________________________________ hsavage wrote ... It s not a clip, but I ve been using Dan Benjamin s Hiveware Enkoder -
                  Message 8 of 8 , Oct 8, 2005
                  • 0 Attachment
                    _____________________________________________________________



                    hsavage wrote

                    > I doubt very much if this method will serve it's purpose. By
                    > the time the clip was written, mid 99, the scavengers, I
                    > think they're called 'mail crawlers',were probably already
                    > defeating this conversion.

                    It's not a clip, but I've been using Dan Benjamin's Hiveware Enkoder -
                    http://automaticlabs.com/products/enkoderform

                    _____________________________________________________________

                    ~ Leigh Harrison
                    ~ email leigh.harrison@...
                    ~ phone 021 933 913 or 04 389 0960
                    ~ music http://www.newtowngirl.com/
                    _____________________________________________________________

                    "Imagination is more important than knowledge."
                    - Albert Einstein
                  Your message has been successfully submitted and would be delivered to recipients shortly.