title: valore corrispondente in campo query

author: Karl Donaubauer

text:
Remigio wrote:
> marcopio ha scritto:
>> ...
>> Risultato: IIf([NomeTabella].[NomeCampo];"P";" ")
>>
>> Sostituisci NomeTabella e NomeCampo con i tuoi
>> (occhio, come hai chiesto il false ti da' spazio vuoto, come hai
>> chiesto, ma forse  volevi vuoto. Allora l'ultima stringa diventa "")
> ...
> Se volessimo invece sostituire pi� valori, per es. se in un campo
> id_prodotto viene visualizzato l'id, per es. 1 o 2 o 3, ecc. e al
> posto dei numeri volessimo invece mettere il nome del prodotto
> corrispondente, (1) carta; (2) penne; (3) matite, ecc. in che modo
> potremo farlo?

Concordo con marcopio che una tabella � la soluzione da preferire.
Se non la vuoi creare la soluzione no 2 sarebbe:

Choose(id_prodotto;"carta";"penne";"matite")

--
Ciao
Karl
*********
Access FAQ:
www.donkarl.com/it


title: valore corrispondente in campo query

author: Remigio

text:

Ho creato una tabella come suggerito.
Vi ringrazio e saluto.

Remigio


title: Barra menù in run time con windows 7 SPARITA

text:
Salve a tutti , oggi è successa una cosa mai vista prima :
un dbase FE che ha il suo BE su un PC che funge da Server collegato in rete LAN . Su entrambe i PC vi è caricata solo la RUN-TIME 2000 di access .
Il PC server ha WIN-XP , l'altro PC client ha WIN7.
I due FE sono identici sui due PC , solo che improvvisamente sul quello con WIN7 la barra dei menù da me creata non esiste più senza aver apparentemente fatto nessuna manovra strana ( o forse si ma inavvertitamente) .
Il bello è che se copio il FE caricato su WIN7 sul PC con WIN-XP la barra dei menù si vede , come lo eseguo sul PC con WIN7 non c'è più .
Provando a lavorare in rete su FE caricato sul PC con WIN-XP da quello con WIN7 la barra dei menù non c'è , mentre lavorando sullo stesso file dal PC WIN-XP la barra c'è.
Che stà succedendo ? sembra che il problema sia del PC con WIN7 ma non so cosa possa essere successo .
N.B. Provato ad disintallare e reinstallare le run-time ma nessun risultato.
Vi prego gentilmente di aiutarmi.
Grazie a tutti .


text:

Il funzionamento dei menù dipende anche dal registro.
Non ho una macchina con Win7 qui, ma forse funziona ancora come
per WinXP come descritto qui nel punto 3.:
http://groups.google.com/group/it.comp.appl.access/msg/c4bf4c3b1d035f19

--
Ciao
Karl
*********
Access FAQ:
http://www.donkarl.com/it


title: Impostazioni stampante in un file Access Mde

author: Roland Mayr - Chipware

text:
Salve,
qualcuno sa se é possibile impostare le proprieta e la stampante di un
report in un file mde e salvare le impostazione.
grazie in anticipo.
rolly


author: Pablitomf

text:
Roland Mayr - Chipware ha scritto:
> Salve,

> grazie in anticipo.
> rolly
Entra nella struttura del report... poi... File/Imposta
pagina/Pagina/Stampante Specifica/Proprieta.... stampa e salva la
struttura...
Fatto
--
Chi la dura la vince ;-)
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:
Pablitomf ha scritto:
> Roland Mayr - Chipware ha scritto:
> > Salve,
> > qualcuno sa se é possibile impostare le proprieta e la stampante di un
> > report in un file mde e salvare le impostazione.
> > grazie in anticipo.
> > rolly
> Entra nella struttura del report... poi... File/Imposta
> pagina/Pagina/Stampante Specifica/Proprieta.... stampa e salva la
> struttura...
> Fatto
OPS!!! parlavi di MDE? No... non è possibile.



text:
Salve,
conosci forse un methodo per inviare un report a una specifica stampante. Io
sto utilizzando docmd.openreport "xxx" e posso solo selezione la stampante
quando appare l'anteprima. Forse questo mi potrebbe aiutare.
Saluti
rolly


text:
Roland Mayr - Chipware ha scritto:
> conosci forse un methodo per inviare un report a una specifica stampante.
> Io sto utilizzando docmd.openreport "xxx" e posso solo selezione la
> stampante quando appare l'anteprima. Forse questo mi potrebbe aiutare.
Dipende dalla tua versione di Access che non hai rivelato.
Con AX e A03 hai l'oggetto Printer che puoi usare anche
in un MDE. p.e.
DoCmd.OpenReport "TuoReport", acViewPreview
Reports!TuoReport.Printer = Application.Printers("NomeDelPrinter")
Vedi <F1> "Printer".
--
HTH
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


text:
Roland Mayr - Chipware ha scritto:
> Salve,

> Saluti
> rolly
Questo č quello standard e va bene, ma tu parlavi di file mde o sbaglio?...
Se č cosě una volta impostato l'mde non puoi piů intervenire sulla
struttura, quindi come lo salvi cosě rimane formattato



text:
Salve Karl,
"Karl Donaubauer" <
NoS...@donkarl.com
> schrieb im Newsbeitrag
news:c6oivd$e3ubm$1...@ID-46617.news.uni-berlin.de...
> Roland Mayr - Chipware ha scritto:
> > conosci forse un methodo per inviare un report a una specifica
stampante.
> > Io sto utilizzando docmd.openreport "xxx" e posso solo selezione la
> > stampante quando appare l'anteprima. Forse questo mi potrebbe aiutare.
> *********
> Access-FAQ (tedesco):
http://www.donkarl.com
>
sto usando A97. Non capisco però perche se manualmente faccio un anteprima
di stampa e cambio la stampante con il tasto destro del mouse posso
selezionare ed impostare qualsiasi stampante. Perché non esiste (su A97) un
metodo per simulare un anteprima di stampa e poi cambiare la stampante del
report aperto. Non mi interessa che le impostazione vengano salvate.
Saluti
rolly


title: report

author: Luca

text:
vorrei stampare i risultati di più immissioni su una pagina o più in questo
modo:
nome1
cognome1
indirizzo1
citta1
--------------------------------------
nome2
cognome2
indirizzo2
citta2
e via così fino a quando non sono finiti tutti i dati inseriti
con i report me ne stampa uno per pagina:
se spendete 4 parole per me vi prego di usare un linguaggio molto semplice e
di spiegare tutto senza dare nulla per scontato perché é poco che uso access
e ho un sacco di lacune


title: report

author: Pivo

text:
"Luca" <
min...@tiscalinet.it
> wrote in message
news:947qbp$o74$1...@lacerta.tiscalinet.it...
> vorrei stampare i risultati di più immissioni su una pagina o più in
questo
> modo:
>
> nome1
> cognome1
> indirizzo1
> citta1
> --------------------------------------
> nome2
> cognome2
> indirizzo2
> citta2
>
> e via così fino a quando non sono finiti tutti i dati inseriti
>
> con i report me ne stampa uno per pagina:
Hai percaso inserito un'interruzione di pagina all'interno del corpo?
> se spendete 4 parole per me vi prego di usare un linguaggio molto semplice
e
> di spiegare tutto senza dare nulla per scontato perché é poco che uso
access
> e ho un sacco di lacune
>
>
Guarda anche il Post di ieri "impostare un Report"


title: report

author: Sergio MAZZA

text:
"Luca" <
min...@tiscalinet.it
> ha scritto nel messaggio
news:947qbp$o74$1...@lacerta.tiscalinet.it...

Struttura report - selezioni (cliccaci sopra) la sezione "corpo" - (menù)
visualizza - proprietà; controlla "interruzione pagina"...
Ciao.


title: Filtrare tramite data

author: MLK

text:
Come faccio a creare una query che mi filtri dei valori utilizzando un
campo data per stabilire i limiti temporali. In partica come posso
fare in modo che una query (o una maschera) mi mostri daei valori a
seconda degli itervalli temporali che inserisco di volta in volta?
Grazie


title: Filtrare tramite data

author: Roberto dal portatile

text:
"MLK" <
ste...@krea.it
> ha scritto nel messaggio
news:3bdfaff8...@news.tin.it...

Prova a dare uno sguardo sull'help alla funzione Between ... And
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Con un campo collegato tramite casella combinata richiamare gli alti campi

author: Claudio

text:
Buon giorno,

sono Claudio ed ho un problema banale me per il mio livello (basso)

piuttosto serio, cercherò di esporvelo in modo chiaro e sintetico
"spero":

Il mio sistema operativo è Win 2000 e uso Access 2000.

Ho in un mio DB la tabella "anagrafici clienti" con tutti i campi
relativi

nome, indirizzo ecc. essa è in relazionata alla tabella "Ordini" tramite
il

sui campo -ID- e il campo -nome cliente- della tabella "Ordini". Vorrei
dopo

aver introdotto i dati relativi ai clienti nella tabella "An. Clienti"

creare una maschera collegata alla tabella "Ordini" in cui tramite una

casella combinata collegata al campo -nome cliente- della tabella "An.

Clienti" si possa selezionare un cliente ed ricevere nei campi della

maschera i dati relativi allo stesso (ovviamente la tabella "ordini"

contiene gli stessi campi indirizzo, tel. ecc. vuoti, della tab. "An.

Clienti"). Questa maschera collegherà anche tramite una sottomaschera una

tabella "Dettagli ordini".

Mi scuso se sono stato prolisso e spero di essere stato almeno chiaro.

Many thanks in advance

Claudio


title: ordinare un recordset DAO

author: Franco Poggiali

text:
E' possibile ordinare un recordset  con un comando VBA? Nel mio caso mi
servirebbe ordinare i dati per ordine crescente .
Grazie, Franco.


title: ordinare un recordset DAO

author: SunRex

text:
"Franco Poggiali" <
fra...@artestudio53.it
> ha scritto nel messaggio
news:8Ispc.263500$rM4.11...@news4.tin.it...
> E' possibile ordinare un recordset  con un comando VBA? Nel mio caso mi
> servirebbe ordinare i dati per ordine crescente .
> Grazie, Franco.
>
Si
Per esempio se hai una casella di riepilogo in cui compaiono una serie di
record
ti crei un pulsante e ci metti
Private Sub cmdAZ_Click()
lstTuaCasella.RowSource = "SELECT * FROM tblTuaTabella ORDER BY
NomeCampoDaOrdinare"
lstTuaCasella.Requery
End Sub
Private Sub cmdZA_Click()
lstTuaCasella.RowSource = "SELECT * FROM tblTuaTabella ORDER BY
NomeCampoDaOrdinare Desc"
lstTuaCasella.Requery
End Sub
Cioč devi usare ORDER BY.In generale l'ordinamento del recordset
lo fai dal costrutto SQL con cui ti crei il recordset stesso.
SunRex


title: ordinare un recordset DAO

author: Antonio Biso

text:
"Franco Poggiali" <
fra...@artestudio53.it
> ha scritto nel messaggio
news:8Ispc.263500$rM4.11...@news4.tin.it...
> E' possibile ordinare un recordset  con un comando VBA? Nel mio caso mi
> servirebbe ordinare i dati per ordine crescente .
> Grazie, Franco.
O la stringa SQL origine del recordset è già ordinata con Order by, oppure
usi la proprietà SORT del recordset
Antonio


title: come modifico questa stringa di query

author: JOE

text:
ciao a tutti... brevemente... ho una query collegata ad un report di
stampa
Not Like "*" & [digita comune escluso] & "*"
e devo stampare alcuni comuni escludendone altri... in tutto cmq i
comuni sono 8..
a me servirebbe escludere uno solo oppure alcuni comuni a piacimento
tipo...
Not Like "*" & [digita comune escluso] & "*" and... and...
grazie per l'aiuto


title: come modifico questa stringa di query

author: Gabriele Bertolucci

text:
> ciao a tutti... brevemente... ho una query collegata ad un report di
> stampa
Magari sarà l'opposto :-)
> Not Like "*" & [digita comune escluso] & "*"
> e devo stampare alcuni comuni escludendone altri... in tutto cmq i
> comuni sono 8..
> a me servirebbe escludere uno solo oppure alcuni comuni a piacimento
> tipo...
> Not Like "*" & [digita comune escluso] & "*" and... and...
Puoi utilizzare il costrutto SQL NOT IN, nel seguente modo:
Not In ([digita elenco comuni])
andando ad inserire, per il parametro, uno o più comuni, separati da
virgola, ognuno tra virgolette.
Oppure
(Not Like Nz("*"+[1]+"*", "XYZ") And
(Not Like Nz("*"+[2]+"*", "XYZ") And
...
...
(Not Like Nz("*"+[8]+"*", "XYZ")
andando ad inserire, per ogni parametro, il nome di un solo comune oppure
niente.
Prova e facci sapere.
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution


title: come modifico questa stringa di query

text:
"Gabriele Bertolucci" <"info[at]pbsoft[dot]it"> ha scritto nel messaggio
>> ciao a tutti... brevemente... ho una query collegata ad un report di
>> stampa
>
> Magari sarà l'opposto :-)
hai ragione....;.((
> Puoi utilizzare il costrutto SQL NOT IN, nel seguente modo:
>
> Not In ([digita elenco comuni])
> andando ad inserire, per il parametro, uno o più comuni, separati da
> virgola, ognuno tra virgolette.
> Oppure
> (Not Like Nz("*"+[1]+"*", "XYZ") And
> (Not Like Nz("*"+[2]+"*", "XYZ") And
> (Not Like Nz("*"+[8]+"*", "XYZ")
>
> andando ad inserire, per ogni parametro, il nome di un solo comune
> oppure
> niente.
> Prova e facci sapere.
---------
Ciao Gabriele... ho optato per la prima soluzione Not In ([digita elenco
comuni])
in quanto le successive mi davano errore di sintassi... etc...
e cmq anche testando la prima se digito un solo comune da escludere
funziona,
ma se ne digito + di uno mi da tutto il presente nel DB...
esempio....
digita comuni da escludere > "roma","Milano", "Torino", mi da tutti i
comuni presenti nel Db
funziona solo se digito
digita comuni da escludere > roma
come mai ???
Ciao e grazie


title: come modifico questa stringa di query

text:
> Ciao Gabriele... ho optato per la prima soluzione Not In ([digita elenco
> comuni])
> in quanto le successive mi davano errore di sintassi... etc...
> e cmq anche testando la prima se digito un solo comune da escludere
> funziona,
> ma se ne digito + di uno mi da tutto il presente nel DB...
> esempio....
> digita comuni da escludere > "roma","Milano", "Torino", mi da tutti i
> comuni presenti nel Db
> funziona solo se digito
> digita comuni da escludere > roma
>
> come mai ???
Purtroppo me lo aspettavo.
Il comportamento è normale, nel senso che Access inserire un simbolo "
prima e dopo quanto digitato nella textbox, quindi interpreta il tutto come
una stringa unica.
Il fatto che funzioni con un solo comune è un effetto collaterale.
Ho fatto diverse prove, anche utilizzando una funzione per creare tramite
VBA l'elenco desiderato, ma non ho trovato una soluzione funzionante. Il
comportamento è sempre il solito: viene aggiunto un carattere " in cima ed
in fondo a quanto ritornato dalla funzione.
Anche l'altra soluzione non si è rivelata efficace.
Mi spiace.



title: come modifico questa stringa di query

text:
"Gabriele Bertolucci" <"info[at]pbsoft[dot]it"> ha scritto nel messaggio
... ho optato per la prima soluzione Not In ([digita elenco
>> comuni])
>> in quanto le successive mi davano errore di sintassi... etc...
>> e cmq anche testando la prima se digito un solo comune da escludere
>> funziona,
>> ma se ne digito + di uno mi da tutto il presente nel DB...
>> esempio....
>> digita comuni da escludere > "roma","Milano", "Torino", mi da tutti i
>> comuni presenti nel Db
>> funziona solo se digito
>> digita comuni da escludere > roma
>
> Purtroppo me lo aspettavo.
> Il comportamento è normale, nel senso che Access inserire un simbolo "
> prima e dopo quanto digitato nella textbox, quindi interpreta il tutto
> come
> una stringa unica.
> Il fatto che funzioni con un solo comune è un effetto collaterale.
>
> Ho fatto diverse prove, anche utilizzando una funzione per creare
> tramite
> VBA l'elenco desiderato, ma non ho trovato una soluzione funzionante.
> Il
> comportamento è sempre il solito: viene aggiunto un carattere " in
> cima ed
> in fondo a quanto ritornato dalla funzione.
>
> Anche l'altra soluzione non si è rivelata efficace.
>
> Mi spiace.
-----------------------
certo dispiace + a me ;-((
grazie cmq dell'impegno e cmq quindi non è neanche possibile farlo da un
bottone in maschera con codice VBA ??
magari, forse, se riposto in NG secondo te, sarebbe possibile trovare
una soluzione alternativa per mandare in stampa solo i Comuni prescelti
??
ti ringrazio
Giuseppe


title: come modifico questa stringa di query

text:

> Giuseppe- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
Sempre dal basso della mia 'gnoranza:
possibile soluzione (ho fiducia che si possa fare molto meglio, ma se
ti accontenti)
Aggiungi campo si/no alla tabella comuni (se non hai tabella comuni
fanne una)
Crea maschera con comuni e campo si/no e tasto per aprire report
Crea sulla mscehra principale  tasto che apre maschera comuni di cui
sopra
spunta quelli che vuoi che siano stampati (o viceversa)
Aggiungi nella query campo si/no e relativo criterio
F.
E se ho sbagliato voi mi scuserete e mi corrIgerete...


title: ciao a tutti

text:
ho un problema che non riesco a risolvere. ho sviluppato una piccola
applicazione access per le consegne e i ritiri da un magazzino. i
ritiri in sospeso, cioè in attesa di effettiva effettuazione, sono
visualizzati in forma di lista in una maschera e selezionando il
ritiro si apre un'altra maschera con i relativi dettagli. è possibile
poter visualizzare i dettagli del ritiro direttamente nella maschera
principale tramite una sottomaschera (la maschera principale è
impostata a maschere continue) o qualcosa di simile senza che ogni
volta mi si apra la maschera per i dettagli?


title: ciao a tutti

author: ciroteo

text:

ciao e benvenuto!
volevo segnalarti che l'oggetto del tuo messaggio viola  putroppo le
regole di questo newsgroup: non è esaustivo e assolutamente inutile
per chi in futuro avrà un problema come il tuo.
se riposti attenendoti alle regole che trovi esplicate chiaramente su
www.sitocomune.com
, come ci si comporta in un newsgroup, riceverai di
sicuro l'aiuto che cerchi.
M


title: ciao a tutti

text:

> se riposti attenendoti alle regole che trovi esplicate chiaramente
suwww.sitocomune.com
, come ci si comporta in un newsgroup, riceverai di
> sicuro l'aiuto che cerchi.
>
> M
scusa! avevo bisogno di un consiglio ma devo ever sbagliato tutto
devo essere entrato nel posto sbagliato. ciao e grazie


title: ciao a tutti

author: Ammammata

text:
sergi...@hotmail.it
 wrote in
news:1173868844....@n76g2000hsh.googlegroups.com
:
> scusa! avevo bisogno di un consiglio ma devo ever sbagliato tutto
> devo essere entrato nel posto sbagliato. ciao e grazie
>
il posto è giusto, hai sbagliato l'oggetto del tuo messaggio
'ciao a tutti' non va bene
'modifica modalità di visualizzazione' è già meglio
riprova :)
--
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\


title: ciao a tutti

text:
<
sergi...@hotmail.it
> ha scritto nel messaggio
news:1173868844....@n76g2000hsh.googlegroups.com...


e allora offendiamoci pure!!!
Antonio


title: ciao a tutti

author: Karl Donaubauer

text: Ciao, che bella giornata!


title: ciao a tutti

author: Alessandro Cara

text:
Karl Donaubauer wrote:
> Ciao, che bella giornata!
"paradigmaticamente" qui nel paese del sole e' primavera
--
ac
y-1=x


title: ciao a tutti

text:
On 14 Mar, 12:50, Alessandro Cara <
alessandro.c...@ay-1asistemi.it
>
wrote:

e la mia collega ha già l'allergia!  Continua a starnutire
... spero solo che uno starnuto un po' più forte le sbottoni la
camicetta ...
:-)


title: ciao a tutti

author: MA

text:

Anche Pablito è allergico, spero che i suoi bottoni siano ben fissati....
--
--
Massimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


title: ciao a tutti

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio news:et90og$rj9$1...@tdi.cu.mi.it...
> Anche Pablito è allergico, spero che i suoi bottoni siano ben fissati....
Quelli della camicetta o della gonna?
> --
> --
> Massimiliano Amendola
>
www.accessgroup.it
> Cisa - Conferenza Italiana Sviluppatori Access
Ciao.
--
Sergio MAZZA


title: ciao a tutti

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:etatum$hck$1...@tdi.cu.mi.it...
> "MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:et90og$rj9$1...@tdi.cu.mi.it...
> > Anche Pablito è allergico, spero che i suoi bottoni siano ben
fissati....
>
> Quelli della camicetta o della gonna?
>
Cavallo goloso...
Antonio


title: ciao a tutti

text:
"Antonio Biso" <ch...@NOSPAMetruria.net> ha scritto nel messaggio
news:MB8Kh.23132$J11.5...@twister1.libero.it...
>
> Cavallo goloso...
Delfino impertinente...
> Antonio
Ciao.
--
Sergio MAZZA


title: ciao a tutti

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:etb5l7$qt2$1...@tdi.cu.mi.it...
> "Antonio Biso" <ch...@NOSPAMetruria.net> ha scritto nel messaggio
> news:MB8Kh.23132$J11.5...@twister1.libero.it...
> >
> > Cavallo goloso...
>
> Delfino impertinente...
>
> > Antonio
Uh?
Ma il delfino non era curioso?
Devi ripassare i fondamentali...
Antonio


title: ciao a tutti

text:
"Antonio Biso" <ch...@NOSPAMetruria.net> ha scritto nel messaggio
news:dT8Kh.24775$zG1.2...@twister2.libero.it...
>
> Uh?
> Ma il delfino non era curioso?
>
> Devi ripassare i fondamentali...
>
> Antonio
Stava in un'altra vasca...
Ciao.
--
Sergio MAZZA


title: Problemi con l'installazione di office 2003

author: Daniele Vitali

text:
Dopo aver formattato un disco e reinstallato office 2003 professional non
riesco più ad eseguire degli applicativi in formato .mde (predisposti con
access 2003) in quanto mi viene restituito un messaggio di errore di
"funzione non trovata" quando in realtà la funzione è presente nel modulo
del programma sorgente. Ho anche provato a ricompilare l'eseguibile con il
risultato che funziona sul pc sui cui eseguo la compilazione mentre se copio
lo stesso eseguibile su altri pc si ripresenta lo stesso problema.
Grazie
Daniele


author: PBsoft

text:
> Dopo aver formattato un disco e reinstallato office 2003 professional
> non riesco più ad eseguire degli applicativi in formato .mde
> (predisposti con access 2003) in quanto mi viene restituito un
> messaggio di errore di "funzione non trovata" quando in realtà la
> funzione è presente nel modulo del programma sorgente.
Se hai anche un'altra macchina con Access 2003, prova a creare il file MDE
da quella e vedi se per caso vengono fuori problemi di compilazione.
Non è che, per caso, utilizzi dei riferimenti a librerie che nelle altre
macchine non ci sono?
> Ho anche provato a ricompilare l'eseguibile
Solo per chiarezza: gli MDE non sono file eseguibili. Sono semplicemente
degli MDB compilati, dove tutto il codice sorgente è stato reso inaccessibile.
> con il risultato che funziona sul
> pc sui cui eseguo la compilazione mentre se copio lo stesso eseguibile
> su altri pc si ripresenta lo stesso problema.
Sembra proprio un problema di librerie mancanti sugli altri computer.
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype: pbsoftsolution


author: Bruno Campanini

text:
"Daniele Vitali" <
daniele.v...@tiscali.it
> wrote in message
news:446efe38$0$29098$5fc...@news.tiscali.it...

È capitato tante volte anche a me ed anche con versioni precedenti alla
2003.
E non sono mai riuscito a capire il perché.
Rimedio che funziona sempre:
crea l'MDE dal PC dal quale lo dovrai usare.
Bruno


title: Memorizzare ciò che si scrive

author: Aky

text:
Salve a tutti, esiste un modulo per memorizzare tutto ciň che viene battuto
a tastiera ?
Grazie a tutti.


title: Memorizzare ciò che si scrive

author: Carlo Costarella

text:
"Aky" <Ak...@Libero.it> ha scritto nel messaggio
news:yoqdncxP9t5_yMXY...@kpnqwest.it...

 Un sistema facile facile č quello di intercettare l'evento Su Presssione di
ogni controllo.
Ciao, Carlo


title: Memorizzare ciò che si scrive

text:
Grazie, ma io voglio memorizzare proprio tutto, non solo ciň che viene
battuto all'interno dell'applicazione.
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:ej9ned$av2$1...@tdi.cu.mi.it...



title: Memorizzare ciò che si scrive

author: Silver

text:
Aky ha scritto:
> Grazie, ma io voglio memorizzare proprio tutto, non solo ciò che viene
> battuto all'interno dell'applicazione.
>
cerca key logger con google
questi programmi operano anche in modalità stealth, solo che vai contro
la privacy dell'utilizzatore(se non fosse tu l'unico)


title: DLL per disabilitare lo scroll del mouse

author: marco

text:
Ciao a tutti, ho visto dai post precedenti come disabilitare lo scroll,
ma serve creare una DLL.
Visto che mi manca VB6 c'è qualcuno che mi sa dire dove trovarla o che me la
può spedire??
la mia mail è
marpisaBASTACO'STI'VI...@inwind.it
Grazie a tutti
Ciao
Marco


author: Alessandro Baraldi

text:
"marco" <
pl...@pippo.it
> wrote in message
news:bkufcf$ual$
1...@lacerta.tiscalinet.it

Hai fatto un pò di confusione...!
La DLL in questione serve solo per un motivo di semplicità,
ma se leggi bene alcuni post trovi soluzioni, non alternative
in quanto fanno la stessa cosa, ma equivalenti per ACCESS.
Per usare la Dll in ogni caso ti serve il RUNTIME di VB
quindi ti complichi la vita.
Dai una scorsa ai post e trovi i riferimenti per scaricare
un'esempio di Giorgio Prx già fatto per A97.
Ciao.
@Alex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:f89e366e8fc7f2c4f6...@mygate.mailgate.org...

Avevo scoro in fretta l'articolo della KB che in cima riportava la procedura
con la DLL
Poi, vedendo bene altri post vecchi, ho notato che c'era anche una
prodcedura analoga in access con un modulo di classe. L'ho provata e
funziona
Ciao e Grazie
Marco


author: Maurizio

text:
"marco" <
pl...@pippo.it
> ha scritto nel messaggio
news:bkurss$5ap$1...@lacerta.tiscalinet.it...

Potresti indicarmi cortesemente quei post anch'io ho lo stesso tuo problema


author: ALESSANDRO Baraldi

text:
"Maurizio" <
mauri...@tiscali.it
> ha scritto nel messaggio
news:EiFcb.120750$hE5.4...@news1.tin.it...
>
[CUT]
> > Avevo scoro in fretta l'articolo della KB che in cima riportava la
> procedura
> > con la DLL
> > Poi, vedendo bene altri post vecchi, ho notato che c'era anche una
> > prodcedura analoga in access con un modulo di classe. L'ho provata e
> > funziona
> >
> > Ciao e Grazie
> > Marco
> >
> >
> Potresti indicarmi cortesemente quei post anch'io ho lo stesso tuo
problema
>
Non ho capito se è perchè è comodo o perchè è difficoltoso da cercare...!
Ma in generale mi pare dai vari post che sia per comodità.
Non t'irrigidire, ma io sono molo contrario e lo esterno.
@Alex.


title: Come far sparire la 'cornice' di Access ???

author: RobertoA

text:
Apertura nuovo db Access
Creazione maschera con tre tasti
Avvio maschera appena creata
Ecco, come fare per far 'sparire' lo sfondo di Access ???
Insomma vorrei vedere solamente la maschera che ho appena creato
Ciao e grazie
RobertoA


author: antonio

text:
"RobertoA" <
amor...@tiscalinet.it
> ha scritto nel messaggio
news:4630cddc$1...@newsgate.x-privat.org...

Credo che se la definisci di tipo Popup e con le dimensioni massime del tuo
schermo ti vada a ricoprire anche le icone e la barra dei menu.
Ciao
Antonio


text:
>> Apertura nuovo db Access
>> Creazione maschera con tre tasti
>> Avvio maschera appena creata
>> Ecco, come fare per far 'sparire' lo sfondo di Access ???
>> Insomma vorrei vedere solamente la maschera che ho appena creato
>> Ciao e grazie
>> RobertoA
>>
> Credo che se la definisci di tipo Popup e con le dimensioni massime del
> tuo schermo ti vada a ricoprire anche le icone e la barra dei menu.
Si, pero' resta sotto tutta la maschera coi menu di Access, basta spostare
la maschera utente e sotto si vede tutto
Vorrei eliminare anche quella roba e lasciare solamente la maschera appena
creata
Ciao e grazie
RobertoA


author: sv

text:
RobertoA ha scritto:


Vedi:
www.donkarl.com/it/?FAQ1.11
--
sv
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:
"RobertoA" <
amor...@tiscalinet.it
> ha scritto nel messaggio
news:4631...@newsgate.x-privat.org...

E' vero, ma puoi anche decidere di rendere inamovibile la maschera
impostando l'opportuna proprietà:
    Me.Moveable = False
E se lo ritieni opportuno, togli anche la possibilità di ridurla ad icona.
Ciao
Antonio


text:
>>>> Apertura nuovo db Access
>>>> Creazione maschera con tre tasti
>>>> Avvio maschera appena creata
>>>> Ecco, come fare per far 'sparire' lo sfondo di Access ???
>>>> Insomma vorrei vedere solamente la maschera che ho appena creato
>>>> Ciao e grazie
>>>> RobertoA
>>>>
>>> Credo che se la definisci di tipo Popup e con le dimensioni massime del
>>> tuo schermo ti vada a ricoprire anche le icone e la barra dei menu.
>>
>> Si, pero' resta sotto tutta la maschera coi menu di Access, basta
>> spostare la maschera utente e sotto si vede tutto
>> Vorrei eliminare anche quella roba e lasciare solamente la maschera
>> appena creata
>> Ciao e grazie
>> RobertoA
>>
>>
> E' vero, ma puoi anche decidere di rendere inamovibile la maschera
> impostando l'opportuna proprietą:
>    Me.Moveable = False
>
> E se lo ritieni opportuno, togli anche la possibilitą di ridurla ad icona.
>
E con l'Alt-Tab come la mettiamo ?
Ciao e grazie
RobertoA


title: campo incrementale report

author: Ferrari Rino

text:
E possibile inserire un campo in un Report (corpo)
che generi un numero incrementale in base alle righe di dettaglio?
Grazie
Rino


title: campo incrementale report

author: ciroteo

text:
"Ferrari Rino" <
rinof...@virgilio.it
> ha scritto nel messaggio
news:7qllc.182821$rM4.7...@news4.tin.it...

potresti inserire una casella di testo e come origine controllo metti
=currentrecord


title: campo incrementale report

text:
"Ferrari Rino" <
rinof...@virgilio.it
> ha
scritto nel messaggio
news:7qllc.182821$rM4.7...@news4.tin.it...

metti un controllo non associato e scrivici =1 poi
setta nelle sue prorpietà somma parziale su tutto
il gruppo
MAssimiliano


title: spesometro 2016

author: Simone Calligaris

text:
Pare siano disponibili le nuove specifiche dello Spesometro:

http://www.guidafisco.it/spesometro-istruzioni-769

Come sempre faccio fatica a trovare il software di controllo aggiornato:
qualcuno lo ha già fatto?

Saluti natalizi


title: criterio query in una variabile

author: max

text:
Lo so che � banale ma ho dimenticato come si fa... ho una query con un campo
year a cui passo il criterio [anno] "al volo" (mi esce la classica finestra
per l'inserimento del criterio),  di questa query faccio poi una
esportazione in excel, vorrei che il valore inserito come criterio della
query diventasse il nome del file excel e per questo dovrei "scrivermelo" in
una variabile, come faccio a fare ci�?
grazie
Max


title: criterio query in una variabile

author: Antonio Biso

text:
"max" <
pi...@pippo.it
> ha scritto nel messaggio
news:j06288$ssi$1...@news.task.gda.pl...

usa una maschera e quindi lavora sui controlli della stessa
Antonio


title: criteri delle query

author: Akery

text:
buongiorno

devo creare delle query in cui il criterio di scelta faccia in modo da
restituirmi un solo record ovvero l'ultimo record inserito.

ho usato il seguente codice adattato da me da uno script che ho trovato
in rete

SELECT
SS.ID
,
SS.CF
, SS.data_SS, SS.ora_SS, SS.idoneità, SS.rischio,
SS.prescrizione, SS.limitazioni, SS.scadenza, SS.note, SS.[invio mail],
SS.check
FROM dati_SS AS SS
WHERE (((
SS.ID
)=(SELECT Max(id) FROM dati_ss WHERE id =
ss.id
)));

ma non riesco a comprenderlo, perchè nella query introduco la tabella SS
che ricopia la tabella dati_ss? e poi le confronto?

dove posso studiare questo tipo di criterio o c'è qualcuno che
gentilmente può spiegarmelo.
Grazie
akery

--
Questa e-mail è stata controllata per individuare virus con Avast antivirus.
https://www.avast.com/antivirus


title: Confrontare due tabelle

text:
Salve a tutti ben ritrovati. Dunque:
Ho una tabella chiamata "tb_A" che possiende i campi:
- "Nome" (testo)
- "Codice" (numerico)
poi ho una seconda tabella chiamata "tab_B" he possiende i campi:
- "Nome" (testo)
- "Descrizione" (testo)
- "idCodice" (numerico)
Quello che vorrei ottenere è questo:
Confrontare il campo "Nome" della tabella "tb_A"
con il campo "Nome" della tabella "tb_B"
e se sono uguali, allora viene copiato il campo "Codice" della "tb_A"  nel
campo "idCodice" della "tb_B"
E' possibile fare una cosa del genere tramite Query o VBA ?
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Confrontare due tabelle

text:
Domy73 ha scritto:
> Salve a tutti ben ritrovati. Dunque:
> Ho una tabella chiamata "tb_A" che possiende i campi:
> - "Nome" (testo)
> - "Codice" (numerico)
> poi ho una seconda tabella chiamata "tab_B" he possiende i campi:
> - "Nome" (testo)
> - "Descrizione" (testo)
> - "idCodice" (numerico)
> Quello che vorrei ottenere � questo:
> Confrontare il campo "Nome" della tabella "tb_A"
> con il campo "Nome" della tabella "tb_B"
> e se sono uguali, allora viene copiato il campo "Codice" della "tb_A"  nel
> campo "idCodice" della "tb_B"
> E' possibile fare una cosa del genere tramite Query o VBA ?
Con una query di aggiornamento. Prova cos�:
 UPDATE tbl_A LEFT JOIN tbl_B ON tbl_A.Nome = tbl_B.Nome
 SET tbl_B.IdCodice = tbl_A!Codice
 WHERE tbl_B.Nome Is Not Null;
--
sv



title: Confrontare due tabelle

text:
sv ha scritto:
> Domy73 ha scritto:
> > Salve a tutti ben ritrovati. Dunque:
> > Ho una tabella chiamata "tb_A" che possiende i campi:
> > - "Nome" (testo)
> > - "Codice" (numerico)
> > poi ho una seconda tabella chiamata "tab_B" he possiende i campi:
> > - "Nome" (testo)
> > - "Descrizione" (testo)
> > - "idCodice" (numerico)
> > Quello che vorrei ottenere č questo:
> > Confrontare il campo "Nome" della tabella "tb_A"
> > con il campo "Nome" della tabella "tb_B"
> > e se sono uguali, allora viene copiato il campo "Codice" della "tb_A"  nel
> > campo "idCodice" della "tb_B"
> > E' possibile fare una cosa del genere tramite Query o VBA ?
> Con una query di aggiornamento. Prova cosě:
>  UPDATE tbl_A LEFT JOIN tbl_B ON tbl_A.Nome = tbl_B.Nome
>  SET tbl_B.IdCodice = tbl_A!Codice
>  WHERE tbl_B.Nome Is Not Null;
> --
> sv
Ok grazie sv, funziona perfettamente
buona serata



title: Forse OT

author: Proietti Luca

text:
Vorrei creare con un ASp pagine HTML a partire da un database access come
fare?


title: Forse OT

author: Alessandro Cara

text:
Proietti Luca ha scritto:
>
> Vorrei creare con un ASp pagine HTML a partire da un database access come
> fare?
1) certamente OT
2) Rivolgersi a it.comp.www.asp
3) a) avere PWS o IIS e IE o NS
   b) avere un editor di testi
   c) prendere conoscenza degli oggetti ASP  ADO, response,request
   e) conoscere VBscript (simile a VBA) o javascript e HTML
   f) sapere cos'e' un sistema "stateless"
et voila' il gioco e fatto
a.cara


title: Riferimenti

author: Roberto B.

text:
Due ani fa ho sviluppato un applicativo per un cliente; ora mi chiama
per una modifica. Ripesco il mio prg ed in una query ricevo un errore.
Ora il mio Access 97 non digerisce la 'Format' di un campo in una
query; ma nemmeno 'Str'; la funzione 'Val' viene invece gradita. Dopo
aver reinstallato Office ed ODE scopro che abilitando nei riferimenti
'Microsoft Visual Basic for Application Extensibility' tutto torna a
funzionare.
Ma che senso ha????
-----------------------------------------------------
Roberto Bergonzini -MO-
robb...@tin.it
Microsoft Certified System Engineer
Microsoft Certified Professional Specialist Internet
-----------------------------------------------------


title: Riferimenti

author: Sergio MAZZA

text:
"Roberto B." <
rberg...@hotmail.com
> ha scritto nel messaggio
news:38c6c22...@news.tiscalinet.it...

Lo stesso senso di quando aggiorni A'97 con A'2000 e ti vedi lo stesso
messaggio che ti è apparso a te!
Ciao.


title: Orientamento pagina stampante

author: Orso

text:
Ho una maschera che in base al contesto andrebbe stampata in orizzontale o
in verticale sul foglio, visto che la proprietà PrtDevMode funziona solo
in visualizzazione struttura, dovrei compiere da codice l'equivalente di:
anteprima di stampa  - Stampa - Proprietà - vert/oriz
ma non lo sò fare, mi appello quindi al santo di turno.
Salutoni a tutti
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Aggiungere il dato di un campo a un MsgBox

author: elicar

text:
Buona giornata a tutto il NG
come posso aggiungere al messaggio che mi viene dato da MsgBox un dato
presente in un campo della stessa Form?
Grazie
--
Carlo
:)


author: Beppe

text:
elicar ha scritto:

Molto semplicemente...
MsgBox "Questo è il contenuto del campo: " & me.tuocampo, 48, "Test"
La seconda e terza parte ovviamente sono solo indicative.
Bye


text:
"Beppe" <
beppe.l...@gmail.com
> ha scritto nel messaggio
news:1152258704.8...@k73g2000cwa.googlegroups.com...
elicar ha scritto:
> Buona giornata a tutto il NG
> come posso aggiungere al messaggio che mi viene dato da MsgBox un dato
> presente in un campo della stessa Form?
>
> Grazie
>
> --
> Carlo
> :)
Molto semplicemente...
MsgBox "Questo č il contenuto del campo: " & me.tuocampo, 48, "Test"
La seconda e terza parte ovviamente sono solo indicative.
Bye
Grazie
:)


title: HELP ME!! Maschere

author: Zampalunga

text:
Ciao a tutti, per favore aiutatemi, Access mi tira scemo!!
Ho una maschera con un controllo "Importo" al quale evento dopo
aggiornamento è affidato il compito di calcolare un totale tramite un If.
Precisamente:
If [tipo]=30 then
[totale prelievo]=[totale prelievo]+[Importo]
End if
Siccome dovendo richiamare + volte la maschera mi serve che [totale
prelievo] sia memorizzato l'ho associato al suo bel campo.
Qual'è il problema: se non associo il [totale prelievo] a niente la maschera
funziona ma quando la richiamo per la seconda, terza, quarta ecc.. volta il
campo ha, giustamente, valore zero. Se associo, come vorrei fare, il campo
[totale prelievo] questo non mi fa mai la somma ma mi riporta solo il valore
[importo] in quanto per motivi suoi di ritardi al momento della somma legge
da [totale prelievo] il valore zero!!
Che fare??
Grazie
Grazie


title: HELP ME!! Maschere

author: Roberto dal portatile

text:
"Zampalunga" <zampa...@NOSPAM.it> ha scritto nel messaggio
news:905jnp$t03$1...@lacerta.tiscalinet.it...
> Ciao a tutti, per favore aiutatemi, Access mi tira scemo!!
>
> Ho una maschera con un controllo "Importo" al quale evento dopo
> aggiornamento è affidato il compito di calcolare un totale tramite un If.
> Precisamente:
> If [tipo]=30 then
> [totale prelievo]=[totale prelievo]+[Importo]
> End if
>
[CUT]
Probabilmente non ho capito cosa ti serve: ma cosa ti serve di trovare nel
controllo [totale prelievo] quando riapri la maschera?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------


title: maschere continue

author: Silvia

