title: Problema creazione di un report

text:
On May 13, 8:01 am, almorel <
almo...@gmail.com
> wrote:
> On May 12, 8:02 pm,
domy1...@gmail.com
 (Domy73) wrote:
>
>
>
>
>
> > Dunque è da un po di giorni che non so come devo fare ad uscirne da sto
> > problema, vi spiego:
>
> > ho una tabella da cui ho estrapolato 22 query così tante quanti i
> > risultati che mi sono stati richiesti (....uff !!!!)  da cui ne ho fatti
> > altrettanti report,...fin qui bene...,diciamo così,
>
> > ma il mio capo vorrebbe tutti risultati su un unico report, ....,
> > giustamente
>
> > non so come uscirne, addirittura avevo pensato di crearmi una maschera NON
> > ASSOCIATA, ed inserire varie textbox NON ASSOCIATE dove avrei dovuto
> > visualizzare i dati presenti nei report, per esempio :
>
> > nella text "Data" inserisco l'anno di riferimento e nella text "NrVerbali"
> > avrei visualizare il dato relativo proveniente dal report "rp_Verbali",
> > per esempio scrivendo in "NrVerbali" così:
>
> > =reports!rp_Verbali!NrVerbali
>
> > ma ovviamente mi da errore
>
> > Qualcuno può indicarmi una strada??????
> > Grazie
>
> > --
>
> > questo articolo e` stato inviato via web dal servizio gratuitohttp://
www.newsland.it/newssegnalagli
 abusi ad
ab...@newsland.it
>
> Ciao Domy,
> in un caso analogo (dove i campi delle query erano compatibili) ho
> scaricato le query in una tabella di appoggio che poi usato come
> sorgente dei dati per il report.
> Alberto
PS - scusa, dimenticavo, ovviamente bisogna marcare i record delle 22
query per poterli identificare ed utilizzare nel report.
Ripeto, questa ipotesi di approccio vale solo se le 22 query sono
uguali o compatibili.
Alberto


title: Problema creazione di un report

text:
almorel ha scritto:
> On May 13, 8:01�am, almorel <
almo...@gmail.com
> wrote:
> > On May 12, 8:02�pm,
domy1...@gmail.com
 (Domy73) wrote:
> >
> >
> >
> >
> >
> > > Dunque � da un po di giorni che non so come devo fare ad uscirne da sto
> > > problema, vi spiego:
> >
> > > ho una tabella da cui ho estrapolato 22 query cos� tante quanti i
> > > risultati che mi sono stati richiesti (....uff !!!!) �da cui ne ho fatti
> > > altrettanti report,...fin qui bene...,diciamo cos�,
> >
> > > ma il mio capo vorrebbe tutti risultati su un unico report, ....,
> > > giustamente
> >
> > > non so come uscirne, addirittura avevo pensato di crearmi una maschera
NON
> > > ASSOCIATA, ed inserire varie textbox NON ASSOCIATE dove avrei dovuto
> > > visualizzare i dati presenti nei report, per esempio :
> >
> > > nella text "Data" inserisco l'anno di riferimento e nella text
"NrVerbali"
> > > avrei visualizare il dato relativo proveniente dal report "rp_Verbali",
> > > per esempio scrivendo in "NrVerbali" cos�:
> >
> > > =reports!rp_Verbali!NrVerbali
> >
> > > ma ovviamente mi da errore
> >
> > > Qualcuno pu� indicarmi una strada??????
> > > Grazie
> >
> > > --
> >
> > > questo articolo e` stato inviato via web dal servizio
gratuitohttp://
www.newsland.it/newssegnalagli
 abusi ad
ab...@newsland.it
> >
> > Ciao Domy,
> > in un caso analogo (dove i campi delle query erano compatibili) ho
> > scaricato le query in una tabella di appoggio che poi usato come
> > sorgente dei dati per il report.
> > Alberto
> PS - scusa, dimenticavo, ovviamente bisogna marcare i record delle 22
> query per poterli identificare ed utilizzare nel report.
> Ripeto, questa ipotesi di approccio vale solo se le 22 query sono
> uguali o compatibili.
> Alberto
Ciao e grazie per la risposta,
Dunque se non ho capito male dovrei creare una Tabella di Appoggio dove in:
Campo1 ---> devo avere il risultato del Campo1 della query1
Campo2 ---> devo avere il risultato del Campo2 della query2
Campo3 ---> devo avere il risultato del Campo3 della query3
Campo4 ---> devo avere il risultato del Campo4 della query4
.................................................
Campo22 ---> devo avere il risultato del Campo22 della query22
Saresti cos� gentile da dirmi come faccio scrivere nel campo1 della
tabella appoggio il risultato del Campo1 della Query1 eccc.....???????
PS.Le 22 query sono identiche (provengono dalla stessa tabella) eccetto il
fatto che ciascuna di esse � filtrata su un campo differente.
grazieeeeeeeeeee
--



title: Problema creazione di un report

author: newsmino

text:
Domy73 ha scritto:
> almorel ha scritto:






> grazieeeeeeeeeee
il sistem api� semplice � quello che ti ha indicato BPS
crei un report vuoto e ci inserisci tutti i report che vuoi
ciao



title: Problema creazione di un report

text:
newsmino ha scritto:
> Domy73 ha scritto:
> > almorel ha scritto:






> > grazieeeeeeeeeee


> ciao
Ok prover� anche questa alternativa, grazie



title: Variabile come Condizione nel recordeset

author: MA

text:
Salve a tutti,
in Dao se apro questo rst senza il where non ho problemi, appena inserisco
quel maledetto mi dici che i parametri sono insufficienti e caccia l'errore
3061
str = "SELECT prestazione.*, Assistito.Usl, prestazione.data_spedizione,
Assistito.cognome, Assistito.nome " _
       & "FROM prestazione LEFT JOIN Assistito ON prestazione.assistito =
Assistito.id_assistito " _
       & "where ((prestazione.mese) =   Forms!menu!testo27  " _
     & "ORDER BY Assistito.Usl, prestazione.data_spedizione,
Assistito.cognome, Assistito.nome"
Il NG è l'ultima mia spiaggia prima della neuro
Grazie MAssimiliano


author: Sergio MAZZA

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:qn0Cb.15428$i_5....@news.edisontel.com...
> Salve a tutti,
> in Dao se apro questo rst senza il where non ho problemi, appena inserisco
> quel maledetto mi dici che i parametri sono insufficienti e caccia
l'errore
> 3061
>
> str = "SELECT prestazione.*, Assistito.Usl, prestazione.data_spedizione,
> Assistito.cognome, Assistito.nome " _
>        & "FROM prestazione LEFT JOIN Assistito ON prestazione.assistito =
> Assistito.id_assistito " _
>        & "where ((prestazione.mese) =   Forms!menu!testo27  " _
>      & "ORDER BY Assistito.Usl, prestazione.data_spedizione,
> Assistito.cognome, Assistito.nome"
>
> Il NG č l'ultima mia spiaggia prima della neuro
> Grazie MAssimiliano
& "where ((prestazione.mese) = " & Forms!menu!testo27 & " _
Ciao.
--
Sergio MAZZA


text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:bra402$qhe$1...@canarie.caspur.it...

3075 operatore mancante.
Ma come l'operatore, cioč io!!!, ci sto! ;-P L'ho detto che sono quasi-neuro
Cosě c'avevo provato.
MAssimiliano


text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:Jz0Cb.15434$i_5....@news.edisontel.com...
> 3075 operatore mancante.
> Ma come l'operatore, cioè io!!!, ci sto! ;-P L'ho detto che sono
quasi-neuro
> Così c'avevo provato.
> MAssimiliano
Ma Forms!menu!testo27 non è la stessa form dove risiede il codice vba?
Prova a spezzare in tre la stringa utilizzando le variabili e a vedere nel
debug il risultato finale.
str1 = "SELECT prestazione.*, Assistito.Usl, prestazione.data_spedizione,
Assistito.cognome, Assistito.nome "
str2 = "FROM prestazione LEFT JOIN Assistito ON prestazione.assistito =
Assistito.id_assistito"
str3 = " where (prestazione.mese) = " & Forms!menu!testo27 (forse
Me!testo27?)
str4 = " ORDER BY Assistito.Usl, prestazione.data_spedizione,
Assistito.cognome, Assistito.nome"
ma poi prestazione.mese è un testo o numerico?
Ciao.
P.S. Troppi babà!!!
--
Sergio MAZZA


text:
> > 3075 operatore mancante.
> > Ma come l'operatore, cioè io!!!, ci sto! ;-P L'ho detto che sono
> quasi-neuro
> > Così c'avevo provato.
> > MAssimiliano
>
> Ma Forms!menu!testo27 non è la stessa form dove risiede il codice vba?
>
> Prova a spezzare in tre la stringa utilizzando le variabili e a vedere nel
> debug il risultato finale.
>
> str1 = "SELECT prestazione.*, Assistito.Usl, prestazione.data_spedizione,
> Assistito.cognome, Assistito.nome "
> str2 = "FROM prestazione LEFT JOIN Assistito ON prestazione.assistito =
> Assistito.id_assistito"
> str3 = " where (prestazione.mese) = " & Forms!menu!testo27 (forse
> Me!testo27?)
> str4 = " ORDER BY Assistito.Usl, prestazione.data_spedizione,
> Assistito.cognome, Assistito.nome"
>
str = "SELECT prestazione.*, Assistito.Usl, prestazione.data_spedizione,
Assistito.cognome, Assistito.nome  "
str = str & "FROM prestazione LEFT JOIN Assistito ON prestazione.assistito =
Assistito.id_assistito "
str = str & " where (prestazione.mese) = " & Me.Testo27
str = str & " ORDER BY Assistito.Usl, prestazione.data_spedizione,
Assistito.cognome, Assistito.nome"
idem ut supra (per far contenta Adelisa)
> ma poi prestazione.mese è un testo o numerico?
testo
>
> Ciao.
> P.S. Troppi babà!!!
Loro non sanno cosa si sono persi. Next time è la volta della sfogliatella.
MAssimiliano


text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:V11Cb.15441$i_5....@news.edisontel.com...
> str = "SELECT prestazione.*, Assistito.Usl, prestazione.data_spedizione,
> Assistito.cognome, Assistito.nome  "
> str = str & "FROM prestazione LEFT JOIN Assistito ON prestazione.assistito
=
> Assistito.id_assistito "
> str = str & " where (prestazione.mese) = " & Me.Testo27
> str = str & " ORDER BY Assistito.Usl, prestazione.data_spedizione,
> Assistito.cognome, Assistito.nome"
> idem ut supra (per far contenta Adelisa)
Te la stai cercando vero??
> testo
Mannaggia li pescetti! Ma allora dovresti scrivere:
str = str & " where (prestazione.mese) = " & chr(34) & Me.Testo27 & chr(34)
> Loro non sanno cosa si sono persi. Next time è la volta della
sfogliatella.
SIIIIII!!!! SLURP!!!
> MAssimiliano
Ciao.
--
Sergio MAZZA


text:
> > str = "SELECT prestazione.*,
Assistito.Usl, prestazione.data_spedizione,
> > Assistito.cognome,
Assistito.nome  "
> > str = str & "FROM prestazione LEFT JOIN
Assistito ON prestazione.assistito
> =
> > Assistito.id_assistito
"
> > str = str & " where (prestazione.mese) = " &
Me.Testo27
> > str = str & " ORDER BY Assistito.Usl,
prestazione.data_spedizione,
> > Assistito.cognome,
Assistito.nome"
> > idem ut supra (per far contenta Adelisa)
>

> Te la stai cercando vero??
>
> > testo
>
>
Mannaggia li pescetti! Ma allora dovresti scrivere:
> str = str & "
where (prestazione.mese) = " & chr(34) & Me.Testo27 &
chr(34)
>
> > Loro non sanno cosa si sono persi. Next time è la
volta della
> sfogliatella.
>
> SIIIIII!!!! SLURP!!!
>

> > MAssimiliano
>
> Ciao.

Sergio, noi ci siamo conosciuti al raduno e ci
siamo scambiati attestati di stima.

Io poi ho portato il babà di
Scatirchio.

Poi ti ho promesso un tour per i migliori locali
dove si mangia bene quando vieni  a Napoli

Poi ti ho promesso le sfogliatelle di Attanasio (il
migliore a Napoli)

poi se tu avessi la visualizzazione in Html ti
accorgeresti che ho usato un carattere piccolo piccolo in segno di
mortificazione..

quindi io so che non ti arrabbierai.

L'avevo già fatto, il problema era un
altro.

E' che sto incasinato,
troppo.

Cmq grazie dell'attenzione riservatami, del resto
la strada è dura per diventare santo.

MAssimiliano


text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:NC1Cb.15454$i_5....@news.edisontel.com...
>
Sergio, noi ci siamo conosciuti al raduno e ci siamo scambiati attestati di
stima.
Io poi ho portato il babà di Scatirchio.
Poi ti ho promesso un tour per i migliori locali dove si mangia bene quando
vieni  a Napoli
Poi ti ho promesso le sfogliatelle di Attanasio (il migliore a Napoli)
poi se tu avessi la visualizzazione in Html ti accorgeresti che ho usato un
carattere piccolo piccolo in segno di mortificazione..
quindi io so che non ti arrabbierai.
L'avevo già fatto, il problema era un altro.
E' che sto incasinato, troppo.
Cmq grazie dell'attenzione riservatami, del resto la strada è dura per
diventare santo.
MAssimiliano
Risposta:
Noooo, vade retro visualizzazione html!!!
Quindi significa che non hai risolto e ci ho (ri)fatto una figuraccia???
Ciao.
--
Sergio MAZZA


