Como Abreviar nome de Diretorio (com o ~1) , tipo o MS-DOS ?

Bem , estou precisando que uma variavel receba uma estrutura de Diretorios, mas gostaria que vie-se no formato MS-DOS, exemplo:

c:\docume~1\asdfa~1\blabla~1

, o que eu consigo é pega-la no formato inteiro por exemplo:

c:\documents and configurats\asdfasdfsadf\blablablabla


gostaria que fosse abreviado , como no 1º exemplo, alguem pode ajudar??? ficarei grato !!!