title: impedire la duplicazione

text:
Matteo wrote:
>> Scusate ma mi sono perso...
>> perdonate la mia ignoranza.
>>
>> il campo a come b e c non sono univoci in quanto, singolarmente, vorrei
>> che possono essere duplicati infinite volte a patto che varino i valori
>> degli altri due campi
>> Nell'esempio iniziale il valore a assume più volte il valore 1 ma in ogni
>> record variano i valori b e/o c
>>
>> se in tabella esiste
>>
>> record ### | a | b | c
>> ----------------------
>> record #01 | 1 | 1 | 1
>>
>> vorrei poter inserire a=1, b=qualunquevalore, c=qualunquevalore aldi fuori
>> di 1 se b=1 (in quanto duplicherebbe il record#1)
>> vorrei poter inserire a=1, b=qualunquevalore aldi fuori di 1 se c=1,
>> c=qualunquevalore (in quanto duplicherebbe il record#1)
>> Impedire cioè che la sequenza a=1 b=1 c=1 si ripeta e così via per tutte
>> le altre sequenze possibili.
>>
>> Ciao e grazie per l'interessamento.
>
> Probabilmente dico una caz**ta perché io normalmente posto domande e ottengo
> gentilmente risposte e non viversa -:)
Bene, hai perso la verginita? Nessun trauma spero  ;<)
. Cmq visto che non costa nulla provo.
> Io credo che farei un campo nuovo (d) dove considero a, b, c come testo,
> quindi faccio in modo che non sia possibile duplicare questo nuovo campo
Io continuo a ritenere che si fa prima a definire un indice multicolonna
di tipo univoco. ;<)
--
ac
y-1=x


title: impedire la duplicazione

author: Alessandro Cara

text:
PiGreco wrote:
> "MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
> news:f2hmsk$4rd$1...@tdi.cu.mi.it...
>>
>> Segrate (MI), 7-8 giugno 2007
>>
>> "Alessandro Cara" <
alessan...@ay-1asistemi.it
> ha scritto nel
>> messaggio news:zZY2i.52039$281....@tornado.fastwebnet.it...
>>> MA wrote:
>>>> "PiGreco" <pi#
gr...@mail.com
> ha scritto nel messaggio
>>>> news:UJY2i.10449$%k.5...@twister2.libero.it...
>>>>> Perdonate la domanda ma sono alle prime armi...
>>>>>
>>>>> E' possibile settare gli indici in modo che in una tabella si possa
>>>>> impedire l'immissione di valori duplicati della
>>>>>
>>>>> combinazione degli stessi?
>>> [cut]
>>>> Creati un campo calcolato A+B+C e metti quello come univoco
>>> Perche' l'indice sulle tre colonne, di tipo univoco, e' da scartare?
>>>
>>>
>>> --
>>> ac
>>> y-1=x
>> no, ma non lo amo moltissimo.
>> In ogni caso a supporto di PiGreco:
>> seleziona i tre campi e inserisci la chiave numerica
>>
[cut]
il quesito era ed e' chiaro. Hai avuto 2 risposte
1) Definisci un campo aggiuntivo in cui concateni i tre valori e lo
definisci come indice che non ammette duplicati
2) Crei un indice che non ammette duplicati indicando, per l'indice, i
tre campi
ne aggiungo un'altra nel caso ti stiano antipatici gli indici
3) nella before update di form controlli (magari con una dlookup) che
non sia presente in tabella un record con gli stessi valori per a ; b; c;
--
ac
--
ac
y-1=x


title: impedire la duplicazione

author: andrea

text:

> a
Prova così:
crea un ulteriore campo e lo chiami per esempio keydelrecord
fai in modo che questo campo venga aggiornato concatenando i tre valori che
ti interessano, per esempio sull'evento "SuUscita"dai campi interessati - o
"PrimaDiAggiornare"
nell'aggiornamento del record fai una dlookup che cerchi il valore del campo
keydelrecord per vedere se già
esiste un record simile e te lo gestisci come preferisci, ovvero ti fai
avverti da una msgbox, stoppi l'esecuzione del programma...In alternativa
puoi fare un query che cerchi nella tabella se già esiste un record che ha
quei campi valorizzati,mettendo come parametro il valore
campo1=forms!miaforms!miocampo1, campo2=forms!miaforms!miocampo2...: in
questo caso, conti i record presenti nella query:se sono + di 1 vuol dire
che il valore già c'è...
Forse usando il dlookup il tutto sarà un pò lento, però sta a te decidere se
è più importante la velocità o la l'integrità dei tuoi dati....;-)
In ogni caso...la soluzione della chiave univoca sui tre campi forse è la
migliore...
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: impedire la duplicazione

author: MA

text:
"Matteo" <
gestser...@uno.it
> ha scritto nel messaggio
news:f2hpap$5nd$1...@aioe.org...
>
>>
>> Scusate ma mi sono perso...
>> perdonate la mia ignoranza.
>>
>> il campo a come b e c non sono univoci in quanto, singolarmente, vorrei
>> che possono essere duplicati infinite volte a patto che varino i valori
>> degli altri due campi
>> Nell'esempio iniziale il valore a assume più volte il valore 1 ma in ogni
>> record variano i valori b e/o c
>>
>> se in tabella esiste
>>
>> record ### | a | b | c
>> ----------------------
>> record #01 | 1 | 1 | 1
>>
>> vorrei poter inserire a=1, b=qualunquevalore, c=qualunquevalore aldi
>> fuori di 1 se b=1 (in quanto duplicherebbe il record#1)
>> vorrei poter inserire a=1, b=qualunquevalore aldi fuori di 1 se c=1,
>> c=qualunquevalore (in quanto duplicherebbe il record#1)
>> Impedire cioè che la sequenza a=1 b=1 c=1 si ripeta e così via per tutte
>> le altre sequenze possibili.
>>
>> Ciao e grazie per l'interessamento.
>
> Probabilmente dico una caz**ta perché io normalmente posto domande e
> ottengo gentilmente risposte e non viversa -:). Cmq visto che non costa
> nulla provo. Io credo che farei un campo nuovo (d) dove considero a, b, c
> come testo, quindi faccio in modo che non sia possibile duplicare questo
> nuovo campo
Oh matteo, l'ho già detto io...
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access



title: impedire la duplicazione

author: giorgio rancati

text:
"Alessandro Cara" <
alessan...@ay-1asistemi.it
> ha scritto nel messaggio
news:FSZ2i.52148$281....@tornado.fastwebnet.it...
> Io continuo a ritenere che si fa prima a definire un indice multicolonna
> di tipo univoco. ;<)
oltre a fare prima si rispetta anche la prima forma normale.
:-)
--
Giorgio Rancati
[Office Access MVP]


title: impedire la duplicazione

author: PiGreco

text: Grazie a tutti quanti :)


title: impedire la duplicazione

text:
giorgio rancati wrote:
> "Alessandro Cara" <
alessan...@ay-1asistemi.it
> ha scritto nel messaggio
> news:FSZ2i.52148$281....@tornado.fastwebnet.it...
>> Io continuo a ritenere che si fa prima a definire un indice multicolonna
>> di tipo univoco. ;<)
>
> oltre a fare prima si rispetta anche la prima forma normale.
>
> :-)
Ciao Giorgio. Non mi parlare di cose complicate ;<)
--
ac
y-1=x


title: impedire la duplicazione

text:
"Alessandro Cara" <
alessan...@ay-1asistemi.it
> ha scritto nel messaggio
news:8E03i.150$q92...@tornado.fastwebnet.it...

Certo ragazzi
il problema è se uno su tre è nullo
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access



title: impedire la duplicazione

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:f2jofu$tr$1...@tdi.cu.mi.it...
>
> Certo ragazzi
> il problema è se uno su tre è nullo
Se si sceglie di usare la chiave primaria come da tuo suggerimento, è
impossibile avere valori Null su uno dei tre campi.
Se si sceglie di usare un indice univoco basta inserire Is Not Null nella
proprietà "Valido Se" dei tre campi



title: Dimensione DB Access 97 - Recupero file

author: Robby

text:
Prima di farvi le mie domande premetto che non conosco bene access ho
ereditato dei DB che devo mantenere, la prima domanda č forse banale,
esiste un limite per quanto riguarda la dimensione in byte per Db di
access 97 ?
durante l'utilizzo il mio db, che ha superato il Gb, ha dato un errore e
ora non č piů possibile aprilo esistono delle utility che permettano il
recupero di db danneggiati ?
Grazie
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Dimensione DB Access 97 - Recupero file

author: Roberto da casa

text:
"Robby" <
r.fa...@rovatti.it
> ha scritto nel messaggio
news:bu181h$cm1$1...@news.newsland.it...
> Prima di farvi le mie domande premetto che non conosco bene access ho
> ereditato dei DB che devo mantenere, la prima domanda č forse banale,
> esiste un limite per quanto riguarda la dimensione in byte per Db di
> access 97 ?
> durante l'utilizzo il mio db, che ha superato il Gb, ha dato un errore e
> ora non č piů possibile aprilo esistono delle utility che permettano il
> recupero di db danneggiati ?
> Grazie
>
> --
Con Access 97 puoi gestire database che abbiano una dimensione massima di 1
Gb.
Le versioni successive ti permettono di gestire database di 2 Gb.
Prova ad importare in un database vuoto solo le tabelle del database
originale ed in un altro database vuoto gli altri oggetti, cosi da ottenere
due database di dimensioni inferiori al Gb: se non basta puoi crearti un
database per ogni tabella; a questo punto, nel database che contiene gli
oggetti che non sono tabelle collega le tabelle che sono contenute negli
altri database.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: query con dati cumulati...?

author: Guido

text:
Ringrazio anticipatamente chi saprà risolvere il mio problema.
supponiamo che io registri in una tabella OPERAZIONI dei pagamenti in mio
favore:
Data        Importo    Pagato Si/No
13-01-03 Euro 50 NonPagato
14-01-03 Euro 50 NonPagato
15-01-03 Euro 50 NonPagato
etc. etc.
Supponiamo mi paghino fisicamente 100 Euro
Vorrei costruire una query che:
mi mostrasse solo le operazioni IL CUI TOTALE assomma a 100 Euro (vale a
dire quella del 13 e qualla del 14) per poi aggiornare il "Non Pagato" in
"Pagato".
Mi interessa esclusivamente la query di selezione; devo fare un campo
calcolato (per la "cumulata") o altro?
Grazie ancora,
Guido
--
in moto:
sfortunà tanti
fortunà pochi
bravi gnanca uno


title: query con dati cumulati...?

author: Giorgio Prx

text:
"Guido" <
giroatlNOM...@tin.it
> ha scritto nel messaggio
news:fIfJa.124614$pR3.2...@news1.tin.it...

Ciao Guido
Vedi se ti va bene.
----------------------------------
SELECT Op1.Data, Op1.Importo, Op1.Pagato, Op1.Progressivo
FROM [SELECT
        Op0.Data,Op0.Importo,Op0.Pagato,
        (Select TOP 100 PERCENT
             SUM(Importo)
          FROM
             Operazioni
          WHERE
               Data<=Op0.Data AND
               Pagato=0
         ) AS Progressivo
     FROM
        Operazioni AS Op0
     WHERE
        Op0.Pagato=0
     ORDER BY Op0.Data
   ]. AS Op1
WHERE (((Op1.Progressivo)<=100));
---------------------------------
Ciao Giorigo.


title: Msgbox

author: LoZio

text:
Mi sapete dire se e' possibile passare alla MSGBOX un prompt di testo
formattato?
Ad esempio un prompt in ARIAL di 28 punti ed in colore rosso?
Ciao e grazie.


title: Msgbox

text:

E' molto più veloce crearti una maschera
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


title: Msgbox

author: sv

text:
LoZio ha scritto:

> Ciao e grazie.
In modo nativo, no.
Puoi comunque crearti una maschera e adattarla alle tue esigenze.
--
sv
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Chi vuole contribuire...

author: Simone Calligaris

text:
http://blogs.msdn.com/access/archive/2007/10/11/a-chance-to-influence-the-di
rection-of-access.aspx#comments
Saluti.


title: Chi vuole contribuire...

author: Alessandro Baraldi

text:
On 11 Ott, 23:40, "Simone Calligaris" <
simoc...@libero.it
> wrote:
>
http://blogs.msdn.com/access/archive/2007/10/11/a-chance-to-influence.
..
> rection-of-access.aspx#comments
>
> Saluti.
Ciao Simone, puoi scrivere il Link in modo diverso o metti quello
abbreviato io non riesco a raggiungerlo.
@Alex


title: Chi vuole contribuire...

text:
> Ciao Simone, puoi scrivere il Link in modo diverso o metti quello
> abbreviato io non riesco a raggiungerlo.
Dovresti allineare tutto nella casella indirizzi di Explorer...
Il fatto è che non riesco a inserire come "navigabili" sullo Usenet, i links
molto lunghi ... come si fa?
Saluti.


title: Chi vuole contribuire...

author: PBsoft

text:
> Il fatto è che non riesco a inserire come "navigabili" sullo Usenet, i
> links molto lunghi ... come si fa?
Puoi ricorrere a servizi di "accorciamento" degli URL, come quello gratuito
fornito all'indirizzo
http://tinyurl.com
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution


title: Chi vuole contribuire...

author: ALESSANDRO Baraldi

text:
"PBsoft" <info[REMOVE]@
pbsoft.it
> ha scritto nel messaggio
news:875ea3552e7168...@news.tin.it...

Esatto... io uso sempre questo sistema:
http://tinyurl.com/3e3zet
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------


title: Inserire un segnalibro in word a runtime

author: tom

text:
ciao, scusate se torno a postare di nuovo l'argomento, ma x me è
importante.....
ho la necessità di inserire dei segnalibri in documento word senza
sapere all'inizio quanti questi possano essere, perchè a prioiri io
non lo posso sapere...ho trovato la seguente procedura per inserire i
segnalibri da VBA.. che io ho personalizzato con l'assegnazione del
nuovo valore al campo ncampo
If Wrd.ActiveDocument.Bookmarks.Count >= 1 Then
            ReDim aMarks(Wrd.ActiveDocument.Bookmarks.Count - 1)
            I = 0
            For Each aBookmark In Wrd.ActiveDocument.Bookmarks
            aMarks(I) = aBookmark.Name
            I = I + 1
            Next aBookmark
            End If
            Dim ncampo As String
            ncampo = I + 1
ma quando vado ad inserire il segnalibro nel docuemento assegnandogli
il nome del campo ncampo, mi torna sempre un errore...
                Wrd.ActiveDocument.Bookmarks.Add Name:= ncampo,
Range:=Selection.Range
                Wrd.ActiveDocument.Bookmarks(ncampo).Select
come faccio ad assegnare un nome runtime al segnalibro...?
grazie
Tommy


author: Sergio MAZZA

text:
"tom" <
ar...@libero.it
> ha scritto nel messaggio
news:f1ff4e74-b9fa-4c73...@p25g2000hsf.googlegroups.com...





Tommy
[risposta]
Non è che sia ben chiaro cosa devi fare ma hai provato con:
...
                Wrd.ActiveDocument.Bookmarks.Add ncampo
...
Ciao.
--
Sergio MAZZA


text:
On 24 Set, 10:36, "Sergio MAZZA" <
sergioma...@tiscali.it
> wrote:
> "tom" <
ar...@libero.it
> ha scritto nel messaggionews:f1ff4e74-b9fa-4c73...@p25g2000hsf.googlegroups.com...

.. in poche parole io devo compilare un doc di word con i dati di una
query che possono essere di n o n+1 di dati, io a priori nn posso
saperlo... siccome nella costruzione del testo in word devo alternare
segnalibri con dati provenienti dalla query e devo dare una
formattazzione perticolare tipo Bold eccc... invece alcuni segnalibri
devono contenere del testo statico con formattazione normale.. es. (N.
Prat. 10 intetestata alla ditta Tizio nata a Roma)
dove:  <N. Pratica 10>  proviene dalla query e deve essere formattato
in grassetto e di colore blu
dove: <intetestata alla ditta> è un testo statico e nn deve avere
nessuna formattazione
dove: <Tizio> proviene dalla query e deve essere formattato in
grassetto e di colore blu
dove. <nata a> intetestata alla ditta è un testo statico e nn deve
avere nessuna formattazione
dove <Roma> proviene dalla query e deve essere formattato in grassetto
e di colore blu
fino a quando si tratta di un solo record, inserisco i vari segnalibri
e poi da codice dò le formattazione volute, ma quando si tratta di
diversi record ho la necessità di inserire nuovi segnalibri e
assegnare loro dei nuovi nomi....
e qua nasce il problema....
> ...
>                 Wrd.ActiveDocument.Bookmarks.Add ncampo
> ...
si ho provato ma mi torna sempre l'errore "nome segnalibro errato"
tommy


text:
"tom" <
ar...@libero.it
> ha scritto nel messaggio
news:53db72e0-6c2a-40fc...@c58g2000hsc.googlegroups.com...



tommy
[risposta]
Imposta il punto di debug sulla riga incriminata e quando si ferma
l'esecuzione del codice apri la finestra immediata (CTRL-G) e scrivi: ?
ncampo   e vedi il valore che contiene la variabile.
Per caso; hai creato la gestione dell'errore per non lasciare sessioni di
word appese?
Ciao.
--
Sergio MAZZA


text:
On 24 Set, 12:28, "Sergio MAZZA" <
sergioma...@tiscali.it
> wrote:
> "tom" <
ar...@libero.it
> ha scritto nel messaggionews:53db72e0-6c2a-40fc...@c58g2000hsc.googlegroups.com...

ho risolto facendo precedere la stringa ncampo da una lettera, infatti
facendo in quel modo mi tornava un numero mentre la proprietà Name
accetta solo stringhe...
grazie lo stesso
tommy


title: codice fiscale

author: Maurizio

text:
Ciao ragazzi, ho scaricato da
sitocomune.it
 un database per la creazione dei
codici fiscali, vorrei sapere come si potrebbe fare per stampare il codice
fiscale nello stesso modo in cui appare nella realtà (usando cioè lo stesso
aspetto grafico)


title: codice fiscale

text:
"Maurizio" <
mauri...@libero.it
> ha scritto nel messaggio
news:k450c.51924$IT2.1...@news4.tin.it...

Il codice FISCALE non si CREA, viene CREATO da un'organismo
STATALE detentore del DATABASE Nazionale, quello che puoi fare tu è solo
verificare se quello che
ti passano è corretto.
Per il 2° punto no ho capito cosa dici....!
@Alex.


title: codice fiscale

author: Aristotele da Salerno

text:
> Per il 2° punto no ho capito cosa dici....!
>
vuole stampare la maschera......
ciao.


title: codice fiscale

author: Antonio

text:
"Maurizio" <
mauri...@libero.it
> ha scritto nel messaggio
news:k450c.51924$IT2.1...@news4.tin.it...

Puoi crearti un report (da richiamare con un pulsante) in cui caselle di
testo, etichette e caselle immagine replicano il tesserino del codice
fiscale. Se vuoi ti posso inviare quello che ho fatto io e che è comunque
migliorabile.
Ciao
Antonio


title: codice fiscale

author: Alberto S.

text:
On Sat, 28 Feb 2004 18:27:28 GMT, "Maurizio" <
mauri...@libero.it
>
wrote:

Vorrei ribadire quello che ti ha detto Alessandro e raccomandarti di
fare molta attenzione: ci sono situazioni (omocodici) in cui il codice
fiscale calcolato risulta uguale ad un altro già attribuito. In questo
caso l'unico organismo che se ne può accorgere è l'Agenzia delle
Entrate la quale attribuisce al secondo soggetto un codice leggermente
diverso (ocio quindi...)
Ciao
--
Alberto
No alle guerre


title: codice fiscale

author: maurizio 56

text:
Alberto S. ha detto: in data 29/02/2004 10.55:

Non ci credevo, ma l'altro giorno mi è capitato, un nuovo assunto, che
il ministero gli aveva cambiato le ultime 4 cifre. Quindi è sempre
meglio  farsi dare il suo codice da verificare.
maurizio56


title: codice fiscale

text:
"maurizio 56" <
ASSOLUT...@libero.it
> ha scritto nel messaggio
news:k7n0c.38744$Kc3.1...@twister2.libero.it...

E' normale che sia così, pensando all'UNIVOCITA' dei dati qualcuno deve
vigilare non è possibile che ognuno possa generarli.....!
@Alex.


title: codice fiscale

author: cidi

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:c1t28r$qm5$1...@lacerta.tiscalinet.it...

Ciao Alex
Giustissimo quello che dici. Ciò non toglie che ci sono in circolazione sw
che fanno proprio quello che chiede Maurizio.
Ciao Daniele


title: codice fiscale

text:
"cidi" <
dadonzin...@tin.it
> ha scritto nel messaggio
news:JMo0c.56095$IT2.1...@news4.tin.it...
[CUT]
>
> Ciao Alex
> Giustissimo quello che dici. Ciò non toglie che ci sono in circolazione sw
> che fanno proprio quello che chiede Maurizio.
> Ciao Daniele
>
NO.
Ribadisco anche sul SitoComune c'è una Routine che "CONTROLLA"
il CF.
I softWare in circolazione non lo GENERANO, lo CONTROLLANO.
E' solo un'errore di utilizzo quello che dici.
Dal momento che a livello LEGALE l'ente preposto è UNO, i SW circolanti
non possono farlo, poi che molti usino questi SW, e/o routine ugualmente
è una CAZZATA grossa come una casa, ognuno di noi nasce già con il CF
basta chiederlo, perchè rischiare.......!!!
Ciao Daniele.
@Alex.


title: codice fiscale

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:c1t6qp$vq9$1...@lacerta.tiscalinet.it...

Appunto.  :)
> Ciao Daniele.
>
> @Alex.
>
Daniele


title: codice fiscale

text:
On Sun, 29 Feb 2004 16:51:53 GMT, "cidi" <
dadonzin...@tin.it
>
wrote:
[cut]
>> > Non ci credevo, ma l'altro giorno mi è capitato, un nuovo assunto, che
>> > il ministero gli aveva cambiato le ultime 4 cifre. Quindi è sempre
>> > meglio  farsi dare il suo codice da verificare.
>> > maurizio56
>>
>> E' normale che sia così, pensando all'UNIVOCITA' dei dati qualcuno deve
>> vigilare non è possibile che ognuno possa generarli.....!
>>
>> @Alex.
>>
>
>Ciao Alex
>Giustissimo quello che dici. Ciò non toglie che ci sono in circolazione sw
>che fanno proprio quello che chiede Maurizio.
>Ciao Daniele
(ciao Daniele!)
Certo, l'importante è che uno sappia cosa sta usando e i potenziali
rischi...
Per quanto mi riguarda li considero alla stregua di giochetti - magari
considero più utile concentrarsi sul contrario (controllare la
validità del CF, ricavare data e luogo di nascita)



title: codice fiscale

text:
"Alberto S." <
sartori.SPA...@tin.it
> wrote in message
news:use4401i5f2i9l2i7...@4ax.com
[CUT]
> Certo, l'importante è che uno sappia cosa sta usando e i potenziali
> rischi...
> Per quanto mi riguarda li considero alla stregua di giochetti - magari
> considero più utile concentrarsi sul contrario (controllare la
> validità del CF, ricavare data e luogo di nascita)
>
> Ciao
> --
> Alberto
> No alle guerre
Centrato il problema, ed è proprio così che deve essere inteso.
Ogni altro modo di intendere è ERRATO a priori.
Saluti.
@Alex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: codice fiscale

author: Antonio Biso

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:8ee06b3b48022efbf3...@mygate.mailgate.org...
> > Per quanto mi riguarda li considero alla stregua di giochetti - magari
> > considero più utile concentrarsi sul contrario (controllare la
> > validità del CF, ricavare data e luogo di nascita)
> > Alberto
> > No alle guerre
>
>
> Centrato il problema, ed è proprio così che deve essere inteso.
> Ogni altro modo di intendere è ERRATO a priori.
TALEBANO !!!
Antonio


title: codice fiscale

text:
"Antonio Biso" <
ch...@etruria.net
> wrote in message
news:VgI0c.43834$
FJ6.1...@twister1.libero.it
[CUT]
> >
> > Centrato il problema, ed č proprio cosě che deve essere inteso.
> > Ogni altro modo di intendere č ERRATO a priori.
>
> TALEBANO !!!
>
> Antonio
Si ma dammi torto e ti farň talebbano...!



title: Azzerare Tabella

author: Cataldo Formaro

text:
Supponiamo di essere su una maschera qualsiasi,
premendo il bottone "Nuovo Anno", come faccio a trasferire i valori numerici
del campo "Giacenza" nel campo "Rimanenza" (Sostiutendo i valori dell'anno
precedente) e nello stesso tempo cancellare tutti record del campo
"TipoMovimento", "QuantitàMovimentata" ecc, naturalmente lasciando solo le
voci "Rimanenza" nel campo "TipoMovimento"
Saluti CF


title: Azzerare Tabella

author: Di Francesco Nino

text:
Puoi realizzare il tutto con una sola query di aggiornamento, aggiornando il
campo "Rimanenza" a "=[Giacenza]" e negli altri da azzerare uno 0 se
numerici o una stringa vuota se di tipo testo.
Personalmente realizzerei però 3 query:
1) Di aggiornamento del campo "Rimanenza" con il contenuto di "Giacenza".
2) Una query di selezione che evidenzi i record in cui "Giacenza" e
"Rimanenza" sono diversi, da lanciare per seconda al fine di verificare che
l'aggiornamento sia stato concluso con successo.
3) Ultima query di azzeramento dei valori.
Il tutto potrebbe essere automatizzato dal codice che eviterà di lanciare la
terza query se la seconda contiene almeno un record.
Ciao nino
Cataldo Formaro <
formaro...@libero.it
> wrote in message
klw_4.90062$VM3.6...@news.infostrada.it...



title: Azzerare Tabella

text:
Di Francesco Nino <
ino...@tin.it
> wrote in message
8hekjf$mrd$1...@nslave1.tin.it...

> Scusa, potresti essere più chiaro per quanto riguarda la query 1 di
aggiornamento, ma forse anche con le altre due la cosa mi riuscirà
difficile.
Grazie
CF


title: Azzerare Tabella

text:
> > Scusa, potresti essere più chiaro per
quanto riguarda la query 1 di
> aggiornamento, ma forse anche con le altre
due la cosa mi riuscirà
> difficile.
> Grazie
> CF
>

1) Crea una nuova query.
2) Inserisci la tabella che contiene i dati
interessati e trascina
il campo "Rimanenza" nella griglia di struttura.
3)
Dal menu "Query" seleziona la voce "Query di aggiornamento".
4) Noterai che
nella griglia di struttura sparisce la riga "Ordinamento:"
che verrà
sostituita da "Aggiorna a:"
5) E' in questa nuova casella che devi inserire
il nome del
campo [Giacenza].
6) Questo tipo di query provvederà, ogni
volta che la lanci, a sostituire
il contenuto del campo [Rimanenza] con il
contenuto del campo [Giacenza].
Verrai avvisato di quanti record saranno
aggiornati e se vuoi puoi
annullare l'operazione.
Vedi
schema:

+-------------+
     Campo: | Rimanenza
|

+-------------+
   Tabella: | NomeTabella
|

+-------------+
Aggiorna a: | [Giacenza]
|

+-------------+
   Criteri:
|
|

+-------------+
La terza query va realizzata con lo stesso sistema, salvo
che al posto di
utilizzare il campo [Rimanenza] utilizzerai gli altri campi
da azzerare e
nella casella "Aggiorna a:" non metterai il nome di un campo ma
dei valori
nulli, cioè 0 se il campo è numerico o una stringa vuota "" se il
campo è
di tipo testo.
Diverso è il discorso per la seconda query, che
non è una query di
aggiornamento, ma una normalissima query di selezione in
cui devi compilare
la sezione "Criteri:". Se l'aggiornamento è avvenuto
correttamente non
visualizzerà nessun record.
Vedi
schema:

+--------------+-------------+
      Campo: |
Rimanenza    | Giacenza    |

+--------------+-------------+
    Tabella: |
NomeTabella  | NomeTabella
|

+--------------+-------------+
Ordinamento:
|
|
|

+--------------+-------------+
   Criteri:  |
<>[Giacenza]
|
|

+--------------+-------------+
Se hai ancora problemi fammi
sapere.


title: Azzerare Tabella

author: Lorenzo Coronati

text:
Scrisse "Cataldo Formaro" <
formaro...@libero.it
>:
>premendo il bottone "Nuovo Anno", come faccio a trasferire i valori numerici
>del campo "Giacenza" nel campo "Rimanenza" (Sostiutendo i valori dell'anno
>precedente) e nello stesso tempo cancellare tutti record del campo
>"TipoMovimento", "QuantitàMovimentata" ecc, naturalmente lasciando solo le
>voci "Rimanenza" nel campo "TipoMovimento"
Update tabella set Rimanenza = Giacenza
Delete * from tabmov where Tipomovimento <> "Rimanenza"
Il problema grosso sta nell'eseguire queste due query "nello
stesso tempo".
Se hai un biprocessore se ne puo' parlare.
--
Lorenzo Coronati
--
<<Il materiale sul NG non è di particolare
qualità... cioè siti... magari in inglese in
cui si possono trovare maggiori informazioni...>>
(Matteo Testoni, 24/05/2000)
--


title: Azzerare Tabella

