Função de julgamento de teste de valor nulo ASP, amigos que aprendem ASP podem consultá-la.
Copie o código do código da seguinte forma:
'Função: teste de valor nulo
Função inull(Val)
Escurecer tmp
tmp=Falso
Se for nulo (Val) então
tmp = Verdadeiro
ElseIf IsEmpty(Val) Então
tmp = Verdadeiro
ElseIf Trim(Val) = Então
tmp = Verdadeiro
Terminar se
inull=tmp
Função final
Teste se a variável é um valor nulo O significado de um valor nulo inclui: a variável não existe/está vazia, o objeto é Nothing, 0, uma matriz vazia e a string está vazia.
Função IsBlank (ByRef Var)
Está em branco = falso
Selecione Caso Verdadeiro
CaseIsObject(Var)
Se Var não for nada, então IsBlank = True
Caso IsEmpty(Var), IsNull(Var)
Está em Branco = Verdadeiro
CaseIsArray(Var)
Se UBound(Var) = 0 Então IsBlank = True
CaseIsNumeric(Var)
Se (Var = 0) Então IsBlank = True
Outro caso
Se Trim(Var) = Então IsBlank = True
Finalizar seleção
Função final