how to get file path using browse button in vb6

Question

I am using this code, it gives the file name like "C:\File\sample.txt". But I am in need of getting path like "C:\File\". How can I get this path?

Private Sub cmdBrowse_Click()
    CommonDialog1.ShowOpen
    txtPath1.Text = CommonDialog1.FileName 
End Sub

I tried but it there no such command in CommonDialog.It shows Compile error like "Method or datamember not found" — Sacha Karthi, Apr 23 '18 at 06:52

Michał Turczyn · Answer 1 · 2018-04-23T08:50:21.777

0

Try

txtPath1.Text = Mid(CommonDialog1.FileName, 1, InStrRev(CommonDialog1.FileName, "\"))

edited Apr 23 '18 at 08:50

answered Apr 23 '18 at 07:08

Michał Turczyn

32,028
14
47
69

I'm new to vb6. So I don't know why it shows the error **'Invalid Qualifier'** for your code. It shows error in '**path**.LastIndexOf("\")' – Sacha Karthi Apr 23 '18 at 07:31
@SachaKarthi I updated answer :) – Michał Turczyn Apr 23 '18 at 08:55

score 0 · Answer 2 · answered Apr 23 '18 at 08:16

0

In FileName is Your dialog Box FileName that Contains Your File Name..You Need to Remove It By Finding Filename with a \

   With CommonDialog1
    TextBox1.Text = .FileName.Substring(0, .FileName.LastIndexOf("\"))
   End With

This code Finds Last \ from your File Path ("C:\File\sample.txt").Basically File Path Has Filename at the end of File Path.So Find the Last \ and Remove it. this Is working Fine form me.

answered Apr 23 '18 at 08:16

Prakash

100
10

This answer concerns VB.NET. If the OP was using VB.NET (which they do not appear to), then this answer [would be wrong](https://stackoverflow.com/q/5229292/11683). – GSerg Apr 23 '18 at 08:30

how to get file path using browse button in vb6

2 Answers2