Ciao a tutti,
premesso che sono agli inizi con il VBA di access,
ho creato un pulsante con legato questo codice:
Private Sub Comando3_Click()
DoCmd.TransferText acExportDelim, "Standard output", "IMPDAT", "D\prova1.txt"
End Sub
Impdat e' il nome della query.
Ma non funziona, il file non viene salvato.
Dove sbaglio?
Grazie in anticipo.
Claudio
codice:DoCmd.OutputTo acOutputQuery, "IMPDATI", acFormatTXT, "D:\prova1.txt"
Io ne ho viste cose che voi umani non potreste immaginare. Navi da combattimento in fiamme al largo dei bastioni di Orione e ho visto i raggi B, balenare nel buio vicino le porte di Tannhäuser. E tutti quei momenti ... andranno ... perduti nel tempo, come lacrime nella pioggia. È tempo di morire. (Roy Batty).
Grazie,Originariamente inviata da Misterxxx
provato anche questo, ma non me lo salva lo stesso, non capisco proprio...
errore?
Io ne ho viste cose che voi umani non potreste immaginare. Navi da combattimento in fiamme al largo dei bastioni di Orione e ho visto i raggi B, balenare nel buio vicino le porte di Tannhäuser. E tutti quei momenti ... andranno ... perduti nel tempo, come lacrime nella pioggia. È tempo di morire. (Roy Batty).
Non dà nessun errore, ma il file non viene esportato.
per sicurezza, l'ho appena testato e funziona ... non saprei
Io ne ho viste cose che voi umani non potreste immaginare. Navi da combattimento in fiamme al largo dei bastioni di Orione e ho visto i raggi B, balenare nel buio vicino le porte di Tannhäuser. E tutti quei momenti ... andranno ... perduti nel tempo, come lacrime nella pioggia. È tempo di morire. (Roy Batty).
Anch'io non capisco come mai.
da qui e' possibile scaricare il file di access.
https://www.dropbox.com/s/xi2bdh93iq...INI.accdb?dl=0
vediamo se qualcuno riesce a capire il perche'.
Ancora grazie.
Risolto: ho dovuto aggiungere ad Acces la cartella di destinazione come sorgente attendibile. :-)
Permessi di invio
Rispondi quotando