Histórico da Página
...
| Bloco de código | ||
|---|---|---|
| ||
NetErr( [ lValor ] ) |
Parâmetros
Nome | Tipo | Descrição | Obrigatório | Referência |
|---|---|---|---|---|
lValor | lógico | Altera o valor resultante do NetErr |
Retorno
Nome | Tipo | Descrição |
|---|---|---|
lRet | lógico | Retorna verdadeiro (.T.) no caso de erro e falso (.F.) no caso de sucesso. |
Observações
Funções que podem alterar o valor do resultado da função NetErr
...
| Bloco de código | ||||||||
|---|---|---|---|---|---|---|---|---|
| ||||||||
FUNCTION Example()
Local cT1 := "T1"
Local cT2 := "T2"
TCLink()
// criando a tabela "T1"
DBCreate("T1", {{"FIELD_NAME", "C", 10, 0}, ;
{"FIELD_TYPE", "C", 10, 0} }, "TOPCONN")
// tentando abrir a tabela "T1"
DBUseArea(.F., 'TOPCONN', cT1, (cT1), .F., .T.)
if NetErr() == .F.
conout("Tabela T1 foi aberta com sucesso!")
return
endif
DBCloseArea()
// tentando abrir a tabela "T2" que não existe
DBUseArea(.F., 'TOPCONN', cT2, (cT2), .F., .T.)
if NetErr() == .T.
conout("Não é possivel abrir a tabela T2!")
return
endif
DBCloseArea()
// outro exemplo
NetErr(.T.)
if NetErr() == .T.
conout("Alterado o valor para .T. do NetErr")
endif
NetErr(.F.)
if NetErr() == .F.
conout("Alterado o valor para .F. do NetErr")
endif
TCUnlink()
RETURN
|
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas