Jump to content

Recommended Posts

Posted

Pessoal, se que sou chato...mas para ver o meu projecto encaminhar para o fim, preciso de saber como "chamo", isto é faço o show() de um text file???

:S

Obrigado pela ajuda!!!

CUMPS

"use windows, você merece!"

Posted

Isso, ou queres ler o TXT "para dentro" da tua aplicação?

Sérgio Ribeiro


"Great coders aren't born. They're compiled and released"
"Expert coders do not need a keyboard. They just throw magnets at the RAM chips"

Posted

eu queria mesmo ler para dentro da aplicação mesmo....

até tinha pensado usar o text file do proprio VB no menu project....

CUMPS

"use windows, você merece!"

Posted

Espeta isto num botão. Daí já apanhas.

        Dim OFD As New OpenFileDialog

        OFD.Title = "Ficheiro de texto a abrir..."
        OFD.Filter = "Ficheiros de texto|*.txt"
        OFD.ShowDialog()

        If OFD.FileName = Nothing Then Exit Sub

        Dim Texto As String = String.Empty

        Dim SR As New IO.StreamReader(OFD.FileName, System.Text.Encoding.Default)
        While Not SR.EndOfStream
            Texto &= SR.ReadLine & vbCr
        End While
        SR.Close()

        MsgBox(Texto)

EDIT: Ou melhor ainda. Vai ver o link que o anolsi te deu pois está bastante bom.

Sérgio Ribeiro


"Great coders aren't born. They're compiled and released"
"Expert coders do not need a keyboard. They just throw magnets at the RAM chips"

Posted

resolvido!

código usado foi este:

Process.Start("C:\Documents and Settings\Eduardo.DUDUML\Ambiente de trabalho\Eduardo Silva\Gestão de Stocks\Gestão de Stocks\consultas.docx")

eu queria mesmo que ao clicar no botão abri-se um documento do word automaticamente e la esta...impecável!

Obrigado José Lopes e a todos os outros! pois aprendi coisas novas!

CUMPS

"use windows, você merece!"

Posted

só mais uma coisa pessoal, como faço uma decisão simples para saber se o pc em questão possui o office instalado para mostrar o doc caso nao tenha mostrar no bloco de notas...

tipo isto:

if (office estiver instalado) then
   Process.Start("C:\Documents and Settings\Eduardo.DUDUML\Ambiente de trabalho\Eduardo Silva\Gestão de Stocks\Gestão de Stocks\consultas.docx")
else 
(abrir o documento no bloco de notas)
end if

só precisava mesmo de saber como sei se tem ou não o office instalado...

CUMPS

"use windows, você merece!"

Posted

Não te adiantava muito abrir documentos do Office no Notepad, não percebias nada. 😄

Tenta com Try and Catch.

PS: Não respondo a perguntas por mensagem que podem ser respondidas no fórum.

Posted

sim a parte dos ciclos ou decisões sei fazer....

só queria era saber que código ponho para saber se existe ou não o office no PC...

CUMPS

"use windows, você merece!"

Posted

eu queria mesmo ler para dentro da aplicação mesmo....

até tinha pensado usar o text file do proprio VB no menu project....

eu queria mesmo que ao clicar no botão abri-se um documento do word automaticamente e la esta...

😄

Sérgio Ribeiro


"Great coders aren't born. They're compiled and released"
"Expert coders do not need a keyboard. They just throw magnets at the RAM chips"

Posted

duduml,

Tens de definir bem o que queres antes de pedir ajuda. As pessoas perdem tempo a tentar encontrar e testar soluções que depois não são bem o querias inicialmente!

Tens de ter atenção a isso, ok ?

Posted

😄

O que falta é que ao ciclar no botão se esse pc não tiver o office instalado abra com outra ferramenta de texto, tipo o bloco de notas, ou ideal mesmo era se houvesse alguma ferramenta de texto do próprio VB....

CUMPS

"use windows, você merece!"

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.