mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Differenza Tra date e calcolo giorni

Scusate se apro un nuovo post ma avrei bisogno di capire!!!!
allora il mio problema era quello di poter calcolare in automatico i giorni
di differenza tra due date!!!
Giustamente Alessandro mi ha consigliato
Ora sempre nel calcolo dei giorni mi servirebbe in automatico una cosa del
genere:
ho un campo giorni dove come origine di controllo ho impostasto la seguente
condizione :
=DateDiff("g";[DataPartenza];[DataArrvi])
questo giustamente mi da i giorni di differenza.
Vorrei che in autamatico mi dia ;se la differenza <10 nel campo venga
scritto 0 se invece per tutti i numeri >10 mi
 dia il valore esatto
cioč per esempio la differenza viene 12 il campo deve assumere valore 12, se
13 il valore 13
Mi aiutereste in questo e spero ultimo porblema!

 ha scritto nel messaggio
news:n%d6e.761795$b5.34...@news3.tin.it...

Ciao Fabrizio, prova cosi
=iif(DateDiff("g";[DataPartenza];[DataArrvi])<10;0;DateDiff("g";[DataPartenz
a];[DataArrvi]))
non l'ho provata, ma la soluzione  utilizzare la funzione iif, aiutati con
l'help.
Ciao.

Newsgroup: it.comp.appl.access
Titolo: oggetto outlook.application

ciao,
sapete se è possibile riferirsi ad un oggetto di tipo Outlook.Application
individuando (e quindi riuscndo a popolare) il campo "Da" di un task di
una mail?
in pratica riesco a riferirmi ai campi "A" (destinatario) e "CC" (copia
conoscenza), ma non saprei come gestire il campo "Da", disponendo di un
profilo su cui sono configurati più account di posta.
grazie per gli eventuali contributi
melo
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 -- 
Non ho esperienze i merito ma pensando (e notando) a come si comporta un programma del genere probabilmente dovrai cambiare il 
profilo predefinito prima di tentare di inviare la mail.
Comunque cerca nei messaggi predenti, non so' se trattavano il tuo problema specifico ma tentar non cuoce...
Ciao.
-- 
Sergio MAZZA

Newsgroup: it.comp.appl.access
Titolo: Bloccare la rotellina del mouse

Qualcuno di voi sa come bloccare la rotellina del mouse che fa scorrere in
modo malsano i record in Access 2000 (e sup.)?

 modo malsano i record in Access 2000 (e sup.)?
Non mi risulta affatto che in A2000 e sup si verifichi questo inconveniente,
tutt'altro, c'e' perfino uno specifico evento per la gestione personalizzata
dell'evento "rotellina".
Il problema che invece si manifestava su A97 trova soluzione sul sito
comune.
Sib

 gestione personalizzata dell'evento "rotellina".
L'evento Form_MouseWheel esiste solo in AX non in A00.
-- 
cu
Karl
*********
Access-FAQ (tedesco): 
http://www.donkarl.com

 L'evento Form_MouseWheel esiste solo in AX non in A00.
Non me ne ero accorto, anche perche', essendo A2000 il formato predefinito
di AXP, ho sempre usato il formato A2000 e l'evento ero convinto di averlo
visto, ma siccome non lo uso mai forse l'ho visto in un db in formato AXP
Comunque in A2000 la rotellina mi ha sempre fatto scorrere i record
correttamente uno alla volta.
Sib
Newsgroup: it.comp.appl.access
Titolo: Calcolo giorni con anno commerciale (360 giorni)

In un controllo di una maschera ho la necessità di calcolare la differenza
in giorni di altri due controlli che contengono delle date.
Ho provato utilizzando come origine controllo la formula
=Fix([data1]-[data2]) ma calcola i giorni sulla base del calendario di 365
giorni e siccome ho la necessità di calcolare i giorni sulla base di 360
giorni annui ho provato poi ad utilizzare la formula
=Giorno360([data1]-[data2]) ma si presenta il seguente errore: #nome?
Sapreste dirmi cosa sbaglio?
Grazie a tutti,
saluti da Sergio

 ha scritto nel messaggio
news:XZdK7.2383$zO1....@news2.tin.it...

Solo il fatto che la funzione Giorno360 è di Excel e non esiste in Access.
Prova ad includere nei riferimenti anche il riferimento alle librerie di
Excel x poterla usare.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com

 wrote in message
BJoK7.133928$sq5.6...@news.infostrada.it...


 in Access ?
Innanzi tutto, rispondi dopo il testo dei messaggi precedenti (quoting).
Grazie.
Apri un modulo, Strumenti/Riferimenti... Microsoft Excel X.x Object Library
(credo)


Newsgroup: it.comp.appl.access
Titolo: problema con faq n° 3.49 e TOTALI in Query

ciao a tutti.
Sono un novizio di access e infatti ho un problema con un report...
Ho scaricato la maschera contenuta nella faq 3.49 e l'ho implementata 
con successo nel mio db.
Il problema è nato quando ho voluto mettere i Totali (per raggruppamento 
e per somma) nelle query.
Nella visualizzazione è tutto corretto...i campi sono raggruppati tra 
loro e i numerici effettuano la somma, mentre nel report non funziona 
più il filtro, facendomi vedere tutti i record.
Mi potete aiutare?

 Mi potete aiutare?
Prima di pigiare il pulsante Stampa lo pigi il pulsante Cerca?
Se si quale č il codice che hai generato a fronte dell'evento "Su clic" del
pulsnte stampa?
-- 
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------

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

Buongiorno a tutti. sto cercando di fare una operazione di intersezione
di due tabelle utilizzando l'operatore INTERSECT ma il programma mi
dice che commetto un errore di sintassi es.
select cognome
from amici
intersect
select cognome
from clienti
è errato il modo di scrivere intersect? grazie

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

 č errato il modo di scrivere intersect? grazie
L'operatore INTERSECT non č messo a disposizione dal motore Jet di
Access.
Prova a fare cosě:
Se vuoi prendere gli amici che sono anche clienti e supponendo 
che non esistano amici o clienti con lo stesso cognome allora
l'intersezione tra i due insiemi (tabelle) lo puoi fare cosě:
select cognome
from amici
where EXISTS (SELECT * from clienti where clienti.cognome=amici.cognome)
Ciao ciao
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.appl.access
Titolo: critrio di selezione con date in una query

Salve a tutti!
In una query di selezione ho l’esigenza di estrarre gli ultimi record
indicando sulla colonna del campo DATA REGISTRAZIONE un criterio che
rappresenti la data di numero X  giorni precedente a quella corrente.
Grazie per l’aiuto.
Gianni
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:2f796065f8f66c86295...@mygate.mailgate.org...

Date()-X se vuoi ottenere una data anticipata di x giorni rispetto a quella
corrente.
Newsgroup: it.comp.appl.access
Titolo: Attivazione di Form in un altro DB

Ciao a tutti,
è possibile attivare una form/maschera contenuta in un database esterno?
Cioè ho il mio db1 e poi un db2 dove è contenuta la form da attivare ..
Grazie,
Roberto
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


          Ciao Roberto, come stai? peccato per lo smau.
In che senso attivare? cosa vuoi fare?
MAssimiliano
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 wrote in message
news:62Z94Z56Z253Y1...@usenet.libero.it

Ciao MA,
ho fatto un DB2 (usato in amministrazione)con  delle maschere che
servono per visualizzare delle
spedizioni di oggetti che vengono prodotti in officina.
Poi ho un altro DB1 (in officina) che da cui vorrei far visualizzare le
spedizioni senza importare le maschere da DB2 (in quanto ogni volta sono
costretto ad allineare i due DB) ma semplicemente richiamandole; però
non so se sia possibile ...
Allo SMAU sono andato anch'io allo stand della SAPpè  :-) 
Ciao,


 Roberto
Se sono entrambi MDB inserisci nelle referenze del DB1
il DB2, quindi avrai a disposizione gli Oggetti Public
come le Form.
@Alex


 @Alex
Ho fatto così: ho aggiunto i riferimenti al database esterno
dall'interno di un modulo:
Strumenti-> Riferimenti ->e poi pulsante SFOGLIA, 
ma vengono evidenziate tutte le routines dichiarate PUBLIC, mentre per
le
form non vedo nulla, probabilmente sbaglio qualcosa ...(può una form
essere un oggetto dichiarato Public?)
Ciao,
Roberto


 Roberto
La form credo che non venga esposta in quanto non
è una Classe visibile, ma si aggira l'ostacolo in modo
estremamente rapido:
crea una Function Public che passando il nome della 
Form la apre...!
L'alternativa meno immediata è quella di usare l'Automazione
aprire un'oggetto Database(sul DB2) quindi accedere al modello
oggetti di TuaApplication.DoCmd.OpenForm ......
In questo caso però apre anche una 2° istanza di Access
per cui via API devi gestirne la visibilità, trovi tutto
il codice quì: 
http://www.mvps.org/access/forms/frm0034.htm
Ottieni la stessa performances, poi fedi tu come preferisci.
@Alex



 


 >
YA ho parlato come Strurmntruppen(se si scrive cosě)...!
;-)


 @Alex
Beh allora ...Dankeshen !!!
Ho provato ad innescare la Form esterna con una Function Pubblica come
mi hai suggerito
e l'innesco funziona, mi dà solo un  errore sulla Exit Function (ora
sono a casa),
che vedrò domani di sbrogliare, altrimenti chiederò anKora il vostro
aiuto!!
Ciao,
Roberto


 Roberto
Solitamente è End Function, l'Exit è in caso di uscita
dirottata.
@Alex


 @Alex
Si ... mi ero sbagliato facendo copia e incolla ...
Il metodo è molto semplice...
Funziona !!
Grazie 1000!!
Ciao,
Roberto

Newsgroup: it.comp.appl.access
Titolo: evitare salto pagina in report a colonne

ho impostato un report in questo modo:
origine del report: tabella contenente una lista di articoli
contenuto del report:
una textbox con il nome articolo
un controllo immagine con la foto articolo
un controllo subreport con la lista degli ordini ricevuti per ogni
articolo
La larghezza dell'immagine e del subreport consentono di impostare un
report a colonne su un foglio A4 a layout verticale
(4 colonne).
Quando il subreport contiene un numero di righeOrdini più lunga dello
spazio disponibile in verticale nella pagina, la stampa dei rimanenti
ordini dell'articolo prosegue a pagina nuova invece di generare una
"colonna adiacente".
E' possibile evitare questo salto pagina?
Grazie per l'attenzione
Giorgio


dopo qualche mese mi rispondo
anche se la questione non sembra stimolante.
Però per me si trattava di comporre un report a colonne che,
a prima vista, fosse esplicativo nell' evidenziare la relazione
fra dati "di testata" (una lista di prodotti nel mio caso)
e dati di dettaglio (una lista degli ordini ricevuti per ogni prodotto,
ridotta in modo tale da occupare poco spazio 
per tenerla in colonne affiancate:
nel mio caso sono 4 colonne in un foglio A4 verticale),
Nella "testata" della colonna andava aggiunta una piccola foto del prodotto
e la sintesi delle quantità ordinate per variante.
 
Bene: usando un sottoreport per stampare le righe di dettaglio
(cliente, variante e qta ordinata) succede che quando le righe eccedono 
lo spazio verticale il ritorno "a nuova colonna" avviene a nuova pagina.
 
La soluzione è NON utilizzare subReport
e impostare la gerarchia di struttura dei dati 
propria dei report (raggruppamenti e ordinamenti) 
 
Ho trovato anche il posto adatto per foto e subtotali
(che prima mettevo nella IntestazioneReport del subReport):
ho impostato DUE sezioni di gruppo per il dato di testata
(il prodotto nel mio caso):
in una, quella superiore, ho inserito codice e descrizione 
e ho richiesto la ripetizione della sezione a nuova pagina
(=a nuova colonna),
nell'altra, inferiore, ho inserito foto e textbox con i subtotali per prodotto
e NON ho richiesto la ripetizione della sezione a nuova pagina.
 
Così se un prodotto necessita di più colonne per le sue righe ordini
nome e descrizione si trovano, ben allineate, in testa a tutte le colonne,
mentre foto e subtotali si trovano SOLO al di sotto del  nome della prima colonna.
 
Come volevo riuscire a fare subito ...
Newsgroup: it.comp.appl.access
Titolo: definire le dimensioni della finestra dell'applicazione

ciao a tutti,
avrei bisogno da qualcuno più esperto di me di un aiuto.
Ho creato un dbase contenente dati di clienti, e nelle opzioni
'Strumenti -Avvio' ho settato la maschera 'cerca-cliente' come quella
che si apre automaticamente all'avvio.
Funziona tutto bene, solo che vorrei fare in modo che la finestra
dell'applicazione (dove ho messo una menù bar personalizzata) avesse
le stesse dimensioni della maschera 'cerca-cliente' , all' apertura,
cioè non mi occupasse tutto lo schermo.
Purtroppo non sono in grado di costruire comandi in codice VB, e non
ho trovato niente nelle guida che mi fosse d'aiuto.
grazie !
paola

