Форум программистов, компьютерный форум, киберфорум
Visual Basic .NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.63/8: Рейтинг темы: голосов - 8, средняя оценка - 4.63
 Аватар для XIST
1961 / 1071 / 148
Регистрация: 01.10.2009
Сообщений: 3,603
Записей в блоге: 1
.NET 2.x

Сохранить файл с именем, содержащим дату

08.12.2010, 21:42. Показов 1588. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Подскажите. Есть OPenFileDialog,открывает файл в textbox1 а далее сохраняю его, как сделать что бы сохраненный файл имел имя OpenFileDialog1.FileName + Date
VB.NET
1
2
3
        TextBox1.Text = System.IO.File.ReadAllText(OpenFileDialog1.FileName, System.Text.Encoding.GetEncoding("windows-1251"))
        Dim sw As System.IO.StreamWriter = New StreamWriter(My.Application.Info.DirectoryPath & "\\Base\1\1.txt")
        sw.Write(TextBox1.Text)
Забыл, нужно с помощью StreamWriter
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
08.12.2010, 21:42
Ответы с готовыми решениями:

Архивирование только изменённых документов в архивы с именем, содержащим имя сотрудника и дату создания архива
Папка с рабочими файлами сотрудников (c:\документы\), в ней на каждого сотрудника отдельная папка, например: c:\документы\Антонова...

Архивирование только изменённых документов в архивы с именем, содержащим имя сотрудника и дату создания архива
Дали вот такое задание. Само задание: Дано: Папка с рабочими файлами сотрудников (c:\документы\), в ней на каждого ...

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

2
Почетный модератор
Эксперт .NET
 Аватар для NickoTin
8729 / 3681 / 404
Регистрация: 14.06.2010
Сообщений: 4,513
Записей в блоге: 9
08.12.2010, 22:55
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

VB.NET
1
2
3
4
5
6
7
8
9
                ' ofd - экземпляр OpenFileDialog
                Dim val As String = File.ReadAllText(ofd.FileName), _
                    _path As String = Path.Combine(Application.StartupPath, "Base\1\" & _
                        Path.GetFileNameWithoutExtension(ofd.FileName) & DateTime.Now.ToString("_hh.mm.ss_HH.mm") & Path.GetExtension(ofd.FileName))
 
                Using sw As New StreamWriter(_path)
                    sw.Write(val)
                    sw.Flush() // Обязательно!
                End Using
Будет полезно.
1
 Аватар для XIST
1961 / 1071 / 148
Регистрация: 01.10.2009
Сообщений: 3,603
Записей в блоге: 1
09.12.2010, 07:49  [ТС]
SSTREGG спс, про стрины понятно, я Date напісал в общем, а вот за сохранение + 1
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
09.12.2010, 07:49
Помогаю со студенческими работами здесь

Через Ексель Открыть файл ВОРД и сохранить файл под определенным именем
Открываю через ексель файлы ворд и выполняю макрос ворд, но не получается сохранить файл под указанным именем ни такое ...

Узнать текущую дату и создать файл с этим именем
Вообщем самое главное - получить дату в виде "15 янв 2011 г." или "15.01.2011"(не совсем важно), и преобразовать в char Как создать файл...

Как сохранить файл со своим именем?
Всем добрый День! Скажите пожалуйста, как сохранить документ, чтобы его имя зависело от переменной например: я сохраняю документ ...

Как сохранить файл с кириллическим именем
Как сохранить с русскими названиями файлов ? Отправляю в imagejpeg() Картинка.JPG Получаю Р*С™Р*°СЂС‚Р*С‘Р*Р…Р*С”Р*В°.JPG

Сохранить файл Excel с именем, содержащимся в ячейке
Есть - EXCEL-овский файл, в некой ячейке (например A1:A1 первого листа) содержится (или формируется) некое имя (типа простой текст,...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Сумматор с применением элементов трёх состояний.
Hrethgir 26.03.2026
Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .
Автозаполнение реквизитов при создании документа
Maks 26.03.2026
Код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита, которое может. . .
Команды "Заполнить" и "Очистить" на форме документа
Maks 26.03.2026
1. Команда формы "ЗаполнитьЗапчасти". На примере нетипового документа разработанного в конфигурации КА2. В качестве источника данных указан регистр накопления, в который записываются данные о. . .
Кому нужен AOT?
DevAlt 26.03.2026
Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .
Отправка уведомления на почту при изменении наименования справочника
Maks 24.03.2026
Программная отправка письма электронной почты на примере изменения наименования типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной. . .
модель ЗдравоСохранения 5. Меньше увольнений- больше дохода!
anaschu 24.03.2026
Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .
Midnight Chicago Blues
kumehtar 24.03.2026
Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .
SDL3 для Desktop (MinGW): Вывод текста со шрифтом TTF с помощью библиотеки SDL3_ttf на Си и C++
8Observer8 24.03.2026
Содержание блога Финальные проекты на Си и на C++: finish-text-sdl3-c. zip finish-text-sdl3-cpp. zip
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru