данные гиперссылки не передаются в таблицу назначения

Question

Я вставляю записи, содержащие поле гиперссылки из одной таблицы, в другую, содержащую поле гиперссылки с тем же именем.В исходной таблице гиперссылка ведет себя корректно;однако при вставке в таблицу назначения это не так.Поле отображает правильную «гиперссылку» (путь) в пункте назначения;однако, это не функционально - щелчок ничего не делает.Редактирование гиперссылки в таблице назначения показывает, что ссылка была скопирована, но без текста и адреса (!?)

Dim sSQL As String
sSQL = "INSERT INTO tbeAdditionalPages (type, printCatalogSheet, BaseCatalogSheet, CatalogSheetLink, PrintOrder, IsMountingDetail) " & _
"SELECT '" & Forms![frmSpec].[Type] & "', true, true, '#' & CatalogSheetLink, printOrder, false " & _
"FROM FixtureCatalogsPages " & _
"WHERE Manufacturer = '" & Forms![frmSpec].Manufacturer.Value & _
"' and CatalogNumber = '" & Forms![frmSpec].CatalogNo.Value & "';"
CurrentDb().Execute sSQL, dbFailOnError 

Я провел небольшое исследование и изменил код так:

sSQL = "INSERT INTO ... 'text#' & CatalogSheetLink & '#' ... 
CurrentDb().Execute sSQL, dbFailOnError

Результат был: теперь поле назначения имеет текст, но все еще не имеет адреса.Затем я изменил его на:

'text#' & CatalogSheetLink.address & '#'

, что привело к ошибке.

любые мысли, которые будут высоко оценены, отметьте

Answer 1

Вы обновляете с рабочего адреса гиперссылки, просто:

"SELECT '" & Forms![frmSpec].[Type] & "', true, true, CatalogSheetLink,  <...>

Если вы хотите изменить описание, вам нужно получить подстроку, например:

 INSERT INTO MyTable (MyHyperlink)
 SELECT 'New Description' & Mid(MyHyperlink, InStr(MyHyperlink, '#')) 
 FROM SomeTable