mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Anteprima Reports

Buonasera
Come posso stabilire se un report è aperto in anteprima oppure no ?
Grazie
MArco

 Come posso stabilire se un report � aperto in anteprima oppure no ?
http://groups.google.com/group/it.comp.appl.access/msg/be96bea7952604f7
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 


Grazie Karl

Newsgroup: it.comp.appl.access
Titolo: Tasto annulla

Ho un problemino: Ho dei textbox contenenti dei valori presi da una tabella.
Con il mio programma posso modificare tali record, però nel caso in cui non
voglia più modificare il record, il mio programma deve avere la possibilità
di annullare l'operazione, e fin qui ci sono. Se clicco sul tasto annulla
nei vari textbox ci devono essere i vari valori antecedenti alle modifiche.
non so se mi sono spiegato. Vorrei solo sapere se c'è un modo facile di fare
ciò, come in access senza stare a scrivere tutte quelle righe di comando che
ho scritto. un altra cosa qual è il sito comune di visual basic
--------------------------------
Inviato via 
http://usenet.libero.it

 wrote in message
news:80Z105Z199Z154Y...@usenet.libero.it

tratto dal'help di Access:
Sub btnAnnulla_Click()
   Dim ctlCasellaTesto As Control
   For Each ctlCasellaTesto in Me.Controls
   If ctlCasellaTesto.ControlType = acTextBox Then
    ctlCasellaTesto.Value = ctl.OldValue
   End If
   Next ctlCasellaTesto
End Sub
Prova
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Prima che il record venga registrato, premi il tatso Esc.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: aiuto su Dlookup

Salve a tutto il NG.
E' molto comune stampare il report di una fattura contenente campi
provenienti da diverse tabelle. Di solito lo faccio basando il report su una
query  (chiamiamola Query fatture) che le collega. Sto provando ad
utilizzare la funzione DLookup che si presenta molto semplice, peccato che
non mi funzioni la sua clausola where. Vorrei visualizzare la partita iva
oltre che i dati anagrafici dei clienti e sarebbe bello poter includere
nella [Query fatture] la tabella dei clienti, che contiene tutte le
informazioni. Nel mio caso i destinatari di una fattura appartengono a varie
categorie (scuole, clienti, fornitori, agenti). Nella maschera di scarico
(quella che conterrà il bottone di Stampa fattura), l'utente sceglie il
destinatario di una fattura da una combo box basata su una query di unione
delle tabelle scuole,clienti.... che ha come campi 'denominazione' 'codice'
'Piva' 'Indirizzo'...... tutto ciò che mi serve. Non ci sono elementi che
posso mettere in join per collegare la query di unione con la Query fatture,
quindi per recuperare i valori dalla query di unione ho cercato di
utilizzare la funzione DLookup come segue:
=DLookUp("[partita iva]";"[Query unione]";"denominazione =" &
[Reports]![stampa fatture]![denominazione])
Non funziona (da' #Errore) e il problema dipende dalla clausola where,
vorrei capire anche se il controllo a cui impongo sia uguale il campo
denominazione (della Query) deve risiedere nello stesso report in cui
utilizzo la DLookup o se posso fare riferimento alla maschera (aperta) che
chiama il report ( con DLookup(......=&forms!scarico!denominazione). Anche
in qust'ultimo caso non funziona.
Spero di essere stato chiaro, grazie in anticipo.
Domenico

 ha scritto nel messaggio
news:DNVj6.35432$7U4.9...@news.infostrada.it...

Poiché ritengo che il campo denominazione della query unione sia
alfanumerico e non numerico, io proverei così:
=DLookup ("[Piva]"; "NomeQueryUnione"; "denominazione=" & Chr$(34) &
denominazione & Chr$(34))
sempre che esista nel report un controllo chiamato denominazione.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Report:evitare di......

Salve!
si può evitare di aprire un report in anteprima per stampare?
Esempio:
da una maschera creo un pulsante che, in base ad un criterio, mi stampa
direttamente il risultato -
anzichè aprirlo in anteprima e poi stampare -
                DoCmd.OpenReport "pippo",,acviewpreview"
               docmd.printout,,,,, (e il numero di copie)
non posso dare solo il comando
               DoCmd.PrintOut e poi qualche parametro (che non conosco) per
stampare direttamente?
Grazie!
Marco.

 ha scritto nel messaggio
news:aX9h8.37565$_u5.1...@news1.tin.it...

Se vuoi solo stampare
DoCmd.OpenReport "pippo",acViewNormal
Paolo

 Grazie per la tempestività ma, se nel caso dovessi stampare più copie mi
necessita il comando:
DoCmd.PrintOut,,,(n.copie)
giusto? e come faccio senza aprire il report in anteprima e stampare
direttamente n copie?
Grazie!

 direttamente n copie?
Ho paura che il PrintOut necessiti di un oggetto aperto, quindi cadresti di
nuovo nella necessità di aprire il report in anteprima.
Però l'OpenReport di cui parla Paolo lo puoi inserire in un ciclo For/Next e
ripeterlo per tutte le copie che ti servono ...
OndaMax

 wrote in message
eBch8.9208$uN5.2...@twister1.libero.it...

Questo è un buon trucco. Comunque anche nell'altro modo puoi farcela.
Se printout vuole l'oggetto attivo, ok, ti apri il report in anteprima, lo
stampi e quindi lo chiudi, sempre da codice. Se questo lo fai disattivando
l'echo e poi riattivandolo, probabilmente è quasi impercettibile all'utente
quello che hai fatto
Antonio

 ha scritto nel messaggio
news:%5lh8.9081$5z3.2...@twister2.libero.it...

Grazie Antonio e, ovviamente, anche agli altri. Avevo già questa soluzione
dell'echo true e false ma non è del tutto impercettibile l'apertura del
report in antemprima perciò, sono ricorso ad un autorevole aiuto.
Potreste suggerirmi come impostare la routine For/Next in questo caso, visto
che non sono ai V/s livelli?
Grazie anticipatamente.
Marco.

 Grazie anticipatamente.
[Pierpiero mode ON]
Ma daaaaiiii...
[Pierpiero mode OFF]
cont = inputbox("quante pagine ciccio?")
For i = 1 to cont
  docmd.openreport "Tuoreport"
next i
Antonio

Newsgroup: it.comp.appl.access
Titolo: Ma che.....

...se magna?:-)
Saluti.
Luciano

 Luciano
Ciaoooooooooo,
Ben tornato tra noi comuni mortali
Se si fa vivo anche Antonello, abbiamo la Sacra Triade al completo.
Forza del raduno!!!
Roberto

 Ben tornato tra noi comuni mortali
Gvazie cavo, evo nei miei appvtamenti quando dalle cucine mi hanno avvevtito
qui si pavlava di vaduni....:-))
Saluti.
Luciano
Newsgroup: it.comp.appl.access
Titolo: Desktop

Qualcuno sa per favore come riuscire a recuperare la directory del
desktop???
Grazie Andrea


C:\WINDOWS\Desktop
... se è questo che volevi ...
--
Alberto

 ... se è questo che volevi ...
Questo vale per Win9X, da Win2000 in avanti la cosa e' ben diversa, tanto
che io eviterei assolutamente di appoggiarmi al desktop per qualsivoglia
operazione, escluso forse la fase di installazione.
Ad ogni modo esiste una sintassi di sistema specifica per estrarre il
percorso del desktop corrente (ossia quello dell'utente attivo) o la parte
comune a tutti gli utenti (\alluser\desktop) ma non la ricordo
assolutamente.
Sib

> ... se è questo che
volevi ...
se hai problemi, clicca col tasto destro visualizzando le
proprietà di un file appoggiato sul desktop, ti darà anche il percorso...
et voilà
ciao Massimiliano
--------------------------------
Inviato via 
http://usenet.iol.it
 

"Sib" <si...@SPAMiol.it> ha scritto nel messaggio
news:Nu%x8.22744$8D3.6...@news1.tin.it...

Grazie Molte, penso segiurò il tuo consiglio e troverò una directory +
facilmente identificabile.
Andrea

Newsgroup: it.comp.appl.access
Titolo: schede di rete VIA

sono buone queste schede ?
Oppure danneggiano i database di MS access usati in rete lan ?
saluti 

 Oppure danneggiano i database di MS access usati in rete lan ?
Che io ricordi le uniche schede di rete che danneggiavano sistematicamente
files .mdb erano le vecchie Realtek 8029 in ambiente win 98.
Comunque, con qualunque hardware di rete possono verificarsi problemi (è
sufficiente che si spenga un PC durante un processo di scrittura).
Ciao: Oscar

 Oppure danneggiano i database di MS access usati in rete lan ?
Una NIC lavora ad un livello ISO-OSI più basso rispetto ad Access, quindi
non vedo come sia possibile una interazione diretta atta a rovinare i
database.
I database Access in rete sono soggetti a corruzione se la rete ha dei
problemi, ma questo puù dipendere da vari aspetti.
E, certamente, se la rete ha dei problemi, non è solo Access che ne risente
:-)
-- 
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution
Newsgroup: it.comp.appl.access
Titolo: Come visualizzare immagini su Sottomaschera

 
Buongiorno , 
 
Ho una maschera con relativa sottomaschera , la sottomaschra deve essere esclusivamente in maschere continue
, la mia domanda è come posso mettere un immagine   collegata al campo ID Immagine del record corrente nella sottomaschera
 
la query della maschera  contiene :
 
IDOrdine  > Tabella "Ordini"
IDFornitore  >Tabella "Fornitori"
CodiceFornitore >Tabella "Fornitori"
CodiceFornitore  > Tabella "Ordini"
DataOrdine > Tabella "Ordini"
Intestazione >Tabella "Fornitori"
 
 
la query della sottomaschera contiene :
 
CodiceFornitore >Tabella "Prodotti"
IDOrdine  > Tabella "Dettagli_Ordini"
IDProdotto > Tabella "Dettagli_Ordini"
Prezzo  > Tabella "Prodotti"
Descrizione > Tabella "Prodotti"
IDImmagine > Tabella "Prodotti"
 
Il collegamento è tra IDOrdine delle due maschere 
 
Giuseppe

Puoi mettere il controllo immagine nella maschera principale, e sull'evento SuCorrente della sottomaschera inserisci il codice che aggiorna il percorso file dell'immagine.

 Puoi mettere il controllo immagine nella maschera principale, e sull'evento SuCorrente della sottomaschera inserisci il codice che aggiorna il percorso file dell'immagine.
 
Nell'origine record della maschera non ho l'IDImmagine 
la query di origine record è tra le tabelle Ordini e Fornitori 
 
il campo IDImmagine è nella tabella Prodotti che non posso relazionare con le altre due .
 
Giuseppe

Newsgroup: it.comp.appl.access
Titolo: Non si aggiorma più ... propio più

ciao,
sono nero!!!!
ho una maschera con relativa sottomaschera di riepilogo, il comando di
aggionamento della maschera principale č impostato su "attivazione" della
form stessa.
Fino a ieri tutto funzionava, quando la form principale si attivava scattava
la macro, oggi non piů !!! Si aggiona solo se metto un pulsante con il
comando "aggiona".
non so piů dove andare a gurdare .... sicuramente una pecca c'č, ma
doveeeeeeee.
Aiutatemi per favore
Andrea

 Andrea
Ho paura che veramente chiedi troppo. Se tu che lo hai fatto non sai cos'è
successo e non ci dai elementi, mi sa che è difficile che si riesca a
capire.
Please more details
ciao MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it

 Please more details
Chi e' so Please che e' morto de taijo? E perche'?
--
a.cara 
Togli qualcosa dall'email
Newsgroup: it.comp.appl.access
Titolo: Limiti di connessione in Terminal Server 2003

Abbiamo attivato un  server per Database SQL2000 e un server per gli utenti 
di Terminal Server Win 2003 Server con 2 GB di RAM. Il tutto in una rete 
intranet aziendale; volendo collegare il tutto alla rete geografica quale è 
il limite di utenti collegabili allo Stesso SQL2000 ed eventualmente quali 
sono le risorse necessarie.
Grazie
David 

 ha scritto nel messaggio
news:e285hg$30d$1...@carabinieri.cs.interbusiness.it...

