USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Caixa de Diálogo Abrir e Salvar do Windows no VB6
EliasEbs
NATAL, RN, BRASIL
84 - BRASIL
ENUNCIADA !
Postada em 29/10/2005 11:22 hs            
Att.
 Prezados Parceiros Programadores
 
     Gostaria de receber informações de como usar a caixa de diálogo Abrir e Salvar do Windows no Vb6.
                                                Atenciosamente
Elias Bernardo da Silva
 
 
   
Elieser Topassi
Pontos: 2843 Pontos: 2843
SÃO JOSÉ DO RIO PRETO
SP - BRASIL
ENUNCIADA !
Postada em 29/10/2005 15:49 hs            
Vc tem duas opções... o controle Common Dialog ou a API do Windows...
Recomendo q vc use o Common Dialog, pois usar API pode ser complexo para quem nao tem mta experiencia...
 
Bem, vc precisa referenciar o controle (menu Project -> Components... Selecione Microsoft Common Dialog 6.0 (SP5))...
Depois, inclue um controle no seu formulario e de um nome à ele... eu costumo iniciar o nome por cdl (pra lembrar q eh um Common Dialog)... no exemplo vou chama-lo simplesmente de cdl...
O Codigo para usar fica assim:
 
'Para janela "Abrir":
cdl.InitDir = "c:Meus Documentos"
cld.ShowOpen
MsgBox cld.FileName
 
'Para janela "Salvar Como"
cdl.InitDir = "c:Meus Documentos"
cld.ShowOpen
MsgBox cld.FileName
 
Em ambos os casos, a propriedade InitDir é o diretorio onde vai abrir a janela... se vc nao alterar ou passar "", vai usar a ultima utilizada (no historico do Windows)
 
Espero q isso te ajude...
Flw!


Elieser Carlos Topassi
Analista de Sistemas - Desenvolvedor VB/ASP/.Net

e-mail/msn:
elieser_topassi@yahoo.com.br
São José do Rio Preto,SP - Brasil
_____________________________________________________
Emoções "O caminho do tolo aos seus prórios olhos lhe parece reto, mas o sábio ouve conselhos" (Pv 12:15)

   
Carlos Maia
não registrado
ENUNCIADA !
Postada em 06/03/2012 11:20 hs   
Muito obrigado rapaz ! um tempao que nao mexia em vb6 e estou fazendo uma manutenção num sistema antigo aqui, e achei esse exemplo super prático !

Carlos Maia de Morais
Analista de Sistemas - Densenvolvedor VB / .net / Java
   
Mauro César
não registrado
Postada em 30/10/2016 00:54 hs   
Elieser, muito obrigado. Onze anos depois e vc continua nos ajudando com esse código. Obrigado mesmo!
     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2022   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página