text:
Lorenzo Coronati <
lore...@tin.ton.tan.it
> wrote in message > Update tabella
set Rimanenza = Giacenza
> Delete * from tabmov where Tipomovimento <> "Rimanenza"
>
> Il problema grosso sta nell'eseguire queste due query "nello
> stesso tempo".
> Se hai un biprocessore se ne puo' parlare. <<<< No >>>>
>
> --
> Lorenzo Coronati
>
... come al solito sei gentilissimo!!!
dunque caro Lorenzo,
nella tabella "Tb_Farmaci_Movimenti"
effettuo tutti movimenti (Carico-Scarico-Rimanenza [campo "TipoOperazione])
poi riepilogo tutto con una query "Q_Farmaci_RIEPILOGO" (che a sua volta
prende origine dalla query di selezione "Q_Farmaci_Movimento") che mi
restituisce:
un campo "Rimanenza"
un campo "Carico"
un campo "Scarico"
un campo "Giacenza"
Quindi intervenendo sulla tabella "Tb_Farmaci_Movimento" č corretto??
Spero di essere chiaro...
saluti CF


title: tipo ordinamento report

text:
Salve a tutti , volevo sapere se è possibile ordinare un report mediante una
casella di testo (non un campo)questa casella mi esegue una somma,in un pie
di pagina,e volevo ordinarlo in decrescente.
Se qualcuno mi aiuta a capire come posso fare.
 Grazie


title: tipo ordinamento report

author: Roberto da casa

text:
"Danny.M" <
dmac...@libero.it
> ha scritto nel messaggio
news:sci5c.72353$FJ6.2...@twister1.libero.it...
> Salve a tutti , volevo sapere se č possibile ordinare un report mediante
una
> casella di testo (non un campo)questa casella mi esegue una somma,in un
pie
> di pagina,e volevo ordinarlo in decrescente.
> Se qualcuno mi aiuta a capire come posso fare.
>  Grazie
Quello che si ordina non č il report ma l'oggetto che č origine record del
report stesso, quindi non credo proprio che tu possa ordinare il report per
una casella calcolata in esso contenuta.
Penso che un modo per risolvere il tuo problema sia quello di crearsi una
query che contega un campo calcolato che effettua i calcoli che ora tu fai
nel report, potrai cosě poi ordinare la query come ti serve ed usare tale
query come origine record del report.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Ci riprovo... routine in una msgbox

author: tiziano

text:
Ciao a tutto il NG,
il mio problema è l'aggiornamento dei dati da una
tabella ad un altra nella visualizzazione delle Maschere attraverso una
Msgbox a tre pulsanti.
Mi spiego meglio ho 2 tabelle:
IDDomus e
IDDomusFase;
le due hanno una relazione uno a molti attraverso il campo
IDDomus.
Finora ho utilizzato un filtro, nella maschera IDDomus,  che
permetteva di creare un nuovo record sulla selezione di un pulsante nella
Maschera IDDomusFase
(pulsante nella maschera IDDomus)
Private Sub
Comando15_Click()
On Error GoTo Err_Comando15_Click
    Dim stDocName
As String
    Dim stLinkCriteria As String
    stDocName =
"MascheraIDDOMUS"

    stLinkCriteria = "[IDDOMUS]=" & Me![IDDOMUS]
DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Comando15_Click:
Exit Sub
Err_Comando15_Click:
    MsgBox Err.Description
    Resume
Exit_Comando15_Click

End Sub
(pulsante di aggiornamentonella
maschera IDDomusFase)
Private Sub DO_Sì_No_AfterUpdate()
Me.IDDOMUS =
Forms![MascheraIDDOMUSGENERALE]![IDCONTDOMUS]
Me.DO_Fase =
Forms![MascheraIDDOMUSGENERALE]![DO_Fase]
Me.Refresh
End Sub
questo
però risulta molto lento e nel caso creo delle query comunque devo inserire
dei dati o meglio altri lo devono fare e potrebbe essere deleterio per le
loro capacità di implementazione dati.
Così ho pensato di creare sulla
base di una maschera a tre pulsanti (vbYesNoCancel)di implementare i dati
che permettano di ovviare a tutto questo, complicandomi la vita!!!
Ritengo che sull'evento click del pulsante OK della msgbox lo scipt
dovrebbe + o - essere così, ma mi mancano delle basi per essere sicuro..
Private Sub Comando15_Click()' nome del pulsante che richiama la maschera
Dim dbDomus As Database 'nome DB
Dim rstIDDomus As Recordset  'nome del
record
Dim strMsg As String
    strMsg = "Vuoi creare una nuova
scheda di Domus? Premere OK per crearla e inserire i dati."

    If
MsgBox(strMsg, vbOKCancel, "Seleziona il pulsante") = vbOK Then
Set dbDomus = Opendatabase(".\Domus.mdb")
        Set rstIDDomus =
dbDomus.OpenRecorset("TabellaIDDomus",dbOpentable)
rstIDDomus.AddNew
        rstIDDomus!IDDomus=

    End If
end sub
e qui mi blocco... dovrei fargli scrivere il valore contenuto del record in
cui trovo e aprire la maschera eliminando problemi di filtri e query...
Fattibile??!non lo so ...
Grazie mille anche per il solo incoraggiamento!
Ciao Tiziano
--------------------------------
Inviato via
http://usenet.iol.it


title: Modifica struttura dati BE da FE

author: Announced

text:
Mi sto imbattendo per la prima volta in questa disperata impresa. Spero
vivamente nel vostro aiuto in quanto non ho altro intorno ed è sempre
stata l'unica fonte diretta di approfondimento della materia...
Ho navigato tra i vari post old ma sto iniziando tentando di utilizzare
la Faq 1.9 del SC della quale vorrei provare la Function aggiungiCampo,
ma mi sono subito bloccato nel richiamo di tale funzione. Ho provato
così:
Call aggiungiCampo("NomeTbl", "NuovoCampoTbl", "TipoCampo")
Es.:
Call aggiungiCampo("Anagrafica", "IndFiscale", "Text(50)")
...ma niente!!!
Grazie
Paolo


title: Modifica struttura dati BE da FE

author: Roberto dalla campagna

text:
"Announced" <
paolosc...@alice.it
> ha scritto nel messaggio
news:1127485381....@o13g2000cwo.googlegroups.com...

Per prima cosa ti ricordo che il codice VBA pubblicato in quella FAQ del
Sito Comune fa riferimento alle librerie Microsoft DAO quindi, se usi una
versione di Access successiva ad Access 97 devi aggiungere al tuo database i
riferimenti a Microsoft DAO 3.6 Object Library.
Poi, ammesso e non concesso che hai già aperto l'oggetto Database con cui
operare, non è certo quello il modo di richiamare la funzione aggiungiCampo
per inserire nella tabella NomeTbl il campo IndFiscale di tipo Testo lungo
50 caratteri; prova con:
Call aggiungiCampo("Anagrafica", "IndFiscale", dbText, 50)
>
>Grazie
Prego
>Paolo
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Modifica struttura dati BE da FE

text:
Ciao Roberto,
utilizzo A00 e i riferimenti DAO sono impostati.
Ti metto di seguito l'istruzione che ora mi dice "Variabile oggetto o
variabile del blocco with non impostata..."
Dim Db As Database
Set Db = OpenDatabase("D:\Z01.mdb")
Call aggiungiCampo("Anagrafica", "IndFiscale", dbText, 50)
Grazie
Paolo


title: Modifica struttura dati BE da FE

text:
"Announced" <
paolosc...@alice.it
> ha scritto nel messaggio
news:1127590300.3...@o13g2000cwo.googlegroups.com...
> Ciao Roberto,
> utilizzo A00 e i riferimenti DAO sono impostati.
Verifica però che i riferimenti DAO siano in cima alla lista dei riferimenti
o cumunque precedano gli eventuali riferimenti a Microsoft ADO: se questo
non è vero il tutto si comporterà come se non avessi aggiunto al tuo
database i riferimenti alla libreria DAO, ovvero non ti funzionerà quanto
scritto nel codice VBA pubblicato nella FAQ 1.9 .
>
> Ti metto di seguito l'istruzione che ora mi dice "Variabile oggetto o
> variabile del blocco with non impostata..."
>
> Dim Db As Database
> Set Db = OpenDatabase("D:\Z01.mdb")
Non è questa la sintassi giusta del metodo OpenDatabase (vedi help): non è
indicata l'area di lavoro; non capisco però perché stai tentando di
inventare l'ombrello, visto nel codice pubblicato nella FAQ 1.9 del Sito
Comune c'è anche la funzione da richiamare per aprire il datbase.
Dando per scontato che tu abbia memorizzato in un modulo del tuo database
TUTTO il codice di  Enrico Oemi, prova a fare così:
Call REL_ApriBE("D:\Z01.mdb")
Call aggiungiCampo("Anagrafica", "IndFiscale", dbText, 50)
>
>
> Grazie
Prego



title: Modifica struttura dati BE da FE

text:
>non capisco però perché stai tentando di
>inventare l'ombrello, visto nel codice pubblicato nella FAQ 1.9 del Sito
>Comune c'è anche la funzione da richiamare per aprire il datbase.
In effetti...
Ora, le cose principali riesco a farle: creare nuove tbl e relativi
campi ed aggiungere campi nuovi in tbl già esistenti.
...e per collegare le nuove utilizzo:
DoCmd.TransferDatabase acLink, "Microsoft Access", _
"D:\Z01.mdb", acTable, "Anagrafica", _
"Anagrafica"
Ti ringrazio davvero per la delucidazione...
Ciao
Paolo


title: Costruzione Codice Fiascale

author: Sib

text:
"Ugo" <
rom...@inwind.it
> ha scritto nel messaggio
news:8jp5jo$kpq$1...@sirmdpsin17.inwind.it...
>
> Ho trovato questa routine per la costruzione (non il controllo) del Codice
> fiscale.
> Non sono riuscito a farla funzionare.
>
> Qualcuno mi puņ aiutare??
> Grazie in anticipo  Ugo
[cut]
>     Comune = Forms!Gestione_Socio!soc_localitaNascita
l'istruzione Utility.GetCF č corretta solo se hai correttamente implementato
un modulo di classe "Utility" e lo hai correttamente definito e settato.
prova a togliere "Utility."
>     Forms!Gestione_Socio!soc_codFiscale = Utility.GetCF(Cognome, Nome,
> Sesso, DataNascita,
> Comune)
>   End If
>
> End Function
>
> Function GetCF(ByVal Cognome As String, ByVal Nome As String, ByVal Sesso
> As String, ByVal
[cut]
>
> Set dbs = CurrentDb()
Hai controllato bene i nomi campo e tabella in questa stringa sql?
> strSql = "SELECT com_id FROM comune WHERE comune.com_nome = '" & Comune &
"'"
Qui c'e' decisamente un errore, stai aprendo una query, non una tabella, per
cui "dbOpenTable" e' sbaglata. Toglila con tutta la virgola
> Set rstSQL = dbs.OpenRecordset(strSql, dbOpenTable)
> CF_Comune = rstSQL!com_id
Con queste correzioni, a me, ha funzionato perfettamente.
Ciao, Sib


title: CHIARIMENTO: visibilità campo in un report

author: Ivan da casa

text:
Mi succede questo:
Ho una origine dati di un report, da cui vorrei prelevare (il valore di)
alcuni campi (in uscita dal report) per decidere se eseguire o no alcune
operazioni successive.
Ma sull'evento close del report non vedo il valore dei campi !
Allora ho provato a ragionare come si fa in una Maschera (form), ma in
realtà mi manca un oggetto (sottomaschera) da cui prelevare valori dai
campi.
La domanda è : LA SEZIONE DEL REPORT è il momento giusto per valutare ( e
vedere) il contenuto di un campo ?
GrazieInAnticipo    Ivan
PS
dalla sezione posso passare il valore (o i valori) raccolti all'evento
SuChiusura del REPORT .... in che manierà ????


text:
"Ivan da casa" <
ivanSENZAQ...@tin.it
> ha scritto nel messaggio
news:z2Sse.15358$b5.7...@news3.tin.it...

Onestamente non è che abbia capito molto il tuo problema, comunque come in
una maschera è possibile inserire una sottomaschera così nei report è
possibile inserire dei sottoreport.
L'evento per operare sulle proprietà di un controllo è "Su formattazioe" o
"Su stampa" della sezione del report che contiene il controllo in questione.
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


author: Carlo Costarella

text:
"Ivan da casa" <
ivanSENZAQ...@tin.it
> ha scritto nel messaggio
news:z2Sse.15358$b5.7...@news3.tin.it...
>

Non è che si capisca granchè.
Se per campo intendi un controllo del report magari un sottoreport da cui
prelevare (?) il valore del controllo stesso, questo non si può fare come
nelle maschere. Non puoi per esempio immettere in una variabile il valore
del controllo "MioControllo" che si trova alla pagina 3 del report o alla
riga 24 del sottoreport, magari cliccandoci sopra. Tutto dipende da cosa
cerchi. Per esempio conosciuta l'origine record del report puoi in parte
agire sulla query che lo alimenta: contare i record, primo, ultimo,
dlookup...ecc.
Poi non capisco perchè alla chiusura...i report non modificano i dati alla
chiusura anzi sono gli stessi dell'apertura. Quello che vorresti trovare
alla chiusura puoi trovarlo all'apertura del report.
Spiegati meglio così vediamo di che si tratta.
Ciao, Carlo


text:
> Onestamente non č che abbia capito molto il tuo problema, comunque come in
> una maschera č possibile inserire una sottomaschera cosě nei report č
> possibile inserire dei sottoreport.
> L'evento per operare sulle proprietŕ di un controllo č "Su formattazioe" o
> "Su stampa" della sezione del report che contiene il controllo in
> questione.
>
> --
> Roberto
>
> -----------------------------------------------------
> il Sito Comune di it.comp.appl.access
>
http://www.sitocomune.com
> ----------------------------------------------------
ora che rileggo ... non si capisce grankč!
il report ha come RecordSource :
SELECT tDettagliBolle.idBolla, tDettagliBolle.idArt,
tDettagliBolle.quantita,  bolle.dataStamp .... etc, etc
----------------
sull'evento Close vorrei controllare che il campo dataStamp non sia vuoto:
--------------------
Private Sub Report_Close()
         If Nz(DatStamp) <> "" Then Exit Sub ' -- QUESTA č UNA RISTAMPA
         ' altrimenti eseguo alcune procedure ...
                DoCmd.OpenQuery "qMETTIstampaBolle"
        ' ..... e cosě via
End Sub
-----------------------
MA QUI NON VEDO NESSUN VALORE PER : dataStamp !
Ivan


text:
"Ivan da casa" <
ivanSENZAQ...@tin.it
> ha scritto nel messaggio
news:H7Xse.39709$75.21...@news4.tin.it...
>
> > Onestamente non è che abbia capito molto il tuo problema, comunque come
in
> > una maschera è possibile inserire una sottomaschera così nei report è
> > possibile inserire dei sottoreport.
> > L'evento per operare sulle proprietà di un controllo è "Su formattazioe"
o
> > "Su stampa" della sezione del report che contiene il controllo in
> > questione.
> >
> > --
> > Roberto
> >
> ora che rileggo ... non si capisce grankè!
>
> il report ha come RecordSource :
>
> SELECT tDettagliBolle.idBolla, tDettagliBolle.idArt,
> tDettagliBolle.quantita,  bolle.dataStamp .... etc, etc
> ----------------
>
> sull'evento Close vorrei controllare che il campo dataStamp non sia vuoto:
> --------------------
>
> Private Sub Report_Close()
>
>          If Nz(DatStamp) <> "" Then Exit Sub ' -- QUESTA è UNA RISTAMPA
>          ' altrimenti eseguo alcune procedure ...
>                 DoCmd.OpenQuery "qMETTIstampaBolle"
>         ' ..... e così via
> End Sub
> -----------------------
> MA QUI NON VEDO NESSUN VALORE PER : dataStamp !
E' naturale che tu non veda alcun valore in quel controllo visto ha fronte
dell'evento "Su chiusura" del report non è più attivo alcun record e a
questo punto non si capisce per quale record vuoi verificare se è Null o
meno il controllo DatStamp. Penso proprio che ti stia sbagliando evento,
anche se poi non è molto chiaro cosa tu voglia fare aprendo e visualizzando
il foglio dati di una query.
Scusami, ma continuo a non capire quale sia il tuo problema; forse sarebbe
meglio se ti limitassi a raccontarci cosa tu voglia fare, omettendo come tu
hai cercato di farlo: le soluzioni poi le cercheremo insieme.
>
> Ivan



text:
...
>> MA QUI NON VEDO NESSUN VALORE PER : dataStamp !
>
> E' naturale che tu non veda alcun valore in quel controllo visto ha fronte
> dell'evento "Su chiusura" del report non è più attivo alcun record e a
> questo punto non si capisce per quale record vuoi verificare se è Null o
> meno il controllo DatStamp. Penso proprio che ti stia sbagliando evento,
> anche se poi non è molto chiaro cosa tu voglia fare aprendo e
> visualizzando
> il foglio dati di una query.
> Scusami, ma continuo a non capire quale sia il tuo problema; forse sarebbe
> meglio se ti limitassi a raccontarci cosa tu voglia fare, omettendo come
> tu
> hai cercato di farlo: le soluzioni poi le cercheremo insieme.
> Roberto
>
> -----------------------------------------------------
> il Sito Comune di it.comp.appl.access
>
http://www.sitocomune.com
> ----------------------------------------------------
>
Vorrei riuscire a  fare questo:
In uscita dal report chiedo se il report (una bolla) è stata stampata
correttamente; se la risposta è SI allora metto la fatidica dataStamp.
Ma se in uscita dal report dataStamp esiste già allora capisco che questa è
una ristampa e non chiedo nessuna conferma di buona riuscita.
Forse i miei controlli sono troppo puntigliosi, ma il cliente si professa
come il terrore delle tastiere e vorrei prevenire i SUOI errori.
Ivan


text:
"Ivan da casa" <
ivanSENZAQ...@tin.it
> ha scritto nel messaggio
news:nigte.42482$75.23...@news4.tin.it...

Ma il report mostra solo una istantanea dei dati...non puoi scrivere sul
report o meglio su un controllo di un report, un valore...mica è un
recordset modificabile. Semmai puoi scrivere dal e nel codice di un report
una routine che vada a scrivere su un recordset...ma in questo caso sarebbe
più giusto scrivere la routine per esempio al click di un pulsante (stampa)
su una barra personalizzata o a fronte dell'evento stampa di una sezione
stampabile del report.
Che ne pensi?
Ciao, Carlo


text:
....
>
> Ma il report mostra solo una istantanea dei dati...non puoi scrivere sul
> report o meglio su un controllo di un report, un valore...mica è un
> recordset modificabile. Semmai puoi scrivere dal e nel codice di un report
> una routine che vada a scrivere su un recordset...ma in questo caso
> sarebbe più giusto scrivere la routine per esempio al click di un pulsante
> (stampa) su una barra personalizzata o a fronte dell'evento stampa di una
> sezione stampabile del report.
> Che ne pensi?
>
> Ciao, Carlo
in realtà è quello che faccio, lancio una query di aggiornamento  che và ad
inserre la dataStamp.
Ecco perchè mi serviva quel dato nell'evento Close del report, a quel punto
o hai stampato oppure no!
Mi pare che l'evento stampa di una qualsiasi sezione non sia dipendente
dalla stampa fisica sul foglio, ma solo alla preparazione dell'immagine del
report che viene preparato, quaindi non mi assicura che si sia verificata la
stampa fisica.
Cmq grazie a tutti che mi avete seguito davvero con pazienza ....
--
--
      /)/)               IVAN                (\/)
     (  '.')         NMCBRMC         ( '.' )
  o(_('')('')                               (")(")_)*
Non Microsoft Certified But Regular
             Microsoft Consumer


text:
"Ivan da casa" <
ivanSENZAQ...@tin.it
> ha scritto nel messaggio
news:Tilte.19984$b5.9...@news3.tin.it...
>
> ....
>>
>> Ma il report mostra solo una istantanea dei dati...non puoi scrivere sul
>> report o meglio su un controllo di un report, un valore...mica è un
>> recordset modificabile. Semmai puoi scrivere dal e nel codice di un
>> report una routine che vada a scrivere su un recordset...ma in questo
>> caso sarebbe più giusto scrivere la routine per esempio al click di un
>> pulsante (stampa) su una barra personalizzata o a fronte dell'evento
>> stampa di una sezione stampabile del report.
>> Che ne pensi?
>>
>> Ciao, Carlo
> in realtà è quello che faccio, lancio una query di aggiornamento  che và
> ad inserre la dataStamp.
> Ecco perchè mi serviva quel dato nell'evento Close del report, a quel
> punto o hai stampato oppure no!
>
> Mi pare che l'evento stampa di una qualsiasi sezione non sia dipendente
> dalla stampa fisica sul foglio, ma solo alla preparazione dell'immagine
> del report che viene preparato, quaindi non mi assicura che si sia
> verificata la stampa fisica.
>
> Cmq grazie a tutti che mi avete seguito davvero con pazienza ....
>
Sì, l'evento stampa di una sezione si verifica prima della stampa fisica del
foglio.
Credo che la soluzione del pulsante su una barra personalizzata sia la
soluzione.
Una semplice msgbox finale chiedera all'utente se il foglio è stato
stampato...se sì...allora...
Ciao, Carlo


text:
"Ivan da casa" <
ivanSENZAQ...@tin.it
> ha scritto nel messaggio
news:nigte.42482$75.23...@news4.tin.it...
> ...
> >> MA QUI NON VEDO NESSUN VALORE PER : dataStamp !
> >
> > E' naturale che tu non veda alcun valore in quel controllo visto ha
fronte
> > dell'evento "Su chiusura" del report non è più attivo alcun record e a
> > questo punto non si capisce per quale record vuoi verificare se è Null o
> > meno il controllo DatStamp. Penso proprio che ti stia sbagliando evento,
> > anche se poi non è molto chiaro cosa tu voglia fare aprendo e
> > visualizzando
> > il foglio dati di una query.
> > Scusami, ma continuo a non capire quale sia il tuo problema; forse
sarebbe
> > meglio se ti limitassi a raccontarci cosa tu voglia fare, omettendo come
> > tu
> > hai cercato di farlo: le soluzioni poi le cercheremo insieme.
> > Roberto
> >
> >
>
> Vorrei riuscire a  fare questo:
>
> In uscita dal report chiedo se il report (una bolla) è stata stampata
> correttamente; se la risposta è SI allora metto la fatidica dataStamp.
> Ma se in uscita dal report dataStamp esiste già allora capisco che questa
è
> una ristampa e non chiedo nessuna conferma di buona riuscita.
Se non ho capito male metti "la fatidica dataStamp" registrandola in un
campo di una tabella con una query di aggiornamento.
Se è così, tramite una funzione DLookup, vai a controllare se quel campo di
quella tabella è significativo, nel qual caso eviti di chiedere all'utente
la conferma di buona riuscita.
> Forse i miei controlli sono troppo puntigliosi, ma il cliente si professa
> come il terrore delle tastiere e vorrei prevenire i SUOI errori.
Se non complicano la vita all'operatività, le verifiche che prevengono gli
errori dell'utente finale a mio avviso è sempre bene farle.
>
> Ivan
--



title: mostra/nascondi campi su report

author: Elsis

text:
Cerco di semplificare:
Ho una tabella con i seguenti campi:
Tipo richiesta (puo assumere i valori Acquisto o Intervento)
Articolo (campo di tipo testo)
Intervento (campo di tipo testo)
A secondo di quello che inserisco il campo articolo o il campo
intervento è vuoto.
Nel report che vado a stampare vorrei che in uno stesso punto
mi compaia il contenuto del campo articolo o il contenuto del
campo intervento in base al "tipo richiesta" inserito.
Grazie a tutti
--
Postato da Virgilio Newsgroup: scopri i nuovi gruppi
Eros, foto e video a
http://newsgroup.eros.virgilio.it


title: mostra/nascondi campi su report

author: MA

text:
Elsis wrote:
> Cerco di semplificare:
> Ho una tabella con i seguenti campi:
>
> Tipo richiesta (puo assumere i valori Acquisto o Intervento)
> Articolo (campo di tipo testo)
> Intervento (campo di tipo testo)
>
> A secondo di quello che inserisco il campo articolo o il campo
> intervento č vuoto.
>
> Nel report che vado a stampare vorrei che in uno stesso punto
> mi compaia il contenuto del campo articolo o il contenuto del
> campo intervento in base al "tipo richiesta" inserito.
>
> Grazie a tutti
Creati un campo non associato e ci metti
=nz(Articolo;Intervento)
--
--
Massimiliano Amendola
www.accessgroup.it
Il sito italiano di svilupatori Access
www.donkarl.com/it/cisa


title: calcoli in report di 3 query

author: thanos

text:
In un report ho inserito 1 query e 2 query in sottoreport ma come posso fare
a sommare alcuni campi delle 3 query fra di loro?
Grazie per l'aiuto


title: calcoli in report di 3 query

author: Sergio MAZZA

text:
"thanos" <
tha...@libero.it
> ha scritto nel messaggio
news:WY60h.18069$Fk1....@twister2.libero.it...
> In un report ho inserito 1 query e 2 query in sottoreport ma come posso
> fare a sommare alcuni campi delle 3 query fra di loro?
> Grazie per l'aiuto
Puoi utilizzare la funzione DSum (vedi help); ma sei sicuro dell'effettiva
necessità dei sottoreport?
Ciao.
--
Sergio MAZZA


title: calcoli in report di 3 query

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:ehs82e$hal$1...@tdi.cu.mi.it...

scusa per il ritardo.......scusa ma c'e' un'altro metodo per vederli in
un'unico report?
potresti farmi un esempio con dsum? non l'ho capito con 3 query diverse!
Ciao Grazie


title: calcoli in report di 3 query

text:
"thanos" <
tha...@libero.it
> ha scritto nel messaggio
news:HQ01h.21117$uv5.1...@twister1.libero.it...
> scusa per il ritardo.......scusa ma c'e' un'altro metodo per vederli in
> un'unico report?
Di solito si utilizzano i raggruppamenti;
> potresti farmi un esempio con dsum? non l'ho capito con 3 query diverse!
cosa non hai capito? L'help in linea non era chiaro?
Es.(in una casella di testo non associata)
=DSum("nomeCampoDaSommare";"nomeQuery")
> Ciao Grazie
Ciao.
--
Sergio MAZZA


title: Ancora non va ....

author: Simone Lucesoli

text:
UTILIZZO UN MODULO CHE APRE UN FILE .XLS E POI SALVA DEI CAMBIAMENTI.
HO NOTATO CHE SIA IN WINDOWS 98 CHE IN XP RIMANE APERTA L'APPLICAZIONE DI
EXCEL (CHE MANGIA RAM E IMPEDISCE DI CANCELLARE IL FILE ELABORATO PERCHE'
ANCORA IN USO).
VI INDICO QUI DI SEGUITO IL MODULO:
Sub Elaboraxls()
Dim excApp As Object
Dim ExcDoc As Object
VDoc = "C:\ritardo eurostar\es-lp.xls"
Set excApp = CreateObject("Excel.Application")
Set ExcDoc = excApp.Workbooks.Open(VDoc)
..........................................................................
savechanges = True
Set ExcDoc = Nothing
Set excApp = Nothing
excApp.Application.Quit
End Sub
COSI' NON POSSO UTILIZZARE IL DB, ASPETTO (anche oggi) NOTIZIE DA QUALCHE
ESPERTO.
CIAO


title: Ancora non va ....

author: Roberto - Syd

text:
"Simone Lucesoli" <
simonel...@libero.it
> ha scritto nel messaggio
news:4aWn8.75477$1S3.2...@twister1.libero.it...

Prova ad invertire le seguenti istruzioni da cosě:
 Set excApp = Nothing
 excApp.Application.Quit
a cosě:
 excApp.Application.Quit
 Set excApp = Nothing
Ciao Roberto - Syd


title: Ancora non va ....

text:
> Prova ad invertire le seguenti istruzioni da così:
>
>  Set excApp = Nothing
>  excApp.Application.Quit
>
> a così:
>
>  excApp.Application.Quit
>  Set excApp = Nothing
>
> Ciao Roberto - Syd
>
>
Roberto ti ringrazio per l'interessamento l'avevo già provato, ma l'ho
rifatto or ora, ma non vuol funzionare neanche invertendo i comandi....


title: Chiusa la sub la combo della maschera non si aggiorna in automatico

author: Giorgia

text:
Buon pomeriggio,
nella maschera CARICA NUOVA FATTURA ACQUISTO
nella combo Fornitore, se not in list
Private Sub CONTO_FORNITORE_NotInList(NewData As String, Response As
Integer)
DoCmd.OpenForm "ANAGRAFICA FORNITORI", , , , , acDialog
End Sub
ma quando ritorno alla maschera chiudendo la sub, la combo continua a darmi
"selezionare una voce dall'elenco" finch� non aggiorno io da Record/
Aggiorna.
C'� la possibilit� di rendere questo aggiornamento automatico al ritorno
alla combo?
--
Giorgia


author: Karl Donaubauer

text:

"Su chiusura" della maschera per l'inserimento del nuovo fornitore
puoi aggiornare la combo:
Forms![CARICA NUOVA FATTURA ACQUISTO]![CONTO FORNITORE]= Me!IdFornitore
Forms![CARICA NUOVA FATTURA ACQUISTO]![CONTO FORNITORE].Requery
Dove IdFornitore sarebbe il nome del campo della colonna
associata nella combo. Vedi anche:
Casella combinata - Aggiungere un nuovo record
www.donkarl.com/it?FAQ4.13
BTW I nomi dei tuoi oggetti sono orribili. Tenta di evitare spazi e tanti
maiuscoli. Vedi anche:
www.donkarl.com/it?FAQ1.5
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:746g30F...@mid.individual.net...
> Giorgia wrote:
>> nella maschera CARICA NUOVA FATTURA ACQUISTO
>> nella combo Fornitore, se not in list
>>
>> Private Sub CONTO_FORNITORE_NotInList(NewData As String, Response As
>> Integer)
>> DoCmd.OpenForm "ANAGRAFICA FORNITORI", , , , , acDialog
>> End Sub
>>
>> ma quando ritorno alla maschera chiudendo la sub, la combo continua a
>> darmi "selezionare una voce dall'elenco" finchè non aggiorno io da
>> Record/ Aggiorna.
>> C'è la possibilità di rendere questo aggiornamento automatico al
>> ritorno alla combo?
>
> "Su chiusura" della maschera per l'inserimento del nuovo fornitore
> puoi aggiornare la combo:
>
> Forms![CARICA NUOVA FATTURA ACQUISTO]![CONTO FORNITORE]= Me!IdFornitore
> Forms![CARICA NUOVA FATTURA ACQUISTO]![CONTO FORNITORE].Requery
>
> Dove IdFornitore sarebbe il nome del campo della colonna
> associata nella combo. Vedi anche:
>
> Casella combinata - Aggiungere un nuovo record
>
www.donkarl.com/it?FAQ4.13
>
> BTW I nomi dei tuoi oggetti sono orribili. Tenta di evitare spazi e tanti
> maiuscoli. Vedi anche:
www.donkarl.com/it?FAQ1.5
>
> --
> HTH
> Karl
> *********
> Access FAQ:
www.donkarl.com/it
>
Per un pelo non sono stata "indipendente"!
avevo inserito solo
 Forms![CARICA NUOVA FATTURA ACQUISTO]![CONTO FORNITORE].Requery
e ovviamente non funzionava.
Grazie!
Giorgia


text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:746g30F...@mid.individual.net...

Karl scusami,
sono riuscita a risolvere quasi tutto solo 2 cosine:
1- come posso eliminare il msg di Access "il testo digitato non corrisponde
a una voce nell'elenco"?nel momento in cui mi si apre la maschera per il
nuovo inserimento lo capisco da me e diventa fastidioso.
2- una volta inserito il nuovo fornitore, chiusa la sub, la combo della
maschera viene aggiornata ma mi ripropone il primo record e non quello
appena inserito, � possibile apportare questa modifica?
Giorgia


text:
Giorgia wrote:
>> ...
>> Casella combinata - Aggiungere un nuovo record
>>
www.donkarl.com/it?FAQ4.13
> ...
> sono riuscita a risolvere quasi tutto solo 2 cosine:
> 1- come posso eliminare il msg di Access "il testo digitato non
> corrisponde a una voce nell'elenco"?nel momento in cui mi si apre la
> maschera per il nuovo inserimento lo capisco da me e diventa
> fastidioso.
Guarda la variante 2 del articolo segnalato, soprattutto l'uso di
Response = acDataErrContinue
> 2- una volta inserito il nuovo fornitore, chiusa la sub,
> la combo della maschera viene aggiornata ma mi ripropone il primo
> record e non quello appena inserito, � possibile apportare questa
> modifica?
Per me non succede con il codice del'articolo, grazie al
Forms!frm_Fattura!cbo_RicercaCliente = Me!IdCliente
alla chiusura della seconda maschera.



text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:746l7vF...@mid.individual.net...
> Giorgia wrote:
>>> ...
>>> Casella combinata - Aggiungere un nuovo record
>>>
www.donkarl.com/it?FAQ4.13
>> ...
>> sono riuscita a risolvere quasi tutto solo 2 cosine:
>> 1- come posso eliminare il msg di Access "il testo digitato non
>> corrisponde a una voce nell'elenco"?nel momento in cui mi si apre la
>> maschera per il nuovo inserimento lo capisco da me e diventa
>> fastidioso.
>
> Guarda la variante 2 del articolo segnalato, soprattutto l'uso di
> Response = acDataErrContinue
>
>> 2- una volta inserito il nuovo fornitore, chiusa la sub,
>> la combo della maschera viene aggiornata ma mi ripropone il primo
>> record e non quello appena inserito, è possibile apportare questa
>> modifica?
>
> Per me non succede con il codice del'articolo, grazie al
> Forms!frm_Fattura!cbo_RicercaCliente = Me!IdCliente
> alla chiusura della seconda maschera.
>
> --
> HTH
> Karl
> *********
> Access FAQ:
www.donkarl.com/it
>
>
Oggi peggio di ieri!
Quello che funzionava ieri, oggi mi da' errore! per es : error di run-time
2465: impossibile trovare il campo
Eppure il campo è giusto.....che verifiche posso fare?
Giorgia


text:
"Giorgia" <
gio...@vitaletrasporti.com
> ha scritto nel messaggio
news:49df0e0b$0$1108$4faf...@reader4.news.tin.it...

in particolare.......
Private Sub CONTO_FORNITORE_NotInList(NewData As String, Response As
Integer)
If MsgBox("INSERIRE NUOVO FORNITORE?", vbYesNo) = vbYes Then
  Response = acDataErrContinue
  DoCmd.OpenForm "ANAGRAFICA_FORNITORI", , , , acFormAdd
  Forms!ANAGRAFICA_FORNITORI!RAGIONE_SOCIALE = NewData
Else
  Response = acDataErrContinue
  Me!CONTO_FORNITORE.Undo
End If
End Sub
nel debug del codice, mi dice impossibile trovare la maschera ANAGRAFICA
FORNITORI.....ma c'è!!ed è scritta correttamente.
Oppure se riesco a farla aprire, qui
Private Sub Form_Close()
 Forms![NUOVA FATTURA ACQUISTO]![COD FORNITORE] = Me!RAGIONE_SOCIALE
 Forms![NUOVA FATTURA ACQUISTO]![COD FORNITORE].Requery
End Sub
poi non me la chiude perchè non la riconosce.
Perchè non mi trova oggetti esistenti??che tra l'altro fino a ieri trovava?


text:
Giorgia wrote:
> "Karl Donaubauer ha scritto:
>>>> ...
>>>> Casella combinata - Aggiungere un nuovo record
>>>>
www.donkarl.com/it?FAQ4.13
>>> ...
> Oggi peggio di ieri!
> Quello che funzionava ieri, oggi mi da' errore! per es : error di run-time
> 2465: impossibile trovare il campo
>
> Eppure il campo è giusto.....che verifiche posso fare?
Puoi solo sapere tu.
Se ricevi un errore e/o hai una domanda su un codice sarebbe
abbastanza utile di descrivere la situazione, copiare/incollare
=postare il codice rilevante e scrivere in quale riga esattamente
succede l'errore.
--
cu



text:
Giorgia wrote:
>> "Karl Donaubauer ha scritto:
>>>>> ...
>>>>> Casella combinata - Aggiungere un nuovo record
>>>>>
www.donkarl.com/it?FAQ4.13
>>>> ...
>> Quello che funzionava ieri, oggi mi da' errore! per es : error di
>> run-time 2465: impossibile trovare il campo
>> ...
> in particolare.......
Ok, così possiamo almeno discutere. :-)
> Private Sub CONTO_FORNITORE_NotInList(NewData As String, Response As
> Integer)
> If MsgBox("INSERIRE NUOVO FORNITORE?", vbYesNo) = vbYes Then
>  Response = acDataErrContinue
>  DoCmd.OpenForm "ANAGRAFICA_FORNITORI", , , , acFormAdd
>  Forms!ANAGRAFICA_FORNITORI!RAGIONE_SOCIALE = NewData
> Else
>  Response = acDataErrContinue
>  Me!CONTO_FORNITORE.Undo
> End If
>
> End Sub
>
> nel debug del codice, mi dice impossibile trovare la maschera ANAGRAFICA
> FORNITORI.....ma c'è!!ed è scritta correttamente.
In quale riga ricevi l'errore?
Nel tuo primo messaggio hai usato uno spazio nel nome della
maschera. Era "ANAGRAFICA FORNITORI".
Certo puoi solo controllare tu come si chiama la tua maschera.
> Oppure se riesco a farla aprire, qui
>
> Private Sub Form_Close()
> Forms![NUOVA FATTURA ACQUISTO]![COD FORNITORE] = Me!RAGIONE_SOCIALE
> Forms![NUOVA FATTURA ACQUISTO]![COD FORNITORE].Requery
>
> End Sub
>
> poi non me la chiude perchè non la riconosce.
"chiude" cosa e perché?
> Perchè non mi trova oggetti esistenti??che tra l'altro fino a ieri
> trovava?
Nel codice del evento NotInList si vede "CONTO_FORNITORE"
come nome della casella combinata. Come VBA non puo gestire
nomi con spazi nella dicchiarazione di una procedura, puo anche
darsi che ha aggiunto l'underscore e la casella si chiamino
"CONTO FORNITORE". Di nuovo devi controllare tu.
In ogni caso è diverso dal nome che usi nel Form_Close, dove scrivi
[COD FORNITORE]
Invece dev'essere di nuovo il nome giusto della casella combinata.
Ovviamente i tuoi nomi attuali creano confusioni.
Ti consiglio di nuovo di usare nomi senza spazi, con prefissi e
con meno maiuscoli (p.e. cboCodFornitore, frmFatturaNuovo ecc.).



