| |
|
|
| | Помогите пожалуйста с гиперссылкой, где можно почитать или как сделать.
у меня есть форма без привязки к запросу или рекордсету.
форма для вводжа данных, потом после ввода данных все записывается в базу через Execute.
вот в этой форме есть поле , куда должна вставляться гиперссылка и потом записываться в базу.
если форма с привязкой к запросу, то на нужном поле (имеющим свойство гиперссылки) я через правую клавишу мышки делал изменение гиперссылки. а вот как в данном случае сделать я не знаю. | |
| |
| |
| |
|
|
| | у поля вроде есть свойтсво "Гиперссылка" - да | |
| |
| |
| |
|
|
| | есть, то свойство стоит.
но внести как это было описано выше , через правую клавишу мышки не дает.
попробуте сделать пустую форму , создать там поле , поставить признак гиперссылки - да.
и там попробовать внести ее через правую клавишу . у меня не получилось. | |
| |
| |
| |
|
|
| | Попытаюсь объяснить какую задачу хочу решить.
в таблице хранятся ссылки на сканкопии файлов tif. соответвенно пользователь на форме кликает по ссылке и унего октрывается нужная сканкопия.
теперь эту ссылку мне надо как то через форму записывать в таблицу данных.
старым способом не получается. | |
| |
| |
| |
|
|
| |
таблице хранятся ссылки на сканкопии файлов tif.
|
Это пути?
Так и сохраняй их как пути. | |
| |
| |
| |
|
|
| | у меня вопрос заключается в том , как сделать удобную форму для ввода этого пути для пользователя.
не будет же он сидеть и набирать весь путь или копировать допутсим из адресной строки , а потом дописывать имя файла. | |
| |
| |
| |
|
|
| | вот так я это делаю - код где-то накопал
Private Sub Way_DblClick(Cancel As Integer)
With Application.FileDialog(1)
.InitialFileName = "\\Ad-dns-01\sklad\scan\"
.Title = "Укажите файл"
.ButtonName = "Добавить"
.AllowMultiSelect = False
.Filters.Clear
.Filters.Add "ВСЕ (*.*) ", "*.*"
.Filters.Add "Adobe (*.jpg)", "*.jpg", 1
result = .Show
' Закоментированный фрагмент не дает возможности выйти пока не загрузится файл
'******************************************************************************
'If result = 0 Then
'Do Until (result <> 0)
'MsgBox ("Необходимо внести файл в базу")
'result = .Show
'Loop
'End If
'*********************************************************************************
If result <> 0 Then SelectFile = Trim(.SelectedItems.Item(1)) ' собственно значение
End With
Me.Way = "#" & SelectFile & "#" & SelectFile ' заносим в поле гиперссылку
Me.Data = Forms!Cheta!Kod_Cheta
End Sub
|
| |
| |
| |
|
|
| |
|
|
| | спасибо огромное как раз то что доктор прописал   | |
| |
| |
| |
|
|
| | если открывается файл, значит известен путь к нему - так и записывайте его в нужное поле.
Я чего-то туплю - не пойму, в чем пробема? | |
| |
| |
| |
|
|
| | проблема в том что я не знаю как открывать файл.
а путь мне известен только в проводнике и все. ну ни копировать же его из адресной строки :)
хочется чтобы допустим , щелкнул два раза на поле, открылась форма где можно выбрать файл, щелкнуть клавишу выбрать, и вот это путь записать уже в поле.
сейчас попробую код , котрый описан выше. | |
| |
| |
| |
|
|
| | http://hiprog.com/index.php?option=com_content&task=view&id=468 | |
| |
| |
