arrBand = array("6M","10M","12M","15M","17M","20M","30M","40M","60M","80M","160M")
Сохраненный процесс равен
SELECT *
FROM tableBand
WHERE UCall=[In_Call] And ACID=[In_CID] and BAND=[In_Band];
Следующий код всегда выполняет условие «не». Для данного CRS («CID») в базе данных есть только 2 строки с одним из значений массива, то есть 6M и 10M.
for i = 0 to UBound(arrBand)
ConnTemp.GetMode SanCall, CRS("Cid"), arrBand(i), BandRS
if not BandRS.EOF and not BandRS.BOF then
tmp = tmp + "<td style='width: 59px;'>" + arrBand(i) + "<input name='Ck'" + arrBand(i) + "' type='checkbox' checked='checked'value='Y'/></td>"
else
tmp = tmp + "<td style='width: 59px;'>" + arrBand(i) + "<input name='Ck'" + arrBand(i) + "' type='checkbox'/></td>"
end if
BandRS.close
next