Will this code work as a VBS logon script?

Dim objNet

Set objNet = CreateObject("Wscript.Network")

objNet.MapNetworkDrive "F:", "\\servername\drive"
WSCript.Quit

Set wshObject = Wscript.CreateObject("Wscript.Shell")
desktopFolder = wshObject.SpecialFolders("Desktop")
set myShortcut = wshObject.CreateShortcut(desktopFolder & "\Notepad.lnk")
myShortcut.TargetPath = "%windir%\Notepad.exe"
myShortcut.Save()

end of script
I will of course replace all the needed dir and paths.

- MilitantEidolon