Função: IsSrvUnix
Informa se Application Server está sendo executado em ambiente Unix®, Linux® ou Microsoft Windows®.
IsSrvUnix ( ) --> lRet
-
lRet(logico)
- Retorna verdadeiro (.T.), se o Application Server estiver sendo executado em ambiente Unix® ou Linux®; caso contrário, retornará falso (.F.), se estiver sendo executado em ambiente Microsoft Windows®.
// Exemplo 1IsSrvUnix() // Resultado: .F./////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// Exemplo 2//Através do exemplo abaixo, podemos obter o path de execução do Remote.#include "totvs.ch"Function TstRmtPath()Local cIniName:= GetRemoteIniName() Local lUnix:= IsSrvUnix()Local nPos:= Rat( IIf(lUnix,"/","\"),cIniName )Local cPathRmt if nPos!=0 cPathRmt:= Substr( cIniName,1,nPos-1 )else cPathRmt:=""endifQOut( cPathRmt )Return
Advanced Protheus 6.09
,
Advanced Protheus 7.10
,
Microsiga Protheus 8.11
,
Protheus 10
,
TOTVS Application Server 10
,
ByYou Application Server
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas