Генератор текста (помогите найти)

Есть список:

Code:

hello
world
goodbye
life

И второй список:

Code:

.net
.ru
.com

Я хочу склеить его в вид:

Code:

hello.net
hello.ru
hello.com
helloworld.com
worldhello.com
...

То есть во-первых программа должна сама генерировать все возможные варианты комбинаций слов, а во вторых к каждой присоединять доменную зону.

 

http://www.seogenerator.ru/download/

Пишешь:
{hello|world|goodbye|life}.{ru|com|com.ua}
и на выходе получишь то, что нужно.

 

Code:

Dim tmpStr As String
Private Sub Form_Load()
Open "1.txt" For Input As #1
Open "ok.txt" For Append As #2
Do While Not EOF(1)
Line Input #1, tmpStr
Print #2, tmpStr & ".net"
Print #2, tmpStr & ".ru"
Print #2, tmpStr & ".com"
Loop
Close #1
Close #2
End Sub

както так или не так

http://upwap.ru/1504520