text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:748k08F...@mid.individual.net...

Ho ricontrollato tutto, cancellato e riscritto tutti i codici....
ora funziona ed è questo l'importante....ma l'amaro in bocca per non aver
capito chissà cosa ho sbagliato prima rimane! ;-)
Che sclero.....veramente crea dipendenza sto "lavoro"!!
Meno male che ci siete voi del forum!
Giorgia


title: File .ldb con dati non corretti

author: marcopio

text:
Con spunto di Roberto da Parma ho convertito per A2k il file
“Leggere_il_file_ldb.zip” (
www.accessgroup.it
 ). Ora e riesco a
puntare un file ldb a piacimento e leggerne il contenuto.
Ora mi sarebbe utile usarlo, solamente che mi succedono delle cose che
non capisco (questo anche aprendo i file .ldb con Notepad):
I file .ldb analizzati sono su Windows SqlServer e spesso vengono
aperti da più di un utente.
Allora, non riesco a capire perché a volte i file .ldb non vengono
correttamente aggiornati:
Spesso mi rimangono appesi anche se tutti gli utenti sono usciti dalle
applicazioni.
Se esiste il file .ldb senza utenti nell’applicazione, quando entro
con un utente aggiorna i primi due campi (computer + utente) ma il
resto del file resta sporco. In questo caso la data di ultima modifica
del file stranamente non viene aggiornata.
A volte uscendo con l’ultimo utente dall’applicazione mi cancella il
file .ldb correttamente.
A volte nel file .ldb mi trovo caratteri strani tipo”>” che mi
bloccano a metà la lettura del file (impostazioni internazionali) .
Forse che il problema è che in multiutenza il file viene mal gestito?
Suggerimenti? Spiegazioni?
Lo scopo finale sarebbe conoscere gli utenti che anno correntemente
aperto l’applicazione. Devo prendere altre strade?
Ciao, mpio.
Lo scopo finale sarebbe conoscere gli utenti che anno correntemente
aperto l’applicazione. Devo prendere altre strade?
Ciao, mpio.


title: File .ldb con dati non corretti

author: Roberto da Parma

text:
"marcopio" <
mdre...@more-oxy.com
> ha scritto nel messaggio
news:5415ac1a-cb25-4cdc...@o27g2000vbd.googlegroups.com...
Con spunto di Roberto da Parma ho convertito per A2k il file
�Leggere_il_file_ldb.zip� (
www.accessgroup.it
 ). Ora e riesco a
puntare un file ldb a piacimento e leggerne il contenuto.
Ora mi sarebbe utile usarlo, solamente che mi succedono delle cose che
non capisco (questo anche aprendo i file .ldb con Notepad):
I file .ldb analizzati sono su Windows SqlServer e spesso vengono
aperti da pi� di un utente.
Allora, non riesco a capire perch� a volte i file .ldb non vengono
correttamente aggiornati:
Spesso mi rimangono appesi anche se tutti gli utenti sono usciti dalle
applicazioni.
Se esiste il file .ldb senza utenti nell�applicazione, quando entro
con un utente aggiorna i primi due campi (computer + utente) ma il
resto del file resta sporco. In questo caso la data di ultima modifica
del file stranamente non viene aggiornata.
A volte uscendo con l�ultimo utente dall�applicazione mi cancella il
file .ldb correttamente.
A volte nel file .ldb mi trovo caratteri strani tipo�>� che mi
bloccano a met� la lettura del file (impostazioni internazionali) .
Forse che il problema � che in multiutenza il file viene mal gestito?
Suggerimenti? Spiegazioni?
Lo scopo finale sarebbe conoscere gli utenti che anno correntemente
aperto l�applicazione. Devo prendere altre strade?
Ciao, mpio.
Lo scopo finale sarebbe conoscere gli utenti che anno correntemente
aperto l�applicazione. Devo prendere altre strade?
Ciao, mpio.
Ah beh....se lo fai per quello ...io adotto tutt'altra strada...quando ti
connetti con il FE vado a scrivere in una tabella....che poi cancello
(l'utente s'intende) alla chiusura...che pu� essere la stessa per tenere
traccia degli accessi e/o di eventuali crash dell'utente.
Il file .ldb � un p� una roba strana...e per quanto mi � capitato, non
sempre viene scritto alla stessa maniera,...per lo scopo che ne fai tu
secondo me non � la strada migliore.
Ciao
--
Roberto da Parma


title: File .ldb con dati non corretti

text:
marcopio wrote:
> Con spunto di Roberto da Parma ho convertito per A2k il file
> ï¿½Leggere_il_file_ldb.zipï¿½ (
www.accessgroup.it
 ). Ora e riesco a
> puntare un file ldb a piacimento e leggerne il contenuto.
> Ora mi sarebbe utile usarlo, solamente che mi succedono delle cose che
> non capisco (questo anche aprendo i file .ldb con Notepad):
> I file .ldb analizzati sono su Windows SqlServer e spesso vengono
> aperti da piï¿½ di un utente.
> Allora, non riesco a capire perchï¿½ a volte i file .ldb non vengono
> correttamente aggiornati:
> ...
Leggere il ldb non ï¿½ mai stato molto affidabile. Citato da
http://support.microsoft.com/kb/208778/EN-US/
---
When a user closes a shared database, the user's entry is not
removed from the .ldb file. However, the user's entry may be
overwritten when another user opens the database.
This means that you cannot use the .ldb file alone to determine
who is currently using the database.
---
> ...
> Lo scopo finale sarebbe conoscere gli utenti che anno correntemente
> aperto lï¿½applicazione. Devo prendere altre strade?
Un metodo piï¿½ affidabile ï¿½ il UserRoster:
http://support.microsoft.com/kb/198755/en-us
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: File .ldb con dati non corretti

author: Sandrobi

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:76jfhnF...@mid.individual.net...

Per chi usa DAO e non ADO, ci sono altre soluzioni?
Sandrobi


title: File .ldb con dati non corretti

text:
Sandrobi wrote:
> "Karl Donaubauer ha scritto:
>>> ...
>>> Lo scopo finale sarebbe conoscere gli utenti che anno correntemente
>>> aperto lï¿½applicazione. Devo prendere altre strade?
>>
>> Un metodo piï¿½ affidabile ï¿½ il UserRoster:
>>
http://support.microsoft.com/kb/198755/en-us
> ...
> Per chi usa DAO e non ADO, ci sono altre soluzioni?
Fuori del ldb e il UserRoster non c'ï¿½ niente "incluso".
Certo si puo gestire gli utenti con le proprie tabelle nell'applicazione
come giï¿½ scritto da Roberto.
--
cu



title: File .ldb con dati non corretti

text:
On 8 Mag, 21:29, "Karl Donaubauer" <
NoS...@donkarl.com
> wrote:
> marcopiowrote:
> > Con spunto di Roberto da Parma ho convertito per A2k il file
> > “Leggere_il_file_ldb.zip” (
www.accessgroup.it
). Ora e riesco a
> > puntare un file ldb a piacimento e leggerne il contenuto.
> > Ora mi sarebbe utile usarlo, solamente che mi succedono delle cose che
> > non capisco (questo anche aprendo i file .ldb con Notepad):
> > I file .ldb analizzati sono su Windows SqlServer e spesso vengono
> > aperti da più di un utente.
> > Allora, non riesco a capire perché a volte i file .ldb non vengono
> > correttamente aggiornati:
> > ...
>
> Leggere il ldb non è mai stato molto affidabile. Citato dahttp://
support.microsoft.com/kb/208778/EN-US/
>
> ---
> When a user closes a shared database, the user's entry is not
> removed from the .ldb file. However, the user's entry may be
> overwritten when another user opens the database.
> This means that you cannot use the .ldb file alone to determine
> who is currently using the database.
> ---
>
> > ...
> > Lo scopo finale sarebbe conoscere gli utenti che anno correntemente
> > aperto l’applicazione. Devo prendere altre strade?
>
> Un metodo più affidabile è il UserRoster:
http://support.microsoft.com/kb/198755/en-us
>
> --
> HTH
> Karl
> *********
> Access FAQ:
www.donkarl.com/it
Grazie,
scusa il ritardo della risposta ma ho avuto proplemi con la
connessione internet.
Ho fatto la prova copiando il codice del sito microsoft e tutto
funziona.
Anche puntando un .mde in rete che è l'utilizzo finale.
Grazie anche a Roberto da Parma.
(siete più veloci a rispondere voi che io a ripristinare internet)
Ciao, mpio.


title: improvvisamente, Tipo relazione: non definita

author: uno

text:
Dopo innumerevoli tentativi, non riuscendo a configurare una nuova
relazione uno a molti nel mio database, elimino le relazioni uno a molti
esistenti e provo a ricrearle per vedere dove sta l'arcano.
Niente da fare: non riesco più a ricreare le relazioni uno a molti nella
finestra delle relazioni. Il tipo di relazione indicato nella finestra
delle proprietà è: non definita.
E così ovviamente non riesco ad applicare l'integrità referenziale.
Provare a trasferire tabelle, query e form in un database vuoto mi
porterebbe via tantissimo tempo senza garanzia di successo.
Sto sbagliando qualcosa? Grazie.


text:

Evidentemente hai dei record che non rispettano relazioni ed integrità. Nessun arcano


text:
Il 24/06/2013 10.55, Fair87 ha scritto:
> Evidentemente hai dei record che non rispettano relazioni ed integrità. Nessun arcano
>

Ho dimenticato di dire che, lavorando su una copia del database, ho
eliminato tutti i record dalle tabelle coinvolte nella relazione, e il
risultato non cambia: relazione non definita.


text:
Il 24/06/2013 10.55, Fair87 ha scritto:
> Evidentemente hai dei record che non rispettano relazioni ed integrità. Nessun arcano

E comunque, anche prima di eliminare tutti i record, avevo una relazione
che nella finestra delle relazioni compariva correttamenet indicata come
uno a molti. La elimino, la ricreo, e non è più uno a molti ma diventa
non definita? Non è un arcano questo, essendo ovviamente impossibile che
dei record si siano autoinseriti per caso tra l'istante in cui ho
eliminato la relazione e quallo in cui l'ho ricreata?


author: pfmarro

text:
hai provato a compattare il database?

le tabella hanno chiavi primarie univoche?

Saluti



text:
Il 24/06/2013 11.40, pfmarro ha scritto:
> hai provato a compattare il database?
>
> le tabella hanno chiavi primarie univoche?

Alla fine, procedendo per tentativi, sono riuscito dopo avere cancellato
tutti gli indici (non solo quelli della chiave primaria, anzi, erano gli
altri che davano problemi) e poi ricreandoli.
Cosě ho potuto tornare a impostare le mie relazioni come uno a molti.


title: Help Stampa unione

text:
Ho Provato a mettere il databse in locale sul disco fisso C: anzichè sul
server di rete ma, quando apro il documento di word da access con il comando
shell, e questo documento è collegato attraverso stampa unione ad una query
di questo database, viene aperta un altra sessione di access che quindi non
sente i filtri da me impostati dalla prima sessione aperta e quindi quando
eseguo la stampa unione lui mi inserisce tutti i record!
Qualcuno sa darmi qualche dritta per non fargli aprire la seconda sessione e
dirgli quindi di prendersi solo i record da me filtrati?
Grazie anticipatamente, tosto73.


title: Help Stampa unione

author: Fabio Montagner

text:
Ma il documento è anche lui in locale?
Hai provato a reimpostargli l'origine dei dati?


title: Help Stampa unione

text:
Fabio Montagner <
f.mon...@issz.vr.it
> wrote in message
99d15i$2h5g$1...@stargate1.inet.it...
> Ma il documento è anche lui in locale?
> Hai provato a reimpostargli l'origine dei dati?
>
Sei mitico! funziona grazie! ho dovuto ridefinire le query come hai detto
tu! ciao.


title: MI5 Persecution: Interception of Communications Tribunal Denies

text:
Interception of Communications Tribunal Denies
In May 1997 the Interception of Communications Tribunal wrote to me regarding the complaint I had brought in February. They say,
The Interception of Communications Tribunal have now considered your
application carefully and have asked me to inform you that their
investigation into the matters you raised has satisfied them that there
has been no contravention of Sections 2 to 5 of the Interception of
Communications Act 1985 in relation to a relevant warrant or relevant
certificate.
Rubbish. They're bugging my house and they won't admit it. The ICT and SST are a sham.
5
--
Posted via a free Usenet account from
http://www.teranews.com


title: visible su campo formato SI/NO

author: BB

text:
ho due campi , impegno e capitolo
il campo impegno è in formato SI/NO quindi il quadratino da spuntare o meno
vorrei che se il quadratino impegno è spuntato il campo capitolo diventi
visibile mentre se non è spuntato resta invisibile
ho usato la seguente formula che funziona con campi testo o numerici
If Impegno = "Si" Then
Capitolo.Visible = True
Else
Capitolo.Visible = False
naturalmente non mi funziona con il campo in formato SI/NO
sbaglio a inserire il valore nela formula o devo usare qualche altra
formula?
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: visible su campo formato SI/NO

author: Pablitomf

