How to save a file in a directory vb6
<p>I have written a code in which data is written to a csv file where the filename and pathname are hardcoded , is it possible to make the button save the file to a user specific location ? Help would be appreciated . Thank you 
Below is the code of what i have done </p>

<pre><code>Public Sub exportCSV()

    MyRes.MoveFirst  
    strCsvFile = "D:\Mycsv.csv"

    fHndl = FreeFile

        Open strCsvFile For Output As fHndl
         out2 = MyRes.GetFieldNameAt(1)
          Print #fHndl, out2
    MyRes.MoveFirst
     While Not MyRes.IsEOF

        out = MyRes.GetField("ID")
'        Debug.Print out2
       Print #fHndl, out
        MyRes.MoveNext
    Wend

    MsgBox ("Downloaded")

    Close #fHndl

End Sub
</code></pre>