Ciao David,
ho l'impressione che qui siamo un po' OT dovresti provare a chiedere su
microsoft.public.it.sql o microsoft.public.it.winserver
Magari dovresti anche specificare come si collegano gli utenti a SQL 2000,
tramite che applicazione e che c'entra Terminal server?
-- 
Cinzia
---------------------------------------
|  
http://www.riolab.org
  |
--------------------------------------->

 ha scritto nel messaggio 
news:444773d3$0$29113$5fc...@news.tiscali.it...

Grazie Cinzia x il tuo interessamento, usiamo DataBase in SQL collegato 
tramite ODBC al FrontEnd di ACCESS.
Il FrontEnd risiede sulle cartelle degli utenti di Terminal Server.
L'utente si loga su di una sessione di Terminal Server a lui dedicata e 
l'applicativo ha le tabelle in SQL su di un altro server che fa solo da 
DataBase.
 


Credo che il limite dipenda dal numero delle licenze client di SQL Server e
di Terminal Server.
Per quanto riguarda un limite "fisico" dipendente dalla configurazione
hardware non saprei indicartelo ...
Ciao


 eventualmente quali sono le risorse necessarie.
In intranet trovo improponibile l'utilizzo di terminal server (non c'č 
nessun motivo)
Per quanto riguarda la rete geografica il collo di bottiglia mi sembra la 
connessione piů che il numero di utenti che puň essere discretamente 
elevato, con le risorse che dai direi che una decina di utenti concorrenti 
li dovrebbe reggere, il problema č la connessione.
Ciao
Sib
-- 
http://www.gestionedati.com

Newsgroup: it.comp.appl.access
Titolo: Access e URL

Qualcuno mi sa dire come aprire un pagina di un sito e leggerne il
risultato (un singolo numero) ?
Come si usa DoCmd.RunCommand acCmdOpenURL ?
Si può indicare un URL a piacimento ?
Ilic Radice.

 risultato (un singolo numero) ?
Devi utilizzare l'oggetto com HTTRequest dell'SDK MSXML di Microsoft.
-- 
I'am what I'am, I do what I can

Devi utilizzare l'oggetto com HTTRequest dell'SDK MSXML di Microsoft.
Anche con Access 97 funziona ?
Ilic.

Ilic wrote:

E' un oggetto COM, dovrebbe funzionare anche con Access 2.0, devi solo
scaricarti l'SDK (se non ce lo hai gia') dal sito della microsoft.
Con google trovi molti esempi, viene utilizzato principalmente per fare
chimate Soap in applicativi Asp 3.0, ma va bene anche per le richieste
HTTP normali.
In alternativa potresti utilizzare le api di Internet explorer, ma
questo ti limita ad averlo installato (ver >= 5.1).
Saluti.

Newsgroup: it.comp.appl.access
Titolo: Esecuzione query in automatico

Salve a tutti,
il mio problema è questo.
Ho tre query di accomodamento, desidererei che alla chiusura del
database eseguissero contemporaneamente automaticamente.
Come posso procedere?
Anticipatamente grazie e ciao.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Anticipatamente grazie e ciao.
Sul tasto di chiusura, prima di Docmd.Quit o fai un Docmd.RunSql "tua
stringa sql" (tante quante sono le query), oppure Docmd. OpenQuery "Nome
query" (tante quante sono le query)
--
Maurizio75
Newsgroup: it.comp.appl.access
Titolo: Help Report Raggruppamento

