mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: ricerca

ciao, devo realizzare questo:
ho una query di selezione, la utilizzo per ricercare dei nomi. apro la quey
in maschera così
Elvis presley
Pamela Anderson
Luciano Ligabue***
-..............
Ora voglio che cliccando su una casella dove è memorizzato il nome, mi si
apra una maschera relativa a tutto il record relativo a quel nome
Nome: Elvis Cognome: Presley
Età: --- Indirizzo: .....
ecc
Come posso fare? se qualcuno sa consigliarmi
Giggi

 ha scritto nel messaggio
news:9RZia.3786$DT4.1...@twister1.libero.it...

docmd.openform
Se vedi l'help questo comando ha dei parametri. L'ultimo è criteriowhere.
Il tuo criterio sarà
"[nome] = '" & tuacasella & "'
La form che apri sarà basata sulla tabella delle persone, ma verrà filtrata
dal tuo criterio.
Imposta per quella form Consenti aggiunte a No
Antonio

 ha scritto nel messaggio
news:gLaja.5369$iy5.1...@twister2.libero.it...


 ha scritto nel messaggio
news:ekdja.5859$iy5.1...@twister2.libero.it...


prima di tutto scrivi DOPO il quoting
Posta il codice che stai usando
Antonio

Newsgroup: it.comp.appl.access
Titolo: access ed excel

Su un foglio excel ho delle celle che possono contenere i dati anagrafici di
una persona.
In una tabella di access ho archiviato i dati anagrafici di diverse persone.
E' possibile creare in excel una casella combinata (menù a tendina) in modo
tale che scegliendo solamente il nome della persona si autocompletino gli
altri campi riguardanti la sua anagrafica?
grazie.

 altri campi riguardanti la sua anagrafica?
Prova a ribaltare il problema...
Antonio

 > E' possibile creare in excel una casella combinata (menù a tendina) in


 proprio farlo in questa maniera... sigh!
Inoltre c'è anche il problema del tuo quoting...
Antonio


Dai retta ad Antonio per il "quoting" (magari leggendo il messaggio di
Roberto "Come comportarsi in un NewsGroup").
Poi inserisci nell'oggetto un [OT] perchè sei fuori tema.
Per quanto riguarda la domanda; che io sappia non credo si possa fare.
Access ed Excel non sono gli stessi strumenti, anche se sembrano avere gli
stessi "comportamenti"; il giochino delle caselle combinate dovresti farlo
per ogni cella di ogni colonna. Forse (è una ipotesi) con gli smarttag puoi
simulare quel funzionamento. Cambia news e chiedilo a:
microsoft.public.it.office o microsoft.public.it.excel...
Ciao.
--
Sergio MAZZA



prova a vedere se questa è una via praticabile: 
- in un foglio della cartella di excel, con la funzionalità 'carica
dati esterni', ti connetti alla tabella di access
- in un secondo foglio, usando 'convalida' imponi la scelta alla
colonna, del foglio precedente, che contiene la chiave
- per riempire le altre caselle usi 'cerca.vert'
... ovviamente mi associo all'esortazione di Antonio e Sergio a
quotare correttamente
Ciao
--
Alberto
No alle guerre
Newsgroup: it.comp.appl.access
Titolo: modifica determinato campo in form attiva

Tramite una public function in un modulo vorrei modificare il valore di un 
determinato campo della form attiva.
Praticamente ho pi� form che hanno un campo chiamato con lo stesso nome.
quindi vorrei:
[Forms]![FORM-ATTIVA]![nomecampo] = "xxxxxxxxx"
Grazie a tutti in anticipo
Nicola 

 [Forms]![FORM-ATTIVA]![nomecampo] = "xxxxxxxxx"
Come la richiami la funzione?
--
ac

 ac
La richiamerei con "call nomefunzione"
Il mio problema � all'interno della funzione fare riferimento ad un
determinato campo della maschera attiva.

 
Nella funzione
Function Funzione(c as control)
c.nome = "xxxxxxx"
richimami
funzione(NomeControllo)
--
ac

 ac
non ho capito....
potresti inserire dei commenti per favore?
grazie 

>> determinato campo della maschera attiva.
prova cosi:
forms(
Screen.ActiveForm.Name
)NometuoControllo
-- 
Ciao
Geppo 

....ops. manca un punto:
 forms(
Screen.ActiveForm.Name
).NometuoControllo
-- 
Ciao
Geppo

Newsgroup: it.comp.appl.access
Titolo: DAO invece di ADO ***CINZIA***

 MDB è in generale da preferire.
Perchè usare DAO invece di ADO in generale è da preferire.per  gli MDB ???
Ado per quali outil è consigliato ???
Grazie a tutti.
Ulderico.

 ha scritto nel messaggio

La combinazione Access-JET_ENGINE usa sempre DAO, quindi è decisamente
strano usare ADO in quanto viene effettuata sempre una conversione
IMPLICITA del RecordsetType in DAO.
Questo è sempre vero, a meno di usare ADP con OLE appoggiato a
SQL_Server che esclude DAO e JET ENGINE, non ho idea di cosa accada
con AcceDb presente solo dalla versione 2007.
@Alex
Newsgroup: it.comp.appl.access
Titolo: relazioni tabelle

Dbbiamo strutturare una tabella per registrare il carico degli imballaggi per
cui sono previsti i seguenti campi:
* Cliente
* Documento di trasporto 
* Data documento 
* Tipo prodotto (imballo)
* Note
Abbiamo generato le seguenti tabelle:
Tabella clienti: 
cod. cliente (chiave primaria)
	nome cliente
Tabella prodotti:
	ID prodotto
	cod. prodotto
	caratteristiche (campo descrittivo)
Tabella Clienti e prodotti
cod. cliente (Campo ricerca su tabella cliente)
	ID prodotto (Campo ricerca su tabella prodotto)
La tabella č stata generata per associare ad ogni cliente il prodotto ad esso
assegnato, un cliente puň avere piů prodotti ed un prodotto puň avere piů
clienti.
A questo punto abbiamo creato una tabella per il carico dei prodotti a
magazzino.
Il nostro problema sta nel fare in modo che specificando il cliente desiderato,
mi compaiano nella scelta del prodotto solamente i prodotti assegnati al
cliente stesso dalla tabella Clienti e prodotti.
ESEMPIO:
Clienti
1 a
2 b
Prodotti
1 x
2 y
3 z
Clienti e prodotti
1 1
1 2
2 2
3 3
Se nella tabella ci carico scelgo il cliente 1 il campo prodotti deve propormi
come scelta solamente 1 e 2
GRAZIE 
CIAO
 