text:
Salve,
ho una maschera di tipo "maschere continue"
Vorrei che su apertura della maschera
mi partisse un codice che prenda il valore di un controllo (in cui č
memorizzata una data)
e valuti se č pari alla data odierna,
in caso affermativo mi cambi il colore del controllo;
e fin qui potrei arrivarci da sola
ma come faccio a fargli fare questo controllo
per ogni record visualizzato nella maschera 'continue'


title: maschere continue

author: Paolo Mazzanti

text:
"Silvia" <
siv...@yahoo.com
> ha scritto nel messaggio
news:9jj99m$6bk$1...@serv1.iunet.it...
> Salve,
>
> ho una maschera di tipo "maschere continue"
>
> Vorrei che su apertura della maschera
> mi partisse un codice che prenda il valore di un controllo (in cui è
> memorizzata una data)
> e valuti se è pari alla data odierna,
> in caso affermativo mi cambi il colore del controllo;
> e fin qui potrei arrivarci da sola
> ma come faccio a fargli fare questo controllo
> per ogni record visualizzato nella maschera 'continue'
>
>
Posto così non credo che poi tu possa cambiare colore per ogni maschera
delle maschere continue.
O non così facilmente!
Ma se qualcuno più esperto ha una soluzione, sono curioso anch'io
di sapere come si fa.
Grazie
Ciao
Paolo


title: maschere continue

text:
al mio quesito ha appena risposto MegaMax al post "Colorare Report"
a quanto pare era un problema di molti
PS: ho trovato altri aiuti nel sito comune alla sezione Forms, ma sono ad un
livello per me irraggiungibile (al momento), se tu sei più efferrato con il
codice potrebbero interessarti!!


title: maschere continue

author: warp

text:
Silvia ha scritto nel messaggio

Se usi A '2000 non hai bisogno degli esempi sul Sito Comune: nella barra dei menù in struttura
maschera trovi l'opzione "Formattazione condizionale" che risolve in maniera semplice e intuitiva il
problema
Ciao, warp


title: tasto destro del mouse

author: Gio&Tin

text:
E' possibile abbinare una fuzione al tastro destro del mouse?
se sě come


title: tasto destro del mouse

author: BiBi

text:
On Wed, 13 Nov 2002 06:19:10 GMT, "Gio&Tin" <
joeti...@libero.it
>
wrote:
>E' possibile abbinare una fuzione al tastro destro del mouse?
>se sě come
>
>
>
Private Sub cmdPulsante_MouseDown(Button As Integer, Shift As Integer,
X As Single, Y As Single)
If Button = acRightButton Then
   TuaFunzione
End If
End Sub
BB


title: "#Eliminato" in tutti i campi delle righe di una tabella access 97

author: Eugenio

text:
Buongiorno.
Probabilmente mi sto perdendo in un bicchier d'acqua, ma non riesco a
trovare una ragione.
Ho collegato ad un database access97 una tabella di SQL server 2000 composta
da un campo indentitą e altri campi testo.
Se apro la tabella in SQLserver posso leggere il contenuto, mentre se la
apro in access come tabella o attraverso una query, tutti i campi (per tutte
le righe della tabella) contengono "#Eliminato".
Perņ se inserito la tabella in un report o un form vedo il contenuto della
tabella.
Quale potrebbere essere la causa del problema?
Grazie
Ciao
Eugenio


text:
"Eugenio"  ha scritto nel messaggio > Buongiorno.
>
> Probabilmente mi sto perdendo in un bicchier d'acqua, ma non riesco a
> trovare una ragione.
> Ho collegato ad un database access97 una tabella di SQL server 2000
> composta da un campo indentità e altri campi testo.
> Se apro la tabella in SQLserver posso leggere il contenuto, mentre se la
> apro in access come tabella o attraverso una query, tutti i campi (per
> tutte le righe della tabella) contengono "#Eliminato".
> Però se inserito la tabella in un report o un form vedo il contenuto della
> tabella.
>
> Quale potrebbere essere la causa del problema?
>
> Grazie
> Ciao
> Eugenio
>
Ho trovato questo link
http://support.microsoft.com/kb/244872/it
che invita ad installare la versione più aggiornata di  Microsoft Jet 4.0,
ma sul mio pc è già installata la versione consigliata.
Grazie
Ciao
Eugenio


author: MA

text:

metti un campo di tipo timestamp
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


text:
"MA"  ha scritto nel messaggio
> "Eugenio"  ha scritto nel messaggio > Buongiorno.
>>
>> Probabilmente mi sto perdendo in un bicchier d'acqua, ma non riesco a
>> trovare una ragione.
>> Ho collegato ad un database access97 una tabella di SQL server 2000
>> composta da un campo indentità e altri campi testo.
>> Se apro la tabella in SQLserver posso leggere il contenuto, mentre
>> se la apro in access come tabella o attraverso una query, tutti i
>> campi (per tutte le righe della tabella) contengono "#Eliminato".
>> Però se inserito la tabella in un report o un form vedo il contenuto
>> della tabella.
>>
>> Quale potrebbere essere la causa del problema?
>>
>> Grazie
>> Ciao
>> Eugenio
>>
>
> Ho trovato questo link
>
>
http://support.microsoft.com/kb/244872/it
>
> che invita ad installare la versione più aggiornata di  Microsoft Jet
> 4.0, ma sul mio pc è già installata la versione consigliata.
>
> Grazie
> Ciao
> Eugenio
metti un campo di tipo timestamp
No, non cambia nulla.



title: aiuto!!

author: Silvio

text:
ho creato un db protetto. Ho perso il file .bak originario. è possibile
eliminare il gruppo di lavoro dal file mdb???
grazie
--------------------------------
Inviato via
http://usenet.libero.it


title: aiuto!!

author: Antonio Biso

text:
"Silvio" <
silvi...@iol.it
> ha scritto nel messaggio
news:151Z99Z208Z235Y...@usenet.libero.it...
Ecco il tuo salvatore!
Scrivi un subject più significativo e ricomincia!!!
Antonio


title: aiuto!!

author: desio

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:P7oA9.23871$8E3.7...@twister2.libero.it...
> "Silvio" <
silvi...@iol.it
> ha scritto nel messaggio
> news:151Z99Z208Z235Y...@usenet.libero.it...
>
> Ecco il tuo salvatore!
Salvatore!? ma non ti chiamavi antonio?



title: aiuto!!

author: Federico Luciani

text:
Silvio wrote:
> ho creato un db protetto. Ho perso il file .bak originario. è possibile
> eliminare il gruppo di lavoro dal file mdb???
se sei l'amministratore, reimposta i permessi sul db e sugli oggetti
ed il db torma come prima.
--
Federico
----------------------------------
Rimuovi paperino. per e-mail
----------------------------------
Tutte le richieste che arrivano
in privato, vengono cestinate.
----------------------------------
Sito Comune di it.comp.appl.access
http://www.sitocomune.com
mailto:
webm...@sitocomune.com
----------------------------------


title: aiuto!!

author: silvio

text:
Il 13 Nov 2002, 10:10, Federico Luciani <
fluc...@sitocomune.com
> ha
scritto:
> Silvio wrote:
> > ho creato un db protetto. Ho perso il file .bak originario. è possibile
> > eliminare il gruppo di lavoro dal file mdb???
>
> se sei l'amministratore, reimposta i permessi sul db e sugli oggetti
> ed il db torma come prima.
>
> --
> Federico
Grazie infinite



title: aiuto!!

text:
"Federico Luciani" <
fluc...@sitocomune.com
> ha scritto nel messaggio
news:3DD21713...@sitocomune.com...
> Silvio wrote:
> > ho creato un db protetto. Ho perso il file .bak originario. è possibile
> > eliminare il gruppo di lavoro dal file mdb???
>
> se sei l'amministratore, reimposta i permessi sul db e sugli oggetti
> ed il db torma come prima.
Federico, federico... tu remi contro....
Antonio


title: aiuto!!

text:

non avevo letto il tuo msg,
ma a me sembrava chiarissimo, (a parte l'oggetto!)



title: aiuto!!

author: Emyr

text:
On Wed, 13 Nov 2002 09:45:27 +0100, "desio" <
giscar...@dada.it
>
wrote:

1 a 0 per desio
Saluti.
Emanuele.


title: Goto & recordcount

author: C Briglia

text:
Aiutatemi a risolvere questo problema...
Premetto sono un neofita di access .. per cui scusate gli strafalcioni
La procedura che invio di seguito esegue un sorteggio a caso di record
contenuti in una tabella (tblUnione) ciclando su recordset estratti di volta
in volta in base a due parametri che vengono presi aprendo due tabelle
distinte(tbl medici e cuf)
Per contare i record del recordset uso recordcount, quindi calcolo il 5% del
numero ... genero un numero casuale nell'intervallo compreso tra il 1° e
l'ultimo record e...
non riesco a spostarmi sul record prescelto.
Ho usato, come vedete goto... ma non solo non si sposta... ma non genera
messaggi d'errore per cui ho buttato un bel po' di tempo nella convinzione
di aver fatto bene...
Option Compare Database
Option Explicit
Sub sorteggio()
Dim dbs, dbsRIC As Database
Dim rst, rstRIC, rstExtr, rstCUF As Recordset
Dim strSQL, ncuf As String
Dim codMed, ContMin, ContMax, MyValue As Long
Dim Perc, i, num As Integer
    creaTblestrazioni
Set dbs = CurrentDb
Set rst = dbs.OpenRecordset("tbln_medici", dbOpenTable) ' apre tbln_medici
   ' rst.MoveFirst
    Do Until rst.EOF 'inizio ciclo su tbln_medici
    num = rst.RecordCount
    codMed = rst.Cod_MED
    Set rstCUF = dbs.OpenRecordset("cuf", dbOpenTable) ' apre tabella Cuf
    Do Until rstCUF.EOF 'inizio ciclo su tabella CUF
    ncuf = rstCUF.Fields(0)
        strSQL = "SELECT * FROM tblUNIONE WHERE (((tblUNIONE.nota_CUF)='" &
ncuf & "') AND ((tblUNIONE.TblN_Medici_Cod_MED)=" & codMed & "));"
        Set rstRIC = dbs.OpenRecordset(strSQL, 2)  ' apre tblunione per
codice medico = a codice medico di tabella medici
            On Error Resume Next
            rstRIC.MoveFirst
            ContMin = rstRIC.RecordCount
                If ContMin = 0 Then
                   Exit Do
                End If
                rstRIC.MoveLast
            ContMax = rstRIC.RecordCount
            Perc = (ContMax * 5) \ 100
             If Perc = 0 Then ' se il recordset è piccolo
              Perc = 1
             End If
         For i = 1 To Perc
            MyValue = Int((ContMax - ContMin + 1) * Rnd + ContMin)  ' Genera
un valore casuale compreso tra 1 e Perc
            ''''' riga incriminata ---------------------------------
             DoCmd.GoToRecord acDataQuery, strSQL, acGoTo, MyValue   ' Si
sposta al record numero = estratto
                Set rstExtr = dbs.OpenRecordset("tblestrazioni",
dbOpenTable)
                rstExtr.AddNew
                'aggiunge dati
                rstExtr!IdRIC = rstRIC.Fields(0)
                rstExtr!cod_farmacia = rstRIC.Fields(1)
                rstExtr!tipo_mazz = rstRIC.Fields(2)
                rstExtr!prog_mazz = rstRIC.Fields(3)
                rstExtr!prog_ric = rstRIC.Fields(4)
                rstExtr!cod_ass = rstRIC.Fields(5)
                rstExtr!tblricette_cod_med = rstRIC.Fields(6)
                rstExtr!N_pezzi = rstRIC.Fields(7)
                rstExtr!cod_spec1 = rstRIC.Fields(8)
                rstExtr!cod_spec2 = rstRIC.Fields(9)
                rstExtr!cod_spec3 = rstRIC.Fields(10)
                rstExtr!cod_spec4 = rstRIC.Fields(11)
                rstExtr!cod_spec5 = rstRIC.Fields(12)
                rstExtr!cod_spec6 = rstRIC.Fields(13)
                rstExtr!Cod_farm = rstRIC.Fields(14)
                rstExtr!descr_farm = rstRIC.Fields(15)
                rstExtr!nota_CUF = rstCUF.Fields(0)
                'rstExtr!nota_CUF = rstRIC.Fields(16)
                rstExtr!TblN_Medici_Cod_MED = rstRIC.Fields(17)
                rstExtr!Nome_Med = rstRIC.Fields(18)
                  Form_Preparazione.Caption = "Estrazione dati del medico :
" & num & "  " & MyValue & "  " & rstRIC.Fields(18) & "  Nota:" & ncuf
                rstExtr.Update
                rstExtr.Close
               'dbs.Close
            Next
            'Debug.Print MyValue; rstRIC.Fields(0) & "   " & codMed & "   "
& ContMax & "   " & rstRIC.Fields(18)
        Beep
        ' End If
        rstRIC.Close
        rstCUF.MoveNext
        Loop
        rstCUF.Close
    rst.MoveNext
   Loop
rst.Close
dbs.Close
Beep
End Sub
'^^^^^^^^^^^^^^^^^^^^^^^^^^^
Sub creaTblestrazioni()
    If esisteTbl("tblestrazioni") = True Then
        Beep
    Else
        MsgBox ("La tabella non esiste... Adesso la creo!")
creaTblEstrazioniVuota  'chiamata a routine
    End If
End Sub
'^^^^^^^^^^^^^^^^^^^^^^^^^^^
'^^^^^^^^^^^^^^^^^^^^^^^^^^^
Public Function esisteTbl(Nometabella As String) As Boolean 'controlla se
esiste o meno una tabella
Dim tdf As TableDef
esisteTbl = False
For Each tdf In CurrentDb.TableDefs
    If tdf.Name = Nometabella Then
        esisteTbl = True
    Exit Function
    End If
Next tdf
End Function


title: Goto & recordcount

text:
C Briglia ha scritto nel messaggio <88gr4n$ovk$
1...@pegasus.tiscalinet.it
>...
>Aiutatemi a risolvere questo problema...
>Premetto sono un neofita di access .. per cui scusate gli strafalcioni
>
>
>            ''''' riga incriminata ---------------------------------
>             DoCmd.GoToRecord acDataQuery, strSQL, acGoTo, MyValue   ' Si
>sposta al record numero = estratto
Ma scusa eh?
Qui ti stai spostando in una certa riga della query strSQL
Sotto stai usando il recordset, generato dalla stringa strSQL e aperto
precedentemente che continua a stare fermo al record di prima...
Tu dovrai muoverti all'interno del recordset mediante le moveXXX o le
findXXX, metodi dei recordset appunto!!!
>                rstExtr!IdRIC = rstRIC.Fields(0)
>                rstExtr!cod_farmacia = rstRIC.Fields(1)
Antonio


title: Mobile Phone PDA Pocket PC

author: Pupu

text:
Do anyone know what are the differences of operating system, memory
capacity, computation power, communication protocol and security for
Mobile Phone, PDA and Pocket PC???
Also, the differences between the cost of devices and subscription fee
for Mobile phone, PDA and memory capacity.


title: utilizzo della condizione iif in un report

author: badush

text:
Ciao amici del news,
ho costruito un report, relativo ad una fattura, sulla base di un doppio
filtro, con il quale scelgo, al momento dell'apertura,  una fattura in  base
al suo numero ed in base ad una eventuale informazione supplementare sullo
stesso numero: ad esempio la fattura 1 bis.
Il numero della fattura e dell'informazione supplementare sono distinti in
due rispettive caselle.
Io vorrei mettere nella casella delle informazioni supplementari  una
condizione iif in base alla quale se digito 0 nel report non mi appare
l'informazione supplentare a differenza del caso contrario:
esempio se il numero di fattura è 1 e l'informazione supplementare è 0
nel report deve uscirmi 1; se è 1 bis deve uscirmi 1bis.
Ho provato a impostare la condizione, nella casella di testo in questo modo:
=iif([Note]=0;"";[Note]).
Sel il valore di Note è 0 funziona nel caso contrario mi da errore.
Come posso fare?
Grazie


author: Sergio MAZZA

text:
"badush" <
bad...@martucci.com
> ha scritto nel messaggio
news:g2rnc.44944$Qc.18...@twister1.libero.it...

Prova con:
=iif([Note]=0;"";Cstr([Note])).
Ciao.
--
Sergio MAZZA


text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:citnc.225976$rM4.9...@news4.tin.it...
> "badush" <
bad...@martucci.com
> ha scritto nel messaggio
> news:g2rnc.44944$Qc.18...@twister1.libero.it...
> Prova con:
> =iif([Note]=0;"";Cstr([Note])).
>
> Ciao.
>
> --
> Sergio MAZZA
Funziona!!
Grazie


title: Protezione databse

text:
Ho creato una distribuzione di un database Access 2K con Office 2K
Developer; per fare ciņ perņ devo operare dall'ambiente VBA e ciņ mi
impedisce di proteggere il mio database ed in particolare la stuttura
disabilitando il tasto Shift  e creando un file MDE. L'unica protezione che
posso impostare č una password sull'accesso al codice?
Qualcuno mi puo aiutare?
Grazie
Danilo.


title: Protezione databse

text:
"C.F." <
> Ho creato una distribuzione di un database Access 2K con Office 2K
> Developer; per fare ciň perň devo operare dall'ambiente VBA e ciň mi
> impedisce di proteggere il mio database ed in particolare la stuttura
> disabilitando il tasto Shift  e creando un file MDE.
Strumenti/Macro/VBA Editor ... a questo punto puoi avviare l'aggiunta di
preparazione Setup anche nel .MDE.


title: Protezione databse

text:
Funziona benissimo! Grazie.
"warp" <
war...@libero.it
> ha scritto nel messaggio
news:b_jm9.36053$e31.7...@twister2.libero.it...



title: Totale query selezione

author: aleter

text:
Ciao a tutti.
Vorrei saper se c'č il modo di ridurre di numero i passaggi per ottenere il
seguente risultato.
Ho 4 tabelle (portafoglio,effetti all'incasso,archivio incasso,cassa) dove
all'interno vi sono valori con e senza iva differenziati da un campo che
indica "Esente" o "ConIVA".
Per avere un totale dei netti (cioč senza IVA ove vi fosse) o creato due
query di selezione per tabella (una "Esente" ed una "ConIVA") e
successivamente una query per sommare ogni query di selezione ed infine una
query per totalizzare tutte le query di somma.
       Ricapitolando 8 query di selezione (2 per tabella)
                             8 query per il totale di ogni query si
selezione
                             1 query per il totale generale (somma dei
totali delle query)
            Totale        9 query
Spero di essere stato abbastanza chiaro, premetto che č poco che mi sono
avvicinato ad Access e di conseguenza mi scuso in anticipo se la domanda č
banale o stupida, perņ con le mie conoscenze attuali non sono riuscito a
trovare altra strada per raggiungere il risultato desiderato.
Grazie per l'attenzione.


title: Totale query selezione

author: Roberto da casa

text:
"aleter" <
aleter...@softhome.net
> ha scritto nel messaggio
news:3Dl4a.19353$%p6.15...@news.edisontel.com...
> Ciao a tutti.
>
> Vorrei saper se c'è il modo di ridurre di numero i passaggi per ottenere
il
> seguente risultato.
>
> Ho 4 tabelle (portafoglio,effetti all'incasso,archivio incasso,cassa) dove
> all'interno vi sono valori con e senza iva differenziati da un campo che
> indica "Esente" o "ConIVA".
>
> Per avere un totale dei netti (cioè senza IVA ove vi fosse) o creato due
> query di selezione per tabella (una "Esente" ed una "ConIVA") e
> successivamente una query per sommare ogni query di selezione ed infine
una
> query per totalizzare tutte le query di somma.
>
>        Ricapitolando 8 query di selezione (2 per tabella)
>                              8 query per il totale di ogni query si
> selezione
>                              1 query per il totale generale (somma dei
> totali delle query)
>
>             Totale        9 query
>
> Spero di essere stato abbastanza chiaro, premetto che è poco che mi sono
> avvicinato ad Access e di conseguenza mi scuso in anticipo se la domanda è
> banale o stupida, però con le mie conoscenze attuali non sono riuscito a
> trovare altra strada per raggiungere il risultato desiderato.
>
> Grazie per l'attenzione.
Creati una query unione che unisce e normalizza i record delle 4 tabelle e
su questa query unione creati una query con totali.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Totale query selezione

text:
Il 18 Feb 2003, 11:14, "Roberto da casa" <
r.ma...@libero.it
> ha scritto:
>
> "aleter" <
aleter...@softhome.net
> ha scritto nel messaggio
> news:3Dl4a.19353$%p6.15...@news.edisontel.com...
> > Ciao a tutti.
> >
> > Vorrei saper se c'č il modo di ridurre di numero i passaggi per ottenere
> il
> > seguente risultato.
> >
> > Ho 4 tabelle (portafoglio,effetti all'incasso,archivio incasso,cassa)
dove
> > all'interno vi sono valori con e senza iva differenziati da un campo che
> > indica "Esente" o "ConIVA".
> >
> > Per avere un totale dei netti (cioč senza IVA ove vi fosse) o creato due
> > query di selezione per tabella (una "Esente" ed una "ConIVA") e
> > successivamente una query per sommare ogni query di selezione ed infine
> una
> > query per totalizzare tutte le query di somma.
> >
> > Ricapitolando 8 query di selezione (2 per tabella)
> > 8 query per il totale di ogni query si
> > selezione
> > 1 query per il totale generale (somma dei
> > totali delle query)
> >
> > Totale 9 query
> >
> > Spero di essere stato abbastanza chiaro, premetto che č poco che mi sono
> > avvicinato ad Access e di conseguenza mi scuso in anticipo se la domanda
č
> > banale o stupida, perņ con le mie conoscenze attuali non sono riuscito a
> > trovare altra strada per raggiungere il risultato desiderato.
> >
> > Grazie per l'attenzione.
>
> Creati una query unione che unisce e normalizza i record delle 4 tabelle e
> su questa query unione creati una query con totali.
>
> --
> Roberto
Oltre la consiglio come sempre ineccepibile di Roberto (che more solito mi
ha fregato sul tempo) se vuoi ti allegerisco io di cassa e portafoglio!!
ciao MAssimilaino
--------------------------------
Inviato via
http://usenet.libero.it


title: Totale query selezione

text:
On Tue, 18 Feb 2003 08:54:23 +0100, "aleter"
<
aleter...@softhome.net
> wrote:
>Ciao a tutti.
>
>Vorrei saper se c'è il modo di ridurre di numero i passaggi per ottenere il
>seguente risultato.
>
>Ho 4 tabelle (portafoglio,effetti all'incasso,archivio incasso,cassa) dove
>all'interno vi sono valori con e senza iva differenziati da un campo che
>indica "Esente" o "ConIVA".
>
>Per avere un totale dei netti (cioè senza IVA ove vi fosse) o creato due
>query di selezione per tabella (una "Esente" ed una "ConIVA") e
>successivamente una query per sommare ogni query di selezione ed infine una
>query per totalizzare tutte le query di somma.
>
>       Ricapitolando 8 query di selezione (2 per tabella)
>                             8 query per il totale di ogni query si
>selezione
>                             1 query per il totale generale (somma dei
>totali delle query)
>
>            Totale        9 query
>
>Spero di essere stato abbastanza chiaro, premetto che è poco che mi sono
>avvicinato ad Access e di conseguenza mi scuso in anticipo se la domanda è
>banale o stupida, però con le mie conoscenze attuali non sono riuscito a
>trovare altra strada per raggiungere il risultato desiderato.
>
>Grazie per l'attenzione.
>
>
>
>
puoi fare una quer di unione e poi sul risultato raggruppi il campo
con iva e senza iva e sommi il campo importo
usi solo 2 query
Saluti.
Emanuele.


title: Totale query selezione

text: Nelle query di unione posso inserire dei parametri?


title: Totale query selezione

text:
On Tue, 18 Feb 2003 14:57:17 +0100, "aleter"
<
aleter...@softhome.net
> wrote:
>
>Nelle query di unione posso inserire dei parametri?
>
si
Saluti.
Emanuele.


title: [Access97] consenti lunghezza zero

author: nefertiti

text:
Ragazzi, ho un problemino. Vorrei modificare la proprieta' in oggetto
a un paio di campi di una tabella presente in circa 30 databases.
Ovviamente vorrei farlo via codice vba. Ma con le proprieta' dei campi
di tabelle ci ho gia' combattuto senza successo in passato.
Suggerimenti? A buon rendere.
Nefertiti


title: [Access97] consenti lunghezza zero

text:
"nefertiti" <
nrfert...@libero.it
> ha scritto nel messaggio
news:4050a78d...@powernews.libero.it...

Per quello che io so le proprietà di campo per campi già esistenti non
possono essere modificate da codice VBA, puoi solo impostarle per nuovi
campi che dovessi aggiungere alle tabelle tramite codice VBA.
Puoi vedere se fa al caso tuo la scappatoia suggerita sul Sito Comune (link
qui sotto), nella Sezione Tables, nella FAQ di Stefano Bettini intitolata
"Come si possono modificare via codice le proprietà dei campi di tabella?".
> Nefertiti
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: trasmissione e ricezione  porta seriale

author: Ivan

text:
salve a tutti
Devo comunicare, attraverso porta seriale, con un circuito stampato che mi
comanda dei relè.
Devo trasmettere i seguenti dati in esadecimale: 02 41 04
dove  02 e 04 sono i caratteri di controllo  Start Text e End of text e 41 è
il valore 65 in esadecimale.
Io fino ad ora per comunicare con la seriale utilizzavo "MSComm1.Output" per
inviare i dati e "MSComm1.Input" per leggere i dati.
Ora mi trovo in difficoltà nell'inviare dei valori in esadecimale , la
funzione Hex() mi converte il valore 65 e con Chr() ho i caratteri di
controllo ma come metto tutto insieme  per avere 02 41 04 ?
Se tutto è andato ok la scheda mi restituisce i valori 02 06 04  in
esadecimale oppure 02 21 04 se c'è stato un errore. come leggo questi
valori?
Grazie per la risposta.


title: trasmissione e ricezione  porta seriale

author: Lorenzo(pyx)

text:
In news:46715344$0$37194$
4faf...@reader3.news.tin.it
,
Ivan <
bell_...@tin.it
> ha scritto:

Ciao,
Prova a vedere questo demo di Giorgio Rancati
http://www.riolab.org/viewrisorsa.asp?id=53
Non utilizza MSComm ma le API di windows.
In particolare verifica l'utilizzo della variabi di tipo *Byte*
che rappresenta un singolo carattere ASCII.
Nel tuo caso dovendo trasmettere e ricevere dei valori
predefiniti fissi non dovrebbe essere complicato.
--
Lorenzo


title: trasmissione e ricezione  porta seriale

text:

Ho provato ma (colpevole la mia ignoranza) non ci sono riuscito , come
trasmetto i caratteri di controllo in esadecimale?
Giorgio Rancati ..... visto che hai fatto un lavoro notevole .......se ci
sei batti un colpo!!!


title: trasmissione e ricezione  porta seriale

text:
In news:46716cd9$0$37203$
4faf...@reader3.news.tin.it
,
Ivan <
bell_...@tin.it
> ha scritto:
>>> salve a tutti
>>>
[...]
>>>
>>> Devo trasmettere i seguenti dati in esadecimale: 02 41 04
>>>
>>> dove  02 e 04 sono i caratteri di controllo  Start Text e End of
>>> text e 41 è il valore 65 in esadecimale.
>>>
[...]
> Ho provato ma (colpevole la mia ignoranza) non ci sono riuscito , come
> trasmetto i caratteri di controllo in esadecimale?
>
> Giorgio Rancati ..... visto che hai fatto un lavoro notevole
> .......se ci sei batti un colpo!!!
Ma in realtà puoi inviarli nella base di numerazione che vuoi,
basta che il valore sia quello giusto (!)
Per mia esperienza, tramite API, invia sempre un carattere alla volta,
e visto che i valori sono noti e solo tre:
VarB=2
WriteFile(hCom, VarB, 1, ByteRicevuti,0)
VarB=4
WriteFile(hCom, VarB, 1, ByteRicevuti,0)
VarB=65
WriteFile(hCom, VarB, 1, ByteRicevuti,0)
--
Lorenzo


title: trasmissione e ricezione  porta seriale

text:
"Ivan" <
bell_...@tin.it
> ha scritto nel messaggio
news:46715344$0$37194$4faf...@reader3.news.tin.it...
> salve a tutti
>
> Devo comunicare, attraverso porta seriale, con un circuito stampato che mi
> comanda dei relč.
La prossima volta comunica anche che lo stesso messaggio l'hai inviato
all'altro NG, e (magari) che hai anche risolto (e come)...
> Grazie per la risposta.
Ciao.
--
Sergio MAZZA


title: trasmissione e ricezione  porta seriale

text:
>> Devo comunicare, attraverso porta seriale, con un circuito stampato che
>> mi comanda dei relè.
>
> La prossima volta comunica anche che lo stesso messaggio l'hai inviato
> all'altro NG, e (magari) che hai anche risolto (e come)...
>
>> Grazie per la risposta.
>
> Ciao.
> --
> Sergio MAZZA
E' vero, scusate, ma ero talmente felice di aver risolto il problema che mi
sono scordato di postare la soluzione.
Ecco il suggerimento (che ha funzionato)  di  San Giorgio Rancati :
Per mettere insieme i tre valori usa una variabile stringa
----
Dim Comando, StringaRitorno as String
Comando=Chr(2)+Chr(65)+Chr(4)
----
 ed io ho scritto
Dim Comando, StringaRitorno as String
Comando=Chr(2)+Chr(65)+Chr(4)
MSComm1.Output = Comando
----
in modo da inviare i soli tre caratteri e non i sei caratteri della stringa
unicode.
> Se tutto è andato ok la scheda mi restituisce i valori 02 06 04  in
> esadecimale oppure 02 21 04 se c'è stato un errore. come leggo questi
> valori?
----
If StringaRitorno=Chr(2)+Chr(6)+Chr(4) Then
   'Ok
----
 ed io ho scritto
StringaRitorno =  MSComm1.Input
If StringaRitorno=Chr(2)+Chr(6)+Chr(4) Then
 'OK
End If
----
A chi può servire ......
Saluti


title: List box collegate

text:
Ciao a tutti.
Ho due list box "collegate" nel senso che la seconda visualizza alcuni
valori, in base a quale valore viene selezionato nella prima listbox.
Se io sull'evento after update di un altro controllo della stessa mashera
(ad esempio una combo) scrivo il codice :
....
me.listbox1.requery
me.listbox2.requery
....
mi fa la requery solo della prima listbox.
come mai?
Vi ringrazio in anticipo.
Dario
--
Il bello della vita è vivere:
molti esistono, ecco tutto.
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: List box collegate

author: TheMax

text:
"Dario84" <
da...@romagnacom.com
> ha scritto nel messaggio
news:br9sjj$dqc$1...@news.newsland.it...

Ciao,
Il requery lo fa su tutte e due, solo che facendolo sulla prima perdi il
valore che era selezionato, pertanto la seconda presumo non ti venga
filtrata correttamente.
Ciao,
Massimo
--
web:
www.piubelli.net
Vuoi il mio indirizzo? Togli _cut_ per rispondermi


title: report con filtro?

text:
Non sono un esperto...ancora un aiuto!
Ho una maschera che contiene una sottomaschera che visualizza i dati in base
a una query. Sulla maschera sono riuscito a mettere dei campi che l'utente
puņ compilare e premendo un pulsante che ho chiamato FILTRA ottiene sulla
sottomaschera solo i dati richiesti. E fino a qui funziona, magari non č
formalmente creato da manuale, ma funziona.
La mia domanda č: come faccio a stampare un report contenente i dati della
sottomaschera GIA' FILTRATI?? Come?
Altrimenti la mia unica soluzione alternativa sarebbe quella di fare una
squallidissima stampa della videata....rabbrividisco.
Grazie in anticipo


title: report con filtro?

author: stefano

text:
Ciao, premetto che non sono praticissimo comunque crei una query con tutti i
campi che ti servono  e un report come desideri. Poi richiami il report
della query con il filtro che hai deciso di applicare. Per fare cio' io ho
usato  docmd.openreport, ho risolto leggendo sia il comando in inglese che
il relativo (aprimaschera) in italiano
Stefano
"..::] ZzZ [::.." <
gan...@libero.it
> ha scritto nel messaggio
news:GznIa.102730$Ny5.2...@twister2.libero.it...



title: report con filtro?

text:
"stefano" <
stefa...@inwind.it
> ha scritto nel messaggio
news:3VoIa.103049$Ny5.2...@twister2.libero.it...
> Ciao, premetto che non sono praticissimo comunque crei una query con tutti
i
Già...
Infatti non hai scritto correttamente DOPO il quoting
Antonio


title: report con filtro?

text:
"..::] ZzZ [::.." <
gan...@libero.it
> ha scritto nel messaggio
news:GznIa.102730$Ny5.2...@twister2.libero.it...
> Non sono un esperto...ancora un aiuto!
>
> Ho una maschera che contiene una sottomaschera che visualizza i dati in
base
> a una query. Sulla maschera sono riuscito a mettere dei campi che l'utente
> puň compilare e premendo un pulsante che ho chiamato FILTRA ottiene sulla
> sottomaschera solo i dati richiesti. E fino a qui funziona, magari non č
> formalmente creato da manuale, ma funziona.
> La mia domanda č: come faccio a stampare un report contenente i dati della
> sottomaschera GIA' FILTRATI?? Come?
> Altrimenti la mia unica soluzione alternativa sarebbe quella di fare una
> squallidissima stampa della videata....rabbrividisco.
Riapplica i filtri anche al report.
Usa il docmd.openreport, vedi la sintassi, vedi il parametro criteriWHERE e
riempilo con tutti i filtri utilizzato.
Antonio


title: report con filtro?

text:
"..::] ZzZ [::.." <
gan...@libero.it
> ha scritto nel messaggio
news:GznIa.102730$Ny5.2...@twister2.libero.it...
> Non sono un esperto...ancora un aiuto!
>
> Ho una maschera che contiene una sottomaschera che visualizza i dati in
base
> a una query. Sulla maschera sono riuscito a mettere dei campi che l'utente
> può compilare e premendo un pulsante che ho chiamato FILTRA ottiene sulla
> sottomaschera solo i dati richiesti. E fino a qui funziona, magari non è
> formalmente creato da manuale, ma funziona.
> La mia domanda è: come faccio a stampare un report contenente i dati della
> sottomaschera GIA' FILTRATI?? Come?
> Altrimenti la mia unica soluzione alternativa sarebbe quella di fare una
> squallidissima stampa della videata....rabbrividisco.
>
> Grazie in anticipo
Se per filtrare i dati da visualizzare nella sottomaschera hai usato la
proprietà Filter, all'apertura del report imposta la proprietà Filter del
report con la proprietà Filter dell sottomaschera, dopo di che imposta a
True la proprietà FilterOn del report.
Se invece per filtrare i dati hai basato la sottomaschera su una query, usa
la stessa query parametrica, come origine record del report.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: x chi ha bisogno del runtime A97

author: Silvio Berruti

text:
Per chi ha bisogno di acquistare Office 97 Developer Edition e non lo trova
+ in commercio può rivolgersi direttamente a M$.
Maggiori informazioni le trovate a questo indirizzo:
http://www.microsoft.com/office/developer/downgrade.htm
Ciao
--
Silvio
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access


title: x chi ha bisogno del runtime A97

author: Karl Donaubauer

text:
Silvio Berruti schrieb:
> Per chi ha bisogno di acquistare Office 97 Developer Edition e non lo
trova
> + in commercio può rivolgersi direttamente a M$.
>
> Maggiori informazioni le trovate a questo indirizzo:
>
>
http://www.microsoft.com/office/developer/downgrade.htm
Purtroppo è importante la frase
>If you are outside the United States and Canada, please visit the
>Microsoft Product Support Services site to get contact information
>for your local Microsoft subsidiary.
Questo modo di downgrade funziona nelle Stati Uniti (anche in Australia).
Hanno confermato qualche partecipanti nel ng cdma.
(
http://www.trigeminal.com/usenet/usenet020.asp
)
Con MS Germania invece (vuol dire per la versione tedesca) non è possibile.
Sarebbe interessante di sapere cosa dica MS Italia.
--
cu
Karl
*********
Scusate il mio malissimo Italiano. Faccio solo esercizi qui.
Access-FAQ (Tedesco):
http://www.donkarl.com


title: Di nuovo password..

author: Denis Vitali

text:
Ripeto il mio problema vistoche in due mi hanno risposto ma nessuno mi ha dato
delle dritte o delle soluzioni ma hanno solo discusso se mettere o no online e
sul sito ufficiale un programmino del genere....
come faccio a togliere la password ad un db access 97 che ho protetto anni fa
dato che ora non ricordo piu' la password?
Devo aggiornare il db e non so come entrare nella struttura visto che mi chiede
la password (dimenticata) chi mi aiuta davvero?
Grazie
--
Posted from  [62.98.125.249]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Di nuovo password..

author: Antonio Biso

text:
Denis Vitali <
d.vi...@sandlab.it
> wrote in message
6ba988a795d2c16db11...@mygate.mailgate.org...
> Ripeto il mio problema vistoche in due mi hanno risposto ma nessuno mi ha
dato
> delle dritte o delle soluzioni ma hanno solo discusso se mettere o no
online e
> sul sito ufficiale un programmino del genere....
>
> come faccio a togliere la password ad un db access 97 che ho protetto anni
fa
> dato che ora non ricordo piu' la password?
> Devo aggiornare il db e non so come entrare nella struttura visto che mi
chiede
> la password (dimenticata) chi mi aiuta davvero?
Potresti rivolgerti a qualche bravo professionista...
che so?
Gambadilegno...Berlusconi...Felice Maniero...
Antonio


title: Di nuovo password..

author: Giovanni Torre

text:
quello che dici tu
è che vorresti crakkare il "tuo" database
i  programmini  esistono.....
uno è
'advanced ......... recovery'
Denis Vitali <
d.vi...@sandlab.it
> wrote in message
6ba988a795d2c16db11...@mygate.mailgate.org...



title: Di nuovo password..

author: All eyez On me

text:
"Denis Vitali" <
d.vi...@sandlab.it
> ha scritto nel messaggio
news:6ba988a795d2c16db11...@mygate.mailgate.org...

Scaricati da internet qualche demo di password recovery... ti mostra le
prime tre lettere della psw e sicuramente ti tornerà in mente.. se è la tua.
Altrimenti devi andare su qualche newsgroup di cracker
AEOM


title: donkarl.com/it?FAQ4.13

author: Cataldo Formaro

text:
sto lavorando sugli eventi non in lista.
Dalla maschera1, non avendo in lista il cliente apre M_Lista_Carico.
Dopo aver popolato la maschera, chiudo, ma mi segnala: Impossibile trovare
la maschera M_Preventivo
--------questo il codice di chiusura maschera1------------
Private Sub Form_Close()
On Error GoTo Err_Form_Close
If IsLoaded("M_Preventivo") Then
Forms!M_Preventivo.CasellaCombinata135 = Me!lCodiceCliente
Forms!M_Preventivo.CasellaCombinata116.Requery
Forms!M_Preventivo.CasellaCombinata135.Requery
Else
End If
If IsLoaded("M_Lista_Carico") Then
Forms!M_Preventivo.CasellaCombinata116 = Me!lCodiceCliente
Forms!M_Preventivo.CasellaCombinata116.Requery
Forms!M_Preventivo.CasellaCombinata135.Requery
End If
Exit_Form_Close:
    Exit Sub
Err_Form_Close:
    MsgBox Err.Description
    Resume Exit_Form_Close
End Sub
precedentemente con altro medoto di gestione noninlista, l'errore non mi
usciva.
Ciao
--
Cataldo Formaro


title: donkarl.com/it?FAQ4.13

text:
Cataldo Formaro wrote:
> sto lavorando sugli eventi non in lista.
> Dalla maschera1, non avendo in lista il cliente apre M_Lista_Carico.
> Dopo aver popolato la maschera, chiudo, ma mi segnala: Impossibile
> trovare la maschera M_Preventivo
>
> --------questo il codice di chiusura maschera1------------
> Private Sub Form_Close()
>
> On Error GoTo Err_Form_Close
>
> If IsLoaded("M_Preventivo") Then
> Forms!M_Preventivo.CasellaCombinata135 = Me!lCodiceCliente
> Forms!M_Preventivo.CasellaCombinata116.Requery
> Forms!M_Preventivo.CasellaCombinata135.Requery
> Else
> End If
> ...
Ciao Cataldo,
se Access ti dà questo messaggio è molto probabile che
la tua (?) funzione IsLoaded() non funziona. Esiste una proprietà
di Access che si chiama IsLoaded, ma con una sintassi molto
diversa che puoi vedere qui:
Verificare se una maschera è aperta
www.donkarl.com/it?FAQ4.19
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: donkarl.com/it?FAQ4.13

text:
cut
> se Access ti dà questo messaggio è molto probabile che
> la tua (?) funzione IsLoaded() non funziona. Esiste una proprietà
> di Access che si chiama IsLoaded, ma con una sintassi molto
> diversa che puoi vedere qui:
>
> Verificare se una maschera è aperta
>
www.donkarl.com/it?FAQ4.19
>
> --
> HTH
> Karl
> *********
> Access FAQ:
www.donkarl.com/it
Ciao Karl,
ho creato un modulo pubblico, cosi impostato:
Public Function fctIsFormOpen(StrName As String) As Boolean
  fctIsFormOpen = (SysCmd(acSysCmdGetObjectState, acForm, StrName) > 0)
End Function
quindi su chiusura form ho questo codice:
Private Sub Form_Close()
On Error GoTo Err_Form_Close
On Error GoTo Err_Form_Close
If fctIsFormOpen("M_Preventivo") Then
Forms!M_Preventivo.CasellaCombinata135 = Me!lCodiceCliente
Forms!M_Preventivo.CasellaCombinata116.Requery
Forms!M_Preventivo.CasellaCombinata135.Requery
Else
End If
If fctIsFormOpen("M_Lista_Carico") Then
Forms!M_Preventivo.CasellaCombinata116 = Me!lCodiceCliente
Forms!M_Preventivo.CasellaCombinata116.Requery
Forms!M_Preventivo.CasellaCombinata135.Requery
End If
Exit_Form_Close:
    Exit Sub
Err_Form_Close:
    MsgBox Err.Description
    Resume Exit_Form_Close
End Sub
Mi restituisce sempre lo steso errore di prima.
Cataldo Formaro


title: donkarl.com/it?FAQ4.13

author: IvanDaBologna

text:
Cataldo Formaro ha scritto:
> sto lavorando sugli eventi non in lista.
> Dalla maschera1, non avendo in lista il cliente apre M_Lista_Carico.
> Dopo aver popolato la maschera, chiudo, ma mi segnala: Impossibile trovare
> la maschera M_Preventivo
[cut]
>
> If IsLoaded("M_Lista_Carico") Then
> Forms!M_Preventivo.CasellaCombinata116 = Me!lCodiceCliente
> Forms!M_Preventivo.CasellaCombinata116.Requery
> Forms!M_Preventivo.CasellaCombinata135.Requery
> End If
>
[cut]
oltre al giusto consiglio di Karl, ti chiedo se queste 5 righe
significano qualcosa?
Controlli se ï¿œ aperta M_Lista_Carico ma popoli M_Preventivo che potrebbe
essere chiusa .... non capisco.
IvanDaBologna


title: donkarl.com/it?FAQ4.13

text:
>> [cut]
>>
>>> If IsLoaded("M_Lista_Carico") Then
>>> Forms!M_Preventivo.CasellaCombinata116 = Me!lCodiceCliente
>>> Forms!M_Preventivo.CasellaCombinata116.Requery
>>> Forms!M_Preventivo.CasellaCombinata135.Requery
>>> End If
>>>
> Ciao Ivan,
> non mi sono accorto dell'errore di battitura;
> dalla M_Cliente_Ins_Mod debbo controllare se le altre maschere sono aperte o
> meno e quindi fare gli aggiornamenti col requery.
>
>
> Cataldo Formaro
> (erronemamente ti ho risposto al privato)
>
>
Eliminando l'errore hai risolto ??
IvanDaBologna


title: donkarl.com/it?FAQ4.13

text:
Cataldo Formaro wrote:
> "IvanDaBologna ha scritto:
>>>> ...
>>>>> If IsLoaded("M_Lista_Carico") Then
>>>>> Forms!M_Preventivo.CasellaCombinata116 = Me!lCodiceCliente
>>>>> Forms!M_Preventivo.CasellaCombinata116.Requery
>>>>> Forms!M_Preventivo.CasellaCombinata135.Requery
>>>>> End If
>>>>>
>>> non mi sono accorto dell'errore di battitura;
>>> dalla M_Cliente_Ins_Mod debbo controllare se le altre maschere sono
>>> aperte o
>>> meno e quindi fare gli aggiornamenti col requery.
>>>
>> Eliminando l'errore hai risolto ??
>
> L'avevo appena segnalato che continua a dare l'errore.
No. Leggi bene cosa ti ha scritto e chiesto Ivan.
Nella tua risposta al mio post hai di nuovo scritto la cosa
a che ti ha avvertito:
> If fctIsFormOpen("M_Lista_Carico") Then
> Forms!M_Preventivo.CasellaCombinata116 = Me!lCodiceCliente
Cioè che fai la prova per "M_Lista_Carico" ma poi aggiorni un
controllo nella maschera diversa (!) "M_Preventivo".



title: donkarl.com/it?FAQ4.13

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:6qhh56F...@mid.individual.net...
> Cataldo Formaro wrote:
>> "IvanDaBologna ha scritto:
>>>>> ...
>>>>>> If IsLoaded("M_Lista_Carico") Then
>>>>>> Forms!M_Preventivo.CasellaCombinata116 = Me!lCodiceCliente
>>>>>> Forms!M_Preventivo.CasellaCombinata116.Requery
>>>>>> Forms!M_Preventivo.CasellaCombinata135.Requery
>>>>>> End If
>>>>>>
>>>> non mi sono accorto dell'errore di battitura;
>>>> dalla M_Cliente_Ins_Mod debbo controllare se le altre maschere sono
>>>> aperte o
>>>> meno e quindi fare gli aggiornamenti col requery.
>>>>
>>> Eliminando l'errore hai risolto ??
>>
>> L'avevo appena segnalato che continua a dare l'errore.
>
> No. Leggi bene cosa ti ha scritto e chiesto Ivan.
> Nella tua risposta al mio post hai di nuovo scritto la cosa
> a che ti ha avvertito:
>
>> If fctIsFormOpen("M_Lista_Carico") Then
>> Forms!M_Preventivo.CasellaCombinata116 = Me!lCodiceCliente
>
> Cioč che fai la prova per "M_Lista_Carico" ma poi aggiorni un
> controllo nella maschera diversa (!) "M_Preventivo".
>
> --
> HTH
> Karl
> *********
> Access FAQ:
www.donkarl.com/it
le maschere da verificare sono piu di una
Private Sub Form_Close()
On Error GoTo Err_Form_Close
On Error GoTo Err_Form_Close
If fctIsFormOpen("M_Preventivo") Then
Forms!M_Preventivo.CasellaCombinata135 = Me!lCodiceCliente
Forms!M_Preventivo.CasellaCombinata116.Requery
Forms!M_Preventivo.CasellaCombinata135.Requery
Else
End If
If fctIsFormOpen("M_Lista_Carico") Then
Forms!M_Preventivo.CasellaCombinata116 = Me!lCodiceCliente
Forms!M_Preventivo.CasellaCombinata116.Requery
Forms!M_Preventivo.CasellaCombinata135.Requery
else
End If
Exit_Form_Close:
    Exit Sub
Err_Form_Close:
    MsgBox Err.Description
    Resume Exit_Form_Close
End Sub
vale a dire che
se M_Preventivo č aperta requery, else
se M_Lista_Caricoo č aperta requery, else
č piu chiaro?
--
Cataldo Formaro


title: donkarl.com/it?FAQ4.13

text:
Cataldo Formaro wrote:
> "Karl Donaubauer ha scritto:
>>
>> No. Leggi bene cosa ti ha scritto e chiesto Ivan.
>> Nella tua risposta al mio post hai di nuovo scritto la cosa
>> a che ti ha avvertito:
>>
>>> If fctIsFormOpen("M_Lista_Carico") Then
>>> Forms!M_Preventivo.CasellaCombinata116 = Me!lCodiceCliente
>>
>> Cioè che fai la prova per "M_Lista_Carico" ma poi aggiorni un
>> controllo nella maschera diversa (!) "M_Preventivo".
> ...
> le maschere da verificare sono piu di una
>
> Private Sub Form_Close()
>
> On Error GoTo Err_Form_Close
>
> On Error GoTo Err_Form_Close
>
> If fctIsFormOpen("M_Preventivo") Then
> Forms!M_Preventivo.CasellaCombinata135 = Me!lCodiceCliente
> Forms!M_Preventivo.CasellaCombinata116.Requery
> Forms!M_Preventivo.CasellaCombinata135.Requery
> Else
> End If
>
> If fctIsFormOpen("M_Lista_Carico") Then
> Forms!M_Preventivo.CasellaCombinata116 = Me!lCodiceCliente
> Forms!M_Preventivo.CasellaCombinata116.Requery
> Forms!M_Preventivo.CasellaCombinata135.Requery
> else
> End If
>
> Exit_Form_Close:
>    Exit Sub
>
> Err_Form_Close:
>    MsgBox Err.Description
>    Resume Exit_Form_Close
>
> End Sub
>
> vale a dire che
> se M_Preventivo è aperta requery, else
> se M_Lista_Caricoo è aperta requery, else
>
> è piu chiaro?
Non sono sicuro.
Qual'è la riga di codice dove succede l'errore, cioè quello che
Access ti mostra in giallo con l'errore?
In ogni case col tuo secondo blocco di codice non provi
se la maschera M_Preventivo è aperta. Certo senza
questa prova e se non è aperta ricevi l'errore che riporti.
BTW
I nomi dei tuoi caselle combinate sono brutti. Sarebbe molto
meglio di impostare nomi che dicono cosa c'è dentro o
cosa fanno.



title: donkarl.com/it?FAQ4.13

text:
Karl Donaubauer wrote:
> ...
> BTW
> I nomi dei tuoi caselle combinate sono brutti. ...
BTW il mio italiano è brutto...
I nomi delle tue caselle combinate sono brutte.
Giusto?


title: donkarl.com/it?FAQ4.13

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:6qhi4pF...@mid.individual.net...

Non mi mostra nulla, esce solo un msgbox .... con la sola possibilità di
cliccare su OK, dopodiche ritorna al punto di prima M_Lista_Di_Carico al
controllo dove stavo inserendo il cliente "non in lista"
>
> In ogni case col tuo secondo blocco di codice non provi
> se la maschera M_Preventivo è aperta. Certo senza
> questa prova e se non è aperta ricevi l'errore che riporti.
>
> BTW
> I nomi dei tuoi caselle combinate sono brutti. Sarebbe molto
> meglio di impostare nomi che dicono cosa c'è dentro o
> cosa fanno.
Sono due caselle combinate
116 per la ricerca del cliente per cognome
135 per la ricerca del cliente per codicecliente
lo so che sono brutte, ma al momento debbo andare avanti..
> --
> HTH
> Karl
> *********
> Access FAQ:
www.donkarl.com/it
ciao
--
Cataldo Formaro


title: donkarl.com/it?FAQ4.13

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:6qhimaF...@mid.individual.net...
> Karl Donaubauer wrote:
>> ...
>> BTW
>> I nomi dei tuoi caselle combinate sono brutti. ...
>
> BTW il mio italiano č brutto...
>
> I nomi delle tue caselle combinate sono brutte.
>
> Giusto?
La tua correzione č molto piů veloce delle mie :-))


title: donkarl.com/it?FAQ4.13

text:
Cataldo Formaro wrote:
>>> ...
>>> If fctIsFormOpen("M_Preventivo") Then
>>> Forms!M_Preventivo.CasellaCombinata135 = Me!lCodiceCliente
>>> Forms!M_Preventivo.CasellaCombinata116.Requery
>>> Forms!M_Preventivo.CasellaCombinata135.Requery
>>> ...
>>> If fctIsFormOpen("M_Lista_Carico") Then
>>> Forms!M_Preventivo.CasellaCombinata116 = Me!lCodiceCliente
>>> Forms!M_Preventivo.CasellaCombinata116.Requery
>>> Forms!M_Preventivo.CasellaCombinata135.Requery
>>> ...
>>> vale a dire che
>>> se M_Preventivo è aperta requery, else
>>> se M_Lista_Caricoo è aperta requery, else
>> ...
Perché non fai la prova mancante?
Puoi o nidificare il secondo blocco di codice nel primo
o invece iniziare il secondo blocco con
If fctIsFormOpen("M_Preventivo") And _
        fctIsFormOpen("M_Lista_Carico") Then
...



title: donkarl.com/it?FAQ4.13

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:6qhk3dF...@mid.individual.net...

ecco il codice per intero
Private Sub Form_Close()
On Error GoTo Err_Form_Close
If fctIsFormOpen("M_Preventivo") And _
    fctIsFormOpen("M_Lista_Carico") And _
        fctIsFormOpen("M_DDT") And _
            fctIsFormOpen("M_Fattura") And _
                fctIsFormOpen("M_Nota_credito") And _
                    fctIsFormOpen("M_Vendita_Cassa") Then
           Forms!M_Preventivo.CasellaCombinata116 = Me!lCodiceCliente
        Forms!M_Preventivo.CasellaCombinata116.Requery
        Forms!M_Preventivo.CasellaCombinata135.Requery
     Else
End If
Exit_Form_Close:
    Exit Sub
Err_Form_Close:
    MsgBox Err.Description
    Resume Exit_Form_Close
End Sub
ho addirittura a togliere else.. ma niente
Cataldo Formaro


title: donkarl.com/it?FAQ4.13

text:
Cataldo Formaro wrote:
> "Karl Donaubauer ha scritto:
> ...
> ecco il codice per intero
> Private Sub Form_Close()
>
> On Error GoTo Err_Form_Close
>
> If fctIsFormOpen("M_Preventivo") And _
>    fctIsFormOpen("M_Lista_Carico") And _
>        fctIsFormOpen("M_DDT") And _
>            fctIsFormOpen("M_Fattura") And _
>                fctIsFormOpen("M_Nota_credito") And _
>                    fctIsFormOpen("M_Vendita_Cassa") Then
>           Forms!M_Preventivo.CasellaCombinata116 = Me!lCodiceCliente
>        Forms!M_Preventivo.CasellaCombinata116.Requery
>        Forms!M_Preventivo.CasellaCombinata135.Requery
>     Else
> End If
>
> Exit_Form_Close:
>    Exit Sub
>
> Err_Form_Close:
>    MsgBox Err.Description
>    Resume Exit_Form_Close
>
> End Sub
>
> ho addirittura a togliere else.. ma niente
> ...
Cosa vuol dire "niente"?
Ricevi l'errore o non succede niente?
Se niente vuol dire niente... poi ehm, Cataldo... un dubbio che mi
viene in mente... è quasi impossibile ;-) ma ...
Non puo darsi che nel tuo database una maschera "M_Preventivo"
non esiste? Hai controllato e ricontrollato il nome esatto nella
finestra database?



title: donkarl.com/it?FAQ4.13

text:
Possiamo pranzare tranquilli, tutto risolto, ecco come:
Private Sub Form_Close()
On Error GoTo Err_Form_Close
If fctIsFormOpen("M_Preventivo") Then
Forms!M_Preventivo.CasellaCombinata116 = Me!lCodiceCliente
        Forms!M_Preventivo.CasellaCombinata116.Requery
        Forms!M_Preventivo.CasellaCombinata135.Requery
        Else
     End If
    If fctIsFormOpen("M_Lista_Carico") Then
  Forms!M_Lista_Carico.CasellaCombinata116 = Me!lCodiceCliente
        Forms!M_Lista_Carico.CasellaCombinata116.Requery
        Forms!M_Lista_Carico.CasellaCombinata135.Requery
        Else
        End If
       If fctIsFormOpen("M_DDT") Then
        Forms!M_DDT.CasellaCombinata116 = Me!lCodiceCliente
        Forms!M_DDT.CasellaCombinata116.Requery
        Forms!M_DDT.CasellaCombinata135.Requery
        Else
       End If
            If fctIsFormOpen("M_Fattura") Then
            Forms!M_Fattura.CasellaCombinata116 = Me!lCodiceCliente
        Forms!M_Fattura.CasellaCombinata116.Requery
        Forms!M_Fattura.CasellaCombinata135.Requery
        Else
         End If
                If fctIsFormOpen("M_Nota_credito") Then
                  Forms!M_Nota_credito.CasellaCombinata116 =
Me!lCodiceCliente
        Forms!M_Nota_credito.CasellaCombinata116.Requery
        Forms!M_Nota_credito.CasellaCombinata135.Requery
        Else
           End If
                    If fctIsFormOpen("M_Vendita_Cassa") Then
        Forms!M_Vendita_Cassa.CasellaCombinata116 = Me!lCodiceCliente
        Forms!M_Vendita_Cassa.CasellaCombinata116.Requery
        Forms!M_Vendita_Cassa.CasellaCombinata135.Requery
   Else
   End If
Exit_Form_Close:
    Exit Sub
Err_Form_Close:
    MsgBox Err.Description
    Resume Exit_Form_Close
End Sub
Ciao Karl, alla prossima
Cataldo Formaro


title: donkarl.com/it?FAQ4.13

text:
Cataldo Formaro ha scritto:
> "Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
> news:6qhlqaF...@mid.individual.net...
>> Cataldo Formaro wrote:
>>> "Karl Donaubauer ha scritto:
>>> ...
>>> ecco il codice per intero
>>> Private Sub Form_Close()
>>>
>>> On Error GoTo Err_Form_Close
>>>
>>> If fctIsFormOpen("M_Preventivo") And _
>
> Scusa Karl, perchè metti and e non Or
>
>
>>>    fctIsFormOpen("M_Lista_Carico") And _
>>>        fctIsFormOpen("M_DDT") And _
>>>            fctIsFormOpen("M_Fattura") And _
>>>                fctIsFormOpen("M_Nota_credito") And _
>>>                    fctIsFormOpen("M_Vendita_Cassa") Then
>>>           Forms!M_Preventivo.CasellaCombinata116 = Me!lCodiceCliente
>>>        Forms!M_Preventivo.CasellaCombinata116.Requery
>>>        Forms!M_Preventivo.CasellaCombinata135.Requery
>>>     Else
> Inoltre, manca l'aggiornamento alle combo delle altre maschere oltre a
> M_Preventivo
> quindi avevo pensato
> --------------------------
> Private Sub Form_Close()
>
> On Error GoTo Err_Form_Close
>
> If fctIsFormOpen("M_Preventivo") And _
>     fctIsFormOpen("M_Lista_Carico") And _
>         fctIsFormOpen("M_DDT") And _
>             fctIsFormOpen("M_Fattura") And _
>                 fctIsFormOpen("M_Nota_credito") And _
>                     fctIsFormOpen("M_Vendita_Cassa") Then
>
>         Forms!M_Preventivo.CasellaCombinata116 = Me!lCodiceCliente
>         Forms!M_Preventivo.CasellaCombinata116.Requery
>         Forms!M_Preventivo.CasellaCombinata135.Requery
>         Else
>         Forms!M_Lista_Carico.CasellaCombinata116 = Me!lCodiceCliente
>         Forms!M_Lista_Carico.CasellaCombinata116.Requery
>         Forms!M_Lista_Carico.CasellaCombinata135.Requery
>         Else
>         Forms!M_DDT.CasellaCombinata116 = Me!lCodiceCliente
>         Forms!M_DDT.CasellaCombinata116.Requery
>         Forms!M_DDT.CasellaCombinata135.Requery
>         Else
>         Forms!M_Fattura.CasellaCombinata116 = Me!lCodiceCliente
>         Forms!M_Fattura.CasellaCombinata116.Requery
>         Forms!M_Fattura.CasellaCombinata135.Requery
>         Else
>         Forms!M_Nota_credito.CasellaCombinata116 = Me!lCodiceCliente
>         Forms!M_Nota_credito.CasellaCombinata116.Requery
>         Forms!M_Nota_credito.CasellaCombinata135.Requery
>         Else
>         Forms!M_Vendita_Cassa.CasellaCombinata116 = Me!lCodiceCliente
>         Forms!M_Vendita_Cassa.CasellaCombinata116.Requery
>         Forms!M_Vendita_Cassa.CasellaCombinata135.Requery
>    'Else
>    End If
>
> Exit_Form_Close:
>     Exit Sub
>
> Err_Form_Close:
>     MsgBox Err.Description
>     Resume Exit_Form_Close
>
> End Sub
>
> Mi si pianta al secondo ELse
>
> Cataldo Formaro
>
>
ma è un errore logico!
Se vuoi mettere vari If ... Then Else li devi indicare uno per uno e
chiudere correttamente.
  If fctIsFormOpen("M_Preventivo") Then
     Forms!M_Preventivo.CasellaCombinata116 = Me!lCodiceCliente
     Forms!M_Preventivo.CasellaCombinata116.Requery
     Forms!M_Preventivo.CasellaCombinata135.Requery
  Else
     If fctIsFormOpen("M_Lista_Carico") Then
        Forms!M_Lista_Carico.CasellaCombinata116 = Me!lCodiceCliente
        Forms!M_Lista_Carico.CasellaCombinata116.Requery
        Forms!M_Lista_Carico.CasellaCombinata135.Requery
     Else
        If fctIsFormOpen("M_DDT") Then
           Forms!M_DDT.CasellaCombinata116 = Me!lCodiceCliente
           Forms!M_DDT.CasellaCombinata116.Requery
           Forms!M_DDT.CasellaCombinata135.Requery
        Else
           If fctIsFormOpen("M_Fattura") Then
              Forms!M_Fattura.CasellaCombinata116 = Me!lCodiceCliente
              Forms!M_Fattura.CasellaCombinata116.Requery
              Forms!M_Fattura.CasellaCombinata135.Requery
           Else
              If fctIsFormOpen("M_Nota_credito") Then
                 Forms!M_Nota_credito.CasellaCombinata116 =
Me!lCodiceCliente
                 Forms!M_Nota_credito.CasellaCombinata116.Requery
                 Forms!M_Nota_credito.CasellaCombinata135.Requery
              Else
                 If fctIsFormOpen("M_Vendita_Cassa") Then
                  Forms!M_Vendita_Cassa.CasellaCombinata116 =
Me!lCodiceCliente
                  Forms!M_Vendita_Cassa.CasellaCombinata116.Requery
                  Forms!M_Vendita_Cassa.CasellaCombinata135.Requery
              End If
           End If
        End If
     End If
   End If
.... anche se non ho ben capito tutto questo ambaradan. Molto meglio
mettersi in una variabile globale il nome della maschera chiamante e
usarlo per puntare ai controlli giusti. All'inizio di qualsiasi modulo
(prima della prima procedura) puoi indicare la variabile dimensionandola
così
Global glbNomeMaskChiamante As String
Quando invochi la maschera per aggiunta ti punti il nome della maschera
corrente .
glbNomeMaskChiamante = Me.name
e la tua procedura così complicata potrebbe diventare :
Forms("glbNomeMaskChiamante").Controls("CasellaCombinata116")=Me!lCodiceCliente
Forms("glbNomeMaskChiamante").Controls("CasellaCombinata116").Requery
Forms("glbNomeMaskChiamante").Controls("CasellaCombinata135").Requery
non devi nemmeno controllare se la maskera è aperta, lo è di sicuro
visto che solo quella può aver messo il suo nome nella variabile globale.
IvanDaBologna


title: donkarl.com/it?FAQ4.13

text:
ooops svista! diventa:

Forms(glbNomeMaskChiamante).Controls("CasellaCombinata116")=Me!lCodiceCliente
  Forms(glbNomeMaskChiamante).Controls("CasellaCombinata116").Requery
  Forms(glbNomeMaskChiamante).Controls("CasellaCombinata135").Requery


title: donkarl.com/it?FAQ4.13

author: Carlo Costarella

text:
"Cataldo Formaro" <
formaro...@alice.it
> ha scritto nel messaggio
news:4943a99e$0$1091$4faf...@reader1.news.tin.it...
> Possiamo pranzare tranquilli, tutto risolto, ecco come:
cut
Ancora più compatta:
Private Sub Form_Close()
On Error GoTo Err_Form_Close
If fctIsFormOpen("M_Preventivo") Then
        Forms!M_Preventivo.CasellaCombinata116 = Me!lCodiceCliente
        Forms!M_Preventivo.CasellaCombinata116.Requery
        Forms!M_Preventivo.CasellaCombinata135.Requery
End If
    If fctIsFormOpen("M_Lista_Carico") Then
        Forms!M_Lista_Carico.CasellaCombinata116 = Me!lCodiceCliente
        Forms!M_Lista_Carico.CasellaCombinata116.Requery
        Forms!M_Lista_Carico.CasellaCombinata135.Requery
End If
If fctIsFormOpen("M_DDT") Then
        Forms!M_DDT.CasellaCombinata116 = Me!lCodiceCliente
        Forms!M_DDT.CasellaCombinata116.Requery
        Forms!M_DDT.CasellaCombinata135.Requery
End If
If fctIsFormOpen("M_Fattura") Then
        Forms!M_Fattura.CasellaCombinata116 = Me!lCodiceCliente
        Forms!M_Fattura.CasellaCombinata116.Requery
        Forms!M_Fattura.CasellaCombinata135.Requery
End If
 If fctIsFormOpen("M_Nota_credito") Then
       Forms!M_Nota_credito.CasellaCombinata116 = Me!lCodiceCliente
        Forms!M_Nota_credito.CasellaCombinata116.Requery
        Forms!M_Nota_credito.CasellaCombinata135.Requery
End If
If fctIsFormOpen("M_Vendita_Cassa") Then
        Forms!M_Vendita_Cassa.CasellaCombinata116 = Me!lCodiceCliente
        Forms!M_Vendita_Cassa.CasellaCombinata116.Requery
        Forms!M_Vendita_Cassa.CasellaCombinata135.Requery
End If
Exit_Form_Close:
    Exit Sub
Err_Form_Close:
    MsgBox Err.Description
    Resume Exit_Form_Close
End Sub
Ciao, Carlo
P.S. Gli else seguiti da end if sono inutili.


title: SEZIONI DI UN REPORT: Piè di sezione in calce alla pagina e conteggio pagine della sezione

author: Pierpsoft

text:
Ciao a tutti, ho creato un report in access 2007 la cui origine dati è
una query che seleziona le righe e i dati di un intervallo di bolle di
trasporto (Ddt). es.: bolle ID 5, 6, 7, 8, 9, 10, 11. Il report
raggruppa tutte le righe secondo "ID" e nel report c'è
IntestazioneGruppo0 e SezionePièDiPaginaPagina.
Ora ho i seguenti problemi:
PROBLEMA 1
Dovrei far rimanere il Pié di Pagina della Sezione, quello che viene
stampato alla fine di ogni sezione di raggruppamento per ID, ovvero
alla fine di ogni singola Ddt, in basso sulla pagina, tipo Pié
pagina...
Qualcuno si chiederà perché non uso il piè di pagina per inserire il
contenuto del Piè di sezione: il pié di sezione contiene i dati che
vanno stampati alla fine della bolla, es: n.colli, peso, porto,
totale, firma conducente, firma destinatario... mentre il pié di
pagina va ripetuto in ogni pagina e contiene il numero di pagina.
Mi pare strano che tra le proprietà del Pié di sezione, dove trovo
anche: Interruzione pagina (impostata a "Dopo sezione"), non ci sia un
"allineamento verticale" o "posizione verticale", così da poter
mettere "alto, basso, centrato..." oppure dovrei cercare di gestire
l'altezza del pié di pagina rispetto alla pagina, sapendo però che
ogni DDT può avere un numero variabile di pagine (altrimenti, se la
pagina fosse sempre stata una, avrei potuto mettere tutto nel pié di
pagina)...
PROBLEMA 2
Sarò ignorante... ma nel Pié di pagina, ho inserito "Pagina N di M",
dove N è il numero della pagina corrente e M è il numero totale di
pagine. Attualmente se il report ha 10 bolle di 2 pagine ciascuna, a
pagina 1 troverò "Paginaa 1 di 20", cioè i dati sono riferiti a tutte
le pagine del report. Come faccio a farli riferire a tutte le pagine
della sezione, in modo che al termine di ogni sezione la numerazione
di N riparta da 1 e che M conti tutte le pagine della sezione e non
del documento? Esiste un modo?
Grazie. :)


text:

Ho guardato l'esempio su
http://www.sitocomune.com/
 e trovo "4.8
Modulo per la gestione della stampa dei totali in calce al report
compresa gestione della stampa su più pagine", nella sezione REPORT.
Purtroppo nel mio caso le righe delle bolle non sono ad altezza
costante, dato che ci son righe in cui il campo descrizione si espande
e contiene più di una riga...


title: Access - Client Access

author: Paolo

text:
Ho un problema di questo tipo:
ho un programma in access, e devo fare un pulsante che mi consenta di aprire
una richiesta di trasferimento con un sistema as400, usando Client Access.
Come posso fare, per far eseguire al pulsante il file xxx.tto?
Grazie