Usa una macro
Sposta e ridimensiona
Saluti
G.Franchi

Newsgroup: it.comp.appl.access
Titolo: Quando DataEntry=True...

Ciao a tutti, da una maschera mskA dove sono visualizzati dei record voglio,
con un pulsante, aprire la maschera mskB contenente dei dettagli sul record
visualizzato in mskA.
Le maschere sono associate a delle tabelle.
La relazione è di tipo 1:molti (da mskA a mskB).
Il problema che incontro è legato al fatto che mskB è per default con
impostazione DataEntry=True, poichè così mi serve; premendo il pulsantillo
da mskA si apre quindi mskB ma, anzichè visualizzarmi i dettagli del record
visualizzato in mskA, mi dà i campi vuoti.
Se, dopo il comando di apertura, imposto in mskA il codice
Forms!mskB.DataEntry=False mi viene visualizzato invece il primo record
della tabella legata a mskB (ovvero non funziona la condizione WHERE
impostata in mskA dal pulsante).
Avete idee per superare l'inghippo, a parte quella di impostare
mskB.DataEntry=False per default?

 ha scritto nel messaggio
news:aetlb.56435$vO5.2...@twister1.libero.it...

Posta il codice VBA con cui apri mskB.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:Okvlb.56804$vO5.2...@twister1.libero.it...

Docmd.openform "mskB",,,"[ID]=" & Me![NomeControllo]

 ha scritto nel messaggio
news:unwlb.58718$e6.20...@twister2.libero.it...

Prova così:
Docmd.openform "mskB",,,"[ID]=" & Me![NomeControllo], acFormEdit


 ha scritto nel messaggio
news:qBwlb.58761$e6.20...@twister2.libero.it...

Already tried... solo che non funge, anche se la guida indica che tale
appendice nel comando ha la priorità rispetto alle impostazioni della
maschera....

 ha scritto nel messaggio
news:mLwlb.58786$e6.20...@twister2.libero.it...

Non so cosa ipotizzare visto che a me non succede quello che succede a te.

Newsgroup: it.comp.appl.access
Titolo: Distribuzione applicativo

Salve a tutti,
Vi propongo un quesito:
Secondo Voi qual'č il miglior modo per distribuire a piů negozi un 
applicativo creato in Access (ad esempio Gestione Magazzino").
Caratteristiche essenziali:
Funzionamento dell'applicativo anche su pc su cui non č installato access
Evitare di far creare copie del prodotto
Evitare di far accedere l'utente alle tabelle o altro.
Grazie a tutti.
Giovanni Artiglio 

 Giovanni Artiglio
-- 
-- 
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access

 ha scritto nel messaggio 
news:fohqi7$9ce$1...@tdi.cu.mi.it...

Già basta questo



Scusa Massimiliano ma non riesco a capire cosa vuoi dire potresti essere un 
pò più chiaro.
Grazie

 Evitare di far accedere l'utente alle tabelle o altro.
Evitare d'usare Access   ;-)
Ciao!


Bene, desidero seguire il tuo consiglio ed evitare Access
Ovviamente do' per scontato che alla fine dovra' essere un sistema 
client/server, stampe programmabili anche dall'utente, db accessibile anche 
da applicazioni esterne via odbc, backup dati automatico ed 'a caldo', 
eventuale replica verso siti remoti, semplice ampliamento del sistema di 
base con ulteriori tabelle/query/schermate/stampe, vasta comunita'  di 
supporto per veloce soluzione dei problemi banali, ecc
Cosa posso usare per fare un 'gestione magazzino' ?
Ciao
RobertoA 

 Evitare di far accedere l'utente alle tabelle o altro.
Da interno o esterno?
INTERNO:
Il runtime basta...ma solo per user entry level
con odbc cmq volendo si puň...
ESTERNO:
puoi usare password di Back Office...


Newsgroup: it.comp.appl.access
Titolo: sitassi per il percorso

salve a tutti
vorrei aggiornare da evento dopo aggiornamento di una combo nella maschera1
controllo in sottomaschera di Maschera2
Grazie 

 controllo in sottomaschera di Maschera2
Forms!Maschera2.Form!Sottomaschera
Vedi anche:
 Riferimento ad una sottomaschera/sottoreport
 
http://www.donkarl.com/it?FAQ4.2
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 

 
http://www.donkarl.com/it?FAQ4.2
grazie Karl
ho trovato questo che mi funziona
    Forms!Maschera2!Sottomaschera2.Form!Controllo.Requery 

    Forms!Maschera2!Sottomaschera2.Form!Controllo.Requery
Molto meglio cos�.
� ora che arriva la temporale annunciata. ;-)


 ...la temporale annunciata.
riprovo:
_il_ temporale...  si sto annunciando con un forte vento 

 ha scritto nel messaggio 
news:9ck0qu...@mid.individual.net...

Forse volevi dire
che il forte vento precede l'arrivo del temporale.


Karl sara' austriaco ma in quanto a poesia non scherza"
"il_ temporale...  si *sta* annunciando con un forte vento"
-- 
ac (x=y-1)

 "il_ temporale...  si *sta* annunciando con un forte vento"
*§$%&*
Quindi l'obiettivo per i prossimi 20 anni resta di emettere
2 frasi consecutive senza sbaglio.
-- 
Ciao
Karl
*********
Access FAQ: 
www.donkarl.com/it
Newsgroup: it.comp.appl.access
Titolo: DAO: BeginTrans/CommitTrans/RollBack

Un saluto a tutto il ng. In una mia applicazione apro un recordset DAO,
avvio la fase di modifica con BeginTrans e infine decido, rispondendo ad una
MsgBox di richiesta conferma, se salvare le modifiche con CommitTrans oppure
annullarle con RollBack. Fin qui tutto bene; l'utente ha però anche la
possibilità di non apportare alcuna aggiunta o modifica: mi piacerebbe in
tal caso poter chiudere la maschera senza alcuna richiesta di conferma.
Quindi vi chiedo se è possibile stabilire se un recordset non ha subito
modifiche dal momento della sua apertura, nel qual caso si potrebbe lanciare
automaticamente il CommitTrans senza passare attraverso la MsgBox. Mi scuso
se la mia richiesta è banale, ma sono davvero alle primissime armi con
questi strumenti. Uso Access XP e le librerie DAO 3.6 . Grazie per
l'attenzione.
Ciao
Galliano



Mi scuso per l'involontario doppio invio.
Galliano


Esiste la proprietą OldValue (v. help online). Confronta i valori dei campi
con la proprietą OldValue, se il valore č uguale => Exit Sub, altrimenti
MsgBox.
Spero ti sia d'aiuto.
--------------------------------
Inviato via 
http://usenet.libero.it

 wrote in message
