Access ASP SQL Server VBA NET - Форумы по проектированию

LEADERSOFT.ru Разработка на заказ программ и сайтов

Форумы по информационным технологиям

Начало

Forums

Регистрация | Вход

Форумы

Поиск

Список форумов

Программирование

Microsoft Access. Файлы mdb и accdb

Тема: Работа с ...

Тема: Работа с локальной сетью

15.06.2007 21:03:00

Алексей20

2 сообщения

Тема: Работа с локальной сетью

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

P.S. Общие вопросы по базе данных
Автор: Алексей от 02.09.2002 16:06:18 Источник ...

15.06.2007 21:03:00

All

4316 сообщения

RE: Работа с локальной сетью

1. В последнем выпуске (38) говорилось о поиске файлов с помощью подпрограммы NewSearch. Для работы в сети достаточно использовать указатель на сетевую папку: \\Склад\D (Сеть указывается обратным двойным слэшем). Если Вам необходимо просмотреть все диски, то используйте пример 2 из файла la_api.mdb.

2. Для поиска новых файлов используйте Add метод для добавления объекта PropertyTest в список свойств PropertyTests. Следующий пример добавляет 2 свойства. Первый критерий описывает типы файлов для поиска, и второй дату модификации файлов между 1 января 1996 года по 1 июня 1996 года. Пример показывает общее количество найденных файлов и их имена (взято из инструкции).

Set fs = Application.FileSearch
fs.NewSearch
With fs.PropertyTests
.Add Name:="Files of Type", _
Condition:=msoConditionFileTypeAllFiles, _
Connector:=msoConnectorOr
.Add Name:="Last Modified", _
Condition:=msoConditionAnytimeBetween, _
Value:="1/1/96", SecondValue:="6/1/96", _
Connector:=msoConnectorAnd
End With
If fs.Execute() > 0 Then
MsgBox "Всего найдено " & fs.FoundFiles.Count & _
" файла(ов)."
For i = 1 To fs.FoundFiles.Count
MsgBox fs.FoundFiles(i)
Next i
Else
MsgBox "Файлы не найдены."
End If
Use PropertyTests

P.S. Общие вопросы по базе данных
Автор: Виктор Конюков от 0:00:00 Источник ...

Страница 1 из 1

Программирование

Microsoft Access. Файлы mdb и accdb

Тема: Работа с ...

Поиск

Список форумов

Начало | Forums