Visual Basic 2010 Copy To StartUp Tutorial

How to make a program that wil copy itself to startup folder.

Code:

Dim OS() As String
Dim UserName() as String


Form1.Load
OS = My.Computer.Info.OSFullName.Split(" ")
UserName = My.User.Name.Split("\")
TextBox1.Text = OS(2)
TextBox2.Text = UserName(1)

If OS(2) = "XP" Then TextBox3.Text = "C:\Documents and Settings\" & UserName(1) & "\Start Menu\Programs\Startup\" & Application.ProductName & ".exe"
Else TextBox3.Text = "C:\Users\" & UserName(1) & "\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup\" & Application.ProductName & ".exe"
End If


Button1.Click
Try
My.Computer.FileSystem.CopyFile(Application.ExecutablePath, TextBox3.Text)
Catch ex As Exception
MsgBox("Could not copy file!")
End Try


If you get any errors, just try to retype the code or post the error in comments.

---

Closed Caption:

had to all rights
examines she'll have to make an
indication that soon
cope itself to the sometime heads up the
computer
still offense busy assuring me
through Dreamz around when you login
user account some
your system writings an alliance is the
doesn't any word is removed
New York remissions dress and interest
in animation project
things
times
the montanans street gangs Nexus
and moans visit to be the first to take
strike since
just shown this parodies
Gene Krupa really internalized
solutions actually past
lemme to lose them
systems in
designed them my happy applications
that's yes Ste
Matt from
in the ninth record influenza
someone deeds
the Lance and then something's
these two characters names
instances treaty music mashed
910 done through
enter discussions alright Zealand s
these changes the
a mystery to from
my computer usually
some name up to you is this instance in
so
welcome indians horizons
school the you is name he's seen those
my Christmas in the sand and the interns
instructions they did so much as did the
same
housed sons
he's the same June through them
these the name system just needs a
little name
times which is the skis
name computer this turns
nection username right discusses the
tombs
constraints them same
grigsby the mean those who run
to text books 1 this one is not
displayed to the user name
didn't exist sheehan's
noonan you soon
16 dicey industries
the these best
beginners sixty and
threesome concerned him defend start-up
this soil use a reason
exchanges goods is dumb use
she she uses Sam
the this country's music the Redskins
and the clintons some You Can Dance
decoding descriptions slim
and rest doing this to nazis
Disney Co dzisiaj you're pretty
shootings
16 things on street you bitches am
and is it stands to reason Eric nice
contrast
plans residences seized
to which is the US GISTs as
send his name in these subjects
it's cleaned the
exit sign solutions
this condom nixon's
Damien's
just sent word gesture
them rights and Mona
happy to truman two sons students who
witnessed
I'll add
netizens watching
I homes teaches them to you trends in
there are many videos
resistance of there's on you too saloon
thanks for watching