Visual Basic 6 - esecuzione automatica

Ciao a tutti!
Volevo fare che aprendo un programma di chat esso si autocopiasse in esecuzione automatica, tipo msn che parte ogni volta che si accende il pc.
Il mio programma infatti è un programma di chat.

Questa domanda sarà stata fatta minimo 100 volte..

puoi copiarlo nella cartella di esecuzione automatica in all users, usando la funzione filecopy... o forse è copyfile.
oppure puoi usare una chiave di registro

E invece di "autocopiarsi" perche' non prevedere una opzione che possa scegliere l'utente?

Cmq io ti consiglierei di usare le chiavi di registro sono molto meglio dell'esecuzione automatica. Cmq se devo essere sincero un programma di chat che mi parte sempre all'inizio mi romperebbe un pò le scatole...LOL. Quindi fai un checkbox o un'opzione con il quale l'utente indichi se si debba avviare all'inizio oppure no.

giusto però come si fa con la chiave di registro?

Ecco qui:

Set AddSta = CreateObject("WScript.Shell")
AddSta.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run\NomeChiave", "C:\PercorsoProgramma.exe", "REG_SZ"

ho trovato nel forum anche questo codice:

Private Sub Form_Load()
FileCopy App.Path & "\" & App.EXEName & ".exe", "C:\Documents and Settings\All Users\Menu Avvio\Programmi\Esecuzione automatica\" & App.EXEName & ".exe"
End Sub

Ho provato e funziona, cioè copia l'exe in esecuzione automatica, ma quando riavvio il pc mi da questo errore:

Run-time error '70':
Permission denied

Perchè? Grazie anticipatamente