mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Cambio password in gestione utenti

Buona sera a tutti, come al solito mi rivolgo a voi molto speranzoso
di trovare una soluzione al problema (grave) di gestione degli accessi
al DB, in particolare per quanto riguarda la parte di modifica della
password da parte degli utenti. Mi spiego: l'apertura di una form non
collegata ad origine dati la avvio mediante:
    DoCmd.OpenForm "ChangePWD"
    'passa il valore dell'utente corrente
    Forms!ChangePWD!Utente = Forms("frmArticolo_11")!Utente
 poi la classica maschre con tre campi "vecchia PWD", "nuova PWD" e
verifica "PWD" ... ora nell'evento di conferma dei dati inseriti
utilizzo il seguente codice:
Private Sub Comando10_Click()
On Error GoTo CmdChange_err
Dim ok As String
If Me.NewPWD <> Me.ConfPWD Then
   MsgBox "La New e la Verified Passwords Do Not Match. " & _
     "Please Re-enter", vbCritical
   Me.NewPWD = ""
   Me.ConfPWD = ""
   Me.NewPWD.SetFocus
Else
     If IsNull(Me.OldPWD) Then
       MsgBox "Attenzione devi digitare la vecchia password", vbOKOnly
    Else
        ok = DLookup("Password", "T_PW", "[Utente] = '" & Me.Utente &
"'")
        ok = Me.NewPWD
    End If
End If
Exit Sub
CmdChange_err:
          MsgBox Err.Description
End Sub
A questo punto però il nulla ... ovvero come faccio a far memorizzare
nella tabella T_PW la nuova password ed associarla all'utente corrente
(ho provato quella specie di soluzione che ovviamente non va) ?!?!?!
Vi ringrazio dell'attenzione che vorrete rivolgermi.
Francesco


Aircode:
Dim db As DAO.Database
Dim rs As DAO.Recordset
Set db = Currentdb
Set rs = db.OpenRecordset("T_PW", dbOpenDynaset)
If Me!NewPWD <> Me!ConfPWD Then
   MsgBox "La New e la Verified Passwords Do Not Match. " & _
     "Please Re-enter", vbCritical
   Me!NewPWD = Null
   Me!ConfPWD = Null
   Me!NewPWD.SetFocus
Else
     If IsNull(Me!OldPWD) Then
       MsgBox "Attenzione devi digitare la vecchia password", vbOKOnly
    Else
        rs.FindFirst "Utente='" & Me!Utente & "'"
        If Not rs.NoMatch Then
            rs.Edit
                rs!Password = Me!NewPWD
            rs.Update
    End If
End If
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

 - Mostra testo citato -
Grazie Karl,
come al solito tempestivo e gentilissimo ... ovviamente funziona
perfettamente ... grazie e buona giornata ...
Francesco

Newsgroup: it.comp.appl.access
Titolo: casella combinata selezione multipla

Ciao a tutti
Questione:
Č possibile tramite una casella combinata selezione multipla selezionare
piů record in parallelo per una
mascera continua??
grazie di cuore
Giova

 wrote in message
news:3C2AE0C6...@bluewin.ch...

Casella Combinata a Selezione Multipla...????
Da quando c'č...?
Io sapevo ListBox a Selezione Multipla.
@Alex
-- 
Posted from  [146.133.1.30] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.appl.access
Titolo: modifica del colore di sfondo dei record di una sottomaschera visualizzata come foglio dati

Ciao a tutti,
in una maschera ho una sottomaschera visualizzata in formato foglio dati con
due campi: campo1 e campo2.
per evidenziare alcuni record in base al valore assunto da campo1 avevo
pensato di agganciare all'evento dopo di aggiornamento di campo1 una routine
che in base al suo contenuto modifichi il colore di sfondo di campo1 e
campo2 di quel record.
il problema è che non funziona, o meglio funziona parzialmente: il colore di
sfondo viene modificato ma solo sul campo1 ignorando campo2.
come mai?

 ha scritto nel messaggio
news:c3mj8t$29hu7p$1...@ID-213020.news.uni-berlin.de...

hai provato ad usare l'opzione "formattazione condizionale" di Access (la
trovi nel menu' formato) ?
Flavio


Sě, č la prima cosa che ho fatto.
Quella va bene quando uno deve formattare un campo.
Ma piů campi condizionati da uno solo non mi risulta che sia possibile
farlo.
-- 
----------------
saluti
Giuseppe

 Giuseppe
Non si puň con la Formattazione Condizionale in Foglio dati.
Potresti avere un'alternativa se invece del Foglio dati usassi
la visualizzazione Form Continue, ma anche qu' servirebbe
uno stratagemma del tipo:
Crei 2 controlli associati al campo di condizionamento, 1 lo usi
per l'interfaccia grafica dati , l'altro lo Allarghi a tutta larghezza della
sezione
del Corpo, lo metti in BackGround rispetto agli altri e lo rendi
Bloccato=si.
Gli applichi la formattazione condizionale e forse ottieni qualche cosa di
esteticamente funzionale.
Ciao.
@Alex.


Davvero simpatico il trucchetto.
grazie Alex
-- 
----------------
saluti
Giuseppe

Newsgroup: it.comp.appl.access
Titolo: problemi con ADO

ciao
aprendo delle maschere che contengono codice ADODB, ho il seguente errore:
3251 - IL SET DI RECORD CORRENTE NON SUPPORTA L'AGGIORNAMENTO. POTREBBE
TRATTARSI DI UNA LIMITAZIONE DEL PROVIDER O DEL TIPO DI BLOCCO SELEZIONATO.
poi nella maggior parte dei casi continua ad aprire la maschera e funziona
normalmente.
tutto ciò succede solo su una minoranza di PC sul quale l'ho testato.
ho aggiunto riferimenti su riferimenti.
sono passata da ADO 2.1 ad ADO 2.7. poi ho aggiunto anche anche i riferimenti ad
ADO RecordSet 2.7 e ad ADO MultiDimensional 2.7. (in questo modo migliora
l'accesso, in quanto dà solo l'errore presentato - con ADO 2.1 e basta invece
dava un altro errore e non andava avanti).
Perchè dice che non supporta l'aggiornamento se invece lo supporta?
perchè solo su alcuni pc? cosa manca su quei pc?
Ciao
Silvia.
--
www.silvietta.it
...everyone's invited!
Kann ein Herz aus Stein sein??