news:Ww3ea.29373$
Lr4.9...@twister2.libero.it

Credo ti convenga attivare un Flag sul Change delle TxtBox, nel caso
siano legate ai campi del RS, visto che in qualche modo sei tu
a controllarne gli effetti.....!
In ogni caso forse potrebbe tornarti utile la Proprietà RecordStatus
di Recordset, nell'Help c'è un Esempio che si avvicina alle tue
esigenze.
@Alex.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 esigenze.
Grazie mille ad entrambi per i vostri consigli che cercherņ di mettere a
frutto; per Alex: RecordStatus si applica purtroppo solo alle connessioni
ODBC, mentre io lavoro con jet. Ciao e buon lavoro.
Galliano

Newsgroup: it.comp.appl.access
Titolo: relazioni multiple tra tabelle

Salve ragazzi, ho un problema credo semplice (x voi)
allora ho tre trabelle:
Prodotti
      idprodotto
      nome
      scelta (valore vero-falso)
Mag1
      idmag1
      idprodotto
      campo1
Mag2
      idmag2
      idprodotto
      campo2
adesso le tabelle sono collegate 1 a molti tramite il capo idprodotto!
voglio realizzare una maschera che in base al valore di scelta mi
visualizzi la sotto maschera con MAG1 o MAG2
come posso fare?
grazie 1000 mario

 ha scritto nel messaggio 
news:1185805697.0...@q75g2000hsh.googlegroups.com...

Cambi l'origine dati della sottomaschera utilizzando la proprietą 
SourceObject (vedi help VBA)...
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: gestione lettere e fax

Salve a tutti, vorrei un aiuto su come organizzare la gestione di lettere e
fax nel mio pc l'archio funziona bene, il mio problema è la stampa:. Vorrei
formattare la pagina della lettera o del fax, access purtroppo, da come lo
conosco io non mi aiuta, e vorrei evitare dei collegamenti con word. Come
posso fare?
Vi ringrazio dell'aiuto.

 ha scritto nel messaggio
news:uTS8c.10747$jY1....@tornado.fastwebnet.it...

I fax sono quelli ricevuti o quelli spediti?
Come e dove sono memorizzati?
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:IhT8c.90531$Kc3.2...@twister2.libero.it...


 formattazione tipo allineamento a destra e a
sinistra ecc...
Spedisci e formatta dopo il quoting.
E poi chi te l'ha detto che non si può?
MAssimiliano

 formattazione tipo allineamento a destra e a sinistra ecc...
[CUT]
Quando rispondi scrivi DOPO e non prima del testo dei messaggi precedenti.
Si, ma come e dove sono memorizzati?


 Scusa; come dicevo, le lettere e i fax sono creati tramite access e poi


 formattazione tipo allineamento a destra e a sinistra ecc...
Non hai risposto alla mia domanda.
se comunque sono memorizzati in un campo di tipo testo o in un campo di tipo
memo di una tabella, puoi vederli formattati visualizzandoli con un
controllo ActiveX Microsoft RichText.
In alternativa vai a questo link:
http://www.lebans.com/richtext.htm

Newsgroup: it.comp.appl.access
Titolo: Colori di ACCESS (2)

Scusate se ripropongo la mia domanda (so già che qualcuno mi infamerà...):
Si possono cambiare i colori delle BARRE DI SCORRIMENTO, delle freccettine
delle CASELLE COMBINATE dei SELETTORE DEI RECORD e così via tramite codice
???
Qualcuno mi ha suggerito di usare le API ...mi vorrebbe qualche dettaglio
più preciso.
Grazie ancora per gli eventuali suggerimenti.
Raffaele Alberoni

 più preciso.
Certo, da Pannello di controllo / Schermo / Aspetto, l'UTENTE (!!!!!) può
impostare le cose come più gli piace. E GUAI ai programmatori che me li
cambiano!!!!!!


wrote:

e quindi come colori devi usare questa tabella di riferimento
Elemento dello schermo
sul mio programma uso per
Valore
Barra di scorrimento					-
2147483648
Desktop							-
2147483647
 
Barra del titolo della finestra attiva			-
2147483646
Barra del titolo della finestra inattiva		-
2147483645
Barra dei menu						-
2147483644
Finestra						-
2147483643
sfondo campi immissione
Cornice della finestra					-
2147483642
Testo del menu						-
2147483641
Testo della finestra					-
2147483640
testo titoli - testo campi
Testo della barra del titolo				-
2147483639
Bordo della finestra attiva				-
2147483638
colore bordo campi - colore bordo titoli
Bordo della finestra inattiva				-
2147483637
Sfondo dell'applicazione				-
2147483636
sfondo programma - sfondo titoli
Evidenziazione						-
2147483635
 
Testo evidenziato					-
2147483634
Superficie 3D						-
2147483633
Ombreggiatura 3D					-
2147483632
Testi inattivo						-
2147483631
Testo del pulsante					-
2147483630
testo pulsanti
Testo della barra del titolo della finestra inattiva	-
2147483629
Evidenziazione 3D					-
2147483628
Ombreggiatura scura 3D					-
2147483627
Luminosità 3D						-
2147483626
Testo della Descrizione comando				-
2147483625
Sfondo della Descrizione comando	
Saluti.
Emanuele.

Newsgroup: it.comp.appl.access
Titolo: tipo non corrispondente nell'espressione

Ho un messaggio di errore per la quale non riesco a trovare una
soluzione:
"tipo non corrispondente nell'espressione"
Questo mi appare quando cerco di aprire una maschera che fino a stamane
funzionava benissimo... e non mi ricordo di aver fatto modifiche
Cosa posso/devo fare ?
Grazie in anticipo per i vostri suggerimenti e l'aiuto

 Grazie in anticipo per i vostri suggerimenti e l'aiuto
Prego
-- 
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Copia di tabelle, indici, relazioni, dati da un db esistente ad uno nuovo

Ciao a tutti,
Ho realizzato un routine che copia tabelle, indici, dati, relazioni da
un database (un BE) esistente ad uno nuovo di zecca (creato con la
stessa routine).
A prima vista, sembrerebbe funzionare tutto alla perfezione (tutte le
tabelle, indici, dati, relazioni vengono copiati) ed il neonato
database non sembrerebbe affatto corrotto. Ma, quando ci vado a
lavorare con il Frontend, ecco che arrivano dei problemi.
Ad esempio, in talune maschere, il cursore talvolta si blocca in un
campo e non passa a quello successivo. Lo stano poi è che il problema
non si verifica sempre.
Che dite, perchè questo "strano" comportamento?

Mi sono accordo adesso che in una tabella dove la chiave primaria è un
campo contatore ad incremento, quando vado ad inserire un nuovo record,
questo propone un numero già esistente.
Lostrano è che formalmente il campo risulta definito correttamente, ed
altri campi contatori presenti in altre tabelle funzionano normalmente

Newsgroup: it.comp.appl.access
Titolo: blocco invio email

sto tentando di usare una macro per inviare da una maschera di access una 
mail, uso  l'azione "inviaoggetto" che ho già usato su altri db e funziona.
ora su un pc non riesco ad inviare la mail. access mi dice "operazione non 
riuscita" impossibile inviare il messaggio.
se non ricordo male da qualche parte bisogna configurare outlook 2003 e 
dirgli di consentire l'invio della posta da altri programmi, ma non mi 
ricordo più dove si imposta questa cosa, mi aiutate?
grazie

Forse ti riferisci a questo ma non mi sembra la stessa cosa
http://support.microsoft.com/kb/263084/it
Ciao
Alex

 ha scritto nel messaggio 
news:49a6af76$1...@extreme.x-privat.org...

Express ClickYes fa al caso tuo
Daniele
Newsgroup: it.comp.appl.access
Titolo: Conversione Ore > 24  in Secondi

Ho trovato questa bella funzioncina che converte le ore in secondi .
Non mi funziona però su ore maggiori di 24, mi restituisce 0. Non
riesco a trovare una soluzione, potreste aiutarmi?
Public Function ConvInSec(Ore) As Long
    ConvInSec = (Hour(Ore) * 60 * 60) + (Minute(Ore) * 60)
End Function
Grazie
Paolo

 ha scritto nel messaggio news:1181953151.8...@m36g2000hse.googlegroups.com...


Grazie
Paolo
[risposta]
www.sitocomune.com
Sezione General
6.130 Visualizzare un campo o variabile di tipo Data/ora con valore maggiore di 24 ore nel formato HHH:mm
Sezione Modules
5.11 Calcolare le ore totali di un certo periodo partendo dal semplice totale dei secondi.
Ciao.
-- 
Sergio MAZZA 

 ha scritto nel messaggio 
news:1181953151.8...@m36g2000hse.googlegroups.com...


Grazie
Paolo
Hour si aspetta un valore data/time così come minute..
A te non serve tutto ciò visto che gli passi un intero...almeno così mi 
sembra visto che vuoi convertire solo le ore in secondi.
Questo dovrebbe bastare:
Public Function ConvInSec(Ore) As Long
'per esempio ConvInSec(1234)
    ConvInSec = (Ore * 60) * 60
End Function
Ciao, Carlo

 ha scritto nel messaggionews:1181953151.8...@m36g2000hse.googlegroups.com...

Non gli passo un intero Carlo, gli passo TotaleOre in formato ore:min
e con la funzione da me indicata in Secondi esce:
TotaleOre          Secondi
16.30                59400     Ok
21.00                75600     Ok
54.00                       0     KO
Non riesco a fargli ricalcolare i secondi per ore sopra le 24... Avevo
anche già guardato gli esempi del SC, consigliati da Sergio, ma non
riesco ad agganciarli a quello che mi serve. Forse mi sfugge
qualcosa...!
Grazie
Paolo

 ha scritto nel messaggio 
news:1181994248.3...@k79g2000hse.googlegroups.com...




Grazie
Paolo
----------------------------
Prendi la parte intera (54) e usa le modifiche che ti ho suggerito...
Ciao, Carlo

 ha scritto nel messaggio 
news:1181994248.3...@k79g2000hse.googlegroups.com...




quindi  gli passi una stringa
Fai così
----
Public Function ConvInSec(Ore As String) As Long
    Dim Dt As Date
    Dt = DateAdd("h", Val(Left(Ore, 2)), 0)
    Dt = DateAdd("n", Val(Right(Ore, 2)), Dt)
    ConvInSec = DateDiff("s", 0, Dt)
End Function
----
Ciao
-- 
Giorgio Rancati
[Office Access MVP] 

 ha scritto nel messaggionews:1181994248.3...@k79g2000hse.googlegroups.com...

Perfetto Giorgio...
Grazie davvero a tutti...!
Paolo
Newsgroup: it.comp.appl.access
Titolo: Spaziare testi e cifre in un report...

...ma anche a video se necessario.
Sto compilando i bollettini postali (PVR, Svizzera) dove l'importo e la 
descrizione vanno incasellati negli spazi a loro assegnati.
Utilizzo il font suggerito (OCR-B), corpo 12.
Partendo da due campi che contengono AFFITTO e 123456.78
devo ottenere in stampa:
A F F I T T O 
e 
1 2 3 4 5 6 . 7 8 (possibilmente senza il punto decimale)
Sto litigando con i formati, tipo "# # # # . # #" e "@ @ @ @ @ @ @ @" ma i 
risultati sono deludenti...
Suggerimenti?
grazie e ciao
-- 
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\

 ha scritto nel messaggio 
news:Xns99DA90B10C735am...@194.177.97.96...

Per ora mi viene in mente un ciclo per tutta la lunghezza della stringa:
'---
Dim a As Integer, strTmp As String
For a = 1 To Len("Affitto")
    strTmp = strTmp & Mid("Affitto", a, 1) & " "
Next
Debug.Print Trim(strTmp)
'---
Ciao.
-- 
Sergio MAZZA 

 ha scritto nel messaggio 
news:Xns99DA90B10C735am...@194.177.97.96...

Si potrebbe usare il carattere Courier (non il Courier New) o il Courier 
monospaced o qualsiasi altro carattere monospazio.
Io preferisco farmi tante piccole caselle di testo quanti sono i caratteri e 
li dispongo secondo le mie necessità.
Per ognuno assegno da codice la lettera corrispondente, lasciano, 
ovviamente, invisibile il controllo da cui prelevo la stringa.
Per usare il tuo esempio:
Me.CT1 = Mid("TuoTesto",1,1)
Me.CT2 = Mid("TuoTesto",2,1)
Me.CT3 = Mid("TuoTesto",3,1)
....
Per il punto usi la stessa tecnica "saltando nel mid la lettera (punto)...
Me.CT6 = Mid("TuoTesto",6,1)
Me.CT7 = Mid("TuoTesto",8,1)
...alla posizione 7 c'era il punto.
Un po' di lavoro in più ma il risultato è sempre perfetto.
Ciao, Carlo

 
per il numero ho risolto con il formato # # # # # # 0 , 0 0 (cosě, 
senza virgolette)
per il testo ho memorizzato i tre 'valori' con gli spazi inclusi e per 
il momento ho tappato il buco :P
-- 
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
http://boinc.mundayweb.com/one/stats.php?userID=2762

Newsgroup: it.comp.appl.access
Titolo: crea relazione con cascade via SQL o VBA

Ciao a tutti
ho la necessità di creare con una query o via routine VBA (l'importante
è che il tutto sia automatizzato) una relazione tra due tabelle con
opzione on delete cascade.
Il codice: 
ALTER TABLE Tbl_2 ADD CONSTRAINT Relation1 FOREIGN KEY ([cliente])
REFERENCES Tbl_1 ([ID]) [ON DELETE CASCADE]
funziona con la creazione della join tra tabelle ma l'ON DELETE CASCADE
non viene creato.
uso Access 2003
grazie a tutti
-- 


Non scrivi dove o come prova di eseguirlo.
ON DELETE CASCADE
(senza parentesi quadre) funziona solo con OLEDB/ADO.
Vuol dire che puoi p.e. eseguirlo nel codice con:
CurrentProject.Connection.Execute "ALTER TABLE..."
Un esempio con DAO trovi qui:
http://groups.google.com/group/it.comp.appl.access/msg/da0eb132750ba2a5
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
Newsgroup: it.comp.appl.access
Titolo: dubbio su treeview

H provato ad usare il database treeview su sitocomune, ma non accetta 
rami con lo stesso nome. A quanto ho capito è un problema nella 
costruzione della struttura .  Come si può risolvere.
Lo avevo già modificato e utilizzato per il mio progetto e poi mi sono 
reso conto del prob, quindi ci sono rimasto male...
Ciao


i "rami" hanno un nome(titolo) ed una chiave. La chiave di per se
deve essere univoca, il titolo puo' essere duplicato.
La duplicazione, cmq, ha senso solo se sta su livelli differenti.
Io ho titoli duplicati e quando l'ho costruito mi era sembrata logica
questa struttura, anzi ho subito cercato di capire dov'era la chiave
e come gestirla. 
Purtroppo il mio treeview non deriva da quello del sitocomune e
quindi al momento non saprei cosa dirti per modificarlo.
--
a.cara 
Togli qualcosa dall'email

Newsgroup: it.comp.appl.access
Titolo: c'e' un modo...

... per calcolare il totale dei campi si/no cliccati in un singolo
record? (servirebbe per calcolare le presenze di uno studente, ad
esempio)
Grazie e cordiali saluti
Arturo

 ha scritto nel messaggio
news:3aadf913...@news.dsi.unimi.it...

io ho notato questo...
Ogni campo si/no ha valore numerico 0 = vero e -1 =falso
quindi dovrebbe bastare
totale = campo1+campo2+campo3 ....
se il valore deve essere positivo mi pare che il comando per il valore
assoluto sia "abs"
e quindi totale=abs(campo1+campo2+campo3 .... )

 esempio)
Cioč ogni record ha n campi di tipo sě/no?
Fai un ciclo sull'insieme fields del recordset associato e conti quanti
stanno a sě
Antonio


wrote:

Grazie infinite a tutti per i suggerimenti. Provero' a fare cosi'.
Purtroppo non conosco il sistema migliore per farlo, ma vedro' di
arrivarci...
Arturo

Newsgroup: it.comp.appl.access
Titolo: Trovare valore Max

Salve,
ho una query che trova il valore massimo di un campo tra tutti i record, del 
tipo:
SELECT MAX([nome_tabella].[nome_campo]) AS Espr1 FROM [nome_tabella];
Il problema è che ora ho aggiunto un'altra tabella che contiene un campo 
analogo al primo (ha anche lo stesso nome), e ora la ricerca del valore 
massimo deve essere fatta considerando i record di tutte e due le tabelle.
Avete qualche dritta da darmi?
Grazie.
Saluti,
Giuliano

 Avete qualche dritta da darmi?
puoi creare una query unione e poi sulla base di quella trovi il valore 
massimo.
1° query
SELECT nome_campo as id FROM tbl1
UNION SELECT nome_campo as id FROM tbl2;
2° query
select max(id) from query1
oppure da vba
-------------------------------------------
varmax1=dmax("nome_campo","tb1")
varmax2=dmax("nome_campo","tb2")
if varmax1>varmax2 then
maxval=varmax1
else
maxval=varmax2
end if

"Silver" <cra...@TOGLIMIhotmail.com> ha scritto nel messaggio 
news:01I7i.1316$BU3...@tornado.fastwebnet.it...

Grazie Silver,
sei stato molto esauriente!
Ciao
Newsgroup: it.comp.appl.access
Titolo: Progetto ADP (DK)

Salve a tutti.
Ho un problema con un progetto di Access 2000: sulla mia macchina
funziona tutto correttamente.
Se provo ad installare l'applicativo su un client che ha Office2000,
mi genera il seguente errore:
"Errore di run-time 2757: errore durante l'accesso ad una proprietà o
ad un metodo dell'oggetto OLE"
Ho provato ad aggiornare i service pack di office (sp3) e tutti gli
aggiornamento di Windows2000, ma niente da fare.
La cosa strana è che sul mio pc va... questo adp è collegato ad un db
su SqlServer e tutti gli utenti hanno permessi di lettura/scrittura...
Alcuni report invece funzionano e altri no... 
Suggerimenti?
Grazie in anticipo.
Luigi.

 ha scritto nel messaggio 
news:2a3eb988.05012...@posting.google.com...

In linea di massima devi controllare che in quei report non ci siano dei
controlli ocx o altri oggetti OLE.
In alternativa apri un modulo e dal menù strumenti scegli riferimenti:
controlla se il riferimento OLE Automation è spuntato; se lo è togli la
spunta. Compila il db e provalo sul client.
Allo stesso modo controlla se tutti i riferimenti (librerie o ocx) sono
anche presenti nel computer client.
Ciao, Carlo
igio80 ha poi così risposto (in privato...):
"Nel frattempo ho scoperto che sul mio pc ho la MS access Object Library 
11.0 mentre sul client è la 9.0... come posso aggiornarla? Copiando 
brutalmente il mio file MSACC.OLB sul client?
Grazie."
No, non così.
La strada più corretta prevede di creare un runtime del tuo applicativo e 
poi lo distribuisci. In alternativa il client può installare OfficePro o 
Access 2003.
Altra possibilità, se hai Access 2000, è quella di convertire il file 2003 
prima in 2002 e poi in 2000; quindi apri Access 2000 e crei il tuo mde.
Ciao, Carlo

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

Premesso che funziona tutto quanto, ma dopo il clic su bottone che lancia
una maschera che mi fa elenco record con possibilita' di scelta per
visualizzazione...mi appade un messaggio " IMPOSTAZIONE NON VALIDA PER
QUESTA PROPRIETA'"
grazie.


--------------------------------
Inviato via 
http://usenet.libero.it
Newsgroup: it.comp.appl.access
Titolo: sopstare il cursore dal record vuoto

ciao a tutti
 
ho maschera con sottomaschera.
Nella maschera ho un pulsante per aprire un report,
ma se il cursore si trova nell'ultimo record vuoto
della sottomaschera il report non si apre.
 
Come faccio a spostare il cursore
se questo si trova sull'ultimorecord vuoto
della sottomaschera
p.e. sul primo record della stessa o altro
purch� non vuoto?
Grazie 
 
 

 ha scritto nel messaggio 
news:514ec46d$0$37124$4faf...@reader1.news.tin.it...

ho provato in questi due modi, ma nulla
 
Me![Dettagli].Setfocus
DoCmd.GoToRecord acDataForm, "Dettagli", acFirst
 
Me![Dettagli].SetFocus
Me![Dettagli].Form.RecordsetClone.MoveFirst
Me![Dettagli].Form.Bookmark = Me![Dettagli].Form.RecordsetClone.Bookmark
 
 
 


Non si apre perchè non può, ovviamente.....il record non esiste....cosa devi fare di preciso? Aprire il report sul record corrente immagino. Bene, allora alla pressione del tasto controlli se il record corrente è valido. Se no, non apri.

 Me![Dettagli].Form.Bookmark = Me![Dettagli].Form.RecordsetClone.Bookmark
 
Non si apre perch� non pu�, ovviamente.....il record non esiste....cosa devi 
fare di preciso? Aprire il report sul record corrente immagino. Bene, allora 
alla pressione del tasto controlli se il record corrente � valido. Se no, 
non apri.
 
Ciao Fair87
 
in effetti � proprio questo l'errore.
grazie
Newsgroup: it.comp.appl.access
Titolo: Finestra selezione FILE

Qualcuno sa' dirmi come si fa' a richiamare la maschera di apri file.
Attendo fiducioso.
Alla prossima
Ricky

Attendo fiducioso.
Con una API che trovi sul sito comune.
Saluti.
Luciano

Newsgroup: it.comp.appl.access
Titolo: Realizzare un report a tabella

Salve a tutti, volevo un consiglio su come realizzare il seguente report.
Ho un database in cui inserisco dei film che partecipano a festival.
Tra i campi di una tabella ho i seguenti: lunghezza del film, la sala di
proiezione e la data di proiezione.
Vorrei che in un report mi apparisse una tabella in cui ogni riga è una
delle date del festival a cui sono iscritti i film e le colonne sono i
diversi giorni.
All'incrocio di righe e colonne vorrei trovare la durata dei film di quel
giorno (cioè la somma dei tempi di tutti i film che sono stati proiettati
per esempio nella sala A il 15 Giugno)
LA mia difficoltà è data dal fatto che per ogni festival il numero dei
giorni e i nomi delle sale sono differenti e quindi la tabella è molto
"dinamica".
Qualche idea su come realizzare ciò? Come posso creare una query a cui
appoggiarmi e soprattutto come posso far diventare la query un report a
tabella?
Spero di essermi spiegato abbastanza chiaramente!.
Paolo

 ha scritto nel messaggio 
news:1Oqvg.46003$zy5.9...@twister1.libero.it...

Ti ho risposto nell'altro NG.
-- 
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Errore runtime 3070

In relazione al seguente codice
Dim RS as dao.recordset
Set RS=Me.recordsetclone
RS.Findfirst "[Cognome]='"& me.txtNome &"'"
If RS.nomatch then
msgbox "non trovato"
else
Me.bookmark=rs.bookmark
endif
immesso nell'evento Enter del controllo txtNome, ottengo il seguente
errore di runtime:
Errore runtime '3070'
Il modulo di Gestione di Database Microsoft Jet non riconosce 'Falso' come
nome di campo o espressione valida.
La riga incriminata è rs.Findfirst "[Nome]"="&me.txtNome&"
Due considerazioni: 
1. il codice che mi è stato gentilmente passato aveva alla riga
incriminata ='"&me.cogn&"" ma le due virgolette VB me le considera errore.
2. txtNome è un campo in una maschera principale che, in base al nome
digitato, deve farmi apparire i dati della persona nei controlli contenuti
in una sottomaschera a sua volta contenuta in un controllo a schede.
In sintesi:
MascheraPrincipale ---->txtNome
|
Controllo a schede
|
sottomaschera1----->txtSubNome
Se io immetto il nome 'Antonio' in txtNome e premo invio, deve apparirmi
Anotnio in txtSubNome e in tutti gli altri controlli della sottomaschera
devono apparirmi i suoi dati: Cognome, Data di nascita ecc..eccc......
Vi chiedo veramente scusa se posto per ogni cosa me questa notte sono
stato sveglio fino all'una per questo db, ed inoltre sto finendo
un'antologia di racconti e sto anche
studiando....AIUTOOOOOOOOOOOOOOOOOOOOOOO!
Un abbraccio!!!!!
-- 
FIRMA BAU BAU MICIO MICIO - Un tale disse a un tale 'Tu sei tale e quale a
un tale'. Il tale chiese al tale 'Tale e quale a quale tale?'. Non sapendo
a quale tale fosse tale e quale il tale, il tale se ne andò. Convinto che
quel tale a qualche tale fosse proprio tale e quale.
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Errore runtime '3070'
Metti il codice in AfterUpdate di [txtNome].
Che senso ha metterlo in OnEnter?
Tutte le volte che lo selezioni per scrivervi
qualcosa ti dà errore.
Bruno 

