Histórico da Página
Composition Setup |
---|
import.css=/download/attachments/327912/newLayout.css |
...
Pagetitle | ||||
---|---|---|---|---|
|
Função: TCDelFile
...
Exclui uma tabela ou view de um banco relacional, através do DBAccess.
Sintaxe
Bloco de código | ||
---|---|---|
| ||
TCDelFile( <cTabela> ) --> lOk cName > )
|
Parâmetros
...
Nome | Tipo | Descrição | Obrigatório | Referência |
---|
...
cName |
...
caractere |
...
Nome da Tabela/View a ser excluida. | X |
Retorno
...
Nome | Tipo | Descrição |
---|---|---|
lRet | lógico | Retorna |
...
.T. |
...
se excluiu com sucesso |
...
, caso contrário, |
...
retorna .F. |
Informações | ||||
---|---|---|---|---|
| ||||
).
|
Exemplos
cTabela := "TMPR010"If TcCanOpen(cTabela) lOk := TcDelFile(cTabela) If lOk MsgInfo("Tabela "+cTabela+" apagada.") Else MsgStop("Falha ao apagar "+cTabela+" : "+ TcSqlError()) EndifElse MsgInfo("Talbela "+cTabela+" nao encontrada.")Endif
...
Bloco de código | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
USER FUNCTION TEST()
TCLink()
DBCreate( "T1", { { "FIELD_NAME", "C", 10, 0 }, ;
{ "FIELD_TYPE", "C", 10, 0 } }, "TOPCONN" )
TCViewOne( "VIEW1", "T1" )
IF TCDelFile( "VIEW1" ) == .T.
conout( "View deleted" )
ELSE
conout( "Error on delete: " + TCSQLError() )
ENDIF
IF TCDelFile( "T1" ) == .T.
conout( "Table deleted" )
ELSE
conout( "Error on delete: " + TCSQLError() )
ENDIF
TCUnlink()
RETURN
|
Veja também
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas