Как проверить гиперссылки?

[burunduk_]

Здравствуйте.
Помогите, пожалуйста, решить такую проблему:

есть таблица, примерно 40000 строк. В ней есть поле типа "Гиперссылка", и, естественно, стоят ссылки на файлы. Все файлы находятся на том же компьютере, в одной большой директории, в которой примерно 100 вложенных поддиректорий, степень вложенности - 2, типа:
Товары
Категория
Картинки

Возникает 3 задачи:
1. Проверить, что все ссылки рабочие (нет ссылок, ведущих на несуществующие файлы).
2. Проверить, что все ссылки ведут на разные файлы (это каталог, и если в двух строках одна ссылка - это ошибка).
3. Было бы чудесно, если бы можно было бы выдать список файлов в данной большой директории, на которые не ссылается ни одна запись.

Большое спасибо за помощь.

[R Dmitry]

Сообщение от burunduk_

Здравствуйте.
Помогите, пожалуйста, решить такую проблему:

есть таблица, примерно 40000 строк. В ней есть поле типа "Гиперссылка", и, естественно, стоят ссылки на файлы. Все файлы находятся на том же компьютере, в одной большой директории, в которой примерно 100 вложенных поддиректорий, степень вложенности - 2, типа:
Товары
Категория
Картинки

Возникает 3 задачи:
1. Проверить, что все ссылки рабочие (нет ссылок, ведущих на несуществующие файлы).
2. Проверить, что все ссылки ведут на разные файлы (это каталог, и если в двух строках одна ссылка - это ошибка).
3. Было бы чудесно, если бы можно было бы выдать список файлов в данной большой директории, на которые не ссылается ни одна запись.

Большое спасибо за помощь.

пока на 1 задачу
Function errFile(eF As String) As Boolean
If Dir(eF) <> "" Then errFile = True Else errFile = False
End Function

[burunduk_]

R_Dmitry, большое спасибо. А куда эту функцию прицепить? Мне бы хотелось создать запрос, чтобы он мне показывал те записи (идентификатор и ссылку) таблицы _Фото, где ссылки ведут "в никуда"

[R Dmitry]

создаете модуль и вставляете туда функцию
затем в запросе делаете дополнительное поле и вставляете Проверка:errFile(ваше поле с сылкой)

[R Dmitry]

смотрите пример

[R Dmitry]

плюс проверка дублей


только свои данные подставьте


по третьему вопросу, все можно сделать, вопрос куда выводить данные......

[burunduk_]

Вот это да!
Большое спасибо за помощь!

[TranzitZP]

Здравствуйте.
Также нужна помощь в работе с гиперссылками.
Не могу понять как можно сделать, чтобы при загрузке формы проверялись гиперссылки, которые находяться в форме, на работоспособность (существует ли нужный файл по указанному адресу в интернете или нет). По результату проверки выдавлось либо сообщение, либо информация в поле формы (разницы большой нет).

Для примера сделал шаблон формы с гиперссылками. В форме сделал 2 варианта: гиперссылки (рабочая и нерабочая) в виде надписей и гиперссылки (рабочая и нерабочая) в виде полей.

Мне желательно, чтобы использользовались при проверке гиперссылки из надписей. Если это программно невозможно, то из полей формы.

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

[Teslenko_EA]

Здравствуйте TranzitZP.
придерживайтесь правила: один вопрос = одна тема
т.е. для "..Также нужна помощь..." создайте собственную тему и шансы на получение помощи у Вас увеличатся.
Евгений.

[Zinov_S]

Сообщение от R Dmitry

смотрите пример

Спасибо за пример Дмитрий, а если ссылка будет не на файл а на папку, как должна выглядеть процедура (функция)? Сергей.