Runtimefout Microsoft VBScript (0x800A000D)
Typen komen niet met elkaar overeen: 'lBound'
/verkoopbon.asp, line 49
49: for intArrayIndex = lBound(arrayID) to uBound(arrayID)
50: if cLng(arrayID(intArrayIndex)) <> 0 then
51: if request("Aantal"&intArrayIndex) <> "" then
52: strVoorraadid = arrayID(intArrayIndex)
53: strAantal = (request("Aantal"&intArrayIndex))
54: strAantalID = strAantalID + cLng(arrayID(intArrayIndex))
55: strAantalID = strAantalID + request("Aantal"&intArrayIndex)
56: if strAantalID <> 0 then
57: if isNumeric(strAantal) then
Typen komen niet met elkaar overeen: 'lBound'
/verkoopbon.asp, line 49
49: for intArrayIndex = lBound(arrayID) to uBound(arrayID)
50: if cLng(arrayID(intArrayIndex)) <> 0 then
51: if request("Aantal"&intArrayIndex) <> "" then
52: strVoorraadid = arrayID(intArrayIndex)
53: strAantal = (request("Aantal"&intArrayIndex))
54: strAantalID = strAantalID + cLng(arrayID(intArrayIndex))
55: strAantalID = strAantalID + request("Aantal"&intArrayIndex)
56: if strAantalID <> 0 then
57: if isNumeric(strAantal) then