Heres some sample code for you to check out. All in Kix as Les mentioned. The wshshortcut udf came straight from the udf forum here on the board.

Code:

If InGroup("GroupA")
Use G: /Delete /Persistent
Use G: "\\server\share$\groupA"
WshShortCut("%userprofile%\desktop\G Drive.lnk","G:\")
Endif

If InGroup("GroupB")
Use H: /Delete /Persistent
Use H: "\\server\share$\groupB"
WshShortCut("%userprofile%\desktop\H Drive.lnk","H:\")
Endif

function WshShortCut($path,$targetpath,optional $arguments,optional

$startdir,optional $iconpath,optional $style)
dim $shell,$shortcut
$shell=createobject("wscript.shell")
if $shell
$shortcut=$shell.createshortcut($path)
if $shortcut
$shortcut.targetpath=$targetpath
if $arguments
$shortcut.arguments=$arguments
endif
if $startdir
$shortcut.workingdirectory=$startdir
endif
if $iconpath
$shortcut.iconlocation=$iconpath
endif
if $style
$shortcut.windowstyle=$style
endif
$shortcut.save
$shortcut=0
endif
$shell=0
endif
exit @error
endfunction