• Познакомьтесь с пентестом веб-приложений на практике в нашем новом бесплатном курсе

    «Анализ защищенности веб-приложений»

    🔥 Записаться бесплатно!

  • CTF с учебными материалами Codeby Games

    Обучение кибербезопасности в игровой форме. Более 200 заданий по Active Directory, OSINT, PWN, Веб, Стеганографии, Реверс-инжинирингу, Форензике и Криптографии. Школа CTF с бесплатными курсами по всем категориям.

Аттачи: сохранить дату изменения файла при извлечении на диск

  • Автор темы zum
  • Дата начала
Статус
Закрыто для дальнейших ответов.
Z

zum

собственно извлекается вложение
после чего дата изменения файла, дата создания ставится текущим временем.
Что в принципе не прально, мы жеж там ниче не меняли...
Как быть? Надо чтобы дата изменения осталась как во вложении
Код:
	Set rtitem = Doc.getfirstitem( "attFile" )
If ( rtitem.Type = RICHTEXT ) Then
Forall pfile In rtitem.EmbeddedObjects
If ( pfile .Type = EMBED_ATTACHMENT ) Then
Filename = Dir+fsep+pfile .Name
Call pfile .extractfile ( Filename )
End If
End Forall
End If
 

lmike

нет, пердело совершенство
Lotus Team
27.08.2008
7 933
609
BIT
177
всё логично - произошла запись в ФС - она это зафиксировала
 
F

FixeR

zum
После извлечения можно менять дату создания и модификации файла.
См. функцию .
 
Z

zum

всё логично - произошла запись в ФС - она это зафиксировала
ну какбы да.
но по идеи идет же копирование.
аналогичное выделить старый файлик скопировать в другое место.
И при этом файлик 2, не будет иметь дату изменения - текущую дату.

Ну тут проблема ясна: лотус тупо его пишет заново из ресурсов.
Но как быть если мне нужна именно та дата изменения, что была в исходном файлике?

как это можно победить?


Добавлено:
zum
После извлечения можно менять дату создания и модификации файла.
См. функцию .
спасибо) то что надо наверно

А если система не виндовая?
А лотусовыми средствами?
 
F

FixeR

zum
Лотус, кажется, может только прочитать дату функцией FileDateTime.
Да, вариант только под винду.
 

lmike

нет, пердело совершенство
Lotus Team
27.08.2008
7 933
609
BIT
177
N

nvyush

Странно, уишное сохранение вложения дату создания не меняет...
 
N

nvyush

Попробовал такой код:
Код:
	Const fname = "файла.имя"
Dim session As New NotesSession
Dim db As NotesDatabase
Dim doc As NotesDocument
Dim eo As NotesEmbeddedObject

Set db = session.Currentdatabase
Set doc = db.Getdocumentbyid("NoteID")
Set eo = doc.GetAttachment(fname)
Call eo.Extractfile("C:/" + fname)
Дата файла — как у вложения. Версия клиента 8.0.1, 8.5.3

PS Может антивирь чудит.
 

Мыш

Lotus Team
12.02.2008
1 213
29
BIT
43
но по идеи идет же копирование.
Ну это спорный вопрос :) Файл же НЕ существовал на уровне ОС до его детача, правильно? Т.е., создается новый. Другое дело, что Лотус может, и в самом деле, проставлять дату...
 
Z

zum

Ну это спорный вопрос :) Файл же НЕ существовал на уровне ОС до его детача, правильно? Т.е., создается новый. Другое дело, что Лотус может, и в самом деле, проставлять дату...
ну да можно и поспорить. вот когда вы копируете с удаленной машины что-нибудь у вас в системе этого тоже нет, но тем не менее даты не поменяются.
хотя как бы тоже создается новая КОПИЯ файла.
так и не разобрался. Провериил на 2х машинах - даты меняются... дело вряд ли в антивире...
Мб настройки лотусевые какие? Гугл молчит.
 
N

nvyush

Провериил на 2х машинах - даты меняются... дело вряд ли в антивире...
Тогда может быть "вирус бродит по Европе"?
Добавлено
Ещё версия — может быть ОС чудит? Я тестил на XP.
 
Статус
Закрыто для дальнейших ответов.
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!