AdoX.ActiveConnection = connset fld = AdoX.Tables(sTableName).Columns(sName) lType = fld.TypelSize = fld.DefinedSize