Главная страница>Учебник по сетевому программированию>Учебное пособие по ASP

ASP реализует классы, аналогичные функциям HashMap

Автор：Eve Cole Время обновления：2025-02-25 15:32:02

Эта статья в основном представляет ASP реализует классы, аналогичные функциям HashMap

Hashmap в Java очень удобен для доступа к данным, но, к сожалению, в ASP нет аналогичного класса. Автор нуждаются в аналогичных типах данных в программе разработки, поэтому он создал класс, который в основном может быть похож на функцию HashMap, которая может реализовать операции доступа к ключевым значениям и т. Д.

Ниже приведен код программы, который можно напрямую запускать в пустом ASP.

  1. <%
  2. setVevb = newjb
  3. 'Присвоение значению объекту MP
  4. Vevb.putva, vevb.com
  5. Vevb.putvb, www.vevb.net
  6. vevb.putvc, http: //www.vevb.net
  7. response.write [Количество значения ключа]: & vevb.count
  8. response.write <br>
  9. response.write [a]: & vevb.getv (a)
  10. response.write <br>
  11. response.write: & vevb.getv (b)
  12. response.write <br>
  13. response.write [c]: & vevb.getv (c)
  14. response.write <hr>
  15. 'Удалить значение ключа с помощью ключа B
  16. VEVB.DELVB
  17. response.write [Количество значения ключа]: & vevb.count
  18. response.write <br>
  19. response.write [a]: & vevb.getv (a)
  20. response.write <br>
  21. response.write: & vevb.getv (b)
  22. response.write <br>
  23. response.write [c]: & vevb.getv (c)
  24. response.write <hr>
  25. 'Очистить все значения VEVB
  26. Vevb.clear
  27. 'Переведите значение ключа ключа в C
  28. vevb.putvc, http: //www.vevb.net
  29. response.write [Количество значения ключа]: & vevb.count
  30. response.write <br>
  31. response.write [a]: & vevb.getv (a)
  32. response.write <br>
  33. response.write: & vevb.getv (b)
  34. response.write <br>
  35. response.write [c]: & vevb.getv (c)
  36. response.write <hr>
  37. Classmtmap
  38. privatearr ()
  39. privatearr_len
  40. 'Конструктор
  41. privatesubclass_initialize
  42. 'Где arr (0, n) - ключ, arr (1, n) - значение
  43. arr_len = 0
  44. Redimarr (1, arr_len)
  45. заканчивая
  47. 'Назначение, если присутствует, перезаписать
  48. publicsubputv (k, v)
  49. diMis_update
  50. is_update = false
  51. arr_len = ubund (arr, 2)
  52. fori = 0toarr_len-1
  53. ifk = arr (0, i) затем
  54. arr (1, i) = v
  55. is_update = true
  56. Выход
  57. эндиф
  58. следующий
  59. ifnotis_updatethen
  60. arr_len = arr_len+1
  61. redempreservearr (1, arr_len)
  62. arr (0, arr_len) = k
  63. arr (1, arr_len) = v
  64. эндиф
  65. заканчивая
  66. 'Получите значение ключа с ключом K
  67. publicfunctiongetg (k)
  68. димв
  69. v =
  70. fori = 0toarr_len
  71. ifk = arr (0, i) затем
  72. v = arr (1, i)
  73. Выход
  74. эндиф
  75. следующий
  76. getV = v
  77. конечная функция
  79. 'Удалить значение ключа с помощью Key K
  80. publicsubdelv (k)
  81. arr_len = ubund (arr, 2)
  82. fori = 0toarr_len
  83. ifk = arr (0, i) затем
  84. v = arr (1, i)
  85. fork = itoarr_len-1
  86. arr (0, k) = arr (0, k+1)
  87. arr (1, k) = arr (1, k+1)
  88. следующий
  89. arr_len = arr_len-1
  90. redempreservearr (1, arr_len)
  91. Выход
  92. эндиф
  93. следующий
  94. заканчивая
  96. 'Получите количество значений ключей в VEVB
  97. publicpropertygetCount ()
  98. count = arr_len
  99. EndProperty
  101. 'Очистить все значения ключей в VEVB
  102. publicsubclear ()
  103. arr_len = 0
  104. Redimarr (1,1)
  105. заканчивая
  106. Endclass
  107. %>

Выше, как ASP может реализовать классы, похожие на функции HashMap.

Связанные статьи