Как извлечь домен с веб-адреса?

Question

У меня есть список веб-адресов. Мне нужно извлечь доменное имя из адреса.

Образец webAddress

http://1life.co 
http://1rage.com 
http://1-solar.com 
http://1stplayable.com 
http://1velocity.net 
http://microsoft.com 
http://21cm.com 
http://21csi.com 
http://23half.com 
http://2bsolutions.net 

Мне нужно, чтобы получить это:

1life 
1rage 
1-solar 
1stplayable 
1velocity 
microsoft 
21cm 
21csi 
23half 
2bsolutions 

Я пытался смотреть на строковые функции доступа, но я не мог найти что-нибудь, чтобы помочь мне.

Мой запрос должен быть таким:

SELECT function(webAddress) 
FROM myTable 

Answer 1

Вы можете использовать Access вправо, влево, Instr и функции InStrRev, если вы хотите, чтобы разобрать его с помощью SQL:

SELECT LEFT(RIGHT(webAddress, LEN(webAddress) - INSTR(1, webAddress, "//") - 1), 
      INSTRREV(webAddress, ".") - INSTR(1, webAddress, "//") - 2) FROM myTable; 

Обратите внимание, что вы можете использовать почти ту же самую логику в VBA (хотя кэширование повторных вызовов на InStr было бы лучше):

Public Function ExtractUrl(webAddress As String) 
    ExtractUrl = Left$(Right$(webAddress, Len(webAddress) - InStr(1, webAddress, "//") - 1), _ 
         InStrRev(webAddress, ".") - InStr(1, webAddress, "//") - 2) 
End Function