<% @Page CodePage="65001" %>
<SCRIPT language="VB" runat="server">

Sub Page_Load(sender As Object, e As EventArgs)

	Dim utf8 As String = ""

	if Request.QueryString("value") = "送信" then
		utf8 = "送信を受信しました"
	end if 

	Response.Write( utf8 )

End Sub

</SCRIPT>