Microsoft VBScript runtime
Type mismatch: '[string: "no"]'
/genealogia-mineira/restrita/funcoes.inc, line 1521