<%@ Language=VBScript CODEPAGE=65001 %> <% Option Explicit dim bodyClass dim url dim title bodyClass = "page-messages page-message-04" url = "http://" & Request.ServerVariables("SERVER_NAME") & Request.ServerVariables("URL") url = Replace(url,"index.asp","") title = "前澤憲雄さん(一般社団法人日本きのこマイスター協会) - 応援メッセージ - " %>