import.css=/download/attachments/6062824/tecnologia.css

Recupera o conteúdo caractere de uma chave de um arquivo de configuração (*.INI) qualquer.

Até o Appserver versão 20.3.2.x o tamanho máximo de leitura é de 511 caracteres.

Sintaxe

GetPvProfString( < cSecao >, < cChave >, < cPadrao >, < cNomeArqCfg >, [ uParam5 ], [ uParam6 ] )

Parâmetros

Nome

Tipo

Descrição

Obrigatório

Referência

cSecao

caractere

Indica o nome da seção do arquivo a ser considerada.

X


cChave

caractere

Indica o nome da chave a ser considerada.

X


cPadrao

caractere

Indica o conteúdo padrão ( default ) a ser retornado , caso a chave não seja encontrada no arquivo de configuração.

X


cNomeArqCfg

caractere

Indica o nome do arquivo de configuração (*.INI) a ser utilizado.

X


uParam5

numérico

Compatibilidade



uParam6

numérico

Compatibilidade



Retorno

Nome

Tipo

Descrição

cRet

caractere

Retorna o conteúdo da chave especificada, ou o seu valor padrão

Observações

Localização do arquivo de configuração a ser pesquisado

Exemplos

#DEFINE CRLF Chr(13)+Chr(10)
User Function Exemplo()
Local cServerIni := "", cClientIni := "", cMensagem := ""
Local cSecao := "", cChave := "", cPadrao := ""
//+----------------------------------------------------------------------------+
//|Exemplifica o uso da função GetPvProfString                                 |
//+----------------------------------------------------------------------------+
  cServerIni := GetAdv97()
  cClientIni := GetRemoteIniName()
  cSecao := "Drivers"
  cChave := "Active"
  cPadrao := "undefined"
  cMensagem += "Arquivo de configuração do servidor: [" + cServerIni + "]" + CRLF
  cMensagem += "  Seção [" + cSecao + "] Chave [" + cChave + "] Valor [" + ;
    GetPvProfString(cSecao, cChave, cPadrao, cServerIni) + "]" + CRLF
  cMensagem += "Arquivo de configuração da estação: [" + cClientIni + "]" + CRLF
  cMensagem += "  Seção [" + cSecao + "] Chave [" + cChave + "] Valor [" + ;
    GetPvProfString(cSecao, cChave, cPadrao, cClientIni) + "]" + CRLF
//+----------------------------------------------------------------------------+
//|Apresenta uma mensagem com os resultados obtidos                            |
//+----------------------------------------------------------------------------+
Return MsgInfo(cMensagem, "Exemplo do GetPvProfString")

Preview

Exemplo da função GetPvProfString

Veja também