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

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Abrir documento word através do VB?????
Leandro Bueno
não registrado
Postada em 11/01/2006 09:14 hs   
fiz assim:
Para abrir o word:
Shell "C:Arquivos de programasMicrosoft OfficeOffice10winWORD.EXE"

Deu certo....
Agora, o usuário, vai digitar na caixa de texto o caminho do documento. Ex: ele digita "C:TESTEArquivo.doc
Como eu faria para abrir este o caminho do documento?
     
MINER
POTIRENDABA
SP - BRASIL
Postada em 11/01/2006 09:23 hs            
joga numa variavel o conteudo da caixa de texto e depois coloca a variavel na frente do shell
shell variavel
num testei aqui naum mas achu q da
tenta ai
lembrando q vc vai ter q testar antes se realmente o caminho é valido e se existe esse arquivo a ser aberto
se tiver errado me corrijam pessoal
 
     
Leandro Bueno
não registrado
Postada em 11/01/2006 09:54 hs   
declarei a seguinte variavel:
public abrir as string
 
Num botão fiz assim:
abrir = text1.text ' onde se encontra o caminho do arquivo do word digitado.
shell abrir
 
da erro de argumento inváildo
     
Leandro Bueno
não registrado
Postada em 11/01/2006 13:28 hs   
 fiz assim:
 
Dim cCaminho As String
        Dim cProg As String
 
        cProg = "C:Arquivos de programasMicrosoft OfficeOfficewinword.exe"
        cCaminho = Text1.Text
       
        Shell cProg & "  " & cCaminho, vbMaximizedFocus
 
da erro de file not found...
 
mas o caminho digitado na text esta certo...
até testei no executar do windos e entrou...
 
 
se poderem me ajudar ficarei muito grato
     
PH1959
Pontos: 2843
SÃO JOSÉ DOS CAMPOS
SP - BRASIL
ENUNCIADA !
Postada em 11/01/2006 13:33 hs            
vc tem que primeiro carregar o Objeto word
depois chamar o path
 
   
PH1959
Pontos: 2843
SÃO JOSÉ DOS CAMPOS
SP - BRASIL
ENUNCIADA !
Postada em 11/01/2006 13:36 hs            
Dim objword As word.Application
Dim objWorkbook As word.Workbook
   
Página(s): 1/3      PRÓXIMA »


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

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

HTML DESLIGADO

     
 VOLTAR

  



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