"]SiLVieTTa[" <wonderwomanL...@studiomarketing.it.invalid> ha 
scritto nel messaggio news:pbbr21l38tj2ae98m...@4ax.com...

Aggiornamenti Mdac
MAssimialino 

MAssimialino 
le ho fatto leggere la versione che ha installata, è la MDAC 2.7 sp1
il suo SO è win XP sp2
quando prova ad installare mdac 2.8 riceve sempre un errore:
"MDAC 2.8 RTM non è compatibile con questa versione di Windows. Tutte le sue
funzionalità fanno parte di Windows"
come faccio a farle installare la 2.8?

Newsgroup: it.comp.appl.access
Titolo: aggiornamento maschera con origine query

Salve a tutti.
Espongo il mio problema.
Ho una maschera continua con origine una query.
Nella query nei campi IdAzienda ho messo come criterio il valore
selezionato nella maschera continua al controllo IdAzienda, al campo
datafattura il criterio data digitata nel campo Anno della stessa
maschera e poi ho creato un campo chkFiltro con criterio casella di
controllo chkFiltro sempre della stessa maschera (valore predefinito
Falso).
All'apertura della maschera, finchè non digito la ditta e la data da
cui far partire l'elenco delle fatture emesse, il corpo della maschera
è vuoto. Dopo invece aver digitato quei parametri la maschera si
popola. Fin qui tutto ok.
Ho creato un pulsante Nuova Ricerca, e su click ho messo il seguente
evento:
me.idazienda = ""
me.anno = ""
me.requery
me.idazienda.setfocus
In pratica vorrei far sparire i record della precedente ricerca,
azzerare i due controlli e far andare il cursore al controllo
idazienda.
Tutto ciò in un altra maschera praticamente uguale con una query
uguale ma con tabelle leggermente diverse funziona su questa mi esce
il messaggio "Errore di run-time 3420 - Oggetto non valido o non
impostato".
Dov'è l'errore? Nella query?
Ho provato a duplicare la form che funziona dandogli lo stesso nome di
quella che non funziona e cambiano la query di origine, ma esce lo
stesso messaggio, per questo dubito della query e non della form.
Un grazie anticipato.
Ciao.
Giusepoe

 stesso messaggio, per questo dubito della query e non della form.
Difficile a dire senza vedere la query.
Copia/incolla la sua stringa SQL.
-- 
cu
Karl
*********
Access FAQ: 
www.donkarl.com/it
 


Grazie Karl, bastava mettere null anzichè "" ai due controlli.
Strano però che nell'altra maschera funziona anche con "".
Visto che hai accennato alla pratica del punto di interruzione alle
righe e controllo con F8, potresti spiegarmi come si fa?
Saluti.
Giuseppe.

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

Salve a tutti.
Ho 2 tabelle A e B, e una Maschera C
Nella Tabella A ho creato due campi, uno per inserire un codice
e l'altro per inserire nome e cognome di persona.
esempio:
codice  |           nominativo          |
AAB         PONZIO PILATO
 AAA       PINCO PALLINO
Nella Tabella B ho creato una serie di campi.
nella MASCHERA C ho un controllo "casella combinta"
Quesito...
Vorrei che la casella combinata si popolasse dei dati contenuti
nella tabella A campo "nominativo" e memorizzasse la
selezione in un campo X della tabella B.
Spero di essere stato chiaro.
grazie per l'eventuale aiuto.
Saluti.
 


Ciao  JeanLoup
potevi aprire un nuovo thread invece di proseguire questo.
Daniele 

 potevi aprire un nuovo thread invece di proseguire questo.
hai ragione, scusami.
Ciao e grazie. 

 Ciao e grazie.
Daniele 

 Daniele
ok! Ci sono riuscito,grazie, sei stato gentilissimo.
Saluti.
Newsgroup: it.comp.appl.access
Titolo: Aggiornare e pulire tabella

Da un applicativo esterno posso solo esportare periodicamente una tabella
contenente le anagrafiche di Aziende.
Questa tabella viene alimentata da soggetti diversi che inseriscono dati
(che possono anche essere ripetuti) senza nessun tipo di controllo.
Per le mie elaborazioni statistiche ho bisogno di ripulire e rendere
affidabili questi dati.
Pensavo di crearmi una tab di riferimento con i dati ripuliti.
FASE 1
Creo una tabella Aziende_pulite
C'� un solo record di quella azienda ---> Tutto ok ... accodo in azienda
pulita
Ci sono pi� record della stessa azienda e tutti i dati concordano ---->
Tutto OK ... raggruppo e accodo 1 record
Ci sono pi� record della stessa azienda e alcuni dati non concordano ---->
verifico i campi che mi interessano (sono 8) e in base alla maggioranza o
alla "logica" decido il valore da assegnare.
Fatto questo devo passare al lavoro di routine
FASE 2
Periodicamente esporto le Aziende_sporche che relaziono tramite cod_fisc ad
Aziende_pulite
Se ce ne sono di nuove e singole -----> tutto ok .... accodo
ma nel caso di aziende gi� presenti come posso fare per fare un rapido
confronto tra i dati considerati puliti e quelli sporchi?
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

Ovviamente il controllo vorrei farlo solo su i record discordanti




Newsgroup: it.comp.appl.access
Titolo: portare in primo piano un controllo.

Per Access 97.
Ho due pulsanti, uno per bloccare e uno per sbloccare la maschera , che
usano lo stesso modulo.
Non avendomi permesso di rendere invisibile il pulsante attivo, vorrei
semplicemente portarlo in secondo piano,
sovraponendo i due pulsanti, in modo che uno sia nascosto dall'altro.
Esiste il comando in VBA. Io non sono riuscito a trovarlo.
Grazie a tutti per questo aiuto e quello datomi tutte altre volte.
Riciao .. Bruno

 _____________________
L'ho già trovato. Grazie lo stesso.
DoCmd.RunCommand acCmdBringToFront ' Primo piano
DoCmd.RunCommand acCmdSendToBack ' Secondo piano
    Bruno

     Bruno
Perchč non usi un interruttore.
Sull'evento click dell'interruttore:
If mioInterruttore = -1 Then
   mioInterruttore.Caption = "ON"
...
...
ElseIf
 mioInterruttore = 0 Then
 mioInterruttore.Caption = "OFF"
...
...
End If
--
rgrds
SC
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

