Home>Network programming tutorial>ASP tutorial

ASP implements classes similar to hashMap functions

Author：Eve Cole Update Time：2025-02-25 15:32:02

This article mainly introduces ASP implements classes similar to hashMap functions

HashMap in java is very convenient to access data, but unfortunately there is no similar class in ASP. The author needs similar data types in the development program, so he constructed a class that can basically be similar to the hashMap function, which can implement key-value access operations, etc. The accessed data can be any basic type in the ASP.

Below is the code of the program, which can be directly run in an empty ASP.

  1. <%
  2. setvevb=newJb
  3. 'Assign value to mp object
  4. vevb.putva,vevb.com
  5. vevb.putvb,www.vevb.net
  6. vevb.putvc,http://www.vevb.net
  7. response.write[number of key value]:&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. 'Delete the key value with key b
  16. vevb.delvb
  17. response.write[number of key value]:&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. 'Clear all values ​​of vevb
  26. vevb.clear
  27. 'Reassign the key value of the key to c
  28. vevb.putvc,http://www.vevb.net
  29. response.write[number of key value]:&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. 'Constructor
  41. privateSubClass_Initialize
  42. 'Where arr(0,n) is key, arr(1,n) is value
  43. arr_len=0
  44. redimarr(1,arr_len)
  45. endsub
  47. 'Assignment, if present, overwrite
  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)then
  54. arr(1,i)=v
  55. is_update=true
  56. exitfor
  57. endif
  58. next
  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. endif
  65. endsub
  66. 'Get key value with key k
  67. publicfunctiongetv(k)
  68. dimv
  69. v=
  70. fori=0toarr_len
  71. ifk=arr(0,i)then
  72. v=arr(1,i)
  73. exitfor
  74. endif
  75. next
  76. getv=v
  77. endfunction
  79. 'Delete the key value with key k
  80. publicsubdelv(k)
  81. arr_len=ubund(arr,2)
  82. fori=0toarr_len
  83. ifk=arr(0,i)then
  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. next
  89. arr_len=arr_len-1
  90. redempreservearr(1,arr_len)
  91. exitfor
  92. endif
  93. next
  94. endsub
  96. 'Get the number of key values ​​in vevb
  97. publicpropertygetcount()
  98. count=arr_len
  99. endproperty
  101. 'Clear all key values ​​in vevb
  102. publicsubclear()
  103. arr_len=0
  104. redimarr(1,1)
  105. endsub
  106. endclass
  107. %>

The above is how ASP can implement classes similar to hashMap functions. I hope it will inspire everyone's learning.

Related Articles