Histórico da Página
...
Pagetitle | ||||
---|---|---|---|---|
|
Retorna a extensão dos arquivos de banco de dados.em uso para as tabelas acessadas através do driver ou RDD "DBFCDX"
Sintaxe
Bloco de código | ||
---|---|---|
| ||
GetDBExtension() |
...
Nome | Tipo | Descrição |
---|---|---|
cRet | caractere | Retorna a extensão dos arquivos de banco de dadosem uso. |
Informações | ||||
---|---|---|---|---|
| ||||
|
...
|
Exemplos
Bloco de código | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
user function test1() Local cLocal := "" Local cDBExt := "" Local cRet := "" if IsSrvUnix() .Or. IsSrv64() cLocal := GetSrvProfString( "LocalFiles", "CTREE" ) else cLocal := GetSrvProfString( "LocalFiles", "ADS" ) endif cLocal := Upper( cLocal ) if cLocal == "CTREE" cDBExt := GetSrvProfString( "LocalDBExtension", ".dtc" ) else cDBExt := GetSrvProfString( "LocalDBExtension", ".dbf" ) endif cDBExt := Lower( cDBExt ) if ( Len( cDBExt ) !=< 43 ) .Or. ( Left( cDBExt, 1 ) != "." ) cDBExt := ".dbf" endif cRet := GetDBExtension() if cRet == cDBExt conout( "Valores iguais: " + cRet ) else conout( "Valores diferentes" ) conout( "Esperado: " + cDBExt ) conout( "Retornado: " + cRet ) endif return |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas