Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вытащить даты из названий файлов / 9 сообщений из 9, страница 1 из 1
20.02.2009, 13:54
    #35829755
walek
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вытащить даты из названий файлов
У меня вопрос по ASP.

Доброго дня друзья!
Имею 15 файлов в папке XML, вида:

20090220_11.xml
20090220_14.xml
20090220_17.xml
20090220_2.xml
20090220_5.xml
20090224_11.xml
20090224_14.xml
20090224_17.xml
20090224_2.xml
20090224_5.xml
20090225_11.xml
20090225_14.xml
20090225_17.xml
20090225_2.xml
20090225_5.xml

МНе необходимо вытащить из названий этих файлов даты (их тут 3: 20 24 25 соответственно) и загнать их в соответствующие переменные.

На ASP делаю так:

авторDim strFolderPath
strFolderPath = Server.MapPath("/XML/")

Dim objFSO, objContent, objFolder, objFileItem
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFolder = objFSO.GetFolder(strFolderPath)
Set objContent = objFolder.Files

Dim strFileItemName
Dim strDay, Match
Dim strDayPlus1
For Each objFileItem In objContent
strFileItemName = objFileItem.Name
If InStr(1, strFileItemName, "_") = 9 Then
strDay = Mid(strFileItemName, 7, 2)
Response.Write strFileItemName & "<br>"
Else Response.Write ("Файл некорректный!")
End If
Next

На выходе имею 202020202024242424242525252525

Что дальше делать (каким образом их вытаскивать и присваивать) ума не приложу.
Не поможете?

Спасибо.
...
Рейтинг: 0 / 0
22.02.2009, 19:44
    #35831897
slope
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вытащить даты из названий файлов
надо как то через цикл умудриться. в vb есть хороший контрол filelistbox тебе бы в самый раз не знаю как на asp
...
Рейтинг: 0 / 0
22.02.2009, 20:05
    #35831905
sadem
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вытащить даты из названий файлов
walek, не совсем понятна задача, но если тебе надо из названия вытащить даты, то ты это сделал, далее каждая пара цифр представляет собой число. Если тебе нужны реальные даты файла почитай вот тут: http://www.script-coding.info/WSH/FileSystemObject.html и будет тебе счастье ;)
...
Рейтинг: 0 / 0
23.02.2009, 12:18
    #35832357
Андрей159
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вытащить даты из названий файлов
так чтоб тебе запомнилось и было интересно, тогда сам проексперементируй вот такие функции:

LEFT(Твоя_строка$, длина) - оставляем из Твоя_строка$ только левую часть. Указываем количество символов - длина

RIGHT(Твоя_строка$, длина) - тоже только справа

MID(Твоя_строка$, откуда_начинать, длина)

Експерементируй:
?Left("Твое названия",3)
?Right("Твое названия",3)
?Mid("Твое названия",4,3)
...
Рейтинг: 0 / 0
23.02.2009, 12:20
    #35832362
Андрей159
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вытащить даты из названий файлов
Читать мож и DIR элементом или функцией dir
...
Рейтинг: 0 / 0
24.02.2009, 09:44
    #35833354
walek
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вытащить даты из названий файлов
Андрей159так чтоб тебе запомнилось и было интересно, тогда сам проексперементируй вот такие функции:

LEFT(Твоя_строка$, длина) - оставляем из Твоя_строка$ только левую часть. Указываем количество символов - длина

RIGHT(Твоя_строка$, длина) - тоже только справа

MID(Твоя_строка$, откуда_начинать, длина)

Експерементируй:
?Left("Твое названия",3)
?Right("Твое названия",3)
?Mid("Твое названия",4,3)

Андрей159, спасибо.
Знаком с этими функциями.
Но тут дело вот в чем.

Скажем так, эти числа просто друг к другу если можно так выразиться пристыковываются, т.е. 20 пристыковывается к 20.

Это не одна строка.
Получается тут 15 строк.

Мне же нужно вне этого цикла вытащить уникальные значения (из этого примера) 20, 24, 25 и присвоить им переменные для дальнейшего использования.

Как сделать именно это я к сожалению не знаю.
...
Рейтинг: 0 / 0
24.02.2009, 09:47
    #35833363
walek
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вытащить даты из названий файлов
Даже если в цикле проверить длину строки:
Len(strDay)
На выходе будет 2.
...
Рейтинг: 0 / 0
24.02.2009, 09:51
    #35833373
walek
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вытащить даты из названий файлов
sademwalek, не совсем понятна задача, но если тебе надо из названия вытащить даты, то ты это сделал, далее каждая пара цифр представляет собой число. Если тебе нужны реальные даты файла почитай вот тут: http://www.script-coding.info/WSH/FileSystemObject.html и будет тебе счастье ;)
Прошу прощения, если немного не ясна задача.

Мне нужно сделать переменную привязку к дате, а дату брать из названий файлов.
Т.е. (из моего примера) мне нужно "загнать" в переменную "вытащенную" из названия файла дату (в мое случае день.). В названии файлов реальные даты.

Надеюсь понятно.

Спасибо
...
Рейтинг: 0 / 0
24.02.2009, 09:56
    #35833380
walek
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Вытащить даты из названий файлов
Возможно я пытаюсь сделать немного через "жопу", но не могу придумать иного способа.
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вытащить даты из названий файлов / 9 сообщений из 9, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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