1. Fórum
  3. Protheus/Microsiga/Totvs
  5. AdvPL (Advanced Protheus Language)
  7. Funções AdvPL
  9. cGetFile

Perguntas cGetFile

Mais
8 anos 6 meses atrás #29512 por sarraipa
cGetFile foi criado por sarraipa
Estou com uma duvida estou usando a função cGetFile, e gostaria de saber como trazer o nome do arquivo separado do caminho, pecisso das duas informações mais separadas, tipo isso é possivel:


cGetFile('Arquivo *|*.*|Arquivo JPG|*.Jpg','Selecione arquivo',0,'C:\Dir\',.T.,,.F.)

Retorno: c:\pastas\arquivo.csv

deveria ser tipo assim: c:\pastas\ e outro retorno com arquivo.csv

Por favor Acessar ou Registrar para participar da conversa.

Mais
8 anos 6 meses atrás #29513 por kanaamlrr
Respondido por kanaamlrr no tópico cGetFile 
nPos := RAt(cRet,"/")

cDir  := SubStr(cRet,1,nPos)
cFile := SubStr(cRet,nPos+1,Len(cRet)-(nPos+1))

Acho que deve funcionar.
talvez precise de algum ajuste, mas a ideia seria essa.

Por favor Acessar ou Registrar para participar da conversa.

  1. Fórum
  3. Protheus/Microsiga/Totvs
  5. AdvPL (Advanced Protheus Language)
  7. Funções AdvPL
  9. cGetFile
Tempo para a criação da página:0.098 segundos
Joomla templates by a4joomla