title: query su FE in rete

text:
"Gabriele Bertolucci" <info@#REMOVE#
pbsoft.it
> ha scritto nel messaggio
news:44056bd4$0$28075$4faf...@reader1.news.tin.it...

Su tutte le macchine la versione di access è completa
i Db sono tutti compliati, sulla macchina dove è installato il front end
il report funziona si vede l'anteprima e va in stampa correttamente
l'errore sulle altre è
"errore di sintassi nella proposizione group by"
La cosa sorprendente è che per provare il db io ho messo in rete
i miei due PC a casa, e in questa rete funziona tutto correttamente


title: query su FE in rete

author: iperworld

text:
"nick_dent" <
nic....@tiscali.it
> ha scritto nel messaggio
news:4404d892$0$29108$5fc...@news.tiscali.it...

ti posso rispondere solo fra una settiamana
intanto so che nella mia simulazioe a casa (2 PC in rete)
tutto funziona query e report su entrambe le macchine
(quella con solo in FE e quella con BE e FE)
dal cliente si ottiene



title: query su FE in rete

author: Gabriele Bertolucci

text:
> Su tutte le macchine la versione di access è completa
> i Db sono tutti compliati, sulla macchina dove è installato il front end
> il report funziona si vede l'anteprima e va in stampa correttamente
>
> l'errore sulle altre è
> "errore di sintassi nella proposizione group by"
>
> La cosa sorprendente è che per provare il db io ho messo in rete
> i miei due PC a casa, e in questa rete funziona tutto correttamente
L'unica cosa che mi viene in mente è chiederti di postare l'istruzione SQL
in questione, compresa la clausola GROUP BY.



title: query su FE in rete

text:
"Gabriele Bertolucci" <info@#REMOVE#
pbsoft.it
> ha scritto nel messaggio
news:4405cc7d$0$28077$4faf...@reader1.news.tin.it...

Come da richiesta
SELECT tabattivita.[ID attivita], tabnomeattivita.[nome attivita],
tabattivita.[ID settore], tabsettori.settore, tabattivita.[ID nome
attivita], tabattivita.[indicatore qualitativo], tabattivita.[data di
inizio], tabattivita.[durata complessiva in ore], tabattivita.[durata
complessiva in giorni], tabattivita.[numero di educatori],
tabattivita.[numero di fruitori], tabattivita.[fascia di età prevalente],
tabattivita.ambito, tabattivita.[numero di volontari], tabattivita.[presenza
volontari per ore], tabattivita.[sede dell'attività], taboperatore.[ID
operatore], taboperatore.operatore, tabattivita.[data di fine],
Count(tabiscrizioni.[ID ragazzo]) AS [ConteggioDiID ragazzo],
tabattivita.[numero collaboratori], tabattivita.[totale ore collaboratori]
FROM tabsettori INNER JOIN (taboperatore RIGHT JOIN (tabnomeattivita INNER
JOIN ((tabattivita LEFT JOIN tabiscrizioni ON tabattivita.[ID
attivita]=tabiscrizioni.[ID attivita]) LEFT JOIN tabpartecipazioni ON
tabattivita.[ID attivita]=tabpartecipazioni.[ID attività]) ON
tabnomeattivita.[ID nome attivita]=tabattivita.[ID nome attivita]) ON
taboperatore.[ID operatore]=tabpartecipazioni.[ID operatore]) ON
tabsettori.[ID settore]=tabattivita.[ID settore]
GROUP BY tabattivita.[ID attivita], tabnomeattivita.[nome attivita],
tabattivita.[ID settore], tabsettori.settore, tabattivita.[ID nome
attivita], tabattivita.[indicatore qualitativo], tabattivita.[data di
inizio], tabattivita.[durata complessiva in ore], tabattivita.[durata
complessiva in giorni], tabattivita.[numero di educatori],
tabattivita.[numero di fruitori], tabattivita.[fascia di età prevalente],
tabattivita.ambito, tabattivita.[numero di volontari], tabattivita.[presenza
volontari per ore], tabattivita.[sede dell'attività], taboperatore.[ID
operatore], taboperatore.operatore, tabattivita.[data di fine],
tabattivita.[numero collaboratori], tabattivita.[totale ore collaboratori]
HAVING (((tabattivita.[ID attivita])=Forms!mscattivita![ID attivita]));
anche se temo che la cosa non avrà un seguito :-)


title: query su FE in rete

text:

Mi tocca darti ragione, anche se avrei preferito trovare una soluzione al
tuo problema. Mi spiace.



title: query su FE in rete

text:
[cut]
>> HAVING (((tabattivita.[ID attivita])=Forms!mscattivita![ID attivita]));
>>
>> anche se temo che la cosa non avrà un seguito :-)
>
> Mi tocca darti ragione, anche se avrei preferito trovare una soluzione al
> tuo problema. Mi spiace.
>
> --
> PBsoft di Gabriele Bertolucci
>
www.pbsoft.it
>
>
Grazie ugualmente appena trovo (a furia di prove)
la soluzione magari apro un 3D
grazie comunque
buon lavoro


title: MI5 Persecution: BBC Newscasters Spying on my Home (13366)

text:
MI5 Persecution Update: Friday 13 November, 1998
If You Intend To Reply, Please Read This
If you have any questions or observations you would like to share with me,
then you are very welcome to reply to my fax number 0171-681-1190. But
please.... keep your response to one page if you can! I have had several
people faxing my article back to me, including one MP faxing back twenty
pages. I do not know if he had anything intelligent to say in his 20-page
fax because I applied judicious use of the "Delete" key on my
computer. Faxes over a page or two will be deleted without being read.
MI5 Resume Hostilities in Response to these Faxes
When I wrote last weeks "MI5 Persecution Update" I remarked how quiet my
life had become. No longer! MI5 have restarted hostilities with a
vengeance the past week, in response I believe to the faxes I have been
sending to members of the House of Commons.
On Saturday 7 November I went to Clapham Picture House cinema to see the
film "Antz" (a very enjoyable film). At the cinema, I was verbally
assaulted by a group of teenagers with the words "still crazy", repeated
about ten times. There was a film with that name showing at the cinema,
but it was clear their abuse was directed at me. I do not look ill, so why
would they pick on me? answer, the incident was set-up by the
persecutors. One of the teenagers also said to another, "I don't know what
we're laughing at".
The following day, Sunday 8/11/98, I was on my way to play squash when I
was verbally assaulted by a youth who said "it was so funny", without the
slightest trace of humour. What he meant by this phrase was that was
funny, and they were trying to humiliate me. I have heard this phrase "it
was so funny" used at me before many, many times over the last eight and
half years.
Please Encourage Keith Hill MP to Help Me
I live in a bugged house, bugged both for audio and video. My movements
are monitored by MI5. The Security Service have followed me to Canada, to
Poland and the Continent, to the States. I cannot work anywhere, not in
England, not in Canada, because MI5 will destroy whatever employment I am
able to obtain. I have asked Keith Hill MP to help me, and he has refused.
The situation is intolerable. It is Mr Hills job to help me out of this
mess. So, please, as I said in the last fax a week ago: Do not waste your
time returning multiple copies of my faxes to my fax mailbox, as some of
you have done. Instead;
Please encourage Keith Hill M.P. to help me.
I am sorry to be using this device to encourage Mr Hill to help, but I
think eight and half years are quite enough and it is time something was
done to bring this matter to a close.
MI5 Persecution : BBC Newscasters Spying on my Home
This week's topic is the quite extraordinary claim that BBC newscasters
such as Martyn Lewis and Michael Buerk have spied on my living room while
they read the news. I currently have an advert running for the next six
months in Private Eye's "Eye Say" column (at a cost of over #200) which
says,"MI5 Persecution - BBC Newscasters Spying on my Home"; the story of
my campaign in the Eye is on my Website
at;
http://www.pair.com/spook/evidence/plaint/priveye.htm
BBCs staff magazine Ariel also ran my advert "BBC Newsreaders Spying on my
home" for one issue in the Personal category on 8/July/1997 before it was
spotted and axed by editor Robin Reynolds; please see
webpage;
http://www.pair.com/spook/evidence/plaint/ariel.htm
Beginnings
The very first incident in the "MI5/BBC Persecution" occurred in June of
1990, when a newsreader reacted to what she saw in my living room at home
as she read the news. My mother had brought an apple for me into the room,
whereupon the newsreader smirked and giggled, apparently finding this
funny. I couldn't believe what I was seeing. I carried on watching news
and other television programmes to see if presenters would show signs of
"interactive watching"; to my surprise, this happened again and
again. Unfortunately, I did not have my wits sufficiently about me to
videotape these programmes, and it is now almost impossible to obtain
recordings dating back to 1990.
Most of the "TV watching" has occurred on the news, and most of it in
summer 1990, although some as late as autumn 1993. My website has a few
extracts of what might be politicians "getting at" me, in particular John
Major and interviewer Dimbleby sharing a joke about the "Knutsford
Guardian" which is almost certainly about me.
I sold my portable TV in autumn 1990 and stopped watching television
regularly. I realise now that this may have been a mistake. What I should
have done was to watch TV and listen to the radio, but tape-record
everything and make a note of what each excerpt meant to me. I would then
be in a much stronger position as regards to evidence that I am now. That
is what I am trying to do now, but unsurprisingly the TV/radio presenters
have stopped getting at me, now they know they are being recorded.
Examples of Media Harassment
Here are a few examples which I can still remember of media harassment;
In early 1992 I was watching the BBC news with Martyn Lewis on a small
black-and-white portable television at my then home in Oxford. I threw a
term of abuse at Lewis; he flinched, then gave a grin and made a comment
from which I understood that he had been on my side, but might have
changed his mind as a result of what Id just said to him.
Victor Lewis Smith in his TV (BBC2?) program at the end of 1993, had a
taxi-driver saying, "theyre all out to get me", to which VLS replied, "but
you're quite intelligent aren't you?" (what a nice chap VLS is,
compliments no less!)
Paul Daniels the TV magician, sometime in 1990-92 (sorry I can't be more
precise but it was so long ago), made a "crying face" and put his face in
his hands, which was his way of expressing that I was frequently crying in
1990-92, and that he and other media people found my crying funny.
Kenny Everett (deceased) on some talk show, compared me to a "huge
ape" who "scratches himself"; he made some other remarks about what the
"ape" got up to which unfortunately I cant remember. (I remember that
Everetts comments were quite sympathetic and human, but were obviously
about me.)
Stephen Fry on another talkshow (Wogan I think) talking about
"masturbatory fantasies", he then referred to me with the words "you
prat"; I wonder if the studio audience knew what he was talking about and
to whom his comments were directed?
Griff Rhys Jones on Clive James' TV show, made a "lunatic face" (wide
fixed grin) to which I said to the TV that he had a "face like a horse's
arse", to which Clive James said to GRJ "did you hear that?"
Crimestoppers summer 1990, remarks by a Midlands police officer on the
programme, while Nick Ross was presenter (as far as I can remember). The
officer talked about "in car entertainment". Nick Ross said to officer,
"why don't you stop doing it?" to which he replied, "we can't while he's
like this".
BBC2 Newsnight in autumn 1993 had a piece on football hooliganism. A black
interviewee said apparently of the hooligans, but in fact of me; "they're
just idiots, carry on with the surveillance".
There was an incident with Jonathan Ross which I remember clearly; he was
on both BBC and ITV television at the same time, one (ITV I think) was
recorded, the other channel was live. Ross has a speech impediment which
causes him to pronounce his "r"s as "w". I sarcastically said something
about "Mr Woss" to the recorded channel, then turned over to where he was
live, and he repeated "Woss" with heavy emphasis and sarcasm.
On the radio, in spring 1994, Chris Tarrant made a sarcastic remark in his
morning show, saying "he says were trying to kill him, we should be done
for attempted manslaughter", to which another of the studio staff said,
"oh no, dont say that". His comment was in reply to a comparison Id made
the previous evening between my persecutors and the Polish secret police
who murdered dissidents.
Martyn Lewis Denies & Lies, But Wont in Writing
In February 1997 I wrote to BBC Viewer & Listener Correspondence and asked
them to investigate the claim that their newscasters had engaged in
"interactive watching". They replied that they had asked Martyn Lewis and
Michael Buerk whether they had engaged in such practices, and that they
had both made verbal denials to VLC, but were refusing to put their
denials in writing.
I can understand that they might think that if they were to make written
denials to me, then many other people with my condition might write to
them with similar questions. But Ive asked a couple of journalists if
theyve been writing about me, theyve made written denials, Ive believed
them, and I have not put their denials on my website because, since I
believe their denials, it would not be relevant to publish them.
To me it looks as if Lewis and Buerk are happy to lie verbally but not in
writing, because written falsehoods would place them unambiguously in the
wrong, whereas they can try to talk their way out of verbal lies if they
are ever caught, or perhaps even deny the verbal lies completely? If they
lie without shame, then why would they have any shame about future lies
about lying?
One of the strangest aspects of "TV watching" is that Buerk and Lewis have
convinced themselves that their "interactive spying" is reasonable
behaviour. Martyn Lewis thinks of himself as a "gentleman". He expressed
in 1992 that he was "on my side". If this matter ever comes out into the
open, I wonder what these newscasters will have to say for themselves, and
what the British public will make of their behaviour?
Media Persecution Evidence on my Website
You may directly access the Evidence section on my website at URL;
The category currently contains four video segments, a number of audio
files and three published articles. The first video of ITN's John Suchet
is unfortunately a mistake - after looking at it again it is obviously not
about me. The two Ken Clarke excerpts may or may not be about me; it is
funny that he should keep on harping about "paranoia" and "madness", but I
have given these ratings of only 30% certainty, as it is more likely that
they are not about me in particular, and Clarke is simply displaying the
normal prejudices against the mentally ill found in much of society.
The piece I find most interesting is the Dimbleby/John Major interview
from April 1997. I have assigned this a 90% rating. Dimbleby starts by
emphasising a report from the "Knutsford Guardian". Major recognizes
what's going on and joins in with a falsely apologetic "heaven
forfend". The emphasis is on the first syllable pronounced "nuts" in
"Knutsford", which is repeated three times. Of course this is hardly
anywhere near convincing evidence; the really clear items were all in
1990-92, and they are basically unobtainable now.
If you're reading the website, have a look at the two files from David
Hepworth's programme on GLR radio. The first one from 21/Feb/1997 has him
talking about an "embarassment" of prizes and "absolute obscene", in
reference I believe to the verbal sexual abuse that was being used against
me at the time (and which unfortunately is still current). In the second
file dated 9/May/1997 he again talks about "absolute embarrassment" of
prizes, followed by laughter. To my mind he knows I am listening to his
programme, and deliberately makes these remarks for my benefit, with very
little attempt to disguise their purpose.
Bernard Levin - "Fanatic's Fare for the Common Man"
On 21 September 1991 this article by Bernard Levin appeared in The
Times. It is reproduced in the Evidence section of the website, or may be
accessed directly at URL;
To my mind, Levin's article described the situation at the time and in
particular a recent meeting with a friend, during which I for the first
time admitted to someone other than my GP that I had been subjected to a
conspiracy of harassment over the previous year and a half.
Levin writes about a "madman running loose about London" who "bursts into
tears, and swears it is all true. And it is." I am pleased to agree with
his assertion that "it is all true" because the truth is what I presented
to my friend in September 1991 and it is what is being presented to the
readership of these articles now.
Conclusion
The harassment, in particular media persecution, was at its strongest in
1990-92. Today, I am recording everything I watch, read and listen, and
the media have pretty much given up. It is now incidents "in public" which
make up what there is of MI5s persecution. But much of the material from
1990-92 still exists in archives, although the organisations which have
those archives generally wont make the material available to the public,
for copyright and other reasons.
MI5 can no longer employ the media to persecute me, partly because
journalists now know who is behind the persecution, and also because I
would publish any instances. My mistake during 1990-92 was to not record
instances as they happened; Ive learned from that mistake, and know better
now.
13366
--
Posted via NewsDemon.com - Premium Uncensored Newsgroup Service
      ------->>>>>>
http://www.NewsDemon.com
<<<<<<------
Unlimited Access, Anonymous Accounts, Uncensored Broadband Access


title: funzione Dcount

author: Air Jordan

text:
ragazzi ho un grosso problema con la funzione in oggetto.
in un report ho un controllo che dovrebbe contare i record di una query
in base al valore di un controllo di tipo data breve di una maschera di
immissione parametri che apre il suddetto report.
Il casino sta nei criteri della funzione.
Nel contatore del report ho impostato l'origine dati in qs modo:
=DCount("[campo da
contare]";"query";"[Datadacontrollare]<=#"&[Forms]![miamaschera]![datadellamaschera]&"#")
ma non funziona (mi dice "possibile che sia stato inserito un operando
senza operatore"). Ho provato diverse combinazioni ma nulla.
"campo da contare" e "datadacontrollare" fanno parte di "query"
grazie a tutti coloro che vorranno aiutarmi
PS: esistono alternative, magari da VBA???
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: funzione Dcount

author: RF

text:
"Air Jordan" <
bartsi...@katamail.com
> ha scritto nel messaggio
news:7639265384ba1a104e3...@mygate.mailgate.org...

Mi sa che cancelletti apici e & sono tutti di troppo. Io trovo la DCount
lenta, sicchè in una
situazione direi simile, nella query ho aggiunto due espressioni: Quantità:1
e quindi
TotQuantità: [Quantità] con Somma come Formula. In questo caso andrebbe
inoltre
immesso un criterio per valutare le date.


title: funzione Dcount

author: Roberto da casa

text:
"Air Jordan" <
bartsi...@katamail.com
> ha scritto nel messaggio
news:7639265384ba1a104e3...@mygate.mailgate.org...

Prova con:
=DCount("[campo da controllare]";"query";"DataDaControllare <=#" &
Format([Forms]![miamaschera]![DataDellaMaschera];"mm/gg/aaaa") & "#")
Io ho provato e a me funziona.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: funzione Dcount

text:
>
> =DCount("[campo da controllare]";"query";"DataDaControllare <=#" &
> Format([Forms]![miamaschera]![DataDellaMaschera];"mm/gg/aaaa") & "#")
>
> Io ho provato e a me funziona.
>
> --
> Roberto
grazie mille e tanti auguri di pronta guarigione!



title: funzione Dcount

text:
"Air Jordan" <
bartsi...@katamail.com
> ha scritto nel messaggio
news:5d297f1ec05bde10316...@mygate.mailgate.org...
[CUT]
>
> grazie mille e tanti auguri di pronta guarigione!
>
Grazie a te per gli auguri!!! :-)



title: convertire un testo in precisione singola a 2 decimali

text:
da un file di excel prelevo il contenuto di una cella che è di tipo testo  e
continee un prezzo
esempio contiene "1254,36" quando cerco di assegnarlo al mio campo di tipo
precisione singola a 2 decimali
mi da errore di conversione.
sapete come fare per convertirlo?
il prezzo può essere anche piu piccolo o piu grande quindi non riesco a
prelevare i 4 caratteri di sinistra e poi i 2 di destra
dalla vergola in quanto non so quanti caratteri sono.
Grazie a tutti.


author: Giorgio Prx

text:
"Simba883" <
simb...@libero.it
> ha scritto nel messaggio
news:bnmdd2$2ch$1...@lacerta.tiscalinet.it...
> da un file di excel prelevo il contenuto di una cella che č di tipo testo
e
> continee un prezzo
> esempio contiene "1254,36" quando cerco di assegnarlo al mio campo di tipo
> precisione singola a 2 decimali
> mi da errore di conversione.
>
> sapete come fare per convertirlo?
>
> il prezzo puň essere anche piu piccolo o piu grande quindi non riesco a
> prelevare i 4 caratteri di sinistra e poi i 2 di destra
> dalla vergola in quanto non so quanti caratteri sono.
>
> Grazie a tutti.
>
>
Ciao Simba
Prova cosě
Rs!Campo=Val(Str(Cella))
Comunque ti sconsiglio vivamente di utilizzare il tipo di dato "Precisione
singola" per memorizzare i prezzi.
Ciao Giorgio


text:
> Ciao Simba
> Prova così
>
> Rs!Campo=Val(Str(Cella))
>
> Comunque ti sconsiglio vivamente di utilizzare il tipo di dato "Precisione
> singola" per memorizzare i prezzi.
>
> Ciao Giorgio
nullla, non và qualcuno sa illuminarmi sulla conversione da stringa a
precisione singola 2 decimali?


text:
>
> Ciao Simba
> Prova così
>
> Rs!Campo=Val(Str(Cella))
>
> Comunque ti sconsiglio vivamente di utilizzare il tipo di dato "Precisione
> singola" per memorizzare i prezzi.
>
> Ciao Giorgio
>
>
nulla ho provato anche cosi:
                    rs!prezzoacquisto =
Round(Val(excDoc.Worksheets(1).Cells(i, j + 2)), 2)
ma non và, prende solo la parte intera anche se la stringa vale ad esempio
"1583,82"
qualcuno mi sà aiutare? help me.


text:
>
> Ciao Simba
> Prova così
>
> Rs!Campo=Val(Str(Cella))
>
> Comunque ti sconsiglio vivamente di utilizzare il tipo di dato "Precisione
> singola" per memorizzare i prezzi.
>
> Ciao Giorgio
>
>
nulla ho provato anche cosi:



text:
> Ciao Simba
> Prova così
>
> Rs!Campo=Val(Str(Cella))
>
> Comunque ti sconsiglio vivamente di utilizzare il tipo di dato "Precisione
> singola" per memorizzare i prezzi.
>
> Ciao Giorgio



text: Scusate ci deve essere qualche doppione


text:
"Simba883" <
simb...@libero.it
> ha scritto nel messaggio
news:bnn1qc$gav$1...@lacerta.tiscalinet.it...

Prova a controllare meglio
Round(Val(Str(excDoc.Worksheets(1).Cells(i, j + 2))), 2)
Esempio
-----------------------
Dim Numero As Variant
Numero = "125,55"
Debug.Print Val(Str(Numero)) + 15.1
Debug.Print Val(Numero) + 15.1
------------------------
Risultati :
 140,65
 140,1
NB Round non arrotonda in modo corretto
Ciao Giorgio.


title: Analizzatore database

author: franco maggio

text:
Buongiorno a tutti,
ho la necessità di passare un mio progetto ad una collega che lo seguirà al mio posto (sto per andare in pensione).
Vorrei passarle una documentazione chiara ed esaustiva del mio progetto, così ho visto l'Analizzatore Database di Access, che francamente mi ha un po' scoraggiato: per una tabella di soli due campi (ID e descrizione) mi ha creato un report di 3 pagine. Per una maschera un po' complessa ha generato 111 pagine!
Non è possibile modificare l'impostazione dell'Analizzatore, o il report generato?
Oppure esiste qualche altro strumento che faccia il lavoro in maniera più spicciola?

grazie e saluti
Franco


title: Analizzatore database

author: Ammammata

text:
Il giorno Wed 31 Mar 2021 12:38:13p, *franco maggio* ha inviato su
it.comp.appl.access il messaggio
news:acb1e052-f648-480b...@googlegroups.com
. Vediamo
cosa ha scritto:

> per una tabella di soli due campi (ID e descrizione) mi ha creato un
> report di 3 pagine. Per una maschera un po' complessa ha generato 111
> pagine!
>

LOL

la app su cui sto sudando in questi giorni ha una tabella, 6 query, due
form e due report... 706 pagine :)

--
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
-=- -=- -=- -=- -=- -=- -=- -=- - -=-
........... [ al lavoro ] ...........


title: Analizzatore database

author: BFS

text:
Il 31/03/2021 14:20, Ammammata ha scritto:
> Il giorno Wed 31 Mar 2021 12:38:13p, *franco maggio* ha inviato su
> it.comp.appl.access il messaggio
>
news:acb1e052-f648-480b...@googlegroups.com
. Vediamo
> cosa ha scritto:
>
>> per una tabella di soli due campi (ID e descrizione) mi ha creato un
>> report di 3 pagine. Per una maschera un po' complessa ha generato 111
>> pagine!
>>
>
> LOL
>
> la app su cui sto sudando in questi giorni ha una tabella, 6 query, due
> form e due report... 706 pagine :)
>

si ma magari ha 700 classi :-)
di che app si tratta?

BFS


title: Analizzatore database

text:
Il giorno Wed 31 Mar 2021 02:28:30p, *BFS* ha inviato su
it.comp.appl.access il messaggio news:s41ptd$1lc2$
1...@gioia.aioe.org
. Vediamo
cosa ha scritto:

> di che app si tratta?

errata corrige: la "APP" (fatta con Access) su cui... etc etc

chiamarla app è un errore, è solo una maschera per calcolare il prezzo di
un prodotto attraverso i vari passaggi: manufacturer, distributor,
wholesaler, retailer, end consumer, ma fa tanto figo ;)



title: Analizzatore database

author: Bruno Campanini

text:

Lavoro su Access dalla versione 1... non sapevo nemmeno esistesse!

Bruno


title: Analizzatore database

text:
Il giorno Thu 01 Apr 2021 01:02:55p, *Bruno Campanini* ha inviato su
it.comp.appl.access il messaggio news:s44991$gv7$
1...@solani.org
. Vediamo cosa
ha scritto:

>
> Lavoro su Access dalla versione 1... non sapevo nemmeno esistesse!
>
>

ti seguo a ruota, lavoro dalla versione 2 che se ben ricordo mi era stata
regalata insieme al computer (CDC? dovrei verificare, circa 1993, č passato
qualche anno)



title: Analizzatore database

text:

Ciao a tutti,
noto dalle varie risposte che non è molto usato l'analizzatore, in effetti è mastodontico.
La mia applicazione gestisce le visite periodiche di medicina del lavoro; è un database con 23 tabelle, 113 query, altrettante maschere e report, una serie di Moduli e poche classi.
Non ho neanche provato a lanciare l'Analizzatore per tutti gli oggetti.
Qualcuno usa qualche altro strumento o bisogna farsi una guida a mano? Ho iniziato a scriverla, ma alla 4° pagina di Word mi sono già stufato, ho descritto il programma, il flusso delle azioni, le autorizzazioni utenti e non ho ancora parlato della struttura delle tabelle. :-(
Saluti
Franco


title: Analizzatore database

text:

Da quel che dici non dovrebbe essere un programma molto complicato.
Se il tuo collega lo deve in pratica solo usare, spiegagli ciò.
Poi con l'uso si renderà conto anche di come è costruito e magari
vorrà farci qualche modifica, sempre che non sia proprio a zero
con Excel.

Semplice curiosità: quel programma l'hai scritto tu?

Bruno


title: Analizzatore database

author: Karl Donaubauer

text:
Salve,

franco maggio:

Se non deve essere tutto in italiano, controlla la sezione
"Documentation Tools" sul sito di Crystal Long, specialmente "Analyzer":
https://www.msaccessgurus.com/tools.htm

--
Ciao
Karl
*********
http://AccessDevCon.com

Access FAQ:
https://www.donkarl.com/it


title: Analizzatore database

text:

Ciao Bruno, sì il programma l'ho scritto io, naturalmente coadiuvato dai colleghi che conoscono la normativa. Diciamo che per prepararlo ho dovuto anche imparare un po' la materia, che è assai complessa.
L'ho scritto con Access e ora dovrei passarlo ad una collega, che non deve usarlo ma manutenerlo in caso di variazione delle norme; attualmente l'ultima modifica effettuata da me risale ad Agosto 2019, quindi non è così frequente dover intervenire; più che altro, come avviene spesso in questi casi, l'appetito vien mangiando, quindi gli utenti man mano mi chiedevano implementazioni che permettessero loro altre funzionalità ("non potrebbe fare anche ...?") e io provavo ad accontentarli.
L'ho sempre fatto durante l'orario di lavoro, con strumenti aziendali, quindi non posso (e non voglio) chiedere di fare il consulente esterno.


title: Immagini e foto

author: @libero.it Enzino

text:
Buongiorno a tutti...
C'č qualche anima pia che puņ illustrarmi il modo migliore per inserire in
un campo (chiamiamolo "Foto")  l'eventuale fotografia di un soggetto
abbinata al campo "Cognome_Nome" senza che access la gestisca in modo tale
da inserire fisicamente la foto nel DB aumentando in maniera spropositata il
suo peso?
Grazie a tutti
Enzo


title: Immagini e foto

author: Alessandro Baraldi

text:
"Enzino" <"Enzino"> wrote in message
news:Y4XBb.177640$
vO5.7...@twister1.libero.it

E' una questione ormai molto discussa della quale trovi traccia
sui 3D nel NG.
Sul sito comune ci sono alcuni esempi molto chiari gią fatti
che puoi usare e studiare.
www.sitocomune.com
Ciao.
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Relazioni in access

author: vistabrxp

text:
Salve,
volevo porvi una domanda.
Io ho creato 4 tabelle.
Praticamente devo creare una relazione del tipo che la tabella n° 1 è
per
esempio il luogo di conservazione di un articolo, la seconda la
stanza, la
terza lo scaffale e la quarta è la descrizione dell'oggetto.
Vorrei mettere in relazione del tipo 1 a molti a cascata.
per esempio nel luogo 1 ci posso essere tante stanze, nelle tante
stanze ci
sono vari scaffali etc,.
Spero di essermi spiegato.
Potete aiutarmi per piacere? Magari con un db di esempio....
Grazie mille.


title: Relazioni in access

text:
"vistabrxp" <
19589i...@mynewsgate.net
> ha scritto nel messaggio
news:200608300...@mynewsgate.net...

No so di cosa si tratti, ma se ti crei le tabelle con il wizard di access
(creazione guidata) le relazione te le crea automaticamente access .......


title: Relazioni in access

author: Sergio MAZZA

text:
"vistabrxp" <
19589i...@mynewsgate.net
> ha scritto nel messaggio
news:200608300...@mynewsgate.net...
> Salve,
---omissis---
> Potete aiutarmi per piacere? Magari con un db di esempio....
Magari se scrivi anche che lo stesso messaggio lo hai inviato a più NG, ci
fai un favore; grazie...
> Grazie mille.
Ciao.
--
Sergio MAZZA


title: Relazioni in access

text:
Scusa non sapevo che fossero monitorati anche dalle stesse persone.
Sarà per la prossima vola.
Mi dispiace ed ancora grazi emille.
Sergio MAZZA <
sergi...@tiscali.it
> ha scritto:



title: Relazioni in access

author: ScaccoMatto

text:
"vistabrxp" <
19589i...@mynewsgate.net
> ha scritto nel messaggio
news:200608301...@mynewsgate.net...
> Scusa non sapevo che fossero monitorati anche dalle stesse persone.
Quì tutti abbiamo il dono dell'ubiquità, siamo quasi divini, tranne che per
il fatto che molti sanno usare poco access (io in primis)   :-)
--
ScaccoMatto


title: Immagine su Report Access 2000 esportato in Word 2000

author: Riaudo Marcello

text:
*Da Riaudo Marcello **********
Salve  a  tutti qualcuno sa perché quando si è in un report view Prev ed
utilizzi  Collegamenti Office e Pubblica con Ms Word ,se il report contiene
un campo classe Ole (immagine) questa non viene riportata in windows è
Impossibile
Saluti
Marcello
************************************


author: Carlo Costarella

text:
"Riaudo Marcello" <
riau...@tin.it
> ha scritto nel messaggio
news:435c0877$0$20491$4faf...@reader4.news.tin.it...

Purtroppo è così.
Alternative valide PDFCreator e simili, "stampanti" PDF gratuite,
Snapshot di Access...
Ciao, Carlo


title: messaggio dopo una query di azione

author: Salvatore

text:
E' possibile, al termine di una query di azione (accodamento o eliminazione)
ottenere un rapporto dei record accodati e non accodati (ovvero eliminati o
meno)?
In pratica, vorrei che al termine dell'esecuzione della query apparisse una
finestra messaggio più o meno con questa dicitura:
"record accodati xxx, record non accodati yyy", senza ricorrere ai messaggi
di avviso di access relativi alle query.
Ciao, Salvatore


title: messaggio dopo una query di azione

text:
"Salvatore" <
sal...@tiscalinet.it
> ha scritto nel messaggio
news:aabpgu$ikq$1...@pegasus.tiscalinet.it...

Se l'accodamento o la cancellazione la vuoi fare usando una query di
comando, penso che, o ti contenti dei messaggi di avviso standard, o nisba.
;-)
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: messaggio dopo una query di azione

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:_1Xy8.26245$W9.6...@twister2.libero.it...

Ho trovato una soluzione banale.
DoCmd.SetWarnings False
            prima = DCount("id", "Tabtabella")
    DoCmd.OpenQuery "NomeQuery di accodamento", acNormal, acEdit
        dopo = DCount("id", "TabTabella")
            aggiunti = dopo - prima
                If aggiunti = 0 Then messaggio = "Nessun nuovo record." Else
messaggio = "Record aggiunti =" & aggiunti
                    messaggiofinale = "Accodamento terminato." & Chr(13) &
messaggio
    MsgBox messaggiofinale, vbInformation, "Dettagli accodamento"
    DoCmd.SetWarnings True
Può essere, poi, sfruttata per le diverse query variando il contenuto dei
messaggi.
Ciao, Salvatore


title: messaggio dopo una query di azione

text:
"Salvatore" <
sal...@tiscalinet.it
> ha scritto nel messaggio
news:aahhl8$c92$1...@pegasus.tiscalinet.it...
[CUT]
> Ho trovato una soluzione banale.
[CUT]
Troppo giusto!



title: messaggio dopo una query di azione

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:bqYy8.109206$SR5.2...@twister1.libero.it...

Grazie, detto da te č un piacere
Salvatore


title: report access 2003

author: giulio

text:
ACCESS 2003, ho problemi nella sezione report, sia modificando un
report esistente che creandone uno nuovo.
Errore "Impossibile creare il report".
Se invece mi connetto al computer con un altro utente funziona tutto,
entrambi gli utenti sono amministratori del PC.


title: report access 2003

author: NeTuSeR

text:
O.S. Utilizzato?
"giulio" <
giu...@virgilio.it
> ha scritto nel messaggio
news:dc16b0fc.04042...@posting.google.com...



title: report access 2003

text:
Windows XP Prof.
prima di istallare office 2003 avevo office 2000 e funzionava tutto
ora ho problemi anche con file creati con access 2000
Grazie
"NeTuSeR" <
m.chi...@spammer.it
> wrote in message news:<c63gqo$a3j$
1...@lacerta.tiscalinet.it
>...



title: aprire database ->Eseguire query creazione tabella -> chiudere database ??

author: Max

text:
Ho la necessità di aggiornare 2 query creazione tabella circa due volte al
giorno.
Ho pensato di creare un evento nell'unità di pianificazione (win98) e aprire
il mio DB in un orario di pausa (nessuno sta usando il DB)
Quando è aperto volevo inserire a seguito dell'evento  " SU TIMER ":
DoCmd.DeleteObject acTable, "prova"    ' elimina la tabella creata con
l'aggiorn. preced.
Dim stDocName As String
    stDocName = "Query2"
    DoCmd.OpenQuery stDocName, acNormal, acEdit   ' esegue query creazione
tabella
Cosi facendo se imposto un timer di 5000 (es) , dato che il DB non è usato
da nessuno esegue la query, ma se si arriva un altra volta a 5000 la esegue
di nuovo e cosi via.
Potrebbe capitare con persone che si addormentano davanti al PC, che la
query viene eseguita più volte anche quando non serve. Essendo questa query
abbastanza "pesante" (per il mio caso) , che impiega circa 80 - 90 secondi
per essere eseguita (va ad interrogare un DB mySQL su un server Linux),
preferirei non farla eseguire quando non serve.
Non volendo annoirvi più di tanto, ecco la domanda:
Come posso gestire questa necessità di APRI - ESEGUI (una volta ) - CHIUDI
??
Many thanks
Ciao by Ciao by Max
max...@quios.com

max...@libero.it
 Visit my web page at
http://run.to/Galway


author: Nicola Ardito

text:
Max ha scritto nel messaggio <954e97$lbe$
1...@lacerta.tiscalinet.it
>...
>Ho la necessità di aggiornare 2 query creazione tabella circa due volte al
>giorno.
>Ho pensato di creare un evento nell'unità di pianificazione (win98) e
aprire
>il mio DB in un orario di pausa (nessuno sta usando il DB)
Guarda tra le opzioni di partenza, se non ricordo male con /x:nomemacro puoi
eseguire una qualsiasi macro all'avvio. Nella macro fai quello che devi
fare e ci metti pure se serve  un bel comando di uscita dall'applicazione.
>Quando è aperto volevo inserire a seguito dell'evento  " SU TIMER ":
>
>DoCmd.DeleteObject acTable, "prova"    ' elimina la tabella creata con
>l'aggiorn. preced.
>
>Dim stDocName As String
>    stDocName = "Query2"
>    DoCmd.OpenQuery stDocName, acNormal, acEdit   ' esegue query creazione
>tabella
>
>Cosi facendo se imposto un timer di 5000 (es) , dato che il DB non è usato
>da nessuno esegue la query, ma se si arriva un altra volta a 5000 la esegue
>di nuovo e cosi via.
>Potrebbe capitare con persone che si addormentano davanti al PC, che la
>query viene eseguita più volte anche quando non serve. Essendo questa query
>abbastanza "pesante" (per il mio caso) , che impiega circa 80 - 90 secondi
>per essere eseguita (va ad interrogare un DB mySQL su un server Linux),
>preferirei non farla eseguire quando non serve.
>Non volendo annoirvi più di tanto, ecco la domanda:
>Come posso gestire questa necessità di APRI - ESEGUI (una volta ) - CHIUDI
>??
Ciao Nicola
email: metti inwind al posto  di NOSPAM


title: Relazione uno a uno e maschera...

author: Jonathan Canova

text:
Salve a tutti!
Ci ho per le mani uno di quei problemini che *dovrebbero* essere da poco ed
invece mi stanno facendo dannare...
Quasi quasi mi faccio dare anch'io l'elenco dei santi :-)
Evito di dirvi su cosa è il database, non sono argomenti allegri :-)
Il problema è il seguente: ho due tabelle in relazione uno a uno. La tabella
A può contenere un record senza che nella B ci sia il corrispondente. Il
contrario non deve avvenire. Ho costruito una maschera che contiene i campi
di entrambe le tabelle. Il problema sta nella cancellazione del record nella
tabella B, lasciando integro quello nella tabella A.
1. Se cancello con i metodi normali (tipo selezionando la barra e premendo
Canc), vengono cancellati entrambi i record. Ok.
2. Se eseguo un'istruzione SQL tipo "Delete * From B Where IDB=" & Me!IDB,
funziona, ma ecco l'inghippo:
la maschera mi presenta i campi relativi alla tabella "B" con la scritta
"#Eliminato"; l'espressione IsNull(IDB) non funziona più (IDB="" !!), se
desidero riaggiungere il record nella tabella B sono bloccato.
Il tutto funziona se prendo l'ID di A, faccio una requery, ritorno all'ID di
A. Però sono tabelle grossine, e il requery di tutto è pesante. Idee?
(addirittura ho provato, in un impeto di follia, a cambiare l'ID di B in
Null e poi a cancellare il rispettivo record. Quando ho scritto Me.Recalc,
Access 2000 si è arrabbiato moltissimo :-)
--
Cordiali saluti,
Jonathan Canova
www.aladinoinformatica.com