Ho fatto un report che ragruppa una serie di dati per Mese, per ogni mese
inserisco alla fine la somma parziale delle vendite e in fondo al Report la
somma totale.
Mi č stato chiesto di inserire alla fine di ogni mese oltre che la somma di
esso anche la somma progressiva.
Per essere piů chiaro in fondo al mese di Marzo oltre che la somma di tutte
le vendite di Marzo anche la somma delle vendite di Gennaio+Febbraio+Marzo.
Ammetto di non esserci riuscito ;-(
grazie 1000 per le eventuali risposte.
--
Ciao Marco S.
www.marcosanti.it


Non so se ho capito bene comunque prova così e guarda se è il risultato che
volevi:
Inserisci una casella di testo nel piè di pagina gruppo la dove hai l'altro
totale mensile.
Nella proprietà Origine del controllo inserisci
=Somma([NomeCampoDaSommare]).
Nella proprietà Somma parziale seleziona Su tutto.
Ciao Roberto - Syd

 Ciao Roberto - Syd
PERFETTO !!!
grazie 1000 Roberto

Newsgroup: it.comp.appl.access
Titolo: ado e jet!

Premetto che sono alle prime armi con ADO  e Jet ma non capisco dove possa
essere l'errore che mi vien segnalato quando lancio le seguenti righe:
    Dim wrkJet As Workspace
    Dim dbserver As Database, dbfiliale As Database
    Dim rstTempS As Recordset
    Dim rstTempF As Recordset
    Set wrkJet = CreateWorkspace("", "Admin", "")
    Set dbserver =
wrkJet.OpenDatabase("C:\database\Fronteback\gestioneavanzata_be.mdb")
    Set ddfiliale = wrkJet.OpenDatabase("C:\REMOVIBILE\archiviofiliale.mdb")
    Set rstTempS = dbserver.OpenRecordset("MATERIALE", dbOpenTable)
    Set rstTempF = dbserver.OpenRecordset("MATERIALE")
l'errore: errore di runtime '13'  Tipo non corrispondente!!!!!!!!!!
Non credo ci siano molte possibilita' di errore!
Ciao
Grazie

     Dim rstTempF As Recordset
Questa sintassi č quella adoperata x DAO, mentre x ADO devi modificarla:
come non lo so, perché uso A97, ma nell'help di A2000 trovi sicuramente come
correggerla.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


OPS....si hai ragione...infatti era mia intenzione scrive dao sull'oggetto
dl post!!
Ma secondo te sto sbagliando strada ??? devo aprire un db esterno e
modificare (aggiornare) dei dati in verie tabelle???
ciao
Grazie
Davide


Oppure dichiari esplicitamente di utilizzare gli oggetti DAO ...
    Dim rstTempS As DAO.Recordset
    Dim rstTempF As DAO.Recordset
CIAO


Quando sono presenti nei riferimenti sia le librerie DAO che quelle ADO,
per tutte le dichiarazioni di oggetti che esistono con il medesimo nome in
entrambe le classi,
occorre per forza esplicitare la classe prima del nome; ES:
dim    rst1    as    DAO.recordset            ; se vuoi un recordset DAO
dim    rst2    as    ADODB.recordset        ; se vuoi un recordset ADO
e così via ...
Oppure se ADO ti dà fastidio puoi eliminarlo dai riferimenti, ma non mi
sembra il caso ...
CIAO

 ha scritto nel messaggio
news:%B8O6.20961$Ql3.8...@news.infostrada.it...

E' un baco risolto con una patch dalla stessa Microsoft .
Consulta 
www.google.it
 e digita l'errore vedrai che ti porta alla patch.
Bye

 ha scritto nel messaggio
news:%B8O6.20961$Ql3.8...@news.infostrada.it...

ma il codice ADO dov'è?
non vedo nulla del genere di "Dim rst as new ADODB.Recordset"
Newsgroup: it.comp.appl.access
Titolo: DISATTIVARE EVENTO

Buondì,
ho un altro problemino :
in una sottomaschera ho attivato un evento su doppio click per selezionare
un record, questa sotto maschera è utilizzata da due maschere, avrei la
necessità di disattivare questo evento quando la sottomachera viene utizzata
dalla seconda  maschera e riattivarlo quando la sottomaschera è attiva nella
prima maschera.
Qualcuno ha un suggerimento ?
Vorrei evitare la duplicazione delle maschere.
Grazie
Sasa

 ha scritto nel messaggio
news:chm84t$5ju$1...@lacerta.tiscalinet.it...

Ciao sasa,
puoi uscire dall'evento se la maschera principale è la Maschera2, in pratica
così
----------------
Private Sub Testo1_DblClick(Cancel As Integer)
  If 
Me.Parent.Name
="Maschera2" Then Exit Sub
................
................
End Sub
------------------
Ciao Giorgio

sasa ha scritto:

Metti tutto il codice dentro a un if
  if 
me.parent.form.name
="Prima maschera" then
    ...
  end if
Namor
-- 
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Newsgroup: it.comp.appl.access
Titolo: Apertura maschera

Ho un problema relativo all'apertura di una maschera "UTILITY" da due altra
maschere e contestualmente ritornare su quella che l'ho aperta., mi spiego.
Vorrei aprire una maschera di nome utility dalla maschera iniziale e
ritornare in caso di apertura da quella o aprirla dalla maschera di modifica
e rientrare in maschera modifica una volta terminata.
Ho tentato con degli If ma ho incasinato tutto.
Qualcuno mi sa dire dove vedere degli esempi o come fare
Grazie

 ha scritto nel messaggio 
news:kAgMd.816596$35.31...@news4.tin.it...

____________________________
creati una variabile globale
quando apri la maschera da quella iniziale la imposti ad 1
quando la apri da modifica la imposti a 2
e su chiusura dell'utility controlli il valore della variabile ed il gioco è 
fatto.
ciao
Riccardo 

and ha scritto:

Nel codice di ciascuna delle due maschere, subito dopo avere aperto
"UTILITY" riattivi con setfocus la maschera chiamante ed eventualmente uno
dei suoi controlli.
    DoCmd.OpenForm "UTILITY"
    Me.SetFocus
    Me.nomecontrollo.SetFocus
Namor
-- 
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Io non c'ho capito nulla...
Ciao.
-- 
Sergio MAZZA

Newsgroup: it.comp.appl.access
Titolo: visual basic.net

buongiorno.
voglio acquistare un paio di manuali del linguaggio in oggetto.
vanno bene per scrivere codice in access e/ excel ?
grazie. 


No.
Devi cercare VBA
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa1 - I° Conferenza Italiana per Sviluppatori Access Arezzo 4+5
Giugno 2005 Sono aperte le iscrizioni  Info:  
www.donkarl.com/it


che sarebbe l'acronimo di visual basic for access?


For Application.
Appartiene a tutto il pacchetto office
Tu puoi programmare anche excel o PowerPoint o word o outlook


 ha scritto nel messaggio 
news:d72af9$2bos$1...@stargate1.inet.it...

Ciao oklim,
se vai sul sito 
http://www.functionx.com/index.htm
 e ti sposti sul menu a 
sinistra c'è la voce VBA For MS Access ...prova un pò a darci 1 occhiata...
Gaspare

 ha scritto nel messaggio 
news:d72af9$2bos$1...@stargate1.inet.it...

Ah dimenticavo...abbastanza interessante è questa guida 
http://amscampus.cib.unibo.it/archive/00000782/01/VBA_per_Access_2000.pdf
...potrebbe essere utile per iniziare ;-)

 ...potrebbe essere utile per iniziare ;-)
ci guardo subito, grazie.
ciao.
Newsgroup: it.comp.appl.access
Titolo: Campo data incrementale

Salve a tutto il NG;
ho una maschera con un campo data turno, in formato data, su tasto nuovo
turno vorrei che nel campo data si aggiungesse 1 giorno rispetto a quello
precedentemente inserito, (esempi campo data:01/01/03, su click dovrebbe
diventare 02/01/03 ecc.)
Grazie.
Lucio

Lucio <nap...@NOSPAMtin.it> wrote in message
WcUXa.36895$cl3.1...@news2.tin.it...

Se i campi che contengono i turni sono di tipo Data/ora:
SecondoTurno = PrimoTurno + 1
Volendo puoi anche usare la funzione DateAdd (vedi help).
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: Relazioni moolto.. a molti!

forse č la solita domanda sulle relazioni molti a molti, ma a me sembra
davvero complessa!
Ho spulciato tra i vecchi post, ho trovato anche qualcosa ma ancora non mi č
chiaro il funzionamento di questo tipo di relazioni.
le tabelle sono:
Agenzie
Aziende
Prodotti
Agenti
1 Agenzia rappresenta piů Aziende
1 Azienda produce piů prodotti
1 prodotto puň essere prodotto da piů aziende
1 agenzia ha il proprio agente di zona
sono 2 relazioni molti a molti?
e come si mettono i relazione?
ho capito che si deve creare una tabella di collegamento
ho fatto delle prove ma sono piů gli errori...
e una volta stabilite le relazioni come si inseriscono i dati in 2 tabelle
molti a molti?
Vi ringrazio
ciao


La relazione molti a molti da realizzare è una.
Lo si fà con una tabella intermedia che contiene le chiavi delle due tabelle
da relazionare.
La tabella "AziendeProdotti " sarà così costruita:
ID proprio
IDAzienda
IDProdotto
IDProprio di tipo contatore
Chiave Primaria sui due campi IDAzienda e IDProdotto.
IDProprio con indice impostato a sì duplicati IMpossibili; IDAzienda con
indice impostato a sì  duplicati Possibili; indice IDProdotto sì duplicati
Possibili.
Ne risulta un possibile scenario:
Az1 > Prod1
Az2 > Prod1
Az3 > Prod1
Il resto e cioè Agenzie e Aziende hanno una normale relazione uno a molti.
Eventualmente intravedo una possibile relazione molti a molti tra Agenti e
Zone (ammesso che farai una tabella zone).
Ciao, Carlo

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

A che serve precisamente ?!
Che differenza c'è tra lo "Scaricamento" e la "Chiusura" di una maschera ?
Mi chiedevo:
non è che convenga scaricare le variabili del tipo Set Rst = nothing proprio
nello scaricamento, invece che ad ogni routine ?

 nello scaricamento, invece che ad ogni routine ?
Per farlo avresti dovuto dichiararle global no?
Antonio


L'evento Scaricamento avviene prima che la maschera o il report siano
rimossi dallo schermo al contrario dell'evento Chiusura che avviene dopo che
l'oggetto è stato rimosso dallo schermo.
Insomma sono gli eventi reciproci di Caricamento (avviene dopo che i
controlli vengono visualizzati) e Apertura (avviene prima che i controlli
vengono visualizzati).
[CUT]
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: non permettere la doppia apertura

Mi chiedo se esista la possibilità di non permettere la doppia apertura sullo stesso pc di un front-end di MS Access.
Qualcuno ha già avuto il medesimo problema?
 
grazie in anticipo 
 
Marco Dell'Oca

Ci sono molti metodi... più o meno funzionanti.
A mio avviso il migliore è quello di sfruttare il sistema operativo attraverso i Mutex.
 
Forse è poco intuitivo... ma qui trovi un buon articolo:
https://www.experts-exchange.com/articles/2104/Avoiding-running-multiple-instances-of-an-application.html
 
 
@Alex
Newsgroup: it.comp.appl.access
Titolo: Menu' a tendina in filtro in base a maschera

Sto perdendoci la testa....
Come mai se tento di applicare in filtro in base a maschera ad una tabello
che contiene pochi record aprendo la tendina dei campi mi si visualizzano i
contenuti dei campi stessi ma se lo faccio su una tabella + pesante mi
appaiono solo le scelte "is null" e "is not null" ?
C'e' un modo x ovviare a cio'? Oppure, qual'e' il numero limite di report
oltre il quale spariscono i dati dei campi?
Spero di essere stato sufficientemente chiaro... grazie fin d'ora per
l'aiuto!
Paolo Tomiato





 ha scritto nel messaggio
news:yBUi6.6546$7U4....@news.infostrada.it...

Strumenti=>Opzioni=>Modifica/Trova : aumenta il valore di "Non visualizzare
elenchi con numero di record superiore a:".
Nella finestra di filtro in base maschera, per tutti i campi in cui il
numero di record richiesto per completare l'elenco supera il numero
specificato, non verrà specificato alcun elenco.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: eliminazione di pulsante di comando

Sono una neofita e, pur avendo un testo sottomano, non trovo
nell'indice (come neppure nella guida in linea di Access, nè nei
precedenti messaggi del NG) come eliminare un tasto di comando su una
maschera che ho messo per sbaglio.
Ho provato a cliccarci sopra col tasto dx del mouse ma il familiare
menù a  discesa con l'opzione di eliminazione che si trova in altri
ambienti non compare.
Ringrazio anticipatamente chi mi vorrà rispondere, promettendo fin
d'ora di evitare di seccarvi il più possibile in futuro con domande
banali (per voi ) come questa.
Ciao a tutti.

Selezionalo e premi CANC.

 Selezionalo e premi CANC.
E non dimenticare di controllare ed eventualmente eliminare il codice
associato al pulsante contenuto nel modulo della form
Sib

 ha scritto nel messaggio
news:11Ak7.18371$MO.6...@news.infostrada.it...

Ah, già...questa era una cosa della quale volevo discutere con voi. Se non
lo si fa si genera un errore di non univocità....E' un bug?

 lo si fa si genera un errore di non univocità....E' un bug?
L'errore di non univocita' si genera solo se crei un nuovo controllo con lo
stesso nome del vecchio. Avendo tu lasciato il codice del primo pulsante
orfano, quando crei un nuovo controllo potresti creare una nuova procedura
con lo stesso nome, se il nuovo controllo ha lo stesso nome del vecchio.
Non e' un baco, e' un errore del programmatore che ha creato due routine con
lo stesso nome.
Ciao
Sib
Newsgroup: it.comp.appl.access
Titolo: GETTO LA SPUGNA

.....basta......non so come fare......chiedo aiuto.....
chi mi sa aiutare???
Io vorrei:
1. Aprire tramite DAO due mdb
2. con un ciclo da 1 a nrtabelle passare certe tabelle definite in
precedenza con una matrice
3 in ogni tab origine leggere i record consecutivamente, verificare se
esiste il record e' presente (verificando se si trova la chiave primaria)
nella tab di destinazione (le due tabelle hanno la stessa struttura)
4 se esiste allora utilizzare il metodo UPDATE per modificare i campi
5 se non esiste inserire il nuovo record nella tabella destinazione con il
metodo addnew
6 chiudere tutto ed andare a dormire (sig sig)
ecco quello che ho scritto fino ad ora:
dim dbfiliale as database,  dbserver as database
Dim tbfserver As DAO.TableDef,
dim rstfiliale As DAO.Recordset, rstserver As DAO.Recordset
Dim wsptransact As DAO.Workspace
Dim fldserver As DAO.Field
Set dbfiliale = opendatabase("C:\filiale\ofiliale.mdb")
Set dbserver = opendatabase("C:\server\server.mdb")
'**non credo sia fondamentale** Set wsptransact = CreateWorkspace("",
"admin", "")
''**non credo sia fondamentale** wsptransact.BeginTrans  'inizia la
transazione
On Error GoTo errRollBack
For numtab = 1 To TotaleTabelle
    Set rstserver = dbserver.OpenRecordset(Tabella(numtab), dbOpenTable,
dbForwardOnly)
    If Not rstserver.EOF Then
        Set rstfiliale = dbfiliale.OpenRecordset(Tabella(numtab),
dbOpenDynaset)
        Do While Not rstserver.EOF
            rstfiliale.AddNew
            For Each fldserver In rstserver.Fields
            Next
            rstfiliale.Update
            rstserver.MoveNext
        Loop
        rstfiliale.Close
    End If
rstserver.Close
Next
Exit Sub
praticamente non so come impostare il ciclo ..passa tutti i record, verifica
se la chiave primaria e' presente....e poi
if presente allora
    modifica
altrimenti
    aggiungi nuovo record
end if
Grazie a tutti sono disperatissssiiiimo!
--
* David *

 wrote in message
2ZeO6.19606$iC1.7...@news6.giganews.com...

...ore 02.10....forse ho trovato la soluzione......fatemi lavora su ancora
un po' e poi ve lo pubblico!!!
ciao
..vado a letto!

 6 chiudere tutto ed andare a dormire (sig sig)
CUT
Fai una query "dati non corrispondenti".
Fai una query di accodamento basata sulla precedente.
Sib
Newsgroup: it.comp.appl.access
Titolo: Union si usa solo per 2 Select o più?

 
          Scusate ma oggi rompo...
Come da oggetto, Union si usa solo per unire 2 Select o si puo fare anche
con 3 Select?
Grazie in anticipo.
Montanaro
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/


Ciao Montanaro,
la puoi usare con quante Select vuoi, del resto basta provare!  :-)
-- 
Cinzia
---------------------------------------
|  
http://www.riolab.org
  |
---------------------------------------

[CUT]
Ciao Cinzia,
complimenti x il sito -> è gradevole sia dal punto di vista estetico che dal 
punto di vista contenutistico...la chiarezza e sintetiticità degli articoli 
è abbastanza invitante x il lettore :-)
Buona giornata :-)
Gaspare 

 ha scritto nel messaggio
news:4371f23d$0$29608$4faf...@reader3.news.tin.it...

Ciao Gaspare,
grazie x i complimenti, il sito è appena nato e i contenuti sono ancora
pochini....
Il gruppo RIO, oltre a pubblicare i suoi lavori conta molto sulla
partecipazione anche degli altri frequentatori dei NG.
Per cui se hai qualcosa, in una delle aree di cui ci occupiamo , che pensi
possa essere interesante, sul sito trovi i riferimenti per inviarcela!
Saluti

Newsgroup: it.comp.appl.access
Titolo: Ripetere alcuni campi di record precedente

Ho una sottomaschera e vorrei ripetere(prendendoli dal record precedente)
alcuni campi quando inserisco un nuovo record. Potete aiutarmi ? 
Grazie
Nicola
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Nicola
Ciao,
l'unico sistema che conosco e' sull'evento dopo aggiornamento,
la configurazione della proprieta' DefaultValue.
--
Lorenzo

Newsgroup: it.comp.appl.access
Titolo: versioni demo

Ciao,
distribuendo un programma, e' possibile crearlo in versione demo (es. che si
blocca in automatico dopo 30 giorni dalla data del primo utilizzo).
Come si puo' fare?
Grazie
Riccardo

 wrote in message
8v2rq9$11t$1...@news.panservice.it...

Scaricati l'ocx nslock15vb6.ocx da 
www.download.com
Ciao, Bobbit

 wrote in message
v69R5.75896$BF.26...@news.infostrada.it...

_______
Scusa Bobbit, non potresti essere piu' preciso, perchè cercando la parola
"nslock15vb6.ocx" ed anche in altri modi, non trova nulla.
o magari puoi mandarlo via email od anche al ng?
grazie
Riccardo


L'ho inviato io al sito comune una settimana fa, spero sia arrivato.
--
Aries
e-mail: 
seren.f...@iol.it
icq: 56640169
www.sereninformatica.it


____________-
Sembra che non lo abbiano ancora caricato!
O per lo meno io non l'ho trovato.
ciao
Riccardo


