Minor fix

Author: R0mb0

Dynamic_arrays_library/Dynamic_arrays.asp

@@ -208,7 +208,7 @@ End Function
 
 'Function to retrieve dynamic array dimension'
 Function get_dynamic_array_dimension(ByRef my_array)
-  get_dynamic_array_dimension = UBound(my_array)
+  get_dynamic_array_dimension = UBound(my_array) + 1
 End Function
 
 'Funtion to write the entire array'

Dynamic_arrays_library/Test.asp

@@ -24,6 +24,9 @@ add_element_to_dynamic_array test_array,"A"
 Response.Write("Elements inside: ")
 write_dynamic_array(test_array)
 
+Response.Write("--- Get array dimension --- <br>")
+Response.write("Array dimension: " & get_dynamic_array_dimension(test_array) & "<br>")
+
 Response.Write("--- Get element with index 1 --- <br>")
 
 Response.Write("Element: ")