// using jscript - dont use vb, nobody is using vbscript in infopath, it hurts the brain, trust me.
//Call Wscript to get user logged in details:
var oNet = new ActiveXObject("Wscript.Network");
sUserID = oNet.surname;
// Call AD to get details about user:
var objSysinfo = new ActiveXObject("ADSystemInfo");
var strUser = objSysinfo.UserName;
var objUser = GetObject("LDAP://" + strUser);
strSurname = objUser.get("SN");
strGivenname = objUser.get("givenName");
strEmail = objUser.get("MAIL");
strFacility = objUser.get("physicalDeliveryOfficeName");
strExtension = objUser.get("telephoneNumber");
strManager = objUser.get("manager");