:-(((
cmq se lo vuoi scrivimi in mail che te lo mando


Newsgroup: it.comp.appl.access
Titolo: Gestione date di scadenza

Buon giorno a tutti Voi,
premesso che sono un dilettante di access, debbo realizzare la gestione
della manutenzione preventiva dei macchinari di un impianto industriale,le
cui cadenze periodiche sono:
settimanale, mensile, trimestrale, semestrale annuale.
La mia domanda è la seguente : come faccio, ad esclusione di quelle
settimanali, a fare in modo che le altre abbiano come scadenza comunque
l'ultima settimana del mese di competenza? 
Aggiungo inoltre, che ad una stessa scadenza per una stessa macchina si
possono verificare assieme tutte le scadenze di manutenzione previste,
assia quella settimanale, mensile, trimestrale. ecc. 
Se qualcuno di voi è in grado di potermi dare delle indicazioni, lo
ringrazio sin da ora.
Saluti
Alberto 
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Alberto
-- 
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------

 > Alberto
Grazie per le preziose indicazioni.

Newsgroup: it.comp.appl.access
Titolo: Accesso esclusivo

Ciao ...volevo un chiarimento, se possibile :
ho un  DB che ha una passords , ma č impostato che dopo una certa data la
cambi con un altra ( un grazie al sito comune , per questo ).
Il problema č che per farlo il DB deve essere aperto in modalita esclusiva.
Esiste un modo per poter far si che il collegamento che faccio sul desktop
al mio cliente faccia aprire il DB solo in modalita esclusiva ?
grazie anticipatamente.
Lu

al mio cliente faccia aprire il DB solo in modalita esclusiva ?
path\msaccess.exe path\tuodb.mdb /excl
--
Lorenzo Coronati
--
<<Ragazzi, sapete indicarmi una utility in 
internet che sia in grado di recuperare le 
password da un database access e da un system mdw?
intendevo, gratuita...>>
(Marco Tullio Bisoli, 27/04/2001)
--

Newsgroup: it.comp.appl.access
Titolo: Access ed Excel

Chiedo se esiste un modo per poter collegare i programmi in oggetto in modo
che una casella di testo prelevi automaticamente un valore da una cella
excell (e si aggiorni automaticamente al variare di questa) e viceversa una
cella di excell prelevi un valore da una casella di testo e si aggiorni
automaticamente al variare di questa.
Grazie a tutti

 ha scritto nel messaggio
news:ZbGGa.173175$g92.3...@news2.tin.it...

Automaticamente no e neanche con 4 righe di codice.
Puoi allegare in access il foglio excel e leggerlo come se fosse una
tabella; così le modifiche le vedi sul file excel dopo averlo aperto.
Da excel puoi interrogare un mdb access e leggerti i dati di una tabella;
ogni volta che apri il file o aggiorni (Dati - Aggiorna Dati) i dati vengono
"rinfrescati"...
Ciao.
--
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: associare un campo di una form a un campo di un altra tabella

ho una form associata alla tabella clienti, vorrei che un campo prendesse
però il valore da un alta tabella
e dentro il campo con il compositore di espressioni ho scitto cosi:
=PercorsoDb!PathTabelle
percorsoDb è il nome  e PathTabelle è il campo, ma quando apro la form mi
dice
#Nome? come se non trovasse tale tabella e tale campo che invece esiste e
possiede un valore.
sapete aiutarmi?


funzione dlookup . Se cerchi ci sono moltissimi esempi all' interno del
gruppo di discussione.
saluti Gerard
--------------------------------
Inviato via 
http://usenet.libero.it


ho fatto come dici
=DLookUp("[pathtabelle]";"percorsodb")
quando però tento di assegnare un valore a quel campo mi dice che non è
possibile assegnare un valore.
mi sai aiutare?

 wrote in message
bhgkae$g6m$1...@lacerta.tiscalinet.it...

La funzione DLookup serve solo per leggere e trascrivere il valore di un
campo in un controllo.
Comunque non puoi digitare qualcosa in una casella di testo non associata
per la quale hai scritto qualcosa nella sua origine controllo.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: differenza tra ore e minuti

egregi sig.
come da oggetto ho una tabella con un campo ora di entrata e un'altro con
ora di uscita.
facendo una query con la differenza tra l'uscita e l'entrata mi da un
numero strano.
come posso risolvere il problema
grazie a tutti
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Usando le funzioni per il calcolo della differenza tra formati
Data....!
DateDiff è la funzione che ti serve, strutturala in modo da avere il
risultato nel
formato che ti serve, se ore o se minuti....!
Personalmente farei Minuti...!
@Alex

 @Alex
grazi x avermi risposto
ma la funzione datediff posso utilizzara direttamente in una query e in
che modo perchè seguendo le impostazioni della guida mi da errore
tempo:datediff("n",oraentrata,orauscita) anche togliendo gli apici
grazie


 grazie
Si puoi usarla anche nelle Queries, la sintassi subisce le
varianti(documentate) di tutte
le funzioni VBA...!
datediff('n';[oraentrata];[orauscita])
@Alex

 @Alex
grazie infinite efficenti come al solito


Newsgroup: it.comp.appl.access
Titolo: errore access 2000

copio ed incollo codice da un db access 2k ad un altro e patatrac!!!
tutte le macro ed il codice sembrano congelati
si riescono a leggere ma
1) non funzionano +
2) non permettono la modifica
3) bloccano l'inserimento di nuovo codice
avevo già incontrato il problema e risolto riscirvendo il tutto (poco a dir
la verità)
questa volta cercando di importare il codice dalla copia di backup mi si è
corrotta anche
quella!
si apre la maschera che dice che probabilemtne si è interrotto il
collegamento in rete.
Qualcuno mi aveva scritto che è un bug conosciuto, ma c'è una soluzione per
recuperare il mio lavoro(in cui il NG mi ha dato una grossa mano)?
è m...a schietta!
Aiuto !!
marco
Newsgroup: it.comp.appl.access
Titolo: Report da mandare via e-mail

Devo mandare via tramite email un report se lo salvo in formato
FormatoSnapshot(*.snp) il tuuto mi funzione ma chi riceve l'email deve avere
installato Snapshotview e io non voglio questo esiste la possibilità di
salvarlo in formato *.gif o *.jpg? Ho già provato nei formati rtf, html ma
il risulato visivo è un distatro, naturalmente invio il tutto tramite:
DoCmd.SendObject acReport, Me!ReportName, "RichTextFormat(*.rtf)",
"
enr...@sme.it
", , , Me!Oggetto & " N° " & ID_Inoltro, , False
Grazie per l'aiuto!!!!!!!!!!!!

 il risulato visivo è un distatro, naturalmente invio il tutto tramite:
Sei troppo pignolo: l'esportazione in formato .xls è un disastro, in RTF
vengono perse le fincature ma il testo è giustificato piuttosto bene.
Ciao, warp

 wrote in message
pGUc7.3118$2L.1...@news.infostrada.it...


 Grazie ancora.
In realtà stavo cercando anch'io un'installazione gratuita e completa del
driver .PDF.
Per ora mi sono procurato una versione freeware che funzia solo con NT/2000.
Tuttavia pare che installando Acrobat Reader 4.0, il suddetto driver venga
automaticamente configurato.
Non ho ancora verificato personalmente, ma l'ha detto in più circostanze
Antonio Biso ... io mi fiderei :-)
Ciao, warp
Newsgroup: it.comp.appl.access
Titolo: [OT] Virus e e-mail

