Apple is having their WWDC in a few days.  I remember a time when I was like OH SHIT POWERBOOK G4 12!!!!!  Now I care more about the phone book that’s been sitting on my steps for 3 weeks than what Apple will tell me I need next.  iPhone nano, iPad Macro, iWatch.  Update the …

Map networked drive based on location

Set objNetwork = CreateObject(“Wscript.Network”) strComputer = “.” Set objWMIService = GetObject(“winmgmts:\” & strComputer & “rootcimv2”) Set colAdapters = objWMIService.ExecQuery _ (“Select * From Win32_NetworkAdapterConfiguration Where IPEnabled=True”) For Each objAdapter in colAdapters For Each strAddress in objAdapter.IPAddress arrOctets = Split(strAddress, “.”) If arrOctets(0) <> “” Then strSubnet = arrOctets(0) & “.” & arrOctets(1) & “.” & …