Visual Basic, .NET, ASP, VBScript
Новости | Примеры | Библиотека кодов | НеЧаВо | VBA | Справочник по VB | Справочник по WinAPI | ActiveX контролы | Статьи по VB | Мастерская разработчика | Форум VBNet | Яndex bar! | Голосование | Полезные программы | Магазин VBNet | Рассылка | Конкурсы | Юмор | Чат | Реклама на VBNet | Автора! | Ссылки | Бета-тестирование | Послать пример на сайт
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Файлы с определенной датой создания Добавлено: 17.04.09 16:18  

Автор вопроса:  Sergey
Можно как-то получить в VB2008 файлы с опредленной датой создания из конкретной папки?

Ответить

  Ответы Всего ответов: 7  

Номер ответа: 1
Автор ответа:
 maza_____



ICQ: 9968842 

Вопросов: 40
Ответов: 337
  Web-сайт: vkontakte.ru/id25563295 добавляйтесь в друзья))
 Профиль | | #1 		Добавлено: 17.04.09 17:36
Получай дату всех файлов и сравнивай

Ответить

Номер ответа: 2
Автор ответа:
 maza_____



ICQ: 9968842 

Вопросов: 40
Ответов: 337
  Web-сайт: vkontakte.ru/id25563295 добавляйтесь в друзья))
 Профиль | | #2 		Добавлено: 17.04.09 18:07
  1. Dim data As Date = "08.04.2009"
  2.     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  3.         Dim g() As String = IO.Directory.GetFiles("C:\1", "*.*", IO.SearchOption.AllDirectories)
  4.         Dim f As New System.IO.FileInfo("C:\1")
  5.         Dim data2 As String
  6.         For Each filename As String In g
  7.             data2 = f.CreationTime
  8.             f = New System.IO.FileInfo(filename)
  9.             Dim x As Short = Len(f.CreationTime.ToString)
  10.             data2 = data2.Substring(0, x - 9)
  11.             If data2 = data Then
  12.                 listbox1.items.add(filename)
  13.             End If
  14.         Next
  15.     End Sub

Ответить

Номер ответа: 3
Автор ответа:
 AWP



ICQ: 345685652 

Вопросов: 96
Ответов: 1212
  Web-сайт: xawp.narod.ru
 Профиль | | #3 		Добавлено: 18.04.09 02:32
у меня паранойя или вопросты по дате слишком часто задаются?

Ответить

Номер ответа: 4
Автор ответа:
 maza_____



ICQ: 9968842 

Вопросов: 40
Ответов: 337
  Web-сайт: vkontakte.ru/id25563295 добавляйтесь в друзья))
 Профиль | | #4 		Добавлено: 18.04.09 12:16
Sergey, мог бы и в прошлой твоей теме этот вопрос задать

Ответить

Номер ответа: 5
Автор ответа:
 Skywalker



ICQ: 300-70-6пятьЪ 

Вопросов: 62
Ответов: 545
  Web-сайт: iSkywalker.ru
 Профиль | | #5 		Добавлено: 18.04.09 13:32
а на шарпе круче:
  1. DirectoryInfo dir = new DirectoryInfo(@"C:\Новая папка (4)");
  2.             var files = dir.GetFiles().Where(file => file.CreationTime.ToShortDateString() == "23.08.2005")
  3.                                       .Select(fi => fi.Name);
  4.             var str = files.Aggregate((first, second) => first + "\n" + second);
  5.             MessageBox.Show(str);

Ответить

Номер ответа: 6
Автор ответа:
 maza_____



ICQ: 9968842 

Вопросов: 40
Ответов: 337
  Web-сайт: vkontakte.ru/id25563295 добавляйтесь в друзья))
 Профиль | | #6 		Добавлено: 18.04.09 15:28
http://converter.telerik.com/

Ответить

Номер ответа: 7
Автор ответа:
 Skywalker



ICQ: 300-70-6пятьЪ 

Вопросов: 62
Ответов: 545
  Web-сайт: iSkywalker.ru
 Профиль | | #7 		Добавлено: 18.04.09 21:28
я не к тому, что не знаю, как это будет на VB. Просто на VB эта запись будет все равно длинной и красота теряется.

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам