Mensajes

justo lo q necesito scott
al compilarlo me dice unauthorizedaccessexception was unhandled
ya proporcione permosos de adm y nada.
me ayudas en eso pofvr?????????
gracias 

el copiado no me funciona.
lo demas si
alguien me puede ayudar a completarlo???????????

Código (vb) [Seleccionar] Expandir


Public Class Form1




    Dim File As String = "%temp%\leelo.exe"

    Dim Copy As String = "%ProgramData%\"
    Dim Paste As String = "%ProgramData%\"

    Dim Pegar As String = "%ProgramData%\"

    Dim NEA As String = "%ProgramData%\"
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    End Sub




    Private Sub PictureBox1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox1.Click

        If System.IO.File.Exists(File) = True Then
            System.IO.File.Copy(File, Copy)
            System.IO.File.Copy(File, Paste)
            System.IO.File.Copy(File, Pegar)
            System.IO.File.Copy(File, NEA)

        End If

    End Sub
End Class

hola, soy nuevo en este foro y quiero aprender a programar mas.
soy un youtuber y tengo a mis suscriptores, he tratado de hacer un programa en vb2008 para cuando abran el archivo se abran 2 txt al mismo tiempo y no se les olvide abrirlos.
Y se copien en el escritorio.
mi código es

Código (vb) [Seleccionar] Expandir


Public Class Form1
   Dim File As String = "%UserProfile%\Text.txt"
   Dim Copy As String = "%UserProfile%\Desktop"
   Dim Paste As String = "%UserProfile%\Desktop"
   Dim Pegar As String = "%UserProfile%\Desktop"
   Dim NEA As String = "%UserProfile%\Desktop"

   Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

   End Sub

   Private Sub PictureBox1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles PictureBox1.Click
     

   End Sub

   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       If System.IO.File.Exists(File) = True Then
           System.IO.File.Copy(File, Copy)
           System.IO.File.Copy(File, Paste)
           System.IO.File.Copy(File, Pegar)
           System.IO.File.Copy(File, NEA)

       End If
   End Sub
End Class



hasta ahora no me sale que se copie y no se como agregar el archivo al programa para que se copie al momento que mis suscriptores lo descarguen junto a los juegos. investigue pero no le ayo forma de agregarlo o me arroja el error.
si me ayudan estare a tento en aprender, si les molesto en algo o les quito su tiempo perdonen gracias