Тема: файли у Visual Basic

Як відтворити пошук по назвам файла, з певного каталогу файлів (папки)?

2

Re: файли у Visual Basic

Вам .Net чи WinAPI? І взагалі - гуглом користувалися?

3 Востаннє редагувалося lichmanmaksim (19.07.2014 18:44:40)

Re: файли у Visual Basic

WinAPI напевно. потрібно щоб коли я в textbox ввів назву файлу та за допомогою кнопки мені відкрило другу форму та на новому textbox висвітило його дані, а якщо файла такого не існує, діалогове вікно яке про це повідомляло. все це розташування, вікна та форуми я зробив от тільки принцип знаходження я не зрозумію.
ось щось на кшталт моєї логіки роботи VB в цій формі:   

Private Sub Command3_Click()
Dim a4
Load Form2
aa = "\chancery\" + a4 + ".txt"
f = FreeFile
Open aa For Input As f
Form2.Show
a4 = Text1.Text
Text1.Text = Input(LOF(f), f)
Close f
End Sub


усі змінні які не оголошені в цій формі присутні у модулі
сайт про WinAPI - представляє собою цікаві методи побудування та пошук тих фалів але чомусь у мене ті 2 способи не працюють

4

Re: файли у Visual Basic

Який у вас бейсік? 5.1/6.0/.NET/VBA?

Говорила баба діду: «Я поїду к Білодіду, Ізучу двомовну мову І вернусь обратно знову». А дід бабі: «Не *изди, К Білодіду нєт їзди, — Туди не ходять поїзди»

5

Re: файли у Visual Basic

6.0 - він від 2013 здається кращим

6

Re: файли у Visual Basic

Бейсік 6.0 1998 року випуску, підтримка якого закінчилася у 2005 році.
Відповім, якщо ми про однаковий бейсик балакаємо.

але чомусь у мене ті 2 способи не працюють

Тому, що ви маєте спершу підключити вінапі функції
Але я раджу глянути на FileSystemObject

Dim fso, f1, ts
Set fso = CreateObject("Scripting.FileSystemObject")
f1 = fso.GetFile("c:\detlog.txt")
Set ts = f1.OpenAsTextStream(ForWriting, True)
Говорила баба діду: «Я поїду к Білодіду, Ізучу двомовну мову І вернусь обратно знову». А дід бабі: «Не *изди, К Білодіду нєт їзди, — Туди не ходять поїзди»
Подякували: 0x9111A, lichmanmaksim2