Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Объект и имя файла / 9 сообщений из 9, страница 1 из 1
18.05.2005, 13:09:57
    #33071865
kika
kika
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объект и имя файла
День добрый!
У меня есть путь типа "С:\name\"
Мне необходимо записать в переменную название первого файла из этой директории.
Подскажите как это сделать?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.05.2005, 13:31:11
    #33071953
Processor
Processor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объект и имя файла
Dir Function
Returns a String representing the name of a file, directory, or folder that matches a specified pattern or file attribute, or the volume label of a drive.
Syntax
Dir[(pathname[, attributes])]

и т.д.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.05.2005, 13:49:51
    #33072029
Processor
Processor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объект и имя файла
Тема: Объект и имя файла
Вопрос: (никакого упоминания об объекте )
Ответ: ответ на вопрос (никакого упоминания об объекте )
Так при чём объект ?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.05.2005, 14:08:20
    #33072116
kika
kika
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объект и имя файла
У меня был использован объект Scripting.FileSystemObject....
Не могла найти нужного метода....
Написала сообщение, потом решила сформулировать его по-другому, а тему изменить забыла... Вот поэтому так и вышло:-))))))))))

Делаю так:
Код: plaintext
p = Dir("C:\Inetpub\*.log", vbArchive)
А имя файла в переменную не записывается....
Что не так?

У лог-файлов стоит только один атрибут "Архивный".
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
19.05.2005, 11:23:44
    #33074030
Processor
Processor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объект и имя файла
Все же рекомендую вернуться к FSO.
И Help'у по Scripting Runtime Library
Там есть следующее:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Function ShowFolderList(folderspec)
   Dim fso, f, f1, fc, s
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set f = fso.GetFolder(folderspec)
   Set fc = f.Files
   For Each f1 in fc
      s = s & f1.name 
      s = s & "<BR>"
   Next
   ShowFolderList = s
End Function
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.05.2005, 11:10:31
    #33076479
Sung Chen Young
Sung Chen Young
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объект и имя файла
Подробнейшее описание Scripting.FileSystemObject Вы можете найти в файле справки по WSH (кстати, на русском языке и с многочисленными примерами кода) на http://www.script-coding.info/. Рекомендую там же форум по скриптам.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
20.05.2005, 18:07:43
    #33077899
kika
kika
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объект и имя файла
Спасибо, получилось!
А подскажите, почему в моем случае Dir() не работает?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
21.05.2005, 14:31:05
    #33078505
under
under
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объект и имя файла
Может он искал файл с названием *.LOG , а не по заданной маске??
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
22.05.2005, 12:20:35
    #33078930
Processor
Processor
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Объект и имя файла
kikaДелаю так:
Код: plaintext
p = Dir("C:\Inetpub\*.log", vbArchive)
А имя файла в переменную не записывается....
Что не так?
У лог-файлов стоит только один атрибут "Архивный".1."Где у Маркса написано", что такое p ?
2. "Видит ли око" реакцию системы на командную строку:
Код: plaintext
dir C:\Inetpub\*.log
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Объект и имя файла / 9 сообщений из 9, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 372ms
Закрыть
start [/forum/topic.php?fid=60&mobile=1&tid=2167767]:
 0ms
get settings:
 8ms
get forum list:
 9ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 38ms
get topic data:
 7ms
get forum data:
 1ms
get page messages:
 25ms
get tp. blocked users:
 1ms
others: 279ms
total:  372ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]