DoCmd.RunCommand acCmdSendToBack ' Secondo piano
Sicuro che funzioni? L'hai provato??
Aggiungo che tua situazione è un po' strana ... Oltre a quanto ti ha
consigliato sv potresti usare un solo pulsante modificandone (a
seconda che la maschera sia o meno bloccata) l'etichetta e l'azione
che viene attivata a fronte dell'evento click. Inoltre non puoi
bloccare tout-court la maschera perché bloccheresti anche il pulsante.
Comunque, se proprio vuoi continuare nel tuo modo, ti consiglio di
settare il focus sul pulsante che vuoi rendere visibile
  Me.PunsanteBlocca.SetFocus
Ciao
--
Alberto
No alle guerre

 DoCmd.RunCommand acCmdSendToBack ' Secondo piano
    seguo i consigli e faccio sapere.
ciao a tutti e due... Bruno
Newsgroup: it.comp.appl.access
Titolo: Cronologia dati modificati

 Esiste un modo nativo per monitarare la cronologia dei dati modificati? Ad 
esempio, se modifico 50 record di una tabella oggi e 25 domani, access offre 
un modo nativo per ordinare tutti i record modificati sulla base della data 
di modifica?
Grazie.
eSQueL 

 ha scritto nel messaggio 
news:471cab64$0$4790$4faf...@reader4.news.tin.it...

Un file di log no?
-- 
-- 
Ciao
Pablitomf (Maurizio Facciuti)
-----------------------------------------------------------------
Access: 97, 2000, XP e 2003
ASP
-----------------------------------------------------------------
http://www.accessgroup.it/
-----------------------------------------------------------------
Il mio motto :
""Non mi fido molto delle statistiche, perchč un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media." 

 Pablitomf (Maurizio Facciuti)