title: Relazione uno a uno e maschera...

author: Roberto - Syd

text:
"Jonathan Canova" <
gionataSE...@galactica.it
> ha scritto nel messaggio
news:a1l1uc$rircr$1...@ID-109056.news.dfncis.de...

Prova a fare un refresh del form dovrebbe essere sufficiente.
Ciao Roberto - Syd


title: Relazione uno a uno e maschera...

text:
"Roberto - Syd" <
p.ro...@tin.it
> ha scritto nel messaggio
news:n%B%7.4936$pm3.1...@news1.tin.it...
> Prova a fare un refresh del form dovrebbe essere sufficiente.
Magari... ho appena provato! Grazie comunque.



title: Calcolo in base a valore campo

author: Dimma

text:
Ho una tabella con un campo "superficie" numerico ed un campo "importo"
valuta.  Come posso fare per far sì che in automatico nel campo "importo"
venga effettuato il
seguente calcolo al momento in cui scrivo dentro il campo "superficie" :
Se [Superficie] è compresa tra 0 e 999 allora [Importo] è uguale a
[Superficie]* 340.000, se invece [Superficie] tra 1.000 e 1.999 allora
[Importo] è uguale a [Superficie]* 400.000 ?
Grazie mille per l'aiuto. Esiste un buon titolo di un libro da cui possa
imparare questi tipi di interrogazioni sql ?
Grazie mille a tutto il newsgroup
Dimma


title: Calcolo in base a valore campo

author: pietro

text:
"Dimma" <
di...@tiscalinet.it
> ha scritto nel messaggio
news:8tv44k$edt$1...@lacerta.tiscalinet.it...
> Ho una tabella con un campo "superficie" numerico ed un campo "importo"
> valuta.  Come posso fare per far sě che in automatico nel campo "importo"
> venga effettuato il
> seguente calcolo al momento in cui scrivo dentro il campo "superficie" :
> Se [Superficie] č compresa tra 0 e 999 allora [Importo] č uguale a
> [Superficie]* 340.000, se invece [Superficie] tra 1.000 e 1.999 allora
> [Importo] č uguale a [Superficie]* 400.000 ?
Non puoi fare questo calcolo da una tabella ma in una maschera.
sull'controllo Importo della maschera attivi le proprieta' e nell'evento su
attivato inserisci il seguente codice:
IF ME.SUPERFICIE > 999 THEN
    ME.IMPORTO = ME.SUPERFICIE * 340000
ELSE
    ME.IMPORTO = ME.SUPERFICIE * 400000
END IF
Ogni volta che attivi la maschera e inserisci un valore nel campo superficie
e poi passi al campo Importo quest'ultimo conterra' gia' il valore.
> Grazie mille per l'aiuto. Esiste un buon titolo di un libro da cui possa
> imparare questi tipi di interrogazioni sql ?
Queste non sono interrogazioni sql !!!!!!!!!!!!!!!
I comandi che ho scritto sopra sono codice Vba.
Per Vba di libri ce ne sono molti e, putroppo, tutti costosissimi.
Puoi cominciare dal libro della Ms Access Passo a Passo.
> Grazie mille a tutto il newsgroup
>
> Dimma
>
Di nulla,
Pietro


title: Collections ... KO!

author: Simone Calligaris

text:
Sostanzialmente non ho mai usato Collections al posto di Arrays
tradizionali, ora che mi piacerebbe farlo incontro problemi (Access
XP/2003):
All'interno di NorthWind.mdb (versione inglese) si può provare questo
codice:

Sub ProvaCollection()

  Dim Rst As Recordset
  Dim Categories As New Collection, strCategories As String

  On Error GoTo GestErr

  'Memorizza Descrizione Categorie in Collection indicizzata per
Cod.Categoria
  Set Rst = CurrentDb.OpenRecordset("SELECT * From Categories;")

  While Rst.EOF = False

         Categories.Add Rst!Description, Rst!CategoryName

         Rst.MoveNext

  Wend

  Rst.Close
  Set Rst = Nothing

  MsgBox Categories.Count

  'Dato in Input il Codice Categoria, restituisce la descrizione

InputCodice:

  strCategories = InputBox("Codice Categoria")

  MsgBox Categories.Item(strCategories)   'Non va!

  Exit Sub

GestErr:

  If Err.Number = 5 Then
         MsgBox "Valore Inesistente!", vbInformation, "No!"
         Resume InputCodice
  Else
         MsgBox Err.Number & "   " & Err.Description, vbCritical, ""
  End If

End Sub

>

Il codice dovrebbe essere corretto ma non fa quello che dovrebbe:
Categories.Item(strCategories) da errore.
E' come se la Collection facesse riferimento al Recordset precedentemente
aperto, invece che andare per la sua strada.
Per la cronaca, ho appena verificato che il codice funziona perfettamente
con il preistorico Access 97!

Saluti e buon anno a tutti.


title: Collections ... KO!

text:
"Simone Calligaris" <

(cut)

> E' come se la Collection facesse riferimento al Recordset precedentemente
> aperto, invece che andare per la sua strada.

E, infatti, se ricorro a una variabile di comodo prima dell'assegnazione
alla Collection, poi non ci sono problemi:

While Rst.EOF = False

         TempVar = Rst!Description

         Categories.Add TempVar, Rst!CategoryName

         Rst.MoveNext

Wend

Mah.

Saluti da Simone


title: Collections ... KO!

author: Bruno Campanini

text:
Simone Calligaris explained :

Io ho sempre usato un For... Naxt:

Dim Categories As New Collection, RS as Recordset, i
Set RS = ...
For Each i in RS
   Categories.Add i.Item, i.Key
Next

Bruno


title: Collections ... KO!

text:
Non ho ben capito perchè la Collection salva il riferimento dinamico all'oggetto aperto invece che il valore ma pazienza...
Quello che non comprendo è perchè devi salvare un RS in una Collection...?

Hai un motivo particolare...?

Io uso spesso Collection di Classi, diciamo che la programmazione OOP si basa su questo... ad esempio la Collection CONTROLS è una collection di Oggetti...

Mi sfugge il senso di quanto hai testato, salvo non sia solo sperimentale.
Sai che le Collction sono più lente in certi casi di un Array... ma sono INDICIZZABILI per una KEY che è anche una stringa... o Nome dell'oggetto ad esempio.

Qualche cosa mi sfugge...

@Alex


title: Collections ... KO!

text:
"@Alex"

(cut)

Mi sfugge il senso di quanto hai testato, salvo non sia solo sperimentale.
Sai che le Collction sono più lente in certi casi di un Array... ma sono
INDICIZZABILI per una KEY che è anche una stringa... o Nome dell'oggetto ad
esempio.

>

In effetti quello era un semplice esperimento, posto che il bug esiste ed è
incomprensibile.
L'utilizzo che m'interessa per le Collection è, appunto, come equivalenti
degli Arrays "associativi" di PHP e altri linguaggi (accedere per chiave
univoca alfanumerica invece che solo per Indice, come negli arrays
tradizionali).

Saluti da Simone.


title: Collections ... KO!

text:
Simone Calligaris presented the following explanation :

> In effetti quello era un semplice esperimento, posto che il bug esiste ed è
> incomprensibile.
[...]

Win8.1/Access2013/64bit funziona regolarmente.

==========================
Private Sub Command76_Click()
Dim cColl As New Collection, RS As Recordset

Set RS = CurrentDb.OpenRecordset("SELECT Assenze.* FROM Assenze;")

While RS.EOF = False
    cColl.Add RS![ID], RS![CIP]
    RS.MoveNext
Wend
MsgBox cColl.Count

End Sub
===========================

Bruno


title: Collections ... KO!

text:

Bruno riprova il tuo esempio distruggento l'oggetto RS come ha esposto Simone nel suo primo Post... che poi era l'oggetto della stranezza...

Tipo:

  Rs.Close
  Set Rs = Nothing

  MsgBox cColl.Count

@Alex


title: Collections ... KO!

text:
@Alex wrote :

> Bruno riprova il tuo esempio distruggento l'oggetto RS come ha esposto Simone
> nel suo primo Post... che poi era l'oggetto della stranezza...
>
> Tipo:
>
>   Rs.Close
>   Set Rs = Nothing
>
>   MsgBox cColl.Count
>
Quelle due righe le uso solo quando debbo riutilizzare
RS per un altro Set RS..., sempre nell'ambito
drella stessa procedura.
Diversamente a che serve chiudere RS? quando esci
dalla routine si chiude da solo (salvo naturalmente
sia stato definito statico).
Fa tanto programmazione alla MS... cioè una serie
di istruzioni ridondanti che non servono un c...

Comunque questa da me funziona regolarmente:
===========================================
Private Sub Command76_Click()
Dim cColl As New Collection, RS As Recordset

Set RS = CurrentDb.OpenRecordset("SELECT Assenze.* FROM Assenze;")

While RS.EOF = False
    cColl.Add RS![ID], RS![CIP]
    RS.MoveNext
Wend

RS.Close
Set RS = Nothing
MsgBox cColl.Count

End Sub
====================================

Ben risentito per l'anno nuovo e 1/0 auguri!
(chissà che non me la copino i trogloditi degli SMS...)

Bruno


title: Collections ... KO!

text:
"Bruno Campanini"

> Comunque questa da me funziona regolarmente:

(cut)

Il codice che ho postato (trasferimento da Recordset a collection e accesso
per key univoca) non funziona con le versioni di Access > 97, compresa la
2010.
Comunque si può aggirare il problema, come dicevo, passando per una
variabile di comodo.

Saluti.


title: Collections ... KO!

text:
Il giorno venerdì 2 gennaio 2015 18:58:58 UTC+1, Simone Calligaris ha scritto:

> Il codice dovrebbe essere corretto ma non fa quello che dovrebbe:
> Categories.Item(strCategories) da errore.
> E' come se la Collection facesse riferimento al Recordset precedentemente
> aperto, invece che andare per la sua strada.

Si, perche' con rst!eccetera gli passi in realta' un riferimento al
campo del recordset, non il suo valore.

Se invece scrivi :

Categories.Add Rst.Fields("Description").Value, _ Rst.Fields("CategoryName").Value

ti funziona che e' una bellezza e senza variabili intermedie.


title: Collections ... KO!

text:
> Il codice dovrebbe essere corretto ma non fa quello che dovrebbe:
> Categories.Item(strCategories) da errore.
> E' come se la Collection facesse riferimento al Recordset precedentemente
> aperto, invece che andare per la sua strada.

Si, perche' con rst!eccetera gli passi in realta' un riferimento al
campo del recordset, non il suo valore.

Se invece scrivi :
Categories.Add Rst.Fields("Description").Value, _
Rst.Fields("CategoryName").Value

ti funziona che e' una bellezza e senza variabili intermedie.

>

Effettivamente l'inghippo si risolve senza sotterfugi: bravo!

Saluti da Simone


title: Collections ... KO!

text:
Simone Calligaris has brought this to us :

Ok, repetita iuvant.

Bruno


title: Collections ... KO!

text:

Grazie :-)

> Saluti da Simone

Ti saluto anch' io


title: Collections ... KO!

text:
> Effettivamente l'inghippo si risolve senza sotterfugi: bravo!

Grazie :-)

>

A proposito, non prendertela per l'altro Thread: mi hai beccato in un
momento tragico (la nuova IVA per la P.A. inventata dai soliti perdigiorno
bivaccati a Roma).

Saluti.


title: Collections ... KO!

text:
Il giorno mercoledì 14 gennaio 2015 11:46:43 UTC+1, Simone Calligaris ha scritto:
> > Effettivamente l'inghippo si risolve senza sotterfugi: bravo!
>
> Grazie :-)
>
> >
>
> A proposito, non prendertela per l'altro Thread:

Ma certo che no :-)
Anzi, apprezzo questo tuo post, sei simpatico.

> mi hai beccato in un momento tragico (la nuova IVA per la P.A.
> inventata dai soliti perdigiorno bivaccati a Roma).

Gia'. Oramai se ne sono accorti tutti che razza di feccia sia.
Tutta. Senza distinzione.


title: Macro Compatta e Ripristina

author: Pippurio

text:
Ciao a tutti, qualcuno sa dirmi come faccio a fare una macro Compatta
e Ripristina?
Grazie
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Macro Compatta e Ripristina

text:
> Ciao a tutti, qualcuno sa dirmi come faccio a fare una macro Compatta
> e Ripristina?
> Grazie
NON PUOI DALLO STESSO DB


title: Macro Compatta e Ripristina

author: Lorenzo Coronati

text:
Scrisse "Pippurio" <
pipp...@inwind.it
>:
>Ciao a tutti, qualcuno sa dirmi come faccio a fare una macro Compatta
>e Ripristina?
Un metodo "sporco" e' quello di usare sendkeys e simulare il
richiamo della voce di menu.
Occhio pero' se hai menu personalizzati...
Altrimenti guarda sul sito comune.
--
Lorenzo Coronati
--
<<cazzo ma come siamo "simpatici " eh ?>>
(Enrico Virginio, 17/03/2002)
--


title: Macro Compatta e Ripristina