-- 
Posted from  [195.120.219.205] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:88558b02c6a3ad4998c...@mygate.mailgate.org...

Se l'inserimento dei record nella tabella di carico lo fai con una maschera
chiamata Maschera1.
Se il controllo di Maschera1 che contiene il codice cliente si chiama
CodCliente.
Se la scelta del prodotto in Maschera1 lo fai con una casella combinata
chiamata IDProdotto.
Fai in maniera che la casella combinata abbia due colonne di cui visibile
solo la seconda.
Come origine riga della casella combinata usa questo codice SQL:
SELECT DISTINCTROW tblClientiProdotti.CodCliente,
tblClientiProdotti.IDProdotto
FROM tblClientiProdotti
WHERE (((tblClientiProdotti.CodCliente)=[Forms]![Maschera1]![CodCliente]));
A fronte dell'evento "Dopo aggiornamento" della casella combinata genera il
seguente codice VBA:
Me!IDProdotto.Requery
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:q8iJ7.110772$sq5.5...@news.infostrada.it...

Scusami ho commesso un errore:
Me!IDProdotto.Requery
 devi generarlo a fronte dell'evento "Dopo aggiornamento" del controllo
CodCliente contenuto in Maschera1.


Sono un principiante con Access. Ho seguito le tue istruzioni, ma quando cambio
il cliente nella maschera mi compare il 
msg "impossibile trovare la macro 'Me!IDProdotto'.
Dove sbaglio?
-- 
Posted from  [195.120.219.245] 

Newsgroup: it.comp.appl.access
Titolo: Sql

salve a tutto l'ng , chi mi sa dire perchè in una stringa banalissima
non funziona ?
Dim SQL As String
SQL = "SELECT DB.* FROM DB"
DoCmd.RunSQL SQL

 DoCmd.RunSQL SQL
Leggi l'help di VBA riguardo alla funzione DoCmd.RunSQL e scoprirai che
puoi utilizzare sono comandi DML, mentre tu gli hai dato un comando di
query.
-- 
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution



Il consiglio di Gabriele è il Vangelo, ma tu cosa ti aspettavi
succedesse...? e con quale strumento
di conseguenza hai raggiunto la convinzione che non funziona...?
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------


Il fatto e che ho gia utilizzato questa funzione , sql= "update pippo
set ecc ecc" oggi volevo fa sta query del cavolo in realta non era
questa ma banale come questa e mi dava errore su delle query e in
altre no tutto qui , come fatto ieri leggo e poi vedo

 altre no tutto qui , come fatto ieri leggo e poi vedo
Scommetto che di nome fai Tommaso. Spero ti piaccia l'India
ADO o DAO questo e' il dilemma?!
-- 
ac
y-1=x


wrote:

Gia la seconda volta che mi chiami Tommaso ..... lo dovrei abbinare al
proverbio?
Non sono certo un esperto come voi , e da profano cerco di capire e di
inoltrarmi .
Cmq se il tuo dilemma e ADO o DAO giocali al dado ( io spesso faccio
cosi e mi levo le rogne mentali) :-) Buon Natale

Newsgroup: it.comp.appl.access
Titolo: Collegamenti a Tabelle

Ciao a tutti
Ho dei collegamenti a delle tabelle che si trovano fisicamente in un
supporto magnetico (iomegazip).
Il problema č che quando cambio computer la lettera del drive non sempre č
la stessa quindi il programma non trova piů il collegamento e devo ogni
volta cambiare il percorso manualmente.
Sapete dirmi la fuzione, la procedura come posso fare in run time per
cambiare a mio piacimento il collegamento alle tabelle ?
grazie
Stefano

 ha scritto nel messaggio
news:WMZM8.19339$TS.6...@news1.tin.it...

Guarda su: 
www.sitocomune.com
Ciao.
--
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: Come evitare aggiornamento maschera continua?

Schermata form continua
Fate conto la lista ddt da fatturare
Sulla sezione superiore i dati per selezionare i ddt da fatturare e le 
caratteristiche per l'esportazione
Sul corpo, tante righe quanti sono i ddt da fatturare, per ogni riga 
data, numero, anagrafica, ecc...
Quando lancio la procedura di fatturazione, su ogni ddt viene aggiornato 
un campo nel db (non visibile nella form) per indicare su che fattura e' 
finito
Dopo la creazione di ogni fattura, il corpo della form viene aggiornato 
(probabilmente in corrispondenza al cambiamento dovuto al campo 
aggiornato su alcuni ddt)
Non viene fatto nessun refresh o repaint
Aggiornamento inutile e dispendioso in termini di tempo
Come evitare l'aggiornamento delle righe corpo form?
Ho provato con Application.echo=false prima del ciclo principale, e poi 
a true finito tutto, ma mi inibisce proprio tutto compresa 
l'operativita' del tasto STOP che mi permette di interrompere a meta' 
strada la procedura di esportazione documenti
 
 


Come aggiorni? Cicli e usi me.tuocampo=.. ?
MA

Newsgroup: it.comp.appl.access
Titolo: esporta dati

Aiuto!!
volevo ricorrere a questo costrutto per esportare i dati di una
tabella:
  DoCmd.TransferDatabase acExport, "Microsoft Access", "c:\fuel.mdb",
acTable, "RIFORNIMENTI", "RIFORNIMENTI", True
    DoCmd.TransferDatabase acExport, "Microsoft Access", "C:\FUEL",
acQuery, "ESPORTADATI", "ESPORTADATI", False
in cui la query esporta dati era parametrica
Ma io voglio esportare solo i dati che rientrino in uno specifico
periodo
nella tabella rifornimenti vi è ovviamente un campo data
come faccio!!?
grazie


(un esempio)Cambi la tipologia di query; da selezione a creazione tabella ed 
esporti la tabella.
Esegui la query così:
'---
Dim qdf As DAO.QueryDef
Set qdf = CurrentDb.QueryDefs("nomeQueryParametrica")
qdf.Parameters("campoData") = CVDate(InputBox("Inserisci la data", "Data", 
date))
qdf.Execute
Set qdf = Nothing
'---
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: dati importati non corrispondenti

nella mia maschera di fatturazione non vengono prelevati i dati
corrispondenti al cliente a meno che il record relativo a quest'ultimo non
sia stato creato nella maschera o comunque modificato  la ricerca è
effetuata tramite cdf allego la procedura di valorizzazione dei campi
l'errore e tipo non corrispondente
Private Sub CODFISC_AfterUpdate()
    CODFISC = UCase(CODFISC)
    Dim MioDb As Database
    Dim MiaTb As Recordset
    Set MioDb = CurrentDb()
    Set MiaTb = MioDb.OpenRecordset("SELECT * from anaclien where CODFISC='"
& Forms![anafatt]![CODFISC] & "'")
   'If MiaTb.EOF Then
    ' DoCmd.OpenForm "anaclien", acNormal, , , acFormAdd
   ' Else
        Forms![anafatt]![NOME] = MiaTb("NOME")
        Forms![anafatt]![COGNOME] = MiaTb("Cognome")
        Forms![anafatt]![VIA] = MiaTb("Via")
        Forms![anafatt]![NUMERO] = MiaTb("Numero")
        Forms![anafatt]![CAP] = MiaTb("Cap")
        Forms![anafatt]![CITTA] = MiaTb("Citta")
        Forms![anafatt]![PROV] = MiaTb("Prov")
    'End If
    MiaTb.Close
    MioDb.Close
end sub

 ha scritto nel messaggio
news:nFjba.2179$Lr4....@twister2.libero.it...

Visto che i dati li prelevi dalla tabella anaclien a fronte dell'evento
"Dopo aggiornamento" del controllo CODFISC, mi sembra normale che il tutto
avviene solo se inserisci un nuovo record o se modifichi CODFISC.
Se come immagino i controlli NOME, COGNOME, VIA ecc. ecc. sono non
associati, prova a generare lo stesso codice VBA di cui sopra anche a fronte
dell'evento "Su corrente" della maschera.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: crere progetto vuoto in A03

Salve  a tutto il NG,
sono passato di recente da A97 su W00 ad A02 su W00, mi ha incuriosito
la possibilità di creare un progetto vuoto; nella creazione guidata
però non riesco ad andare oltre al primo step, dove ho inserito come
nome computer il nome assegnato a PC in rete, ho flaggato a vero "Usa
connessione di tipo trusted".
Ottengo come risposta :
"Impossibile effettuare la connessione:
SQLState:'01000'
Errore di SQLServer: 2Impossibile effettuare la connessione
SQLState:'08001'
Errore di SQL Server: 17
Mi sapete dare qualche dritta ?
Grazie 
Andrea

 Mi sapete dare qualche dritta ?
Ci sono diverse cose da controllare, ma prima bisogna conoscere meglio la 
tua situazione.
Descrivici la versione di SQL Server e quella di Access che stai utilizzando.
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype: pbsoftsolution


[CUT]
Scusa il ritardo :o( avrei preferito di gran lunga poter rispondere
subito al Tuo quesito, più che avere le traversie che ho passato,
senza nemmeno avere il tempo di leggere la posta.
Anzi tutto mi sono accorto che nell'oggetto ho indicato per errore A03,
la configurazione esatta è questa: Windows 2000 con Access 2002 sulla
macchina per prova ho installato Microsoft Visual Basic 2005 Express
Edition.
--
Newsgroup: it.comp.appl.access
Titolo: Report

Ciao a tutti, ho la necessita di stampare delle etichette, create da access,
ma ovviamente volevo sfruttare tutto il foglio di stampa, ma siccome le
etichette sono larghe circa 4 centimetri il foglio risulta stampato solo in
parte, come faccio a sfruttare completamente il foglio
Enrico

 ha scritto nel messaggio
news:8retue$tv5$1...@lacerta.tiscalinet.it...


Newsgroup: it.comp.appl.access
Titolo: [OT] E la zona e' bloccata...

Vorrei passeggiare intorno a casa, ma a San Giovanni c'e' il maxischermo per
la partita della Roma e la zona e' bloccata...
Vorrei fare una gita verso nord, ma c'e' la Lazio all'Olimpico e la zona e'
bloccata...
Vorrei fare una passeggiata su Lungotevere, ma c'e' il papa e la zona e'
bloccata...
Vorrei fare una gita verso sud, ma la domenica l'Appia antica e' chiusa e la
zona e' bloccata....
Potrei andarmene in ufficio, ma e' in centro e oggi e' una delle domeniche
senza auto e la zona e' bloccata...
Vabbe', resto a casa e mi riposo....ma la parrocchia di fronte fa la festa
patronale e devo spostare la macchina per far passare la loro processione...
Pare che la nuova giunta voglia far dotare i condomini di piste per aerei a
decollo verticale...
AIUTOOOO!!!!!!:-))))
O voi che abitate in provincia e vi lamentate della poca vitalita' che vi
circonda....meditate!:-)
Saluti.
Luciano
(DOC)
PS Alla fine ho preso il motorino e sono venuto in ufficio...se la Roma
vince credo che non tornero' a casa manco con quello....mi mischiero alla
schiera di tifosi....io che l'ultima volta che mi sono interessato di una
partita di calcio c'erano Gigi Riva, Rivera e Mazzola... (il figlio, non il
padre...non esageriamo!:-))

 Vengo spesso a Roma e non vedo l'ora di ritornrmene nella mia piccola
cittadina Cariati (CS); a 60 secondi dalla riva del mare. Tutto questo per
dirti CONVENGO CON TE' !!!!!
saluti CF

 padre...non esageriamo!:-))
Partita di calcio?!!!?
Quelle della roma sono partite di pallavolo!!!!
Antonio

 Ma non eri tu che denigravi ci-vi-ta-vec-chia?
Ci-vi-ta-vec-chia non e' esattamente un posto tranquillo...:-)
Saluti.
Luciano
(DOC)

 wrote in message
9g4o4u$78kgb$1...@ID-86073.news.dfncis.de...

Ma beato a te!
Voglio vedere te se lasci dalle tue parti la macchina aperta, con il
borsello o la radio dentro, come faccio io!
O se riesci ad andare da qualunque parte in 10 minuti, CIC-CIO !!!
Antonio

 O se riesci ad andare da qualunque parte in 10 minuti, CIC-CIO !!!
Beh, questo e' ovvio, viste le dimensioni dell' amena cittadina!:-)
Saluti.
Luciano
(DOC)

 wrote in message
9g530v$7altb$1...@ID-86073.news.dfncis.de...


 E poi..non mi sembra che ci sia tutto sto casino a CV neanche d'agosto....
Senti... non far dire alla gente che a civitavecchia la gente scrive PRIMA
del quoting!!!
Antonio
Newsgroup: it.comp.appl.access
Titolo: immagini in un database

Ho realizzato un tabella con delle immagini collegate tramite un campo
oggetto ole.
Ho capito che in questo modo ho inserito direttamente nel database le
immagini......
come posso evitare il problema di  un file dalle dimensioni di esagerate.
Grazie e ciao

 ha scritto nel messaggio
news:dtSJa.235284$g92.5...@news2.tin.it...

Sul sito comune troverai la risposta al tuo quesito.
E' una delle domande più gettonate.
Bye.

 ha scritto nel messaggio
news:dtSJa.235284$g92.5...@news2.tin.it...

al posto dell'oggetto ole inserisci un campo dove indichi solamente il
percorso dell'immagine
dopo da maschera o da report inserisci  l'oggetto che linka al percorso
della tua immagine

 ha scritto nel messaggio
news:dtSJa.235284$g92.5...@news2.tin.it...

Vai sul Sito Comune (link qui sotto) e nella Sezione General leggi queste
tre FAQ:
1) Come implementare correttamente un archivio di immagini di Stefano
Bettini.
2) Implementare un archivio di immagini di  Silvio Savoldi.
3) Archiviazione immagini di Franco Cappellaro
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: Query a campi calcolati

Ciao a tutti,
Ho una tabella che contiene una serie di fatture con i campi scadenza e importo.
Vorrei creare una query con le somme di importo raggruppate per determinato range di scadenza.
Mi spiego con un esempio:
Questa è la tabella:
num. fatt	importo	scadenza
1		10	25/05/02
2		15	25/06/02	
3		30	25/07/02
4		35	25/08/02
5		50	25/08/03
Voglio una query con 3 campi:
campo 1 che contiene la somma di importo delle scadenze <01/07/02 cioè 25
campo 2 che contiene la somma di importo delle scadenze <31/07/02 e >01/07/02 cioè 30
campo 3 che contiene la somma di importo delle scadenze >01/08/02 cioè 85
Vorrei evitare di usare dsum perchè non voglio penalizzare le prestazioni
Come devo scrivere la query ?
Grazie per la collaborazione.
Stay alive !
Pio Pio (utente newbe)
Win XP & Office 2000
www.ticom.it/tennisbuscate

 ha scritto nel messaggio
news:qkjmvu4jn1afv6295...@4ax.com...

Se la tabella che contiene i dati si chiama Tabella1, prova con una queri
che abbia il seguente codice SQL:
SELECT Sum(IIf ([Scadenza]< [Digita la data di inizio periodo:], [Importo],
0)) AS PrimaDelPeriodo, Sum(IIf ([Scadenza]>= [Digita la data di inizio
periodo:] And [Scadenza]<= [Digita la data di fine periodo:], [Importo], 0))
AS DuranteIlPeriodo, Sum(IIf ([Scadenza]> [Digita la data di fine periodo:],
[Importo], 0)) AS DopoIlPeriodo
FROM Tabella1;
Nelle due finestre di richiesta parametri digiterai in quella di inizio
periodo 1/7/2002 ed in quella di fine periodo 31/7/2002.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------



Grazie mille funziona tutto !
Stay alive !
Pio Pio (utente newbe)
Win XP & Office 2000
www.ticom.it/tennisbuscate
Newsgroup: it.comp.appl.access
Titolo: problemi con Tastiera Access 2003

Buongiorno a tutti!
Sto scrivendo un piccolo programma in VBA...il problema è che i
caratteri speciali del tipo ( ) = <>' ecc.. non sono più al loro
posto...nelle impostazioni della internazionali della tastiera è
selezionata solo la lingua italiana..ho installato i vari Service Pack
ma non è servito a nulla,,,qualcuno ha qualche consglio per risolvere
questo problema che si verifica su vari PC e non solo sul mio???
Grzie in anticipo!

Fizz_.-> ha scritto:

Non so che dire, se non provare a guardare in start-tutti i
programmi-office-strumenti di office-impostazione lingua di microsoft
office e sotto lingue disponibili eliminare tutto tranne l'italiano.

Newsgroup: it.comp.appl.access
Titolo: richiamare una maschera esterna con doppio click!

Ciao ng,
ho questo problema da risolvere;
ho creato un piccolo database per catalogare il software in mio
possesso.
Ho creato le varie tabelle e maschere per le varie voci e ne ho creata
una, chiamata registrazione, nella quale inserire i vari dati.
La mia domanda è questa:
    come fare per far si che al doppio click, su un campo che mi
interessa e cui è abbinata una casella combinata di ricerca, compaia la
maschera cui è riferita quella voce e si possa inserirvici un nuovo
record?
Ringrazio il ng
flexer


Se la casella combinata si chiama MiaCombo, se la maschera da aprire per
inserire un nuovo record nella tabella che č origine riga di MiaCombo si
chiama MiaMaschera, a fronte dell'evento "Su doppio clic" di MiaCombo genera
il seguente codice VBA:
DoCmd.OpenForm "MiaMaschera", , , , acFormAdd, acDialog, "GotoNew"
Me!MiaCombo.Requery
Me!MiaCombo.SetFocus
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


Se provi a fare l'autocomposizione del database collezione libri
dovresti trovare la maschera libri con una combo argomento che col doppio
clic richiama un'altra maschera. Puoi copiare il codice di quella maschera.
Ciao henri

 wrote in message
3AFAB999...@usa.net...

C'è qualcosa del genere sulle autocomposizioni di Access...mi sembra
sull'archivio
musicale!
ciao Riccardo
Newsgroup: it.comp.appl.access
Titolo: Output su non disponibile durante l'invio tramite mail di un report

Buongiorno,
cercando di inviare via mail un report utilizzando questa chiamata a
sistema:
DoCmd.SendObject acSendReport, "REPORT_NAME", acFormatRTF,
"
ma...@mail.com
", , , "object", , False
viene sollevata l'eccezione output su non disponibile, qualcuno
saprebbe dirmi da cosa potrebbe essere originato?
Vi ringrazio


Quale versione di Access usi con quale Service Pack e quale Windows?
Com'� il numero e messaggio esatto dell'errore?
-- 
cu
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

 Access FAQ:
www.donkarl.com/it
Ho la versione 2003 11.8166.8172 sp3 di Access, Windows Xp sp3
L'errore è il 2046.
Grazie per la risposta

 L'errore � il 2046.
Sei sicuro che il messaggio dice "OutPutSu" non disponibile?
Pi� frequente � "SendObject non disponibile".
Se si tratta di OutPutSu prova di esportare il report a mano
(mouse destro, Esportare, o con la voce del menu File).
Riesci a esportarlo come RTF?
Poi prova con
DoCmd.OutputTo acOutputReport,"REPORT_NAME",acFormatRTF,"TuoPercorsoENome"
Ricevi lo stesso errore?
-- 
HTH


 Access FAQ:
www.donkarl.com/it
Anche con DoCmd.OutputTo
acOutputReport,"REPORT_NAME",acFormatRTF,"TuoPercorsoENome"
da il seguente errore :
Comando o azione 'OutputSu' non disponibile.
numero 2046
invece esportandolo da access viene eseguito correttamente

 invece esportandolo da access viene eseguito correttamente
Dove si trova il codice e e come e quando viene lanciato/eseguito?
-- 
cu

Newsgroup: it.comp.appl.access
Titolo: Problema con accodamento di dati

Salve ho realizzato un database di un anagrafica.
ho inserito alcune tabelle correlate da relazione uno - molti
visto che l'esigenza era quella di poter duplicare una scheda e poi 
apportare modifiche ai dati duplicati
ho dovuto inserire una procedura che sfrutta una serie di query di 
accodamento ed alcuni stratagemmi per
aggiustare gli ID.
Alla fine ci sono riuscito e tutto funzionava alla meraviglia fino a 
quando... non ho provato ad inserire una trentina di aziende
.. in sostanza l'operazione di accodamento diventa sempre più lenta 
arrivando a tempi d'attesa di qualche minuto ed il database
in cui vado ad archiviare i dati cresce in KB   ... per 50 aziende inserite 
è arrivato a ben 130 MB.
Ho provato a compattare il DB ma le dimensioni sono diminuite di poco .. 
credo prorpio che la strada che ho intrapreso non vada bene
adesso però sono in una condizione di non poter buttar via i dati visto che 
sono costati ore di lavoro per inserirli.. cosa potrei fare??
Dando uno sguardo ai dati che Access ha inserito ho notato che la tabella 
più grande del db per via dell'accodamento contine 452 record
la cosa che invece trovo strana è la segunete: in una tabella ad un certo 
punto vengono utilizzati numeri per indicare l'ID molto grandi
fino ad arrivare a 3080253   in sostanza Access compie inspiegabilmente dei 
salti enormi da un inserimento all'altro
e credo che le dimensioni lievitino proprio per questi buchi!!
 

 ha scritto nel messaggio 
news:rgIPe.84801$2U1.4...@news3.tin.it...

Non è chiara la struttura del db. Da quello che dici, almeno io, non riesco 
a darti un suggerimento.
130 mega sono tanti se dici che la tabella più grande contiene 452 record. 
Usi delle immagini?
Puoi essere più chiaro?
Ciao, Carlo

Newsgroup: it.comp.appl.access
Titolo: come aprire database acces da Visual basic

Ho un problema che dopo 15 giorni non riesco a risolvere.
ogni volta che provo ad aprire un Database scritto con l'applicazione
Access tramite "visual data manager" mi compare il seguente errore:
"errore: 3343 formato database non riconosciuto"
eppure i formati sono sia per access che per quelli scritti direttamente
tramite VB, formati MDB.
Grazie in anticipo per il vostro aiuto!
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

se il file č di access 2000,
per aprirlo da visual basic devi obbligatoriamente
installare il service pack 5:
altrimenti dovresti fornire qualche informazione in piů
ciao


Newsgroup: it.comp.appl.access
Titolo: access

carico/scarico/rimanenza ecc. fino ad esaurimento... possibile con access?

 carico/scarico/rimanenza ecc. fino ad esaurimento... possibile con access?
Sģ
ciao MAssimilaino
--------------------------------
Inviato via 
http://usenet.libero.it
Newsgroup: it.comp.appl.access
Titolo: conteggio gruppi in un report

come diavolo faccio a contare i gruppi esistenti in un report? 
ho provato vari tentativi ma inutilmente, mi riporta sempre il totale
complessivo dei record. con la formula =conteggio([matr]) sia in piè
pagina gruppo matr che in piepagina del report
fonte dei dati : query con campi presi da due tabelle( matr è un campo di
una tabella anagrafica relazionata con matr di una tabella dati).
gruppo matr. - piè pagina gruppo, conteggio record data
corpo data
piè pagina report  dove vorrei avere il conteggio dei gruppi matr. 
grazie
l.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 -- 
Per contare i gruppi devi raggrupparli e poi contarli; lo fai con la 
funzione DCount con origine una query di raggruppamento sui gruppi;
es.
=DCount("*";"Select gruppo From tabella Group by gruppo")
Ciao.
-- 
Sergio MAZZA 

 Ciao.
grazie Sergio! e io che insistevo con count!...

Newsgroup: it.comp.appl.access
Titolo: Importazione file 4DD

Buongiorno a tutti,
qualcuno conosce il modo di importare file in ACCESS che hanno estensione 
  4DD o 4DB???
(ho scritto bene, non sono DB4 !!!!)
Grazie a tutti!!!
-- 
Raffaele Alberoni
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Ciao Raffaele,
dall'estensione direi che si tratta di Database 4Dimension.
Dovrebbero esserci dei driver ODBC prova a vedere se trovi qualcosa di utile
qui:
http://www.4d.com/4DLINK/4DACTION/WEB_Solutions/Search.Cases?tFormName=support%2Fknowledgebase%2Fsimple.shtml&tMandatoryFields=tFind&sMaxSel=100&tCasesFormName=Support%2Fknowledgebase%2FAllOutput.shtml&tVersion=Any&tCategory=Any&tFromMonth=&tToMonth=&tFind=ODBC+Driver&tProductName=Any
Cinzia

 Cinzia
Grazie Cinzia...
adesso ho una  cosa nuova da studiare!!!!!
ciao e buon lavoro...

Newsgroup: it.comp.appl.access
Titolo: Finestra di dialogo - Trasferire i dati da un Form all'altro

Buongiorno, Vi sottopongo il seguente problema:
Si apre una maschera e l'utente da' alcune indicazioni, dati, si
settano dei check etc, quindi il programma elabora altri dati (li
prende da file esterni, effettua calcoli, modifica alcune stringhe
etc.) dopodiché, prima di salvarli in un record, vorrei che chiedesse
conferma all'operatore: quindi vorrei che si aprisse una finestra di
dialogo con i controlli text che contengono i dati elaborati e ancora
modificabili dall'utente, e poi, con un OK, provvedesse a salvarli.
Non so come fare perché dovrei utilizzare due maschere diverse e non
so come trasferire i dati da un form all'altro.
Mi vengono in mente varie soluzioni, ma nessuna mi soddisfa:
1) La più banale è utilizzare variabili Public gestibili da ogni
modulo, ma non mi funziona in quanto la seconda maschera che si apre
non conosce i valori delle variabili modificati nella prima maschera,
e non so perché, forse sbaglio qualcosa.
2) La seconda, per trasferire i dati da un form all'altro, potrebbe
essere utilizzare un file di 'appoggio' ma non mi pare molto elegante.
3) La terza sarebbe utilizzare il parametro OpenArgs al comando
DoCmd.OpenForm ma poi occorrerebbe effettuare il parsing della stringa
e non mi pare una soluzione comoda.
4) La quarta (l'unica che per ora funziona, ma è terribile) è quella
di NON utilizzare due form distinti ma uno solo, con una struttura a
schede. La seconda pagina della scheda contiene i controlli di input e
i pulsanti Annulla e OK come una finestra di dialogo, ed è invisibile.
Si diventa visibile e prende il focus soltanto al momento di
confermare i dati, si procede e poi ritorna invisibile.
In tal modo i dati sono sempre gestibili nel modulo con le variabili
consuete (non locali ovviamente).
Però non mi pare granché, e poi spreca risorse.
Insomma, magari c'è un sistema facile facile ma io non lo conosco.
Chi mi aiuta?
Grazie
Filippo

 Filippo
-- 
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
----------------------------
http://www.accessgroup.it/
----------------------------
Non mi fido molto delle statistiche, perchè un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media.
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

è probabile che qualche operaz. inrtermedia le cancelli...
Grazie della risposta.
Intanto vedo che le mie soluzioni tutto sommato non erano così
balorde.....
Ho provato con la msgbox ma non va.
Però lin effetti le Public le ho definite nel Form perché NON SO come
si fa a definirle in un modulo esterno..... se indendi dire un Modulo
svincolato da un form, per intenderci quelli contenenti procedure e
funzioni generali, ci ho provato ma non va lo stesso.
Comunque grazie
Filippo
Newsgroup: it.comp.appl.access
Titolo: Estrarre il file immagine da file *.mdb (repost)

Scusate se riposto la domanda, c'è nessuno che mi sappia rispondere, magari
soltanto per dire che è impossibile (però non credo).
Come si fa ad estrarre il file immagine incorporato nella maschera del
data base come immagine e oggetto OLE?
Ho perso il file di origine e vorrei in qualche modo riaverlo (se
possibile).
In pratica dovrebbe essere il procedimento inverso ma non so come fare.
Grazie
Filippo


Credo che qui ci sia quello che ti serve:
http://www.lebans.com/oletodisk.htm
ciao
Silvio

Newsgroup: it.comp.appl.access
Titolo: Click & Select

Se l'utente digita piu' di due decimali su un controllo in maschera lo
voglio stroncare.
Percio' intercetto l'evento e faccio un bell'undo e setfocus.
Solo che nel frattempo il valore della casella e' stato arrotondato (il
formato e' #,## altrimenti non mi mette il doppio zero di default) e non
viene visualizzato il numero effettivamente scritto fintanto che non ci si
clicca dentro.
Con
Me.prezzo.SelStart = 0
Me.prezzo.SelLength = Len(Str(prezzo))
lo evidenzio ma non mi basta.
Lo voglio vedere come e' stato scritto altrimenti l'utente va ai matti visto
che si e' gia' beccato un bel msgbox che gli ha detto di NON scrivere piu'
di due decimali.
Saluti.
Luciano

 Me.prezzo.SelLength = Len(Str(prezzo))
Mhmmm ... è una soluzione che mi piace poco: non è meglio forzare
l'arrotondamento al secondo decimale su evento dopo aggiornamento del
controllo?
Lo sforzo è minimo e l'obiettivo raggiunto.
Ciao: warp

 ha scritto nel messaggio
news:9u0ah1$5a8lp$1...@ID-86073.news.dfncis.de...

E se prima della MsgBox di errore modifichi il formato del controllo
incriminato a Numero generico (così l'utente vede tutto ciò che ha digitato)
e dopo la MsgBox fai il tuo bell'undo, il setfocus e ripristini il formato a
#,## ?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 controllo?
No, perche' preferisco che l'utente si renda conto che non deve scrivere
piu' di 2 decimali. Magari io arrotondo e a lui non tornano i conti. Pensa
a chi vende viti, sbagliare un centesimo puo' causare disastri.
Saluti.
Luciano

 #,## ?
Mmm, non male come idea anche se un po' accroccata. La tengo presente se non
risolvo.
In effetti a me basterebbe gestire da codice un click del mouse dopo il
setfocus....sembra banale ma pare che non ci sia un comando che lo fa.
Saluti.
Luciano
Newsgroup: it.comp.appl.access
Titolo: confrontare e modificare dati in access

salve a tutti...
ho un problema:
ho un db di 19.000 nominativi
devo aggiornare alcuni dati
ho un secono db con i 200 nominati aggiornati
come facci od aggionare i 19.000 automaticamente aggiungendo i 200 ????
è magia?
non mi sono spiegata vero?....;o)))) cri
--------------------------------
Inviato via 
http://usenet.libero.it

On Thu, 12 Dec 2002 14:36:53 GMT, 
chri...@libero.it
 (cristina)
wrote:

fai una query di accodamento
e collega le tabelle del secondo database
Saluti.
Emanuele.



Newsgroup: it.comp.appl.access
Titolo: access 2003 intercettare errori di runtime

Ciao a tutti
Chiedo scusa se riprendo un argomento, ma non riesco a trovare una
soluzione.
Secondo quanto letto nei post precedenti con la funzione on error go
to... dovrei poter intercettare gli errori di access nell'esempio:
Private Sub salva_Click()
On Error GoTo Err_salva_Click
    DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, ,
acMenuVer70
Exit_salva_Click:
    Exit Sub
