- Код: Выделить всё
...
Dim doc As New HTMLDocument
Dim s As String
doc.body.innerHTML = "<html><head></head><body><a href=bbs.vbstreets.ru>vbstreets</a></body></html>"
s = doc.links(0).href
...
Так вот, в переменную s записывается следующиее s = "about:bbs.vbstreets.ru". Откуда берется "about:" понятно - при создании объекта, инициализируется пустой HTMLDocument по-умолчанию "about:blank". Так вот как его убрать? Т.е. чтоб нигде не дописывалось "about:". Я так понимаю, что, теоретически, если у человека измененная версия основной библиотеки, то там может быть вовсе и не about:blank, а что-то другое, поэтому просто удалять везде "about:" нельзя. Свойство HTMLDocument Domain тоже использовать не получается.