text:
> Ciao a tutti, qualcuno sa dirmi come faccio a fare una macro Compatta
> e Ripristina?
Puoi farlo dallo stesso DB solo utilizzando le barre dei menů personalizzati


title: Casella di testo proprietà Value

author: Giuseppe Compagnucci

text:
Scusatemi ,  il mio problema è questo :
se in una casella di testo "SiglaProvincia" immetto un valore (che corrisponde alla sigla della provincia )
nella casella riepilogo "Nazione" vorrei che venga inserito automaticamente  "ITALIA"

io faccio così :

If  Me.SiglaProvincia.Value = "AN" _
Or Me.SiglaProvincia.Value = "AL" _
Or Me.SiglaProvincia.Value = "AG" _  ecc. ecc.

Then

Me.Nazione = "Italia"

End If

e devo inserire tutte le sigle delle provincie

invece per inserire semplicemente un valore che comprende tutte le sigle delle provincie ?
è possibile ?
come posso fare ?

Grazie
Giuseppe


title: Casella di testo proprietà Value

author: BFS

text:

se controlli ogni singola provincia vuol dire che l'utente può inserire
anche non province italiane mi par di capire.
se cosi è, come fai a determinare che una sigla sia una provincia
italiano o estera?

avrebbe più senso fare il contrario se devi registare anagrafiche di più
nazioni
quindi selezionare prima la nazione
dalla nazione il cap
dal cap ottieni paese e pv
(l'archivio dei cap italiani si trova facilmente online)

ciao
BFS


title: Casella di testo proprietà Value

text:
Il giorno martedì 29 dicembre 2020 alle 15:03:42 UTC+1 BFS ha scritto:
> Il 29/12/2020 12:30, Giuseppe Compagnucci ha scritto:
> > Scusatemi , il mio problema è questo :
> > se in una casella di testo "SiglaProvincia" immetto un valore (che corrisponde alla sigla della provincia )
> > nella casella riepilogo "Nazione" vorrei che venga inserito automaticamente "ITALIA"
> >
> > io faccio così :
> >
> > If Me.SiglaProvincia.Value = "AN" _
> > Or Me.SiglaProvincia.Value = "AL" _
> > Or Me.SiglaProvincia.Value = "AG" _ ecc. ecc.
> >
> > Then
> >
> > Me.Nazione = "Italia"
> >
> > End If
> >
> >
> >
> >
> > e devo inserire tutte le sigle delle provincie
> >
> > invece per inserire semplicemente un valore che comprende tutte le sigle delle provincie ?
> > è possibile ?
> > come posso fare ?
> >
> > Grazie
> > Giuseppe
> >
> se controlli ogni singola provincia vuol dire che l'utente può inserire
> anche non province italiane mi par di capire.

No questa operazione mi serve per le sole province Italiane
quindi se è possibile vorrei  che  se  immetto un valore ( sigla provincia ) nella casella Testo SiglaProvincia   dopo l'evento  SU USCITA
la casella riepilogo "Nazione" visualizzi "Italia"  tutto qui

Ciao
Giuseppe


title: Casella di testo proprietà Value

author: Karl Donaubauer

text:
Salve,

Giuseppe Compagnucci:
>>> se in una casella di testo "SiglaProvincia" immetto un valore (che corrisponde alla sigla della provincia )
>>> nella casella riepilogo "Nazione" vorrei che venga inserito automaticamente "ITALIA"
>>>
>>> io faccio così :
>>>
>>> If Me.SiglaProvincia.Value = "AN" _
>>> Or Me.SiglaProvincia.Value = "AL" _
>>> Or Me.SiglaProvincia.Value = "AG" _ ecc. ecc.
>>>
>>> Then
>>>
>>> Me.Nazione = "Italia"
>>>
>>> End If
>>> ...
>
> ... questa operazione mi serve per le sole province Italiane
> quindi se è possibile vorrei  che  se  immetto un valore ( sigla provincia ) nella casella Testo SiglaProvincia   dopo l'evento  SU USCITA
> la casella riepilogo "Nazione" visualizzi "Italia"  tutto qui

"Dopo aggiornamento" della casella di testo "SiglaProvincia":

If  Not Isnull(Me!SiglaProvincia) Then

    Me!Nazione = "Italia"

End If

Però sarebbe meglio di avere una tabella con tutte le province d'Italia
e controllare se si tratta di un valore giusto. Un modo semplice sarebbe
di cambiare la casella di testo in una casella combinata con tutte le
province da dove l'utente deve scegliere invece di battere "§§$%&*.

--
Ciao
Karl
*********
http://AccessDevCon.com

Access FAQ:
https://www.donkarl.com/it


title: Casella di testo proprietà Value

text:

Davvero semplice
grazie

Giuseppe


title: record e spazi

author: cio

text:
ciao
devo creare una tabella con alcuno campi tra cui nome e cognome.
i campi devono essere tutti di 35 caratteri e devono essere riempiti di
spazi nelle posizioni rimanenti
Ovvero
Mario + 30 spazi
Come faccio a fargli calcolare quanto č lunga una stringa ed a concatenare
gli spazi rimanenti nel campo relativo al nome?
Ho provato a fare questo ma non capisco  come posso dirgli semplicemente di
mettere gli spazi che mancano...cosě non va!
Private Sub Nome_BeforeUpdate(Cancel As Integer)
Dim lung As Integer
Dim spazio As String
Dim spazio1 As String
Dim testo As String
Dim lung1 As Integer
spazio = " "
lung = Lunghezza(Nome)
lung1 = lung - 35
While lung1 <> 0
    spazio1 = spazio + spazio
    lung1 = lung1 - 1
Wend
testo = Nome + spazio1
End Sub
Grazie 1000
cio


title: record e spazi

author: 'Roccia' Max

text:
On 13 Nov, 13:09, "cio" <
c...@cio.it
> wrote:
> Come faccio a fargli calcolare quanto è lunga una stringa ed a concatenare
> gli spazi rimanenti nel campo relativo al nome?
> Private Sub Nome_BeforeUpdate(Cancel As Integer)
Nome= Nome&space(35-len(nome))
> End Sub
cia'
Max


title: record e spazi

text:
"'Roccia' Max" <
roccia...@email.it
> ha scritto nel messaggio
news:1194956637.0...@50g2000hsm.googlegroups.com...
On 13 Nov, 13:09, "cio" <
c...@cio.it
> wrote:
> Private Sub Nome_BeforeUpdate(Cancel As Integer)
>Nome = Nome & Space(35-len(nome))
ciao
ho creato una tabella con il campo Testo di 35 caratteri
se eseguo il codice mi dice Errore di Run-Time  Impossibile salvare i dati
nel campo a causa della macro o funzione imposatata alla proprietà
PrimaDiAggiornare o ValidoSe di tale campo.
Non è che la funzione ritorna un integer e va convertita?
Grazie 1000
cio


title: record e spazi

text:
On 13 Nov, 14:27, "cio" <
c...@cio.it
> wrote:
> Non è che la funzione ritorna un integer e va convertita?
No, se imposti quell'integer ti annulla l'evento, vedi l'help alla
voce CancelEvent.
Errore mio: anziche' in BeforeUpdate devi mettere quella roba in
AfterUpdate (quando hai finito di modificare il valore e lo confermi,
lui lo "corregge").
Cia'
Max


title: record e spazi

text:
"'Roccia' Max" <
roccia...@email.it
> ha scritto nel messaggio
news:1194962068.9...@o38g2000hse.googlegroups.com...
On 13 Nov, 14:27, "cio" <
c...@cio.it
> wrote:
> Non č che la funzione ritorna un integer e va convertita?
>No, se imposti quell'integer ti annulla l'evento, vedi l'help alla
>voce CancelEvent.
>Errore mio: anziche' in BeforeUpdate devi mettere quella roba in
>AfterUpdate (quando hai finito di modificare il valore e lo confermi,
>lui lo "corregge").
Grazie ora non da piů errore perň se entro in tabella e clicco sopra non mi
mette gli spazi in piů...
io invece vorrei proprio che se mi sposto con il cursore dove ho scritto
"Mario" mi vengano inseriti gli spazi fino ad arrivare a Mario + 30 spazi.
Cosě lui lo fa anche ma io in effetti gli spazi non li vedo...
Grazie 1000
cio


title: record e spazi

author: geppo

text:
Ciao "cio" <
c...@cio.it
> ha scritto nel messaggio
news:fhc8nc$aoq$1...@aioe.org...
>
> "'Roccia' Max" <
roccia...@email.it
> ha scritto nel messaggio
> news:1194956637.0...@50g2000hsm.googlegroups.com...
> On 13 Nov, 13:09, "cio" <
c...@cio.it
> wrote:
>
Usa l'evento AfterUpdate
      Private Sub Nome_AfterUpdate()
>>Nome = Nome & Space(35-len(nome))
>
> ciao
>
> ho creato una tabella con il campo Testo di 35 caratteri
>
> se eseguo il codice mi dice Errore di Run-Time  Impossibile salvare i dati
> nel campo a causa della macro o funzione imposatata alla proprietà
> PrimaDiAggiornare o ValidoSe di tale campo.
>
> Non è che la funzione ritorna un integer e va convertita?
>
--
Ciao
Access


title: record e spazi

text:
On 13 Nov, 14:59, "cio" <
c...@cio.it
> wrote:
> Grazie ora non da più errore però se entro in tabella e clicco sopra non mi
> mette gli spazi in più...
FUnziona SOLO Per gli inserimenti da maschera... se vai a toccare
direttamente la tabella, non c'e' niente da fare!
Perche' hai bisogno di quegli spazi, peraltro? Non e' meglio inserirli
solo quando effettivamente servono?
cia'
Max


title: record e spazi

text:
"'Roccia' Max" <
roccia...@email.it
> ha scritto nel messaggio
news:1194963218....@22g2000hsm.googlegroups.com...
On 13 Nov, 14:59, "cio" <
c...@cio.it
> wrote:
> Grazie ora non da piů errore perň se entro in tabella e clicco sopra non
> mi
> mette gli spazi in piů...
>FUnziona SOLO Per gli inserimenti da maschera... se vai a toccare
>direttamente la tabella, non c'e' niente da fare!
>Perche' hai bisogno di quegli spazi, peraltro? Non e' meglio inserirli
>solo quando effettivamente servono?
Sono tanti e cosě il lavoro veniva preso in automatico.
Cmq ho visto che salvando funziona!
Grazie 1000
cio


title: record e spazi

author: Gabriele Bertolucci

text:
> Grazie ora non da più errore però se entro in tabella e clicco sopra non mi
> mette gli spazi in più...
>
> io invece vorrei proprio che se mi sposto con il cursore dove ho scritto
> "Mario" mi vengano inseriti gli spazi fino ad arrivare a Mario + 30 spazi.
>
> Così lui lo fa anche ma io in effetti gli spazi non li vedo...
Access fa un RTrim automatico sui campi di tipo testo.
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution


title: calcolare le età

author: giulia

text:
ciao, ecco il mio problema, che per voi sara' semplicissimo : )
ho un database in cui degli individui sono monitorati in una certa data
contenuta nel campo [data].
avendo deciso arbitrariamente di far "nascere" tutti gli individui in
un'unica data, il 15 aprile dell'anno in cui sono stati monitorati, avrei
bisogno di calcolare il numero dei giorni fra [data] e il 15 aprile
dell'anno contenuto in [data] (diverso per ogni record e comunque superiore
al 15 aprile)
grazie mille
giulia


title: calcolare le età

author: Geppo

text:

Dai un occhiata qui:
www.donkarl.com/it/?FAQ2.7
--
Ciao
Geppo


title: calcolare le età

text:
On Sun, 15 Jun 2008 17:02:20 GMT, "Geppo" <c...@tin.it.invalid> wrote:
>Dai un occhiata qui:
mmhh, non mi pare risolva il mio caso, perche' io non ho un campo con la
data di nascita, non ancora.
io so che sono nati in un certo giorno dell'anno ma, di quale anno, dovrei
farglielo estrapolare da un altro campo data.
in pratica come si fa a "costruire" un accidenti di campo data? giorno e
mese fissati e anno preso da un altro campo data? ecco.
cmq grazie per il link, mi sembra molto utile, ho gia' trovato un'altra cosa
che mi interessava.
ciao!
giulia


title: calcolare le età

text:
Ciao giulia wrote:
> On Sun, 15 Jun 2008 17:02:20 GMT, "Geppo" <c...@tin.it.invalid> wrote:
>
>
>> Dai un occhiata qui:
>
> mmhh, non mi pare risolva il mio caso, perche' io non ho un campo con
> la data di nascita, non ancora.
> io so che sono nati in un certo giorno dell'anno ma, di quale anno,
> dovrei farglielo estrapolare da un altro campo data.
>
> in pratica come si fa a "costruire" un accidenti di campo data?
> giorno e mese fissati e anno preso da un altro campo data? ecco.
 Non ho capito gran che, perņ se ad esempio ho questi due campi:
         giorno/mese
data1 = 15/04
             anno
data2= 1991
scrivo: datediff("yyyy", data1 &"/"& data2, date())
il risultato sarą 17.
Se non ho capito allora scusami.
> cmq grazie per il link, mi sembra molto utile, ho gia' trovato
> un'altra cosa che mi interessava.
prego
> ciao!
> giulia
--
Ciao
Geppo


title: calcolare le età

