copiar eliminar archivos de un directoia desde vb6

[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: Seleccionar todo

1.  


2. Private Sub Form_Load()


3. ruta1 = App.Path & "\Defaul\Defaul.mdb"


4. ruta2 = App.Path & "\Usurio\Defaul.mdb"


5. ruta3= App.Path & "\Usurio\usurario.mdb"


6. My.Computer.FileSystem.copyfile ("ruta1","ruta2)


7. Name "ruta2" As "ruta3"


8.  

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: Seleccionar todo

1.  


2. Kill "ruta3"


3. o podria utilizar


4. My.Computer.FileSystem.DeleteFile("ruta3")


5. pero este ultimo tambien me da error de sintaxis


6.  

no se qu eme recomiendan