Giulio, hai fatto caso che nella riga
rs.Findfirst "[Nome]"="&me.txtNome&"
ci dovrebbero essere degli apicetti ( ' )? Al posto di questi
cancelletti
rs.findfirst "[Nome]=#" & me.txtNome & "#"
Altrimenti non qualifichi come testo la stringa da cercare e succede un
casino...
Inotlre, come ti spiego nell'altro post, e come dice l'amico Bruno,
questa roba nell'evento Enter non serve a uno zuffolo. 
cia'
Max


Uguale Apice Doppioapice Ecommerciale Tuotext Ecommerciale DoppioApice Apice
DoppioApice
-- 
_ _
Ciao
MAssimiliano Amendola
Cisa1 - I° Conferenza Italiana per Sviluppatori Access Arezzo 4+5
Giugno 2005 Sono aperte le iscrizioni  Info:  
www.donkarl.com/it
Newsgroup: it.comp.appl.access
Titolo: Tempo trascorso tra due orari lavorativi

Ciao a tutti.
Devo calcolare il tempo (giorni - ore - minuti)
trascorso tra due date lavorative, 
tenendo conto che sabato e domenica 
e le feste non si lavora, e che l'orario parte dalle 
9 alle 12 e dalle 13 alle 18.
es.:
data1: venerdi ore 17,30
data 2: lunedi ore 9,30
tempo trascorso: 1 ora
Sul sito comune c'e' un'interessante routine
di Paolo Bizzaro che pero' conta solo
i giorni.
Qualcuno ha gia' affrontato il tema ?
Grazie. 
Ciao. ElioP.

 ha scritto nel messaggio
news:3af4f261...@news.libero.it...

Leggiti la Funzione DateDiff č un buon punto di partenza.
Ciao, Carlo
Newsgroup: it.comp.appl.access
Titolo: Codice di verifica di maschera aperta

Ho Inserito in un modulo la seguente function:
Public Function Aperta(ByVal strNomeMaschera As String) As Boolean
' Restituisce True se la maschera è già stata caricata.
    Const conVisualizzazioneStruttura = 0
    Const conStatoOggettoChiuso = 0
    Aperta = False
    If SysCmd(acSysCmdGetObjectState, acForm, strNomeMaschera) <>
conStatoOggettoChiuso Then
        If Forms(strNomeMaschera).CurrentView <> conVisualizzazioneStruttura
Then
            Aperta = True
        End If
    End If
End Function
Poi in una sottomaschera questo codice:
Private Sub Form_Current()
If Aperta("SM_2_LOCATION_CDC") Then
Forms!SM_2_LOCAZION_CDC.Filter = "COD_LOC= " & "'" &
Forms!ms_fabbricati!S_MS_Locazione![COD_LOC] & "'"
End If
End Sub
Ora la domanda è questa: Perchè la maschera popup SM_2_LOCATION_CDC non si
aggiorna.
Premetto che se mi accerto di aver aperto la maschera "SM_2_LOCATION_CDC" e
scrivo semplicemente nella private sub:
Forms!SM_2_LOCAZION_CDC.Filter = "COD_LOC= " & "'" &
Forms!ms_fabbricati!S_MS_Locazione![COD_LOC] & "'"
tutto funziona perfettamente. Presumo pertanto che l'errore sia nella
funzione "Aperta" ma non riesco a capire dove é l'errore.
Marco

 ha scritto nel messaggio
news:8Nbc8.17377$eD3.6...@twister1.libero.it...

Scusate il disturbo ma l'errore era nella vista....
In questa stringa c'è un errore di scrittura:
no
If Aperta("SM_2_LOCATION_CDC") Then
ma
If Aperta("SM_2_LOCAZION_CDC") Then
Ciao a tutti
Marco

Newsgroup: it.comp.appl.access
Titolo: Riferimento Form Parent

Utilizzando una funzione prelevata dal Sito Comune
per abilitare o disabilitare controlli di una Form
come poter utilizzare tale funzione per abilitare o disabilitare
controlli di una Sub Form da una Form Principale?
Grazie
Rino Ferrari
Posto il modulo utilizzato:
Public Function ControlSource(Bl As Boolean)
'Routine che ASSOCIA/DISASSOCIA i controlli nella Form.Parent
'Che hanno la proprietą TAG settata
  On Error Resume Next
   Dim ctl As Control
   Select Case Bl
      Case Associa
         For Each ctl In Form.Controls
            If Len(ctl.Tag) > 0 Then
               Select Case ctl.ControlType
                  Case acTextBox, acComboBox, acListBox
                     ctl.BackColor = -
2147483633
 'Colore Grigio
               End Select
               ctl.Enabled = False
               ctl.Locked = True
            End If
         Next
      Case Disassocia
         For Each ctl In Form.Controls
            If Len(ctl.Tag) > 0 Then
               Select Case ctl.ControlType
                  Case acTextBox, acComboBox, acListBox
                     ctl.BackColor = 13434879 'Colore Giallo
               End Select
               ctl.Enabled = True
               ctl.Locked = False
            End If
         Next
   End Select
End Function 

 'Che hanno la proprietà TAG settata

(a braccio)
For Each ctl In Me!nomeSubForm.Form.Controls
Ciao.
-- 
Sergio MAZZA 

 Sergio MAZZA
Thank you many
Rino Ferrari
Newsgroup: it.comp.appl.access
Titolo: VBA: come si dice "tutti" nel codice?

Ciao a tutti,
volevo sapere quale sintassi devo usare, in una istrizione SQL nel codice,
per dire tutti...
select .....  where otclie = stringa
stringa puo' assumere diversi valori... però vorrei anche che potesse
assumere lo stato "TUTTI"
GRAZIE

 ha scritto nel messaggio
news:TPzA6.11149$r67.2...@news2.tin.it...

Guarda sul Sito Comune, se ricordo bene c'è qualcosa di molto simile.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com

 select .....  where otclie = stringa
"....where otclie =  '*'"
Saluti.
Luciano
(DOC)

 wrote in message
r3BA6.139998$lj4.4...@news6.giganews.com...

Grazie 1000 X il suggerimento...
CIAO CIAO
DAMIANO



 Scusami ma ste stringhe SQL mi stanno facendo impazzire....
dovrei testare il valore di un controllo posto in una maschera (tipo_cli)
... può anche assumere il valore "*" ed in tal caso la striga SQL dovrebbe
estrarmi tutti i record...
cosa sbaglio in questa sintassi?
where otclie like Me!tipo_cli
 GRAZIE
DAMIANO

where otclie like Me!tipo_cli
Scusa, ma all'SQL chi glie lo dice che cos'e' Me?
Devi passargli tutta la pappardella della maschera: Forms!nomeform!tipo_cli.
Se non sei sicuro della sintassi, fallo col query builder poi copi e incolli
dove vuoi.
Saluti.
Luciano
(DOC)

 ha scritto nel messaggio
news:TPzA6.11149$r67.2...@news2.tin.it...

Invece di = usa like
"otclie like stringa"
Quando stringa="*" te li prende tutti.
Sul sito comune trovi esempi interessanti in questo senso.
Sib
--
----------------------------------------------------
la mia home:
http://digilander.iol.it/syb
----------------------------------------------------
il sito comune di it.comp.database.access:
http://www.sitocomune.com
----------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente


GRAZIE!!!
DAMIANO

 wrote in message
9avr6o$f0v$2...@news.mclink.it...

GRAZIE
DAMIANO