text:
On 15 Giu, 19:43, giulia <
giuliaga...@gmail.com
> wrote:
> in pratica come si fa a "costruire" un accidenti di campo data? giorno e
> mese fissati e anno preso da un altro campo data? ecco.
dateserial(anno,mese,giorno)
cia'
Max


title: calcolare le età

author: Carlo Costarella

text:
"giulia" <
giuli...@gmail.com
> ha scritto nel messaggio
news:rvka545esuvhcdb1e...@4ax.com...

TuoControlloOCampoQuery = "TuoGiorno" & "/" & "TuoMese" & "/" & year([Data])
Se "TuoGiorno" lo conosci scrivi semplicemente il numero (p.e. 15);
se "TuoGiorno" lo devi ricavare...Day([Data])
Lo stesso per TuoMese...se lo devi ricavare Month([data])
La prima istruzione diventa...se da calcolare:
TuoControlloOCampoQuery = day([Data]) & "/" & Month([data]) & "/" &
year([Data])
Ciao, Carlo


title: [OT] Scusate

text:
Come da titolo scusate per il post di prima in cui ho invertito l'autore con
l'Oggetto.
Sorry,
Fabio
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: dati da maschera in excel

text:
Ho una maschera con tre campi di testo in cui inserisco tre valori.
Alla pressione del tasto visualizza si esegue la routine
Private Sub Visualizza_Click()
On Error GoTo Err_Visualizza_Click
    Dim stDocName As String
    Dim stLinkCriteria As String
    If Not IsNull(Me.Corso) Then
        stLinkCriteria = "[CodCorso] = " & Me![Corso]
    End If
    If Not IsNull(Me.Materia) Then
        If Not IsNull(Me.Corso) Then
            stLinkCriteria = stLinkCriteria & " And " & "[CodMateria] =
" & Me![Materia]
        Else
            stLinkCriteria = "[CodMateria] = " & Me![Materia]
        End If
    End If
    If Not IsNull(Me.Personale) Then
        If Not IsNull(Me.Materia) Or Not IsNull(Me.Corso) Then
            stLinkCriteria = stLinkCriteria & " And " & "[CodPersonale]
= " & Me![Personale]
        Else
            stLinkCriteria = stLinkCriteria & "[CodPersonale] = " &
Me![Personale]
        End If
    End If
    stDocName = "mVisualizzaCalendario"
    DoCmd.Close
    DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Visualizza_Click:
    Exit Sub
Err_Visualizza_Click:
    MsgBox Err.Description
    Resume Exit_Visualizza_Click
End Sub
che apre la maschera mVisualizzaCalendario basata su di una query a cui
sono stati passati i parametri stLinkCriteria.
Ora io vorrei inserire il risultato di questa query in un foglio di
excel ad esempio premendo un bottone sulla maschera
mVisualizzaCalendario. Grazie


title: dati da maschera in excel

text:
"maury54" <
mauri...@libero.it
> ha scritto nel messaggio
news:1141141796....@p10g2000cwp.googlegroups.com...
> Ho una maschera con tre campi di testo in cui inserisco tre valori.
> Alla pressione del tasto visualizza si esegue la routine
>
>cut
>
> che apre la maschera mVisualizzaCalendario basata su di una query a cui
> sono stati passati i parametri stLinkCriteria.
> Ora io vorrei inserire il risultato di questa query in un foglio di
> excel ad esempio premendo un bottone sulla maschera
> mVisualizzaCalendario. Grazie
>
hai provato l'elp su come esportare i dati (output to, se non ricordo male)
in applicazioni office?
nik


title: dati da maschera in excel

author: Mirko Caporali

text:
maury54 ha scritto:
> Ora io vorrei inserire il risultato di questa query in un foglio di
> excel ad esempio premendo un bottone sulla maschera
> mVisualizzaCalendario. Grazie
Per la stesura del codice puoi creare una macro e poi convertirla in
modulo


title: dati da maschera in excel

text:
Se a qualcuno interessa ho risolto richiamando una istruzione sql che
crea una tabella con:
DoCmd.RunSQL "sqldicreazionetabella" a cui passo i parametri
provenienti dalle caselle di testo che riempe l'utente per limitare il
recordset, poi con un bottone faccio aprire la tabella in Excel


title: [OT]    ASP - spuntare check box e aggiornare un database

author: giancarlo

text:
Salve a tutti e scusate l'argomento OT, ma dato che il collegamento della
pagina web č ad un DB access....
Ho una pagina ASP che visualizza, in una tabella, un recordset estratto da
un DB di A2000.
Tra gli altri, c'č un campo SI/NO che nella forma presente nella pagina ASP
ho associato ad una checkbox.
Visualizzo tutti i records con relativa checkbox. Come faccio, dopo aver
spuntato la check per qualche record, a far sě che anche nel DB il
corrispondente campo risulti spuntato?
Grazie a tutti e scusate ancora per l'OT.
Giancarlo
GIGAMAIL by X-Privat:
http://www.x-privat.org/gigamail.php


author: Smark

text: devi reindirizzare ad una pagina che esegui l'update del database


text:
"Smark" <
hu...@email.it
> ha scritto nel messaggio
news:fLtkd.303961$35.13...@news4.tin.it...
> devi reindirizzare ad una pagina che esegui l'update del database
>
>
Innanzi tutto grazie per la risposta.
Come dovrà essere la pagina che esegue l'update?
Puoi farmi un esempio, per favore?
Ciao.



author: Sergio MAZZA

text:

Fai attenzione che il checkbox HTML ha come valori 0(Falso) 1(Vero) mentre
access ha 0(Falso) -1(Vero), quindi quando leggi i valori devi trasformarli
il 1 in -1...
Ciao.
--
Sergio MAZZA


text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:cmvji7$gk2$1...@canarie.caspur.it...

Grazie del suggerimento.
Hai qualche proposta su come risolvere il mio problema?
>
> Ciao.
>
> --
> Sergio MAZZA
>
>
Ciao.
Giancarlo.



text:
giancarlo wrote:
> Grazie del suggerimento.
> Hai qualche proposta su come risolvere il mio problema?
Su it.comp.www.asp ti hanno suggerito la soluzione; ogni tag html
corrispondente al record deve avere un riferimento all'id del record e nella
pagina asp che riceverà i dati della form devi effettuare un ciclo per
leggere se i checkbox siano spuntati (valore: 1) o no (valore: 0).
es.
<form action="aggiornaDati.asp" method="post">
<input name="1" id="1" type="checkbox" value="0">Record 1
<input name="2" id="2" type="checkbox" value="0">Record 2
<input name="3" id="3" type="checkbox" value="0">Record 3
</form>
> Ciao.
> Giancarlo.
Ciao.
--
Sergio MAZZA


title: sottomaschera che perde il controllo..

author: sdamy

text:
Salve a tutti,
sottopongo al NG il mio grosso problema:
premessa: il mio MDB ha molte maschere con 3/4 sottomaschere...
sequenza delle fasi che portano all'errore:
- apertura di una maschera A
- dalla maschera A selezionando una cas.combinata si fà il requery delle
sottomaschere, per l'aggiornamento dei dati... apro e chiudo tramite dei
puls. dei report basati sui dati della maschera A... fin qui tutto OK
- apertura di una 2^ maschera: PROBLEMA: una sottomaschera appare
completamente BIANCA e MS Access và in blocco nel senso che perde il
controllo dell'applicazione
- sono costretto a chiudere il task MSACCESS manualmente o resettare il
problema
grazie
sdamy
P.S.(per Simone Calligaris: non ci vado piu' fuori da stò errore...)


title: Limiti di access?????

author: Galvy

text:
Salve a te che leggi questa domanda :)
ero curioso di evere una spiegazione su una vovce che ho trovato in accass e
più precisamente in....
"Strumenti"
"Opzioni"
Selezionare la folder "Modifica/Trova"
in basso a destra di questa folder è presente la voce "Non visualizzare
elenchi con numero superiore a:"
Ora la mia domanda è... cosa sta ad indicare questo parametro???Che forse un
giorno quando il mio database arriverà al record successivo al limite
impostato si blocchetà tutto???? Oppure e solo una limitazione grafica???
Grazie Galvy


title: Limiti di access?????

text:
Galvy <
ga...@libero.it
> wrote in message
JVII8.21100$8x3.4...@twister1.libero.it...

Se su quel campo avessi premuto il classico e spesso utile tastino "F1"
avresti letto che parla di filtri in base a Maschera...
Curiosità risolta?
B.Lavoro


title: Limiti di access?????

text:
OK... ha volte le soluzioni più basilari sfuggono :) grazie mille del
suggerimentio F1 :)


title: Ore più 5

author: Mauro

text:
Salve a tutti, il quesito č questo:
Ho un campo [ora] in una maschera dove inserisco un valore nel formato
13.00, in un'altro campo non associato mi occorre lo stesso valore piů
5,  si puo fare ?
Grazie


title: Ore più 5

author: Roberto da casa

text:
"Mauro" <
mauro...@libero.it
> ha scritto nel messaggio
news:dadb67f6.04032...@posting.google.com...

Innanzitutto in una maschera non ci sono i campi ma i controlli: i campi
sono contenuti nelle tabelle e nelle queries.
Usa la funzione DateAdd (vedi help), ovvero nell'origine controllo della
casella di testo non associata scrivi:
=DateAdd("h";5;[ora])
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: WINSOK

author: Giò

text:
Buongiorno. (piove).
Ho scaricato dal sito comune e provato con successo sul mio PC "Inviare
e-mail con MSAccess utilizzando il winsock di Paolo Beltrame".
Su un altro PC non funziona perchè non è registrato il necessario ocx.
I problemi sono :
1) Non riesco a registrare (Strumenti/Controlli Activex) l'ocx. Perche?
2) Perchè è registrato sul mio PC ?
Ciao
Grazie per l'attenzione
Giò
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Simulazione teatro. Problema con ADO

author: Cereal Killer

text:
buondì gente!
allora, spiego il problema.
sono uno studente, mi son preso il bel manualonzo di access 2002
e sto imparando a progettare database. ok. problemino.
associazione n a n.
vi spiego. il problema dato dalla profe (ho preso il manualonzo
perchè lo ritengo di aiuto più valido della mia insegnante)
dice:
progett. database x gestire prenotazioni/acquisti di biglietti in
un teatro. come modello relazional ho fatto così:
            1        N      1       N   N               1   1
N   N             1
spettacoli-----repliche-----link1-----------posti----------link2---------cli
enti
*id_spett      *id_repl      *id_repl       *id_post       *id_clien
*id_clinte
costo          -id_spett     *id_post       -locazione
*id_posto     -nome
               -data                        -fila                        -co
gnome
               -ora                         -posto
               -costo_plus
spero che si capiscano le associazioni.
dunque, il teatro è diviso in: PLATEA1, PLATEA2, PALCO1,PALCO2,PALCO3,
GALLERIA1, GALLERIA2, il tutto per un totale di 1360 posti (pochini?)
comunque.. ho fatto una maschera per l'inserimento degli spettacoli
con una sottomaschera per segnare le repliche. tutti gli spettacoli
hanno almeno una replica, ok..
prò quando io inserisco una replica a questa devono essere associati
virtualmente tutti i posti del teatro, cioè dovrei mettere in "link1"
record con id_replica e id_posti. come posso fare questo? ho pensato
di mettere nell'evento AfterInsert codice vb ch lo faccia, diciamo,
si fa così più che "io ho pensato" no?
Ok. Uso Ado. Posso fare un "insert into" con ado no? sì spero.
ma il problema non è ancora arrivato. quando io cerco di aprire la
connessione con il metodo OPEN access da errore:
"impossibile avviare l'applicazione. il file di informazioni sul
gruppo di lavoro è mancante o aperto in modo esclusivo da un altro
utente".
Cioè? che faccio?
Vi allego il codice che genera l'errore.. help please!
e se avete qualch dritta sul modello concettuale.. sto imparando,
non so se si fa effettivamente così, se ci sono errori.. dovrebbe
essere già normalizzato, credo!
Grazie a tutti, Augusto
ps: uso winxp.. non so se cambia qualcosa da una versione 9x..
---------------------------------------------------------------------
Private Sub Form_AfterInsert()
Dim db As New ADODB.Connection
Dim strcoNNect As String
db.Provider = "Microsoft.Jet.OLEDB.4.0"
strcoNNect = CurrentProject.Path & "\" & CurrentProject.Name
db.ConnectionString = strcoNNect
db.Open strconnct  '<- QUI!
db.Close
Set db = Nothing
End Sub


title: words list

author: Bonavita Ozanam

text:
mesi addietro qualcuno cercava un elenco di vocaboli ne ho una di oltre
200.000 interessa? la invio al sito comune?
--
oza...@tiscali.it
http://sicilia.cjb.net
http://space.tin.it/arte/loobo/index.htm
http://web.tiscali.it/ozanam/index.html
-------------------------------------------------------
Sito comune di it.comp.appl.access
http://www.sitocomune.com


title: Pulsante sfoglia con percorso predefinito non mostra nulla

author: sauron

