' Admin ' If $System.IsPost ' If ! $HttpLog ' $System.Add httplog HttpLog ' EndIf ' If $Submit ' If ! $HttpLog.Pages ' $HttpLog.Add pages Aliases ' EndIf ' $ID = $HttpLog.Pages.Find $Name ' If ! $ID ' $ID = $HttpLog.Pages.Add Object ' EndIf ' $HttpLog.Pages.$ID.Name = $Name ' $HttpLog.Pages.$ID.Title = $Title ' $System.Redirect $Server?page=HttpLogPageBrowse&id=$ID ' Elif ! $ID ' $System.Redirect $Server?page=HttpLogPageBrowse ' Elif $Modify ' $System.Redirect $Server?page=HttpLogPageBrowse&id=$ID&mid=$ID ' Elif $Remove ' $HttpLog.Pages.Remove $ID ' $System.Redirect $Server?page=HttpLogPageBrowse ' Else ' If $Up ' $HttpLog.Pages.OrderUp $ID ' Elif $Down ' $HttpLog.Pages.OrderDown $ID ' EndIf ' $System.Redirect $Server?page=HttpLogPageBrowse&id=$ID ' EndIf ' Exit ' EndIf $HttpLog.Name - ホームページ視聴率 [ページのタイトル設定]
ページのタイトル設定

タイトル 例). ダウンロード
ページ 例). /download.html

[設定メニューへもどる]