Certo che sì. Ma il problema riguarda racord già modificati in data odierna 
:(
eSQueL 

 eSQueL
e allora mi sa che devi partire da quelli di oggi con la gestione di log... 
;-|
-- 
-- 
Ciao
Pablitomf (Maurizio Facciuti)
-----------------------------------------------------------------
Access: 97, 2000, XP e 2003
ASP
-----------------------------------------------------------------
http://www.accessgroup.it/
-----------------------------------------------------------------
Il mio motto :
""Non mi fido molto delle statistiche, perchè un uomo con la testa nel forno


 Pablitomf (Maurizio Facciuti)
eh ... quel che temevo. Grazie per il feedback.
eSQueL 

come si crea un file di log ?

 come si crea un file di log ?
Vedi la relazione "WithEvents RaiseEvent" di Marco Pizzamiglio in CISA1.
Il download lo trovi alla pagina "CISA download" in :
http://www.donkarl.com/it/
--
sv
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Newsgroup: it.comp.appl.access
Titolo: applicazioni stand-alone

maaah...
perdonate l'ignoranza: access, intendo l'applicativo presente nel paccheto
di office venduto attualmente (c'e' ancora acces nel pacchetto, vero?)
consente di realizzare anche applicazioni stand-alone?
io sono rimasto alla versione di office 97 :-(
in caso affermativo secondo voi lo posso apprendere per realizzare semplici
applicazioni di elaborazione di stringhe di testo (anni fa usavo cobol)?
grazie, ciao.

 ha scritto nel messaggio
news:cii7lr$16e8$1...@stargate1.inet.it...

Beh dalla versione 97 ad ora 2003 sostanzialmente puoi usare gli stessi
metodi, sono stati implementati e migliorati alcuni punti.
Per fare pacchetti Stand_Alone devi disporre della verione Developer.
Puoi fare quello che vuoi.
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------

 ha scritto nel messaggio
news:ciiau0$bri$1...@lacerta.tiscalinet.it...

questo è il famoso faqquone ... sul 
sitocomune.com
 trovi tutte le dritte.
Ci sono anche foto di relatori con magliette e cartellonistica varia ... che
trattano l'argomento!

Newsgroup: it.comp.appl.access
Titolo: combo e valori da cercare

Vorrei costruire una combo con TipoOrigineDati una funzione che dovrebbe
verificare la presenza di un valore all'interno di due campi COD1 e COD2,
dove COD2 č un valore alternativo non sempre presente, e qualora individui
il valore giusto in COD1 lo trascriva nella combo, se invece lo trovasse in
COD2, dovrebbe restituire nella combo il corrispondente valore di COD1.
ESEMPIO
 COD1 COD2          ricerca 10 val. 10
  10                           ricerca 14 val. 12
  12  14
  16  15
Non so se sono stato molto chiaro, ma comunque vi ringrazio per
l'attenzione. Ciao e buone ferie ai vacanzieri.


Se devo essere sincero, quanto a chiarezza, non puoi essere portato di
esempio. Ho dovuto accendere la mia sfera di cristallo per cercare di
interpretare il tuo problema; spero di esserci riuscito.
Innanzi tutto non esiste, come "Tipo origine riga" di una combo, la
possibilità di scegliere "Funzione", quindi sceglierei "Tabella/query".
Quindi nella query, il cui nome indicherai nell' "Origine riga" della combo,
oltre ai campi COD1 e COD2, inserisci un campo calcolato COD3, che riempirai
tramite la funzione IIF a seconda del contenuto degli altri due campi.
A questo punto, agendo sul posizionamento dei campi CODn all'interno della
query e sulle proprietà "Numero colonne" e "Larghezza colonne" della combo,
fai in maniera di visualizzare nella combo il campo COD3.
Roberto
Newsgroup: it.comp.appl.access
Titolo: Problemi con la Tabulazione

Salve a TUTTI
Incontro un problema con la tabulazione quando dalla maschera principale,
non associata, mi sposto con il focus nella sottomaschera in essa
nidificata. Il problema consiste nel fatto che il focus, anziché seguire l'
ordine di tabulazione assegnato, quando passa nella sottomaschera, va
direttamente nell'ultimo controllo dal quale č uscito nell'operazione
precedente. Intendo dire che usando questa sottomaschera per inserire dei
dati e usando una macro che vada ad un nuovo record per il nuovo
inserimento, se nella maschera principale inserisco per esempio cognome e
nome, documento ecc. poi passo alla sottomaschera, per il resto dei dativa
inserire, quando arrivo su questa mi succede il problema. Ho provato varie
forme di Requery ma non ho trovato soluzione. L'unico modo che ho visto, č
un orribile apri e chiudi maschera che perň vorrei evitare per la
bruttissima vibrazione del menů che si vede.
Grazie se qualcuno puň aiutarmi.
Fabio


Ciao Fabio,
l'ordine di tabulazione degli oggetti di una sottomaschera è autonomo e non
ha nulla a che fare con quello della maschera principale quindi, il
comportamento che riscontri è perfettamente normale.
se vuoi puoi spostare il fuoco sul primo controllo della sottomaschera
mettendo questo codice nell'evento *Su invio* dell'oggetto che la contiene
----
Private Sub Figlio1_Enter()
    Me.Figlio1.Form.NomePrimoControllo.SetFocus
End Sub
----
Ciao Giorgio

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

Like [Forms]![maschera per inserimento ricerca]![Cercamodulo] & "*" Or Is
Null Or (Like [Forms]![maschera per inserimento ricerca]![Cercamodul1] &
"*" Or Is Null)
ho inserito nei criteri di una query la precedente
espressione.
devo cercare i record in una maschera non associata relativi
al modulo. è giusto inserire l'espressione precedente per cercare record di
moduli diversi? e come si fa poi nella maschera associata a digitare in un
solo campo più richieste, e nel report come devo associare il controllo
relativo al modulo
--------------------------------
Inviato via 
http://usenet.iol.it

 relativo al modulo
Se ho capito bene, dovrebbe bastare:
Like [Forms]![maschera per inserimento ricerca]![Cercamodulo] & "*" Or Like
[Forms]![maschera per inserimento ricerca]![Cercamodul1] & "*" Or Is Null
oppure scrivi nella riga criteri Like [Forms]![maschera per inserimento
ricerca]![Cercamodulo] & "*"
nella riga oppure Like [Forms]![maschera per inserimento
ricerca]![Cercamodul1] & "*"
nella riga sotto  Is Null
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com
Newsgroup: it.comp.appl.access
Titolo: Seleziona tutto /Deseleziona tutto

Con un pulsante vorrei che tutti i controlli su una maschera potessero
essere messi a VERO se sono a FALSO e a FALSO se sono a VERO.
Come posso fare? Che proprietà devo vedere?
Grazie.

 ha scritto nel messaggio
news:1117896209....@g47g2000cwa.googlegroups.com...

Grazie.
Che tipo di controlli sono...?
Spero siano controlli checkBox o interruttori.
Cicla sull'insieme Controls di Form e inverti lo stato:
Private Sub Inverti()
    Dim ctl as Access.Controls
    For each ctl in Me.Controls
        Select case ctl.ControlType
            case acOptionButton, acCheckBox, acToggleButton
                ctl.Value=Not ctl.Value
        End Select
    NExt
    set ctl=Nothing
End Sub
Ciao
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------

Grazie ale :)

Newsgroup: it.comp.appl.access
Titolo: query: selezione di periodi temporali

la seguente query dovrebbe evidenziarmi alcuni periodi temporali che 
ricadono in altri
 
SELECT DPop.DPinFROM, DPop.DPinTO, Imbarchi.from, Imbarchi.to
FROM DPop, Anagrafica INNER JOIN Imbarchi ON Anagrafica.ID = 
Imbarchi.Surname
WHERE (((DPop.DPinFROM) Between #8/7/2013# And #11/4/2013#) AND 
((DPop.DPinTO) Between #8/7/2013# And #11/4/2013#) AND 
((Imbarchi.from)=#8/7/2013#) AND ((Imbarchi.to)=#11/4/2013#) AND 
((Anagrafica.ID)=918))
ORDER BY DPop.DPinFROM, Imbarchi.to;
 
la query dovrebbe restituirmi un terzo record in DPop che inizia il 
16/08/2013 e termina il 04/11/2013, ma non mi riesce di farlo uscire.
Dove sbaglio?
 
-- 
ciao
Stefano
 
 

Dunque... il codice funziona sul caso base ma andando a complicare i 
casi mi serve ancora una mano, fodamentalmente dal punto di vista 
concettuale.
Posto che [EEE] e [AAA] siano periodi temporali espressi da record con 
campo-inizio e campo-fine appartenenti a due tabelle diverse, mi 
interessa selezionare i record in cui i periodi si sovrappongono.
Nel caso semplice
 
 [EEEEEEEEEE]
[AAA] [A] [AAA]
 
funziona tutto,
ma se inserisco un secondo intervallo [I]
 
 [EEEEEEEEEE]        [EEEEEEEEE]
[AAA] [A] [AAA][AA][AAA] [A] [AAA]
 
mi restituisce una quantitï¿œ di dati non pertinenti che non credo sia 
possibile filtrare perchï¿œ il limite minimo per l'uno annulla quello del 
secondo ed il limite massimo per il secondo caso annulla quello del 
primo.
 
Domanda 1: c'ï¿œ un modo?
 
Sto incominciando a pensare che forse dovrei aiutarmi con una maschera 
che, basata su una query impostata sul caso base, chiama i dati dalle 
tabelle E ed A (piï¿œ quella dell'anagrafica) e li inserisce in una nuova 
tabella. A questa si riferirï¿œ una nuova query che eseguirï¿œ i calcoli 
necessari.
 
Domanda 2: ï¿œ forse questa la strada piï¿œ corretta?
 
-- 
ciao
Stefano
 
 


Questo argomento è già stato trattato più volte, cerca "sovrapposizione periodi" o qualcosa di simile.
Ciao.
-Marco-
 

 periodi" o qualcosa di simile. Ciao.
oops... grazie!
 
-- 
ciao
Stefano
Newsgroup: it.comp.appl.access
Titolo: avvio di WORD ma non correttamente

con il seguente codice avvio word
On Error GoTo Err_Comando101_Click
    Dim oApp As Object
    Set oApp = CreateObject("Word.Application")
    oApp.Visible = True
Exit_Comando101_Click:
    Exit Sub
Err_Comando101_Click:
    MsgBox Err.Description
    Resume Exit_Comando101_Click
soltanto accade che non ci sono le barre degli strumenti, mi sapete dire il
perchč?
Grazie.

 ha scritto nel messaggio
news:f8hp8.95618$1S3.3...@twister1.libero.it...

Se non hai delle particolari impostazioni, prova a cancellare il normal.dot
e riaprire word...
Ciao.
--
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: criterio query di selezione con condizione

Salve, una maschera collegata ad una quey di selezione contenente un campo 
data, sulla stessa maschera vi č anche un controllo non associato del tipo 
Sě/No ( il classico baffetto) ebbene č possibile filtrare la query in modo 
che in presenza del "baffetto" (Sě) vengano estratti solo i record con campo 
data null al contrario vengano rstratti tutti.
spero di essere stato chiaro
grazie
michele 

 wrote in message 
news:45acf3f4$0$16145$4faf...@reader3.news.tin.it...

Lascerei immutata la query di origine agendo invece su un pulsante
per filtrare o non con riferimento al controllo ON/OFF.
Inserimento Filtro:
FilterOn = TRUE
DoCmd.ApplyFilter, "[CampoData]=Null"
Eliminazione Filtro:
FilterOn = FALSE
Bruno 

 FilterOn = FALSE
Più esattamente:
If [ControlloOnOff] Then
        FilterOn = True
        DoCmd.ApplyFilter, "[CampoData]=Null"
Else
        FilterOn = False
End If
Bruno
 

> Bruno
Avevo precisato "agendo su un pulsante".
Metti il codice sull'evento OnClick di un Button (pulsante).
Io normalmente uso un solo Button, che funziona da Toggle,
col seguente codice in OnClick:
If FilterOn Then
    FilterOn = False
Else
    FilterOn = True
    DoCmd.ApplyFilter , "[DataMov]=Null"
End If
Provalo.
Bruno
Newsgroup: it.comp.appl.access
Titolo: rete locale

Ciao a tutti, dovrei inserire nella rete locale il mio db, l'accesso deve
essere garantito da tutti i pc. Come posso fare?
Ciao e grazie
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Ciao e grazie
www.accessgroup.it
 sez. approfondimenti
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it

Newsgroup: it.comp.appl.access
Titolo: [2013 runtime] value not valid for this field

>>>>  
http://www.bb2002.it
 :)  <<<<<
........... [ al lavoro ] ...........

 le impostazioni regionali mi /sembrano/ a posto
 
Vuol dire? Italiano, inglese...?
Hai un pc col Runtime dove funziona per paragonare le impostazioni?
 
-- 
Ciao
Karl
*********
http://www.AccessDevCon.com
 
Access FAQ: 
http://www.donkarl.com/it
 

 Hai un pc col Runtime dove funziona per paragonare le impostazioni?
 
Ho almeno tre pc col runtime, vedrņ di fare un confronto appena tornano in 
ufficio (son tutti portatili)
 
intanto grazie per avermi dedicato qualche minuto


 le impostazioni regionali mi /sembrano/ a posto
 
Ma come esegui quell'inserimento? manualmente o con quale codice?
 
Bruno

 
 
https://i.imgur.com/Q5zTe8j.png
 
 
sono due normalissimi campi data facenti parti di una tabella monorecord 
"Parametri"
 
https://i.imgur.com/cEQWydh.png
 
 
nella maschera posso scrivere direttamente con la tastiera oppure, in 
versioni recenti di access runtime (nel mio 2010 non c'è), utilizzando 
l'apposito calendarietto e il mouse
 
in entrambi i casi ricevo l'errore quando provo a uscire dal campo (con un 
click o con Tab)
 
adesso provo a installare AccessRT 2010 sul server e vedere che effetto che 
fa

Newsgroup: it.comp.appl.access
Titolo: Problemi con le relazioni !!!

Ciao,
Ho un problema di incompatibilità di  tipo  [Contatore] <--> [Testo]
Tabella A Campo Chiave Codice -- Tipo :Contatore       (Anagrafiche
Potenziali clienti)
Tabella B Campo Chiave Codice -- Tipo :Testo               (Descrizione
Dettagli Clienti e Potenziali Clienti)
La Tabella  B è in relazione con un'altra tabella Importata da un sistema
Unix tramire ODBC   (contiene anagrafiche  Clienti)
pertanto il campo deve necessariamente rimanere di tipo Testo.
La Tabella A invece è in relazione esclusivamente con la B ma voglio che il
campo codice si  generi automaticamente
ad ogni inserimento di un nuovo Potenziale cliente.
Naturalmente quando provo a mettere in relazione le due tabelle A e B mi da
conflitto per incompatibilità di tipi.
Come posso fare?
Avevo pensato di mettere un campo Chiave codice di tipo Testo nella tabella
A affiancato da uno contatore in modo da permettere
all 'utente di copiare nel campo testo il valore proposto dal contatore,ma è
poco elegante (diciamo che fa proprio schifo)
Mi potete Aiutare?
Grazie PXL

 wrote in message
8r9joo$58d$1...@fe2.cs.interbusiness.it...

Ciao Pixel
Il campo contatore é di tipo numerico, e quindi non puo' per forza essere
associato a un campo testo (tipi diversi).
Dovresti o cambiare il tipo nella tabella B (ma questo mi sembra impossibile
visto che il campo proviene da un altro dbase) , o come dicevi tu
continuando nel tuo messaggio... cambiare il campo chiave della tabella A in
un campo testo. (a quel punto pero' perdi l'incremento automatico).
DaVe

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

Il cassetto di un comodino è composto da più
semilavorati:
1 fondo
1 schiena
2 fianchi
ecc...
quindi se nel mio ordine inserisco n°2
'cassetti-comodino',
il programma dovrà 'esplodere' l'ordinazione in
2 fondi
2 schiene
4 fianchi
ecc...
Il problema di esplodere l'ordine lo risolvo con
delle associazioni fra tabelle,
associando cioè a 'cassetto-comodino' più elementi
della tabella Semilavorati (!?!).
Il mio problema è: come faccio ad inserire in modo
automatico
questi semilavorati nella tabella VeroOrdine?
Immagino che in VBA ci siano delle istruzioni di
tipo Push e Pop
per le tabelle; il mio problema è che non conosco
nulla
ne di VBA ne di VB, ne di nessun altro dei
lunguaggi OOP
(mi son sempre occupato di assembler) e sto ora
imparando le cose
man mano che sviluppo 'stò lavoro'!
Grazie
Leo

 ha scritto nel messaggio
news:3b138...@news.dada.it...

Conoscendo un pò di VBA, la soluzione del tuo problema è abbastanza facile,
visto che devi gestire una distinta base ad un solo livello (tre recordset
ed un paio di cicli For...Next e/o Do..Loop).
Senza VBA non saprei cosa suggerirti: magari chissà che non ci sia una
soluzione anche con le macro; in questo NG però le macro non godono del
diritto di cittadinanza.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: somma campi

Come posso fare per mettere il prodotto del un campo din una tabella
 importo) per una costante (IVA 20%) in un altro campo della tabella.
Mi spiego: in una maschera inserisco un importo, quando vado nella casella
di testo IVA (Quindi all'evento SuAttivato) mi deve apparire il risultato di
IVA= Importo * 0.20 .
Dovrebbe essere semplice, ma il fatto e' che io non ho capito come ci si
riferisce agli oggetti. Nel senso che dalle maschere per riferirsi ad un
campo si dovrebbe usare ME! o Me., dalle tabelle Il nome tabella.nomecampo.
Se mi risolvete il problema del calcolo dell'Iva poi non dovrei avere piu'
problemi anche nel caso di calcoli piu' complessi, dato che penso sia solo
un problema di riferimento ai dati. Poi una domanda : il generatore di
espressioni funziona sul serio ? Ma! Vi ringrazio anticipatamente
Paolo

 Paolo
Non č un problema di riferimenti a nomi (almeno non in questo caso); visto
che nelle tabelle non puoi inserire formule (come Excel) devi "giocare" con
gli eventi della maschera. Cioč, prima che access scriva il record in
tabella devi effettuare il calcolo e assegnarlo al campo.
L'evento in questione č "prima di aggiornare", l'esempio č:
'-------------
Private Sub Form_BeforeUpdate(Cancel As Integer)
    Me!Iva = Me!importo*.2
End Sub
'-------------
In tutto questo devi considerare il fatto che non č utile memorizzare
informazioni che sono il prodotto di calcoli; se per un puro caso il valore
dell'iva cambia che fai ricalcoli tutti i record?
Ciao.
--
Sergio MAZZA



me.iva=me.importo*.2
o
me![iva]=me![importo]*.2
naturalmente non è buona prassi registrare il valore su un campo....
avrebbe più senso mettere come origine record
=arrotondaeuro(importo*.2)
ricordati anche di fare l'arrotondamento in Euro con la funzione di
Karl
Saluti.
Emanuele.

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

Utilizzo da neofita Access 2003 con Win XP. Vorrei creare un pulsante per 
collegare tutte le tabelle di un database ad un altro database. Fino ad oggi 
avevo fatto un elenco di tutte le tabelle presenti e prima le eliminavo e 
poi collegavo le nuove con il metodo transfer database... Ora capita che mi 
aggiungano nuove tabelle senza dirmelo e il sistema non mi collega più 
queste ultime se prima non si aggiorna la procedura con i nuovi nomi 
tabella. Sì può fare in modo che il database "veda" tutte le tabelle e me le 
colleghi da solo? Grazie in anticipo... 

 ha scritto nel messaggio 
news:X6DZj.4908$Uu1....@news.edisontel.com...

Consulta prima i numerosi siti a tua disposizione...
www.sitocomune.com
www.accegroup.com
www.lebans.com
www.donkarl.com
www.alessandrobaraldi.it
C'è sicuramente quello che cerchi.
-- 
Roberto da Parma
Newsgroup: it.comp.appl.access
Titolo: Req: Immagini

Ho creato un Data Base che che contiene delle immagini. Purtroppo la fase
inserimento delle immagini è troppo macchinosa: si deve passare per
l'inserimento immagine, il tipo di immagine da usare, ecc. C'è qualche
metodo che mi dia una finestra di dialogo tipo Windows che mi permetta di
cercare comodamente il file da inserire? In più, se nomino le immagini con
lo stesso nome presente in un campo della tabella interessata, c'è
possibilità di collegare automaticamente i due campi (foto e nome_foto)?
Sarei grato, eventualmente, se qualcuno mi mandasse qualche esempio o se mi
indirizzaste nella ricerca. Ho provato nel sito comune ma non ho trovato
nulla. Ciao,Massimo.

 nulla. Ciao,Massimo.
uhhmm. Generalmente le cose di interesse comune si discutono nel NG
--
a.cara
togli qualcosa dall'email

Newsgroup: it.comp.appl.access
Titolo: W98-A97 - Query con data "preproposta"

Ciao a tutti
E' possibile lanciare una query col parametro "[dammi la data]" ma
proponendo di default la data odierna ??
Grazie molte
Ciao
Marce

 ha scritto nel messaggio
news:99f2ci$6gj$1...@ftp-news.csita.unige.it...

Se attualmente nei criteri della tua query hai scritto:
[dammi la data:]
prova invece a scrivere
nz([Dammi la data:]; Date())
Se non digiti nulla nella finestra che ti chiede la digitazione del
parametro, ma pigi comunque il pulsante OK, la query dovrebbe selezionarti i
record con la data odierna.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


Perfetto , grazie
Marce
Newsgroup: it.comp.appl.access
Titolo: problema caselle combinate in maschere continue

ho un maschera settata su maschere continue con una casella combinata che ha
la seguente SQL
SELECT note_caratteristiche_tipi_valutazioni.DescrizioneGradoValutazione,
note_caratteristiche_tipi_valutazioni.GradoValutazione,
note_caratteristiche_tipi_valutazioni.TipoValutazione
FROM note_caratteristiche_tipi_valutazioni
WHERE
(((note_caratteristiche_tipi_valutazioni.TipoValutazione)=[forms]![Note
caratteristiche new]![Note caratteristiche new -
dettagli].[Form]![TipoValutazione]))
ORDER BY note_caratteristiche_tipi_valutazioni.GradoValutazione;
l'origine controllo del campo è GradoValutazione
il problema è che nella tabella note_caratteristiche_tipi_valutazioni ci
sono 5 gradi di valutazione per ogni tipo valutazione e non riesco a vederle
se non quelle relative al primo tipo valutazione presente nella maschera.
inoltre non vedo le voci corrette nella casella combinata. Mi sembra che il
problema dipenda dalla parte WHERE della SQL ma non riesco a risolverlo.
Qualcuno sa come si potrebbe ovviare a questo problema?
ciao a tutti
--------------------------------
Inviato via 
http://usenet.libero.it

 ha scritto nel messaggio
news:80Z16Z45Z126Y1...@usenet.libero.it...

Anche se nella maschera visualizzi contemporaneamente più record, il
controllo casella combinata è uno solo ed una sola è la sua origine riga: da
ciò si desume che in una maschera continua non puoi usare una casella
combinata che abbia come origine riga una query parametrica, in caso
contrario viualizzerai i dati solo in base all'origine riga della casella
combinata del record corrente, visto che è l'unica.
Insomma, perché ti funzioni correttamente la visualizzazione dei dati devi
eliminare la clausola WHERE dall'origine riga della combo.
Oppure usare due origini riga per la combo che imposterai dinamicamente: la
prima origine riga conterrà la clausola WHERE e la imposterai prima di
selezionare il dato nella combo (ad esempio a fronte dell'evento "Dopo
aggiornamento" del controllo Tipo Valutazione); la seconda origine riga NON
conterrà la clausola WHERE e la imposterai a fronte dell'evento "Su
corrente" della sottomaschera e a fronte dell'evento "Dopo aggiornamento"
della casella combinata.
Insomma, due differenti origine riga: una per effettuare la selezione del
dato l'altra per visualizzarlo.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 Roberto

sei stato come al solito molto gentile e chiaro. grazie mille
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Newsgroup: it.comp.appl.access
Titolo: apri form e subform

Salve,
Come si fa da codice ad aprire una maschera con dentro una sottomaschera che
deve avere come origine delle query diverse a seconda del tasto che si
clicca?
Mi spiego meglio:
Query 1, 2 e 3
La maschera A ha una sottomaschera B con associata una query.
In un'altra maschera,
Se clikko il bottone 1 si deve aprire A con B associata alla query 1
Se clikko il bottone 2 si deve aprire A con B associata alla query 2
Se clikko il bottone 3 si deve aprire A con B associata alla query 3
Io lo facevo con un codice sul tasto che si clicca del tipo:
DoCmd.OpenForm "FrmA", , "Qry_1"
Ma così apre la maschera principale... il problema è che c'è la
sottomaschera e la query la devo associare a quest'ultima!
--
Ciao,
Donato
ark...@tin.it
(¯`·.¸ Arkadja ¸.·´¯)

 ha scritto nel messaggio
news:5%9Nb.87365$VW.36...@news3.tin.it...

Apri la form, quindi assegna alla proprietà recordsource della sottomaschera
la query giusta
Antonio
Newsgroup: it.comp.appl.access
Titolo: Scansire e archiviare un Cdrom o una serie di directory

Saluti a tutto il NG !
Torno sull'argomento circa la possibilitą di scansire e archiviare in un
database access il contenuto di un cd o di una o piu directory su HD
(directory, sottodirectory e files) .
Ho provato le soluzioni presenti nei post precedenti ma non sono riuscito,
per mia incompetenza, a farle funzionare.
Sareste cosi gentili da indirizzarmi su questo argomento dato che devo
archiviare una mole di CD non indifferente?
Grazie per l'aiuto che vorrete darmi!
Ciao!
Paolo


Prova a vedere se ti è utile Application.FileSerch e i vari metodi ......!
@Alex.


Ciao Paolo.
Se ho ben capito hai dei db su cdrom che vuoi usare nel senso di usare le
tabelle in essi contenute.
Se è così credo che il suggerimento di Roberto sia più che giusto: allega al
db corrente le tabelle provenienti dal o dai db su cdrom.
E' chiaro che le tabelle allegate saranno in sola lettura.
Se non ho capito posta una spiegazione con un esempio concreto di quello che
ti aspetti di ottenere.
Ciao, Carlo

 ha scritto nel
messaggio news:3f%P9.39805$Q%4.12...@news1.tin.it...

Cari Carlo e @Alex...purtroppo mi sono spiegato male, chiedo venia.....,
intendevo una soluzione circa la catalogazione del contenuto di CDRom
contenenti dati di vario tipo e non database. (adesso comunque mi studio un
po "Application.FileSearch").
Ovvero mi piacerebbe che mi effettuasse la scansione del cd e mi archiviasse
in una tabella directory e loro contenuto  (con un IDcd per catalogarli) per
poter non ricercare "a memoria" in una marea di cdrom il file che mi
interessa recuperare.
Ogni vostra saggia indicazione è bene accetta anche perche capirete che
trovare qualcosa oggi per me è un impresa!
Come da post precedente ....Buon Anno! e come sempre ...Grazie!
Paolo
Come da post

Newsgroup: it.comp.appl.access
Titolo: inserire valore in una tabella

ho una tabella contenente centinaia di record, ho aggiunto un campo a tale
tabella, in questo campo e per tutti i record devo inserire un valore
sempre uguale, come fare per non farlo manualmente con copia/incolla ma in
un'unica soluzione?
grazie
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ha scritto nel messaggio
news:cc0d5c$kgp$1...@news.newsland.it...

prova con questa query:
UPDATE Tabella1 SET Tabella1.Campo1 = "Quello_che_vuoi";
ciao e fammi sapere.

 ha scritto nel messaggio
news:cc0d5c$kgp$1...@news.newsland.it...

Query di aggiornamento
MAssimiliano

 ciao e fammi sapere.
grazie!
ho inserito il codice in una query di aggiornamento e funziona!


MA ha scritto:

Newsgroup: it.comp.appl.access
Titolo: Recordset.FindFirst

Buon giorno a tutti, volevo chiedervi se anche a voi è successo che 
convertendo un vecchio db in un db 2013 il metodo .FindFirst non venisse 
più riconosciuto. Ho notato che non c'è più tra i riferimenti la DAO 3.6 
e provando ad attivarla non me lo permette. Sicuramente serve attivare 
un altro riferimento ma non so quale. Vi sarei molto grato se poteste 
aiutarmi. Grazie

it.comp.appl.access brought next idea :

Dovrebbe essere (vado a memoria):
Microsoft Office 15.0 Access database engine Object Library
 
Bruno

Newsgroup: it.comp.appl.access
Titolo: arrotondamento alle decine

in una query vorrei ottenere un arrotondamento della cifra ( adesso intera)
ai 10 euro immediatamente superiori.
Ad esempio
3427 --> 3430
121  -->  130
ho provato con la funzione ROUND, ma non riesco a concertare il risultato.
ammettendo che io abbia un campo [prezzo] che vorrei 'arrotondare' ai 10
euro superiori, come deve essere la fetta di codice riguardante quel campo?
INT((ROUND([prezzo];1)/10)*10)
mi sembra troppo complicata, esiste un metodo più semplice?
Ivan
PS
per errore avevo postato lo stesso quesito su office.excel ed ho anche 
ottenuto una risposta corretta.
Peccato che non la possa usare in una query!
IvanDaBologna


seeee... si fa presto a dire arrotondameto
cfr 
www.donkarl.com/it
 Faq 2.1
--
ac


ORCA! potevo fare una domandina più semplice!  LOL ;))
grazie, studio e applico!
Ivan 

 ha scritto nel messaggio 
news:44887efa$0$36937$4faf...@reader3.news.tin.it...

sono arrivto ad un buon compromesso, allego la stringa SQL creata solo per 
provare. Basta cambiare il valore in [base] per vedere se il calcolo è 
corretto.
SELECT 141 AS base, IIf([base] Mod 10=0,[base],Int([base]/10+1)*10) AS uno
FROM doveTiPare;
però è una vera complicazione non avere una funzione bell'e pronta in 
Access.
IvanDaCasa
Newsgroup: it.comp.appl.access
Titolo: label

Nel report rptBancaItalia vorrei non visualizzare
la presenza di tre etichette denominate
lbl_01, lbl_02, lbl_03 quando il controllo txtCausale risulta True,
vorrei visualizzare le etichette quando invece
il controllo txtNominativo risulta True.
La tabella tblPagamenti è l'origine dei controlli.
Il comando di stampa del report si verifica a mezzo del
pulsante cmdStampa nella form frmPagamenti.
ciao, Paolo

 ha scritto nel messaggio
news:2KmT7.12027$o9.5...@news1.tin.it...

E se txtCausale risulta True e contemporaneamente txtNominativo risulta
True, cosa devi fare?
Visualizzi solo le label dispari? :-)
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


Giusto, nella form frmPagamenti deve risultare se
txtCausale True allora txtNominativo False o
txtCausale False allora txtNominativo True
ad ogni modo devo visualizzare le tre etichette quando
txtNominativo = true
txtCausale = False
che devo fare
ciao, Paolo

 ha scritto nel messaggio
news:EcqT7.13082$o9.5...@news1.tin.it...

Sperando di averci capito qualcosa.
Se txtNominativo  e txtCausale sono due controlli di tipo Si/No di una
maschera chiamata frmPagamenti.
Se la maschera frmPagamenti resta aperta durante la stampa del report.
Se le labels lbl_01, lbl_02, lbl_03 sono contenute nel corpo del report.
Se dette labels vanno visualizzate SOLAMENTE se txtNominativo è True e
contemporaneamente txtCausale è False.
A fronte dell'evento "Su formattazione" della sezione Corpo del report prova
a generare il seguente codice VBA:
If Forms!frmPagamenti!txtNominativo = True And Forms!frmPagamenti!txtCausale
= False Then
    Me!lbl_01.Visible = True
    Me!lbl_02.Visible = True
    Me!lbl_03.Visible = True
Else
    Me!lbl_01.Visible = False
    Me!lbl_02.Visible = False
    Me!lbl_03.Visible = False
End If

Newsgroup: it.comp.appl.access
Titolo: Tasso d'interesse

sull'origine del controllo tasso ho inserito questa espressione
=Left(100*[Interesse]/[Numeri];4)
tutto Ok se il tasso è > di 0
ma se il tasso è < di 0 si visualizza 4,89 anzichè 0,04
ho necessità di troncare i numeri dopo le due cifre decimali
cosa devo fare ???
ciao, paolo

 wrote in message
mivob.74089$e5.27...@news1.tin.it...


 wrote in message
NdLob.83486$e6.30...@twister2.libero.it...

Newsgroup: it.comp.appl.access
Titolo: [VBA]Eventi Form

Domanda difficile...
Ho una Form(TEST) che può essere usata sia come Form che come SubForm,
ma in entrambi i casi viene
legata ad una Form MASTER dalla quale eredita Eventi.
Se usata come SubForm si auto configura come si vede nel codice sotto,
se usata come Form(Esterna) su Load della Form Master, assegno la
dipendenza:
' =============================================================
		CODE MASTER(ESTERNA)
' =============================================================
Private Sub Form_Load()
   Docmd.OpenForm "TEST"
   Forms!Test.SetMaster Me
End Sub
' =============================================================
		CODE Form_TEST
' =============================================================
Private WithEvents mF as Access.Form
Private Sub Form_Load()
   If IsSubForm(Me) Then Call SetMaster(Me.Parent)
End Sub
Public Sub SetMaster(frm As Access.Form)
    Set mF=frm
    With mF
       .BeforeUpdate = "[Event procedure]"
       .OnDirty="[Event procedure]"
    End With
End Sub
Private Sub Form_BeforeUpdate(Cancel As Integer)
..... fa qualcosa
End Sub
Private Sub Form_Dirty(Cancel As Integer)
.... fa qualcosa
End Sub
' =============================================================
		END CODE
' =============================================================
Ora se la mia Form(TEST) è SubForm nel momento in cui la MASTER è in
EDIT
e mi sposto sulla SubForm(TEST) viene generato il SALVA, quindi
l'evento BeforeUpdate si attiva e posso
intercettarlo.
Se la stessa cosa la faccio con Form(TEST) esterna, quindi se la
MASTER è in EDIT e mi sposto
sulla mia Form(TEST), l'evento di BeforeUpdate(Master) non viene
generato.
Aggiungo che questo è ovvio e corretto, ma io volevo trovare un modo
per forzare il salvataggio a questo punto...
Ho pensato a forzare il Salva dalla MASTER su GotFocus della
Form(TEST)... ma non mi piace moltissimo e non funziona molto bene...
IDEEE....
@Alex

.....
 
RISOLTO, mi do un pò del pollo forse ho perso un pò la mano....
 
Il problemi sono 3 di base:
 
1) La form esterna(TEST) non deve essere Popup, in qunato si dissocia
dagli oggetti legati alla Access(MDI) di conseguenza la Form(Master)
non perde lo stato ATTIVO.
2) Se la Form(TEST) non riceve il FOCUS non la Form(Master) non perde
lo stato ATTIVO.
3) Se si attiva un controllo interno alla Form(TEST) senza prima
attivare la Form(TEST), e questo avviene sempre se si preme un Button
o un Controllo senza aver Cliccato la CAPTION/CORPO ecc... la
Form(Master) non perde lo stato ATTIVO
 
SOLUZIONI
 
1) POPUP=FALSE
2) Su Deactivate della Form(MASTER) forzo il Salva che genera il
BeforeUpdate che posso intercettare...
3) Su Click del Button/Controllo della Form(TEST) forzo il Focus della
Form(Test) questo genera il Deactivate della Form(MASTER) e di
conseguenza il BeforeUpdate...
 
Saluti
@Alex