• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

debliu

codigo criar ficheiro .bat de copiar

8 mensagens neste tópico

pessoal tou com uns problemas com este codigo...

o objectivo era criar um ficheiro .bat que se autocopiasse para o arranque!

Executo mas ele nao se copia...  :mad:

Dim fileName As String = "c:\A.bat"

        Dim sb As New System.Text.StringBuilder

        sb.AppendLine("label C: ABC")

        sb.AppendLine("copy A.bat c:\Documents and Settings\" & TextBox1.Text & "\Menu Iniciar\Programas\Arranque")

        IO.File.WriteAllText(fileName, sb.ToString)

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

agora só tenhu duvidas nesta linha

está assim:

sb.AppendLine("copy A.bat c:\Documents and Settings\ " & TextBox1.Text & "\Menu Iniciar\Programas\Arranque")

e pa funcionar teria de estar assim:

sb.AppendLine("copy "A.bat" "c:\Documents and Settings\" " & TextBox1.Text & "\Menu Iniciar\Programas\Arranque"")

mas dá erro!

poderiam me ajudar sff  :cheesy:

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Boas.

O commando DOS copy deve necessitar de caminhos completos.

Podes usar o System.IO.File.Copy() que é mais eficiente que DOS!!!!!

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

eu nao sei bem como usar isso

se podesses me explicar era fixe!

ainda sou um bocado noob! :-[

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Olá,

Queres copiar para o arranque para quê ? Porque não copias para lá directamente através do VB.NET ?

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Vê um coisa primeiro: no te computador é "Menu Iniciar\Programas\Arranque", mas se o pc estiver em Inglês ou em outra língua já não funciona. É preciso ter esse cuidado.

Tenta assim:

        Dim di As New IO.DirectoryInfo(System.Environment.GetFolderPath(Environment.SpecialFolder.Startup))
        Dim fileSource As String = "c:\aaa.bat"
        Dim fileDest As String = di.FullName & "\aaa.bat"
        IO.File.Copy(fileSource, fileDest, True)

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora