Visual Basic, .NET, ASP, VBScript
 

   
   
     

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

Страница: 1 |

 

  Вопрос: Список в файл Добавлено: 22.09.05 20:12  

Автор вопроса:  DR*FRe$H | ICQ: 3442442 
Как записать список файлов из list-box'a или просто из папки в текстовый файл?

Ответить

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

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



Разработчик Offline Client

ICQ: 233286456 

Вопросов: 34
Ответов: 5445
 Web-сайт: hw.t-k.ru
 Профиль | | #1
Добавлено: 22.09.05 20:39
через разделитель?

dim i as king
dim nf as integer

nf = freefile
open "c:\1.txt" for binary accss write as nf
    for i = 0 to istbox1.count
        put nf,,listbox1.list(i) & vbcrlf
    next
close nf

Ответить

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


 

Разработчик Offline Client

Вопросов: 236
Ответов: 8362
 Профиль | | #2 Добавлено: 22.09.05 20:44
кидай на форму filelist, далее...

file$ = "C:\1.txt"
n = FreeFile
Open file$ for output as #n
For i% = 0 to File1.ListCount - 1
Print #n, File1.List(i%)
Next i%
Close #n

Ещё есть много способов получения списка файлов и папок, через FSO, через FindFirstFile - FindNextFile, через Dir$ итп... итд... Но это самый простой из всех перечисленных. А про остальные рассказать предоставляю возможность другим форумчанам, ведь все хотят поднять кол-во ответов :)))) шутка

Ответить

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


 

Разработчик Offline Client

Вопросов: 236
Ответов: 8362
 Профиль | | #3 Добавлено: 22.09.05 20:45
о! пока писал sne тут как тут :) От что значит лидер... :)))

Ответить

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



Разработчик Offline Client

ICQ: 343368641 

Вопросов: 17
Ответов: 686
 Web-сайт: barsik.newmail.ru
 Профиль | | #4
Добавлено: 22.09.05 22:12
2sne:
через разделитель?

сам и ответил :)

Ответить

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



Разработчик Offline Client

ICQ: 233286456 

Вопросов: 34
Ответов: 5445
 Web-сайт: hw.t-k.ru
 Профиль | | #5
Добавлено: 23.09.05 02:39
сам и ответил :)

это типа вопрос :) Точнее условие if (с разделителем), then ...

Ответить

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



ICQ: 334781088 

Вопросов: 108
Ответов: 2822
 Профиль | | #6 Добавлено: 23.09.05 12:44

    for i = 0 to istbox1.count
        put nf,,listbox1.list(i) & vbcrlf
    next

Думается, лучше все же сначала все это засунуть в буффер, а затем записать на диск за одну операцию.

Ответить

Страница: 1 |

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



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