text:
Ciao a tutti.
Ho implementto il pulsante sfolgia utilizzando il codice della guida
trovato sul sitocomune.
Ora però devo fare in modo da fare aprire la maschera di selezione in
una cartella predefinita.
Io ho provato a farlo utilizzando
OpenFile.lpstrInitialDir = percorso
ma quando la maschera si apre al percorso impostato non mostra nulla di
quello che la cartella contiene. L'unico modo di visualizzare il
contenuto è quello di selezionare una cartella diversa e quindi
tornare nel percorso originale.
Cercando qui ho trovato questa discussione:
http://groups.google.it/group/it.comp.appl.access/browse_thread/thread/1471371d7150c84e/01addb82ba703713?lnk=st&q=access+sfoglia+percorso+predefinito&rnum=1&hl=it#01addb82ba703713
ma in quel codice non riesco a capire dove posso impostare il percorso
che mi interessa.
Altra domanda: posso in qualche modo impedire di cercare in un percorso
che non sia quello che ho impostato io? Cioè fare in modoc che
l'utente possa cercare solo file in quella cartella o in una sua
sottocartella.
Grazie mille.


author: Alessandro Baraldi

text:
sauron ha scritto:

Diciamo che c'è ma devi realizzarlo tu via codice...!
Con il codice che hai segnalato non è possibile(se non com
complicazioni assurde) impedire che l'utente gironzoli....!
C'è da dire che con quel codice non puoi selezionare file, ma solo
cartelle....
Se hai un minimo di dimestichezza ti popoli una ListBox con l'elenco
delle Cartelle:
a questo punto gestisci il DoppioClick della ListBox per scendere di
livello, memorizza da qualche parte il livello in modo da renderti
facile risalire.
@Alex


text:
Alessandro Baraldi ha scritto:
> Diciamo che c'è ma devi realizzarlo tu via codice...!
>
> Con il codice che hai segnalato non è possibile(se non com
> complicazioni assurde) impedire che l'utente gironzoli....!
>
> C'è da dire che con quel codice non puoi selezionare file, ma solo
> cartelle....
Io ho usato la faq 6.22 del sito comune, con cui è possibile
selezionare i file
>
> Se hai un minimo di dimestichezza ti popoli una ListBox con l'elenco
> delle Cartelle:
> a questo punto gestisci il DoppioClick della ListBox per scendere di
> livello, memorizza da qualche parte il livello in modo da renderti
> facile risalire.
>
> @Alex
Diciamo che messa così non ho il tempo di farlo, ma lo terrò presente
per il futuro.
Riguardo al percorso iniziale della maschera?
Se guardi nella faq trovi:
OpenFile.lpstrInitialDir = "C:\"
Che ha me dà l'errore di cui parlavo prima


text:
Problema risolto, o meglio non c'era nemmeno il problema, semplicemente
la cartella era su un server a cui era appena stato cambato il nome
(mentre la lettera con cui era mappato è rimasta uguale)


title: Stampa di un singolo record

author: Roberto

text:
Questo comando associato ad un pulsante della maschera fornitori mi dovrebbe
permettere di stampare la scheda di un singolo fornitore; purtroppo non lo
fa. il report r_Fornitori mi viene stampato con tutti i record e non con uno
solo
Chi mi puņ aiutare?
Private Sub Comando20_Click()
On Error GoTo Err_Comando20_Click
    Dim stDocName As String
    Dim stringaSql As String
    stDocName = "r_Fornitori"
    stringaSql = "[IDFornitore]=" & Me.IDFornitore
    DoCmd.OpenReport stDocName, acViewPreview, stringaSql
Exit_Comando20_Click:
    Exit Sub
Err_Comando20_Click:
    MsgBox Err.Description
    Resume Exit_Comando20_Click
End Sub


title: Stampa di un singolo record

text:
"Roberto" <
ro...@freemai.it
> ha scritto nel messaggio
news:eLwn6.42337$Y93.1...@news.infostrada.it...

Prova con
DoCmd.OpenReport stDocName, acViewPreview,  ,stringaSql
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Stampa di un singolo record

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:O8xn6.42574$Y93.1...@news.infostrada.it...

Inserendo la virgola la maschera funziona ma mi viene chiesto di inserire
prima l 'IDFornitore con una finestra  "Immissione valore parametro. Solo
dopo averlo inserito mi viene visualizzato il report in anteprima.



title: Stampa di un singolo record

text:
"Roberto" <
ro...@freemai.it
> ha scritto nel messaggio
news:mDNn6.48173$Y93.1...@news.infostrada.it...

Sembrerebbe che nell'oggetto che č origine record del report non ci sia un
campo chiamato IDFornitore.
--
Roberto



title: Stampa di un singolo record

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:enOn6.48615$Y93.1...@news.infostrada.it...

> Il report ha come origine record la tabella fornitori e IDFornitore č la
chiave primaria; č un campo con dati di tipo testo.



title: Stampa di un singolo record

text:
"Roberto" <
ro...@freemai.it
> ha scritto nel messaggio
news:9XTn6.52940$Y93.1...@news.infostrada.it...
>
[CUT]
> > > > >     stringaSql = "[IDFornitore]=" & Me.IDFornitore
> > > > >
> > > > >     DoCmd.OpenReport stDocName, acViewPreview, stringaSql
> > > > >
[CUT]
> > > > Prova con
> > > >
> > > > DoCmd.OpenReport stDocName, acViewPreview,  ,stringaSql
> > > >
> > > > --
> > > Inserendo la virgola la maschera funziona ma mi viene chiesto di
> inserire
> > > prima l 'IDFornitore con una finestra  "Immissione valore parametro.
> Solo
> > > dopo averlo inserito mi viene visualizzato il report in anteprima.
> > > >
> >
> > Sembrerebbe che nell'oggetto che è origine record del report non ci sia
un
> > campo chiamato IDFornitore.
> >
> > --
> > Il report ha come origine record la tabella fornitori e IDFornitore è la
> chiave primaria; è un campo con dati di tipo testo.
E allora la stringa Where è scritta in modo sbagliato.
Prova con:
stringaSql = "[IDFornitore]=" & Chr$(34) & Me.IDFornitore & Chr$(34)
--
Roberto



title: Stampa di un singolo record

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:YlUn6.53273$Y93.1...@news.infostrada.it...

Colpito e affondato! Tutto OK Grazie mille



title: Messaggi Di Protezione

text:
Da una form A2003 cerco di aprire un messaggio Outlook 2003 (.msg)
salvato  in cartelle "esterne" (accessibili cioè anche con esplora
risorse da dove posso aprirli con doppio click) tramite collegamento
ipertestuale.
Succede che ricevo un messaggio di protezione, che riguarda molto
probabilmente outlook e rende quindi questo post un po' (molto ?) OT.
In ogni caso qualquno sa come evitare il messaggio ?
Grazie


title: Messaggi Di Protezione

author: MA

text:

e' infatti di outlook
non puoi superarlo, puoi solousare software com yesclick o qualcosa del genere
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


title: Messaggi Di Protezione

text:
On 29 Mag, 17:06, "MA" <
mas...@massimilianoamendola.it
> wrote:

Intanto Grazie
ClickYes lo conosco (ho provate anche Pro) ma non risolve.
Credi che esista "qualcosa del genere" ?


title: Messaggi Di Protezione

author: Marco Papo

text:
Intanto Grazie
ClickYes lo conosco (ho provate anche Pro) ma non risolve.
Credi che esista "qualcosa del genere" ?
Ciao,
Prova a disabilitare questa chiave di registro.
[HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Common\Security]
"DisableHyperlinkWarning"=dword:00000001


title: Messaggi Di Protezione

text:
Intanto Grazie
ClickYes lo conosco (ho provate anche Pro) ma non risolve.
Credi che esista "qualcosa del genere" ?
Risposta:
Ciao,
prova a modificare questa chiave di registro:
[HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Common\Security]
"DisableHyperlinkWarning"=dword:00000001
--
Marco Papetti
www.shortchannel.it
 Il software di commercio elettronico OpenSource
www.mondoideale.com
  - Prodotti naturali e biologici.


title: Ri-posto il problema

author: IP

text:
Non ho avuto risposte, scusate se ripeto la domanda, spero che qualche anima
buona (ed esperta) voglia aiutarmi.
Cornice oggetto associato (collegata al campo [FOTO]) visualizza l'icona
dell'immagine (.JPG) collegata e non
l'immagine stessa.
Lette le precedenti Vs. risposte a simili problemi, visionati gli esempi su
sito comune, ho reinstallato dai CD Office2000 TUTTI i filtri e convertitori
che ho trovato, ma il problema resta.
D'accordo che ci sono altre soluzioni, magari più efficienti degli OLE per
la visualizzazione di immagini, ma qualcuno mi sa spiegare perchè cavolo non
funziona???
Grazie, un saluto a tutti
Paolo


title: Ri-posto il problema

author: André le Pčtomane

text:
"IP" <
inc...@tin.it
> ha scritto nel messaggio
news:eocx8.53106$vF6.1...@news2.tin.it...

succedeva anche a me.
Nel mio caso era un problema di sistema, ho settato come default per
l'apertura ei files jpg MSphotoed (opzioni cartella/tipo file) e tutto è
andato a posto, forse funziona anche con paint...
Che programma hai settato come predefinito per i jpg?
Ciao, Ale.


title: Ri-posto il problema

author: Paolo

text:
"André le Pètomane" <
alepetoma...@hotmail.com
> ha scritto nel
messaggio news:aa3oal$8n78$1...@stargate1.inet.it...

Grazie Ale,
nel mio caso i files *.jpg sono aperti per default da Quick Time (ver.
5.0.1) che non dovrebbe dare alcun problema. In ogni caso, provo a cambiare
questa impostazione, chissà...
Ciao, Paolo


title: Ri-posto il problema

text:
"Paolo" <
jor...@tin.it
> ha scritto nel messaggio
news:pljx8.55444$vF6.1...@news2.tin.it...

Per curiosità invece dell'immagine che tipo di icona ti mostra ?
dovrebbe essere quella del programma di default.
Solo per scrupolo, puoi controllare che nelle proprietà dell'oggetto ole non
sia settato tipo visualizzazione = icona invece di = contenuto ma sarebbe
troppo banale...
Ciao.


title: Ri-posto il problema

author: guidi

text:
"André le Pètomane" <
alepetoma...@hotmail.com
> ha scritto nel
messaggio news:aa5o4v$4uom$1...@stargate1.inet.it...

> ..... è come dici: troppo banale!! Non mi funziona proprio.
Altre illuminazioni????


title: Carico/scarico...

author: samR

text:
Salve,
Tabella Clienti
ID_CLIENTE
ecc
Tabella Interventi
ID_INTERVENTO
ID_CLIENTE
ecc
Tabella Materiale
ID_MATERIALE
ID_CLIENTE
ecc
Magazzino
ID_MATERIALE
MATRICOLA
ecc
Inserisco l'intervento in una maschera Interventi, seleziono il cliente
(ID_CLIENTE è il campo in Interventi che collega la tabella Clienti) e poi
vorrei poter inserire il materiale che viene installato presso il cliente
prelevandolo dal Magazzino;
per fare questo ho creato una sottomaschera che ha origine dati la tebella
Materiale collegata al cliente tramite ID_CLIENTE di Interventi;
come si fa a selezionare il prodotto dalla tabella Magazzino e inserirlo
nalla tabella Materiale?
il problema è che no riesco a scaricarlo dal magazzino..
praticamente dovrei incrementare la tabella Materiale del cliente con un
nuovo prodotto ma decrementare contemporaneamente il Magazzino...
potrei aprire la tabella Magazzino scegliere il prodotto ed inserirlo nella
tabella materiale ma come si fa a cancellare il prodotto dal magazzino? e se
poi non accetto di salvare il record come si fa a ripristinare il tutto?
bohh
grazie!


title: Carico/scarico...

author: George

text:
"samR" <
wi...@libero.it
> ha scritto nel messaggio
news:%raBa.41670$lK4.1...@twister1.libero.it...
> Salve,
>
[cut]
>
>
> Inserisco l'intervento in una maschera Interventi, seleziono il cliente
> (ID_CLIENTE è il campo in Interventi che collega la tabella Clienti) e poi
> vorrei poter inserire il materiale che viene installato presso il cliente
> prelevandolo dal Magazzino;
> per fare questo ho creato una sottomaschera che ha origine dati la tebella
> Materiale collegata al cliente tramite ID_CLIENTE di Interventi;
>
> come si fa a selezionare il prodotto dalla tabella Magazzino e inserirlo
> nalla tabella Materiale?
> il problema è che no riesco a scaricarlo dal magazzino..
> praticamente dovrei incrementare la tabella Materiale del cliente con un
> nuovo prodotto ma decrementare contemporaneamente il Magazzino...
> potrei aprire la tabella Magazzino scegliere il prodotto ed inserirlo
nella
> tabella materiale ma come si fa a cancellare il prodotto dal magazzino? e
se
> poi non accetto di salvare il record come si fa a ripristinare il tutto?
> bohh
> grazie!
>
>
Forse è meglio se leggi un po' di teoria prima no?
Mi sembra che tu non abbia le idee chiare...
Per intenderci: qui trovi (più o meno) persone che rispondono a problemi
specifici.
Quello di cui hai bisogno è molto più vasto e generico, a mio avviso.
Se vuoi si può rispondere a qualche demanda più generica di *vorrei fare una
gestione di magazzino ma non so come fare, perchè non sono capace*
Ciao.


