Process impersonation

Hello I wish to copy a file from one computer on another.
For example:

first computer:

network : workarea
comp IP : 85.170.32.15
username : workuser
pass : qwerty

second computer:

network : hoearea
comp IP : 157.17.210.38
username : homeuser
pass : qwerty

And full UNC path
source file: \\85.170.32.15\Reports\report.doc
dest file: \\157.17.210.38\userdir\report.doc

But I had problems, what I do incorrectly?

Code:


format PE GUI 4.0
entry start

  include 'win32a.inc'

section '.data' data readable writeable

  szTitle db 'Win32 Imerus',0
  szErrorPrivateProfile db 'Error invoke GetPrivateProfileStringA.',0
  szErrorLogonUser db 'Error invoke LogonUserA.',0
  szImpersonateLoggedOnUser db 'Error invoke ImpersonateLoggedOnUser.',0
  szErrorCopyFile db 'Error invoke CopyFile',0
  szErrorRevertToSelf db 'Error invoke RevertToSelf.',0
  szComplete db 'Operation complete!',0

  szSourceFile db '\\85.170.32.15\Reports\report.doc',0
  szDestFileName db '\\157.17.210.38\userdir\report.doc',0


  szUserName db 'homeuser',0
  szDomain db 'hoearea',0
  szPassword db 'qwerty',0
  LOGON32_LOGON_INTERACTIVE equ 2
  hToken dd ?


section '.text' code executable readable

  start:
        ; login my user
    continue_logonuser:
        invoke  LogonUser,szUserName,szDomain,szPassword,LOGON32_LOGON_INTERACTIVE,0,hToken
        test    eax,eax
        jnz     continue_impersonaly
        invoke  MessageBox,0,szErrorLogonUser,szTitle,MB_OK+MB_ICONERROR
        jmp     error_exit

        ; I do not know what to do further with Token
    continue_impersonaly:
        invoke  ImpersonateLoggedOnUser,[hToken]
        test    eax,eax
        jnz     continue_copyfile
        invoke  MessageBox,0,szImpersonateLoggedOnUser,szTitle,MB_OK+MB_ICONERROR
        jmp     error_exit

    continue_copyfile:
        invoke  CopyFile,szSourceFile,szDestFileName,0
        test    eax,eax
        jnz     continue_complete
        invoke  MessageBox,0,szErrorCopyFile,szTitle,0
        jmp     error_exit

    continue_reverttoself:
        invoke  RevertToSelf
        test    eax,eax
        jnz     continue_complete
        invoke  MessageBox,0,szErrorRevertToSelf,szTitle,MB_OK+MB_ICONERROR
        jmp     error_exit


    continue_complete:
        invoke  MessageBox,0,szComplete,szTitle,MB_OK+MB_ICONINFORMATION

    error_exit:
        invoke  ExitProcess,0

section '.idata' import data readable

  library advapi32,'ADVAPI32.DLL',\
          kernel32,'KERNEL32.DLL',\
          user32,'USER32.DLL'

  include 'api\advapi32.inc'
  include 'api\kernel32.inc'
  include 'api\user32.inc'

Thanks