text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:bra9et$s9r$1...@canarie.caspur.it...
> "MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
> news:NC1Cb.15454$i_5....@news.edisontel.com...
> >
>
> Sergio, noi ci siamo conosciuti al raduno e ci siamo scambiati attestati
di
> stima.
> Io poi ho portato il babà di Scatirchio.
> Poi ti ho promesso un tour per i migliori locali dove si mangia bene
quando
> vieni  a Napoli
> Poi ti ho promesso le sfogliatelle di Attanasio (il migliore a Napoli)
> poi se tu avessi la visualizzazione in Html ti accorgeresti che ho usato
un
> carattere piccolo piccolo in segno di mortificazione..
> quindi io so che non ti arrabbierai.
> L'avevo già fatto, il problema era un altro.
> E' che sto incasinato, troppo.
> Cmq grazie dell'attenzione riservatami, del resto la strada è dura per
> diventare santo.
> MAssimiliano
>
> Risposta:
> Noooo, vade retro visualizzazione html!!!
Lo so l'ho usata solo per farti capire quanto mi sentivo Fantozzi con
intrecciati tutti i "diti"...
>
> Quindi significa che non hai risolto e ci ho (ri)fatto una figuraccia???
No non non era questo, solo che già l'avevo adottata come soluzione ma il
problema era aliunde (vero Adelisia) e siccome che so' fuso non me ne ero
accorto.
Non è che c'hai un cervello di riserva??
In realtà mi piacerebbe avere quello di Biso... così poco usato,
praticamente nuovo.
A proposito ma che fine ha fatto?
Grazie ancora.
MAssimiliano


author: ALESSANDRO Baraldi

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:NC1Cb.15454$i_5....@news.edisontel.com...


E a me nulla........!
Certo MA che ancora col dubbio del chr(34) sulle variabili testo......!!!
Come minimo dovresti pagare una cena al NG che ti sopporta....!!!
;-)
Il prossimo Radmolti fatelo - di parte, sono spiacente di non aver
partecipato, tutte
le volte che leggo un 3D tuo mi fai sgolosare, e anche se non della mole di
Antonio
mi piace MAGNA' e BEVE......!
Saluti.
@ALex.


text:

E' un periodo che vado a 3 candele...
>
> Il prossimo Radmolti fatelo - di parte, sono spiacente di non aver
> partecipato,
la sede è stata scelta per venire incontro a Roberto. Eppoi più centrale di
Roma?
Almeno una telefonata... il numero ce l'avevi. L'ho dato a più persone ha
chiamato solo Maurizio Borrelli.
> tutte
> le volte che leggo un 3D tuo mi fai sgolosare, e anche se non della mole
di
> Antonio
> mi piace MAGNA' e BEVE......!
Solo? A me piace anche altro.
MAssimiliano


text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:US1Cb.15465$i_5....@news.edisontel.com...
> No non non era questo, solo che già l'avevo adottata come soluzione ma il
> problema era aliunde (vero Adelisia) e siccome che so' fuso non me ne ero
> accorto.
> Non è che c'hai un cervello di riserva??
Ah! Tu hai ancora la riserva? Io da quel dì che me la sono giocata...
> In realtà mi piacerebbe avere quello di Biso... così poco usato,
> praticamente nuovo.
Bastardoooo...
> A proposito ma che fine ha fatto?
Ma che ne so' magari sta studiano qualche impropero in latino...
> Grazie ancora.
E di che?



text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:bra9rv$3un$1...@lacerta.tiscalinet.it...
> Il prossimo Radmolti....
AH! AH! AH! AH! AH! AH! AH! AH! AH! AH! AH! AH!
> Saluti.
> @ALex.
Ciao.
--
Sergio MAZZA


text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:j12Cb.15475$i_5....@news.edisontel.com...
[CUT]
> >
> > Il prossimo Radmolti fatelo - di parte, sono spiacente di non aver
> > partecipato,
> la sede è stata scelta per venire incontro a Roberto. Eppoi più centrale
di
> Roma?
> Almeno una telefonata... il numero ce l'avevi. L'ho dato a più persone ha
> chiamato solo Maurizio Borrelli.
>
> > tutte
> > le volte che leggo un 3D tuo mi fai sgolosare, e anche se non della mole
> di
> > Antonio
Si hai ragione per la telefonata, ma è stato concomitante con il ricovero
della
mamma, e anche se non per urgenza non l'ho proprio pensato.....!
ROMA...... centrale si, ma per te 180Km, per me 600......., per Sergio
Antonio e Roberto poche decine......!
Ma il mio non era assolutamente un giudizio, solo una proposta per la
prossima
volta, se fosse possibile.........!!!
> > mi piace MAGNA' e BEVE......!
> Solo? A me piace anche altro.
> MAssimiliano
Cosa, il Computer....????
O le malefemmene...!
Ciao.
@Alex.


text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:braaiu$sjk$1...@canarie.caspur.it...
> "ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
> news:bra9rv$3un$1...@lacerta.tiscalinet.it...
>
> > Il prossimo Radmolti....
>
> AH! AH! AH! AH! AH! AH! AH! AH! AH! AH! AH! AH!
>
> Sergio MAZZA
Sono comico, mi è venuta spontanea, credo di poter andare a ZELIG,
magari ci trovo BISO che è un pò che non si sente...!
@Alex.


text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:brab3j$53k$1...@lacerta.tiscalinet.it...
>
> Sono comico, mi č venuta spontanea, credo di poter andare a ZELIG,
> magari ci trovo BISO che č un pň che non si sente...!
>
> @Alex.
No, li ci trovi Bis(i)o...
Ciao.
--
Sergio MAZZA


text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:brab9g$som$1...@canarie.caspur.it...
> "ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
> news:brab3j$53k$1...@lacerta.tiscalinet.it...
> >
> > Sono comico, mi è venuta spontanea, credo di poter andare a ZELIG,
> > magari ci trovo BISO che è un pò che non si sente...!
> >
> > @Alex.
>
> No, li ci trovi Bis(i)o...
>
> Ciao.
> Sergio MAZZA
Chi l'ha detto.............???????????
Se non si fa sentire sotto sotto qualche cosa c'è....!
@Alex.


text:

Il prossimo l'ho già promesso di nuovo a Roberto che sarà a Roma.
dai che 600 passano in fretta.
Cmq verrei anche se lo facessimo dalle tue parti.
Ci tengo molto a queste cose.
MAssimiliano


author: namor

text:
ALESSANDRO Baraldi ha scritto:
> "MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
> news:j12Cb.15475$i_5....@news.edisontel.com...
[CUT]
> ROMA...... centrale si, ma per te 180Km, per me 600......., per Sergio
> Antonio e Roberto poche decine......!
> Ma il mio non era assolutamente un giudizio, solo una proposta per la
> prossima volta, se fosse possibile.........!!!
Concordo! (per me Roma = 700 km)
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


text:
MA ha scritto:
[cut]
> str = "SELECT prestazione.*, Assistito.Usl, prestazione.data_spedizione,
> Assistito.cognome, Assistito.nome  "
> str = str & "FROM prestazione LEFT JOIN Assistito ON prestazione.assistito =
> Assistito.id_assistito "
> str = str & " where (prestazione.mese) = " & Me.Testo27
> str = str & " ORDER BY Assistito.Usl, prestazione.data_spedizione,
> Assistito.cognome, Assistito.nome"
> idem ut supra (per far contenta Adelisa)
Lo scopo del consiglio non era che forse spezzando la stringa funziona, ma
che essendo molto difficoltoso fare il debug direttamente sul codice che
compone la stringa della query, assegni la stringa ad una variabile e
quand'è pronta te la spari a video con msgbox o meglio con debug.print e
vai a vedere cos'è venuto fuori. Di solito si capisce subito dov'è il
problema, se manca uno spazio, un apice, ecc...
Dim SQL as string
SQL="SELECT ... ecc... ecc... ecc... " & _
    "FROM ... ecc... " & _
    "WHERE ... ecc... ;"
debug.print SQL
STOP 'vai a verificare nella finestra debug l'SQL risultante



title: Scelta dell'ultimo record

author: singer

text:
Premessa
ho due tabelle legate con una relazione uno-a-molti
nella prima ho i dati dei clienti e nella secondo le loro fattura in cui vi
è un campo data
Vorrei selezionare, in una query, solo i clienti e solo l'ultima fattura in
ordine cronologico.
Come faccio
Grazie!
Singer


title: Scelta dell'ultimo record

author: Ux

text:
singer wrote:

E se un cliente ha 2 fatture nello stesso giorno?
Devi specificare un ulteriore criterio di selezione tra le 2.
Se non hai questo problema potresti fare una query in cui raggruggi la
fatture per cliente e con Max(DataFattura).
In modo da avere una riga per ogni cliente fatta cosi'
CodCliente: 01234
UltimaFattura: 15/05/2005
A questo punto fai una query  sulle 2 tabelle + la query suddetta dove
quest'ultima collega il record con i dati del Cliente con il record
della sua ultima fattura.
Spero di essere stato abbastanza chiaro.
Ciao
Marco


title: Scelta dell'ultimo record

text:
"Ux" <Non.Te....@Senno.Mi.Spammi> ha scritto nel messaggio
news:zTMje.926448$b5.40...@news3.tin.it...

In realtà il mio era un esempio
per ogni cliente ci sarà un unico record con la data più alta ed io nella
query voglio visualizzare solo l'ultimo per ogni cliente
Ho provato la funzione max sulla data ma sembra non funzionare, cioè alcuni
record della tabella principale appaiono singolarmente altri invece si
presentano più volte


title: Scelta dell'ultimo record

text:
singer wrote:

Mah, non so, sei un po generico.
Una query come questa:
SELECT CodCli, Max(DtFatt) AS MaxDiDtFatt
FROM fatture
GROUP BY CodCli
ti da' l'ultima fatture di ogni cliente.
Se la salvi e, in un'altra query, la usi per collegare il cliente alla
sua ultima fattura dovrebbe funzionare.
Ciao
Marco


title: Scelta dell'ultimo record

text:
"Ux" <Non.Te....@Senno.Mi.Spammi> ha scritto nel messaggio
news:I9Wje.927840$b5.40...@news3.tin.it...

Scusami il mio campo data si chiama "periodo al"
come si concilia con la tua espressione AS MaxDiDtFatt
io ho fatto cosi
SELECT COGNOME, Max([Periodo al]) AS ??????t
> FROM qScadenzaNote GROUP BY COGNOME
mI SPIEGHI dopo as che ci va
Grazie


title: Scelta dell'ultimo record

text:
singer wrote:
> Scusami il mio campo data si chiama "periodo al"
> come si concilia con la tua espressione AS MaxDiDtFatt
>
> io ho fatto cosi
> SELECT COGNOME, Max([Periodo al]) AS ??????t
>
>>FROM qScadenzaNote GROUP BY COGNOME
>
>
> mI SPIEGHI dopo as che ci va
> Grazie
Ci puoi mettere quello che ti pare, puoi anche lasciare MaxDiDtFatt, ti
consiglio pero' di evitare spazi e caratteri strani.
Ciao
Marco


title: Scelta dell'ultimo record

text:
"Ux" <Non.Te....@Senno.Mi.Spammi> ha scritto nel messaggio
news:7HWje.927879$b5.40...@news3.tin.it...

Mi discpiace, ma non ci siamo. Mi appare una maschera di rischiesta "periodo
al", se ci metto una data qualsiasi, nella query generata mi raggruppa il
cogome e nel campo MaXdiDtFatt vi č la data che io ho inserito.
IO credo di non essermi spiegato felicemente.
Io averi bisogno di ottenere una query in cui vi sia la fattura con la data
piů alta per ogni cliente. Necessariamente mi deve apparire un solo cliente
ed una sola fattura.


title: Scelta dell'ultimo record

text:
singer wrote:
> "Ux" <Non.Te....@Senno.Mi.Spammi> ha scritto nel messaggio
> news:7HWje.927879$b5.40...@news3.tin.it...
>
>>singer wrote:
>>
>>
>>
>>>Scusami il mio campo data si chiama "periodo al"
>>>come si concilia con la tua espressione AS MaxDiDtFatt
>>>
>>>io ho fatto cosi
>>>SELECT COGNOME, Max([Periodo al]) AS ??????t
>>>
>>>>FROM qScadenzaNote GROUP BY COGNOME
>>>
>>>
>>>mI SPIEGHI dopo as che ci va
>>>Grazie
>>
>>Ci puoi mettere quello che ti pare, puoi anche lasciare MaxDiDtFatt, ti
>>consiglio pero' di evitare spazi e caratteri strani.
>>
>>Ciao
>>Marco
>>
>
>
> Mi discpiace, ma non ci siamo. Mi appare una maschera di rischiesta "periodo
> al",
Significa che non trova il campo "periodo al" nella tabella qScadenzaNote.
Evidentemente non e' quello il nome del campo che contiene la data della
fattura.
> IO credo di non essermi spiegato felicemente.
>
> Io averi bisogno di ottenere una query in cui vi sia la fattura con la data
> più alta per ogni cliente. Necessariamente mi deve apparire un solo cliente
> ed una sola fattura.
Attento comunque che, come ti ho gia' detto, la query suddetta e' solo
un passaggio intermedio, non e' il risultato finale che tu vuoi.
Comunque intanto fai funzionare quella che forse ti chiarisce le idee e
ti da' qualche spunto.
Ciao
Marco


title: Scelta dell'ultimo record

text:
"Ux" <Non.Te....@Senno.Mi.Spammi> ha scritto nel messaggio
news:8v_je.928580$b5.40...@news3.tin.it...

Volevo ringraziarti e dirti che ho risolto.
In realtà ho impostato più formule sui campi delle query.
In un altro campo - che era il tipo di fattura - ho impostato la funzione
Ultimo che con la funzione MAx sul campo data mi dà il risultato che volevo


title: Contatore che non funziona

author: Catlory

text:
Grazie tante a Roberto per la risposta dell'altro giorno.Comunque non
ho ancora risolto il problema della numerazione progressiva delle
fatture che va in una maschera ma non nelle altre 2.Il dubbio che mi
viene e che sia il modo con cui vengono create:prendo i dati dalla
commessa,creo una nuova fattura col recordset e poi visualizzo il
risultato prendendo l'ID appena creato.come posso fare per fargli
aggiornare anche il numeratore da codice?grazie.


title: Help

author: Mauro Maratta

text:
Per qualche strano motivo, durante l'inserimento dei dati, si è verificato
un errore interno.
Da quel momento non è stato + possibile aprire il database (Access 97).
Viene segnalato un errore tipo : manca l'indice corrente oppure l'indice "
non è un indice corrente
per l'oggetto tabledef (quale?).
Morale i dati sono inaccessibili, non si può ripristinare ne compattare
l'archivio, non si può convertire
in Access 2000 (alcuni megabyte di dati persi?).
Esisterà una qualche utility esterna o no? (Visdata non serve a niente).
Ditemi qualcosa ...
Mauro Maratta.


title: Help

author: CarloCos

text:
"Mauro Maratta" <
ma...@tin.it
> ha scritto nel messaggio
news:%_Ni7.36920$vC1.4...@news1.tin.it...

Con un problema analogo ho risolto semplicemente facendo lo scandisk del
disco.
Buona fortuna.
Ciao, Carlo


title: Help

author: Silvio Berruti

text:
"Mauro Maratta" <
ma...@tin.it
> ha scritto nel messaggio
news:%_Ni7.36920$vC1.4...@news1.tin.it...

Tira fuori la copia di backup!
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


title: Bloccare il pc fino a quando è attiva un'applicazione

author: Eugenio

text:
Buongiorno!
Ho applicazione Access che esegue degli aggiornamenti della Rubrica
Personale.
Vorrei fare in modo che il pc non sia disponibile (Access e qualsiasi altra
applicazione del pc) fino a quando non č terminata la mia applicazione.
Esiste qualche istruzione che consenta di fare questo?
Grazie
Ciao
Eugenio


text:
"Eugenio" <Ci...@Eugenio.it> ha scritto nel messaggio
news:c6nqad$d19$1...@lacerta.tiscalinet.it...
> Buongiorno!
>
> Ho applicazione Access che esegue degli aggiornamenti della Rubrica
> Personale.
> Vorrei fare in modo che il pc non sia disponibile (Access e qualsiasi
altra
> applicazione del pc) fino a quando non è terminata la mia applicazione.
>
> Esiste qualche istruzione che consenta di fare questo?
>
> Grazie
> Ciao
> Eugenio
>
Già impostando il cursore a "clessidra" (metodo HourGlass) già precludi ogni
clic strano nell'area di access.
Se intendi proprio bloccare tutto il pc (che mi sembra un tantinello
eccessivo) non ne ho idea; a dire il vero sarebbe controproducente perché mi
verrebbe da pensare ad un bug dell'applicazione e se non riesco neanche con
CTRL-ALT-CANC a riprendere il controllo... Resetto!
Ciao.
--
Sergio MAZZA


text:
"Sergio MAZZA"  ha scritto nel messaggio >
> Già impostando il cursore a "clessidra" (metodo HourGlass) già precludi
ogni
> clic strano nell'area di access.
> Se intendi proprio bloccare tutto il pc (che mi sembra un tantinello
> eccessivo) non ne ho idea; a dire il vero sarebbe controproducente perché
mi
> verrebbe da pensare ad un bug dell'applicazione e se non riesco neanche
con
> CTRL-ALT-CANC a riprendere il controllo... Resetto!
>
> Ciao.
>
> --
> Sergio MAZZA
>
>
Basterebbe che fosse bloccato il programma per il quale la mia applicazione
è in esecuzione.
Nel particolare la mia applicazione aggiorna la rubbrica personale di
Outlook e vorrei che l'utente non utilizzasse Outlook fino a quando è
terminato l'aggiornamento della mia applicazione.
Grazie
Ciao
Eugenio


text:
"Eugenio" <Ci...@Eugenio.it> ha scritto nel messaggio
news:c6nun1$gqs$1...@lacerta.tiscalinet.it...
>
> Basterebbe che fosse bloccato il programma per il quale la mia
applicazione
> è in esecuzione.
> Nel particolare la mia applicazione aggiorna la rubbrica personale di
> Outlook e vorrei che l'utente non utilizzasse Outlook fino a quando è
> terminato l'aggiornamento della mia applicazione.
>
> Grazie
> Ciao
> Eugenio
>
E se Outlook è in esecuzione che fai glielo chiudi?
Una soluzione ci potrebbe essere, un po' macchinosa; bisogna vedere come è
strutturato il tuo "ambiente". Se parliamo di una rete locale o hai client
sparsi per l'Italia...
Ciao.
--
Sergio MAZZA


title: Visualizzazione sottomaschera

author: kismet

text:
Ciao a tutti,
ho questo piccolo problema: in una maschera chiamata Agenda ho inserito una
sottomaschera chiamata Appuntamenti. Quest'ultima è già presente nel
database sotto forma di maschera continua, ma io vorrei che in Agenda mi
comparisse in modalità elenco. E' possibile avere due diverse
visualizzazioni a seconda che la maschera appuntamenti venga richiamata come
sengola oppure come sottomaschera??????
Spero di essermi spiegato...
ciao e grazie a tutti
kismet


title: Visualizzazione sottomaschera

author: Carlo Costarella

text:
"kismet" <
dk...@tin.it
> ha scritto nel messaggio
news:adl8q1$u47$1...@lacerta.tiscalinet.it...

Il tipo di visualizzazione si setta dalla maschera in modo struttura, quindi
non è possibile a runtime.
La soluzione e quella di creare due sottomaschere uguali: una fogilo dati e
l'altra maschere continue.
Le metti entrambe nella maschera principale e, secondo le tue esigenze,
rendi visibile l'una o l'altra.
Ciao, Carlo


title: Automatizzare un Database

author: Andrea

text:
Salute a tutti,
ho bisogno di automatizzare un database access..
Il database deve lancare solo una macro al suo inteno la quale poi eseguirą
il resto....
la macro funziona ma non trovo il modo di lanciare la macro in automatico
senza tutte le volte aprire il database e lanciarla...visto che l'unica
opzione di avvio č per le maschere...ho creato una maschera con l'evento che
sull'apertura mi esegua la macro in automatico e nella macro alla fine ho
inserito il comando di chiudi maschera e chiudi database....
allora: se questo lo faccio a mano.... ovvero apro il database e poi lancio
la maschera tutto funziona
ma se metto in automatico nell'avvio la maschera all'uscita windows mi da un
errore.....
per farla breve: come posso schedulizzare l'avvio di una macro senza tenere
aperto il database?
Grazie mille a chi mi aiuterą!


title: Automatizzare un Database

author: Paolo opg

text:
"Andrea" <
and...@wildland.it
> wrote in
news:bn6abd$9qg$
1...@fata.cs.interbusiness.it
:
[cut]>
> per farla breve: come posso schedulizzare l'avvio di una macro senza
> tenere aperto il database?
> Grazie mille a chi mi aiuterą!
>
>
>
...
prova a creare una macro e chiamala autoexec...
--
+-------
| Paolo opg
|
| janickg ( at ) hotmail ( dot ) com
+-------


title: Automatizzare un Database

author: Enrico T.S.

text:
"Andrea" <
and...@wildland.it
> ha scritto nel messaggio
news:bn6abd$9qg$1...@fata.cs.interbusiness.it...

Puoi lanciare una macro del tuo db anche da riga di comando
usando l'opzione /x nomemacro
es.:  "c:\programmi\microsoft office\office\msaccess.exe"  PROVA.MDB  /x
"MACRO1"
bye :o))
P.s. mai manuale e' piu' esaudiente dell' F1 di m$oft.


title: Passaggio query(sql) a controllo

author: Nao

text:
E' possibile passare in qualche maniera il cosice sql di una query ad un
controllo combobox usando
Al click di un bottone
    dim sql as string
    sql="SELECT Corrieri.IDCorriere, Corrieri.NomeSocietà FROM Corrieri
WHERE (((Corrieri.NomeSocietà)="Speedy Express"));"
    combobox.rowsource=sql
Messo cosi, mi da problemi con le virgolette "", invece funziona se tolgo la
parte "Speedy Express", elimino il problema delle virgolete.
Esiste qualche sistema o tecnica particolare.
Grazie Nadir


title: Passaggio query(sql) a controllo

author: Giorgio Prx

text:
"Nao" <naon...@NOSPAMinwind.it> ha scritto nel messaggio
news:l9TXa.227752$Ny5.6...@twister2.libero.it...

Ciao  Nadir
o fai così
------------------------------------
    dim sql as string
    sql="SELECT Corrieri.IDCorriere, Corrieri.NomeSocietà FROM Corrieri
WHERE (((Corrieri.NomeSocietà)=""Speedy Express""));"
    combobox.rowsource=sql
------------------------------------
o così
-----------------------------------
    dim sql as string
    sql="SELECT Corrieri.IDCorriere, Corrieri.NomeSocietà FROM Corrieri
WHERE (((Corrieri.NomeSocietà)='Speedy Express'));"
    combobox.rowsource=sql
------------------------------------
Ciao Giorgio.


title: Passaggio query(sql) a controllo

text:
Thank you, very much
"Giorgio Prx" <
giorgio...@nospamtiscali.it
> ha scritto nel messaggio
news:bgovdv$g7k$1...@lacerta.tiscalinet.it...



title: negara autorizzazione

author: Roberta

text:
ciao a tutti,
  vi riespongo il mio problema che qualche mese fa non aveva ricevuto
risposte.
allora, io ho dei bellissimi db in access 2.0. in questi db, per
alcuni elaborati vengono create delle tabelle temporanee, il cui nome
(per facilitarne il riconoscimento) inizia sempre col carattere _.
ora in due db sono rimaste due di queste tabelle che io non riesco nè
a cancellare (dice "negata autorizzazione all'eliminazione di [nome
della tabella temporanea]"), nè ad aprirle per vedere cosa contiene
(dice "autorizzazione negata per [nome tabella]"), nè a vedere che
struttura ha, giusto per capire in che procedura viene creata (dice
"negata autorizzazione alla lettura di [nome tabella]").
in uno dei due db dove ho questo problema, sono andata in
Sicurezza -> Autorizzazioni, ho assegnato all'utente amministratore
tutte le autorizzazioni possibili, e dopo sono riuscita a cancellare
le due tabelle.
nell'altro facendo la stessa cosa, al momento dell'assegnazione dice
"l'utente non può modificare le autorizzazioni per [nome tabella]".
come posso fare?
ciao
Robby
p.s. io le lascerei anche lì dove sono, però cercando di cancellare
dei record da un'altra tabella mi dice che è impossibile perchè "..è
impiegato nella tabella d'appoggio [nome tabella]"


title: negara autorizzazione

author: Antonio Biso

text:
Roberta <
rob...@freemail.it
> wrote in message
95r8s9$1eb$1...@pinco.nettuno.it...
> ciao a tutti,
>   vi riespongo il mio problema che qualche mese fa non aveva ricevuto
> risposte.
> come posso fare?
Prova ad importare tutto tranne le due tabelle in un altro database vuoto.
Antonio


title: negara autorizzazione

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:JYgg6.9860$GM6.3...@news.infostrada.it...
> Prova ad importare tutto tranne le due tabelle in un altro database
vuoto.
>
> Antonio
speravo di non dover arrivare a questo, giusto perchč le tabelle
(comprese quelle allegate) sono circa 200, quindi tra importare tutto
in un db vuoto e ricreare le relazioni perderei una giornatina.
speravo in qualcosa di piů rapido...
comunque grazie
Roberta


title: negara autorizzazione

author: Luciano (DOC)

text:
Roberta ha scritto nel messaggio <95tkoi$8o8$
1...@pinco.nettuno.it
>...
>speravo di non dover arrivare a questo, giusto perchè le tabelle
>(comprese quelle allegate) sono circa 200, quindi tra importare tutto
>in un db vuoto e ricreare le relazioni perderei una giornatina.
E tu non lo fare a mano!:-)
Scrivi un funzioncina che copia tabelle (escluse quelle incriminate) e
relazioni. L'help e' tutto un fiorire di esempi in tal senso!:-)
Ovviamente ciclando sull'insieme tabledefs, non scrivendo tutt i nomi delle
tabelle.
Cerca: tabledef, tabledefs, gerarchia oggetti DAO, relazioni....
Saluti.
Luciano
(DOC)


title: negara autorizzazione

text:
"Luciano (DOC)" <
lucia...@sitocomune.com
> ha scritto nel messaggio
news:8sAg6.5267$gb1.2...@news4.aus1.giganews.com...
> Scrivi un funzioncina che copia tabelle (escluse quelle
incriminate) e
> relazioni.
questa potrebbe essere un'idea. ci proverò.
grazie
Robby


title: Stampa con Word da Access

author: Giorgio Conte

text:
Ho un modello di documento fatto con Word ed i dati li volevo generare
con access. Ho creato una tabella temporanea nella quale inserisco i
dati da stampare con Word.
In word ho pescato i dati tramite stampa unione.
Chiedo se e possibile usare qualche altra variabile per leggere i dati
da access (tipo il comando DATABASE,e la relativa sintassi per access),
e se e possibile stampare da access un file word in stampa unione
inserendo i comandi in un pulsante per rendere piu immediata la stampa.
Grazie.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Stampa con Word da Access

author: Sergio MAZZA

text:
"Giorgio Conte" <
plu...@libero.it
> ha scritto nel messaggio
news:cbfdc97c32468cb70f7...@mygate.mailgate.org...
> Ho un modello di documento fatto con Word ed i dati li volevo generare
> con access. Ho creato una tabella temporanea nella quale inserisco i
> dati da stampare con Word.
> In word ho pescato i dati tramite stampa unione.
> Chiedo se e possibile usare qualche altra variabile per leggere i dati
> da access (tipo il comando DATABASE,e la relativa sintassi per access),
> e se e possibile stampare da access un file word in stampa unione
> inserendo i comandi in un pulsante per rendere piu immediata la stampa.
> Grazie.
>
>
Vai sul sito comune (
www.sitocomune.com
) sezione General; c'č un esempio di
utilizzo del campo DATABASE...
Ciao.
--
Sergio MAZZA


title: Stampa con Word da Access

author: Marco Piretti

text:
Io ho usato questo metodo che funziona bene.
Saluti
Marco.
SUMMARY
Advanced: Requires expert coding, interoperability, and multiuser skills.
This article shows you how to merge the current record in a Microsoft Access
7.0 and 97 object into a Microsoft Word 97 document, print it, and then
close Microsoft Word 97.
This article assumes that you are familiar with Visual Basic for
Applications and with creating Microsoft Access applications using the
programming tools provided with Microsoft Access. For more information about
Visual Basic for Applications, please refer to your version of the "Building
Applications with Microsoft Access" manual.
MORE INFORMATION
Microsoft Word 97 uses the Visual Basic for Applications programming model
instead of the WordBasic flat command model used in earlier versions.
For information about how to send the current record to Microsoft Word
version 7.0 or earlier using WordBasic, please see the following article in
the Microsoft Knowledge Base:
Q124862 ACC: Sending the Current Record to Word with OLE Automation
The following example uses bookmarks in a Microsoft Word 97 document to mark
the locations where you want to place data from a record on a Microsoft
Access form.
Creating a Microsoft Word 97 Document
Start Microsoft Word 97 and create the following new document:
First Last
Address
City, Region, PostalCode
Dear Greeting,
Northwind Traders would like to thank you for
your employment during the past year. Below
you will find your photo. If this is not your
most current picture, please let us know.
Photo
Sincerely,
Northwind Traders
Create a bookmark in Microsoft Word 97 for the words "First," "Last,"
"Address," "City," "Region," "PostalCode," "Greeting," and "Photo":
Select the word "First."
On the Insert menu, click Bookmark.
In the Bookmark Name box, type "First," (without the quotation marks) and
then click Add.
Repeat steps 2a through 2c for each of the remaining words, substituting
that word for the word "First" in steps 2a and 2c.
Save the document as C:\My Documents\MyMerge.doc, and then quit Microsoft
Word 97.
Sending Data to Microsoft Word from a Microsoft Access Form
Start Microsoft Access and open the sample database Northwind.mdb.
Set a reference to the Microsoft Word 8.0 Object Library. To do so, follow
these steps:
Open any module in Design view.
On the Tools menu, click References.
Click Microsoft Word 8.0 Object Library in the Available References box. If
that selection does not appear, browse for Msword8.olb, which installs by
default in the C:\Program Files\Microsoft Office\Office folder.
Click OK.
Close the module.
Open the Employees form in Design view.
Add a command button to the form and set the following properties:
   Command Button:
      Name: MergeButton
      Caption: Send to Word
      OnClick: [Event Procedure]
Set the OnClick property of the command button to the following event
procedure.
NOTE: In the following sample code, you must remove the comment from one
line of code as indicated, depending on your version of Microsoft Access.
      Private Sub MergeButton_Click()
      On Error GoTo MergeButton_Err
         Dim objWord As Word.Application
         ' Copy the Photo control on the Employees form.
         DoCmd.GoToControl "Photo"
         ' Remove the following comment in Microsoft Access 97.
         ' DoCmd.RunCommand acCmdCopy
         ' Remove the following comment in Microsoft Access 7.0.
         ' DoCmd.DoMenuItem acFormBar, acEditMenu, acCopy, , acMenuVer70
         ' Start Microsoft Word 97.
         Set objWord = CreateObject("Word.Application")
         With objWord
            ' Make the application visible.
            .Visible = True
            ' Open the document.
            .Documents.Open ("c:\my documents\mymerge.doc")
            ' Move to each bookmark and insert text from the form.
            .ActiveDocument.Bookmarks("First").Select
            .Selection.Text = (CStr(Forms!Employees!FirstName))
            .ActiveDocument.Bookmarks("Last").Select
            .Selection.Text = (CStr(Forms!Employees!LastName))
            .ActiveDocument.Bookmarks("Address").Select
            .Selection.Text = (CStr(Forms!Employees!Address))
            .ActiveDocument.Bookmarks("City").Select
            .Selection.Text = (CStr(Forms!Employees!City))
            .ActiveDocument.Bookmarks("Region").Select
            .Selection.Text = (CStr(Forms!Employees!Region))
            .ActiveDocument.Bookmarks("PostalCode").Select
            .Selection.Text = (CStr(Forms!Employees!PostalCode))
            .ActiveDocument.Bookmarks("Greeting").Select
            .Selection.Text = (CStr(Forms!Employees!FirstName))
            ' Paste the photo.
            .ActiveDocument.Bookmarks("Photo").Select
            .Selection.Paste
         End With
         ' Print the document in the foreground so Microsoft Word 97
         ' will not close until the document finishes printing.
         objWord.ActiveDocument.PrintOut Background:=False
         ' Close the document without saving changes.
         objWord.ActiveDocument.Close SaveChanges:=wdDoNotSaveChanges
         ' Quit Microsoft Word 97 and release the object variable.
         objWord.Quit
         Set objWord = Nothing
         Exit Sub
      MergeButton_Err:
         ' If a field on the form is empty
         ' remove the bookmark text and continue.
         If Err.Number = 94 Then
            objWord.Selection.Text = ""
            Resume Next
         ' If the Photo field is empty.
         ElseIf Err.Number = 2046 Then
            MsgBox "Please add a photo to this record and try again."
         Else
            MsgBox Err.Number & vbCr & Err.Description
         End If
         Exit Sub
      End Sub
Save the Employees form and open it in Form view.
Click the Send To Word button to start Microsoft Word 97, merge data from
the current record on the form into MyMerge.doc, print the document, and
then close Microsoft Word 97.
NOTE: When you use this method of inserting text into a Word Document, you
are deleting the bookmark when you insert the record field content. If you
need to reference the text that you entered into the document, you must
bookmark it. You can use the following sample to add the bookmark "Last" to
the text inserted from record field "LastName."
  .ActiveDocument.Bookmarks("Last").Select
  .Selection.Text = (CStr(Forms!Employees!LastName))
  'add this line to reapply the bookmark name to the selection
  .ActiveDocument.Bookmarks.Add Name:="Last",Range:=Selection.Range
This macro could be used to simulate a mailmerge with Word that includes the
picture field from an Access record, by placing the above code in a
"For...Next", While...Wend, or "For...Each" Loop.
REFERENCES
For additional information about Automation theory and multiple examples on
automating all the Office 97 products, click the article number below to
view the article in the Microsoft Knowledge Base:
Q167223 OFF97: Microsoft Office 97 Automation Help File Available
For additional information about Automation between Microsoft Access 97 and
Microsoft Word, search the Help Index for "sharing data between
applications, Microsoft Word mail merge data."
For additional information about Automation between Microsoft Access 7.0 and
Microsoft Word, search the Help Index for "Word (Microsoft), sharing data."
For additional information about bookmarks, search the Microsoft Word 97
Help Index for "bookmarks," or ask the Microsoft Word 97 Office Assistant.
Additional query words:
Keywords : kbmacro kbole kbprg OffVBA word8 IntpOlea word95 vbappcode vbe
kbofficeprog
Version : WINDOWS:7.0,97
Platform : WINDOWS
Issue type : kbhowto
Technology :
Last Reviewed: May 10, 2000
© 2000 Microsoft Corporation. All rights reserved. Terms of Use.
"Giorgio Conte" <
plu...@libero.it
> ha scritto nel messaggio
news:cbfdc97c32468cb70f7...@mygate.mailgate.org...



title: cambiare stampante da macro in M.Outlook

text:
ciao a tutti

In Outlook vorrei cambiare da macro la stampante.
Ho provato con..

Dim objPrinter As Object
Const sStampante As String = "et- "     '<<==== Modifica

Set objPrinter = CreateObject("WScript.Network")
objPrinter.SetDefaultPrinter sStampante

ma nulla di fatto
grazie.


text:
Semplificati le cose non provando codice strano che poco si conosce, orientando lq eicerca sulla guida in linea che probabilmente è più standard...

https://docs.microsoft.com/en-us/office/vba/api/access.application.printer

https://docs.microsoft.com/en-us/office/vba/access/concepts/printing/work-with-form-and-report-printer-settings

Application.Printers(0) è la prima stampante della collection...

Quindi hai 2 metodi per stampare un Report selezionando la stampante che trovi documentati qui:

http://www.donkarl.com/it?FAQ5.1

@Alex


text:

grazie


title: Semplicemente grazie

author: Dwork

text:
Se adesso ho un applicativo che
esporta in csv senza le virgolette
fa una stampa unione in automatico su word
fa le copie di backup in automatico
compatta i db esterni
è grazie a tutte le cose che ho trovato qui, sul sito comune e su ng
access in inglese.
So che può sembrare ...melenso :D
ma visto che ho "sto" applicativo che per me era una rogna...ma ora
funziona...
mi sembrava giusto ringraziare gli artefici principali...
visto che io su queste cose mi sono limitata a copiare e adattare i
codici che qualcun altro ha pensato e scritto :D


title: Semplicemente grazie

text:
"Dwork" <
7046i...@mynewsgate.net
> ha scritto nel messaggio
news:200706051...@mynewsgate.net...
> Se adesso ho un applicativo che
> esporta in csv senza le virgolette
> fa una stampa unione in automatico su word
> fa le copie di backup in automatico
> compatta i db esterni
---omissis---
> visto che io su queste cose mi sono limitata a copiare e adattare i
> codici che qualcun altro ha pensato e scritto :D
Copiare e adattare; anche questo è un modo per imparare...
Ciao.
--
Sergio MAZZA


title: Semplicemente grazie

author: Access

text:
"Dwork" <
7046i...@mynewsgate.net
> ha scritto nel messaggio
news:200706051...@mynewsgate.net...
> Se adesso ho un applicativo che
> esporta in csv senza le virgolette
> fa una stampa unione in automatico su word
> fa le copie di backup in automatico
> compatta i db esterni
>
> č grazie a tutte le cose che ho trovato qui, sul sito comune e su ng
> access in inglese.
>
> So che puň sembrare ...melenso :D
> ma visto che ho "sto" applicativo che per me era una rogna...ma ora
> funziona...
> mi sembrava giusto ringraziare gli artefici principali...
>
> visto che io su queste cose mi sono limitata a copiare e adattare i
> codici che qualcun altro ha pensato e scritto :D
Mi associo hai ringraziamenti.
Ciao
Access


title: Form: ciclo if e valore ad un campo calcolato

author: Samantha Cicch

text:
Ciao A tutti,
scrivo perchè mi trovo incasinata in questa situazione:
in una maschera ho 2 campi calcolati, uno si chiama TOT_MATPRIME e un
altro dist_tot1.
vorrei fare un un confronto, se TOT_MATPRIME è > di dist_tot1 allora
prendi il valore ME!dist_valmarg  altrimenti Me!dist_valmargfissato
all'apertura della maschera ho inserito questa macro:
If Me!TOT_MATPRIME > Me!dist_tot1 Then
  Me!margine = Me!dist_valmarg
  Else: Me!margine = Me!dist_valmargfissato
End If
Forms!MSC_VIEWDIST!margine.Format = ("€ ##,##0.000000")
Ma non va, pare che si prenda il primo valore e basta.
Come devo fare? dove sbaglio?
Grazie mille
Samantha


text:
"Samantha Cicch" <
samanth...@gmail.com
> ha scritto nel messaggio
news:1170696949.8...@k78g2000cwa.googlegroups.com...
Ciao A tutti,
scrivo perchè mi trovo incasinata in questa situazione:
in una maschera ho 2 campi calcolati, uno si chiama TOT_MATPRIME e un
altro dist_tot1.
vorrei fare un un confronto, se TOT_MATPRIME è > di dist_tot1 allora
prendi il valore ME!dist_valmarg  altrimenti Me!dist_valmargfissato
all'apertura della maschera ho inserito questa macro:
If Me!TOT_MATPRIME > Me!dist_tot1 Then
  Me!margine = Me!dist_valmarg
  Else: Me!margine = Me!dist_valmargfissato
End If
Forms!MSC_VIEWDIST!margine.Format = ("? ##,##0.000000")
Ma non va, pare che si prenda il primo valore e basta.
Come devo fare? dove sbaglio?
Grazie mille
Samantha
------------------------------
A prima vista potrebbe essere che il campo calcolato non ha il tempo di
"calcolarsi" che già è partita l'altra istruzione.
Per vedere se è così fai tutto da codice, sia i campi calcolati che il
confronto, togliendo tutte le istruzioni dalla maschera delle proprietà del
controllo.
Per esempio su corrente:
Me.TOT_MATPRIME = il calcolo che vuoi
Me.dist_tot1 = il calcolo che vuoi
If Me!TOT_MATPRIME > Me!dist_tot1 Then...
In aggiunta verifica che il controllo che "non prende il valore" sia vuoto
nella proprietà "Origine controllo".
Ciao, Carlo


text:
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:eq966i$p49$1...@tdi.cu.mi.it...
>
> "Samantha Cicch" <
samanth...@gmail.com
> ha scritto nel messaggio
> news:1170696949.8...@k78g2000cwa.googlegroups.com...
> Ciao, Carlo
Ti ci sei svegliato alle 7 per rispondere a SHamHantHaH eh?
Antonio


text:
"Antonio Biso" <ch...@NOSPAMetruria.net> ha scritto nel messaggio
news:ypZxh.176$BP5....@twister2.libero.it...

Ciao grande Biso!
Stamane alle 6 e 10 facevo colazione, sic!
Ci manca molto la tua presenza.
Ti leggo spesso in un post a proposito di una query...ma poi poco e niente.
Un abbraccio, Carlo


text:
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:eq9tam$l9r$1...@tdi.cu.mi.it...

Anzi, in questo periodo sto scrivendo un po' di più...
Antonio


text:
On 6 Feb, 12:13, "Antonio Biso" <c...@NOSPAMetruria.net> wrote:
> "Carlo Costarella" <
carlocoslib...@libero.it
> ha scritto nel messaggionews:eq966i$p49$1...@tdi.cu.mi.it...
>
>
>
> > "Samantha Cicch" <
samantha.ci...@gmail.com
> ha scritto nel messaggio
> >news:1170696949.8...@k78g2000cwa.googlegroups.com...
> > Ciao, Carlo
>
> Ti ci sei svegliato alle 7 per rispondere a SHamHantHaH eh?
>
> Antonio
Ciao,
il prete del mio paese, mi prende in giro dicendo SamantHA con l'acca
sospirata....
tutti gli altri invece pensano sempre a Samantha FOX.... il prete
invece questo non sarebbe tanto carino che lo dicesse ... ;) ,
Cmq grazie a Carlo x la risposta, ho fatto un altro test e sono giunta
alla conclusione, che:
TOT_MATPRIME =(Form!sm_CostiArticoli!totcstarticolo)
dist_tot1 -> è un valore memorizzato in tabella
Perciò, se gli dico:
Private Sub Form_Current()
If Me!TOT_MATPRIME > Me!dist_tot1 Then
  MsgBox "Acquisti più alto è" & Me!TOT_MATPRIME
   Else:  MsgBox "Acquisti più alto è" & Me!dist_tot1
  End If