Salve a tutti,
Come Federico Luciani qualche giorno fa, ho ricevuto un virus per posta.
Il Panda AV (ultimissima versione) non se accorto di niente (ho infatti
cestinato l'AV con tutto il panda) ma non sono stato cosi' sprovveduto da
aprire l'allegato.
Il NAV lo sega subito e quindi per ora uso quello.
Suggerisco a tutti di fare qualche scansione con un AV recente perche' il
NAV che avevo prima non vedeve un bel niente, c'e' voluto il NAV2000.
(per inciso la scansione mi e' durata 3h e 45', nessun virus tranne
l'allegato)
Chiusa la parentesi pubblicitaria, qualcuno di voi ha idea di come faccia a
viaggiare ed arrivare un messaggio che non riporta destinatario? Niente, ne
destinatario, ne mittente, ne altro, solo l'allegato.
Sib
--
------------------------------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access
------------------------------------------------------
La mia home (ancora non completa)
http://digilander.iol.it/syb
------------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente

 Il Panda AV (ultimissima versione) non se accorto di niente (ho infatti
cut
NON S'E' (non "non se")!!!
Sib

 l'allegato)
Scusa ho apena ricevuto una mail simile alla tua, per caso il file in
allegato si chiama NHJJCPNH.EXE (31532 bytes)   ?

Alessio (SV) <in...@TOGLIEREodontotecnico.it> wrote in message
92gf4k$gdi$1...@lacerta.tiscalinet.it...

No, ma penso che l'origine sia la stessa.
Sib

 wrote in message
uQI26.195119$hk4.7...@news.infostrada.it...

Anche a me è arrivata giorni fa una identica mail: nè destinatario, nè
mittente, nè oggetto, nè testo, solo un allegato .exe con nome che ora non
ricordo ma era una sequenza di lettere a casaccio.
Non ho neanche controllato se c'era un virus (scommettiamo?), l'ho subito
disintegrata da OE.
So che esistono programmi di "Fake Mail" o "Bomb Mail" x poter inviare mail
inserendo finti dati..... e penso che ci sia qualche str##zo che le stia
usando!
Lorenzo
Newsgroup: it.comp.appl.access
Titolo: Filtrare Maschera

Ciao a tutti
In una maschera Prodotti immetto tutti i codici e varie descrizioni,se un
prodotto esiste già ho fatto il mio bel Lookup ,avrei la necessità di andare
,una volta che Lookup mi dice che il prodotto esiste già ,nel record del
prodotto appunto già esitente come posso fare?
Grazie ragazzi

 wrote in message
8g4i3j$kqm$1...@fe1.cs.interbusiness.it...

Un modo per risolvere il tuo problema potrebbe essere questo:
1) Nella tua maschera Prodotti inserisci un controllo testo non associato ma
calcolato, che per comodità possiamo chiamare CodProd ; in questo controllo
metterai il codice del prodotto che stai analizzando se la Lookup dà esito
positivo ed il valore Null in caso contrario.
2) Sempre nella tua maschera Prodotti inserisci un controllo sottomaschera
che dovrà contenere tutte le informazioni del prodotto che stai analizzando;
chiamiamo per comodità questo controllo SottoMsk. Tra i controlli contenuti
nella sottomaschera fai in maniera che ci sia anche quello che contiene il
codice prodotto e per comodità chiamiamolo CodProd2.
3) Nella proprietà "Collega campi secondari" del controllo SottoMsk scrivi
CodProd2
4) Nella proprietà "Collega campi master" del controllo SottoMsk scrivi
CodProd
Così facendo dovresti vedere la sottomaschera contenere i dati del prodotto
che ha dato esito positivo con la Lookup, in caso contrario dovresti vedere
la sottomaschera vuota.
Un'altra possibilità per risolvere il tuo problema sarebbe quella di aprire
una seconda maschera al momento che la Lookup ti dà esito positivo
(conterrebbe gli stessi dati della sottomaschera di cui sopra) ; l'apertura
andrebbe fatta adoperando anche la clausola Where per abilitare il filtro: è
un pò più complicatello da spiegare e realizzare.
ciao Roberto
Newsgroup: it.comp.appl.access
Titolo: inserita la data e scelto il giorno la funzione deve restituirmi la data del primo giorno scelto

non trovo più il messaggio e quindi lo riposto
ho un campo data dove l'utente inserisce la data es: 12/02/2003
e una combo con i valori, lunedi martedi mercoledi, ecc.......
in base al giorno scelto nella combo devo avere la data del primo giorno
scelto dopo la data inserite nel nostro caso
12/02/2003 è mercoledi l'utente  sceglie mercoledi la funzione deve
resitituire 12/02/2003
l'utente  sceglie sabato la funzione deve resitituire 15/02/2003
mi sapete aiutare?
Grazie.

 ha scritto nel messaggio
news:b2dic5$gd8$1...@lacerta.tiscalinet.it...

Ed io ti rispondo come ho risposto ieri alle ore 10:50 al tuo precedente
messaggio:
Ti ricordo che in una maschera ci sono i controlli e non i campi, che invece
sono contenuti nelle tabelle e nelle queries.
Se il controllo in cui l'utente inserisce la sua data si chiama Data1 ed ha
un formato Data in cifre.
Se il controllo in cui vuoi visualizzare la data cercata si chiama Data2 ed
ha un formato Data in cifre.
Se la casella combinata non associata si chiama CercaGiorno.
Se la casella combinata ha due colonne di cui solo la seconda è visibile.
Se la casella combinata ha la proprietà Tipo origine riga impostata a Elenco
valori.
Se la casella combinata ha una origine riga contenente questi valori:
1;"Domenica";2;"Lunedì";3;"Martedì";4;"Mercoledì";5;"Giovedì";6;"Venerdì";7;
"Sabato"
A fronte dell'evento "Dopo aggiornamento" della casella combinata genera il
seguente codice VBA:
Private Sub CercaGiorno_AfterUpdate()
Dim Pippo As Date
For Pippo = Me!Data1 To Me!Data1 + 7
    If WeekDay(Pippo) = Val(Me!CercaGiorno) Then
        Me!Data2 = Pippo
    End If
Next Pippo
End Sub
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 > mi sapete aiutare?
Anch'io non trovo più il post di Simba883 per cui rispondo da qui
Potrebbe anche andare bene questa (con le stesse premesse di Roberto):
Private Sub CercaGiorno_AfterUpdate()
Dim Pippo As Date, Diff as Byte
Diff = Val(Me.Cercagiorno) - WeekDay(Data1)
If Diff<0 Then Diff=Diff+7
Data2=Data1+Diff
End Sub
Gio'