dim wshnetwork
dim ie

on error resume next

set wshnetwork=wscript.createobject("wscript.network")

wshnetwork.removenetworkdrive "g:"
wshnetwork.mapnetworkdrive "g:", "\\zeus\general"

wshnetwork.addwindowsprinterconnection "\\zeus\LANIERLD"