Histórico da Página
...
| Bloco de código | ||||||
|---|---|---|---|---|---|---|
| ||||||
#include "protheus.ch"
/*/{Protheus.doc} TestExtRes
Função parade testarteste ada classe ExtractResource
@author Caio.Lima
@since 01/08/2022
/*/
Function U_TestExtRes()
Local oResource as object
Local cResource as character
oResource := totvs.framework.file.ExtractResource():New()
cResource := ""
While !Empty( oResource:ExtractOneResource("CNTA330cResource := FWInputBox("Informe o nome do resource", "APP")
APLOGO_OCEAN.JPG") )
oResource:ExtractOneResource(cResource)
ConOut(oResource:GetLog())
If oResource:IsResourceOk()
// copia o arquivo para o client
CpyS2T(oResource:GetPathResFile(), "C:\teste\")
// abre o arquivo na maquina do client
ShellExecute("open", "C:\teste\" + cResource, "", "", 1)
Else
Alert("Falha ao salvar resouce" + CRLF + oResource:GetLog() )
EndIf
oResource:DeleteLastResource()
EndDo
Return
|
...
GetCodResourceLog
Retorna o código do log de extração do resource
Retorno:
| Nome | Tipo | Descrição | ||||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| nRet | Numérico | codigo do log de extração do resource
|
...
IsResourceOk
Retorna se o arquivo de resource está ok, ou seja, presenta na pasta
de rootpath e atualizado em relação ao RPO
Retorno
| Nome | Tipo | Descrição |
|---|---|---|
| lRet | logico | varivael de controle se o resource está ok |
...
GetLog
Retorna o log definido na classe
Retorno
| Nome | Tipo | Descrição |
|---|---|---|
| cLog | caractere | ultimo log que foi definido ao extrair um recurso |
...
GetRooPath
Metodo para retornar o caminho padrão de extração do arquivo
caso a propriedade extensao extensão esteja informada retorna tb também a extensao extensão como parte do caminho
, sempre retorna o caracter caractere de barra no final do caminho
| Nome | Tipo | Descrição |
|---|---|---|
| cRet | caractere | o caminho padrão que será utilizada no extract |
...
SetRootPath
Metodo Método para definir o caminho padrão de extração do arquivo
caminho Caminho de extração deve ser no servidor a partir da protheus_data
Parâmetros
| Nome | Tipo | Descrição | Obrigatório |
|---|---|---|---|
| cRootPath | caractere | pasta para definir o caminho padrão para extração | X |
...
GetPathResFile
Retorna o nome do resource concatenado com o rootpath
Retorno
| Nome | Tipo | Descrição |
|---|---|---|
| cRet | caractere | nome completo do path mais o resource |
...
NeedReload
Metodo para verificar se o resource precisa ser extraido extraído novamente@param cMD5,
Parametro
| Nome | Tipo | Descrição | Obrigatório |
|---|---|---|---|
| cMD5 | caractere | codigo md5 a ser comparado, caso seja passado não será utilizado |
...
| o arquivo |
...
| físico para comparar com o md5 do RPO |
...
Retorno
| Nome | Tipo | Descrição |
|---|---|---|
| lRet | logico | True caso precise fazer o reload no arquivo e false caso não precise. |
...
ExtractOneResource
metodo para extrair um resource do RPO
retorna true apenas caso tenha feito a extração,
caso tenha retornado false é necessário utilizar o metodo isResourceOk
para determinar se o resource está disponivel na pasta, junto com o metodo GetLog e GetCodResourceLog
@param cResource, Indica o nome do recurso no repositório a ser salvo em disco
pode ser passado junto com a extensao
@para cExtensao, extensao do arquivo a ser extraido, caso seja passado
não deve ser passado no resource, a extensão será utilizada com uma pasta na extrasao do arquivo.
@param cMD5, codigo md5 do aruivo, caso seja passado não irá utilizar o md5 do arquivo fisico
será utilizado esse parametro para determinar se o arquivo precisa ser atualizado
@param lUpdateExt, parametro interno, determina se de deve atualizar a varivel cExtensao da classe
@return logical, retorna true caso tenha extraido com sucesso o arquivo
retorna false caso não tenha feito a extração,
se o recurso já está na pasta rootpath definida, tb irá retornar false
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas