mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Form che non parte[era Bottone che non funziona ]

Oi!
Allora come sopra, è la form che non parte, perchè c'è un altro
bottone che la apre e che non fa il suo dovere.
Ora mi chiedo come è possibile che una forma dia problemi solo su un
PC. Posso postare del codice? quale? :)
Axè!

 ha scritto nel messaggio
news:66afpv8p22l484npt...@4ax.com...

Il codice associato al pulsante che non apre la form
Antonio

Newsgroup: it.comp.appl.access
Titolo: VBA In crash. Impossibile visualizzare i moduli

Dopo aver importato due query che inavvertitamente avevo cancellato da un 
mdb precedente, ho come risultato che Access 2003 non appena cerco di 
visualizzare qualsiasi modulo vba o di form, va immediatamente in crash.
La cosa comincia a preoccuparmi seriamente.
Grazie
Daniele 

OneEDP ha scritto:

Provato a importare tutto? Decompile?
-- 
Questo articolo e` stato inviato dal sito web 
http://www.nonsolonews.it

 Provato a importare tutto? Decompile?
Nell'imporare tutto di pianta!!!


ricancella le 2 query... e prova a importare


Le due bastarde le ho cancellate  PRIMA per evitare problemi ma senza 
risultati!
Grazie 

"OneEDP" <OneEDP@antispam> ha scritto nel messaggio 
news:4af94c72$0$1109$4faf...@reader1.news.tin.it...

Importa un oggetto alla volta oppure esporta un oggetto alla volta.
(fai sempre una copia del db originale e lavora su questa).
Ciao, Carlo 


Mi sono fatto prendere dalla foga e ho fatto importa tutto.
Ora pian pianino sto importando un "pezzo" alla vota.
Si sta sbloccando!
Ora c'� la rottura dei riferimenti e di altro.
Grazie... il crash � in via di risoluzione.
Grazie ancora a tutti voi.
Daniele

Newsgroup: it.comp.appl.access
Titolo: BE sul server, quali accorgimenti?

Buongiorno, confesso di non conoscere i problemi relativi ad una
gestione data base in rete.
Premesso che si tratta di solo cinque client e un server, ho un FE su
ogni client e il BE con le sole tabelle sul server.
Le tabelle sono collegate dai singoli files MDB presenti su ogni
client.
Io mi sono limitato a questo e tutto sommato funziona, però NON SO se
occorrono altri accorgimenti (non so, priorità, record blocati,
semafori, flussi e tutte quelle cose relative alle  reti che ignoro).
In realtà a me pare che se vi sono due utenti che contemporaneamente
operano sul data base, anche se su due record diversi, il sistema
rallenta enormemente e a volte si blocca.
E' evidente che manca qualcosa, ma che? 
Non so se sono stato abbastanza chiaro.
Magari datemi qualche indicazione anche di tipo bibliografico (siti,
files, forum etc) in modo che possa studiare da solo senza rompere le
scatole.
Grazie
Filippo

 ha scritto nel messaggio 
news:u04394h0eskbjvg3s...@4ax.com...

Prova iniziando da qui:
Come ottimizzare la prestazione di rete di motore di database Office Access 
e Jet con i client basati su Windows 2000 e basati su Windows XP
http://support.microsoft.com/kb/889588
www.sitocomune.com
 - Sezione General
6.135 Caratteristiche generali di esecuzione e tecniche di ottimizzazione di 
Microsoft Jet 3.5
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: smartsound quicktracks plugin non si trova

Ho scaricato ActvCtrls.mdb (esempi di ActiviX) da Sito Comune Forms 3.21.
Alcuni esempi fanno partire la ricerca di "smartsound quicktracks plugin",
che non si trova (errore 1706...), e quindi non si possono vedere. Quindi 
Access si blocca.
In internet ho diverse segnalazioni, ma nessuna  soluzione.
Qualcuno sa dirmi in merito? Grazie
mayerlink

 ha scritto nel messaggio 
news:4404ca43$0$12587$4faf...@reader3.news.tin.it...

 Il plugin è a pagamento (99 dollari). Qui puoi scaricare un 
aggiornamento...per Pinnacle:
http://www.smartsound.com/support/qxpartners_update.html
Per il codice di errore e la sua spiegazione leggi:
http://www.smartsound.com/support/answers/link.php?id=378
Ciao, Carlo

 wrote in message
news:4405446b$0$28067$4faf...@reader1.news.tin.it...

Fantastico risolto Grazie
mayerlink

Newsgroup: it.comp.appl.access
Titolo: Struttura a pagine multiple e sottomaschera tabellare con relativa sottomaschera

Buonasera. Uso A00 e w98 SE
Ho una sottomaschera in visualizzazione tabellare (tipo excel) ed un'altra
sottomaschera all'interno, i cui dettagli vengono visualizzati facendo clic
sul segno +.
Ho notato che se il tutto viene realizzato all'interno di un controllo a
pagine multiple, NON funziona più, ovvero non è più possibile fare cli sul
+.
E' un bug o sbaglio io qualcosa?
Gianluigi Agostini

 +.
Per funzionare funziona ... ma per sapere se e dove sbagli bisognerebbe dare
uno sguardo al programma.
Potrebbe essere un problema di risorse che impedisce l'esplosione della
maschera di dettaglio.
La settimana scorsa ho visto l'impostazione che stai dando alla Form
principale dell'applicazione e a mio parere è pesantina: la struttura a
Frame è molto articolata e i controlli associati alla fine saranno decine.
I "Fogli dati secondari" introdotti con A '2000 sono spettacolari, ma devono
essere usati con parsimonia: le prestazioni delle maschere che li contengono
calano nettamente e il consumo di risorse sale parecchio (task manager alla
mano).
Ora, come ottenere ciò che vuoi senza usare sottomaschere nidificate (i
fogli dati secondari appunto)?
Ti consiglio di gestire l'evento Doppio click a livello di selettore record
e aprire SOPRA la struttura a schede la mascherina di dettaglio.
Tra l'altro se imposti a "Senza bordo" lo stile della form così esplosa ,
l'operatore avrà la sensazione che appartenga alla Form principale
(rispettando quindi la filosofia della struttura a schede) ... in tal caso
dovrai inserire tu un pulsantino di chiusura.
Altro consiglio: potresti mantenere "Non associati" i controlli delle pagine
da 2 .... n della tua
struttura a schede.
Su cambio pagina (evento su modifica della strutt. a schede) associ a codice
gli oggetti ai relativi campi.
Le prestazioni su cambio pagina dei Frame rallentano, ma nel complesso la
Form guadagna in affidabilità e agilità.
CIAO, Silvio
Newsgroup: it.comp.appl.access
Titolo: Progressivi ( atto secondo)

Eccomi di nuovo qui (purtroppo)
In un precedente Thread mi è stato suggerito (Francesco) di usare questo
codice per l'inserimento di un progressivo..
Me!PROG_ANNO = Year(Date()) ' restituisce l'anno della data odierna
Me!PROG_NUM = Nz(DMax("[PROG_NUM]", "NomeTabella", "[PROG_ANNO]=" &
Year(Date))) + 1 'Legge il N° progr. all'interno dell'anno in corso
Funziona molto bene!
Il problema adesso è questo:
Nel momento in cui ho 10 record e cancello gli ultimi 3 (8,9,10), il
successivo progressivo che mi viene proposto, logicamente, è il numero 8!
a me servirebbe però il numero 11 !
quindi credo che la soluzione sia quella di mettere il progressivo in una
tabella separata e prendere di volta in volta il valore da questa tabella;
ma come si fa ?
prendere il valore credo si possa fare con dlookup... ma poi per
incrementarlo ?
qual'è la procedura esatta?
Grazie e mi scuso ancora (sono nuovo..)

 ha scritto nel messaggio
news:xAMCa.54972$lK4.1...@twister1.libero.it...

prima della cancellazione di un record o anche quando ne aggiungi uno nuovo
memorizza il valore massimo raggiunto fino a quel momento in una tabella di
appoggio contenente un solo campo (per esempio "codice") con una query di
aggiornamento.
Usa la funzione dmax.
Poi usa il valore della tabella per il progressivo
Ciao
Salvatore

 ha scritto nel messaggio
news:bbg533$lfu$1...@lacerta.tiscalinet.it...

Ehi scusami, potresti essere più chiaro? fai finta di parlare ad un bambino
ok?
Grazie!

 
puoi crearti una tabella d'appoggio in cui metti tutti quei valori 
temporanei e non che possono servirti durante l'esecuzione del programma.
in questa tabella, un record sarà dedicato al MAX-ID.
ad ogni inserimento, leggi il valore e lo incrementi.
dlookup per leggere 
docmd.runsql o simile per aggiornare la riga in questione (UPDATE ... SET 
... WHERE)
questa è una soluzione.
se poi vada bene nel tuo caso, decidi tu...
:-)
-- 
+-------
| Paolo opg
|
| janickg ( at ) hotmail ( dot ) com
+-------

 ha scritto nel messaggio
news:hLMCa.55035$Ny5.1...@twister2.libero.it...

1) Crea una nuova tabella (chiamala per esempio appoggio)
2) inserisci un nuovo campo (per esempio "codice") di tipo numerico
3) crea una query di aggiornamento della tabella appoggio
4) nella riga aggiorna a del campo codice scrivi dmax("prog_num";"nome
tabella") dove nome tabella è quello della tabella che contiene il
progressivo
5) nella maschera, all'evento prima di eliminazione inserisci un codice che
esegua la query (in questo modo nella tabella viene registrato il numero
massimo)
6) usa la funzione dlookup riferita alla tabella appoggio per individuare il
numero massimo
dovresti poi perfezionare la query in modo che prenda il valore massimo
dell'anno in corso
fammi sapere se mi sono spiegato un po' meglio
ciao
Salvatore
Newsgroup: it.comp.appl.access
Titolo: visual basic invio email

Qualche buona anima saprebbe spiegarmi la formula in vb per inviare un
messaggi di posta elettronica ricavando la mail direttamante da un record.
grazie anticipatamente


Servirebbe Mago Merlino per le formule.....!
Vai sul SitoComune trovi qualcosa di molto chiaro....!
@Alex.


Ciao andy
consulta la guida sul comando:
DoCmd.SendObject acSendReport, stDocName, acFormatRTF, _
     "indirizzo_email", , , "esempio invio file...RTF", _
     "in allegato il file di cui all'oggetto", False
le varie parti le puoi leggere da record di una tabella....
Cordialita'
Antcim
Newsgroup: it.comp.appl.access
Titolo: Limitare i record visualizzati dall'utente nella maschera

Innanzitutto ringrazio quanti di voi mi hanno aiutato con il mio precedente
problema per le tempestive e molto utili informazioni.!!!!
La cosa che ora mi interesserebbe risolvere è la seguente:
Ho predisposto per l'utente alcune maschere di inserimento, quasi tutte in
modalità maschera principale- maschera master e maschere details
sottomaschere. Ora nella visualizzazione della sottomaschere a maschere
continue l'utente potrebbe inserire centinaia di record (i cui record
saranno naturalmente memorizzati in tabelle) ma io vorrei limitare la
visione dei record inseriti nella sottomaschera ad un numero predefinito (ad
es: ultimi 20 records) in modo che l'utente stesso non debba scorrere
continuamente la barra verticale per posizionarsi in maniera adeguata ed
abbia sott'occhio una visione generica dei record precedentemente immessi.
Sono sicurissimo si possa fare ma non sò come!!!
Inoltre sarebbe utile anche una ricerca di vecchi record da parte
dell'utente da visualizzare nella sottomaschera per poter essere modificati
.
Mi spiego meglio: mettiamo che l'utente ha valorizzato nella sottomaschera
1.000 records ma ne visualizza gli ultimi 20.......egli vuole visualizzare
un determinato range  di record (ad esempio gli ultimi 500) nella
sottomaschera x effettuare delle modifiche. E' possibile cioè decidere a
posteriori (premesso si possa attuare il discorso della limitazione dei
records visualizzati) da parte dell'utente (dato che vuole fare delle
modifiche) visualizzare un determinato numero di records a sua scelta?
    Spero di essere stato chiaro!!!
   Grazie a tutti ed a risentirci!!!

 ha scritto nel messaggio
news:PVC%8.26525$GV2.6...@twister2.libero.it...

Semplice, devi aggiungere nella tabella la data di inserimento e/o di
modifica, poi quando apri la maschera chiedi all'utente la data di inizio e
di fine. Inoltre puoi usare "top"  con il numero dei record che vuoi
visualizzare sempre agendo su "origine recor".
Saluti
Dell'Oca Marco
D.M.Software
Newsgroup: it.comp.appl.access
Titolo: chi mi lancia un salvagente?

Ciao a tutti.
Vi espongo il problema sperando che qualcuno mi dia una dritta.
Sono alle prese con Access 2000 versione italiana.
Mi trovo con 2 files mdb.
In uno ho solo le tabelle contenenti i dati. Questo file sta sul disco di
rete.
Nell'altro ho i collegamenti alle tabelle + maschere, report e quant'altro.
Questo file sta in locale, nell'unità C.
Problema: il caricamento delle maschere, sia esse di immissione o di ricerca
è lentissimo.
Sempre intorno ai 30 secondi.
Domanda: perchè?
Come fare a risolvere il problema?
Ulteriori dettagli: il pc non ha problemi. E' un Pentium III a 800 MHz che
ha subito recentemente un defrag. La rete viaggia a 10 Mbit/s e non ha mai
dato problemi.
Ho provato ovviamente a compattare i file con l'utility fornita col
programma. Nessun risultato.
Ho inserito degli indici. Nessun risultato.
Ho specificato, ove necessario, che le maschere sono soltanto di immissione.
Nessun risultato.
Sulle maschere sono presenti i classici controlli: caselle di testo,
combinate, check box e pulsanti di comando. Dietro ai pulsanti si nascondono
delle macro realizzate con i wizard. Non sono stati usati moduli. Le
maschere non contengono immagini.
Ove previsto è stato specificato che la maschera non ha un modulo alle
spalle. Nessun risultato.
Il database contiene molte tabelle.....relazionate, secondo i canoni. Ho
usato l'analizzatore che però dice che è tutto a posto. Non ci sono dati
ridondanti.
La cosa interessante è che il file contenente i dati occupa solo 2 MB. Poca
roba dunque.
Un'altra cosa: altri 2 file collegati allo stesso modo, uno in locale e
l'altro sul disco di rete sebbene in una cartella diversa dal file di cui
sopra, non manifestano gli stessi problemi d'apertura. Lì il file contenente
i dati occupa ben 20 MB.
Qualcuno mi aiuta per favore?
Grazie a tutti.
Sergio

 ha subito recentemente un defrag. La rete viaggia a 10 Mbit/s e non ha mai
cut
^^^^^^^^^^^^^^
e prova anche a usare un mde per il fe.
Sib
--
qualita.assicurazione su 
www.cerrinet.it
Il newsgroup sulla Qualita'


forse hai una scheda di rete realtek ? (lascia stare sto scherzando).
Questo problema č tipico di a2000, infatti molti sono tornati indietro al
97.
Prova in ogni caso rimuovere tutte le tabelle collegate nel fe, compilare i
moduli (che comunque ci sono nelle maschere) e ricollegarle previo
compattamento dei 2 db.
Sarebbe consigliabile che il pc del disco che contiene i dati non lavorasse
a sua volta sul dati (scusa la rindondanza).
Potresti anche provare a creare un nuovo mdb e importare tutto report,
forms, ecc dal fe.
Un altro trucco per velocizzare che puoi usare in maschere particolarmente
lente e' andare in visualizzazione struttura e aprire la query di origine e
chiudere, poi cliccare la struttura, questo ricollega tutti i controlli,
salvare.
Ciao, Ale.
Newsgroup: it.comp.appl.access
Titolo: Controllo se è una data!

Buongiorno..Problema:avrei bisogno di testare se un numero formattato 
nel seguente modo 00/00/00 è effettivamente una possibile data..Mi 
spiego: potrei avere 04/01/05,che è una possibile data,invece 34/89/56 
che è da scartare..Come posso controllare questo?Grazie 1000
Inviato da 
www.mynewsgate.net

alberto ha scritto:

If isdate(numero) then ...
Namor
-- 
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Newsgroup: it.comp.appl.access
Titolo: dati cancellati

Se elimino dei records da una tabella, è possibile in qualche modo
recuperare i dati?
Grazie
Giuliano


Non mi risulta
-- 
Federico
----------------------------------
Rimuovi paperino. per e-mail
----------------------------------
Tutte le richieste che arrivano
in privato, vengono cestinate.
----------------------------------
Sito Comune di it.comp.appl.access
http://www.sitocomune.com
mailto:
webm...@sitocomune.com
----------------------------------

Newsgroup: it.comp.appl.access
Titolo: Sto cozzando contro un limite di Access???

Ciao a tutti.
Ho l'impressione di essere andato a sbattere contro un limite di
Access, e da cinque settimane sto cercando senza successo di aggirare
l'ostacolo. 
Così mi affido a voi ed alla vostra esperienza sperando che possiate
tirarmi fuori da questo vicolo cieco.
                    SITUAZIONE
ho le seguenti 4 tabelle:
ANAGRAFICO contenente un record per ogli mio cliente, identificato
dalla chiave univoca "CodInt"
FORNITORI: anagrafico fornitori, un record per fornitore, identificato
con la chiave univoca "For"
FATTURE: una scheda per fattura, contiene un campo "CodInt" (legato
molti-a-uno a quello di ANAGRAFICO) ed uno "For" (legato molti-a-uno a
quello di FORNITORI).
CODICI: contiene i codici che ciascuno dei FORNITORI attribuisce a
ciascuno dei clienti in ANAGRAFICO. Contiene un campo "CodInt" (legato
molti-a-uno a quello di ANAGRAFICO), il campo "CodFor" (legato
molti-a-uno a quello di FORNITORI) ed infine il campo "Codice".
                 IL PROBLEMA
Voglio costruire una maschera che contenga il CodInt (ossia il cliente
cui la fattura fa riferimento), il For (il nome del fornitore),  tutti
i dati delle fatture nonchè - ecco il problema - una casella che
prelevi dalla tabella CODICI il "Codice" che corrisponde sia al "For"
ed al "CodInt" appena inseriti in maschera.
Ho provato a costruire la maschera FATTURE avente per origine una
query che prelevi le informazioni da FATTURE, ANAGRAFICO e CODICI, ma
per quanti sforzi faccia sono arrivatoi ad ottenere:
- o solamente la possibilità di vedere i 3406 record già inseriti in
tabella ma non di aggiungerne di nuovi;
- oppure di vedere i miei record aumentare come per magia a più di
11.000.
Che cosa posso avere sbagliato?
L'help in linea parla di un limite di Access nel trattare un una
maschera di dati provenienti da più di 3 tabelle che presentino legami
ad altre tabelle.
E' possibile che io sia incorso in questo errore?
Vi ringrazio fin d'ora per un aiuto, qualunque indizio o suggerimento.
Potreste rendermi le serate puiù piacevoli di quanto sia stato nelle
ultime settimane.
Ciao
Andrea W. GUAGLIO
Milan, ITALY
PP-ASEL

Tabella Clienti
ID Cliente
Cliente
ecc
Tabella Fornitori
ID Fornitore
Fornitore
Tabella FATTURE CLIENTI
ID Fattura
ID Cliente (Legato UNO con la tabella clienti e MOLTI con la tabella FATTURE
CLIENTI)
ecc.
Tabella FATTURE FORNITORI
ID Fattura
ID Fornitore
ecc
Per me hai mischiato tutto
Ciao

...

Newsgroup: it.comp.appl.access
Titolo: autocomposizione sicurezza a livello utente

Saluti a tutti..
Ho utilizzato l'autocomposizione sicurezza alivello utente e mi sorgono
questi dubbi...
1 - una volta impostato il tutto mi si apre la maschera dove immettere nome
utente e pw su tutti i databases quindi immagino che io non possa proteggere
un solo database...
2 - è possibile fare in modo che la maschera non si apra e in automatico
legga l'utente e la pw dal logon di windows?
3 - posso mettere il file .mdw in una cartella sul server o deve per forza
rimanere in winnt\system32?
grazie
--
skipper dixit...
www.superskipper.it

 
www.superskipper.it
1 - che io sappia nel tuo caso non puoi fare nulla xchè hai modificato
l'.mdw che riguarda l'access e non il singolo db quindi... 
2 - devi (almeno penso xchè non ho trovato alternative) cmq inserire
sempre user e psw.
3 - puoi mettere i file in una cartella sul server ma poi devi seguire la
seguente procedura x indirizzare i singoli client...:
Apri Access > Strumenti > Protezione > amministrazione gruppi di lavoro >
Aderisci > sfoglia > prendi il percorso di rete e dai l'ok.
Buon Lavoro :-), Enzo
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

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

egr. sigg. buongiorno,
io mi scuso sempre per le intrommissioni in questo NG, ma da una
partecipazione "passiva" ogni tanto passo alla parte "Attiva".
avrei un problema
ho 6 tabelle ognuna di loro collegata all'alltra a "cascata" con gli ID.
ora devo creare una maschera di inserimento con le sottomschere
se creo la maschera in autocomposizione mi da solo la possibilità di creare
tale maschera da max 3 tabelle. vorrei avere la stessa funzione con 6
tabelle. non so se sono stato chiaro (spero di si)
buona giornata a tutti
carlo

 tabelle. non so se sono stato chiaro (spero di si)
E fare le altre 3 a manella vedendo come sono fatte le altre così impari
anche invece di adagiarti sulle autocomposizioni?
Antonio

 ha scritto nel messaggio
news:3iHwa.2657$lK4....@twister1.libero.it...


 a proposito quando ci presenterai tua zia la regina d'inghilterra?????
Quando tu mi presenterai una tua cuGGinetta!!!
Antonio
Newsgroup: it.comp.appl.access
Titolo: formato "dinamico"

è possibile in un report e/o in una maschera  basati su query, impostare il 
formato numerico di un campo con o senza decimali (formato standard 2 
decimali ; formato standard 0 decimali)
in funzione del contenuto di un'altro campo della query di base?
grazie.

č possibile in un report e/o in una maschera  basati su query, impostare il 

Certo che sě.
If Me.TuoControllo = "quello che vuoi" then
Me.TuoControlloNumerico.DecimalPlaces = 2
else
Me.TuoControlloNumerico.DecimalPlaces = 0
End if
Ciao, Carlo 

 Ciao, Carlo
sull'evento "caricamento" della maschera ho messo:
Private Sub Form_Load()
If Me.MioControllo= 1 Then
Me.MioControlloNumerico.DecimalPlaces = 0
Else
Me.MioControlloNumerico.DecimalPlaces = 2
End If
End SubO
però funziona solo in base all'ordinamento della query, cioè considera solo 
il valore del primo record.
perchè?
grazie.

 ha scritto nel messaggio 
news:45f5...@extreme.x-privat.org...

Non avevi specificato che si trattava di maschere continue...
la proprietà viene impostata una volta per il controllo e può variare in una 
visualizzazione a maschera singola non in visualizzazione maschere continue.
Nemmeno la formattazione condizionale potrebbe essere usata.
Ciao, Carlo 


Mi viene un dubbio...
non č che hai scritto proprio cosě
Me.MioControlloNumerico.DecimalPlaces = 0
Immagino avrai sostituito con il nome del tuo controllo, vero?
Ciao, Carlo 

 Ciao, Carlo
si certo!!!
in effetti si comporta proprio come prevedevi.
cioč in base al primo record come se fosse una maschera singola.
non c'č proprio nessuna soluzione?
ciao


Temo non ci sia una soluzione...a meno di cambiare il tipo di dati da 
numerico a testo.
Non credo ti interessi questa soluzione ma qualora fosse di tuo gradimento, 
potresti scrivere nel campo della tabella quello che ti pare:
1 oppure 1,00, 123 oppure 123,00
La scrittura potrebbe avvenire anche a runtime con una query di 
aggiornamento.
Altra alternativa e sempre che possa essere di tuo gradimento è quella di 
aggiungere alla tabella un campo testo e formattarlo a runtime come 
preferisci con i valori del campo numerico. In ogni caso i dati, i valori di 
testo, devono essere scritti nella tabella prima della visualizzazione su 
maschera continua, anche qui è possibile usare una query di aggiornamento.
Ciao, Carlo
Newsgroup: it.comp.appl.access
Titolo: ERRORE 2950

Salve,
in un programma di stampe grafiche che ha un ciclo ogni 10 secondi 24
ore al giorno mi ha dato il seguente errore:
Macro name:
Accoda_top_15_per_CALCOLO_FINE
Condition:
Trie
0_A_ACCODA_TOP_15;Datasheet; edit
Error Number 2950
0_A_ACCODA_TOP_15 è una query di accodamento con la funzione
progressione che accoda i record
in una tabellla con un numeratore per riga.
Leggendo l'articolo:
http://support.microsoft.com/kb/931407/it
non mi sembra di trovare molto visto il programma si blocca dopo
diverse ore di lavoro.
Grazie per l'attenzione

 diverse ore di lavoro.
Non puoi convertire il tuo macro in una procedura o funzione di VBA?
Così ci sarebbe la possibilità di aggiungere una gestione di errore
con un messaggio probabilmente più signicativo per trovare la causa.
-- 
cu
Karl
*********
Access FAQ: 
www.donkarl.com/it
 


Grazie del suggerimento,
adesso vi è una funzione VBA che lancia la macro
Provo a scrivere tutto in vb con la gestione degli errori per ogni
query.
Se non riesco a risolvere riporterò l'errore
Grazie
Newsgroup: it.comp.appl.access
Titolo: Re: Selezionando casella combinata riempimento caselle con record relativo


evento dopo aggiornamento della casella combinata:
Me.NomeTuaCasellaTesto1 = Me.CasellaCombinata19.Column(0)
Me.NomeTuaCasellaTesto2 = Me.CasellaCombinata19.Column(1) ecc. ecc.
guarda help proprietà Column
---
Daniele




Vai nell'origine RIGA (non Origine RECORD) e copia la select
MAssimiliano


---
Daniele 


Tu hai una combo che chiami "Tuacbo" in cui visualizzi
id
nome
cognome
nella maschera hai i controlli nome e cognome
Private sub Tuacbo_afterUpdate()
me.nome = me.tuacombo.column(1)
me.cognome = me.tuacombo.column(2)
end sub



Devi usare column.
Guarda l'help
MAssimiliano

 stesso record selezionato! aiutatemi!
Supponiamo che la casella combinata TuaComboBox abbia come origine una
query di, diciamo n colonne sulla tabella/e contenente/i i dati che ti
interessa inserire nella maschera. Nella maschera dove vuoi inserire in
automatico i valori del record selezionato attraverso la casella combinata
inserirai tanti controlli non associati quanti sono i campi del record che
vuoi visualizzare. A questo punto, sull'evento AfterUpdate di TuaComboBox
inserirai il codice:
    Me!Ctrlx = Me![TuaComboBox].Column(i)
dove Ctrlx è il nome del controllo dove vuoi che appia il valore preso dal
record origine della query della TuaComboBox e i=indice che indica la
colonna nella query contenente il valore da assegnare, facendo attenzione
che la prima colonna avrà valore i=0. Ripeti la stringa per tutti i
controlli che dovrebbero visualizzare valori della query.
TANNHAUSER


qualcuno riuscirebbe a farmi un db di prova?
-- 


 MAssimiliano


http://inuyasha.altervista.org/db1.mdb
ragazzi qui c'è il mio database.... ho fatto tutte come avete detto voi MA
continua SOLO a comparirmi il nome e non il resto dei campi... domani
mattina devo andare da questo tizio e se riesco a fargli una maschera così
mi assume... (piccola ditta) plis aiuto :(
-- 


http://inuyasha.altervista.org/db1.mdb
ragazzi qui c'è il mio database.... ho fatto tutte come avete detto voi MA
continua SOLO a comparirmi il nome e non il resto dei campi... domani
mattina devo andare da questo tizio e se riesco a fargli una maschera così
mi assume... (piccola ditta) plis aiuto :(
-- 


SCUSATE!!!!! č 
http://inuyasha.altervista.org/db1.htm


cbozza ha scritto:
<cut>
Hai dimenticato di inserire il numero delle colonne e la larghezza.
In numero colonne metterai 5
In larghezza i numeri debbono essere separati da un ";"
--
rgrds
SC

Newsgroup: it.comp.appl.access
Titolo: Query somma

Ciao
ho una tabella in access cosï¿œ composta, e vorrei per ogni record fare la 
somma in automatico dei voti, da porre poi come somma totale nell'utlimo 
campo di ogni record.
id    nome    cognome   voto1     voto2    voto3    totaleVoti
1     franco  rossi       5         0        1           6
2     lucio   bianchi     6         0        0           6
3     elena   verdi       3         0        4           7
come potrei procedere?
grazie!

 come potrei procedere?
vedi: 
www.donkarl.com/it?FAQ4.11
ciao
Daniele 

 ...
Per totaleVoti basta un campo calcolato nella query:
totaleVoti: Nz(voto1)+Nz(voto2)+Nz(voto3)
Non sono sicuro se poi parla di una somma incrementale.
In questo caso aggiungi un altro campo calcolato:
SumInc: DSum("Nz(voto1)+Nz(voto2)+Nz(voto3)";"Tabella";"id<=" & id)
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
Newsgroup: it.comp.appl.access
Titolo: Query di calcolo

Buon giorno a tutto il n.g.
Ho creato una casella combinata che tramite una query mi visualizza tutte le 
fatture immesse precedentemente, importi, scadenze etc. etc.
Come posso fare per far calcolare alla stessa query il totale delle fatture 
del fornitore X ?
Grazie.
Roberto


cioe'
fatt   cli   imp   dataem  datasca   totfatcli
----------------------------------  *******
  n      c    euri   de      ds        tot     <----- qui i totale di c?
select .........., dsum("attr","tab","cli ='" & cli "'")
from  ....etc
----
preferisco un'altra strada
la query che gia' hai (Q1)
una Q2 come: select cli as clitot, sum(imp) as totfatcli from tab
group by cli
una Q3 come: select Q1.*,Q2.totfatcli
from Q1, Q2
where Q1.cli = Q2.clitot
Q1 e Q2 sono buone per conto loro e la Q3 e', forse, quello che ti serve
--
a.cara

 ha scritto nel messaggio 
news:gegne.3532$is5...@tornado.fastwebnet.it...


Newsgroup: it.comp.appl.access
Titolo: quesito tecnico sulle prestazioni del front end sulla base del db usato

il mio dubbio è il seguente:
 
vorrei utilizzare sql server come base dati + access come front end e mi 
connetto tramite ODBC
 
se invece usassi
sql server come base dati + 
vb.net
 come front end e mi connetto tramite ODBC
 
oppure
sql server come base dati + c++ come front end e mi connetto tramite ODBC
 
ottengo prestazioni migliori a livello di manipolazione dati nel db?
 
grazie a tutti. 
 

no. se è vero che usi sql server è lui che manipola i dati

 il mio dubbio č il seguente:

se hai la possibilitŕ di iniziare da zero a studiare uno di questi 
linguaggi ti consiglio 
vb.net
 o c++
cioč linguaggi orientati agli oggetti.
cosě con poca fatica potrai sviluppare anche su smartphone e tablet
 
ciao
BFS

BFS
 
Ottimo consiglio grazie.
 

 ha scritto nel messaggio 
news:5314d0b3$0$1366$4faf...@reader1.news.tin.it...

E anche, e soprattutto, C#
E' il linguaggio più usato in ambito .net ed è quello per cui si trovano più 
esempi di codice già pronti
Tieni presente che sviluppando applicazioni web-based in ambiente .net il 
linguaggio è poco importante, nel senso che la maggior parte del lavoro lo 
fa il Framework, che contiene anche tutti gli strumenti. La differenza tra 
l'uso di un lignuaggio o di un altro è solo nella sintassi del codice, non 
nella potenzialità e negli strumenti che si possono usare.
Newsgroup: it.comp.appl.access
Titolo: Compattazione DB di notte,tramite un comando:è possibile

Buondì.
Innanzitutto spero che l'argomento non sia stato già trattato (ho fatto
delle ricerche con parole chiave compattare, compattazione etc) ma non ho
trovato qualcosa che mi fosse 'aiuto...
In ogni caso rimandatemi (oltre che a quel paese...) ai vari link ...
Se così non fosse,passo alla domanda: è possibile compattare un db
(indipendentemente sia esso un BE on un FE) esternamente (con un comando
batch?) o internamente (un pò di VB) ma a condizione che la compattazione
stessa parta di notte, da sola, ad un orario predeterminato?
Io pensavo a qualcosa del tipo:
file batch inserito nella schedulazione del server da far partire all'1 di
notte
Qualcuno di voi si è già trovato in una situazione simile, e cortesemente
potrebbe condividere la propria esperienza?
Grazie anticipatamente a tutti quelli che mi daranno una mano.
Andrea.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 ha scritto nel messaggio 
news:62Z101Z95Z202Y...@usenet.libero.it...


 ha scritto nel messaggio 
news:62Z101Z95Z202Y...@usenet.libero.it...


 ha
scritto:

Grazie Marcello, sei stato veramente gentilissimo...ora provo immediatamente
il codice.
Grazie ancora !!!
Andrea


Newsgroup: it.comp.appl.access
Titolo: Filtro in casella combinata

Cosa c'è che non va in questa routine applicata al dopo aggiornamento di
una casella casella combinata
per creare un filtro?
Me.Filter = "[CodMag] = " & Chr$(34) & Me![CasellaCombinata22] & Chr$(34)
Me.FilterOn = true
Il problema è che quando il valore da filtrare è per esempio : V1"1/2
(vi sono cioè gli apici) CREA un ERRORE.
GRAZIE!!!!
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 (vi sono cioÃ¨ gli apici) CREA un ERRORE.
===============================
Public Function FSR(SR As Variant) As Variant
'
' Formattazione Stringa di Ricerca.
' Bruno Campanini - 06-04-2005
'
' SR può essere Data, Stringa, Numero
' Se SR è Stringa può contenere qualunque carattere,
' inclusi Chr(34) = "   e   Chr(39) = '
'
' La sintassi sarà sempre ed unicamente:
' (Where) "[TableField]=" & FSR(SR)
'
' Occorre tener presente che SR potrà essere scritta
' nella sua forma normale se collocata in un campo di Form.
' Ad esempio:   Trattoria "L'Isola del Tesoro" con alloggio
'
' Qualora venga passata via codice la medesima dovrà essere
' formattata raddoppiando le eventuali virgolette Chr(34) = "
' contenute nel suo interno, indi racchiusa per intero
' entro DUE virgolette. Nel rispetto della convenzione VB.
' Così sarà:   "Trattoria ""L'Isola del Tesoro"" con alloggio"
'
SR = Replace(SR, Chr(34), """ & Chr(34) & """)
If IsDate(SR) Then
    SR = Chr(35) & Format(SR, "mm-dd-yy") & Chr(35)
ElseIf IsNumeric(SR) Then
Else
    SR = Chr(34) & SR & Chr(34)
End If
FSR = SR
End Function
===================================
Nel tuo caso:
FilterOn = True
Filter = "[CodMag] = " & FSR([CasellaCombinata22]
Bruno 

 GRAZIE!!!!
-- 
Ciao
Geppo
Newsgroup: it.comp.appl.access
Titolo: AZIENDA CERCA TECNICO INFORMATICO

Importante azienda cerca urgentemente per assunzione a tempo indeterminato
tecnico informatico con conoscenze di:
- gestione database contenente grandi quantità di record (linguaggio sql e
management di database)
- reti di pc in tcp/ip
- assistenza agli utenti di AS/400
- programmazione in visual basic
sede di lavoro Verona, ottimo stipendio.
Inviare curriculum all'indirizzo:
rmanto_T...@libero.it

 wrote in message
9q8g5g$ach$1...@fe2.cs.interbusiness.it...

Prego l'azienda di comunicare alla scrivente il suo indirizzo di posta
elettronica in quanto non si riesce inviare

 elettronica in quanto non si riesce inviare
Ma tu hai provato a togliere "_TOGLIERE_"?
Sib

Sib dall'ufficio <cerrise...@SPAMtiscalinet.it> wrote in message
9qgk9k$2tp$2...@serv1.iunet.it...

L'email mi ritorna al mittente

 wrote in message
9qgn7s$1aidn$1...@news02.it.net...

Che frase pleonastica!!!
Antonio

 ha scritto nel messaggio
news:dMRy7.27112$1H1.2...@news.infostrada.it...

sta sequenza è da brivido !!!!
:)

 wrote in message
9qh99h$dsh$1...@nreada.inwind.it...

Thread, il suo nome è thread...
Antonio
Newsgroup: it.comp.appl.access
Titolo: Casella di riepilogo e query di selezione

Ciao a tutti, eccomi di ritorno con le mie domande....
Come si intuisce dall'oggetto il mio problema riguarda il passaggio di più 
valori selezionati da una casella di riepilogo (a selezione multipla) ad una 
query di selezione.
Ho preso come riferimento il codice postato sul sito comune alla sezione 
REPORT e l'ho applicato alle mie esigenze.
Questo è il codice:
Private Sub Comando5_Click()
On Error GoTo Err_Comando5_Click
    Me!lista = Null
    Dim strLista As String
    Dim strCriteri As String
    Dim varItem As Variant
    'Se non ci sono voci selezionate
    'non ci sono attività da effettuare
    If Me!elenco.ItemsSelected.Count = 0 Then Exit Sub
    'Cicla nell'insieme delle voci selezionate
    For Each varItem In Me!elenco.ItemsSelected
        'Cattura la colonna IDSocietà di ciascuna
        'voce selezionata
        strLista = strLista & _
            Me!elenco.Column(0, varItem) & ","
        Me!lista = Me!lista & _
            Me!elenco.Column(0, varItem) & " or "
    Next varItem
    'Elimina la virgola eccedente
    strLista = Left$(strLista, Len(strLista) - 1)
    Me!lista = Left$(Me!lista, Len(Me!lista) - 4)
    'Apri il ReportSocietà filtrando sulle
    'Ragioni Sociali selezionate
    'strCriteri = "[IDSocietà] IN (" & strLista & ")"
    'Dim stDocName As String
    'stDocName = "ReportSocietà"
    DoCmd.OpenQuery ("qUERY1")
    'DoCmd.OpenReport stDocName, acPreview, , strCriteri
    'Deseleziona tutte le righe della casella di riepilogo
    Dim Cont As Integer
    For Cont = 0 To Me!elenco.ListCount - 1
        Me!elenco.Selected(Cont) = False
    Next Cont
Exit_Comando5_Click:
    Exit Sub
Err_Comando5_Click:
    MsgBox Err.Description
    Resume Exit_Comando5_Click
End Sub
Come si vede l'unica cosa che ho cambiato è stata l'apertura di una query 
invece che di un report, in questa query devo passare i valori che ho 
selezionato dalla casella di riepilogo che sono appoggiati in una casella di 
testo chiamata lista.
Se seleziono un solo valore la query funziona perfettamente mentre se 
seleziono + valori la query mi restituisce un record vuoto...... quello che 
è strano è che se copio ed incollo nella query la stringa generata, la query 
funziona perfettamente.
Dove sbaglio?
Grazie per l'aiuto
Massimo Pallavicini 

 Massimo Pallavicini
-- 
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Creazione maschere

Ho appena cominciato ad usare access e già ho incontrato il primo problema
:)
Seguendo le istruzioni di un manualetto ho creato 3 tabelle. Poi volendo
creare delle maschere per l'immissione dei dati, ho selezionato l'oggetto
"Maschere" e mi sono apparse le 2 opzioni di creazione (mediante
visualizzazione struttura e mediante creazione  giudanta), senonchè se
seleziono la modalità creazione guidata mi appare un messaggio che dice "Il
componenente ActiveX non è in grado di creare l'oggetto".
Perchè?

 Perchč?
Hai fatto una installazione parziale di Access?

 Hai fatto una installazione parziale di Access?
Non mi ricordo...!

 wrote in message
news:FM6Xb.5340$Kc3.1...@twister2.libero.it...


 ha scritto nel messaggio
news:Fm7Xb.5407$Kc3.1...@twister2.libero.it...
Grazie 1000!!!!!
Ho risolto grazie a te! :)
Grazie ancora...

Newsgroup: it.comp.appl.access
Titolo: Non trovo la giusta espressione

La mia situazione č questa:
in una query di selezione non riesco a impostare i giusti criteri per fare
si che l'origine dei dati per quel campo derivi da due o piů dati.
Ho provato ad usare 'E' ma non sono riuscito nel mio intento.
Per spiegarvi meglio:
Se l'origine fosse una il criterio di selezione sarebbe:
Forms![sch_ricerca].[JOB]
Se l'origine oltre ad essere 'JOB' fosse anche 'JOB1', cosa dovrei fare????
Spero che mi abbiate capito!!
Grazie tante a tutti quelli che mi risponderanno.

 Se l'origine oltre ad essere 'JOB' fosse anche 'JOB1', cosa dovrei
fare????
Se la selezione deve essere fatta quando entrambe le condizioni sono
inserite:
Forms![sch_ricerca].[JOB] AND Forms![sch_ricerca].[JOB1]
Se la selezione può essere fatta in base ad una sola delle scelte:
Forms![sch_ricerca].[JOB] OR Forms![sch_ricerca].[JOB1]
Ciao
Silvio

Newsgroup: it.comp.appl.access
Titolo: funzione dmax di access in vb6

qualcuno sa come potrei usare questa istruzioni in vb6?
j = DMax("id_movimento", "movimenti") + 1
Grazie a tutti. 

 Grazie a tutti.
Non si usa in VB6 questa funzione... devi usare MAX nel predicato SQL ed
aprire un Recordset.
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------

 ha scritto nel messaggio 
news:finbt9$uio$1...@aioe.org...

funziona, grazie mille.
Newsgroup: it.comp.appl.access
Titolo: Report Esterni

Ciao a tutti,
molto spesso mi trovo a dover aggiornare /modificare un report di
un'applicazione e questo comporta un aggiornamento di tutto l'mdb o mde.
Avrei bisogno di eliminare questo problema e per farlo dovrei poter usare,
dall'applicativo, dei report che siano però esterni (su file).
Questo mi permetterebbe di modificare il report senza fare alcuna modifica
all'mdb
E' possibile ?
Qualcuno di voi ha un'idea ?
L'unica cosa che mi è venuta in mente è l'XML e XSL ma avendone poca
conoscenza non so se può essere ilc aso o no.
Grazie anticipatamente a tutti
Ciao
FACE ONE

 FACE ONE
Se metti i Report in un MDB esterno con le Tabelle Linkate
non vedo una grossa difficoltà, l'unica scocciatura potrebbe
essere quella di modificare Runtime la proprietà SQL delle
Queries Origini dei Report(Remoto) ma non devi fare altro
che applicare la stessa sintassi SQL prelevata dall'MDE/MDB.
Quindi con l'Automazione gestisci l'apertura/Stampa degli stessi.
Io la vedo una cosa estremamente semplice e fattibile.
Ciao
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:acd997319180d33210...@mygate.mailgate.org...

Ciao @Alex,
questa non l'avevo pensata .... e potrebbe essere una soluzione valida che
risolve il mio problema.
Grazie

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

vorrei sapere se e' possibile numerare i record in un report:
mi spiego meglio:
in un report che prende i dati da una query ho una serie di record
ordinati in nome alfabetico, per esempio:
anna
bice
carlotta
wanda
vorrei che fossero numerate cioe':
1	anna
2	bice
3	carlotta
4	wanda
come posso fare?
grazie per la collaborazione
oscar

 ha scritto nel messaggio
news:40405f9b...@news.tiscalinet.it...

Ciao Oscar
inserisci nel corpo del report una casella di testo non associata
nell'origine controllo scrivi: =CurrentRecord
Ciao Daniele

 ha scritto nel messaggio
news:40405f9b...@news.tiscalinet.it...

Potresti anche inserire un campo dove nell'origine controllo la poni =1 e
imposti la proprietà "Somma parziale" su "Tutto".
A.v.


wrote:

grazie funziona perfettamente
oscar
Newsgroup: it.comp.appl.access
Titolo: Non si apre più con doppio clic

Ci riprovo ... ma provate ad aiutarmi nella ricerca
 
Win xp, Access2000.
Rete aziendale
 
Vari applicativi in access su un disco di rete a cui accedono tutti.
Fino a poco tempo fa si potevano aprire regolarmente con un doppio clic 
sul collegamento corrispondente che ognuno aveva sul desktop ... mentre 
da un po' di tempo ci riesce solo il primo della giornata.
Gli altri per aprirlo sono obbligati ad aprire prima access e poi l'mdb 
o mde in questione.
 
Da cosa dipende?
 
Su una macchina ho trovato uno che invece riesce ad aprirli regolarmente 
... ma da un po' di confronti non sono riuscito a capire che diversa 
impostazione ha. Comunque è possibile trovare una soluzione!!
 
Credo possa dipendere da qualche impostazione che è stata messa di 
default forse quando hanno iniziato ad installare open office ...
Ovviamente ho presentato il problema ma nessuno per ora ha trovato una 
risposta.
 
Forse nel regedit c'è qualche impostazione da settare? Cosa e dove posso 
guardare per capire l'unica macchina che va che impostazioni ha?

Ho provato a confrontare le chiavi nel registro su due macchine
nell'
HKEY_CLASSES_ROOT
 
ho controllato la chiave .mdb ma il contenuto è esattamente identico.
Solo che una macchina apre il file con doppio clic mentre l'altra ha 
bisogno prima di aprire access e cercare il file da lì.
 
Questo solo se qualcunaltro ha già aperto quel file altrimenti tutto ok
 
Dai ... un'idea!!!!!
 


E lo fa solo con i file mdb e mde .... con i doc e gli xls mi segnala 
regolarmente che qualcuno lo ha aperto ma in sola lettura lo apre
 

 ...
 
Prova con il metodo che ho descritto qui:
 
http://groups.google.com/group/microsoft.public.it.office.access/msg/d706fc27a76b01c2
 
 
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 
 
 

 
http://groups.google.com/group/microsoft.public.it.office.access/msg/d706fc27a76b01c2
 
 
 
Sìììììììììììììììììììììììììììììììììììì!!!!!
GRAZIE!!!
 
Erano mesi che rompevo le scatole agli amministratori di rete ma nessuno 
ne veniva a capo.
 
Certo che non era facile capire che IE7 interferiva con access. Complimenti!
Newsgroup: it.comp.appl.access
Titolo: Passare array alla query da una funzione

ciao a tutti
 
con questo codice, vorrei passare
l'array alla query da una funzione:
 
Set ctl = LstSollDC
 
For Each varItm In ctl.ItemsSelected
  strItems = strItems & _
  ctl.Column(0, varItm) & ","
 
Next
 
strItems = Left$(strItems, Len(strItems) - 1)
 
strSql = "SELECT" _
  & " Fornitore," _
  & " uvEmail(0) AS InvioA," _
  & " uvEmail(1) AS InvioCC" _
  & " FROM Qry_TbFornitori" _
  & " WHERE UnisciValEmailFo(" & strItems & ")"
Set RsData = CurrentDb.OpenRecordset(strSql, dbOpenDynaset)
 
ma ho l'errore:
3085, Funzione 'uvEmail' non definita nell'espressione
mentre in altre situazioni non da problemi.
 
Questa è la funzione:
 
Public Function UnisciValEmailFo(MioCampo As Long) As Variant()
  Dim Rst As DAO.Recordset
  Dim UnisciValEmailFo_A As String, UnisciValEmailFo_CC As String
  Dim strSql As String
  Dim valori() As Variant
 
  UnisciValEmailFo_A = ""
  strSql = "SELECT * FROM TbEmailFornitori" _
    & " WHERE Invio_Carico<>0 And InvA<>0 And" _
    & " IdFornitore = " & MioCampo & " ORDER BY EmailFornitore;"
  Set Rst = CurrentDb().OpenRecordset(strSql)
 
  If Rst.EOF Then GoTo Fine
  Rst.MoveFirst
  Do Until Rst.EOF
    UnisciValEmailFo_A = UnisciValEmailFo_A & Rst!EmailFornitore & ";"
    Rst.MoveNext
  Loop
  UnisciValEmailFo_A = Left(UnisciValEmailFo_A, Len(UnisciValEmailFo_A) - 1)
 
  UnisciValEmailFo_CC = ""
  strSql = "SELECT * FROM TbEmailFornitori" _
    & " WHERE Invio_Carico<>0 And InvA=0 And" _
    & " IdFornitore = " & MioCampo & " ORDER BY EmailFornitore;"
  Set Rst = CurrentDb().OpenRecordset(strSql)
 
  If Rst.EOF Then GoTo Fine
  Rst.MoveFirst
  Do Until Rst.EOF
    UnisciValEmailFo_CC = UnisciValEmailFo_CC & Rst!EmailFornitore & ";"
    Rst.MoveNext
  Loop
  UnisciValEmailFo_CC = Left(UnisciValEmailFo_CC, Len(UnisciValEmailFo_CC) - 1)
 
Fine:
  valori = Array(UnisciValEmailFo_A, UnisciValEmailFo_CC)
  Set Rst = Nothing
  Let UnisciValEmailFo = valori()
 End Function
 
 
Grazie per l'aiuto


risolto senza passare l'array alla query

 risolto senza passare l'array alla query
 
Se ti dessimo suggerimento in questo modo dicendoti "si è fattibile"... risolveresti il problema...?
 
Racconta a chi legge la soluzione, è utile a tutti.
 
@Alex


ciao Alex hai ragione
 
ho fatto in questo modo:
 
Set ctl = LstSollDC 
 
For Each varItm In ctl.ItemsSelected
  strItems = ctl.Column(0, varItm) & ","
 
uvEmail = UnisciValEmailFo(Left$(strItems, Len(strItems) - 1))
InvioA = uvEmail(0)
InvioCC = uvEmail(1)
 
strFld = InvioA
strSubject = CboSollDC.Column(1)
strMsg = ""
strAttach = ""
strCC = InvioCC
strBCC = ""
 
SendingMailFromTable strFld, strSubject, strMsg, strAttach, strCC, strBCC
 
Next
Newsgroup: it.comp.appl.access
Titolo: condizione se

Salve a tutti,
il mio problema è il seguente in una maschera ho alcuni campi del tipo nome,
cognome indirizzo e voto io vorrei in un nuovo campo o casella di testo
comparisse quando il voto è al di sotto del 6 la parola insufficiente.
Questa operazione è possibile in una query?
Scusate la mia ignoranza e grazie a tutti
Daniele

 Se la maschera è a visualizzazione singola puoi inserire una casella di
testo non associata e sull'evento SuCorrente inserisci questo codice
If me!Voto<6 then
me!NuovaCasella.visible=true
me!nuovaCasella="insufficiente"
else
me!NuovaCasella.visible=false
end if
Se la maschera è continua è tutto molto più incasinato...:-)
C'è una soluzione su SitoComune, ma ci devi gabolare un pò
Paolo

 ha scritto nel messaggio
news:3beef37d$1...@news.opennet.it...

Io avevo trovato questa soluzione (forse un pò cervellotica e priva del
With)
Private Sub Voto_Exit(Cancel As Integer)
If Voto.Value < 6 Then
 Giudizio.SetFocus
 Giudizio.ForeColor = 255
 Giudizio.Text = "Insufficiente"
 Else
 Giudizio.SetFocus
 Giudizio.ForeColor = 0
 Giudizio.Text = "Sufficiente"
 End If
End Sub
 Però pensavo che a voto poteva essere messa un combo con i voti già belli e
pronti e dopo aver cliccato sul valore si poteva spostare automaticamente lo
stato attivo sulla casella Giudizio che prevedeva (con l'istruzione Select
Case) i diversi giudizi (ad esempio insufficiente, suff., buono, ecc.).
Saluti. Giuseppe.

 Questa operazione è possibile in una query?
In una query preparerai un campo calcolato scritto esattamente nello stesso
modo
iif([campovoto]<6;"Insufficiente";"Sufficiente")
Antonio

Newsgroup: it.comp.appl.access
Titolo: Testare campo data/ora a 0

Salve a tutti
Ho la necessita' di testare in una condizione where se un certo campo in una
tabella che e' in formato data/ora risulta a zero.
Il valore che io vedo in tabella e' questo "0.00.00" , ho provato vari
metodi es:
where nomeCampo  =  #12:00:00 AM#
where nomeCampo  =  #0.00.00#
where nomeCampo  =  0
where nomeCampo  =  variabile (settata in precedenza a zero)
ma sistematicamente viene ignorato il campo.
Avete suggerimenti ?
Grazie

 ha scritto nel messaggio 
news:LwnId.742149$35.29...@news4.tin.it...

Per esempio:
SELECT CONSEGNE.*
FROM CONSEGNE
WHERE (((CONSEGNE.DATAM) Is Null));
questo quando è null
questo quando è 0.00.00:
SELECT CONSEGNE.*
FROM CONSEGNE
WHERE ((([TuaDatOra])=0));
Ciao, Carlo