text:
BB ha scritto:
> ho due campi , impegno e capitolo
> il campo impegno è in formato SI/NO quindi il quadratino da spuntare o meno
> vorrei che se il quadratino impegno è spuntato il campo capitolo diventi
> visibile mentre se non è spuntato resta invisibile
> ho usato la seguente formula che funziona con campi testo o numerici
> If Impegno = "Si" Then
> Capitolo.Visible = True
> Else
> Capitolo.Visible = False
> naturalmente non mi funziona con il campo in formato SI/NO
> sbaglio a inserire il valore nela formula o devo usare qualche altra
> formula?
Anche il "quadratino da spuntare o no" usa il True o False (-1 / 0),
quindi non è Impegno = "Si" ma Impegno = True...
--
Pablitomf (Maurizio Facciuti)
“Quando non ti eserciti ricorda che qualcuno in qualche posto si sta
allenando e, quando lo incontrerai, ti batterà”.
Ed Macauley



title: visible su campo formato SI/NO

author: Marco Antonioli

text:
> If Impegno = "Si" Then
>
> Capitolo.Visible = True
> Else
>
> Capitolo.Visible = False
Prova anche a mettere dopo aggiornamento di impegno :
me.capitolo.visible = me.impegno
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: visible su campo formato SI/NO

author: Roberto dalla campagna

text:
"Marco Antonioli" <
in...@echovr.it
> ha scritto nel messaggio
news:819e9a7df9c6677d737...@mygate.mailgate.org...
> > If Impegno = "Si" Then
> >
> > Capitolo.Visible = True
> > Else
> >
> > Capitolo.Visible = False
>
> Prova anche a mettere dopo aggiornamento di impegno :
> me.capitolo.visible = me.impegno
Anche a fronte dell'evento "Su corrente" della maschera.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: visible su campo formato SI/NO

text:
ho un campo SI/NO chiamato giudizio_passivo , nelle proprietą su
aggiornamento ho inserito la seguente formula
Private Sub giudizio_passivo_AfterUpdate()
If giudizio_passivo = -1 Then
Etichetta108.Visible = True
Else
Etichetta108.Visible = False
End If
End Sub
quando clicco sul campo, la cosa funziona, ma se visualizzo i record
dell'archivio sulla maschera, l'etichetta108 rimane comunque visibile
anche se il valore del giudizio_passivo sia NO a meno che al momento ci
clicco sopra e mi scompare.
Come faccio per generare l'evento anche solo nella consultazione dei vari
record?
--



title: visible su campo formato SI/NO

author: MA

text:
"BB" <
onof...@tin.it
> ha scritto nel messaggio
news:chjriq$tl6$1...@news.newsland.it...
> ho un campo SI/NO chiamato giudizio_passivo ,
nelle proprietà su
> aggiornamento ho inserito la seguente formula
>
> Private Sub giudizio_passivo_AfterUpdate()
> If giudizio_passivo = -1 Then
>
> Etichetta108.Visible = True
> Else
>
> Etichetta108.Visible = False
> End If
>
> End Sub
>
> quando clicco sul campo, la cosa funziona, ma se
visualizzo i record
> dell'archivio sulla maschera, l'etichetta108
rimane comunque visibile
> anche se il valore del giudizio_passivo sia NO a
meno che al momento ci
> clicco sopra e mi scompare.
> Come faccio per generare l'evento anche solo
nella consultazione dei vari
> record?
Current
MAssimiliano


title: visible su campo formato SI/NO

text:
MA ha scritto:

> Current
> MAssimiliano
grazie!
funziona!  ho rimasto la formula anche su dopo aggiornamento del campo
altrimenti quando vado a nuovo record e metto si o no, l'etichetta198
rimane sempre invisibile.
va bene?



title: visible su campo formato SI/NO

text:
"BB" <
onof...@tin.it
> ha scritto nel messaggio
news:chjscu$8s7$1...@news.newsland.it...

Sì.
Eleganza vorrebbe che ti creassi una sub con la
tua condizione e la richiami
dagli eventi che vuoi (così la scirivi una sola
volta)
MAssimiliano


title: visible su campo formato SI/NO

text:
MA ha scritto:


MMMMMHH anche questa non è male! ci provo!



title: visible su campo formato SI/NO

text:
BB ha scritto:
> MA ha scritto:



non ci riesco!
SOS



title: visible su campo formato SI/NO

text:

Private sub Form_current()
    call Mostra
end sub
Sub Mostra()
If giudizio_passivo = -1 Then
    Etichetta108.Visible = True
Else
    Etichetta108.Visible = False
End If
End sub
p.s. evita di mantenere il nome di default delle
etichette, altrimenti non ti significano nulla
io farei Eti_Giudizio perchè mi piace tenere le
etichette tutte vicine in fase di programmazione
(è difficile doversi riferire al controllo e alla
relativa etichetta)
ciao
MAssimiliano


title: visible su campo formato SI/NO

text:
MA ha scritto:




ma come posso usare lo stesso modulo con più pulsanti abbinati a campi
SI/NO diversi? dato che la condizione IF cambia da campo a campo nel
modulo dovrei scrivere le istruzioni per ogni singolo pulsante e siccome i
pulsanti ne sono una decina..! sarebbe comodo un solo comando per tutti,
ma come?



title: visible su campo formato SI/NO

text:

Gestisci tutto con i TAG.
vedi post precedenti, se n'è discusso parecchio.
MAsismiliano


title: Query x Ricerca Mese..

author: SuperPippo

text:
salve amici volevo chiedere come faccio in una tabella a trovare un mese
specifico...
mi spiego campo Data ... tutto l'anno 2000... mi serve solo il mese di
Giugno...
cosa metto nei criteri della Query... la data è in formato 12/06/2000 !!!!
Grazie....


title: Query x Ricerca Mese..

author: Antonio Biso

text:
SuperPippo <QRZ?
ik0...@libero.it
> wrote in message
vfzH5.46865$Nz.13...@news.infostrada.it...

Funzione Month
Antonio


title: Query x Ricerca Mese..

author: Pivo

text:

c'è un post del 17/10 che lo spiega
"ricerca per data"


title: Cercare record con valore zero.

author: RobertOne

text:
Buona sera a tutto il n.g.
Ho la necessitą nel mio scadenziario trovare tutte le fatture ed i
rispettivi fornitori a cui non č stata saldata la fattura stessa, oppure non
č stato dato nessun acconto. Come posso fare?
Grazie.
Rob.


title: Cercare record con valore zero.

author: SunRex

text:
"RobertOne" <
robe...@robort.it
> ha scritto nel messaggio
news:xuyEe.1932$2U1.2...@news3.tin.it...
> Buona sera a tutto il n.g.
>
> Ho la necessità nel mio scadenziario trovare tutte le fatture ed i
> rispettivi fornitori a cui non è stata saldata la fattura stessa, oppure
non
> è stato dato nessun acconto. Come posso fare?
>
> Grazie.
>
> Rob.
>
Hai pensato di gestire lo stato della fattura con un campo Si/No?
-1 non saldata
0 saldata
SunRex


title: Cercare record con valore zero.

text:
Con un Flag "Pagato"
Grazie.
"SunRex"  ha scritto nel messaggio



title: Aggiornare un campo num in base a una data

author: Alessandra

text:
Salve a tutto il NG...
Ho una tabella con due caselle, una contiene una data, l'altra contiene i
giorni, ora, il mio problema è quello di inserire nella casella dei giorni
il numero di giorni del mese in base alla data che inserisco nella casella
DATA.
Ad esempio: nella casella data inserisco 26/09/02,
nella casella giorni mi dovrebbe inserire 30 perché il mese di settembre ha
30 giorni... e così via
Esiste una funzione che mi permette di fare questo in automatico?
Grazie a tutti...
--------------------------------
Inviato via
http://usenet.libero.it


author: Maurizio Borrelli

text:
> "Alessandra" news:213Z136Z131Z221Y...@usenet.libero.it...:
> Ho una tabella con due caselle, una contiene una data, l'altra contiene i
> giorni, ora,
    "Ora" in che senso ? Nel senso di "dunque" o nel senso di "ora del
giorno" ?
> il mio problema è quello di inserire nella casella dei giorni
> il numero di giorni del mese in base alla data che inserisco nella casella
> DATA.
> Ad esempio: nella casella data inserisco 26/09/02,
> nella casella giorni mi dovrebbe inserire 30 perché il mese di settembre
ha
> 30 giorni... e così via
> Esiste una funzione che mi permette di fare questo in automatico?
        Day(DateSerial(Year(DATA),Month(DATA)+1,0))
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


text:
[CUT]
Esiste una funzione che mi permette di fare questo in automatico?
>
> Day(DateSerial(Year(DATA),Month(DATA)+1,0))
>
> --
> Ciao :-)
> Maurizio
> --------
> ?SPQR(C)
> X
> --------
>
>
 Grazie Maurizio, si, intendevo "dunque" nel messaggio...
alla prossima...
Alessandra



title: ciclo per impostare valore di un campo

author: Cte Sulu

text:
Un deferente saluto ai partecipanti al NG.
Ho un quesito che mi sembra semplice ma di cui non vengo a capo (yes I'm a
newbie). Vorrei impostare ad un dato valore un campo di una tabella, e per
afr ciò pensavo di usare un ciclo tipo Do...Loop o For..Next quando si
verificave tale necessità. Purtroppo mi impantantananano ottenendo solo
messaggi di errore. Qualcuno mi può suggerire la strada? Grassie.


title: ciclo per impostare valore di un campo

author: Rabozzi Luigi

text:
Se il valore deve essere fisso per tutti i Record della tabella puoi
tranquillamente metterlo come valore predefinito del Campo direttamente
dalla struttura della tabella, in alternativa del codice puoi anche usare
una Query di aggiornamento (Docmd.RunSQL).
Manda un esempio di quel che vuoi fare cosi' si puo' capire meglio :)
Ciao
<LuigI>
Cte Sulu <
dangelan...@hotmail.com
> wrote in message
8j794u$mbo$1...@nslave2.tin.it...



title: ciclo per impostare valore di un campo

author: Sergio MAZZA

text:
"Cte Sulu" <
dangelan...@hotmail.com
> ha scritto nel messaggio
news:8j794u$mbo$1...@nslave2.tin.it...
> Un deferente saluto ai partecipanti al NG.
> Ho un quesito che mi sembra semplice ma di cui non vengo a capo (yes I'm a
> newbie). Vorrei impostare ad un dato valore un campo di una tabella, e per
> afr ciò pensavo di usare un ciclo tipo Do...Loop o For..Next quando si
> verificave tale necessità. Purtroppo mi impantantananano ottenendo solo
> messaggi di errore. Qualcuno mi può suggerire la strada? Grassie.
>
>
Puoi spiegarti meglio?
Ciao.


title: l'edit-update di un campo incrementa l'mdb

text:
Salve a tutti,
per motivi che sarebbe troppo lungo spiegare, una procedura all'interno
di un modulo esegue un gran numero di iterazioni nelle quali faccio
l'edit di un record, modifico un campo,  faccio l'update e mi sposto di
record.
L'operazione di edit-update fa crescere ogni volta di 4 k la dimensione
dell'mdb e siccome parliamo di diversi milioni di iterazioni, l'mdb in
breve supera i fatidici 2 giga.
Ho provato a chiudere il recorset, mettendo anche l'oggetto=nothing, ma
lo spazio non viene reimpiegato e si incrementa sempre.
Cosa ne pensate? Mi suggerite qualcosa?
Grazie a tutti in anticipo. Maurizio


author: Morgan

text:
"Tapizio01" <
mauri...@hotmail.it
> ha scritto nel messaggio
news:1137618540.3...@o13g2000cwo.googlegroups.com...

La butto li
Transazioni?
Morgan


author: Alessio

text: E fare un compactDatabase alla fine delle operazioni?


text:
"Tapizio01" <
mauri...@hotmail.it
> ha scritto nel messaggio
news:1137618540.3...@o13g2000cwo.googlegroups.com...

E dividere l'unico mdb in più mdb BE?
Ciao.
--
Sergio MAZZA


text:
Vi ringrazio tutti per il contributo e scusate il ritardo con cui lo
faccio, dovuto a varie cause.
Ho valutato tutte le proposte, ho provato le transazioni ma non è
servito, l'ho modificato con un BE e ho verificato che cresceva questo
e non quello dove c'era il codice, ho quindi inserito la compattazione
mettendola dove potevo, ma è troppo tardi, l'mdb ha già superato i
due Giga.
A questo punto penso proprio che dovrò ripensare tutta la procedura,
riducendo i continui edit-update, per evitare questo inconveniente che
sembra appartenere più ad Access che al codice.
Grazie ancora e alla rpossima. Maurizio


title: Sostituire un carattere in immissione

author: FID

text:
Salve, non so per quale motivo il barcode che ho creato utilizzando il
modulo di James Isle Mercanti viene "letto" male, ovvero stampo un valore
Re05/00001 e viene letto dalla pistola come Re05-00001. Posso nella text
che riceve il barcode fare in modo mche quel trattino sia sostituito dal
giusto carattere?
1000 grazie
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Sostituire un carattere in immissione

author: Il Gatto

text:
FID ha scritto:
> Salve, non so per quale motivo il barcode che ho creato utilizzando il
> modulo di James Isle Mercanti viene "letto" male, ovvero stampo un valore
> Re05/00001 e viene letto dalla pistola come Re05-00001. Posso nella text
> che riceve il barcode fare in modo mche quel trattino sia sostituito dal
> giusto carattere?
Nell'evento "Su Pressione" della textbox aggiungi:
Private Sub TuaTextBox_KeyPress(KeyAscii As Integer)
     If KeyAscii = Asc("-") Then KeyAscii = Asc("/")
