Newsgroup: it.comp.appl.access
Titolo: Esportare tabelle in Access 97

Salve a tutti !
Premetto che ho costruito un DB interamente automatizzato (cioè che gira
senza l'intervento di un operatore) alimentato solamente dall'inserimento
di nuovi record in tabelle. 
La funzione finale è quella di esportare in una cartella condivisa dei
reports in formato RTF ( o HTML) generati tramite una query avviata dalla
funzione "timer" presente in una maschera e per questo utilizzo una macro
con la funzione OUTPUT SU. 
E fin quì va tutto bene; 
Il probleme sorge poiche, dovendo per forza inserire nella macro il nome
del file di destinazione e trattandosi di reports contenenti dati sempre
diversi, questi vanno a sostituire i files già presenti nella cartella. 
Chiedo: 
E' possibile far generare un nome diverso per ogni nuovo report creato,
magari sfruttando il contenuto di un campo? 
Oppure si può sfruttare qualke altra funzione o, che so, una routine
evento? 
Ringrazio anticipatamente quanti mi vorranno aiutare. 
Un caro saluto a tutti.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Un caro saluto a tutti.
Invece di una macro usa il metodo OutputTo in VBA (vedi help), potrai così
impostare dinamicamente il nome del file che crei.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 impostare dinamicamente il nome del file che crei.
Scusa se te lo chiedo, ma  . . . . non potresti mica mandarmi una stringa
di esempio?
Ho provato con il metodo "OutputTo" ma mi genera un errore!
Grazie anticipate.
Ciao



Forse č meglio se posti la tua riga di codice e ci dici che errore ricevi.


Ho risolto. C'era un campo (nel file) che era a NULL e quello in
tabella non lo accettava in base alle sue proprietà.
Comunque è assurdo che ti avvisi solo per gli scarti dovuti al "tipo"
alfanumerico nel numerico e non per quelli logici.
Per inciso, non usavo una macro ma proprio i comandi del menù e...non
conosco VB.
Grazie

 Forse è meglio se posti la tua riga di codice e ci dici che errore ricevi.
Ciao Roberto
L'errore è stato risolto andando ad includere il nomereport tra
virgolette, ma mi si continua sempre a generare il .RTF con lo stesso nome.
Ecco la stringa che sto usando:
DoCmd.OutputTo
acOutputReport,"5",acFormatRTF,"C:\WINDOWS\DESKTOP\Now().RTF"
Ho provato anche a dichiarare Dim e Set ma con risultati analoghi.
Cosa mi suggerisci?


 -- 
Se la ua intenzione č che il nome del file sia rappresentato dalla data e
ora corrente, prova cosě:
DoCmd.OutputTo acOutputReport,"5",acFormatRTF, _
"C:\WINDOWS\DESKTOP\" & Now() & ".RTF"


 "C:WINDOWSDESKTOP" & Now() & ".RTF"
Ciao Roberto
ho provato ad inserire la variabile ma mi genera, in fase di esportazione,
il messaggio: Impossibile salvare i dati di output nel file selezionato.
Che ne pensi?


 Ciao


 > Ciao
Problema risoltooooo ! ! ! !
Ho rispolverato qualke riminiscenza di Qbasic ed ecco fatto:
Quello che mancava era un'istruzione Format.
Se può essere di aiuto a qualkuno ecco il listato:
Private Sub Comando0_Click()
On Error GoTo Err_Comando0_Click
Dim MyStr
MyStr = Format(Time, "Long Time")
DoCmd.OutputTo acOutputReport, "5", acFormatRTF, "C:\WINDOWS\DESKTOP\"
& MyStr & ".RTF"
Exit_Comando0_Click:
Exit Sub
Err_Comando0_Click:
MsgBox Err.Description
Resume Exit_Comando0_Click
End Sub
Grazie di tutto.
