请问一下。在VB。NET里如何像ASP里使用Server.HTMLEncode

[拔火罐复合弓]

在vb.net里有没有像ASP里的Server.HTMLEncode函数。将字符串转换成HTML代码。

[welshem]

一样用的
ms-help://MS.NETFrameworkSDKv1.1.CHS/cpref/html/frlrfSystemWebHttpServerUtilityClassHtmlEncodeTopic.htm

[welshem]

Dim TestString As String = "This is a <Test String>."
Dim writer As New StringWriter
Server.HtmlEncode(TestString, writer)
Dim EncodedString As String = writer.ToString()

[拔火罐复合弓]

不是在ASP。NET。。里。。

是在VB。NET里。

[拔火罐复合弓]

没办法之下。。。我只好自已写一个函数来完成了。。。。。
Function HTMLEncode(ByVal Str As String) As String
Dim TempStr As String = ""
TempStr = Str.Replace("&", "&").Replace("""", """).Replace("<", "<").Replace(">", ">")
TempStr = TempStr.Replace(Chr(34), """).Replace(Chr(39), "'").Replace(Chr(13), "")
HTMLEncode = TempStr
End Function