Pegar so Nome do Executável e Pegar so a Path do Executável

[Garoto de Programa]

Prezados,

Gostaria de uma ajuda na seguinte questão:
Possuo uma aplicação onde devo pegar o endereço completo(Path) de onde o executável esta rodando para poder criar um novo Diretório.
Exemplo:

Código: Selecionar todos

Meu Executável esta em um diretório chamado CHRIS dentro do diretório chamado Sistema na Raiz da unidade C.
Eu quero uma função para retornar:
C:\CHRIS\SISTEMA
Para assim eu poder criar o diretório Backup e ficar:
C:\CHRIS\SISTEMA\BACKUP

Eu já tentei utilizando a função EXENAME() so que ela me retorna o nome do EXE. Se existir uma função que remova o arquivo e retorne apenas a Path ficaria simples de resolver mas já olhei quase todas as funções da CATOOLS e não achei nada parecido so o TOKEN() que não deu muito resultado pois ele retorna uma parte apartir de um caracter especial tipo \/;,.()... etc.

Agradeço pela atenção de todas antecipadamente,

Tenham um(a) bom(a) dia/noite.

Que Deus continue a nos abençoar.

[Pablo César]

Christiano,

As funções aqui descritas são do CA-TOOLS. utilize o NG (norton Guide) para te auxiliar na descrição dessas funções:

VDIR:=DIRNAME() // Vai dizer qual é o diretorio em que se encontra

VVOL:=SUBSTR(ALLTRIM(EXENAME()),1,2) // Vai te dizer a unidade (util quando trabalha em rede)

VDBF:=VDIR+"\INATIVOS\CLIENTES.DBF" // indica o nome e lugar de outro DBF
USE (VDBF) // Abre segundo arquivo

VSUBDIR:="\BACKUP" // Prepara variavel do sub-diretorio

DIRMAKE(VDIR+VSUBDIR) // Cria sub-diretorio


Espero ter ajudado, boa sorte

:xau

[Stanis Luksys]

Olá,

Eu não tenho certeza mas acho q o função DIRNAME() pode retornar um resultado inesperado, quando o cara acessa o programa de outra pasta, por exemplo no DOS se o cara fizer isso:

c:\sistema\programa.exe

Ao invés disso:

cd sistema
programa.exe

Então no primeiro caso vai retornar o diretório raíz, que na verdade é o diretório atual.

[Maligno]

Possuo uma aplicação onde devo pegar o endereço completo(Path) de onde o executável esta rodando para poder criar um novo Diretório.

O interessante desse tipo de problema é que o nome completo do caminho/executável é passado pela linha de comando, quando executamos o programa. Tente usar o objeto que tenho na minha área de download.

[]'s
Maligno
http://www.buzinello.com/prg