Find All users Desktop

[reidarT]

How do I find the all Users Desktop.
I want to put a shortcut there?
And at the same time I want to add a shortcut to the 'StartBar'

reidarT

[Gino]

Re: Find All users Desktop

Hope this helps
Watch for line wrap

Module Module1
Sub Main()
Dim folderPath As String
Dim tempPath As String
tempPath = (System.Environ ment.GetFolderP ath _
(Environment.Sp ecialFolder.Com monApplicationD ata))
folderPath = tempPath.Replac e("Applicatio n Data", "Desktop")
Console.WriteLi ne(folderPath)
Console.ReadLin e()
End Sub
End Module

"reidarT" <reidar@eivon.n owrote in message
news:Oa9GAAfFHH A.1912@TK2MSFTN GP03.phx.gbl...

How do I find the all Users Desktop.
I want to put a shortcut there?
And at the same time I want to add a shortcut to the 'StartBar'
>
reidarT
>