Err_salva_Click:
    Select Case Err.Number
        Case 3022
         If Err.Number = 3022 Then MsgBox "Valore non valido
verificare...!", vbExclamation, "AVVISO"
      Case Else
         MsgBox Err.Number & " " & Err.Description
   End Select
    Resume Exit_salva_Click
End Sub
sebbene quanto scritto l'errore di rutime 3022 non viene intercettato.
Per quale motivo?

 Per quale motivo?
-- 
Ciao
Geppo 


Stesso risultato


questo e' il primo click che ho fatto
http://archive.baarns.com/access/faq/ad_error.asp
-- 
ac
y-1=x


wrote:

Inserendo l'evento su errore della maschera non risolvo niente, ovvero
prima access mi mostra il suo messaggio di errore di run time, poi
alla chiusura della maschera esce il mio messaggio personalizzato!


Ma sei sicuro che l'errore si verifica?
Come lo ricrei l'errore?
hai impostato la proprieta' dei campi?
 "Indicizzato: Sě (Duplicati non ammessi)"
-- 
Ciao
geppo 

 geppo
l'errore si verifica solo che viene segnalato con il classico errore
di runtime di access e non con un mio messaggio (sicuramente più
chiaro per l'utente finale)

 chiaro per l'utente finale)
puo darsi che hai qualche "refresh" o "requery" che salva il dato nella 
tabella prima del click sul pulsante
-- 
Ciao
Geppo 

 chiaro per l'utente finale)
Prova a salvare con il metodo docmd.runcommand accmdsaverecord invece di 
docmd.domenuitem

Newsgroup: it.comp.appl.access
Titolo: somma di valori in tabella e tabella collegata

Vorrei creare una query che effettui una semplice operazione di somma. 
Tabelle di partenza:
Tbl Articoli
Codice
Descrizione
GiacenzaIniziale
Tbl Movimenti
CodiceRichiama
Carico
Vorrei fare una query con campi finali
Codice
Descrizione
Somma di GiacenzaIniziale + Somma(carico)
In modo da avere una tabella finale con l'esistenza di magazzino.
Come si fa???? Devo usare 2 query?
Grazie a chi mi aiuterà!


dei fare una semplice join:
SELECT TblArticoli.Codice, TblArticoli.Descrizione,
TblArticoli.GiacenzaIniziale+ TblMovimenti.carico AS Magazzino
FROM TblArticoli INNER JOIN TblMovimenti ON TblArticoli.Codice =
TblMovimenti.CodiceRichiama
ciao
Newsgroup: it.comp.appl.access
Titolo: ricerca dati ciclo if ... else ...

Salve,
ho un problema non semplice. Ho la necessita' di assegnare ad un determinato
nominativo (archivio di 16.000 iscritti) un numero di zona (le zone sono 16)
della citta' in cui abita... solo che la cosa dev'essere fatta in automatico
e basata sull'indirizzo (via e numero civico) di residenza del nominativo.
Immaginatevi una citta' come Roma o Milano che ha centinaia di Vie o Vicoli
...
Il ciclo dovrebbe essere del tipo:
se x (nominativo) risiede in via y (la via e il numero civio del nominativo)
allora assegna la zona z (scelta da un elenco di 16 zone) oppure ...
Come si puo' fare senza:
1) diventare matti ad inserire tutti i dati di tutte le vie delle citta'
2) rallentare le prestazioni del server in fase di ricerca
Avete idee o suggerimenti in merito?
Grazie infinite a tutti
Giovanni

 wrote in message
8urchh$ag3$1...@nslave2.tin.it...

Col PC puoi fare molte cose, ma ho la sensazione che stai trascurando un
particolare,
il PC fa quello che gli dici id fare con le informazioni che gli metti a
disposizione.
Se non ci metti dentro tutti gli indirizzi con tanto di numero, in base a
cosa il PC dovrebbe assegnare queste zone?
Senza considerare che gli indirizzi, non solo devono essere caricati tutti,
ma devono scupolosamente seguire sempre lo stesso tipo di digitazione
(altrimenti il pc i confronti come li fa?)
Infine mi sembra infondata la tua preoccupazione di rallentare il server,
per due motivi: 1 se lo fai, lo fai una volta, (o riassegni le zone di volta
in volta?); 2 16000 nomi non sono tantissimi, non credo ci si metta piu' di
qualche minuto (se i confronti sono difficili e se il pc non e' granche'.
Sib
--
------------------------------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access
------------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente
Newsgroup: it.comp.appl.access
Titolo: Criteri di ordinamento report impostati in base a ordinamento sulla  maschera

Vorrei poter far stampare un report basato su una query , secondo i
criteri di ordinamento che visualizzo in una maschera impostata sulla
stessa query su cui si basa il report.
Spiego meglio cosa intendo per criteri di ordinamento :
nella maschera di tipo continua ho vari campi in colonna ,( essendo la
maschera di tipo continuo) e a seconda di come voglio visualizzare i
dati , li ordino in modo crescente o decrescente ( usando i pulsanti
predefiniti di ordinamento crescente-decrescente A-Z) selezionando un
campo ( o colonna in qs. caso) così ottengo vari ordinamenti a seconda
del campo sul quale ho chiesto l'ordinamento crescente o decrescente.
Vorrei che il report che apro con un pulsante dalla maschera mi fosse
stampato con lo stesso criterio che stò usando in quel momento sulla
maschera.

 maschera.
DoCmd.OpenReport "TuoReport", acViewPreview
Reports!TuoReport.OrderBy = Me.OrderBy
Reports!TuoReport.OrderByOn = True
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

 Access FAQ:
www.donkarl.com/it
Grazie Karl per il suggerimento , ma c'è qualcosa che non va :
mettendo le righe di codice sull'evento clik del pulsante che apre il
report , prima di visualizzarlo appare la richiesta di inserimento del
parametro per il quale ho ordinato i record nella visualizzazione
della maschera. Se non inserisco niente ( non saprei altrimenti cosa
inserire) , i record del report vengono comunque stampati sempre nello
stesso ordine stabilito precedentemente nelle proprietà ordinamento e
raggruppamento del report !!!!!
Mi puoi aiutare ?
Grazie

 report !!!!!
Tutti campi che possono essere usati per l'ordinamento nella maschera
devono anche esistere nel report. Se non vuoi mostrarli puoi impostare
la propriet� visibile dei controlli a No, ma i campi devono essere presente
nel report.


 Access FAQ:
www.donkarl.com/it
Grazie Karl , ho risolto , i problemi erano due :
1°: nel report avevo impostato un criterio di ordinamento che ho
provveduto ad eliminare ( quindi mi bloccava il report sempre su quel
criterio)
2°: non mi ero accorto che la maschera era il risultato di una query ,
ed il report di un'altra query ....... DURO , DURO
Comunque funziona tutto grazie mille per l'aiuto !!
Newsgroup: it.comp.appl.access
Titolo: Mail e HTMl

Ciao a tutti, Probabilmente sto per fare una domanda stupida.
Dovrei inviare una pagina html via Mail tramite access.
Per l'invio nulla di difficile, ho provato sia l'utility scaricata dal sito
comune che utilizza le Mapi sia quella che utilizza winsock.
Il problema č che non capisco come devo fare ad inviare la pagina in modo
che all' apertura della mail mi appaia subito la pagina.
Ho provato ad inserire il codice Html come allegato, Nulla
Ho provato ad inserire il codice nell' oggetto della mail, ma nulla quando
apro la mail mi appare il codice e non la pagina.
Come dovrei fare ???
Via ringrazio.
Enrico Pietrobon


Devi inserire il codice html nel corpo del messaggio ed impostare il formato
come HTML. Se non ricordo male, con le tecniche da te provate, non mi
sembrava possibile fare quello che chiedi; con gli oggetti CDONTS o/e CDOSys
invece sì.
Suggerii un esempio preso dalla MS:
Dim myMail
Set myMail = CreateObject("CDONTS.NewMail")
HTML = "<!DOCTYPE HTML PUBLIC ""-//IETF//DTD HTML//EN"">" & vbCrLf
HTML = HTML & "<html>"
HTML = HTML & "<head>"
HTML = HTML & "<meta http-equiv=""Content-Type"""
HTML = HTML & ""content=""text/html; charset=iso-8859-1"">""
HTML = HTML & "<title>Sample NewMail</title>"
HTML = HTML & "</head>"
HTML = HTML & "<body>"
HTML = HTML & "This is a sample message being sent using HTML. <BR></body>"
HTML = HTML & "</html>"
myMail.From = "
us...@example.com
"
myMail.To = "
us...@example.com
"
myMail.Subject = "Sample Message"
myMail.BodyFormat = 0
myMail.MailFormat = 0
myMail.Body = HTML
myMail.Send
Set myMail = Nothing
Ricorda che se il destinatario (come me per esempio) ha impostato il suo
programma per non leggere mail in formato HTML non vedrà mai il tuo lavoro.
Ciao.
--
Sergio MAZZA


Ti ringrazio per la tua gentilezza. L'unico problema adesso è trovare gli
Oggetti CDONTS oppure CDOsys.
Ho provato a cercare, ma non ho trovato nulla in giro.
Non sai dove reperirli.
Grazie
Enrico Pietrobon


Da Win2000pro in poi sono già disponibili; nei strumenti - riferimenti devi
indicare la libreria...
Ciao.
--
Sergio MAZZA


Scusa la mia completa ingoranza.
Ma ho provato a cercarlo, ma non riesco a trovarlo. Il controllo è un OCX o
una DLL.??
Si chiama propio Cosi CDONTS  o nella lista dei controlli ha un altro nome
???
Scusami di nuovo.
Ciao
Enrico Pietrobon


Qui ho win2000srv e la libreria è:
- Microsoft CDO for NTS 1.2 Library
Ciao.
--
Sergio MAZZA


Mi è arrivata proprio adesso una news da Aspitalia con un'altra soluzione
per 2003srv:
http://www.aspitalia.com/liste/usag/script.aspx?ID=553
Ciao.
--
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: esportare PDF singoli

scusate se torno sull'argomento... questa sub serve per creare dei pdf in 
automatico sui tutti i record di una tabella
captando dinamicamente il testo del campo CODICE_UNITA e scorrendo il 
recordset con Rs.MoveNext.
quello che fa attualmente č: se il recordset č composto da 5 istanze stampa 
5 volte ma sovrascrivendo di fatto sempre lo stesso primo record.
ho provato a snazzicare anche confrondontando il materiale trovato in rete 
es:BatchRptsToPDFCreator... ma io con le mie consoscenze non glielň fatta..
č per questo che chiedo nuovamente il vostro preziosissimo aiuto
Private Sub Comando4415_Click()
  Dim MyDB As Database, Rs As Recordset
     Dim strBody As String, lngCount As Long, lngRSCount As Long
     Dim PDFCreator1 As PDFCreator.clsPDFCreator
     Dim DefaultPrinter As String
     Dim OutputFilename As String
    ' Dim Qdf As dao.TableDef
     'Set Qdf = Db.TableDef("unita")
Dim DirSalvataggio As String
Dim NomeFile As String
DirSalvataggio = "c:\"
NomeFile = Me.txtProgress
Set PDFCreator1 = New clsPDFCreator
   Set MyDB = DBEngine.Workspaces(0).Databases(0)
    Set Rs = MyDB.OpenRecordset _
       ("unita")
With PDFCreator1
.cStart "/NoProcessingAtStartup"
.cOption("UseAutosave") = 1
.cOption("UseAutosaveDirectory") = 1
.cOption("AutosaveDirectory") = DirSalvataggio
.cOption("AutosaveFilename") = NomeFile
.cOption("AutosaveFormat") = 0
  '0 = PDF
DefaultPrinter = .cDefaultPrinter
.cDefaultPrinter = "PDFCreator"
.cClearCache
.cPrinterStop = False
End With
While Not Rs.EOF
DoCmd.OpenReport "uts_en", acViewNormal, , "[CODICE_UNITA] ='" & 
Rs.Fields("CODICE_UNITA") & "'"
  DoCmd.Close acReport, "uts_en"
   Rs.MoveNext
Wend
     Rs.Close
     MyDB.Close
     Set Rs = Nothing
     Set MyDB = Nothing
     Close
     Exit Sub
End Sub

 Wend
quindi io farei:
dim i as integer
While Not Rs.EOF
i=i+1
....
.cOption("AutosaveFilename") = "filepdf" & i & ".pdf"
....
DoCmd.OpenReport "uts_en", acViewNormal, , "[CODICE_UNITA] ='"&
  Rs.Fields("CODICE_UNITA")&  "'"
     DoCmd.Close acReport, "uts_en"
      Rs.MoveNext
    iWhile Not Rs.EOF
  Wend
ciao!
BFS