este es el codigo
Código
Dim pfd As String pfd = Environ("ProgramFiles") Dim license As String license = (App.Path & "\serialdsl\license.txt") MsgBox license Dim Destination As String Destination = (pfd & "\DSL Speed\DSL Speed V4.4\") MsgBox Destination FileCopy (license), (Destination)