title: Carico/scarico...

text:
"George" <
giorgio.ben...@libero.it
> ha scritto nel messaggio
news:bb49or$cad$1...@newsreader.mailgate.org...

Scusami ma io ho le idee chiare!
forse, anzi sicuramente, mi sono espresso male, non permettendoti di capire
il problema;
ho chiesto semplicemente di risolvere questo problema:
tabelle Clienti, Materiale, Magazzino;
Apro una maschera con origine dati Clienti e, nella stessa, 2 sottomaschere,
Materiale e Magazzino;
Clienti e Materiale sono in relazione per cui ogni record di Materiale avrà
un campo ID_Cliente;
se mi posiziono nella tabella Magazzino e premo il pulsante di comando
"Carica al Cliente"  il record corrente dovrebbe essere inserito nella
tabella Materiale e nello stesso tempo cancellarlo dalla tabella Magazzino;
Esempio:
Il cliente Pinco ha in dotazione 3 motori trifase che visualizzo nella
tabella Materiale (3 record)
Dalla finestra Magazzino seleziono il record 12- Motore Monofase e clicco
sul pulsante "Carica al Cliente"
a questo punto il record 12-Motore Monofase sparisce dalla tabella Magazzino
e viene inserito nella tabella Materiale del cliente
Quindi nella tabella Materiale ora visualizzo 3 Motori Trifase ed 1 Motore
Monofase per un totale di 4 record.
Mentre nella Tabella Magazzino mi risulta avere un Motore Monofase in meno
Tieni presente che gli articoli in magazzino sono registrati singolarmente,
cioè tutti hanno un numero di matricola unico.
La stessa cosa dovrebbe avvenire quando carico in magazzino un prodotto
prelevandolo dalla tebella Materiale del cliente: Cancellare il record in
Materiale e inserirlo nella tabella Magazzino.
Ricapitolando:
come si fa a cancellare un record da una tabella e, nello stesso tempo,
inserirlo in un'altra (naturalmente le tabelle hanno la stessa struttura)
Ti ringrazio cmq per la risposta e l'invito di imparare un pò di teoria lo
accetto con piacere; anzi, se mi dicessi a cosa ti riferivi parlando di
teoria (gestione magazzino o linguaggio Access?) e, magari, dove reperire
informazioni ti sarei molto grato.
Ciao.


title: Carico/scarico...

text:

Se devo pendere da una parte (come disse la Torre di Pisa) vado verso
George.
In relatà tu dovresti crearti Per il tuo magazzino tre tab, + una cliente +
una di intestazione della fornitura e una intestazione vendita.
Le tra di Magazzino sono articoli che raccogli le caratteristiche
dell'oggetto da movimentare e due di fenomenologia: Acquisti e Vendite. Il
tutto è + o - simile a quello che in maniera un pò confusa hai tu in questo
momento. In realtà il magazzino verrebbe fuori dalla differenza di acquisti
e vendite.
Prova a strutturare prima così e poi ci muovoamo step by step
ciao MAssimiliano
--------------------------------
Inviato via
http://usenet.libero.it


title: Carico/scarico...

text:


Grazie Ma, sei stato molto gentile come del resto anche George.
Cmq il mio caso credo sia molto più semplice da come lo avete prospettato
voi
Non devo fare fatture, non devo fare vendita;
Quando vado dal cliente e recupero per esempio un motore vorrei caricarlo in
magazzino
Succede anche di andare al cliente e portare un motore che ho già in
magazzino, installo quest'ultimo e recupero quello vecchio del cliente
Insomma non è un magazzino come lo intendete voi...
Cmq sarei interessato a capirci qualcosa, di magazzino, di procedure per
gestirlo tramite software ecc ecc
Insomma approfondire quello che ha  detto tu!
Dove guardare? libri? siti? mi date un consiglio per favore?
..e potresti spiegarmi meglio quanato hai detto? tieni conto che devo
gestire un magazzino semplice semplice... come ti ho detto si tratta solo di
associare ad un cliente dei motori prelevandoli (e quindi scaricandoli) dal
magazzino oppure recuperare un motore dal cliente e quindi scaricandolo da
quelli che ha in dotazione e riportarli in magazzino.
Non riesco a spiegarmi meglio: se è così dimmelo e ti faccio proprio un
esempio pratico di quanto succede nel lavoro ok?
Grazie davvero
Ciao


title: Carico/scarico...

text:

Guarda che non hai nè aggiunto nè tolto nulla a quello che ci eravamo detti
prima. Se vuoi avere una visione razionale del tutto devi vedere il prelievo
del motore del cliente come un "Acquisto-carico" del tuo magazzino, poi lo
puoi caratterizare come vuoi. Allo stesso modo l'installazione ne è una
"Vendita-scarico".
E' un meccanismo molto semplice che gira tutto sulla tab Prodotto: parti da
questa e la caratterizzi come vuoi. Ci puoi aggiungere ad esempio la tabella
manutenzione che cmq farà riferimento al campo Id_prodotto. Allo stesso modo
con questa operazione di prelievo e consegna dei motori ai clienti tu avrai
una "giacenza c/o cliente" che è la somma algebrica di +consegna -prelievo:
quindi se tu consegni 3 motori, ne prelevi 2 e ne riconsegni uno, la
"giacenza c/o cliente" sarà +2motori. Ma come vedi tu non puoi prescindere
dal campo Id_prodotto.
Allora creati questa situazione di scuola.
Tab Prodotti: scheda tecnica del prodotto
Tab Carico: elementi come qtà, data_carico, note_ritiro,
rif_intestazione_vendita e non so cos'altro ti serve
Tab scarico: qtà, data_carico, note_consegna, rif_Intestazione_vendita etc
Tab Intestazione_vendita: pensa all'intesatzione di una fattura
Tab intestazione_acquisto: ut supra
Inizia così e facci sapere, che ti seguo un pò.



title: Carico/scarico...

text:

Grazie Ma!
vedrò di capirci qualcosa e tornerò a rompere le scatole :)
Mi piacerebbe creare un piccolo programmino del genere...
ehi a proposito, hai qualche programmino del genere per studiarlo un pò?
non un'applicazione ma giusto un esempio...
scusami e grazie ancora!


title: queries in automatico nel codice

author: Franco

text:
Salve al ng.
prima di scrivere ho cercato un pò nei vecchi post e sui vari siti (oltre il
sito comune) ma non riesco a venire a capo di una cosa.
Avendo una maschera di immissione anagrafica ho necessità (dopo aver immesso
nome e cognome) di contare quanti omonimi ho già immesso nel DB.
Se ci sono omonimi devo visualizzare un messaggio con il numero di omonimi e
due pulsanti OK e ANNULLA. se clicco su annulla si torna alla schermata. se
clicco su OK si va ad una nuova maschera di "controllo" degli omonimi e si
cancella il dato inserito..
ORA...
1. Come cavolo si fa una query di select sul count per avere questo numero
nella maschera... in automatico (magari sull'evento di uscita della casella
NOME)???
ho provato execute e runsql ma non riesco a venirne a capo
2. trovandoci a fare.. come implementereste voi il caso in cui voglia
visualizzare gli omonimi e cancellare il record appena inserito?
GRAZIE mille a tutti e buon lavoro..
Franco


title: queries in automatico nel codice

author: aaa

text:
Franco ha scritto:


> ORA...



> Franco
fai una casella combinata all'interno della maschera non visibile e metti
nella query i paramtri che ti servono.
poi interroghi il risultato della casella combinata e se è > di 0 fai
uscire il messaggio che ti serve
non è proprio una passeggiata ma non è neanche difficilissimo
provaci e spaccati la testa vedrai che ti servirà come esperienza. io ho
imparato così
ciao
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: queries in automatico nel codice

text:
"Franco" <f@f.f> wrote in message
news:Y3DWe.1588$
jG6.1...@news3.tin.it
> Salve al ng.
> prima di scrivere ho cercato un pò nei vecchi post e sui vari siti (oltre il
> sito comune) ma non riesco a venire a capo di una cosa.
>
> Avendo una maschera di immissione anagrafica ho necessità (dopo aver immesso
> nome e cognome) di contare quanti omonimi ho già immesso nel DB.
> Se ci sono omonimi devo visualizzare un messaggio con il numero di omonimi e
> due pulsanti OK e ANNULLA. se clicco su annulla si torna alla schermata. se
> clicco su OK si va ad una nuova maschera di "controllo" degli omonimi e si
> cancella il dato inserito..
>
> ORA...
>
> 1. Come cavolo si fa una query di select sul count per avere questo numero
> nella maschera... in automatico (magari sull'evento di uscita della casella
> NOME)???
> ho provato execute e runsql ma non riesco a venirne a capo
Fondamentale è capire cosa intendi per Omonimia, nel senso che
solitamente è Nome+Cognome, in ogni caso questo lo vedi poi tu.
Usa l'evento su Disattivato o LostFocus ed usa questo sistema:
 Dim strCriteria As String
 Dim rs As DAO.Recordset
 strCriteria = "SELECT COUNT(*) as Duplicati FROM NomeTabella WHERE "
 strCriteria = strCriteria & "[NomeCampo]=" & chr(34) & TuoConfronto &
chr(34)
 Set rs = CurrentDb.Openrecordset(strCriteria)
 MsgBox "Nomero di Duplicati = " & rs.Fields("Duplicati")
 rs.Close
 Set rs = Nothing

> 2. trovandoci a fare.. come implementereste voi il caso in cui voglia
> visualizzare gli omonimi e cancellare il record appena inserito?
Io userei una Form Popup(non associata) con una ListBox
alla quale passerei la stringa RowSource della Query.
In questo modo hai una maschera che mostra l'elenco dei nomi
Duplicati e puoi inserire una gestione Eventuale.

> GRAZIE mille a tutti e buon lavoro..
>
> Franco
Saluti
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: queries in automatico nel codice

author: Roberto dalla campagna

text:
"Franco" <f@f.f> ha scritto nel messaggio
news:Y3DWe.1588$jG6.1...@news3.tin.it...

Se la tabella che contiene i dati si chiama Anagrafica ed ha una struttura
simile a questa:
Id                    Contatore e chiave primaria
Cognome         Testo
Nome               Testo
DataNascita      Data/ora
ecc. ecc.
Se per record omonimi intendi record già inseriti in tabella che abbiano i
valori dei campi Cognome e Nome uguali a quelli del record in fase di
inserimento.
Se la maschera associata alla tabella Anagrafica con cui inserisci i nuovi
record si chiama MascheraInserimento.
A fronte dell'evento "Prima di aggiornare" della maschera
MascheraInserimento genera il seguente codice VBA:
Private Sub Form_BeforeUpdate(Cancel As Integer)
If Me.NewRecord Then
    Dim Conta As Long
    Conta = DCount("*", "Anagrafica", "(Cognome & Nome) =" & _
        Chr$(34) & Me!Cognome & Me!Nome & Chr$(34))
    If Conta > 0 Then
        If MsgBox("Esistono " & Conta & " omonimi" & _
            vbCrLf & "Vuoi visualizzarli?", vbYesNo, _
            "Verifica omonimi") = vbYes Then
            DoCmd.OpenForm "MascheraOmonimi", acNormal, , , , acDialog
        End If
        If MsgBox("Vuoi registrare comunque anche il record corrente?", _
            vbYesNo, "Verifica omonimi") = vbYes Then Exit Sub
        Cancel = True
        MsgBox "Si torna al record corrente dove potrai:" & vbCrLf & _
        "    1) Modificare il Cognome e/o il Nome" & vbCrLf & _
        "    2) Premere il tasto ESC per eliminare il record corrente", _
        vbInformation, "Verifica omonimi"
    End If
End If
End Sub
Crea ora una maschera non associata popup a scelta obbligatoria chiamata
MascheraOmonimi; nella maschera inserisci solo una casella di riepilogo non
associata a quattro colonne che abbia come origine riga il seguente codice
SQL:
SELECT DISTINCTROW Anagrafica.ID, Anagrafica.Cognome, Anagrafica.Nome,
Anagrafica.DataNascita FROM Anagrafica WHERE
(((Anagrafica.Cognome)=[Forms]![MascheraInserimento]![Cognome]) AND
((Anagrafica.Nome)=[Forms]![MascheraInserimento]![Nome]));
Così facendo prima di registrare un nuovo record viene verificato se in
tabella già ne esiste almeno un altro con lo stesso cognome e nome, nel qual
caso viene chiesto se si vogliono visualizzare i record omonimi; se si
riponde Si si apre la maschera MascheraOmonimi nella cui casella di
riepilogo vengono visualizzati i dati dei record omonimi. Alla chiusura di
tale maschera viene chiesto se si vuole registrare il record corrente
malgrado l'esistenza di uno o più record omonimi; se a questa domanda si
risponde No viene annullato l'evento di registrazione del record corrente e
si torna alla schermata della maschera dove l'operatore può correggere il
cognome e/o il nome, oppure annulla il racord in fase di inserimento
pigiando il tasto Esc; se invece a quest'ultima domanda si risponde Si, il
record corrente viene comunque inserito.
Mi auguro che questo fosse quello che ti serviva.
>
>
> GRAZIE mille a tutti e buon lavoro..
Prego
>
> Franco
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------