ASP Classic blog framework - BrainOrdure
選択できるのは25トピックまでです。 トピックは、先頭が英数字で、英数字とダッシュ('-')を使用した35文字以内のものにしてください。

75 行
2.4KB

  1. <!doctype html>
  2. <%
  3. Response.Charset = "utf-8"
  4. Response.CodePage = 65001
  5. Dim pageTitle
  6. If IsObject(CurrentController) Then
  7. On Error Resume Next
  8. pageTitle = CurrentController.Title
  9. If Err.Number <> 0 Then
  10. pageTitle = "BrainOrdure"
  11. Err.Clear
  12. End If
  13. On Error GoTo 0
  14. End If
  15. If Len(pageTitle) = 0 Then pageTitle = "BrainOrdure"
  16. Dim hdr_path
  17. hdr_path = LCase(Request.ServerVariables("HTTP_X_ORIGINAL_URL"))
  18. If InStr(hdr_path, "?") > 0 Then hdr_path = Left(hdr_path, InStr(hdr_path, "?") - 1)
  19. Dim hdr_navHome, hdr_navPosts, hdr_navCats
  20. hdr_navHome = "nav-link"
  21. hdr_navPosts = "nav-link"
  22. hdr_navCats = "nav-link"
  23. If hdr_path = "/" Or hdr_path = "" Or Left(hdr_path, 5) = "/home" Then
  24. hdr_navHome = "nav-link active"
  25. ElseIf Left(hdr_path, 6) = "/posts" Then
  26. hdr_navPosts = "nav-link active"
  27. ElseIf Left(hdr_path, 11) = "/categories" Then
  28. hdr_navCats = "nav-link active"
  29. End If
  30. %>
  31. <html lang="en">
  32. <head>
  33. <meta charset="utf-8" />
  34. <title><%= H(pageTitle) %> &mdash; BrainOrdure</title>
  35. <meta name="viewport" content="width=device-width, initial-scale=1" />
  36. <link href="https://cdn.jsdelivr.net/npm/bootstrap@5.3.3/dist/css/bootstrap.min.css" rel="stylesheet" />
  37. <link href="https://cdn.jsdelivr.net/npm/bootstrap-icons@1.11.3/font/bootstrap-icons.css" rel="stylesheet" />
  38. <link href="/css/site.css" rel="stylesheet" />
  39. </head>
  40. <body>
  41. <nav class="navbar navbar-expand-lg navbar-dark bg-dark shadow-sm">
  42. <div class="container">
  43. <a class="navbar-brand brand" href="/">
  44. BrainOrdure<span class="brand-tagline">a blog</span>
  45. </a>
  46. <button class="navbar-toggler border-0" type="button" data-bs-toggle="collapse" data-bs-target="#mainNav" aria-controls="mainNav" aria-expanded="false" aria-label="Toggle navigation">
  47. <span class="navbar-toggler-icon"></span>
  48. </button>
  49. <div class="collapse navbar-collapse" id="mainNav">
  50. <ul class="navbar-nav ms-auto mb-2 mb-lg-0">
  51. <li class="nav-item">
  52. <a class="<%= hdr_navHome %>" href="/">Home</a>
  53. </li>
  54. <li class="nav-item">
  55. <a class="<%= hdr_navPosts %>" href="/posts">Posts</a>
  56. </li>
  57. <li class="nav-item">
  58. <a class="<%= hdr_navCats %>" href="/categories">Categories</a>
  59. </li>
  60. </ul>
  61. </div>
  62. </div>
  63. </nav>
  64. <main class="site-main">
  65. <div class="container">
  66. <% Flash().ShowErrorsIfPresent : Flash().ShowSuccessIfPresent %>

Powered by TurnKey Linux.