Função: FileNoExt - Arquivo sem extensão
| Versões: | Advanced Protheus 5.07 , Advanced Protheus 5.08 , Advanced Protheus 6.09 , Advanced Protheus 7.10 , Microsiga Protheus 8.11 , Protheus 10 |
| Compatível Países: | Todos |
| Sistemas Operacionais: | Todos |
| Compatível às Bases de Dados: | Todos |
| Nível de Acesso: | Nível 1 (Acesso Clientes) |
| Idiomas: | Espanhol , Inglês |
Descrição:
Retorna o caminho e o nome de um arquivo sem a extensão com base em uma string passada por parâmetro.
Programa Fonte:
APLIB070.PRW
Sintaxe:
FileNoExt - Arquivo sem extensão ( cString ) --> cReturn
Retorno:
-
cReturn(caracter)
- Retorna o nome do arquivo sem a extenção.
Exemplos
#include "protheus.ch"User Function TestFileExt()Local oDlgLocal oGet Local cGet := Space(50)Local oSay1 Local cArqcFile := cGetFile("Teste","Arquivos",,,.T.) //'Diretório dos arquivos de dados') //'Arquivo de Configuraçôes (Consulta Genérica)|*.NGC | All Files|*.*'###'Gravar configurações'cArq := FileNoExt(cFile)ApMsgAlert(cArq)Return
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| cString | Caracter | Contém o nome do arquivo. | X |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas