Newsgroup: it.comp.appl.access
Titolo: Creare file TXT

Salve a tutti ,
Ho questa necessità :
mediante un pulsante devo creare un file TXT  prendendo alcuni valori da 
caselle di riepilogo di una maschera ,
come posso cominciare ?
non sono riuscito a trovare  qualcosa  di simile sul sitocomune .
Grazie anticipato
Giuseppe 


Nell'help trova TransferText  , e lo esegui con con DoCmd.TransferText
acExportDelim ...... ad esempio

 wrote:

Ciao Giuseppe,
in VBA puoi aprire un file sequenziale (TXT) con:
Open "TuoFile.txt" for output as #1
print #1, "Pippo","Peppe"
close #1
Vedi l'help per le varie possibilità.
Ciao.
Alberto

 ha scritto nel messaggio 
news:c8050bef-6720-4300...@y31g2000vbt.googlegroups.com...


Ti ringrazio del suggerimento  ma per me è molto difficile
ho bisogno di qualcosa più alla mia portata  , magari qualche esempio .
Ciao Giuseppe

 Giuseppe
Ciao Giuseppe,
in VBA puoi aprire un file sequenziale (TXT) con:
Open "TuoFile.txt" for output as #1
print #1, "Pippo","Peppe"
close #1
Vedi l'help per le varie possibilit�.
Ciao.
Alberto
Grazie Alberto
del suggerimento  ma per me � molto difficile
ho bisogno di qualcosa pi� alla mia portata  , magari qualche esempio .
 ti spiego meglio il mio problema :
devo creare un file TXT  di nome Indirizzo-Cliente  semplicemente premendo 
un pulsantino da una maschera ,
il file TXT deve riportare  il valore di alcune caselle di riepilogo della 
maschera attiva .
Spero in una soluzione semplice e alla mia portata
Ciao Giuseppe

 ha scritto nel messaggionews:c46af522-d527-4deb...@fu15g2000vbb.googlegroups.com...

Creati una macro , e fai trasferisci foglio di testo ,o di  calcolo...
o quello a te piu consolo , i dati in una maschera li prelevi
ovviamente da una tabella (se e una query utilizza OutputSu ) quindi o
ti esporti la tabella se ti serve tutto, oppure ti costruisci una
query filtrando i dati necessari  Poi ovviamente assegna la macro al
tuo pulsante ...Ciao Lolince

 ha scritto nel messaggionews:c46af522-d527-4deb...@fu15g2000vbb.googlegroups.com...

Da come stanno le cose è meglio se posti il tuo DB (solo quello che
serve) perchè le variabili possono essere molte:
il file è per uso temporaneo o deve restare sull'HD ? (serve saperlo
per dare, se necessario, nomi diversi ai vari file)
quanti e quali campi devi mettere nel file ?
che uso devi fare del file ? Come lo vai a recuperare / leggere ?
deve avere un formato particolare ?
tutti i campi allineati o anche su righe diverse ?
Vedi, se ti basta l'imbeccata, si può essere vaghi, se vuoi una
soluzione bisogna essere dettagliati.
Ciao.
Alberto

 ha scritto nel messaggio 
news:75fd2213-9c25-4062...@l32g2000yqc.googlegroups.com...



Ciao.
Alberto
Grazie dell'attenzione ,
in poche parole io utilizzo  questa istruzione  per aprire Outlook :
*********************************************************************************************************
Private Sub Comando105_Click()
On Error GoTo Err
DoCmd.SendObject , , , Me.e_mail, , , "Dati spedizione AMr", " Materiale 
spedito con Corriere  BARTOLINI " & "  in data    " & Me.DataSpedizione & _
  " PER SEGUIRE LA SPEDIZIONE COLLEGATI QUI : 
http://as777.bartolini.it/vas/sped_numspe_par.htm
    - - " & _
  " -inserisci questi codici  --" _
  & " Codice cliente Mittente :" & Me.NumeroSpedizione & "------" _
  & " Riferimento Mittente numerico :" & Me.Riferimento & _
  " --------------------" & _
  " NON RISPONDERE A QUESTO MESSAGGIO PERCHE' E' GENERATO AUTOMATICAMENTE E 
LA RISPOSTA NON SARA' LETTA " & _
  " CORDIALI SALUTI E GRAZIE  Staff di  AMR snc " & _
  " ---------------------------------------------------------------------------------------------------------------------- 
" & _
  "Material shipped with Bartolini courier on " & "  Date  " & 
Me.DataSpedizione & _
  " RELATED TO FOLLOW THE SHIPMENT HERE : 
http://as777.bartolini.it/vas/sped_numspe_par.htm
 " & _
  " -Enter these codes  -- " _
  & " Codice cliente Mittente : " & Me.NumeroSpedizione & "------" _
  & " Riferimento Mittente numerico :" & Me.Riferimento & _
    " --------------------" & _
  " DO NOT REPLY TO THIS MESSAGE BECAUSE 'It is automatically generated and 
the reply is not' READ" & _
  " Best regards and THANKS Staff of AMR snc "
exit_comando105_click:
Err:
  'MsgBox "Stampa Annullata!!   ", vbCritical, "      Attenzione"
  MsgBox "operazione di invio email Terminata  ", vbExclamation = vbOKOnly, 
"   attenzione  "
  Exit Sub
  'Resume exit_comando105_click
End Sub
*************************************************************************************************
Mi funziona benissimo  per inviare al cliente dati specifici per la 
tracciabilità di un pacco spedito ,
invia alcuni valori di una maschera  .
a me servirebbe praticamente la stessa cosa  ma anzichè  inviare i valori a 
Outlook  devo inviarli  ad un file di testo
che posso localizzare sul disco rigido e che ogni volta può essere 
sovrascritto  perchè i dati una volta  inviati al file testo
vengono importati in una applicazione  i valori sarebbero separati da 
virgola ,
in poche parole ho un applicativo Bartolini Online dove inserisco tutti i 
dati per  ogni spedizione
solo che molti di questi dati io li ho già memorizzati nel nostro sistema 
che mi registra la vendita
e mi crea anche l'indirizzo quindi siccome l'applicativo  Bartolini prevede 
un importazione dei dati
principali  vorrei evitare di ripetere due volte la registrazione degli 
stessi  dati .
spero di essere stato chiaro nello spiegare  il mio problema
Ciao  Giuseppe 

 virgola ,
Fai come ti ha già detto almorel
1. apri il file
2. scrivi i dati
3. chiudi il file
Open "C:cartellasottocartellaNomeFile.txt" for output as #1
print #1, Me.e_mail & "," & format(Me.DataSpedizione,"yyyy-mm-dd") & _
          "," & Me.NumeroSpedizione & "," & Me.Riferimento 
close #1
Ovviamente devi cambiare percorso e nome del file a seconda di dove lo
vuoi far creare.
Attenzione che Open 'For Output' sovrascrive e cancella un eventuale file
già presente con lo stesso nome, ma mi pare sia proprio quello che vuoi
ottenere tu.
Vedi Open sull'help <F1> per maggiori dettagli.
Ciao.
-Marco-
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ha scritto nel messaggio 
news:iffaeo$g1o$1...@news.newsland.it...

Grazie Marco
perfetto ho fatto quello che  mi hai detto  e funziona perfettamente .
Se mi posso permettere ,
per fare la stessa cosa  ma anzichè creare una file TXT  vorrei aggiungere 
gli stessi valori
in una tabella  , è possibile ?
Ciao Giuseppe 




Devi comporre un comando SQL e farlo eseguire.
SQL="INSERT INTO [Tabella] (Campo1, Campo2, Campo3) " & _
    "VALUES (" & Valore1 & ", " & Valore2 & ", """ & Valore3 & """);"
debug.print SQL
currentdb.execute SQL
Attenzione che se un campo è di tipo testo il rispettivo valore dovrà
essere messo tra doppi apici (vedi Valore3). Se è di tipo data dovrà
essere tra cancelletti, possibilmente nella forma "yyyy-mm-dd"
(anno-mese-giorno #2010-22-11#).
Se non funziona probabilmente sbagli a comporre la stringa SQL quindi non
mandarci un post con scritto solo "non funziona" ma vai nella finestra
debug, copia l'ultima stringa SQL che vedi e mettila nel post assieme alle
istruzioni che usi per crearla e all'errore che dà, così possiamo vedere
dov'è il problema.





Devi comporre un comando SQL e farlo eseguire.
SQL="INSERT INTO [Tabella] (Campo1, Campo2, Campo3) " & _
    "VALUES (" & Valore1 & ", " & Valore2 & ", """ & Valore3 & """);"
debug.print SQL
currentdb.execute SQL
Attenzione che se un campo è di tipo testo il rispettivo valore dovrà
essere messo tra doppi apici (vedi Valore3). Se è di tipo data dovrà
essere tra cancelletti, possibilmente nella forma "yyyy-mm-dd"
(anno-mese-giorno #2010-22-11#).
Se non funziona probabilmente sbagli a comporre la stringa SQL quindi non
mandarci un post con scritto solo "non funziona" ma vai nella finestra
debug, copia l'ultima stringa SQL che vedi e mettila nel post assieme alle
istruzioni che usi per crearla e all'errore che dà, così possiamo vedere
dov'è il problema.


 ha scritto nel messaggio 
news:ifhe85$mgq$1...@news.newsland.it...

OK   Grazie  mille ,  ci provo  ,
intanto  ti auguro  Buon Anno .
Giuseppe