import.css=/download/attachments/327912/newLayout.css |
Função: CurDir
Exibe o diretório atual servidor. CurDir ( [ cNovoPath] ) --> cRet
cOldDir := CurDir()cNewDir := '\webadv\xis'CurDir(cNewDir) // Troca o path// Verifica se a troca foi realizadaIf cNewDir <> '\'+CurDir() conout('Falha ao Trocar de Path de '+cOldDir + ' para '+cNewDir)Else conout('Path de '+cOldDir + ' trocado para '+cNewDir+' com sucesso.')Endif
Advanced Protheus 6.09
,
Advanced Protheus 7.10
,
Microsiga Protheus 8.11
,
Protheus 10
,
TOTVS Application Server 10
,
ByYou Application Server
|