copiar eliminar archivos de un directoia desde vb

[ernestoelunico]

hola nuevamente
estoy intenando copiar un archivo de mi progrma a otro diretorio
el archivo esta en
c:\miprogrma\defaul\defual.mdb
donde quiero copiar
c:\miprogrma\usuraio\defual.mdb
este es el codigo que estoy usando

Código:

Private Sub Form_Load()
ruta1 = App.Path & "\Defaul\Defaul.mdb"
ruta2 = App.Path & "\Usurio\Defaul.mdb"
ruta3= App.Path & "\Usurio\usurario.mdb"
My.Computer.FileSystem.copyfile ("ruta1","ruta2)
Name "ruta2" As "ruta3"

lo de ruta es por si a la hora de instalar el usuario cambia el directorio de la instalacion
para eliminar piendo usar

Código:

Kill "ruta3"
o podria utilizar
My.Computer.FileSystem.DeleteFile("ruta3")
pero este ultimo tambien me da error de sintaxis

no se qu eme recomiendan

[Avellaneda]

Iniciado por ernestoelunico

hola nuevamente
estoy intenando copiar un archivo de mi progrma a otro diretorio
el archivo esta en
c:\miprogrma\defaul\defual.mdb
donde quiero copiar
c:\miprogrma\usuraio\defual.mdb
este es el codigo que estoy usando

Código:

Private Sub Form_Load()
ruta1 = App.Path & "\Defaul\Defaul.mdb"
ruta2 = App.Path & "\Usurio\Defaul.mdb"
ruta3= App.Path & "\Usurio\usurario.mdb"
My.Computer.FileSystem.copyfile ("ruta1","ruta2)
Name "ruta2" As "ruta3"

lo de ruta es por si a la hora de instalar el usuario cambia el directorio de la instalacion
para eliminar piendo usar

Código:

Kill "ruta3"
o podria utilizar
My.Computer.FileSystem.DeleteFile("ruta3")
pero este ultimo tambien me da error de sintaxis

no se qu eme recomiendan

El objeto 'My.Computer' no existe en VB6, es nativo de .NET.

Puedes utilizar el método 'Copy' de VB6 o 'CopyFile' del Objeto FileSystemObject

[ernestoelunico]

ok muchas gracias por el dato ya busco la infomacion correcta
saludos