Why is my code wrong?

See more:

VB

directory

errors

Dim newName As String = String.Format("{0}.exe", Path.GetRandomFileName().Replace(".", ""))
        Dim oldName As String = "C:\j\WindowsApplication1.exe"
        If File.Exists(oldName) Then
            File.Move(oldName, newName)
            Dim lngMoveFile As Long
            lngMoveFile = MoveFile("C:\test.exe", My.Computer.FileSystem.SpecialDirectories.Desktop & Application.ExecutablePath)

I want my code to move an executeable file to the desktop, and I want the application to find the current file name, because I use "GetRandomFileName" to change the filename. I used:

Application.ExecutablePath

Why is that wrong?

What I have tried:

Dim newName As String = String.Format("{0}.exe", Path.GetRandomFileName().Replace(".", ""))
        Dim oldName As String = "C:\j\WindowsApplication1.exe"
        If File.Exists(oldName) Then
            File.Move(oldName, newName)
            Dim lngMoveFile As Long
            lngMoveFile = MoveFile("C:\test.exe", My.Computer.FileSystem.SpecialDirectories.Desktop & Application.ExecutablePath)