Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Программирование и базы данных (http://forum.oszone.net/forumdisplay.php?f=21)
-   -   [решено] Переименование файла в в Visual Basic 2010 (http://forum.oszone.net/showthread.php?t=219768)

neo21 05-11-2011 17:23 1789157

Переименование файла в в Visual Basic 2010
 
Как переименовать файл "Test" чтобы к нему приписывалась дата и время - NewTest_год_месяц_день_часы_минуты_секунды_.txt

код:

Код:

My.Computer.FileSystem.RenameFile("C:\Test.txt", "NewTest.txt")

LilLoco 05-11-2011 17:54 1789172

neo21, так можно приписать текущую дату:
Код:

string newFileName = "NewTest_"+DateTime.Now.Year+"_"+DateTime.Now.Month+"_"+DateTime.Now.Day+"_"+DateTime.Now.Hour+"_"+DateTime.Now.Minute+"_"+DateTime.Now.Second+".txt"
Если нужно другую дату, то извлекать из
Код:

DateTime dt; //  в dt должна храниться нужная дата и время

neo21 05-11-2011 18:46 1789202

LilLoco, Спасибо
Код:
Код:

Dim d1, d2, d3, d4, d5, d6

        d1 = DateTime.Now.Year
        d2 = DateTime.Now.Month
        d3 = DateTime.Now.Day
        d4 = DateTime.Now.Hour
        d5 = DateTime.Now.Minute
        d6 = DateTime.Now.Second

        My.Computer.FileSystem.RenameFile(AppDomain.CurrentDomain.BaseDirectory + "test.txt", "NewTest_" & d1 & "_" & d2 & "_" & d3 & "_" & d4 & "_" & d5 & "_" & d6 & ".txt")


Iska 06-11-2011 00:49 1789457

Код:

With DateTime.Now
        My.Computer.FileSystem.RenameFile(AppDomain.CurrentDomain.BaseDirectory + "test.txt", _
                "NewTest_" & .Year & "_" & .Month & "_" & .Day & "_" & .Hour & "_" & .Minute & "_" & .Second & ".txt")
End With


neo21 06-11-2011 12:11 1789577

Iska, Спасибо


Время: 01:45.

Время: 01:45.
© OSzone.net 2001-