select [Name],Model,substring(Country,0,Len(country)) as Country from
(
select distinct [Name],Model,
(select Country + ',' as [text()] from tabel where [Name]=a.[Name] and Model=a.Model for xml path('')) as Country
from tabel as a
)
as a
Happy Coding!
:)