Программирование
Веб программирование

Классы в VB.Net. Класс File

 
 

Для работы с файлами есть класс File. Он используется для работы над файлами(удаление, перемещение...).
Для начала немного теории о пространстве имен:
В .Net очень много классов, и многие из них имеют одинаковые имена. И чтобы имена не повторялись есть в .Net такая штука 'Пространство имен', т.е. к классу нужно обращаться не по его имени, а в начале нужно написать пространство имен, а только потом имя класса. Для работы с файлами и папками есть пространство имен System.IO
Для объявления класса File надо написать так:

Dim a As System.IO.File ' Объявляем переменную a как класс File, входящий в пространство имен System.IO

Теперь можно будет через переменную a работать с файлами. На форме размести 7 кнопок:

Button1 - измени свойство Text на "Создать файл"
Button2 - измени свойство Text на "Удалить"
Button3 - измени свойство Text на "Копировать"
Button4 - измени свойство Text на "Переместить"
Button5 - измени свойство Text на "Переименовать"
Button6 - измени свойство Text на "ИНФО"
Button7 - измени свойство Text на "Изменить атрибуты"

Теперь код:

Dim a As System.IO.File

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
a.Create("D:12212.txt") ' Создаем новый текстовой файл с именем 12212.txt
End Sub

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
a.Delete("D:12212.txt")' удаляем файл с именем 12212.txt
End Sub

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
a.Copy("D:Test1.txt", "D:Test11.txt") ' Копируем файл
End Sub

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
a.Move("D:Test1.txt", "D:Test11.txt") ' Перемещаем
End Sub

Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
a.Move("D:Test1.txt", "D:Test2.txt")' Переименовываем
End Sub

Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
MsgBox("Файл создан: " & a.GetCreationTime("D:Test1.txt"), , "")
MsgBox("Файл открыт: " & a.GetLastAccessTime("D:Test1.txt"))
MsgBox("Файл изменен: " & a.GetLastWriteTime("D:Test1.txt"))
End Sub

Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click
' Устанавливаем атрибуты:
a.SetAttributes("D:", IO.FileAttributes.Hidden) 'Скрытый 
a.SetAttributes("S:", IO.FileAttributes.ReadOnly) 'Только для чтения 
a.SetAttributes("S:", IO.FileAttributes.Archive) 'Архивный 
End Sub

Ну вот вроде бы и всё, для изменения/чтения файла есть класс StreamWriter и StreamReader. О них я напишу в следующих уроках.
Исходник


Есть вопросы? Спроси на нашем форуме!!
Миша [15.05.2011 17:31]

Для начала нужно создать на диске D папку test в ней текстовый документ 1 и в ней же папку 1. И только тогда может быть заработает.

Костя [08.07.2011 11:30]

НЕ забудте что в win 7 в корень нельзя добовлять файлы

Вова [28.07.2011 18:41]

Пишешь свой путь и все тип-топ!! Единственный минус мало описаний .

lolMAN [01.08.2011 15:06]

ну еще есть пространство имен "My" - My.Computer.filesystem и тд.
или я один юзаю Visual Studio 2010 Ultimate????

Гость [01.09.2011 18:20]

а с помощью vb.net можно писать интернет программы

Гость [22.09.2011 21:55]

можно конечно и интернет программы писать. но есть для этого более заточеные языки.

Razor64 [18.06.2012 18:45]

А зачем усложнять, когда можно написать:
Private Sub Button1_Click(...)
IO.File.Create("D:\Имя создаваемого файла.txt")
End Sub

И.т.д

VBIFonics [27.07.2012 22:56]

Здраствуйте, а как запустить сторонний файл из своей программы. Пробовал Shell("c:/file.exe") но программа не запускается. Подскажите что делать

FireDay [27.07.2012 23:10]

Shell "c:\file.exe"

Владимир [22.09.2012 15:17]

Подскажите пожалуйста, как создать файл в той же папке что и программа, не указывая имя диска, на котором размещен создаваемый файл.



Оставлять комментарии можно только зарегистрированным




Предупреждение: Вся информация представлена исключительно в образовательных целях.
Ни авторы, ни администрация не несут ответственности в случае ее использования в противозаконных целях.