End Sub
La conversione forzata potrebbe dipendere dal codice a barre usato: il
Code 128 ha la "/" sia nella codifica A che nella B (la C è quella coi
numeri da 00 a 99 accoppiati, la "/" in A e B usa la stessa sequenza di
"15" nella C), mentre se non sbaglio è assente nel Code 3/9 e magari il
componente (che non conosco) ha messo una pezza.
Tieni anche conto che alcuni scanner necessitano di essere impostati
correttamente facendogli leggere le sequenze che di solito trovi sul
manuale e senza le quali potrebbero utilizzare un set di caratteri non
idoneo.
IG


title: Sostituire un carattere in immissione

text:
FID ha scritto:
> Salve, non so per quale motivo il barcode che ho creato utilizzando il
> modulo di James Isle Mercanti viene "letto" male, ovvero stampo un valore
> Re05/00001 e viene letto dalla pistola come Re05-00001. Posso nella text
> che riceve il barcode fare in modo mche quel trattino sia sostituito dal
> giusto carattere?
> 1000 grazie
Essendo abbastanza semplice e funzionale come sistema, ecco il codice da
inserire in un modulo
Option Compare Database   'Use database order for string comparisons
Option Explicit
'
' barcode39.mdb
'
' Barcode Generator for Code 3 of 9, Code 39, and Mil-spec Logmars.
'
' version 2.0 (updated for MsAccess 97)
'
' (c) 1993-1999 James Isle Mercanti, Cocoa Beach, FL 32931  USA
' Permission granted for public use and royalty-free distribution.
' No mention of source or credits is required. All rights reserved.
'
' TO USE THIS CODE:
'
'   1 - Create Report with a TextBox control. (example named Barcode)
'       Make sure the Visible property is set to "No".
'   2 - Set On-Print property of section to [Event Procedure]
'       by clicking on the [...] and selecting "Code Builder"
'   3 - Confirm that the following code matches yours...
'
'      Sub Detail1_Print (Cancel As Integer, PrintCount As Integer)
'
'         Result = MD_Barcode39(Barcode, Me)
'
'      End Sub
'
'   4 - NOTE: The name of the section is "Detail1" for example only!
'       Your section might show a different name. Ditto for "Barcode".
'
'   5 - NOTE: To use on sub-forms, the Report name should be hard-coded
'       into the function. i.e. Rpt = Reports!MainForm!SubForm.Report.
'       The easy method is to just avoid using sub-forms and sub-reports.
'
Function MD_Barcode39(Ctrl As Control, Rpt As Report)

    On Error GoTo ErrorTrap_BarCode39

    Dim Nbar As Single, Wbar As Single, Qbar As Single, NextBar As Single
    Dim CountX As Single, CountY As Single, CountR As Single
    Dim Parts As Single, Pix As Single, Color As Long, BarCodePlus As
Variant
    Dim Stripes As String, BarType As String, Barcode As String
    Dim Mx As Single, my As Single, Sx As Single, Sy As Single
    Const White = 16777215: Const Black = 0
    Const Nratio = 20, Wratio = 55, Qratio = 35

    'Get control size and location properties.
    Sx = Ctrl.Left: Sy = Ctrl.Top: Mx = Ctrl.Width: my = Ctrl.Height

    'Set handle on control.
    Barcode = Ctrl

    'Calculate actual and relative pixels values.
    Parts = (Len(Barcode) + 2) * ((6 * Nratio) + (3 * Wratio) + (1 *
Qratio))
    Pix = (Mx / Parts):
    Nbar = (20 * Pix): Wbar = (55 * Pix): Qbar = (35 * Pix)

    'Initialize bar index and color.
    NextBar = Sx
    Color = White

    'Pad each end of string with start/stop characters.
    BarCodePlus = "*" & UCase(Barcode) & "*"

    'Walk through each character of the barcode contents.
    For CountX = 1 To Len(BarCodePlus)

        'Get Barcode 1/0 string for indexed character.
        Stripes = MD_BC39(Mid$(BarCodePlus, CountX, 1))
        For CountY = 1 To 9

            'For each 1/0, draw a wide/narrow bar.
            BarType = Mid$(Stripes, CountY, 1)

            'Toggle the color (black/white).
            If Color = White Then Color = Black Else Color = White
            Select Case BarType

                Case "1"
                    'Draw a wide bar.
                    Rpt.Line (NextBar, Sy)-Step(Wbar, my), Color, BF
                    NextBar = NextBar + Wbar

                Case "0"
                    'Draw a narrow bar.
                    Rpt.Line (NextBar, Sy)-Step(Nbar, my), Color, BF
                    NextBar = NextBar + Nbar

            End Select
        Next CountY

        'Toggle the color (black/white).
        If Color = White Then Color = Black Else Color = White

        'Draw intermediate "quiet" bar.
        Rpt.Line (NextBar, Sy)-Step(Qbar, my), Color, BF
        NextBar = NextBar + Qbar

    Next CountX

Exit_BarCode39:
    Exit Function
ErrorTrap_BarCode39:
    Resume Exit_BarCode39
End Function
Function MD_BC39(CharCode As String) As String

    On Error GoTo ErrorTrap_BC39
    ReDim BC39(90)
    BC39(32) = "011000100" ' space
    BC39(36) = "010101000" ' $
    BC39(37) = "000101010" ' %
    BC39(42) = "010010100" ' * Start/Stop
    BC39(43) = "010001010" ' +
    BC39(45) = "010000101" ' |
    BC39(46) = "110000100" ' .
    BC39(47) = "010100010" ' /
    BC39(48) = "000110100" ' 0
    BC39(49) = "100100001" ' 1
    BC39(50) = "001100001" ' 2
    BC39(51) = "101100000" ' 3
    BC39(52) = "000110001" ' 4
    BC39(53) = "100110000" ' 5
    BC39(54) = "001110000" ' 6
    BC39(55) = "000100101" ' 7
    BC39(56) = "100100100" ' 8
    BC39(57) = "001100100" ' 9
    BC39(65) = "100001001" ' A
    BC39(66) = "001001001" ' B
    BC39(67) = "101001000" ' C
    BC39(68) = "000011001" ' D
    BC39(69) = "100011000" ' E
    BC39(70) = "001011000" ' F
    BC39(71) = "000001101" ' G
    BC39(72) = "100001100" ' H
    BC39(73) = "001001100" ' I
    BC39(74) = "000011100" ' J
    BC39(75) = "100000011" ' K
    BC39(76) = "001000011" ' L
    BC39(77) = "101000010" ' M
    BC39(78) = "000010011" ' N
    BC39(79) = "100010010" ' O
    BC39(80) = "001010010" ' P
    BC39(81) = "000000111" ' Q
    BC39(82) = "100000110" ' R
    BC39(83) = "001000110" ' S
    BC39(84) = "000010110" ' T
    BC39(85) = "110000001" ' U
    BC39(86) = "011000001" ' V
    BC39(87) = "111000000" ' W
    BC39(88) = "010010001" ' X
    BC39(89) = "110010000" ' Y
    BC39(90) = "011010000" ' Z

    MD_BC39 = BC39(Asc(CharCode))
Exit_BC39:
    Exit Function
ErrorTrap_BC39:
    MD_BC39 = ""
    Resume Exit_BC39
End Function



title: Sostituire un carattere in immissione

text:
"FID" <
fe_l...@yahoo.it
> ha scritto nel messaggio
news:cuhj3f$8ga$1...@news.newsland.it...
>    BC39(47) = "010100010" ' /
Ok, la barra è presente (non mi ricordavo proprio: per il codice 3/9 ci sono
in giro i font gratuiti e non m'era mai venuto in mente di generarmelo a
mano, come invece ho fatto a suo tempo per il 128, che necessita di un crc
alla fine), quindi probabilmente è lo scanner che lo interpreta male.
IG


title: Sostituire un carattere in immissione

text:
"FID" <
fe_l...@yahoo.it
> ha scritto nel messaggio
news:cugdgo$7p6$1...@news.newsland.it...
> Salve, non so per quale motivo il barcode che ho creato utilizzando il
> modulo di James Isle Mercanti viene "letto" male, ovvero stampo un valore
> Re05/00001 e viene letto dalla pistola come Re05-00001. Posso nella text
> che riceve il barcode fare in modo mche quel trattino sia sostituito dal
> giusto carattere?
>
> 1000 grazie
Il tuo scanner parla inglese.
Se hai il manuale segui la procedura di inizializzazione.
MAssimilaino


title: Formule in access

author: Renato

text:
Non essendo un
grande esperto di ACCESS forse qualcuno può aiutarmi. Vorrei utilizzare alcune
funzioni come ad esempio"arrotonda" nelle maschere di access ma mi viene
segnalato un errore generico. Altre formule più semplici funzionano (ad esempio
moltiplicazione,somma....) forse manca qualcosa nella mia
installazione?

Grazie in
anticipo se qualcuno sarà in grado di aiutarmi


title: Formule in access

text:
DOMANDA:
""Renato"" <
ilpostode...@tiscalinet.it
> ha scritto nel messaggio
news:NEBBKHFOCKLMDOPKACHKEEPC...@tiscalinet.it...

RISPOSTA:
Non inviare messaggi in formato HTML, grazie.
La funzione arrotonda non è presente in access (almeno nel mio) ma è
presente in excel; nel sito comune (
www.sitocomune.com
) trovi degli esempi
per arrotondare.
Poi se vuoi utilizzare per forza le formule di excel poi provare con:
'--------------
  Dim MyXL As Excel.Application
  Set MyXL = CreateObject("Excel.Application")
  Me!NomeCasellaDiTesto =  MyXL.WorksheetFunction.Round(1, 2)
  Set MyXL = Nothing
'--------------
Ciao.


title: enabled su controllo se il record corrente è l'ultimo

author: Sandro

text:
Ciao a tutti .
Per impostare la proprietà enabled ad un controllo di una maschera se il
record corrente è l'ultimo faccio così
If Me![id_data_fattura] = DLast("[id_data_fattura]",
"T_fatture_carico_unione", "[id_data_fattura]=" &
[Forms]![M_carico_unione]![id_data_fattura]) Then
        Me.recordprec.SetFocus
        Me.recordsucc.Enabled = False
End If
ma la condizione in questo modo è sempre vera.
In un caso analogo invece non avevo avuto problemi.
Ci date un occhio e mi date un vostro parere ?
Grazie
ps il controllo recordprec riesiede su una form e all'interno ha una subform
associate entrambe a tabelle.


author: ALESSANDRO Baraldi

text:
"Sandro" <
sape...@tiscali.it
> ha scritto nel messaggio
news:cpf50g$u9f$1...@lacerta.tiscalinet.it...

Forse mi perdo qualche pezzo.
La Form nella quale stai gestendo la navigazione ha un Recordset
esplorabile, perchè usi Dlast....?
Usa un controllo su RecordsetClone:
'Aggiorni per sicurezza il BookMark del RecordsetClone
Me.RecordsetClone.Bookmark = Me.Parent.Bookmark
'Per il CommandButton "Successivo"
Me.RecordsetClone.MoveNext
Me.recordsucc.Enabled=Not Me.RecordseClone.Eof
'Ripristini il BookMark dopo esserti mosso
Me.RecordsetClone.Bookmark = Me.Parent.Bookmark
'Per il CommandButton "Precedente"
Me.RecordsetClone.MovePrevious
Me.recordsucc.Enabled=Not Me.RecordseClone.Bof
'Ripristini il BookMark dopo esserti mosso
Me.RecordsetClone.Bookmark = Me.Parent.Bookmark
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:cpf6hs$vl6$1...@lacerta.tiscalinet.it...


Ciao Alex,
grazie per la risposta. Mi segnale questo:
"riferimento alla proprietà parent non valido nell'espressione"
Ciao


text:
> -
>
> Ciao Alex,
> grazie per la risposta. Mi segnale questo:
> "riferimento alla proprietą parent non valido nell'espressione"
> Ciao
Che versione di Access usi...?
Probabilmente non hai i riferimenti alle Librerie DAO.
Dalla modalitą Codice---Strumenti --->Riferimenti---Cerca e Flagga
"Microsoft DAO 3.6"
se non usi ADO (Microsoft Activex Data Object 2.8) deselezionalo.
Ciao
--
@Alex (Alessandro Baraldi)



text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:cpf8tg$211$1...@lacerta.tiscalinet.it...
> > -
> >
> > Ciao Alex,
> > grazie per la risposta. Mi segnale questo:
> > "riferimento alla proprietà parent non valido nell'espressione"
> > Ciao
>
>
> Che versione di Access usi...?
> Probabilmente non hai i riferimenti alle Librerie DAO.
****A2K i riferimenti sono ok, avevo controllato prima di postarti.
>
> Dalla modalità Codice---Strumenti --->Riferimenti---Cerca e Flagga
> "Microsoft DAO 3.6"
> se non usi ADO (Microsoft Activex Data Object 2.8) deselezionalo.
>
Il problema è che secondo me non ho ben recepito il primo tuo post :
    Me.RecordsetClone.Bookmark = Me.Parent.Bookmark
    Me.RecordsetClone.MoveNext
    Me.recordsucc.Enabled = Not Me.RecordsetClone.EOF
    Me.RecordsetClone.Bookmark = Me.Parent.Bookmark
    DoCmd.GoToRecord , , acNext
questo nel commandbutton successivo
e questo nel  command button precendete :
    Me.RecordsetClone.Bookmark = Me.Parent.Bookmark
    Me.RecordsetClone.MovePrevious
    Me.recordsucc.Enabled = Not Me.RecordsetClone.BOF
    Me.RecordsetClone.Bookmark = Me.Parent.Bookmark
    DoCmd.GoToRecord , , acPrevious
Avevo fatto anche questa prova per intercettare l'utimo record, ma su
corrente la condizione è vera e non va bene
If Me.CurrentRecord = Me.RecordsetClone.RecordCount Then
   MsgBox ("sono l'ultimo")
End If
Cosa non ho capito ??
Grazie.