WolframAlpha and the Entity
framework may have the data you are looking for. E.g.
WolframAlpha["European union country data"]
euCountries = EntityList@EntityClass["Country", "EuropeanUnion"]
EntityValue[Entity["Country", "Austria"], "PropertyAssociation"] // DeleteMissing // Dataset