hämta bara del av värdet i db

Försöker göra en sub som hämtar ut länder från en kolumn i db.

  sub listaland()
SQL = "SELECT DISTINCT Land FROM Recension"
set rs = Connect.Execute(SQL)
If Not (rs.BOF Or rs.EOF) Then
	
	Do While Not rs.EOF
		
		response.write "<option>" & RS("Land") & "</option><br>"
		'response.write "det funkar"
		rs.MoveNext
	Loop
	
Else
	' om det blir tomt svar
	Response.Write ""
End If
	
end sub

Tyvärr finns det i vissa fall resultat som kan se ut såhär: Sverige/Norge / Danmark
,men jag vill ju att den bara ska plocka ett och ett av dessa länder. Hur gör jag det?