ASP_javascriptスキルにおけるHTMLデータとJSデータのエンコード機能

数日前、Ajax を使用してフォームを送信し、電子メールを送信するという状況に遭遇しました。そこで、これら 2 つの問題を解決するために次の 2 つの関数を作成しました。

最初の関数は HTML のデータを変換します。 HTML エンティティと HTML タグは自動的に変換されないため、メール送信時に HTML 形式で送信することもできます。
2 番目の関数も JS データに変換します。エスケープ文字を使用すると、JS キーワードやその他の文字の変換も回避されます。Web ページがどのようなエンコーディングであっても、文字化けすることはありません。

コードをコピーします コードは次のとおりです:

Function htmlentities(str)
Dim a,i,char
For i = 1 から Len(str)
char = mid(str, i, 1)
a=Ascw(char)
If a > 128 or a htmlentities = htmlentities & “ ” & clng(”&h” & hex((Ascw(char)))) & “;”
Else
htmlentities = htmlentities & char
End if
Next
End Function

Function Unicode( str1)
Dim str,temp
str = “”
For i=1 To Len(str1)
temp = Hex(AscW(Mid(str1, i,1)))
If len(temp) str = str & “u” & temp
Next
Unicode = str
End Function

そのまま受け取って使うという姿勢があれば、何も気にせずにそのまま使えます。 もちろん、いくつかのコードを書き換えることも多々あります。 Attitude の研究に興味がある場合、ここで注意する必要があるのは、Ascw(char) 関数は長整数値を返す可能性があり、ASP はそれを整数として扱うということです。加工が必要です。