Página Inicial>Tutorial de programação de redes>Tutorial ASP

ASP implementa classes semelhantes às funções de hashmap

Autor：Eve Cole Data da Última Atualização：2025-02-25 15:32:02

Este artigo apresenta principalmente a ASP implementa classes semelhantes às funções de hashmap

O hashmap em Java é muito conveniente para acessar dados, mas infelizmente não há classe semelhante no ASP. O autor precisa de tipos de dados semelhantes no programa de desenvolvimento, então ele construiu uma classe que pode basicamente ser semelhante à função HashMap, que pode implementar operações de acesso à chave de valor, etc. Os dados acessados ​​podem ser qualquer tipo básico no ASP.

Abaixo está o código do programa, que pode ser executado diretamente em um ASP vazio.

  1. <%
  2. setvevb = newjb
  3. 'Atribuir valor ao objeto MP
  4. vevb.putva, vevb.com
  5. vevb.putvb, www.vevb.net
  6. vevb.putvc, http: //www.vevb.net
  7. Response.Write [Número de Valor -chave]: & 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. 'Exclua o valor da chave com a chave B
  16. vevb.delvb
  17. Response.Write [Número de Valor -chave]: & 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. 'Limpe todos os valores do VEVB
  26. vevb.clear
  27. 'RatrsAnam o valor chave da chave para C
  28. vevb.putvc, http: //www.vevb.net
  29. Response.Write [Número de Valor -chave]: & 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. 'Construtor
  41. privatesubclass_initialize
  42. 'Onde arr (0, n) é fundamental, arr (1, n) é valor
  43. arr_len = 0
  44. Redimarr (1, arr_len)
  45. endsub
  47. 'Tarefa, se presente, substitua
  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) então
  54. arr (1, i) = v
  55. is_update = true
  56. exitfor
  57. endif
  58. próximo
  59. ifnotis_updatethen
  60. ARR_LEN = ARR_LEN+1
  61. RedempreseserveArr (1, arr_len)
  62. arr (0, arr_len) = k
  63. arr (1, arr_len) = v
  64. endif
  65. endsub
  66. 'Obtenha o valor da chave com a chave k
  67. publicFunctionGetv (K)
  68. dimv
  69. v =
  70. fori = 0toarr_len
  71. ifk = arr (0, i) então
  72. v = arr (1, i)
  73. exitfor
  74. endif
  75. próximo
  76. getv = v
  77. Função final
  79. 'Exclua o valor da chave com a chave k
  80. Publicsubdelv (K)
  81. arr_len = ubund (arr, 2)
  82. fori = 0toarr_len
  83. ifk = arr (0, i) então
  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. próximo
  89. ARR_LEN = ARR_LEN-1
  90. RedempreseserveArr (1, arr_len)
  91. exitfor
  92. endif
  93. próximo
  94. endsub
  96. 'Obtenha o número de valores -chave no VEVB
  97. publicPropertyGetCount ()
  98. count = arr_len
  99. EndProperty
  101. 'Limpe todos os valores -chave no VEVB
  102. Publicsubclear ()
  103. arr_len = 0
  104. Redimarr (1,1)
  105. endsub
  106. Endclass
  107. %>

O acima é como o ASP pode implementar classes semelhantes às funções de hashmap.

Artigos Relacionados