Hi !
I'd like to export to txt by choosing path and name !
I have done this but it doesn't work ?
What is the problem ?
Private Sub komento32_Click()
Dim wpath As String
wtaph = InputBox("Anna polku ja nimi tai OK jolloin voit valita polun")
DoCmd.TransferText acExportDelim, "", "taulukko kysely", "acFormatTXT", "wpath", False, ""
Vie_txt_Exit:
Exit Sub
Vie_txt_Err:
MsgBox Error$
Resume Vie_txt_Exit
End Sub
I'd like to export to txt by choosing path and name !
I have done this but it doesn't work ?
What is the problem ?
Private Sub komento32_Click()
Dim wpath As String
wtaph = InputBox("Anna polku ja nimi tai OK jolloin voit valita polun")
DoCmd.TransferText acExportDelim, "", "taulukko kysely", "acFormatTXT", "wpath", False, ""
Vie_txt_Exit:
Exit Sub
Vie_txt_Err:
MsgBox Error$
Resume Vie_txt_Exit
End Sub