COMMONDIALOG ABRIR NA PASTA MINHAS IMAGENS

CAIO.FR.SP 17/01/2011 22:05:38
#362522
Galera como faço para que sempre que meu programa usar o CommonDialog ele inicie na pasta minhas imagens do windows!
FININHO 17/01/2011 22:37:10
#362523
CommonDialog1.InitDir = [Ô]C:\Documents and Settings
omeUsuario\Meus documentos\Minhas imagens[Ô]
RODRIGOFERRO 17/01/2011 23:07:56
#362525 Resposta escolhida 

Dim sPathUser as String
sPathUser = Environ$([Ô]USERPROFILE[Ô]) & [Ô]\Meus documentos\[Ô]
dlgOpenFile.InitDir = sPathUser


Ai ja da pra pegar dinamicamente, o [Ô]USERPROFILE[Ô] vai pegar o profile do kra, ai tu ajeita pra catar as [Ô]MINHAS IMAGENS[Ô]

Abraços
CAIO.FR.SP 17/01/2011 23:54:02
#362529
ZEROCAL, esse codigo ja me ajudou bastante! mas não teria uma forma de cair direto na pasta de imagens independete da versao do Windows instalada? nao existe alguma variavel do sistema que caia diretamente nas imagens?
RODRIGOFERRO 18/01/2011 00:00:23
#362531
no 7 se colocar %USERPROFILE% tambem cai no mesmo lugar, so temos de ver como fica a codificação, lembre-se o que o VB6 é amsi velho do que o seven entao nao foi feito para trabalharem junto !
Tópico encerrado , respostas não são mais permitidas
Voltar