Forms!MSC_VIEWDIST!margine.Format = ("€ ##,##0.000000")
End Sub
Lui mi dice sempre che dist_tot1 è maggiore di Tot_matprime, anche se
uno vale 10 e l'altro 100
Detto questo, ho inserito il comando come macro nell'evento della
maschera su corrente... ma non va,
ho inserito un intervallo di timer pari a 3 e su timer ho registrato
l'evento, ma quando sono in visualizzazione maschera mi si è impallato
tutto, non riuscivo neppure a chiudere la form perchè continuava a
presentarsi il msgbox, per fortuna avevo fatto una copia di backup
prima di questa malsana prova.
Come posso fare per automatizzare l'attività? Mi scoccierebbe mettere
un pulsante... Cosa mi consigli?
p.s.: l'origine del controllo Margine non è associato.
Grazie mille in anticipo e buona giornata,
Samantha Cicchelero
Private Sub Form_Current()
If Me!TOT_MATPRIME > Me!dist_tot1 Then
  MsgBox "Acquisti più alto è" & Me!TOT_MATPRIME
   Else:  MsgBox "Acquisti più alto è" & Me!dist_tot1
  End If
Forms!MSC_VIEWDIST!margine.Format = ("€ ##,##0.000000")
End Sub


text:

Ciao Carlo,
ho appena trovato un tuo messaggio del 2003,
http://groups.google.it/
group/it.comp.appl.access/browse_frm/thread/7ab72cdf847066ec/
cae9f2ab168ea0a8?lnk=gst&q=if%2Bcampi%2Bcalcolati
%2Bevento&rnum=1#cae9f2ab168ea0a8
vedo se riesco quindi a fare il calcolo dentro la macro, ora provo e
poi vi farò sapere.
Ciao,
Samantha


text:

> ho appena trovato un tuo messaggio del 2003,
http://groups.google.it/
> group/it.comp.appl.access/browse_frm/thread/7ab72cdf847066ec/
> cae9f2ab168ea0a8?lnk=gst&q=if%2Bcampi%2Bcalcolati
> %2Bevento&rnum=1#cae9f2ab168ea0a8
> vedo se riesco quindi a fare il calcolo dentro la macro, ora provo e
> poi vi farò sapere.
>
> Ciao,
> Samantha
Ciao,
non riesco ad andarne fuori.
Come devo fare con DSUM per fargli calcolare il valore?
Ho guardato l'help, ma ho poca esperienza in VBA, dunque io volevo
fare così:
DSUM("cstarticolo","q_smCostiArticoli" ...
Dove cstarticolo è un campo calcolato dentro la query
q_smcostiarticoli, che è il dominio.... manca però il criterio, ossia
dist_id,
ecco la query q_smcostiarticoli:
SELECT TBL_DART.dart_id, TBL_DART.dart_artid, TBL_ART.art_desc,
TBL_ART.art_coeff, TBL_ART.art_diam, TBL_ART.art_spes,
TBL_ART.art_costo€, TBL_ARTUM.artum_desc, TBL_CSTMP.cstmp_id,
TBL_CSTMP.cstmp_mpid, TBL_MP.mp_desc, TBL_MP.mp_id, TBL_UM.um_desc,
TBL_CSTMP.cstmp_costo, TBL_CSTMP.cstmp_perc, TBL_CSTMP.cstmp_data AS
TBL_CSTMP_cstmp_data, TBL_DIST.dist_id, TBL_DIST.cstmp_data AS
TBL_DIST_cstmp_data, TBL_DART.dart_distid, TBL_DART.dart_qta,
(([cstmp_costo]*[cstmp_perc])+[cstmp_costo]) AS cstmpbase, ([cstmpbase]
+[art_costo€]) AS cstartbase, (([cstartbase]*[art_coeff])) AS
cstartmm, ([cstartmm]*[dart_qta]) AS cstarticolo
FROM TBL_MP AS TBL_MP_1, TBL_ARTUM INNER JOIN ((TBL_UM INNER JOIN
((TBL_MP INNER JOIN (TBL_CSTMP INNER JOIN TBL_DIST ON
TBL_CSTMP.cstmp_data = TBL_DIST.cstmp_data) ON TBL_MP.mp_id =
TBL_CSTMP.cstmp_mpid) INNER JOIN TBL_ART ON TBL_MP.mp_id =
TBL_ART.art_mpid) ON TBL_UM.um_id = TBL_MP.mp_umid) INNER JOIN
TBL_DART ON (TBL_DIST.dist_id = TBL_DART.dart_distid) AND
(TBL_ART.art_id = TBL_DART.dart_artid)) ON TBL_ARTUM.artum_id =
TBL_ART.art_artumid
ORDER BY TBL_DIST.dist_id, TBL_DART.dart_distid;
e qui mi perdo, non so come dirgli il criterio,
allora ho pensato di fare riferimento al campo calcolato dentro la
maschera, ossia
TotCstArticolo =Somma([cstarticolo])
Private Sub Form_Current()
Forms!Msc_ViewDist.Form![Analisi Costi].TOT_MATPRIME = (Forms!
Msc_ViewDist!sm_CostiArticoli.Form!TotCstArticolo)
If Me!TOT_MATPRIME > Me!dist_tot1 Then
  MsgBox "Acquisti più alto è" & Me!TOT_MATPRIME
   Else:  MsgBox "Acquisti più alto è" & Me!dist_tot1
  End If
End Sub
Ma mi da errore di runtime 438, ho guardato in google, ma sembra sia
un errore di libreria... non credo probabilmente ho sbagliato io
qualche cosa, ma non so cosa...
Help
Grazie
Samantha


text:

Ci riprovo
la maschera si chiama MSC_VIEWDIST, contiene una struttura a schede
TabCtl12, con 5 schede. In 4 ho delle sottomaschere (clienti,
articoli, lavorazioni, costivari) la 5 scheda ANALISI è un riepilogo
costi, dove convergono le somme degli articoli
(TOT_MATPRIME =(Form!sm_CostiArticoli!totcstarticolo)
(DIST_CSTLAVO=(Form!smDlavo!TotcstLavo), lavorazioni
DIST_CSTVARI =(Form!smDCstvari!SumDcstVariCosto)
Aall'apertura della maschera MSC_VIEWDIST  esegue le seguenti macro:
Private Sub Form_Open(Cancel As Integer)
Forms!MSC_VIEWDIST!MSC_CLIENTE.SetFocus
Forms!MSC_VIEWDIST!MSC_CLIENTE.Requery
Forms!MSC_VIEWDIST!sm_CostiArticoli.SetFocus
Forms!MSC_VIEWDIST!sm_CostiArticoli.Requery
Forms!MSC_VIEWDIST!smDlavo.SetFocus
Forms!MSC_VIEWDIST!smDlavo.Requery
Forms!MSC_VIEWDIST!smDCSTVARI.SetFocus
Forms!MSC_VIEWDIST!smDCSTVARI.Requery
Me.Controls("TabCtl12").Value = 4
End Sub
Il campo TOT_MATPRIME e dist_tot1 si trovano nella struttura a schede
Tabctl12.Analisi
Come faccio a riferirmi al campo che si trova in quella posizione?
Grazie,
Samantha


text:
"Samantha Cicch" <
samanth...@gmail.com
> ha scritto nel messaggio
news:1170771859....@s48g2000cws.googlegroups.com...
On 6 Feb, 12:13, "Antonio Biso" <c...@NOSPAMetruria.net> wrote:
> "Carlo Costarella" <
carlocoslib...@libero.it
> ha scritto nel
messaggionews:eq966i$p49$1...@tdi.cu.mi.it...
>
>
>
> > "Samantha Cicch" <
samantha.ci...@gmail.com
> ha scritto nel messaggio
> >news:1170696949.8...@k78g2000cwa.googlegroups.com...
> > Ciao, Carlo
>
> Ti ci sei svegliato alle 7 per rispondere a SHamHantHaH eh?
>
> Antonio
Ciao,
il prete del mio paese, mi prende in giro dicendo SamantHA con l'acca
sospirata....
tutti gli altri invece pensano sempre a Samantha FOX.... il prete
invece questo non sarebbe tanto carino che lo dicesse ... ;) ,
Vuoi dire che c'assomigli pure a Samantah Fox?!!?
Uhm.... interessante
Carlo, ci penso io se vuoi eh?
Per quel criterio, hai visto sull'help la sintassi della DSum?
Antonio


text:
On 6 Feb, 17:12, "Antonio Biso" <c...@NOSPAMetruria.net> wrote:
> "Samantha Cicch" <
samantha.ci...@gmail.com
> ha scritto nel messaggionews:1170771859....@s48g2000cws.googlegroups.com...

Ciao Antonio,
per mia fortuna non ciassomiglio a Samantha Fox (non aveva gli occhi
storti???? ) o forse la confondo con la Sabrina  Salerno... ero troppo
piccola all'epoca... sono del 79, cmq,
dunque per DSUM("cstarticolo","q_smCostiArticoli", CRITERI
ora, i criteri, se io guardo le proprietà della sottomaschera
smCostiArticoli i campi collegati sono dart_distid = dist_id
Quindi:
Me!TOT_MATPRIME = DSum("cstarticolo", "q_smCostiArticoli",
"[dart_distid]" = "[dist_id]")
Ma mi fornisce l'errore:
errore di runtime 2448, impossibile assegnare un  valore all'oggetto
questa è la macro
Private Sub Form_Current()
Me!TOT_MATPRIME = DSum("cstarticolo", "q_smCostiArticoli",
"[dart_distid]" = "[dist_id]")
MsgBox Me!TOT_MATPRIME
If Me!TOT_MATPRIME > Me!dist_tot1 Then
  MsgBox "Acquisti più alto è" & Me!TOT_MATPRIME
   Else:  MsgBox "Acquisti più alto è" & Me!dist_tot1
  End If
End Sub
Ho provato anche a fare così
MsgBox Forms!MSC_VIEWDIST![Analisi]!TOT_MATPRIME
Dove Analisi è la scheda nr. 4 del controllo a schede TabCtl12, ma lui
lo vede come un campo.
In sostanza, io devo trovare il modo, che una volta aperta la form e
caricati i valori dei campi calcolati, possa confrontarli... ma
tempesticamente (si dice così?) parlando non riesco a farlo... i campi
calcolati si caricano dopo.
Hai qualche suggerimento?
Grazie
Samantha


text:
On 6 Feb, 17:12, "Antonio Biso" <c...@NOSPAMetruria.net> wrote:
> "Samantha Cicch" <
samantha.ci...@gmail.com
> ha scritto nel messaggionews:1170771859....@s48g2000cws.googlegroups.com...

Ciao Antonio,
per mia fortuna non ciassomiglio a Samantha Fox (non aveva gli occhi
storti???? ) o forse la confondo con la Sabrina  Salerno... ero troppo
piccola all'epoca... sono del 79, cmq,
dunque per DSUM("cstarticolo","q_smCostiArticoli", CRITERI
ora, i criteri, se io guardo le proprietà della sottomaschera
smCostiArticoli i campi collegati sono dart_distid = dist_id
Quindi:
Me!TOT_MATPRIME = DSum("cstarticolo", "q_smCostiArticoli",
"[dart_distid]" = "[dist_id]")
Ma mi fornisce l'errore:
errore di runtime 2448, impossibile assegnare un  valore all'oggetto
questa è la macro
Private Sub Form_Current()
Me!TOT_MATPRIME = DSum("cstarticolo", "q_smCostiArticoli",
"[dart_distid]" = "[dist_id]")
MsgBox Me!TOT_MATPRIME
If Me!TOT_MATPRIME > Me!dist_tot1 Then
  MsgBox "Acquisti più alto è" & Me!TOT_MATPRIME
   Else:  MsgBox "Acquisti più alto è" & Me!dist_tot1
  End If



text:
"Samantha Cicch" <
samanth...@gmail.com
> ha scritto nel messaggio
news:1170779528.9...@m58g2000cwm.googlegroups.com...


Mettiamola così: non ci riuscivi a guardargli gli occhi alla Fox :-PPP
79? hmmmm... sempre più interessante
dunque per DSUM("cstarticolo","q_smCostiArticoli", CRITERI
ora, i criteri, se io guardo le proprietà della sottomaschera
smCostiArticoli i campi collegati sono dart_distid = dist_id
Quindi:
Me!TOT_MATPRIME = DSum("cstarticolo", "q_smCostiArticoli",
"[dart_distid]" = "[dist_id]")
Allora: devi usare a sinistra il nome del campo così come compare nel
dominio quindi in questo caso nella query.
A destra il valore da confrontare che è sulla form quindi devi riferire alla
form non come stringa ma come variabile.
Pertanto
"[nome campo] = " & me.dist_id
Infine, se nome_campo è numerico allora ok, va bene così.
Se è testo, il valore da confrontare deve essere circondato da apici. Quindi
"[nome campo] = '" & me.dist_id & "'"
Non si legge ma dopo l'uguale c'è ' apice "doppio apice e in fondo doppio
apice apice doppio apice
Alla fine si festeggia a cena insieme eh?
Antonio


text:
On 6 Feb, 18:15, "Antonio Biso" <c...@NOSPAMetruria.net> wrote:
> "Samantha Cicch" <
samantha.ci...@gmail.com
> ha scritto nel messaggionews:1170779528.9...@m58g2000cwm.googlegroups.com...

Ciao Antonio,
come promesso di là, già stamattina avevo preparato la risposta, ma
volevo vedere prima se riuscivo a venirne fuori... in realtà non ho
concluso nulla, se non in un caso di impallare il programma, con una
macro che mi metteva in attesa... x fortuna avevo la copia del db allo
step prima
Questo è quanto:
-----------------------------------------------------
Ciao Antonio
ah in che brutto mondo viviamo, ormai nessuno fa + nulla per
niente... ;)
Scusa il triplo post, ma mi è partito il mouse a raffica... ero
leggermente... come dire tesa... talvolta rompe perdere un sacco di
tempo su cose che dovrebbero andare liscie liscie come l'olio
Per la DSUM, è + incasinata, ti spiego il contesto:
Maschera principale MSC_VIEWDIST, basata sulla tabella TBL_DIST, campo
chiave dist_id
Nella maschera MSC_VIEWDIST ho creato una struttura a schede, di cui 4
su 5 contengono sottomaschere, tra cui Sottomaschera costi
sm_CostiArticoli, basata sulla query q_smCostiArticoli, dalla quale
devo ricavare la somma del campo CSTARTICOLO
Nella scheda che non contiene sottomaschere, ci sono dei campi
calcolati, tra cui TOT_MATPRIME.
Ora, il calcolo DSUM l'ho impostato nella macro della FORM su
apertura. Ma come tento di aprire la FORM, ricevo un errore di macro,
e il debug indica proprio la riga con
Private Sub Form_Current()
Me!TOT_MATPRIME = DSum("cstarticolo", "q_smCostiArticoli", "[)
MsgBox Forms![Analisi].TOT_MATPRIME
Ma l'errore, me lo da anche solo  con
Private Sub Form_Current()
MsgBox Forms![Analisi].TOT_MATPRIME
Mi dice che non trova la form analisi, che in realtà è una scheda...
ho cercato anche qui su come riferirsi ad una scheda di una struttura
a schede... uffffffff
E tu sei enta o anta?
Ciao e grazie,
Samantha


text:
"Samantha Cicch" <
samanth...@gmail.com
> ha scritto nel messaggio
news:1170843762....@k78g2000cwa.googlegroups.com...
On 6 Feb, 18:15, "Antonio Biso" <c...@NOSPAMetruria.net> wrote:
*******************************
Non sono riuscito a quotarti con le freccette
Le mie risposte sono tra ***
*******************************
> dunque per DSUM("cstarticolo","q_smCostiArticoli", CRITERI
>
> ora, i criteri, se io guardo le proprietà della sottomaschera
> smCostiArticoli i campi collegati sono dart_distid = dist_id
>
> Quindi:
> Me!TOT_MATPRIME = DSum("cstarticolo", "q_smCostiArticoli",
> "[dart_distid]" = "[dist_id]")
>
> Allora: devi usare a sinistra il nome del campo così come compare nel
> dominio quindi in questo caso nella query.
> A destra il valore da confrontare che è sulla form quindi devi riferire
alla
> form non come stringa ma come variabile.
> Pertanto
> "[nome campo] = " & me.dist_id
> Infine, se nome_campo è numerico allora ok, va bene così.
> Se è testo, il valore da confrontare deve essere circondato da apici.
Quindi
> "[nome campo] = '" & me.dist_id & "'"
>
> Non si legge ma dopo l'uguale c'è ' apice "doppio apice e in fondo doppio
> apice apice doppio apice
>
> Alla fine si festeggia a cena insieme eh?
>
> Antonio
Ciao Antonio,
Questo è quanto:
-----------------------------------------------------
Ciao Antonio
ah in che brutto mondo viviamo, ormai nessuno fa + nulla per
niente... ;)
*******************************
Ma tu non sei niente, tu vali (cit.dot)
*******************************
Per la DSUM, è + incasinata, ti spiego il contesto:
Maschera principale MSC_VIEWDIST, basata sulla tabella TBL_DIST, campo
chiave dist_id
Nella maschera MSC_VIEWDIST ho creato una struttura a schede, di cui 4
su 5 contengono sottomaschere, tra cui Sottomaschera costi
sm_CostiArticoli, basata sulla query q_smCostiArticoli, dalla quale
devo ricavare la somma del campo CSTARTICOLO
Nella scheda che non contiene sottomaschere, ci sono dei campi
calcolati, tra cui TOT_MATPRIME.
Ora, il calcolo DSUM l'ho impostato nella macro della FORM su
apertura. Ma come tento di aprire la FORM, ricevo un errore di macro,
e il debug indica proprio la riga con
Private Sub Form_Current()
Me!TOT_MATPRIME = DSum("cstarticolo", "q_smCostiArticoli", "[)
*******************************
Alla fine che c'era?
*******************************
MsgBox Forms![Analisi].TOT_MATPRIME
Ma l'errore, me lo da anche solo  con
Private Sub Form_Current()
MsgBox Forms![Analisi].TOT_MATPRIME
Mi dice che non trova la form analisi, che in realtà è una scheda...
ho cercato anche qui su come riferirsi ad una scheda di una struttura
a schede... uffffffff
*******************************
Ma scusa eh? tu devi riferire ad un controllo che sta dentro ad una scheda?
Embè? non basta metterci il nome? me.nome_controllo
*******************************
E tu sei enta o anta?
*******************************
Enta tendente agli anta...
Se po fa, se po fa
*******************************
Ciao e grazie,
Samantha
Antonio


text:
On 7 Feb, 12:24, "Antonio Biso" <c...@NOSPAMetruria.net> wrote:
> "Samantha Cicch" <
samantha.ci...@gmail.com
> ha scritto nel messaggionews:1170843762....@k78g2000cwa.googlegroups.com...

;) Mi viene in mente la parodia delle Iene in merito alla cit. nella
lettera di Veronica Lario "il personaggio di Catherine Dunne, debba
considerarmi "La metà di niente"" ... quando uno dei due conduttori
dice " La metà di niente o un cogli0n3 del tutto",
se hai visto la puntata capisci l'ilarità della scena
Cmq tnx
>
> Per la DSUM, è + incasinata, ti spiego il contesto:
>
> Maschera principale MSC_VIEWDIST, basata sulla tabella TBL_DIST, campo
> chiave dist_id
>
> Nella maschera MSC_VIEWDIST ho creato una struttura a schede, di cui 4
> su 5 contengono sottomaschere, tra cui Sottomaschera costi
> sm_CostiArticoli, basata sulla query q_smCostiArticoli, dalla quale
> devo ricavare la somma del campo CSTARTICOLO
>
> Nella scheda che non contiene sottomaschere, ci sono dei campi
> calcolati, tra cui TOT_MATPRIME.
>
> Ora, il calcolo DSUM l'ho impostato nella macro della FORM su
> apertura. Ma come tento di aprire la FORM, ricevo un errore di macro,
> e il debug indica proprio la riga con
> Private Sub Form_Current()
> Me!TOT_MATPRIME = DSum("cstarticolo", "q_smCostiArticoli", "[)
>
> *******************************
> Alla fine che c'era?
> *******************************
>
Che c'è? Al presente, non ho risolto, e sto argh... dunque:
Me!TOT_MATPRIME = DSum("cstarticolo", "q_smCostiArticoli",
"[TBL_DART.dart_distid] = " & Me!dist_id)
dist_id è il campo contatore chiave primaria, quindi numerico. La
sintassi mi sembra corretta. Il problema è che oltre a filtrare in
base alla distintaID, devo anche farsì che il campo
TBL_DIST.cstmp_data = TBL_CSTMP.cstmp_data, perchè all'apertura della
maschera collego anche un listino, filtrato per data, che mi calcola i
costi di acquisto delle materie prime.
Perciò, funziona se:
Me!TOT_MATPRIME = DSum("cstarticolo", "q_smCostiArticoli",
"[TBL_DART.dart_distid] = " & Me!dist_id and "[TBL_CSTMP.cstmp_data] =
" & TBL_DIST.cstmp_data)
I campi data sono alla stregua di quelli numerici, oppure sono testo
percui devo mettere gli apici?
Nemmeno così va... errore di runtime 13
Me!TOT_MATPRIME = DSum("cstarticolo", "q_smCostiArticoli",
"[TBL_DART.dart_distid] = " _
& Me!dist_id And "[TBL_CSTMP.cstmp_data] = " & Me!DataListino)
e così invece
Me!TOT_MATPRIME = DSum("cstarticolo", "q_smCostiArticoli",
"[TBL_DART.dart_distid] = " _
& Me!dist_id & "[TBL_CSTMP.cstmp_data] = " & Me!DataListino)
Mi risponde:
Errore di runtime 3075
Errore di sintassi (operatore mancante) nell'espressione della query
'[TBL_DART.dart_distid] =10 [TBL_CSTMP.cstmp_data] = 05/01/07'
Dunque dunque dunque, cosa c'è che non rieso a farlo funzionare?
Grazie x la disponibilità,
Samantha



text:

Hola,
e se scrivo così
Me!TOT_MATPRIME = DSum("cstarticolo", "q_smCostiArticoli",
"[TBL_DART.dart_distid] = " _
 & Me!dist_id & "And [TBL_CSTMP.cstmp_data] = " & "Me!DataListino")
dice che le parentesi per [TBL_CSTMP.cstmp_data] sono sbagliate,
mentre con questo ultimo dice Impossibile assegnare un valore
all'oggetto
Me!TOT_MATPRIME = DSum("cstarticolo", "q_smCostiArticoli",
"[TBL_DART.dart_distid] = " _
 & Me!dist_id & "And " & "'[TBL_CSTMP.cstmp_data]' = " & Me!
DataListino)
sgrunt


text:

Ciao A tutti,
sono ad un punto di svolta :)
Me!TOT_MATPRIME = DSum("cstarticolo", "q_smCostiArticoli",
"[TBL_DART.dart_distid] = " _
& Me!dist_id & " And TBL_CSTMP.cstmp_data = " & Me!DataListino("gg/mm/
aaaa"))
Con questa DSUM ora se passo con il cursore nella finestra vba editor
mi da il valore di TOT_MATPRIME :)
Purtroppo, all'esecuzione mi da anche un brutto messaggio:
Errore di runtime 451
La routine Property Let non è stata definita e la routine Property Get
non ha restituito un oggetto
Che vuol dire?
Grazie
Samantha


text:

Ho trovato un vecchio post
http://groups.google.it/group/
it.comp.appl.access/browse_frm/thread/36d6a55d930f2654/
ca1287dfdd61e5be?lnk=gst&q=property%2Blet&rnum=16#ca1287dfdd61e5be
vecchio non tanto del 2006, dove si parla della proprietà property get
let...
E l'ho modificato così, ma al msgbox questo compare vuoto, perciò
significa che c'è   qualcosa che non va, di VBA sono una schiappa:
'Per scrivere il valore X
Property Let Valore(Xval As Double)
   X = Xval
Xval = DSum("cstarticolo", "q_smCostiArticoli",
"[TBL_DART.dart_distid] = " _
& Me!dist_id & " And TBL_CSTMP.cstmp_data = " & Me!DataListino("gg/mm/
aaaa"))
End Property
Property Set Valore(Xval As Control)
   Set X = Xval
Set objClass.Valore = Me!TOT_MATPRIME
MsgBox Me!TOT_MATPRIME
End Property
Come devo modificarlo per far sì che funzioni?
Tnx in advance
Samantha Cicchelero


text:
"Samantha Cicch" <
samanth...@gmail.com
> ha scritto nel messaggio
news:1170858212.0...@v33g2000cwv.googlegroups.com...
> > Alla fine si festeggia a cena insieme eh?
Uhm
> *******************************
> Alla fine che c'era?
> *******************************
>
Che c'č? Al presente, non ho risolto, e sto argh... dunque:
Me!TOT_MATPRIME = DSum("cstarticolo", "q_smCostiArticoli",
"[TBL_DART.dart_distid] = " & Me!dist_id)
dist_id č il campo contatore chiave primaria, quindi numerico. La
sintassi mi sembra corretta. Il problema č che oltre a filtrare in
base alla distintaID, devo anche farsě che il campo
TBL_DIST.cstmp_data = TBL_CSTMP.cstmp_data, perchč all'apertura della
maschera collego anche un listino, filtrato per data, che mi calcola i
costi di acquisto delle materie prime.
Perciň, funziona se:
Me!TOT_MATPRIME = DSum("cstarticolo", "q_smCostiArticoli",
"[TBL_DART.dart_distid] = " & Me!dist_id and "[TBL_CSTMP.cstmp_data] =
" & TBL_DIST.cstmp_data)
I campi data sono alla stregua di quelli numerici, oppure sono testo
percui devo mettere gli apici?
No.
I campi data sono bastardi.
Devi trasformare la tua data che normalmente č semplicemente
gg-mm-aaaa in
#mm-gg-aaaa#
Allora, io ho preparato una funzione pubblica che richiamo ogni volta ce
faccio sti smaneggi.
Te la posto
Public Function converti(X As Date) As String
    Dim gg As String, mm As String
    gg = Left(X, 3)
    mm = Mid(X, 4, 3)
    converti = "#" & mm & gg & Right(X, 2) & "#"
End Function
> E tu sei enta o anta?
>
> *******************************
> Enta tendente agli anta...
> Se po fa, se po fa
> *******************************
> Ciao e grazie,
Stai glissando...
Antonio


text:
On 8 Feb, 09:23, "Antonio Biso" <c...@NOSPAMetruria.net> wrote:
> "Samantha Cicch" <
samantha.ci...@gmail.com
> ha scritto nel messaggionews:1170858212.0...@v33g2000cwv.googlegroups.com...
>
> > > Alla fine si festeggia a cena insieme eh?
>
> Uhm
>
> > *******************************
> > Alla fine che c'era?
> > *******************************
>
> Che c'è? Al presente, non ho risolto, e sto argh... dunque:
>
> Me!TOT_MATPRIME = DSum("cstarticolo", "q_smCostiArticoli",
> "[TBL_DART.dart_distid] = " & Me!dist_id)
>
> dist_id è il campo contatore chiave primaria, quindi numerico. La
> sintassi mi sembra corretta. Il problema è che oltre a filtrare in
> base alla distintaID, devo anche farsì che il campo
> TBL_DIST.cstmp_data = TBL_CSTMP.cstmp_data, perchè all'apertura della
> maschera collego anche un listino, filtrato per data, che mi calcola i
> costi di acquisto delle materie prime.
>
> Perciò, funziona se:
> Me!TOT_MATPRIME = DSum("cstarticolo", "q_smCostiArticoli",
> "[TBL_DART.dart_distid] = " & Me!dist_id and "[TBL_CSTMP.cstmp_data] =
> " & TBL_DIST.cstmp_data)
>
> I campi data sono alla stregua di quelli numerici, oppure sono testo
> percui devo mettere gli apici?
>
> No.
> I campi data sono bastardi.
> Devi trasformare la tua data che normalmente è semplicemente
> gg-mm-aaaa in
> #mm-gg-aaaa#
> Allora, io ho preparato una funzione pubblica che richiamo ogni volta ce
> faccio sti smaneggi.
> Te la posto
> Public Function converti(X As Date) As String
>
>     Dim gg As String, mm As String
>
>     gg = Left(X, 3)
>     mm = Mid(X, 4, 3)
>     converti = "#" & mm & gg & Right(X, 2) & "#"
>
> End Function
>
> > E tu sei enta o anta?
>
> > *******************************
> > Enta tendente agli anta...
> > Se po fa, se po fa
> > *******************************
> > Ciao e grazie,
>
> Stai glissando...
>
> Antonio
Scusa l'ignoranza,
che vuol dire glissare?
Samantha


text:
"Samantha Cicch" <
samanth...@gmail.com
> ha scritto nel messaggio
news:1170925945.3...@a75g2000cwd.googlegroups.com...
On 8 Feb, 09:23, "Antonio Biso" <c...@NOSPAMetruria.net> wrote:
> "Samantha Cicch" <
samantha.ci...@gmail.com
> ha scritto nel
messaggionews:1170858212.0...@v33g2000cwv.googlegroups.com...
>
> > E tu sei enta o anta?
>
> > *******************************
> > Enta tendente agli anta...
> > Se po fa, se po fa
> > *******************************
> > Ciao e grazie,
>
> Stai glissando...
>
> Antonio
Scusa l'ignoranza,
che vuol dire glissare?
tralasciare di approfondire un argomento, sorvolarlo
Far finta di nulla, dare dei 2dP eleganti
Antonio


text:
On 8 Feb, 11:05, "Antonio Biso" <c...@NOSPAMetruria.net> wrote:
> "Samantha Cicch" <
samantha.ci...@gmail.com
> ha scritto nel messaggionews:1170925945.3...@a75g2000cwd.googlegroups.com...

Hola Antonio
ma hai letto la mia battuta sulle Iene? O ho io un umorismo... di
scarsa qualità?
Ho il dubbio che non  leggi i miei post fino in fondo, un clichè x gli
uomini quello di non ascoltare ... ovviamente sto scherzando :D
Questa DSUM ieri funzionava
DSum("cstarticolo", "q_smCostiArticoli", "[TBL_DART.dart_distid] = " _
& Me!dist_id & " And TBL_CSTMP.cstmp_data = " & Me!DataListino("gg/mm/
aaaa"))
per il discorso del giorno/mese/anno formato data, il problema era che
a questo punto, mi chiede una property let e get...
Non c'è un modo x semplificare la DSUM, dimodo chè non mi chiede il
property?
Essendo alle prime armi con VBA mi trovo spiazzata
Private ACQ As Double
Property Let ABC(SABC As Double)
SABC = DSum("cstarticolo", "q_smCostiArticoli",
"[TBL_DART.dart_distid] = " _
& Me!dist_id & " And TBL_CSTMP.cstmp_data = " & Me!DataListino("gg/mm/
aaaa"))
SABC = ACQ
IF ACQ > Me!Dist_tot1   THEN
MsgBox "Acquisti più alto è" & ACQ
   Else:  MsgBox "Acquisti più alto è" & Me!dist_tot1
  End If
End Sub
Logico che questa qui sopra non va, la sto girando e rigirando, ho
difficolta a fare la dichiarazione dentro un evento della maschera,
perchè pare che PROPERTY voglia lavorare da solo, e non insieme a
PRIVATE... dopo il private e prima di Property mi chiede sempre END
SUB...
... Ci ho messo una vita a fare il DSUM  calcolandolo come variabile,
e ora non so come farlo funzionare dentro un evento della maschera...
Cmq, non sono abituata ad accettare inviti a cena da sconosciuti, ma
mi incuriosisce sapere se tu li fai spesso a sconosciute?
Data l'ora (11:47) ti auguro buon pranzo,
Samantha
************************************************
DISCLAIMER: quanto qui sopra scritto non vuole  essere  in nessun modo
offensivo
meglio chiarirlo prima,
Ciao


text:
"Samantha Cicch" <
samanth...@gmail.com
> ha scritto nel messaggio
news:1170932098....@p10g2000cwp.googlegroups.com...
On 8 Feb, 11:05, "Antonio Biso" <c...@NOSPAMetruria.net> wrote:
> "Samantha Cicch" <
samantha.ci...@gmail.com
> ha scritto nel
messaggionews:1170925945.3...@a75g2000cwd.googlegroups.com...
> On 8 Feb, 09:23, "Antonio Biso" <c...@NOSPAMetruria.net> wrote:> "Samantha
Cicch" <
samantha.ci...@gmail.com
> ha scritto nel
>
> messaggionews:1170858212.0...@v33g2000cwv.googlegroups.com...
>
>
>
> > > E tu sei enta o anta?
>
> > > *******************************
> > > Enta tendente agli anta...
> > > Se po fa, se po fa
> > > *******************************
> > > Ciao e grazie,
>
> > Stai glissando...
>
> > Antonio
>
> Scusa l'ignoranza,
> che vuol dire glissare?
>
> tralasciare di approfondire un argomento, sorvolarlo
> Far finta di nulla, dare dei 2dP eleganti
>
> Antonio
Hola Antonio
ma hai letto la mia battuta sulle Iene? O ho io un umorismo... di
scarsa qualità?
Ho il dubbio che non  leggi i miei post fino in fondo, un clichè x gli
uomini quello di non ascoltare ... ovviamente sto scherzando :D
***************************
Veramente l'ho letto e... ho glissato...
perchè quella puntata non l'avevo vista e quindi non sapevo che rispondere
e allora ho "sfoltito"
***************************
Questa DSUM ieri funzionava
***************************
Allora.
DSUM("[campo da sommare","tabella o query",criterio)
criterio :
campo numerico
"[nome campo] = " &  me.nomecontrollo
campo testo
"[nome campo] = '" &  me.nomecontrollo & "'"
campo data
"[nome campo] = " &  converti(me.nomecontrollo)
con converti la funzione che ti ho postato prima
***************************
Cmq, non sono abituata ad accettare inviti a cena da sconosciuti, ma
mi incuriosisce sapere se tu li fai spesso a sconosciute?
***************************
ovviamente, se non si esce a cena non ci si conosce quindi si stalla...
***************************
Antonio


text:
On 8 Feb, 12:31, "Antonio Biso" <c...@NOSPAMetruria.net> wrote:
> "Samantha Cicch" <
samantha.ci...@gmail.com
> ha scritto nel messaggionews:1170932098....@p10g2000cwp.googlegroups.com...

Antonio,
mi da ancora risultato zero
e non mi da errori
Public Function ValoreAcq() As Double
Dim ACQ As Double
ACQ = DSum("cstarticolo", "q_smCostiArticoli", _
"[dart_distid] = " & Me!dist_id & " And [TBL_CSTMP_cstmp_data] = " &
converti(Me!DataListino))
End Function
Private Sub Form_Current()
MsgBox "Funzione ValoreAcq = " & ValoreAcq
MsgBox Me!DataListino
MsgBox Me!dist_id
End Sub
Come puoi notare sopra ho messo che mi dia il risultato su evento Form
Current, il risultato è che mi da il risultato all'apertura della
maschera... Ho creato anche un pulsante, su evento click, ma mi da
sempre risultato zero.
Come vedi, sono in una doppia situazione di stallo...
Scherzi a parte, forse non va perchè TBL_CSTMP_cstmp_data è un campo
dentro la query q_smcostiarticoli, che magari nella maschera
principale MSC_VIEWDIST non vede.
Quando devi fare una DSUM così quali sono gli step che fai, se i dati
sono contenuti in una sottomaschera? cambia qualche cosa?
Odio quando mi incasino
Grazie in anticipo, anche del sostegno morale
Samantha


text:
"Samantha Cicch" <
samanth...@gmail.com
> ha scritto nel messaggio
news:1170951153.8...@j27g2000cwj.googlegroups.com...
Scherzi a parte, forse non va perchè TBL_CSTMP_cstmp_data è un campo
dentro la query q_smcostiarticoli, che magari nella maschera
principale MSC_VIEWDIST non vede.
Non c'entra nulla la form con la Dsum.
[nome campo] deve essere il nome del campo nella query
Antonio


text:
On 8 Feb, 19:48, "Antonio Biso" <c...@NOSPAMetruria.net> wrote:
> "Samantha Cicch" <
samantha.ci...@gmail.com
> ha scritto nel messaggionews:1170951153.8...@j27g2000cwj.googlegroups.com...
>
> Scherzi a parte, forse non va perchè TBL_CSTMP_cstmp_data è un campo
> dentro la query q_smcostiarticoli, che magari nella maschera
> principale MSC_VIEWDIST non vede.
>
> Non c'entra nulla la form con la Dsum.
> [nome campo] deve essere il nome del campo nella query
>
> Antonio
Grazie Antonio,
ora ho capito come funziona la sintassi della DSUM. A questo punto,
devo prendere in mano la query e rielaborarla, lasciando solo le cose
che mi servono realmente. la query è lunga e complessa, pesca da 5
tabelle, e l'ho fatta funzionare creandola con la creazione
automatica. Ieri ne ho fatto una copia e ho cominciato a sfoltirla,
per capire quali sono realmente i campi e i join che usa... alla fine
non andava +nulla. E' un pò incasinata insomma :D
Antonio grazie, visto che è venerdì, e si avvicina il weekend, cosa
combini di bello? Vai x caso a vedere la tour Eiffel, la foresta nera
in germania, oppure il nuovo palazzetto del ghiaccio c/o gli Emirati
arabi (si dice così?)
Io se potessi andrei in SudAmerica.. a vedere i resti dei templi dei
maya
Buon lavoro
Samantha


text:

FUNZIONA!!!
:D
Private Sub Form_Open(Cancel As Integer)
Me!margfly = DSum("cstarticolo", "q_smCostiArticoli",
"[TBL_DART.dart_distid] = " _
& Me!dist_id)
MsgBox "Il margine è " & Me!margfly
End Sub
E la query di origine l'ho semplificata come segue:
SELECT TBL_DART.dart_distid, TBL_DART.dart_id, TBL_ARTUM.artum_desc,
TBL_ART.art_desc, TBL_MP.mp_desc, TBL_DIST.dist_data,
TBL_CSTMP.cstmp_data AS DataCosti, TBL_DART.dart_qta,
(([cstmp_costo]*[cstmp_perc])+[cstmp_costo]) AS cstmpbase, ([cstmpbase]
+[art_costo€]) AS cstartbase, (([cstartbase]*[art_coeff])) AS
cstartmm, ([cstartmm]*[dart_qta]) AS cstarticolo
FROM TBL_MP INNER JOIN ((TBL_CSTMP INNER JOIN TBL_DIST ON
TBL_CSTMP.cstmp_data = TBL_DIST.cstmp_data) INNER JOIN (TBL_ARTUM
INNER JOIN (TBL_ART INNER JOIN TBL_DART ON TBL_ART.art_id =
TBL_DART.dart_artid) ON TBL_ARTUM.artum_id = TBL_ART.art_artumid) ON
TBL_DIST.dist_id = TBL_DART.dart_distid) ON (TBL_MP.mp_id =
TBL_CSTMP.cstmp_mpid) AND (TBL_MP.mp_id = TBL_ART.art_mpid);
Grazie Antonio e Carlo!
Samantha


text:
"Samantha Cicch" <
samanth...@gmail.com
> ha scritto nel messaggio
news:1171015233.0...@m58g2000cwm.googlegroups.com...
On 8 Feb, 19:48, "Antonio Biso" <c...@NOSPAMetruria.net> wrote:
> "Samantha Cicch" <
samantha.ci...@gmail.com
> ha scritto nel
messaggionews:1170951153.8...@j27g2000cwj.googlegroups.com...
>
> Scherzi a parte, forse non va perchč TBL_CSTMP_cstmp_data č un campo
> dentro la query q_smcostiarticoli, che magari nella maschera
> principale MSC_VIEWDIST non vede.
>
> Non c'entra nulla la form con la Dsum.
> [nome campo] deve essere il nome del campo nella query
>
> Antonio
Antonio grazie, visto che č venerdě, e si avvicina il weekend, cosa
combini di bello? Vai x caso a vedere la tour Eiffel,
Ce l'ho
la foresta nera
in germania,
mi manca
oppure il nuovo palazzetto del ghiaccio c/o gli Emirati
arabi (si dice cosě?)
Ce l'ho (almeno l'albergo a forma di vela e l'isola a forma di palma
Io se potessi andrei in SudAmerica.. a vedere i resti dei templi dei
maya
Ce l'ho (anche se erano incas a matchu pitchu)
Come vedi di cose da raccontarti ne avrei... cenetta?
Antonio


text:
"Samantha Cicch" <
samanth...@gmail.com
> ha scritto nel messaggio
news:1171274533.7...@l53g2000cwa.googlegroups.com...
On 9 Feb, 11:00, "Samantha Cicch" <
samantha.ci...@gmail.com
> wrote:
> On 8 Feb, 19:48, "Antonio Biso" <c...@NOSPAMetruria.net> wrote:
>
> > Non c'entra nulla la form con la Dsum.
> > [nome campo] deve essere il nome del campo nella query
>
> > Antonio
>
> Grazie Antonio,
> ora ho capito come funziona la sintassi della DSUM. A questo punto,
Finalmente, puff pant
Ho la sensazione che tu non mi leggessi, l'avevo scritto dall'inizio
FUNZIONA!!!
E' chiaro
Grazie Antonio e Carlo!
Bella, questa sembra "Grazie Mario. e digli che ho voluto più bene a...
uguale... uguale..."
Antonio


text:
On 12 Feb, 14:25, "Antonio Biso" <c...@NOSPAMetruria.net> wrote:
> "Samantha Cicch" <
samantha.ci...@gmail.com
> ha scritto nel messaggionews:1171274533.7...@l53g2000cwa.googlegroups.com...

Sai la cavolata... che mi ha bloccata x 3 giorni?
Nella maschera principale, il valore DIST_ID non l'avevo messo, era
nella query di origine della maschera principale ma non presente come
campo nella form MSC_VIEWDIST!!!!
;) Buon lavoro
Samantha


text:
"Samantha Cicch" <
samanth...@gmail.com
> ha scritto nel messaggio
news:1171287079.2...@a34g2000cwb.googlegroups.com...
;) Buon lavoro
Samantha
Glissatrice
Antonio


text:
"Antonio Biso" <ch...@NOSPAMetruria.net> ha scritto nel messaggio
news:jVZzh.6473$h_1.1...@twister1.libero.it...
cut
> Grazie Antonio e Carlo!
>
> Bella, questa sembra "Grazie Mario. e digli che ho voluto più bene a...
> uguale... uguale..."
>
> Antonio
Sei forse invidioso?
:-)
Ciao, Carlo


title: Problema Sottrazioni in un Report

author: Rcapoint

text:
Ciao a tutti, non riesco a fare una cosa che a quanto sembra, dovrebbe
essere molto banale.
in un report ho inserito 2 caselle di testo che contengono le seguenti
espressioni:
Testo1: <<   ="Totale   " & FormatCurrency(Somma([Provvigione da Pagare]))
>>
Testo2: <<   ="R.A.   " & FormatCurrency(Somma([Provvigione da
Pagare]*[PercentualeRit]))  >>
Fino a qui tutto ok, ma adesso non riesco a sottrarre Testo1 a
Testo2....COME FACCIO???? mi da #ERRORE
Mi servirebbe una terza casella di testo che mi ritornasse il risultato tra
Testo1-Testo2
Aiutatemi per favore.


title: Problema Sottrazioni in un Report

author: cnicola

text:
Se non sbaglio devi creare una terza casella di testo e inserire le formule
complete cioe:
FormatCurrency(Somma([Provvigione da Pagare])) -
FormatCurrency(Somma([Provvigione da
Pagare]*[PercentualeRit])).
Ciao
"Rcapoint" <
rcap...@ibanordest.it
> ha scritto nel messaggio
news:ImCR8.58693$Kt3.1...@twister2.libero.it...



title: Problema Sottrazioni in un Report

text:
"cnicola" <
cni...@libero.it
> ha scritto nel messaggio
news:5CCR8.58907$j65.1...@twister1.libero.it...
> Se non sbaglio devi creare una terza casella di testo e inserire le
formule
> complete cioe:
> FormatCurrency(Somma([Provvigione da Pagare])) -
> FormatCurrency(Somma([Provvigione da
> Pagare]*[PercentualeRit])).
>
> Ciao
GRAZIE MILLE funziona perfettamente, scusatemi ma non sono molto esperto.


title: Problema Sottrazioni in un Report

text:
[CUT]
Sarà che non conosco bene FormatCurrency ma non dovrebbe essere :
FormatCurrency(Somma([Provvigione da Pagare]) -
                         (Somma([Provvigione da Pagare]*[PercentualeRit])))


title: Dove è l'errore?

author: Filippo Vinciguerra

text:
Allora,
ho due tabelle, la prima [Parcella] contiene campi quali numero, data,
valore, oggetto etc. la seconda [Prestazioni] contiene la data di ogni
prestazione, la prestazione stessa, l'importo. Poi ci sono i vari ID.
Nella tabella Prestazioni c'è un campo Numerico IDParcella che indica la
parcella di riferimento della tabella Parcelle.
La tabella Parcelle è associata ad una maschera, la tabella prestazioni in
una sottomaschera con visualizzazione Maschera continua in modo da scorrere
le varie prestazioni e eventualmente intervenire sui campi.
Ovviamente i record di Prestazioni che devono apparire non sono tutti, ma
soltanto quelli con IDParcella corrispondente alla Parcella in uso, presente
nella Maschera principale.
Allora ho creato un campo Text non visibile nella maschera principale
associato all' ID della tabella parcelle e il seguente filtro, inserito tra
le proprietà della sottomaschera: IDParcella=Forms![Maschera
Parcella]!txtIDParcella, però non funziona. Dove è l'errore?.
E poi già che ci siamo un'altra cosa. Se volessi cancellare il record in
Parcelle come dovrei fare per cancellare tutti i record associati in
Prestazioni?
Grazie
Filippo


title: Dove è l'errore?

author: Emyr

text:


per la seconda vedi l'integrità referenziale ed il cancella i dati
correlati a catena
per il resto dovrei avere la maschera e le tabelle per capire cos'hai
fatto
Saluti.
Emanuele.


title: Dove è l'errore?

author: Alberto S.

text:
[CUT]
> Allora ho creato un campo Text non visibile nella maschera principale
> associato all' ID della tabella parcelle e il seguente filtro, inserito
tra
> le proprietà della sottomaschera: IDParcella=Forms![Maschera
> Parcella]!txtIDParcella, però non funziona. Dove è l'errore?.
Perché invece non utilizzi le proprietà 'collega campi secondari' e 'collega
campi master' della sottomaschera?
> Grazie
> Filippo
>
Ciao
--
Alberto


title: Dove è l'errore?

text:
"Alberto S." <
sartor...@tin.it
> ha scritto nel messaggio
news:a789vo$jhct7$1...@ID-134626.news.dfncis.de...

E dov'è questa proprietà, io non la trovo.
Grazie
Ciao, Filippo


title: Dove è l'errore?

text:
"Filippo Vinciguerra" <
ma...@studiovinciguerra.it
> ha scritto nel messaggio
news:a79j85$9pj$1...@news.panservice.it...

Apri in visualizzazione struttura la maschera principale, seleziona il
controllo che contiene la sottomaschera (aiutati eventualmente con la
casella combinata 'oggetto' della barra strumenti 'casella degli
strumenti'); dal menù visualizza scegli 'proprietà'. Quello che cerchi è
nella sezione 'dati'.
Ciao
--
Alberto


title: help:modificare i dati in una maschera

author: ale

text:
Ciao a tutti.Sono un neofita di access
Sto provando a  creare un piccolo gestionale.
Dopo avere creato le tabelle prodotti e fornitori, ho creato la relativa
maschera per gli ordini.
Selezionando il prodotto nell'ordine, viene anche segnalato il prezzo,come
segnato nella tabella prodotti.
Se voglio modificare nella maschera il prezzo, questo viene modificato anche
nella tabella.Io invece vorrei avere la possibilità di modificare il prezzo
senza cambiare il suo valore nella tabella.Questo vale anche per alcuni dati
relativi al cliente,tipo, se di default nella tabella cliente c'è uno
spedizioniere assegnato, e io gli voglio inviare la merce con un altro
corriere, se inserisco il nuovo nome, questo sostituisce il vecchio corriere
nella tabella. Mi servirebbe sapere come fare a modificare il testo in una
maschera, senza modificare i dati nella tabella.
grazie per l'aiuto


title: help:modificare i dati in una maschera

author: SimonenomiS

text:
"ale" <
alexcar...@libero.it
> wrote in
news:gLVT9.20147$
AA2.1...@news2.tin.it
:

  Ciò non è possibile! Ogni dato che compare in una maschera
DEVE, per forza di cose, rispecchiare (direttamente o
indirettamente) il contenuto di un campo del record al momento
rappresentato (o evidenziato) nella maschera.
  In altre parole Access, per popolare di dati una maschera,
deve poter reperire (e memorizzare) quei dati da una tabella o
da una query. Dove credi che potrebbe, altrimenti, tener memoria
dei valori da te inseriti da tastiera? ;-)
  Per fare ciò che chiedi, la soluzione più logica è quella di
creare una tabella ORDINI nella quale inserire, a mano o
prelevandoli dalle tabelle FORNITORI e PRODOTTI, i valori che ti
servono.
  Ciao.
--
Freeware, shareware, public domain, ...
http://digilander.libero.it/winses/


title: togliere la barra menu nelle maschere in esecuzione

author: Fabrizio Cannatelli

text:
ciao a tutti
c'è un modo per eliminare la barra menu quando è in esecuzione la
maschera??
mi fate sapere per favore se qualcuno lo sa?
grazie mille
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:
On Tue, 3 Dec 2002 07:41:06 +0000 (UTC), "Fabrizio Cannatelli"
<
fcann...@tiscali.it
> wrote:
>ciao a tutti
>c'è un modo per eliminare la barra menu quando è in esecuzione la
>maschera??
>mi fate sapere per favore se qualcuno lo sa?
>grazie mille
vedi su
sitocomune.com
Saluti.
Emanuele.


author: ap

text:
Scusate se mi intrometto, ma interessa anche me. Ho trovato sul sito comune
la risposta al quesito: un codice che non so proprio dove scrivere.abbiate
pazienza ma ci sono neofiti come me che magari annegano in un bicchier
d'acqua ;o)) ciao Antonio (ormus)
"Emyr" <
fan...@lavoro.com
> ha scritto nel messaggio
news:h3qouuk1imlshcrjv...@4ax.com...



title: avvio maschera access2007

author: gibbo

text:
Domanda stupida (portate pazienza)
come si fa per visualizzare una maschera automaticamente all'avvio del db?
Fino al 2003 lo sapevo, ma nel 2007 no


title: avvio maschera access2007

author: Cinzia

text:
"gibbo" <
gibo...@tiscali.it
> ha scritto nel messaggio
news:46fd2e6c$0$21199$5fc...@news.tiscali.it...

Ciao gibbo,
Pulsante Office, Opzioni di Access, Sceda Database corrente,
Visualizza Maschera e scegli il tuo form di partenza dall'elenco
--
Cinzia [Office Access MVP]
_______________________

www.riolab.org
----------------------------------------


title: Somma parziale in Query Raggruppamento

author: Announced

text:
Dovrei, data una tabella di questo tipo, determinare l'ImpRiutilizzo in
questo modo, a scalare... cioè riutilizzando parte dell'incasso quanto
vale il credito, fino ad esaurimento...
CF   ImpIncasso  ImpCredito AgingCredito ImpRiutilizzo
01     100             30               2001           30
01     100             20               2002           20
01     100             10               2003           10
01     100             50               2004           40
01     100             25               2005            0
Potreste darmi qualche indicazione di come impostare nella query questo
campo (ImpRiutilizzo) OnTheFly?
Grazie
Paolo


title: Somma parziale in Query Raggruppamento

author: Sergio MAZZA

text:
"Announced" <
paolosc...@alice.it
> ha scritto nel messaggio
news:1156922952.2...@h48g2000cwc.googlegroups.com...
Dovrei, data una tabella di questo tipo, determinare l'ImpRiutilizzo in
questo modo, a scalare... cioč riutilizzando parte dell'incasso quanto
vale il credito, fino ad esaurimento...
CF   ImpIncasso  ImpCredito AgingCredito ImpRiutilizzo
01     100             30               2001           30
01     100             20               2002           20
01     100             10               2003           10
01     100             50               2004           40
01     100             25               2005            0
Potreste darmi qualche indicazione di come impostare nella query questo
campo (ImpRiutilizzo) OnTheFly?
Grazie
Paolo
[risposta]
Nel sito comune (
www.sitocomune.com
) Sezione Queries ci sono degli esempi...
Ciao.
--
Sergio MAZZA


title: Somma parziale in Query Raggruppamento

text:
> Nel sito comune (
www.sitocomune.com
) Sezione Queries ci sono degli esempi...
>
> Ciao.
> --
> Sergio MAZZA
In realtà ho già cercato nel SC e l'unica soluzione che si potrebbe
avvicinare a quello che mi serve è la Faq 2.11 "Come si può ottenere
il totale progressivo di un campo in una query", ma non riesco ad
adattarla in quanto me servirebbe ottenere il riutilizzo dell'incasso
sui vari importi di credito suddivisi per aging, per cf. Nella Faq
invece ottengo un totale prg che ho difficoltà a legare all'importo
dell'incasso...
Grazie
Paolo


title: Somma parziale in Query Raggruppamento

author: MA

text:
Sergio MAZZA wrote:
> "Announced" <
paolosc...@alice.it
> ha scritto nel messaggio
> news:1156922952.2...@h48g2000cwc.googlegroups.com...
> Dovrei, data una tabella di questo tipo, determinare l'ImpRiutilizzo
> in questo modo, a scalare... cioč riutilizzando parte dell'incasso
> quanto
> vale il credito, fino ad esaurimento...
>
> CF   ImpIncasso  ImpCredito AgingCredito ImpRiutilizzo
> 01     100             30               2001           30
> 01     100             20               2002           20
> 01     100             10               2003           10
> 01     100             50               2004           40
> 01     100             25               2005            0
>
> Potreste darmi qualche indicazione di come impostare nella query
> questo campo (ImpRiutilizzo) OnTheFly?
>
> Grazie
>
> Paolo
>
>
Immagino tu abbia una tabella o una query dei soggetti in cui c'č il CF ed
il ImpIncasso
e poi un'altra in cui hai ImpCredito, AgingCredito e ImpRiutilizzo e bisogna
valorizzare quest'ultimo campo
dim rstTemp as Dao.Recordset  'questo rst riempi la tab temporanea
dim rstNomi as dao.recordset    'Questa č la tua query ordinata per CF e per
Anno
Dim lngIncasso as Long
Dim db as dao.database
set db = currentdb
set rstNomi = db.openrecordset("TabNomi")
with rstTemp
'Apro la tabell aNomi e la scorro tutta
do
    set rstTemp = db.openrecordset("Select * from tuatabella where Cf = '" &
!CF & "' ORDER By AgingCredito" )
'Apro la seconda tabella filtrandola per il cf del nome che sto analizzando
e ordinandola per anno
        lngIncasso = !ImpIncasso
'Mi creo la variabile dell'Importo Incasso da "spendere"
        if not rstTemp.EOF
        do
'Se esiste un rst me lo scorro (nota che ora ci sono solo i record filtrati
per nominativo)
            if lngIncasso >=0 then
'Se non ho esaurito l'importo incasso
                rstTemp.edit
'controllo se la mia variabile č maggiore o minore dell'Importo credito
'e valorizzo il campo ImpRiutilizzo
'e scorro i record fino all'esaurimento della mia variabile
               if ImpCredito >= lngIncasso then
                    rstTemp!ImpRiutillizzo = lngIncasso
                else
                    rstTemp!ImpRiutilizzo = ImpCredito
            end if
                rstTemp.update
            end if
            rstTemp.movenext
        loop until rstTemp.eof
        end if
.movenext
loop until
end with
rstTemp.close : set rstTemp = Nothing
rstNomi.close : set rstNomi = nothing
set db = nothing
Credo che possa andare, l'ho scritta direttamewnte in OE e quindi ci possono
essere errori
Fammi sapere
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: Somma parziale in Query Raggruppamento

text:

Errata Corrige
>
> Dim lngIncasso as Long
> Dim db as dao.database
>
> set db = currentdb
> set rstNomi = db.openrecordset("TabNomi")
> with rstTemp
with rstNomi

              end if
              rstTemp.update
Cioč update deve andare doopo l'end if
>             rstTemp.movenext
>         loop until rstTemp.eof
>         end if
> .movenext
> loop until
loop until .Eof
