特殊・他 サイトマップ作成用更新頻度・優先度を返す関数
※より実装に近く表示させる為、コードの改行を避けています。スマホ等で閲覧される際は向きを変えてご覧ください。
※実装するバージョンによってはバージョンアップの仕様により動作しないコードもあります。実装には動作確認の上ご使用下さい。
'********************************************* 'サイトマップ作成用更新頻度・優先度を返す関数 '********************************************* Function Changefreq(lebelno As Byte) As String '**************************************** 'サイトマップ作成用更新頻度を返す関数 '**************************************** Select Case lebelno Case 1 '毎時間 Changefreq = "hourly" Case 2 '毎日 Changefreq = "daily" Case 3 '毎週 Changefreq = "weekly" Case 4 '毎月 Changefreq = "monthly" Case Else '該当なし Changefreq = "monthly" End Select End Function Function Priority(lebelno As Byte) As String '**************************************** 'サイトマップ作成用優先度を返す関数 '**************************************** Select Case lebelno Case 1 '高 Priority = "1.0" Case 2 '中 Priority = "0.5" Case 3 '低 Priority = "0.0" Case Else '該当なし Priority = "0.0" End Select End Function |