*.txt dosya yolunu ve adını yazma

[usta07]

Her seferinde yazmak yerine dosya adını ve yolunu nasıl yazabilirim?
ilgi ve alakalarınıza teşekkür ederim. Bu gün Cuma Allah hepinizden razı olsun.
-------------------------------
Path$ = TextBox1.Value
File$ = TextBox2.Value
i = 3
For j = 1 To 1
If j = 1 Then Open Path$ + "\" + File$ For Input As #1
Do While Not EOF(1)

 

[zafer]

Merhaba

İstediğiniz sadce açılan dosyanın dizin ismini ve dosya ismini textbox'laramı getireceksiniz.
Başka birşeymi açıklarmısınız sormamım sebebi yazdığınız kodlardan dolayı.

 

[usta07]

teşekkürler

bu şekilde çözdüm

Open "c:\deneme.txt" For Input As #1
i = 3
For j = 1 To 1
Do While Not EOF(1)