dim dmnth = array()
; это устанавливает dmth
в возвращаемое значение функции array()
; что бы это ни было. Это ненужный шаг в вашей программе; если array()
не делает ничего полезного, кроме как вернуть значение обратно.
Redim dmnth(Rs_emp_count + 1, Rs_proj_count + 1, total_days + 1)
; это разрушает содержимое dmth
; заменяя dmnth
трехмерной матрицей с размерами, для каждого измерения соответственно, Rs_emp_count + 1
, Rs_proj_count + 1
и total_days + 1
. Все элементы очищаются.
dmnth(emp_cnt, prj_cnt, 0) = pname & " (" & pid & ")"
присваивает pname & " (" & pid & ")"
элементу массива (emp_cnt, prj_cnt, 0)
. Помните, что массивы в VBScript основаны на нуле; то есть (0, 0, 0) является допустимым элементом.
Redim в вашем случае изменит размер вашего массива на 3-мерный с тремя введенными значениями. – Regenschein