ITブログ時々なんでもブログ

１．デフォルトページの設定方法

<configuration>
 <system.webServer>
    <!--デフォルトぺージを設定する-->
    <defaultDocument>
      <files>
        <clear />
        <add value="index.aspx" />
      </files>
    </defaultDocument>
    <!--スラッシュで終わるURLにリダイレクトする-->
    <rewrite>
      <rules>
        <rule name="RedirectRootRule" stopProcessing="false">
          <match url="^index\.aspx$"/>
          <action type="Redirect" url="./" redirectType="Permanent"/>
        </rule>
        <rule name="RedirectSubFolderRule" stopProcessing="false">
          <match url="^(.*\/)*index\.aspx$"/>
          <action type="Redirect" url="{R:1}" redirectType="Permanent"/>
        </rule>
        <!--
        <rule name="RedirectFolder1Rule" stopProcessing="false">
          <match url="^folder1/index\.aspx$"/>
          <action type="Redirect" url="./folder1/" redirectType="Permanent"/>
        </rule>
        <rule name="RedirectFolder2Rule" stopProcessing="false">
          <match url="^folder1/folder2/index\.aspx$"/>
          <action type="Redirect" url="./folder1/folder2/" redirectType="Permanent"/>
        </rule>
        <rule name="RedirectFolder3Rule" stopProcessing="false">
          <match url="^folder1/folder2/folder3/index\.aspx$"/>
          <action type="Redirect" url="./folder1/folder2/folder3/" redirectType="Permanent"/>
        </rule>
        <rule name="RedirectMypageRule" stopProcessing="false">
          <match url="^mypage/index\.aspx$"/>
          <action type="Redirect" url="./mypage/" redirectType="Permanent"/>
        </rule>
        <rule name="RedirectProductRule" stopProcessing="false">
          <match url="^product/index\.aspx$"/>
          <action type="Redirect" url="./product/" redirectType="Permanent"/>
        </rule>
        -->
      </rules>
    </rewrite>
  </system.webServer>
</configuration>

２．正規化

Private Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    If Not IsPostBack Then

        'headタグをrunat="server"に設定します。
        Dim link As New HtmlLink()
        link.Href = GetCanonicalUrl(Me.Page.Request.Url.ToString())
        link.Attributes.Add("rel", "canonical")
        Page.Header.Controls.Add(link)

    End If

End Sub

''' <summary>
''' URLから正規化したURLを返す
''' </summary>
''' <param name="url">クライアントがアクセスしたURL</param>
''' <returns>正規化したURL</returns>
Public Shared Function GetCanonicalUrl(ByVal url As String) As String

    If String.IsNullOrEmpty(url) Then
        Return String.Empty
    End If

    Dim ret As String = url.ToLower()

    ret = ret.Replace("/index.aspx", "/")       'index.aspxをスラッシュ終わりに正規化します。
    ret = ret.Replace("http://", "https://")    'Googleにより最近は常時SSL化が必須です。
    ret = ret.Replace("www.", "")               'wwwを取るか付けるかは要件次第ですね。
    'If Not ret.Contains("//www.") Then
    '    ret = ret.Replace("https://", "https://www.")
    'End If

    Return ret

End Function