title: Query per cercare numeri mancanti...

text:
" SuperPippo®" <ik0qddT...@TOGLISPAMlibero.it> ha scritto nel messaggio
news:xxiOa.154947$lK4.4...@twister1.libero.it...
> Antonio Biso wrote:
> > " SuperPippo®" <ik0qddT...@TOGLISPAMlibero.it> ha scritto nel
>
> [superCUT]
>
> > Faccio un altro tentativo prima di risponderti.
> > Se F345 decede e tu riassegni il codice ad un altro utente, se poi
> > vai a fare un'interrogazione, ti vengono fuori anche tutti i
> > movimenti di quello morto, compresa la morte!!!
> > Allora eventualmente dovresti salvare una data di cambio assegnazione
> > in modo da interrogare il sistema solo da lì in poi...
>
> beh... a dir la verità non è che ti ho capito molto.... cmq...quando
abbiamo
> la
> comunicazione di un decesso oppure trasferimento etc.-.. il record viene
> fisicamente cancellato....per cui F345 non esiste + nel DB....
E non tenete uno storico del pregresso?
Secondo me è sbagliato.
> > Ma la soluzione più corretta sarebbe quella di aggiungere un campo
> > Sì/No che ti dice se il numero è attivo o meno. In questo modo i non
> > attivi non li gestisci per le statistiche e lavori solo con i nuovi
> > codici
>
> questa invece sarebbe stata un'ottima soluzione...se fosse stata
> implementata
> fin dall'inizio gestione DB (anno 2000)....
Non è poi così complicato intervenire adesso.
anche per la ricerca dei
> codici mancanti sarebbe stato facile fare un filtraggio...ma c'è un
però...
> io non li devo gestire solo per le statistiche..  ma anche in pratica...
> è inutile scrivere su un tesserino di un paziente F 9599  quando in realtà
> ne sono 5000... se dovessi seguire il tuo ragionamento tra 5 anni
> si arriverebbe a 15000 ...
Embè?
> questo è il quanto...
> se hai ulteriori idee ben vengano...
M'hai tagliato la parte del quesito, mo' me lo devo copiaincollare...
Uff...
...
> > >> 1/2000/F234
> > >> 23/2003/G3356
> > >>
> > >> ossia il primo numero è il progressivo
> > >> il secondo è l'anno
> > >> ed il terzo è il numero di protocollo sempre
> > >> preceduto da una lettera che in tutto sono
> > >> 5   (F) + (G) + (M) + (I) + (P)...
> > >>
> > >> quindi il mio intento è di sapere per ciascuna lettera
> > >> alfabetica i numeri mancanti cominciando da 1...
> > >> però capita che (P) arrivi a 500 record
> > >> mentre (F) arrivi a 6000 record...
Ti prepari una query sulla tabella dei dati che ti restituisca il campo
codice ordinato crescente.
Apri un recordset sulla query.
Ne apri uno su una tabella vuota che abbia due campi, protocollo e numero.
Prendi il primo carattere del codice e lo metti in una var d'appoggio.
Inizi un ciclo su tutto il recordset query, fino all'EOF, e mediante un
contatore testi se il valore del codice è uguale al contatore. Se non lo è
sbatti il valore nella tabella vuota e sposti il contatore al valore
trovato. Ad ogni ciclo switchi il valore del protocollo corrente e lo
confronti con quello precedente. Se è diverso, ricominci col contatore da 1.
Nella tabella avrai i valori liberi.
Questa è la linea guida, poi, se proprio non riesci, vedo se trovo un po' di
tempo per scriverti 'ste du righe di codice...
Antonio


title: Query per cercare numeri mancanti...

author: SuperPippo®

text:
Antonio Biso wrote:
> " SuperPippo®" <ik0qddT...@TOGLISPAMlibero.it> ha scritto nel
[cut]
> Ti prepari una query sulla tabella dei dati che ti restituisca il
> campo codice ordinato crescente.
e questo già non posso farlo... ordinarlo...
se vedi la caratteristica del campo N_Protocollo...
> Apri un recordset sulla query.
> Ne apri uno su una tabella vuota che abbia due campi, protocollo e
> numero. Prendi il primo carattere del codice e lo metti in una var
> d'appoggio. Inizi un ciclo su tutto il recordset query, fino all'EOF,
> e mediante un contatore testi se il valore del codice è uguale al
> contatore. Se non lo è sbatti il valore nella tabella vuota e sposti
> il contatore al valore trovato. Ad ogni ciclo switchi il valore del
> protocollo corrente e lo confronti con quello precedente. Se è
> diverso, ricominci col contatore da 1. Nella tabella avrai i valori
> liberi.
> Questa è la linea guida, poi, se proprio non riesci, vedo se trovo un
> po' di tempo per scriverti 'ste du righe di codice...
-----------
beh... se non ti disturbo troppo
 ti mando via email solo il campo N_protocollo
così ti rendi conto....
ciao...


title: Query per cercare numeri mancanti...

author: Antonio Biso

text:
" SuperPippo®" <ik0qddT...@TOGLISPAMlibero.it> ha scritto nel messaggio
news:qJyOa.155671$Ny5.4...@twister2.libero.it...
> Antonio Biso wrote:
> > " SuperPippo®" <ik0qddT...@TOGLISPAMlibero.it> ha scritto nel
> [cut]
>
> > Ti prepari una query sulla tabella dei dati che ti restituisca il
> > campo codice ordinato crescente.
>
> e questo già non posso farlo... ordinarlo...
> se vedi la caratteristica del campo N_Protocollo...
Guarda che l'ordinamento lo devi fare anche se c'è una lettera prima,
proprio perchè mi serve che prima vengano tutte le lettere di un tipo, poi
quelle di un altro e così via...
All'interno di una lettera poi ci sarà l'ordinamento crescente.
Pertanto si potrà vedere i buchi all'interno della singola lettera.
>
> > Apri un recordset sulla query.
> > Ne apri uno su una tabella vuota che abbia due campi, protocollo e
> > numero. Prendi il primo carattere del codice e lo metti in una var
> > d'appoggio. Inizi un ciclo su tutto il recordset query, fino all'EOF,
> > e mediante un contatore testi se il valore del codice è uguale al
> > contatore. Se non lo è sbatti il valore nella tabella vuota e sposti
> > il contatore al valore trovato. Ad ogni ciclo switchi il valore del
> > protocollo corrente e lo confronti con quello precedente. Se è
> > diverso, ricominci col contatore da 1. Nella tabella avrai i valori
> > liberi.
> > Questa è la linea guida, poi, se proprio non riesci, vedo se trovo un
> > po' di tempo per scriverti 'ste du righe di codice...
> -----------
> beh... se non ti disturbo troppo
>  ti mando via email solo il campo N_protocollo
> così ti rendi conto....
Perchè non hai aspettato che ti dessi l'ok e soprattutto se te lo davo?!!?
Antonio


title: Query per cercare numeri mancanti...

text:
Antonio Biso wrote:
> " SuperPippo®" <ik0qddT...@TOGLISPAMlibero.it> ha scritto nel
>
> Guarda che l'ordinamento lo devi fare anche se c'è una lettera prima,
> proprio perchè mi serve che prima vengano tutte le lettere di un
> tipo, poi quelle di un altro e così via...
> All'interno di una lettera poi ci sarà l'ordinamento crescente.
> Pertanto si potrà vedere i buchi all'interno della singola lettera.
??... scusa ma ho provato a fare l'ordinamento varie volte e viene
tutto sballato... considera i primi numeri....
> Perchè non hai aspettato che ti dessi l'ok e soprattutto se te lo
> davo?!!?
------------
hai ragione... mea culpa... mi sono lasciato andare .. :o)(
--
;o) SuperPippo®


title: Query per cercare numeri mancanti...

text:
" SuperPippo®" <ik0qddT...@TOGLISPAMlibero.it> ha scritto nel messaggio
news:KADOa.156623$Ny5.4...@twister2.libero.it...

Ok, ora ho visto la struttura dei dati.
Non ricordavo avessi detto che davanti c'era altra schifezza...
La tua struttura è dunque
STR/STR1/Codice
dove STR e STR1 sono stringhe di dimensione variabile e codice è la parte
codice con la struttura ProtocolloNumero
La query deve restituire solo il Codice e ordinato.
La query avrà quindi un campo calcolato consistente nella chiamata ad una
funzione diciamo Spezza([CampoIntero]) dove CampoIntero è tutto il campo
descritto prima cioè STR/STR1/Codice.
Questo campo calcolato dovrà essere ordinato in maniera crescente.
La funzione Spezza sarà fatta così
Public Function Spezza(x as variant) as string
    dim i as integer
    for i = len(x) to 1 step -1
      if mid(x,i,1) = "/" then
        Spezza = right(x, len(x)-i)
        exit function
     end if
    next i
end function
Poi continui come ti avevo già detto
Antonio


title: Query per cercare numeri mancanti...

text:
Antonio Biso wrote:
> " SuperPippo®" <ik0qddT...@TOGLISPAMlibero.it> ha scritto nel
> Ok, ora ho visto la struttura dei dati.
> Non ricordavo avessi detto che davanti c'era altra schifezza...
> La tua struttura è dunque
> STR/STR1/Codice
> dove STR e STR1 sono stringhe di dimensione variabile e codice è la
> parte codice con la struttura ProtocolloNumero
Ok... cmq per la precisione STR è variabile... STR1 che è l'anno
sono sempre 4 cifre....
> La query deve restituire solo il Codice e ordinato.
> La query avrà quindi un campo calcolato consistente nella chiamata ad
> una funzione diciamo Spezza([CampoIntero]) dove CampoIntero è tutto
> il campo descritto prima cioè STR/STR1/Codice.
> Questo campo calcolato dovrà essere ordinato in maniera crescente.
> La funzione Spezza sarà fatta così
>
> Public Function Spezza(x as variant) as string
>     dim i as integer
>
>     for i = len(x) to 1 step -1
>       if mid(x,i,1) = "/" then
>         Spezza = right(x, len(x)-i)
>         exit function
>      end if
>     next i
> end function
>
> Poi continui come ti avevo già detto
-----------------
scusa Antò... ma non essendo molto pratico di Access.. vedo se ho capito...
la funzione non posso utilizzarla in una query ... giusto ???
quindi che devo fare..?  mi devo prima creare una mask di appoggio ???
potresti essere, per cortesia, un pò dettagliato ???
grazie...


title: Query per cercare numeri mancanti...

text:
" SuperPippo®" <ik0qddT...@TOGLISPAMlibero.it> ha scritto nel messaggio
news:j_TOa.160251$lK4.4...@twister1.libero.it...
> Antonio Biso wrote:
> > " SuperPippo®" <ik0qddT...@TOGLISPAMlibero.it> ha scritto nel
>
> > La query deve restituire solo il Codice e ordinato.
> > La query avrà quindi un campo calcolato consistente nella chiamata ad
> > una funzione diciamo Spezza([CampoIntero]) dove CampoIntero è tutto
> > il campo descritto prima cioè STR/STR1/Codice.
> > Questo campo calcolato dovrà essere ordinato in maniera crescente.
> > La funzione Spezza sarà fatta così
> >
> > Public Function Spezza(x as variant) as string
> >     dim i as integer
> >
> >     for i = len(x) to 1 step -1
> >       if mid(x,i,1) = "/" then
> >         Spezza = right(x, len(x)-i)
> >         exit function
> >      end if
> >     next i
> > end function
> >
> > Poi continui come ti avevo già detto
> -----------------
> scusa Antò... ma non essendo molto pratico di Access.. vedo se ho
capito...
> la funzione non posso utilizzarla in una query ... giusto ???
> quindi che devo fare..?  mi devo prima creare una mask di appoggio ???
> potresti essere, per cortesia, un pò dettagliato ???
SOOOOOBBBB!!!
Eravamo partiti dicendo che dovevi preparare una query su cui poi aprivi un
recordset per fare tutti i calcoli col contatore per cercare i numeri (e
quello sarà un altro bagno di sangue, già lo so...)
La query ti ho adesso detto come farla.
La funzione la devi scrivere in un modulo e la richiami dalla query come ti
ho detto, come campo calcolato e fornendo come parametro il campo
codicecompleto
Antonio


title: Query per cercare numeri mancanti...

text:
Antonio Biso wrote:
> " SuperPippo®" <ik0qddT...@TOGLISPAMlibero.it> ha scritto nel
>> ??? potresti essere, per cortesia, un pò dettagliato ???
>
> SOOOOOBBBB!!!
> Eravamo partiti dicendo che dovevi preparare una query su cui poi
> aprivi un recordset per fare tutti i calcoli col contatore per
> cercare i numeri (e quello sarà un altro bagno di sangue, già lo
> so...)
> La query ti ho adesso detto come farla.
> La funzione la devi scrivere in un modulo e la richiami dalla query
> come ti ho detto, come campo calcolato e fornendo come parametro il
> campo codicecompleto
--------------
AAAArrgghhhh.. Antò... ma tu dai tutto per scontato....!!!
Mi ricordo quando andavo a sQuola... il mio maestro mi diceva spesso
che un grande pregio degli insegnanti è appunto
quello di riuscire a farsi capire anche da persone che ... non capiscono..
bene la materia... e poi... che termine pittoresco e tragico....
"bagno di sangue".. :-)
cmq... per il momento ho copiato il tuo codice in un modulo
chiamandolo "Spezza"... quindi un passo avanti...
ora viene "il bagno di sangue"..................
???
--
;o) SuperPippo®


title: Query per cercare numeri mancanti...

text:
 SuperPippo® wrote:
> Antonio Biso wrote:

---------------------------
Ti sei arreso ehhh !!!


title: Query per cercare numeri mancanti...

text:
" SuperPippo®" <ik0qddT...@TOGLISPAMlibero.it> ha scritto nel messaggio
news:QXcPa.161997$Ny5.4...@twister2.libero.it...

Eh?
Antonio


title: [OT] - Ma comunque un must: III° Raduno ICAA

author: MA

text:
Cari frequentatori, è aperta l'adesione al nuovo raduno del NG.
Lascio a Voi l'indicazione di una località amena a Vs scelta nei dintorni di
Roma.
Sarebbe il caso di farlo prima di Pasqua, di modo dopo lunedì in Albis si
torna a fare la botta al lavoro.
Come programma potrebbe essere: raduno, cena, pernottamento, visita di Roma
l'indomani, ricchi baci e cotillones.
Siete Invitati TUTTI.
ciao MAssimiliano

--------------------------------
Inviato via
http://usenet.libero.it


author: DESIO

text:
"MA" <
massimilia...@kksrl.com
> ha scritto nel messaggio
news:62Z94Z45Z185Y1...@usenet.libero.it...

e come non si aggrega nessuno?
Ho capito di venerdi sera il biso non c'è e gli altri pure.
comunque me ci sto anche se sarà dura prima di Pasqua
ciao desio


text:
Il 29 Mar 2003, 16:08, "DESIO" <
giscar...@dada.it
> ha scritto:
>
> "MA" <
massimilia...@kksrl.com
> ha scritto nel messaggio
> news:62Z94Z45Z185Y1...@usenet.libero.it...
> > Cari frequentatori, è aperta l'adesione al nuovo raduno del NG.
> > Lascio a Voi l'indicazione di una località amena a Vs scelta nei
dintorni
> di
> > Roma.
> > Sarebbe il caso di farlo prima di Pasqua, di modo dopo lunedì in Albis
si
> > torna a fare la botta al lavoro.
> > Come programma potrebbe essere: raduno, cena, pernottamento, visita di
> Roma
> > l'indomani, ricchi baci e cotillones.
> > Siete Invitati TUTTI.
> >
> > ciao MAssimiliano
> e come non si aggrega nessuno?
> Ho capito di venerdi sera il biso non c'è e gli altri pure.
> comunque me ci sto anche se sarà dura prima di Pasqua
> ciao desio
>
E' per questo che rinnovo il tutto.



text:

Continuo a riproporre



author: Sergio MAZZA

text:
"MA" <
massimilia...@kksrl.com
> ha scritto nel messaggio
news:62Z94Z51Z162Y1...@usenet.libero.it...
> Continuo a riproporre
> ciao MAssimiliano
>
>
Forse stavolta riesco a venire; nel senso di "moto a luogo"...
Ciao.
--
Sergio MAZZA


text:
Il 01 Apr 2003, 13:01, "Sergio MAZZA" <
sergi...@tiscalinet.it
> ha
scritto:

Xkè nell'altro senso hai perso anche le speranze??



text:
"MA" <
massimilia...@kksrl.com
> ha scritto nel messaggio
news:62Z94Z51Z162Y1...@usenet.libero.it...
> Il 01 Apr 2003, 13:01, "Sergio MAZZA" <
sergi...@tiscalinet.it
> ha
> scritto:
>
> Xkè nell'altro senso hai perso anche le speranze??
> ciao MAssimiliano
>
>
Più che "venire" me cianno mannato!
Ciao.
--
Sergio MAZZA


text:
Il 01 Apr 2003, 14:08, "Sergio MAZZA" <
sergi...@tiscalinet.it
> ha
scritto:
> "MA" <
massimilia...@kksrl.com
> ha scritto nel messaggio
> news:62Z94Z51Z162Y1...@usenet.libero.it...
> > Il 01 Apr 2003, 13:01, "Sergio MAZZA" <
sergi...@tiscalinet.it
> ha
> > scritto:
> >
> > Xkè nell'altro senso hai perso anche le speranze??
> > ciao MAssimiliano
> >
> >
>
> Più che "venire" me cianno mannato!
>
> Ciao.
>
> --
> Sergio MAZZA
Cari Roberto e Sergio,
ho paura che questo sia il laconico epilogo dell'iniziativa. La stessa
adesione oceanica l'ho riscossa solo quando ho proposto di andare a mangiare
l'amatriciana di Biso!!!
Ci riprovo dopo Pasqua.



author: Roberto da casa

text:
"MA" <
massimilia...@kksrl.com
> ha scritto nel messaggio
news:62Z94Z51Z162Y1...@usenet.libero.it...
> Il 01 Apr 2003, 14:08, "Sergio MAZZA" <
sergi...@tiscalinet.it
> ha
> scritto:
> > "MA" <
massimilia...@kksrl.com
> ha scritto nel messaggio
> > news:62Z94Z51Z162Y1...@usenet.libero.it...
> > > Il 01 Apr 2003, 13:01, "Sergio MAZZA" <
sergi...@tiscalinet.it
> ha
> > > scritto:
> > >
> > > Xkè nell'altro senso hai perso anche le speranze??
> > > ciao MAssimiliano
> > >
> > >
> >
> > Più che "venire" me cianno mannato!
> >
> > Ciao.
> >
> > --
> > Sergio MAZZA
>
> Cari Roberto e Sergio,
> ho paura che questo sia il laconico epilogo dell'iniziativa. La stessa
> adesione oceanica l'ho riscossa solo quando ho proposto di andare a
mangiare
> l'amatriciana di Biso!!!
> Ci riprovo dopo Pasqua.
> ciao MAssimiliano
Mi sembra una giusta decisione.
Inoltre ricorda che, bene che va, a scegliere il luogo e la data del raduno
in passato si è impiegato oltre un mese e si è cercato di evitare
accuratamente i periodi al ridosso delle Feste Comandate.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
"MA" <
massimilia...@kksrl.com
> ha scritto nel messaggio
news:62Z94Z51Z162Y1...@usenet.libero.it...
>
> Cari Roberto e Sergio,
> ho paura che questo sia il laconico epilogo dell'iniziativa. La stessa
> adesione oceanica l'ho riscossa solo quando ho proposto di andare a
mangiare
> l'amatriciana di Biso!!!
> Ci riprovo dopo Pasqua.
> ciao MAssimiliano
>
>
Sono d'accordo con Roberto; anche secondo me è più semplice un periodo fuori
dalle feste...
Oh! Comunque non avvilirti; la poca adesione forse, è da imputarsi agli
obblighi di lavoro della maggior parte dei partecipanti. Lo vedo da chi
scrive nell'NG...
Ciao.
--
Sergio MAZZA


title: questo "benedetto euro"...

author: Fabio

text:
Salve a tutti
Siccome sono un vero principiante, e non saprei da dove cominciare,non è che
qualche
anima pia ha sviluppato qualche riga di codice che permette l'arrotondamento
dell'euro??
Io non devo convertire nulla, ma opterei per una fatturazione direttamente
in euro.
L'unico inconveniente che io avevo tralasciato, è che, nel calcolo dell'IVA
si ottengono
diversi decimali, ma nella fattura ne devono essere riportate solo 2.Che
fare??
Ci date una mano a noi incapaci.....grazie a chiunque ci dia un consiglio!!
Fabio(SV)


title: questo "benedetto euro"...

author: Luciano (DOC)

text:
Fabio ha scritto nel messaggio <9u8ehf$1eoo9$
1...@news02.it.net
>...
>L'unico inconveniente che io avevo tralasciato, č che, nel calcolo dell'IVA
>si ottengono
>diversi decimali, ma nella fattura ne devono essere riportate solo 2.Che
>fare??
Arrorotonda alla seconda cifra decimale coem dice la legge.
Usa formato numerico a precisione doppia, imposta i decimali a 2 e su tutte
le caselle di testo metti su after_update o su exit un arrotondamento alla
seconda decimale. Trovi una funzioncina pronta sul sito comune.
Saluti.
Luciano


title: questo "benedetto euro"...

author: Filippo

text:
"Luciano (DOC)" <
lucia...@sitocomune.com
> ha scritto nel messaggio
news:9u8stb$73lre$1...@ID-86073.news.dfncis.de...
>
> Fabio ha scritto nel messaggio <9u8ehf$1eoo9$
1...@news02.it.net
>...
>
> >L'unico inconveniente che io avevo tralasciato, è che, nel calcolo
dell'IVA
> >si ottengono
> >diversi decimali, ma nella fattura ne devono essere riportate solo 2.Che
> >fare??
>
>
> Arrorotonda alla seconda cifra decimale coem dice la legge.
> Usa formato numerico a precisione doppia, imposta i decimali a 2 e su
tutte
> le caselle di testo metti su after_update o su exit un arrotondamento alla
> seconda decimale. Trovi una funzioncina pronta sul sito comune.
> Saluti.
>
> Luciano
>
Scusate la domanda, ma se come formato uso quello predefinito Euro (Access
2000), a parte il fastidioso simbolo prima della cifra (a proposito c'è modo
di toglierlo), non funziona senza arrotondamenti e precisione doppia?
Filippo


title: questo "benedetto euro"...

author: Technoservice S.a.s.

text:
Il formato si applica solo in visualizzazione. Se non lo arrotondi lui si
porta dietro tutte le cifre nei calcoli quindi
0,1241111111111111 lo vedi  0,12 ma se lo moltiplichi per due diventa
0,2482222222222222 e lo vedi 0,25 non 0,24
Quindi arrotondare è necessario. Per togliere il simbolo basta che usi un
formato numerico Standard, senza il simbolo
Lorenzo


title: questo "benedetto euro"...

author: Tecnoricambi Oderzo

text:
"Technoservice S.a.s." <
in...@tservice.it
> ha scritto nel messaggio
news:Xi7O7.4288$NA1.1...@news2.tin.it...

Devi inserire questa formula:
=Int([TuoControllo]x100+0,499)/100
Claudio


title: questo "benedetto euro"...

author: Sib dal portatile

text:
"Fabio" <
f.par...@mail.sirio.it
> ha scritto nel messaggio
> Siccome sono un vero principiante, e non saprei da dove cominciare,non č
che
> qualche
> anima pia ha sviluppato qualche riga di codice che permette
l'arrotondamento
> dell'euro??
>
> Io non devo convertire nulla, ma opterei per una fatturazione direttamente
> in euro.
> L'unico inconveniente che io avevo tralasciato, č che, nel calcolo
dell'IVA
> si ottengono
> diversi decimali, ma nella fattura ne devono essere riportate solo 2.Che
> fare??
Come dicono gli altri, devi arrotondare.
Ma attenzione, arrotondare i dati visualizzati, non quelli memorizzati!
Questa e' una cosa di cui si e' parlato poco ma attenzione, arrotondare i
dati memorizzati (cosa sbagliata) puo' portare a errori tutt'altro che
trascurabili, infatti nel caso di prodotti il cui costo unitario sia minimo
(10-40 lire ad esempio) arrotondare alla seconda cifra decimale significa
sbagliare di svariate lire sul listino e siccome articoli con questi prezzi,
solitamente, sono venduti in stock di milioni di pezzi, ecco che l'errore
finale arriva all'ordine dei milioni di lire.
Sib
--
----------------------------------------------------
la mia home:
http://digilander.iol.it/syb
----------------------------------------------------
il sito comune di it.comp.database.access:
http://www.sitocomune.com
----------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente


title: questo "benedetto euro"...

text:
"Sib dal portatile" <
sibN...@iol.it
> ha scritto nel messaggio
news:AEyO7.226914$sq5.11...@news.infostrada.it...
> Ma attenzione, arrotondare i dati visualizzati, non quelli memorizzati!
> Questa e' una cosa di cui si e' parlato poco ma attenzione, arrotondare i
> dati memorizzati (cosa sbagliata) puo' portare a errori tutt'altro che
> trascurabili, infatti nel caso di prodotti il cui costo unitario sia
minimo
> (10-40 lire ad esempio) arrotondare alla seconda cifra decimale significa
> sbagliare di svariate lire sul listino e siccome articoli con questi
prezzi,
> solitamente, sono venduti in stock di milioni di pezzi, ecco che l'errore
> finale arriva all'ordine dei milioni di lire.
Se pero' non arrotondi i dati memorizzati succede che la somma (arrotondata
in visualizzazione) dei totali parziali (ossia il totale fattura ad esempio)
sia facilmente sbagliata.
Es:
totriga1    1,994 (vis 1,99)
totriga2    1,994(vis 1,99)
totriga3    1,994(vis 1,99)
SOMMA DEGLI IMPORTI MEMORIZZATI  5,982 (vis 5,98)
SOMMA DEGLI IMPORTI VISUALIZZATI 5,97
Saluti.
Luciano


title: questo "benedetto euro"...

author: @vene.dave.it PiroPiro

text:
Sib dal portatile <
sibN...@iol.it
> wrote in message
AEyO7.226914$sq5.11...@news.infostrada.it...
> Ma attenzione, arrotondare i dati visualizzati, non quelli memorizzati!
> Questa e' una cosa di cui si e' parlato poco ma attenzione, arrotondare i
> dati memorizzati (cosa sbagliata) puo' portare a errori tutt'altro che
> trascurabili, infatti nel caso di prodotti il cui costo unitario sia
minimo
Non so se serve ancora scivere su questo argomento o se ormai è un problema
superato.
A quanto mi risulta è possibile definire un prezzo in Euro con un numero di
decimali a piacere e le somme si fanno sulle cifre esatte, quindi con tutti
i decimali. Quello che si arrotnda è unicamente il risultato finale, quello
che deve essere materialmente pagato.
Avete mai visto una bolletta telefonica in Euro? Non mi ricordo quali
operatori già la mandano, comunque funziona proprio così: le singole
telefonate, che hanno tariffe nell'ordine di qualche lira, sono convertite
con 4 o 5 decimali, sommano il tutto e arrotondano solo il totale.
In questo modo l'arrotondamento è sempre nell'ordine del centesimo di euro
anche se si comprano milioni di pezzi...
Prima di scrivere un programma con questa logica è veglio verificare, ma ne
sono abbatanza sicuro.
Ciao
Piro Piro


title: questo "benedetto euro"...

author: Jonathan Canova

text:
"PiroPiro" <(togli)0987654321 @ (togli)
vene.dave.it
> ha scritto nel
messaggio news:wDoQ7.1340$7v6....@twister1.libero.it...
> Non so se serve ancora scivere su questo argomento o se ormai è un
problema
> superato.
mmmh. Vedrai che casini ad anno nuovo. Pensa che non c'è stato un solo
commercialista che mi abbia risposto al seguente quesito:
Ricevuta Fiscale di 30,99 Euro. Quanto è Imponibile ed imposta, posta
l'aliquota al 20%?
:-(
--
Cordiali saluti,
Jonathan Canova
www.aladinoinformatica.com


title: questo "benedetto euro"...

author: The-real-Isaac

text:
"Jonathan Canova" <
gionataSE...@galactica.it
> ha scritto nel messaggio
news:9utf7v$b41fg$2...@ID-109056.news.dfncis.de...
> "PiroPiro" <(togli)0987654321 @ (togli)
vene.dave.it
> ha scritto nel
> messaggio news:wDoQ7.1340$7v6....@twister1.libero.it...
> > Non so se serve ancora scivere su questo argomento o se ormai č un
> problema
> > superato.
>
> mmmh. Vedrai che casini ad anno nuovo. Pensa che non c'č stato un solo
> commercialista che mi abbia risposto al seguente quesito:
>
> Ricevuta Fiscale di 30,99 Euro. Quanto č Imponibile ed imposta, posta
> l'aliquota al 20%?
>
> :-(
>
> --
> Cordiali saluti,
> Jonathan Canova
>
www.aladinoinformatica.com
>
Non sono un commercialista, sia chiaro.
Il problema dello scorporo che non quadra c'č anche con gli importi in lire,
non cambia niente.
Io ho sempre risolto - prudenzialmente - mettendo una lira (ora un
centesimo) in piů sull'IVA.
A quanto mi risulta non esiste nessun chiarimento ufficiale in merito.
Bisogna comunque considerare che, a norma di legge, lo scorporo si dovrebbe
fare usando dei coefficienti stabiliti dal ministero (coefficienti che non
scompongono esattamente imponibile e imposta) e che solo dopo diversi anni
dall'entrata dell'IVA il ministero ha "permesso" di effettuare "in
alternativa" lo scorporo con sistemi matematici diversi.
Ciao.
--
Alberto


title: Aggiornamento campo tabella collegata

author: Alberto Franceschetti

text:
Buona sera atutti voi,
carissimi amici, ancora una volta cerco di abusare della vostra
disponibilità.
Questa volta il mio problema è il seguente:
lavoro su una maschera relativa alla tbl1 i cui campi sono
 - Data
 - Operazione
 - numero giorni (valore numerico)
La tbl1 è collegata alla tbl2 attraverso il campo Operazione, la quale
contiene i seguenti campi:
 - Operazione
 - Ultima data (deve essere aggiornata da Data di tbl1)
 - Data successiva (deve essere Ultima data + numero giorni di tbl1)
Mentre compilo la maschera di tbl1, vorrei aggiornare i campi della tbl2
collegata attarverso il codice:
  me.tbl2.ultima data = me.Data
  me.tbl2.Data successiva = me.(ultima data+ tbl1.numero giorni)
ma in questo modo l'operazione non riesce !!!!!!
Qualcuno può darmi qualche indicazione ?
Grazie ancora a tutti voi.
Alberto
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Aggiornamento campo tabella collegata

author: Roberto La Forgia

text:
>   me.tbl2.Data successiva = me.(ultima data+ tbl1.numero giorni)
Dovresti usare una query dopo la compilazione dei campi
del tipo UPDATE Tbl2 set DT1= ... WHERE ...
Ciao,
ROberto
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: ottenere uno

author: Rino

text:
Salve,
in una maschera che si  riferisce a una tabella ho 2 campi Totale1 e
Totale2.
su un evento clik  ( Totale2 = Totale1 / 50)   dove ad ogni 50 e/o frazione
di essi deve dare il risultato
es. Totale2 =  Totale1 (200) / 50  = 4
quello che invece io vorrei sapere è:
come faccio ad ottenere 1 se Totale1 è 3
meno male che ci siete
Rino


title: ottenere uno

author: Alessandro Baraldi

text:
Rino ha scritto:

Non ho capito nulla...!
In ogni caso solitamente tutto quello che può essere calcolato non si
memorizza in un campo, ma
si effettua il Calcolo "Al Volo" oppure in una Query....!
Per ottenere 1 se il risultato =3
Se metti questa funzione nell'origine dati del controllo Totale2(che
non deve essere associato):
iif(Totale1\200=3;1;Totale1/200)
@Alex


title: ottenere uno

author: Alessandro Cara

text:
Alessandro Baraldi wrote:
> Rino ha scritto:
>
>> Salve,
>>
>> in una maschera che si  riferisce a una tabella ho 2 campi Totale1 e
>> Totale2.
>>
>> su un evento clik  ( Totale2 = Totale1 / 50)   dove ad ogni 50 e/o frazione
>> di essi deve dare il risultato
>>
>> es. Totale2 =  Totale1 (200) / 50  = 4
>> quello che invece io vorrei sapere è:
>>
>> come faccio ad ottenere 1 se Totale1 è 3
>>
>> meno male che ci siete
>>
>> Rino
>
>
> Non ho capito nulla...!
siamo in due!
Io avrei detto
int((totale1+49)/totale2)
ma molto a naso (parecchio raffreddato).
>
> In ogni caso solitamente tutto quello che può essere calcolato non si
> memorizza in un campo, ma
> si effettua il Calcolo "Al Volo" oppure in una Query....!
>
> Per ottenere 1 se il risultato =3
>
> Se metti questa funzione nell'origine dati del controllo Totale2(che
> non deve essere associato):
> iif(Totale1\200=3;1;Totale1/200)
>
> @Alex
>
--
ac
y-1=x


title: ottenere uno

text:
Alessandro Cara ha scritto:
[CUT]
> > Non ho capito nulla...!
> siamo in due!
> Io avrei detto
> int((totale1+49)/totale2)
> ma molto a naso (parecchio raffreddato).
Visto che parliamo spesso di velocità..... evita di usare INT quando
basta usare il BackSlash... ;-)
Sono almeno 400% o meglio 25ms... su 100000 cicli...!
;-)
> --
> ac
> y-1=x
@Alex


title: ottenere uno

text:

be 1 0 2 ms non mi cambiano la qualita' della vita, 25 ms cominciano a
essere preoccupanti ;<)
L'intero con la bs. Gia'. E' una domandina che faro' al prossimo
colloquiando. E se non risponde gli do il tuo indirizzo. ;-)
--
ac
y-1=x


title: ottenere uno

text:
Alessandro Cara ha scritto:
> Alessandro Baraldi wrote:
> > Alessandro Cara ha scritto:
> >
> > [CUT]
> >
> >>> Non ho capito nulla...!
> >> siamo in due!
> >> Io avrei detto
> >> int((totale1+49)/totale2)
> >> ma molto a naso (parecchio raffreddato).
> >
> > Visto che parliamo spesso di velocità..... evita di usare INT quando
> > basta usare il BackSlash... ;-)
> > Sono almeno 400% o meglio 25ms... su 100000 cicli...!
> be 1 0 2 ms non mi cambiano la qualita' della vita, 25 ms cominciano a
> essere preoccupanti ;<)
A parte la battuta credo che di cose che cambiano la vita in questo
argomento
siano ben poche...!
> L'intero con la bs. Gia'. E' una domandina che faro' al prossimo
> colloquiando. E se non risponde gli do il tuo indirizzo. ;-)
Ma se sono io a fare domanda da te che fai ...?
Non mi fare una domanda del genere...!!!

> --
> ac
> y-1=x
@Alex


title: ottenere uno

text:
Alessandro Baraldi wrote:
[cut]
> Ma se sono io a fare domanda da te che fai ...?
> Non mi fare una domanda del genere...!!!
No a te chiederei quante kcalorie producono due API in un anno
oppure quali sno i documenti necessari per dimostrare una proprieta'
--
ac
y-1=x


title: ottenere uno

text:
Alessandro Cara ha scritto:

Ecco un modo per farmi capire che non mi vorresti assumere...!!!
Beh vabbè studierò un pò di diritto catastale ed un pò di
"calorimetria" o forse è diabetologia...?
;-)
Bocciato
@Alex


title: ottenere uno

text:
@Alex
cerco di spiegarmi meglio
Ho 1 tabella con due campi (totale1 e totale2)
totale1 num.50
totale1 num.25
totale1 num.250
totale1 num.5
totale1 num.0
ora con l'evento clik voglio dividere x 50 o frazione di essi es. 50/50=1

                 25/50=1

                 250/50=5
quello che vorrei sapere è questo quando trovo un campo che a 5 e/o 0 e cmq
meno di 25 come posso ottenere 1?
io sull'evento clik ho:
totale2=totale1/50
speriamo bene :))
grazie cmq
Rino


title: ottenere uno

text:
"Rino" <
gensi...@alice.it
> ha scritto nel messaggio
news:45b65e36$0$30012$4faf...@reader1.news.tin.it...
> @Alex
>
> cerco di spiegarmi meglio
> Ho 1 tabella e Maschera con due campi (totale1 e totale2)



title: ottenere uno

text:

La risposta gia' c'era nella mia discussione con a. baraldi
totale2=(totale1+49)\50)
attenzione, come "doce" a. baraldi quella e' una backslash
dovrebbe andare anche
totale2=(totale1+49)/50
--
ac
y-1=x


title: Visualizzare maschera e sottomaschera uniformemente come foglio di  stile

author: gervaz

text:
Con access 2007 vorrei creare una maschere e mettere come maschera un
foglio dati e come sottomaschera un altro foglio dati pilotato dal
master. Peccato che non riesca a mantere uniformità nella
visualizzazione... E' possibile creare due fogli dati uno master e
l'altro slave uniformi visivamente come avviene con due sottomaschere?
L'unico risultato simile si ottiene usando lo strumento maschera
divisa ma io voglio solo il foglio dati nel master!
Grazie.


title: errore di rete

author: skipper

text:
ho un database FE collegato a varie tabelle in vari database BE che spesso
mi genera un errore di rete come se non ci fosse più la connessione. Se ho
altri DB aperti mi mandano lo stesso messaggio... Sembra quasi che manchi la
connessione per un tempo limitatissimo eppure se controllo ho la
connessione....
Non ci capisco nulla...
Qualcuno sa darmi delle indicazioni su cosa cercare?
Grazie guru's gnus
--
skipper dixit...
www.superskipper.it


title: errore di rete

author: Leonigliö

text:
"skipper" <skippe...@NOSPAMsuperskipper.it> wrote in message
news:l5Kwa.53293$
DN.13...@tornado.fastwebnet.it

secondo me si tratta dell'hub che forse ha dei cali di tensione... può
darsi che un buon stabilizzatore di alimentazione possa fare al caso
tuo.
Spero di esserti stato d'aiuto...
PS: Non riusciresti a postarmi quei codici ABI che avevi trovato? o
postarli direttamente sul sitocomune?
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: errore di rete

author: E. Meregalli

text:
            ...per esperienza,sicuramente e solo un probema di rete !!
"skipper" <skippe...@NOSPAMsuperskipper.it> ha scritto nel messaggio
news:l5Kwa.53293$DN.13...@tornado.fastwebnet.it...



title: errore di rete

author: Antonio Biso

text:
"E. Meregalli" <
mer...@tin.it
> ha scritto nel messaggio
news:9jbxa.186620$K35.4...@news2.tin.it...
>             ...per esperienza,sicuramente e solo un probema di rete !!
>
NO!
C'è anche un errore nel modo di scrivere, non DOPO il quoting!!!
Antonio


title: errore di rete

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:0o0ya.13413$Ny5.4...@twister2.libero.it...

a parte il corretto quoting... che non guasta...
quello che non capisco è che se uso altri databases non mi viene nessun
errore di rete.. se invece uso un database specifico mi vengono segnalati
questi errori e smettono di funzionare gli altri databases dal mio pc...
ora... mi sembra strano che la rete abbia dei problemi causati da se stessa
solo se uso un database e se invece ne uso altri nessun problema...
se interpellassi SPOCK mi direbbe che non è logico! e io che sono un grande
ammiratore del possessore delle orecchie a punta confermo che non è
logico... ci deve essere qualcosa in quel database che va ad interrompere la
connessione di rete per una frazione di secondo
--
skipper dixit...
www.superskipper.it


title: errore di rete

text:
"skipper" <skippe...@NOSPAMsuperskipper.it> ha scritto nel messaggio
news:2l7ya.59567$DN.14...@tornado.fastwebnet.it...
>
>
> a parte il corretto quoting... che non guasta...
> quello che non capisco è che se uso altri databases non mi viene nessun
> errore di rete.. se invece uso un database specifico mi vengono segnalati
> questi errori e smettono di funzionare gli altri databases dal mio pc...
> ora... mi sembra strano che la rete abbia dei problemi causati da se
stessa
> solo se uso un database e se invece ne uso altri nessun problema...
> se interpellassi SPOCK mi direbbe che non è logico! e io che sono un
grande
> ammiratore del possessore delle orecchie a punta confermo che non è
> logico... ci deve essere qualcosa in quel database che va ad interrompere
la
> connessione di rete per una frazione di secondo
Questo è uno di quei problemi che è risolvibile quasi esclusivamente
debuggando on site il problema con tanti tentativi...
L'unica è che questo database fa molti accessi in remoto e quindi aumenta la
probabilità di perdita di connessione...
Antonio


title: errore di rete

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:8zkya.16210$Ny5.4...@twister2.libero.it...

azzzzz.... dovrò fare un corso di VBA per procedere al debugging.,....
grazie della risposta
--
skipper dixit...
www.superskipper.it


title: manuale

author: Mama

text:
So di ripetere questa domanda già fatti da altri.
Mi occupo di GIS e ho una buona conoscenza di access, ma mi mancano i
concetti base della programmazione ad oggetti.
Realizzo piccole applicazioni e mi piacerebbe approfondire la materia.
Qualcuno mi sa indicare un manuale?


title: stinga per connettersi DB SQL SUL. SITO

author: stefano

text:
Salve
Eporto giornalmente da un Dbaccess che ho in ufficio 1 tabella"CLIENTI" su
un dbSql sul mio sito.Uso al momento il comando ESPORTA ma vorrei farlo con
la macro trasferisci database, il problema è che non sono come scrivere la
riga di connessione ai database ODBS CHE DEVO IMMETTERE NEL CAMPO" NOME
DATABASE"
Potete aiutarmi
Stefano
--------------------------------
Inviato via
http://usenet.libero.it


title: Portare un conteggio record in un report

author: Giorgio A.

text:
Per cortesia un aiuto
Ho una maschera di inserimento dati con la corrispettiva tabella (TblAnagr)
con id
contatore e altri campi presenti nella maschera.
Ho creato una Query prendendo il campo Cognome o Contatore della tabella di
cui sopra( nel menu (in mod struttura) degli strumenti ho selezionato Totali
e nella Qry alla voce Formula ho inserito conteggio(QryTotVot).
Nella maschera ho una casella di testo che con la seguente
formula  = DCount("*"; "TblAnagr") mi riporta il numero di record
(QryTotVot) presenti in tabella.
Inoltre ho un Query (QryCercaCom) che mi ricerca (inserendo il Parametro
nome del Comune (ad esempio Brescia)) i dati inerenti a quel specifico
Comune
che a sua volta poi riporto in un Report (ReportCercaComuni).
Fin qui tutto bene.
Domanda:
Come fare a portare il numero di record  trovati dalla ricerca Comuni (ad
es. Brescia) (con QryCercaCom) presenti in tabella,  in un Piè di pagina del
report che successivamente vado a stampare( inerente a questa ricerca)?
La Maschera è FrmAnagr
La tabella è TblAnagr
la Query è QryCercaCom
Il Report è ReportCercaComuni
Forse è una cosa non fattibile
Grazie a tutti voi
Saluti
Giorgio


author: Roberto dalla campagna

text:
"Giorgio A." <
interne...@aliceposta.it
> ha scritto nel messaggio
news:PQP2d.269457$OR2.12...@news3.tin.it...

Ammesso e non concesso che io abbia ben compreso cosa vuoi fare, la cosa è
fattibile.
Nel piè di pagina report inserisci una casella di testo non associata nella
cui origine controllo scrivi:
= DCount("*"; "QryCercaCom")
>
> Grazie a tutti voi
> Saluti
> Giorgio
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
"Roberto dalla campagna" <
r.ma...@libero.it
> ha scritto nel messaggio
news:9ZS2d.9094$2T6.2...@twister1.libero.it...

> ----------------------------------------------------
Inserendo il posto DCount("*"; "QryCercaCom") la casella di testo mi
indica( #Errore)
> >
Riepilogo:--------------------------
se attivo la QryCercaCom (cerca comune) debbo inserire nella mascherina
parametro il Comune da cercare (e qui tutto va bene)
Questa query non mi da il numero dei record presenti
------------------------
Qry creata per risalire al numero dei record per comune (QryTotFirme) che è
collegata alla QryCercaCom
Per risalire al conteggio dei record presenti ho la QryTotFirme che
inserendo nella mascherina parametro il Comune mi da il risultato (fin qui
tutto bene)
--------------------------------
Se attivo il report per la stampa della QryCercaCom (cerca comune)
inserendo nella mascherina parametro il Comune mi da il report interessato
ma mi manca il conteggio dei record
Domanda
Pur avendo creato nel piè di pagina una casella di testo collegata a
(QryTotFirme, ho provato anche con QryCercaCom) con il post DCount("*";
"QryCercaCom")
mi indica( #Errore) come può venire richiamata (mi chiedo) se non è stata
attivata nella QryTotFirme la ricerca, con il parametro inserito nella
mascherina?
Forse debbo collegare in relazione la QryCercaCom con la QryTotFirme?
Scusate se é difficile da spiegare il problema



text:
"Giorgio A." <
interne...@aliceposta.it
> ha scritto nel messaggio
news:g%Z2d.344705$5D1.15...@news4.tin.it...

Ti ho risposto nell'altro NG.



title: inserire 'a mano' il percorso della tab. collegata

author: Giancarlo Francesconi dall'ufficio

text:
Provo a ripostare in maniera piů chiara un quesito sul riallineamento delle
tabelle collegate.
Mi chiedevo se fosse possibile far specificare all'utente, ad es. in una
casella di testo il percorso del DB che contiene delle tabelle allegate. Gli
esempi trovati nel sito comune sono molto interessanti, ma mi chiedevo se
non fosse possibile 'passare' ad access direttamente il percorso della tab.
collegata, semplicemente scrivendolo. Ritengo che i percorsi delle tab.
collegati siano registrati da qualche parte. E' possibile modificarli 'a
mano'?
Grazie a tutti.
Giancarlo


author: Setec Astronomy

text:
Giancarlo Francesconi dall'ufficio wrote:
> Provo a ripostare in maniera piy chiara un quesito sul riallineamento
> delle tabelle collegate.
> Mi chiedevo se fosse possibile far specificare all'utente, ad es. in
> una casella di testo il percorso del DB che contiene delle tabelle
> allegate. Gli esempi trovati nel sito comune sono molto interessanti,
> ma mi chiedevo se non fosse possibile 'passare' ad access
> direttamente il percorso della tab.  collegata, semplicemente
> scrivendolo. Ritengo che i percorsi delle tab.  collegati siano
> registrati da qualche parte. E' possibile modificarli 'a mano'?
' Io di solito faccio cosi'
' Chiama Install ()
Public Type BROWSEINFO
    hOwner As Long
    pidlRoot As Long
    pszDisplayName As String
    lpszTitle As String
    ulFlags As Long
    lpfn As Long
    lParam As Long
    iImage As Long
End Type
Declare Function SHGetPathFromIDList Lib "shell32.dll" Alias
"SHGetPathFromIDListA" (ByVal pidl As Long, ByVal pszPath As String) As
Long
Declare Function SHBrowseForFolder Lib "shell32.dll" Alias
"SHBrowseForFolderA" (lpBrowseInfo As BROWSEINFO) As Long
Public Function GetDirectory(Optional Msg) As String
    Dim bInfo As BROWSEINFO
    Dim path As String
    Dim r As Long, X As Long, pos As Integer
    bInfo.pidlRoot = 0&
    If IsMissing(Msg) Then
        bInfo.lpszTitle = "Select a folder."
    Else
        bInfo.lpszTitle = Msg
    End If
    bInfo.ulFlags = &H1
    X = SHBrowseForFolder(bInfo)
    path = Space$(512)
    r = SHGetPathFromIDList(ByVal X, ByVal path)
    If r Then
        pos = InStr(path, Chr$(0))
        GetDirectory = Left(path, pos - 1)
    Else
        GetDirectory = ""
    End If
'    Dim Msg As String
'    Msg = "Please select a location for the backup."
'    GetDirectory (Msg)
End Function
Function Install()
Dim tmp As Integer
Dim Tabelle
Dim Msg, Directory, File As String
Dim Response As Boolean
Response = True
While Response
 Msg = "Selezionare la directory degli Archivi."
 Directory = GetDirectory(Msg)
 If Trim(Directory) = "" Then
  If MsgBox("Non e stata selezionata alcuna direcory. Volete
tralasciare l'installazione?", vbYesNo + vbCritical, "Errore durante
l'installazione") = vbYes Then
   Exit Function
  Else
   Response = True
  End If
 Else
  Response = False
 End If
Wend
Tabelle = Array("Anagrafica", "Carichi", "Chiamate", "Conferimenti",
"Contenitori", _
                "Noleggi", "Offerte", "Operatrici", "Posizionamenti",
"Referenti", "ReferentiStabilimenti", _
                "Smaltimenti", "Sondaggi", "Stabilimenti", "Trasporti",
"Vettori", "Tappe", "Percorsi")
If Right(Directory, 1) <> "\" Then
 Directory = Directory & "\"
End If

File = Directory & "Archivio.mdb"
If Dir(File) = "" Then
 Call MsgBox("Attenzione installazione fallita, errore nell'apertura
del file: " & File, vbCritical)
 Exit Function
End If
For tmp = 0 To 17
 on error resume next
 DoCmd.DeleteObject acTable, Tabelle(tmp)
 on error goto 0
 DoCmd.TransferDatabase acLink, "Microsoft Access", File, acTable,
Tabelle(tmp), Tabelle(tmp), False
Next tmp

Call MsgBox("Installazione avvenuta con successo!", vbInformation)
End Function


author: Sib

text:
"Giancarlo Francesconi dall'ufficio" <
thi...@tin.it
> ha scritto nel
messaggio

tdf as tabledef
set tdf=currentdb.tabledefs("TuaTabella")
tdf.connection="Tuo percorso"
tdf.refreshlink
D'altro canto, come aversti potuto notare osservando con attenzione il
codice sul sito comune, la funzione di apertura stile windows in realta' non
fa altro che restituire il nome di un file completo di percorso.
Sib


text:
Giancarlo Francesconi dall'ufficio wrote:
> Ritengo che i percorsi delle tab.
> collegati siano registrati da qualche parte. E' possibile modificarli 'a
> mano'?
sono su msysobjects (comprensivi di password in chiaro se c'e') la tabella,
essendo di sistema, non e' modificabile
--
a.cara
Togli qualcosa dall'email


author: Paolo opg

text:
"Setec Astronomy" <
se...@freemail.it
> wrote in news:ZaWFa.81979
$
Ny5.2...@twister2.libero.it
:
>
> Tabelle = Array("Anagrafica", "Carichi", "Chiamate", "Conferimenti",
> "Contenitori", _
>                 "Noleggi", "Offerte", "Operatrici", "Posizionamenti",
> "Referenti", "ReferentiStabilimenti", _
>                 "Smaltimenti", "Sondaggi", "Stabilimenti", "Trasporti",
> "Vettori", "Tappe", "Percorsi")
>
a parte i nomi delle tabelle (ci sono trattati sui nomi degli  oggetti e
alla fine diventa un pò una questione di abitudine/metodo/gusti :-)), ti
conviene appoggiarti a una tabella locale piuttosto che a un array.
in questo modo, puoi modificare al volo l'elenco delle tabelle da
ricollegare, nella tabella puoi mettere più campi (nome locale, nome
remoto, stringa di connessione, etc...) che possono essere utili se oltre
a tabelle in altri mdb, hai anche tabelle odbc.
in più, hai il vantaggio di avere un metodo che va bene per qualsiasi
tipo di tabella, con già la possibilità di impostare tutti i dati che
dovessero servirti per aggiornare connessioni, modifiche volanti,
modifiche malefiche al be...
--
+-------
| Paolo opg
|
| janickg ( at ) hotmail ( dot ) com
+-------


text:
"Sib" <si...@SPAMiol.it> ha scritto nel messaggio
news:2_WFa.78627$pR3.1...@news1.tin.it...
> "Giancarlo Francesconi dall'ufficio" <
thi...@tin.it
> ha scritto nel
> messaggio
> > Provo a ripostare in maniera piů chiara un quesito sul riallineamento
> delle
> > tabelle collegate.
> > Mi chiedevo se fosse possibile far specificare all'utente, ad es. in una
> > casella di testo il percorso del DB che contiene delle tabelle allegate.
> Gli
> > esempi trovati nel sito comune sono molto interessanti, ma mi chiedevo
se
> > non fosse possibile 'passare' ad access direttamente il percorso della
> tab.
> > collegata, semplicemente scrivendolo. Ritengo che i percorsi delle tab.
> > collegati siano registrati da qualche parte. E' possibile modificarli 'a
> > mano'?
>
> tdf as tabledef
>
> set tdf=currentdb.tabledefs("TuaTabella")
>
> tdf.connection="Tuo percorso"
> tdf.refreshlink
>
Non sono molto pratico. Potresti dirmi dove inserire questo codice, pls?
> D'altro canto, come aversti potuto notare osservando con attenzione il
> codice sul sito comune, la funzione di apertura stile windows in realta'
non
> fa altro che restituire il nome di un file completo di percorso.
>
> Sib
>
>
Grazie in anticipo.
Giancarlo


text:
"Giancarlo Francesconi dall'ufficio" <
thi...@tin.it
> ha scritto nel
messaggio
> "Sib" <si...@SPAMiol.it> ha scritto nel messaggio
> > "Giancarlo Francesconi dall'ufficio" <
thi...@tin.it
> ha scritto nel
> > messaggio
> > > Provo a ripostare in maniera piů chiara un quesito sul riallineamento
> > delle
> > > tabelle collegate.
> > > Mi chiedevo se fosse possibile far specificare all'utente, ad es. in
una
> > > casella di testo il percorso del DB che contiene delle tabelle
allegate.
> > Gli
> > > esempi trovati nel sito comune sono molto interessanti, ma mi chiedevo
> se
> > > non fosse possibile 'passare' ad access direttamente il percorso della
> > tab.
> > > collegata, semplicemente scrivendolo. Ritengo che i percorsi delle
tab.
> > > collegati siano registrati da qualche parte. E' possibile modificarli
'a
> > > mano'?
> >
> > tdf as tabledef
> >
> > set tdf=currentdb.tabledefs("TuaTabella")
> >
> > tdf.connection="Tuo percorso"
> > tdf.refreshlink
> >
>
> Non sono molto pratico. Potresti dirmi dove inserire questo codice, pls?
Dove ti pare, nell'evento che ritieni piu' opportuno per eseguire la
procedura: all'apertura di una maschera, alla pressione di un pulsante, ecc
ecc-
Sib


title: testo predefinito modificabile

author: Francesco

text:
Buongiorno,
in una maschera ho un campo numerico.
all'inserimento di un nuovo record questo campo giustamente presenta il
valore "0"
vorrei che questo campo venisse presentato con un valore "suggerito"
che calcolo tramite una formula.
vorrei pero' che l'utente avesse la facolta' di cambiare questo valore.
ho provato a fare questo:
nome elemento: elvalore
origine controllo: valore
valore predefinito: =formuladicalcolo
ma il valore visualizzato e' sempre "0"
ho provato allora a generare un evento "prima di aggiornare" per la
casella di testo:
elvalore=formuladicalcolo stesso risultato.
stessa cosa mettendo lo stesso evento nella maschera stessa.
sono una frana eh ? :(


title: testo predefinito modificabile

text:
"Francesco" <
vi...@tiscali.it
> wrote in message
news:1127482171.4...@g44g2000cwa.googlegroups.com
> Buongiorno,
>
[CUT]
Passaci la funzione che effettua il calcolo della Formula
magari hai commesso un errore li.
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: testo predefinito modificabile

text:
molto semplice:
=Max([progressivo])+1


title: testo predefinito modificabile

text:
"Francesco" <
vi...@tiscali.it
> wrote in message
news:1127728309....@g47g2000cwa.googlegroups.com
> molto semplice:
> =Max([progressivo])+1
Molto meglio valutare la possibilità che non ci siano
record nella tabella:
=NZ(Max([Progressivo]);0)+1
Se questo è inserito nel DefaultValue ed il controllo
è libero il valore è modificabile, chiaro che dovrai
verificarne la rispondenza alle condizioni di PK su
evento BeforeUpdate, potresti incappare altrimenti
in un tentativo di duplicazione chiave primaria.
Ciao



title: testo predefinito modificabile

text:
scusa ma sto impazzendo per una cavolata.
ora, per semplificare la situazione, nella tabella "protocollo" il
campo "progr" è numerico, intero, non chiave, non indicizzato.
nella maschera, metto una casella di testo con il nome
"etichetta_progressivo" in cui, come origine controllo c'e' "progr" e
come valore predefinito ho messo =NZ(Max([progr]);0)+1
inserendo il primo record mi propone correttamente il valore "1"
inserendo il successivo da' "#Errore"
se chiudo e riapro la maschera propone ancora "1" anche se nella
tabella "protocollo" ci sono valori inseriti.
 O_o


title: testo predefinito modificabile

text:
ho l'impressione di essermi spiegato male, percio', ti prego di
scaricare un piccolissimo db in cui riproduco l'esempio:
http://www.lemiecime.it/download/prova.mdb
il campo "numero" della maschera, quando si inserisce un nuovo record
dovrebbe proporre come valore il max dei valori esistenti nel campo
"numero" della tabella T1 più 1.
grazie


title: testo predefinito modificabile

text:
"Francesco" <
vi...@tiscali.it
> wrote in message
news:1127737268.0...@g49g2000cwa.googlegroups.com

> "numero" della tabella T1 piů 1.
>
> grazie
E' in una versione che non posso aprire, presumo 2003.
Salvalo in 2002.



title: testo predefinito modificabile

text:
fatto
http://www.lemiecime.it/download/prova2k2.mdb


title: testo predefinito modificabile

text:
"Francesco" <
vi...@tiscali.it
> wrote in message
news:1127732183.3...@z14g2000cwz.googlegroups.com

Al di là che non mi sono trovato la situazione da te descritta....!
usa questo:
=Nz(DMax("numero";"T1");0)+1



title: Vedere tabelle Access 97 da Access 2.0

author: marketto

text:
Sto rifacendo ex-novo (meno tempo perso e nuove esigenze) una specie di
gestionale che fino ad oggi ha girato in access 2. Dal momento che la
"revisione" e riscrittura sta andando avanti a pezzi ci sara' una fase
intermedia in cui il front end in Access 97 e quello in access 2 dovranno
convivere, facendo ognuno una parte del lavoro. Una parte delle nuove
tabelle fatte con access 97 dovrebbero, per motivi di unicita' di indici e
tutto il resto, essere in qualche modo collegate in access 2 sostituendo le
vecchie e unificando alcuni archivi. Ora, esiste un sistema per accedere da
access 2 a tabelle salvate in mdb formato access 97? Non c'e' un altro
sistema che non sia rifare a mano le tabelle in access 2 e taglincollarci i
dati nuovi, in modo tale che entrambi possano accedervi (lavoro lungo e
noioso, sono abbastanza e con una marea di campi, senza contare che alcune
features che gli mdb access 2 non hanno mi costringerebbero a rivedere per
la 345esima volta le parti nuove che ora funziano bene)? Mi chiedevo ad
esempio se non ci fosse un driver odbc 16 per "vedere" i dati di tabelle
access 97. Non so se sia un idea pellegrina o meno perche' non ho grande
familiarita' con odbc e sulla kb di microsoft mi sono completamente perso
senza riuscire a trovare informazioni definitive.
Un grosso grazie a chi mi da una dritta qualsiasi.
Marco
________________________
Per il reply togli NOSPAM


title: Vedere tabelle Access 97 da Access 2.0

author: Stefano Bettini

text:
marketto <bf...@NOSPAMtin.it> wrote in message 88vq5l$c3$1...@nslave1.tin.it...
> Mi chiedevo ad
> esempio se non ci fosse un driver odbc 16 per "vedere" i dati di tabelle
> access 97. Non so se sia un idea pellegrina o meno perche' non ho grande
> familiarita' con odbc e sulla kb di microsoft mi sono completamente perso
> senza riuscire a trovare informazioni definitive.
>
Non posso provare non avendo + access2 installato, ma se ben ricordo
dovrebbe funzionare tranquillamente anche con odbc a 32 bit....
Bye, Ste


title: Vedere tabelle Access 97 da Access 2.0

text:
marketto ha scritto nel messaggio <88vq5l$c3$
1...@nslave1.tin.it
>...
>Sto rifacendo ex-novo (meno tempo perso e nuove esigenze) una specie di
>gestionale che fino ad oggi ha girato in access 2. Dal momento che la
>"revisione" e riscrittura sta andando avanti a pezzi ci sara' una fase
>intermedia in cui il front end in Access 97 e quello in access 2 dovranno
>convivere, facendo ognuno una parte del lavoro. Una parte delle nuove
>tabelle fatte con access 97 dovrebbero, per motivi di unicita' di indici e
>tutto il resto, essere in qualche modo collegate in access 2 sostituendo le
>vecchie e unificando alcuni archivi. Ora, esiste un sistema per accedere da
>access 2 a tabelle salvate in mdb formato access 97? Non c'e' un altro
>sistema che non sia rifare a mano le tabelle in access 2 e taglincollarci i
>dati nuovi, in modo tale che entrambi possano accedervi (lavoro lungo e
>noioso, sono abbastanza e con una marea di campi, senza contare che alcune
>features che gli mdb access 2 non hanno mi costringerebbero a rivedere per
>la 345esima volta le parti nuove che ora funziano bene)? Mi chiedevo ad
>esempio se non ci fosse un driver odbc 16 per "vedere" i dati di tabelle
>access 97. Non so se sia un idea pellegrina o meno perche' non ho grande
>familiarita' con odbc e sulla kb di microsoft mi sono completamente perso
>senza riuscire a trovare informazioni definitive.
Non credo che sia possibile quello che chiedi: il formato access 97 è
irriconoscibile da access 2.
Invece è possibile il contrario, cioè da access 97 tu vedi tranquillamente
le tabelle di access 2.
Non solo (e questo ti eviterebbe il problema del rifacimento delle tabelle)!
Tu puoi esportare le tabelle access 97, da access 97 a access 2, col comando
esporta su database esterno.
A quel punto tu avrai le tue tabelle in access 2!!!
Antonio


title: Vedere tabelle Access 97 da Access 2.0

author: Stefano Radice

text:
Antonio Biso ha scritto nel messaggio
<8915vb$445$
1...@pegasus.tiscalinet.it
>...
>Non credo che sia possibile quello che chiedi: il formato access 97 è
>irriconoscibile da access 2.
>Invece è possibile il contrario, cioè da access 97 tu vedi tranquillamente
>le tabelle di access 2.
>Non solo (e questo ti eviterebbe il problema del rifacimento delle
tabelle)!
>Tu puoi esportare le tabelle access 97, da access 97 a access 2, col
comando
>esporta su database esterno.
>A quel punto tu avrai le tue tabelle in access 2!!!
>
Uhm...l' ODBC, questo sconosciuto! E' vero che è tardi per impararlo, dato
che OLE DB lo sta soppiantando...


title: calendario aggiornato

author: ferplus

text:
Ho messo un controllo calendario in una maschera.
prima cosa dovrei fare in modo che ad ogni apertura della maschera il
calendario sia sulla data corrente
poi dovrei quando scelgo una data che questa mi finisca su di una text non
associata di nome txtData
vi ringrazio
--
ciao


title: calendario aggiornato

author: Fabio

text:
"ferplus" <
rof...@inwind.it
> ha scritto nel messaggio
news:7b689.76265$n04.2...@twister2.libero.it...

Ti ho già risposto alle 12.27
FABIO


title: calendario aggiornato

text:
--
>
> Ti ho già risposto alle 12.27
> FABIO
>
> Scusami ma non riesco a visualizzare quel messaggio puoi riscriverlo
grazie


title: calendario aggiornato

text:
"ferplus" <
rof...@inwind.it
> ha scritto nel messaggio
news:D7789.76432$n04.2...@twister2.libero.it...

Nell'evento SuApertura del Form scrivi
Me.ctlCalendario.Today
Me.ctlCalendario.Refresh
Nell'evento SuAggiornato del controllo calendario scrivi
Me.txtData=Me.ctlCalendario.Value
Ciao, FABIO


title: calendario aggiornato

text:
--
>
> Nell'evento SuApertura del Form scrivi
>
> Me.ctlCalendario.Today
> Me.ctlCalendario.Refresh
>
>
> Nell'evento SuAggiornato del controllo calendario scrivi
>
> Me.txtData=Me.ctlCalendario.Value
>
> Ciao, FABIO
>
> ho scritto questo codice:
un pulsantino per aprire il calendario:
Private Sub ApriChiudi_Click()
If Me!ctlCalendario.Visible = False Then
    Me!ctlCalendario.Visible = True
    Else
    Me!ctlCalendario.Visible = False
End If
End Sub
Trasferimento data nella txt:
Private Sub ctlCalendario_Click()
Me.DataIniziale = Me.ctlCalendario.Value
End Sub
Private Sub Form_Current()
Me!ctlCalendario.Visible = False
End Sub
Private Sub Form_Open(Cancel As Integer)
Me.ctlCalendario.Today
Me.ctlCalendario.Refresh
End Sub
poi volevo che una volta scelto il giorno il calendario si chiudesse da solo
senza pigiare il pulsantino
questo il codice:
Private Sub ctlCalendario_AfterUpdate()
Me!DataIniziale.SetFocus
Me!ctlCalendario.Visible = False
End Sub
senza questo codice mi trasferisce la data scelta nella txt
con questo codice mi chiude il calendario dopo scelto il giorno ma non me lo
visualizza nella txt
dove sbaglio????
 grazie mille


title: calendario aggiornato

text:
>
> Private Sub ctlCalendario_Click()
> Me.DataIniziale = Me.ctlCalendario.Value
> End Sub
>
>
> poi volevo che una volta scelto il giorno il calendario si chiudesse da
solo
> senza pigiare il pulsantino
> questo il codice:
>
> Private Sub ctlCalendario_AfterUpdate()
> Me!DataIniziale.SetFocus
> Me!ctlCalendario.Visible = False
> End Sub
>
> senza questo codice mi trasferisce la data scelta nella txt
> con questo codice mi chiude il calendario dopo scelto il giorno ma non me
lo
> visualizza nella txt
>
A occhio toglierei la routine ctlCalendario_Click e la integrerei
nell'AfterUpdate che diventerebbe cosě:
Private Sub ctlCalendario_AfterUpdate()
   Me.DataIniziale = Me.ctlCalendario.Value
   Me!DataIniziale.SetFocus
   Me!ctlCalendario.Visible = False
End Sub
Se non ti funziona prova a mettere l'ultima istruzione nell'evento Exit del
ctlCalendario
Ciao, FABIO


title: calendario aggiornato

text:
--
ciao
"Fabio" <
nospam_fa...@tin.it
> ha scritto nel messaggio
news:8ll89.80709$lu5.2...@twister1.libero.it...
> >
Nell'evento SuApertura del Form scrivi
Me.ctlCalendario.Today
Me.ctlCalendario.Refresh
Ora funziona ma ancora una domanda:
io pensavo che il codice sopra servisse tenere aggiornato il calendario alla
data odierna ma non funzia mi spiego
quando apro la maschera e pigio sul pulsantino che mi apre il calendario
questo mi si apre sulla data che ho creato il calendario invece vorrei che
visualizzasse la data corrente
e' possibile?


title: calendario aggiornato

text:
"ferplus" <
rof...@inwind.it
> ha scritto nel messaggio
news:WRn89.78838$n04.2...@twister2.libero.it...

Sinceramente a me funziona (ho appena controllato): il metodo Today imposta
il calendario alla data corrente, prova a premere CTRL+T, dovrebbe eseguire
il metodo Today.
Prova al limite a fare un debug e vedi se ti salta quell'istruzione o
eventualmente prova in apertura a mettere:
Me.ctlCalendario.Value=Date()
Io comunque uso il controllo calendario 7.0
Fabio


title: calendario aggiornato

text:
--
ciao
"ferplus" <
rof...@inwind.it
> ha scritto nel messaggio
news:WRn89.78838$n04.2...@twister2.libero.it...

> ho combinato con questo codice sull'evento click del pulsante di apertura
If IsNull(Me!DataIniziale) Then
        Me!ctlCalendario.Year = Year(Date)
        Me!ctlCalendario.Month = Month(Date)
        Me!ctlCalendario.Value = Date
    End If
grazie e ciao


title: calendario aggiornato

text:
"ferplus" <
rof...@inwind.it
> ha scritto nel messaggio
news:Oao89.78889$n04.2...@twister2.libero.it...
> If IsNull(Me!DataIniziale) Then
>         Me!ctlCalendario.Year = Year(Date)
>         Me!ctlCalendario.Month = Month(Date)
>         Me!ctlCalendario.Value = Date
>     End If
Tanto per curiosità, lascia solo
If IsNull(Me!DataIniziale) Then
         Me!ctlCalendario.Value = Date
End If
o al limite:
If IsNull(Me!DataIniziale) Then
        Me!ctlCalendario.Year = Year(Date)
        Me!ctlCalendario.Month = Month(Date)
        Me!ctlCalendario.Day= Day(Date)
End If
o meglio ancora:
If IsNull(Me!DataIniziale) Then
        Me!ctlCalendario.Year = 0
        Me!ctlCalendario.Month = 0
        Me!ctlCalendario.Day= 0
End If
Fammi sapere, sono curioso
Fabio


title: calendario aggiornato

text:
--
ciao
"Fabio" <
nospam_fa...@tin.it
> ha scritto nel messaggio
news:Afo89.81152$lu5.2...@twister1.libero.it...

> ho provato ma ctlCalendario.Day non funziona


title: "Comando o azione Vai a pagina non disponibile"

author: Dino

text:
Ciao a tutti-Ho esigenza di aprire un report direttamente all'ultima
pagina.I  rete ho trovato del codice di Alex per far cio':
DoCmd.OpenReport "Report1", acViewPreview, , acHidden
DoCmd.SelectObject acReport, "Report1"
DoCmd.GoToPage Reports("Report1").Pages
Il problema e' che mi si apre il report ma mi viene data anche la
segnalazione di "Comando o azione Vai a pagina non disponibile.
Come posso risolvere il problema?????
Grazie in anticipo
Dino
NB:Ho verificato i rif DAO 3.6 (sono presenti e flaggati)
NB2.Versione Access 2000


author: Lolince

text:

Argomento trattato , se non erro proprio sergio mazza aveva dato una
soluzione di questo tipo
DoCmd.OpenReport NomeReport, acPreview
RunCommand acCmdFitToWindow
SendKeys "{end}"


text:

> SendKeys "{end}"- Nascondi testo citato
>
> - Mostra testo citato -
Perfetto Lolince Funziona alla grande
Grazie mille
Dino


title: Recalc e Setfocus

author: singer

text:
Ho utilizzato me.recalc, sull'evento dopo aggiornamento di un controllo
all'interno di una sottomaschera, per rieseguire dei calcoli, delle somme,
in altri controlli che appunto sommano i valori di alcuni record della mia
stessa sottomaschera.
Accade però che il cursore, dopo l'aggiornamento di quel controllo, invece
che proseguire nel campo a fianco (la mia sottomaschera è a visualizzazione
foglio dati), mi ritorno sul primo campo del primo record.
Se uso il Setfocus, mi ritorna invece sul primo record del campo per il
quale ho utilizzato il setfocus
come faccio per ottenere il setfocus del record corrente??
Spero di essere stato chiaro!!
Grazie


title: Recalc e Setfocus

text:
"singer" <
fuscoa...@tin.it
> ha scritto nel messaggio
news:xwLme.963515$b5.41...@news3.tin.it...

Ma forse non sono stato chiaro???


title: strComp

author: SunRex

text:
perchè se utilizzo strComp e gli faccio comparare le seguenti due parole
ciccio
ciccia
mi dice che ciccio è maggiore di ciccia cioè mi restituisce 1?
Sunrex


title: strComp

author: Gaspare

text:
"SunRex" <
sunrexs...@hotmail.com
> ha scritto nel messaggio
news:%Sx5e.1198387$35.44...@news4.tin.it...

Funzione StrComp
Confronta due stringhe e restituisce un valore che rappresenta il risultato
del confronto.
Può restituire uno dei seguenti valori:
se stringa1 < stringa2 - StrComp ritorna -1
se stringa1 = stringa2- StrComp ritorna 0
se stringa1 > stringa2 - StrComp ritorna 1
se stringa1 oppure stringa2 è Null - StrComp ritorna Null
cicci- o > a


title: strComp

text:
"Gaspare" <
in...@studioieducation.com
> ha scritto nel messaggio
news:y5y5e.1198507$35.44...@news4.tin.it...

OK la guida in linea l'avevo letta pure io.
Ma perchè ciccio sarebbe più grande, cioè in base a che valore?
Sunrex


title: strComp

author: Bruno Campanini

text:
"SunRex" <
sunrexs...@hotmail.com
> wrote in message
news:2gz5e.753259$b5.33...@news3.tin.it...
> OK la guida in linea l'avevo letta pure io.
> Ma perchè ciccio sarebbe più grande, cioè in base a che valore?
>
> Sunrex
Perché il codice ASCII di "a" è 97
mentre quello di "o" non lo ricordo
ma è maggiore (perché "o" segue "a").
Li verifichi con Asc("a"),  Asc("o")
Bruno


title: strComp

text:
"Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
news:2zz5e.753363$b5.33...@news3.tin.it...

111 :(
Sunrex


title: strComp

text:
"Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
news:2zz5e.753363$b5.33...@news3.tin.it...

Aspetta un attimo.......
Se confronto Ciccio con ciccio i risultati ASCII sono
Ciccio = 586
ciccio=618
mi aspetterei che strComp mi restituisca -1 invece mi da 0.
Sunrex


title: strComp

text:
"SunRex" <
sunrexs...@hotmail.com
> ha scritto nel messaggio
news:VQz5e.753446$b5.33...@news3.tin.it...

vbBinaryCompare
Sorry
SunRex


title: Distribuire applicativo Access 2003.

author: IvaNik

text:
Salve a tutti.
Mi chiamo Ivano e non sono molto esperto in questo argomento.
Vi chiedo quindi se potete aiutarmi.
Ho un piccolo data-entry in access 2003 vorrei distribuirlo su alcuni
portatili che potrebbero non avere
office installato.
Ho provato a scaricare ed installare la runtime di access 2003, ma
quando vado ad aprire il db sembra che non accada nulla.
Forse dovrei intervenire prima nell'ambiente di sviluppo con qualche
sorta di compilazione.... non saprei....
Potete aiutarmi?????

Grazie mille in anticipo e buon lavoro!

Ivano.


title: Distribuire applicativo Access 2003.

text:
Il 16/04/12 11.58, IvaNik ha scritto:
cut
> Ho un piccolo data-entry in access 2003 vorrei distribuirlo su alcuni
> portatili che potrebbero non avere
> office installato.
> Ho provato a scaricare ed installare la runtime di access 2003, ma
> quando vado ad aprire il db sembra che non accada nulla.

qui per il 2003 direbbe un'altra cosa
http://www.donkarl.com/it?FAQ1.3

> Forse dovrei intervenire prima nell'ambiente di sviluppo con qualche
> sorta di compilazione.... non saprei....
> Potete aiutarmi?????
>
> Grazie mille in anticipo e buon lavoro!

Prego
Pietro

>
> Ivano.


title: Distribuire applicativo Access 2003.

text:
On 16 Apr, 12:30, pietro66 <
pietr...@yahoo.it
> wrote:
> Il 16/04/12 11.58, IvaNik ha scritto:
> cut
>
> > Ho un piccolo data-entry in access 2003 vorrei distribuirlo su alcuni
> > portatili che potrebbero non avere
> > office installato.
> > Ho provato a scaricare ed installare la runtime di access 2003, ma
> > quando vado ad aprire il db sembra che non accada nulla.
>
> qui per il 2003 direbbe un'altra cosahttp://
www.donkarl.com/it?FAQ1.3

>
> > Forse dovrei intervenire prima nell'ambiente di sviluppo con qualche
> > sorta di compilazione.... non saprei....
> > Potete aiutarmi?????
>
> > Grazie mille in anticipo e buon lavoro!
>
> Prego
> Pietro
>
>
>
>
>
> > Ivano.- Nascondi testo citato
>
> - Mostra testo citato -

Ciao ti ringrazio Pietro per la tua risposta, ho letto il link che mi
hai proposto e penso di averci capito qualcosa....

Senti Pietro, io mi ritrovo una licenza per Office 2010 professional
acquistata dall'azienda ma non usata per motivi interni....

Da quello che ho capito sulla 2010 sono già incluse sia le funzioni di
distribuzione che la runtime... Giusto?

Quindi se io installo office 2010 sulla mia postazione, converto il
mio MDB 2003 in 2010, posso distribuirlo sui portatili... Giusto?

Grazie.
Ivano.


title: Distribuire applicativo Access 2003.

text:
Il 16/04/12 13.47, IvaNik ha scritto:
cut
>
> Senti Pietro, io mi ritrovo una licenza per Office 2010 professional
> acquistata dall'azienda ma non usata per motivi interni....
>
> Da quello che ho capito sulla 2010 sono già incluse sia le funzioni di
> distribuzione che la runtime... Giusto?
>
> Quindi se io installo office 2010 sulla mia postazione, converto il
> mio MDB 2003 in 2010, posso distribuirlo sui portatili... Giusto?
>
> Grazie.
> Ivano.
>

Il runtime credo che vada scaricato a parte, per la conversione
devi passare da mdb a accdb (e vedere se va tutto bene) e poi
convertirlo nella versione che gira col runtime ma non posso essere +
preciso perchè ancora non l'ho mai fatto
Saluti
Pietro


title: Distribuire applicativo Access 2003.

text:
Il 16/04/12 14.12, pietro66 ha scritto:
cut
>
> Il runtime credo che vada scaricato a parte, per la conversione
> devi passare da mdb a accdb (e vedere se va tutto bene) e poi
> convertirlo nella versione che gira col runtime ma non posso essere +
> preciso perchè ancora non l'ho mai fatto
> Saluti
> Pietro
E il runtime va installato sui portatili privi di Office


title: Distribuire applicativo Access 2003.

text:

Ti ringrazio ancora x l'interessamento...   Ti farò sapere al + presto
come è andata....  Cià.

Ivano.


title: Report e grafici

author: moskolowosky

text:
Ho un piccolo pb con i grafici in Access.
Mi si presenta la necessità di dimensionare dinamicamente l'asse delle
ascisse (Asse X)
Mi spiego meglio:
L'asse X deve essere proporzionato all'incremento che avviene
nell'intervallo.
Faccio un esempio:
Il mese 1 le mie vendite sono pari a 10 Kg su una previsione di 100 Kg
previste nell'anno--> pari al 10 % del previsto
Il mese 2 le mie vendite sono pari a 35 Kg su una previsione di 100 Kg
previste nell'anno--> pari al 35 % del previsto --> Incremento di 25
punti %
Il mese 3 le mie vendite sono pari a 50 Kg su una previsione di 100 Kg
previste nell'anno--> pari al 50 % del previsto --> Incremento di 15
punti %
...
In buona sostanza vorrei che il mio asse X si dimensionasse in
proporzione
all'incremento, quindi:
l'intervallo tra il mese 0 e il mese 1dovrebbe essere largo 10%
dell'intera
larghezza dell'asse X
l'intervallo tra il mese 1 e il mese 2 dovrebbe essere largo 25%
dell'intera
larghezza dell'asse X
l'intervallo tra il mese 2 e il mese 3 dovrebbe essere largo 15%
dell'intera
larghezza dell'asse X
e così via.
La mia domanda è: è possibile in Access tutto questo? Eventualmente
non
fosse possibile in Access è possibile in Excel? O in alternativa cosa
mi
suggerite di usare?


title: progetto

author: Cocoon

text:
Mi consigliate un progetto da fare in access (mi serve per un esame) che non
sia la solita biblioteca o conto corrente o campionato


title: progetto

author: Sergio MAZZA

text:
"Cocoon" <nonRo...@noSPAM.com> ha scritto nel messaggio
news:NkF3c.29374$O31.1...@news4.tin.it...
> Mi consigliate un progetto da fare in access (mi serve per un esame) che
non
> sia la solita biblioteca o conto corrente o campionato
>
Gestione magazzino?
Negozio di dischi?
Albero genealogico?
Rilevazione crediti?
Ciao.
--
Sergio MAZZA


title: problemi con referenti

author: Sabry

text:
Ciao a tutti,
avrei un quesito da sottoporvi che a  molti di voi potrà sembrare banale
ma che a me sta dando un pò noia. Ho  importato un vecchio database che
gestiva clienti  su un nuovo fatto con access, il mio problema è il
seguente ....
Premetto che nel vecchio database avevo una tabella clienti e una
tabella referenti che permetteva l'inserimento di più referenti
all'interno di una singola società. Nel  mio nuovo database ho creato
all'interno della maschera clienti una pagina (tab) "Referenti" che mi
permette di digitare il nome e la qualifica  di uno o più. Relazionando
il vecchio IDcliente sono riuscita ad incrociare correttamente tutti i
referenti con le rispettive società. Es. ditta Gommaplus ref. int, mario
(tecnico), simona (amministr), adriana (centralinista)....
Ora però il problema è che la  sottomaschera che ho aggiunto alla
maschera clienti mi visualizza tutti i nomi e gli IDclienti ma non della
singola società, ma di tutte.
es:  ID2033 ditta Gommapluss mi visualizza :  mario ID2033, simona
ID2033, roberto ID2055 (che fa parte di un'altra società). Inoltre se
aggiungo un nome tutti i record ereditatano tale nome ....
Qualcuno può darmi un consiglio ?
Grazie


title: problemi con referenti

text:
"Sabry" <
sabr...@strhold.it
> ha scritto nel messaggio
news:3906F308...@strhold.it...

Hai controllato le proprietà (collega campi secondari e campi master) della
sottoscheda (sottomaschera) se ha i referimenti al campo chiave ID?
Ciao.


title: problemi con referenti

text:
... ora controllo
Grazie
Sabrina
Sergio MAZZA ha scritto:



title: problemi con referenti

text:
Aiutoooooo ho guardato campi secondari e master nell'indice ma non sono riuscita
a trovare niente, puoi darmi un ulteriore suggerimento
Grazie infinite ...
Sabrina
Sabry ha scritto:



title: problemi con referenti

text:
"Sabry" <
sabr...@strhold.it
> ha scritto nel messaggio
news:3907EBD6...@strhold.it...
> Aiutoooooo ho guardato campi secondari e master nell'indice ma non sono
riuscita
> a trovare niente, puoi darmi un ulteriore suggerimento
>
>
> Grazie infinite ...
> Sabrina
>
In quelle proprietà devi inserire i campi chiave. Se clicchi su (per
esempio) "campi secondari" ti appare il bottone con tre punti (generatore di
espressione); premendolo si avvia il wizard che ti segue nell'inserimento
dei campi giusti, che nel tuo caso non è molto difficile capire quali
inserire: in entrambi i casi è il campo ID (se li hai chiamati così)...
Ciao.
P.S. con l'help (f1) alla voce: "Proprietà CollegaCampiSecondari,
CollegaCampiMaster..." trovi ogni informazione...
AriCiao.


title: problemi con referenti

text:
trooopppppooooo gentile !!!! :)
Sabrina
Sergio MAZZA ha scritto:
> "Sabry" <
sabr...@strhold.it
> ha scritto nel messaggio



title: accessrt ??

author: WhiteKing

text:
Scusate l' ignoranza ma a cosa serve il file accessrt.msi che trovo nel cd
di office 2003 che abbiamo qui in ufficio ?
Grazie a tutti!


title: aggiungi un posto a tavola da accessgroup

author: access il top

text:
ciao ragazzi,
volevo solo dirvi che oltre ai modi che ci sono su access group io ho
utilizzato questo,
ovviamente grazie perchč senza il vostro aiuto non sarei riuscit
Dim stsql$
stsql = "INSERT INTO fornitori (fornitore) "
stsql = stsql & "VALUES(""" & NewData & """)"
DoCmd.RunSQL stsql
Response = acDataErrAdded
ciao a tutti


author: MA

text:

Certo, una query di accodamento.
Preferisco sempre il recordset per seguire l'eventuale debug, gestione degli
errori
e per poter lavorare con l'inserimento dei valori che voglio dove voglio
(metti per esempio che debba inserire un mini contatore.
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: Sostituzione valori......

author: mark

text:
Salve a tutti!
Non riesco a capire come fare per ottenere quanto appresso:
ho necessità di cambiare una parte di testo, esempio, un percorso da
C:\prova\prova.jpg a d:\prova.
M'interessa solo la parte "C:\prova" da sostituire in modo da ottenere
"D:\prova\prova.jpg.
Ho cercato nell'help di provare le funzioni TRIM, LTRIM, RTRIM ma sembrano
non fare al mio caso.
Ho provato anche in una query di aggiornamento ma, purtroppo quando gli
specifico quale testo cercare e rimpiazzare, in questo, il nuovo percorso,
ovviamente mi cancella parte restante a destra (prova.jpg).
Qual'è il metodo nella query e/o in una routine?
Spero di essere stato abbastanza chiaro.
Grazie anticipatamente.
Marco.


title: Sostituzione valori......

author: geppo

text:

prova questa :
Private Sub NomeTuoPulsante_Click()
Dim k
Dim t
Dim d
d = NomeTuaCasellaDiTesto
t = Mid(nomeTuaCasellaDiTesto, 1, 1)
k = Replace(t, "C", "D")
me.NomeTuaCasellaDitesto = k & Right(d, Len(d) - 1)
End Sub
Se la vuoi usare in un query allora crea una funzione:
public function cambialettera(record as string) as string
dim k
dim t
dim d
d = record
t = mid(record, 1,1)
k = replace(t, "c", "d")
cambialettera = k & right(d, len(d) - 1)
end function
nella query la richiami cosi:
select cambialettera(Nomecampo) from tabella
Altrimenti puo aggiornare la tabella da vba in questo modo:
private sub NomePulsante_click()
dim rst as recordset
dim k
dim t
dim d
set rst = currentdb.openrecordset("nometuatabella")
do while not rst.eof
rst.edit
d=rst.fields("NomeCampoDaAggiornare")
t=mid(rst.fields("NomeCampoDaAggiornare"),1,1)
k=replace(t, "c","d")
rst.fields("NomeCampoDaAggiornare") = k & right(d, len(d) - 1)
rst.update
rst.movenext
loop
rst.close
end sub
--
Ciao
Geppo


title: Sostituzione valori......

text:
"geppo" <c...@tin.it.invalid> ha scritto nel messaggio
news:34pmj.234271$U01.1...@twister1.libero.it...

Grazie, proverò appena possibile.
Marco.


title: Sostituzione valori......

text:
--Cut--
> prova questa :
>
> Private Sub NomeTuoPulsante_Click()
>
> Dim k
> Dim t
> Dim d
>
> d = NomeTuaCasellaDiTesto
> t = Mid(nomeTuaCasellaDiTesto, 1, 1)
> k = Replace(t, "C", "D")
>
> me.NomeTuaCasellaDitesto = k & Right(d, Len(d) - 1)
>
> End Sub
----Cut-------
mi da errore su  "Replace" stranamente senza posizionarcisi sopra la riga di
codice e, ovviamente, non succede nulla.
Cosa può essere? forse deve essere dichiarata o cosa?
Grazie dell'attenzione.
Marco.


title: Sostituzione valori......

text:

Non so perchè ti accade cio', comunque scaricati questo db di prova, magari
ti aiuta a capire:
http://www.divshare.com/download/3609403-d4a
--
Ciao
Geppo


title: Sostituzione valori......

text:

ho dimenticato di chiederti quale versione di Access utilizzi, perchè la
funzione replace è presente da access A00 in poi.
--
Ciao
Geppo


title: Sostituzione valori......

text:
geppo wrote:
---cut--

Comunque, siccome si tratta di un solo carattere puoi sostituire la
K = Replace(t, "C", "D")
con
k = "D"
--
Ciao
Geppo


title: Sostituzione valori......

text:
"geppo" <c...@tin.it.invalid> ha scritto nel messaggio
news:UDMmj.228816$%k.35...@twister2.libero.it...

Infatti, mi hai preceduto di alcuni minuti. Io uso A97.
Grazie, proverò e ti faccio sapere.
Marco.


title: Sostituzione valori......

text:

oppure fare direttamente cosi:
NomeTuaCasellaDiTesto = "D" & Right(NomeTuaCasellaDiTesto,
Len(NomeTuaCasellaDiTesto) - 1)
--
Ciao
Geppo


title: Sostituzione valori......

text:
"geppo" <c...@tin.it.invalid> ha scritto nel messaggio
news:eVMmj.228823$%k.35...@twister2.libero.it...
>
> oppure fare direttamente cosi:
>
> NomeTuaCasellaDiTesto = "D" & Right(NomeTuaCasellaDiTesto,
> Len(NomeTuaCasellaDiTesto) - 1)
>
>
> --
> Ciao
> Geppo
Rilancio:
NomeTuaCasellaDiTesto = "D" & mid(NomeTuaCasellaDiTesto,2)
Ciao.
--
Sergio MAZZA


title: Sostituzione valori......

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:fnhkbp$rac$1...@tdi.cu.mi.it...

Ottimo, Sergio!
Grazie anche a Geppo. Funzionano entrambi alla grande.
A questo punto, penso, sarebbe ancora più "professionale" visto che:
devo cambiare il percorso di alcuni files e, per esempio, in formato .jpg.
Penso che una volta specificato tutto quello che c'è prima del ".jpg" fino a
"\" (a ritroso), si individuerebbe subito il percorso del/i file/s.
Che ne dite? E' difficile? :-))
Grazie dell'attenzione.
Marco.


title: Sostituzione valori......

text:
Ciao mark wrote:
> "Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
> news:fnhkbp$rac$1...@tdi.cu.mi.it...
>> "geppo" <c...@tin.it.invalid> ha scritto nel messaggio
>> news:eVMmj.228823$%k.35...@twister2.libero.it...
>>>
>>> oppure fare direttamente cosi:
>>>
>>> NomeTuaCasellaDiTesto = "D" & Right(NomeTuaCasellaDiTesto,
>>> Len(NomeTuaCasellaDiTesto) - 1)
>>>
>>>
>>> --
>>> Ciao
>>> Geppo
>>
>>
>> Rilancio:
>> NomeTuaCasellaDiTesto = "D" & mid(NomeTuaCasellaDiTesto,2)
>>
>> Ciao.
>> --
>> Sergio MAZZA
>>
> Ottimo, Sergio!
> Grazie anche a Geppo. Funzionano entrambi alla grande.
> A questo punto, penso, sarebbe ancora piů "professionale" visto che:
> devo cambiare il percorso di alcuni files e, per esempio, in formato
> .jpg. Penso che una volta specificato tutto quello che c'č prima del
> ".jpg" fino a "\" (a ritroso), si individuerebbe subito il percorso
> del/i file/s. Che ne dite? E' difficile? :-))
>
> Grazie dell'attenzione.
> Marco.
qui passo la palla a Sergio MAZZA che saluto.
--
Ciao
Geppo


title: Sostituzione valori......

text:
"geppo" <c...@tin.it.invalid> ha scritto nel messaggio
news:Z%Zmj.229078$%k.35...@twister2.libero.it...
>
> qui passo la palla a Sergio MAZZA che saluto.
>
> --
> Ciao
> Geppo
Ma nooo!??
Lasci la mano con cosě?
Ciao.
--
Sergio MAZZA


title: Sostituzione valori......

text:
"mark" <_conr...@yahoo.it_> ha scritto nel messaggio
news:479c677b$0$36438$4faf...@reader5.news.tin.it...
> Ottimo, Sergio!
> Grazie anche a Geppo. Funzionano entrambi alla grande.
> A questo punto, penso, sarebbe ancora più "professionale" visto che:
> devo cambiare il percorso di alcuni files e, per esempio, in formato .jpg.
> Penso che una volta specificato tutto quello che c'è prima del ".jpg" fino
> a "\" (a ritroso), si individuerebbe subito il percorso del/i file/s.
> Che ne dite? E' difficile? :-))
>
> Grazie dell'attenzione.
> Marco.
Direi che la cosa più "professionale" è quella di separare le informazioni:
Path e nomeDelFile;
Estrai FileName o PathName
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=166
Oppure con Scripting Runtime Library
File Object
http://msdn2.microsoft.com/en-us/library/1ft05taf(VS.85).aspx
Ciao.
--
Sergio MAZZA


title: Sostituzione valori......

text:
Ciao Sergio MAZZA wrote:
> "geppo" <c...@tin.it.invalid> ha scritto nel messaggio
> news:Z%Zmj.229078$%k.35...@twister2.libero.it...
>>
>> qui passo la palla a Sergio MAZZA che saluto.
>>
>> --
>> Ciao
>> Geppo
>
>
> Ma nooo!??
> Lasci la mano con cosě?
Sergio io non faccio mica er mestiere tuo. :-)
Prima de capicce quarcosa.......
--
Ciao
Geppo


title: Sostituzione valori......

text:
"geppo" <c...@tin.it.invalid> ha scritto nel messaggio
news:0Grnj.232026$%k.36...@twister2.libero.it...
>
> Sergio io non faccio mica er mestiere tuo. :-)
>
> Prima de capicce quarcosa.......
Aspé! Che mestiere pensi che faccia?!?
> --
> Ciao
> Geppo
Ciao.
--
Sergio MAZZA


title: Sostituzione valori......

text:

Qualcosa che riguarda l'informatica?
dalle risposte che dai, ho capito questo :-)
Se cosi non fosse, ti faccio i miei complimenti;
--
Ciao
Geppo


title: Sostituzione valori......

text:
"geppo" <c...@tin.it.invalid> ha scritto nel messaggio
news:7tHnj.240$FR....@twister1.libero.it...
>
> Qualcosa che riguarda l'informatica?
>
> dalle risposte che dai, ho capito questo :-)
>
> Se cosi non fosse, ti faccio i miei complimenti;
>
> --
> Ciao
> Geppo
Ahaaaa... Pensavo che "qualcuno" avesse parlato...
Ciao.
--
Sergio MAZZA


title: Sostituzione valori......

text:

Primo o dopo "qualcuno" se la canta...... :-)
--
Ciao
Geppo


title: Query parametrica , creazione tabella ed altro

author: Maicol

text:
Un saluto a tutti. Vi chiedo un aiuto particolare facendo pero' una
premessa:
Ho gia' realizzato cio' che mi occorre anche se con difficolta' date le mie
scarse
conoscenze, chiedevo quindi una mano a ripulire il  codice che ho scritto
in modo da imparare ulteriormente qualcosa.
Ovviamente se esiste un modo completamente diverso per realizzare quello che
devo fare
ben vengano altre soluzioni. Entro nel dettaglio.
Periodicamente devo popolare i dati di una tabella PROIEZIONI con dei
rilevamenti fatti
a cadenza quindicinale ,il 15/1, il 31/1 , il 15/2 etc. etc.
Questa tabella contiene i dati utilizzati per una serie di grafici
gia' impostati per cui la tabella deve per forza essere strutturata
in questo modo :
Idpro : contatore
Data  : campo data
Cap   : intero lungo
Obiettivo : intero lungo (in pratica e' un valore fisso)
Il tutto trae origine da una query parametrica CALCAP che alla richiesta
del parametro [Al giorno] da inserire poi nel campo data della tabella,
restituisce un valore capacita che deve essere inserito nel campo cap
della tabella stessa.
Ogni volta che si popola la tabella e' necessario farlo anche per i
mesi gia' inseriti perche' andando avanti nel tempo anche i dati dei mesi
precedenti si potrebbero modificare.
Chiedo scusa per la lungaggine e spero che qualche anima pia abbia
voglia di dedicarmi un po' del suo tempo.
Grazie a tutti in ogni caso . Segue il codice che ho scritto e
abbiate comprensione :-)))
Dim dbs As database
Dim gior As Date
Dim qual As Date
Dim rst As Recordset
Dim rst1 As Recordset
Dim tdf As TableDef
Dim StrSql As String
Set dbs = CurrentDb()
For Each tdf In dbs.TableDefs
If tdf.Name = "proiezioni" Then
dbs.TableDefs.Delete ("proiezioni")
End If
Next tdf
StrSql = "CREATE TABLE PROIEZIONI (idpro counter,data date,cap
long,OBIETTIVO LONG)"
DoCmd.RunSQL StrSql
CurrentDb!PROIEZIONI!obiettivo.DefaultValue = "41300"
Set rst = CurrentDb.OpenRecordset("proiezioni")
gior = DateSerial(Piano(), 1, 1)         'piano() quest'anno contiene 2003
Do While gior <= Date + 1
     Select Case Day(gior)
     Case 15
            rst.AddNew
        rst!Data = gior
        Set qdf = dbs.QueryDefs("calcap")
qdf.Parameters![al giorno] = gior
           Set rst1 = qdf.OpenRecordset
                              rst!cap = rst1.Fields("capacita")
       rst.Update
       Case 1
     If Month(gior) > 1 Then
     qual = DateSerial(Year(gior), Month(gior), 0)
            rst.AddNew
       rst!Data = qual
               Set qdf = dbs.QueryDefs("calcap")
qdf.Parameters![al giorno] = qual
           Set rst1 = qdf.OpenRecordset
                              rst!cap = rst1.Fields("capacita")
        rst.Update
        End If
     End Select
     gior = gior + 1
     Loop
Set dbs = Nothing
End Sub


title: Errore di runtime con database diviso

author: Claudio

text:
Salve a tutti
Ho questo tipo di problema
come già avevo spiegato, una volta creato il mio pacchetto con il developer
del mio DB diviso, questi dopo averlo installato, all'avvio, quando mi
chiede username e password (autenticazione creata da me, non quella di
access, con tabella utenti gruppi e Dlookup vari). Mi da un generico ERRORE
DI RUNTIME, questo errore non mi viene generato se il DB non l'ho divito e
creo lo stesso pacchetto.
Cosa è?? è gravo dottore??
dico 33??
aspetto notizie
ciao
Claudio


title: Errore di runtime con database diviso

author: Ferrari Rino

text:

> Se ti viene fuori Errore Di Run-Time ce qualche errore nella esecuzione
del codice
che durante la compilazione non riesce ad individuare poiché l'errore viene
generato solo
magari quando una parte di esso viene eseguito.
Ricontrolla il tutto per bene.
Ferrari rino


title: Errore di runtime con database diviso

text:
"Ferrari Rino" <
rinof...@virgilio.it
> ha scritto nel messaggio
news:IG9db.176723$R32.5...@news2.tin.it...

----------------------------------------------
Public Function User_id()
password = DLookup("[pwd]", "user_id", "user = '" & Forms!User_id.user &
"'")
gruppo = DLookup("[gruppo]", "user_id", "user = '" & Forms!User_id.user &
"'")
user = DLookup("[user]", "user_id", "user = '" & Forms!User_id.user & "'")
If conta < 2 Then
    If Forms!User_id.pwd = password Then
    DoCmd.Close acForm, "user_id"
    ID_Record_Log = RegistraLogin()
    DoCmd.RunMacro ("avvio_autenticato")
        If gruppo = "Progettisti" Then
        CommandBars("menu_principale").Enabled = True
        ElseIf gruppo = "Amministratori" Then
        CommandBars("menu_principale").Enabled = True
        CommandBars("menu_principale").Controls("Amministrazione").Enabled =
False
        ElseIf gruppo = "Utenti_completi" Then
        CommandBars("menu_principale").Enabled = True
        CommandBars("menu_principale").Controls("Amministrazione").Enabled =
False
        CommandBars("menu_principale").Controls("Gestione Utenti").Enabled =
False
        ElseIf gruppo = "Operatori" Then
        CommandBars("menu_principale").Enabled = True
        CommandBars("menu_principale").Controls("Amministrazione").Enabled =
False
        CommandBars("menu_principale").Controls("Contabilità").Enabled =
False
        CommandBars("menu_principale").Controls("Gestione Utenti").Enabled =
False
        CommandBars("menu_principale").Controls("Strumenti").Enabled = False
        End If
    Else
    MsgBox "Username o password errati", vbOKOnly + vbInformatiom,
"Attenzione..."
    Forms!User_id!user = Nothing
    Forms!User_id!pwd = Nothing
    Forms!User_id!user.SetFocus
    conta = conta + 1
    End If
Else
        MsgBox "N° tentativi esaurito", , "Alt..."
        DoCmd.Quit
End If
End Function
Questa è la funziona che richiamo dall'OK della maschera di autenticazione
all'avvio del DB
La cosa strana è che, se mi creo il pacchetto senza dividere il DB funziona
tutto correttamente, mi scatena questo misterioso errore solo con il db
diviso.
Proprio adesso ho fatto una prova, la tabella User, l'ho messa nell'FE, ma
anche così mi da errore quind non è imputabile alla locazione della tabella
Il codice per quanto scritto in maniera del tutto strana, da autodidatta,
funziona
Vi prego datemi una mano, sono davvero disperato, nn so proprio cosa fare
Claudio


title: Errore di runtime con database diviso

text:
> > > creo lo stesso pacchetto.
> > > Cosa è?? è gravo dottore??
> > > dico 33??
> > >
> > > aspetto notizie
> > > ciao
> > > Claudio
> > >
> > > Se ti viene fuori Errore Di Run-Time ce qualche errore nella
esecuzione
> > del codice
> > che durante la compilazione non riesce ad individuare poiché l'errore
> viene
> > generato solo
> > magari quando una parte di esso viene eseguito.
> > Ricontrolla il tutto per bene.
> > Ferrari rino
> >
> Questa è la funziona che richiamo dall'OK della maschera di autenticazione
> all'avvio del DB
> La cosa strana è che, se mi creo il pacchetto senza dividere il DB
funziona
> tutto correttamente, mi scatena questo misterioso errore solo con il db
> diviso.
> Proprio adesso ho fatto una prova, la tabella User, l'ho messa nell'FE, ma
> anche così mi da errore quind non è imputabile alla locazione della
tabella
> Il codice per quanto scritto in maniera del tutto strana, da autodidatta,
> funziona
>
> Vi prego datemi una mano, sono davvero disperato, nn so proprio cosa fare
>
> Claudio
>
Ciao Claudio
Perche adoperare una Function cosi  Emh... diciamo non proprio lineare
potrebbe essere questo il problema
per quello che devi ottenere puoi benissimo utilizzare quella sul sito
comune
che e molto piu semplice e da lo stesso risultato(+ o -)
io mi avvalgo di tale funzione opportunamente personalizzata con un FE -BE
o in rete (Package XP) e
non ho nessun tipo di problema.
Fammi sapere
Rino Ferrari
>


title: Conta record prima di aprire maschera

author: Rossana

text:
Ciao a tutti,
in una maschera a maschere continue mentre sto aggiornando il valore del
campo NumTel (in un nuovo record o in uno qualsiasi) ho la necessità di
aprire una maschera PopUp solo se esistono altri record che hanno quello
stesso valore nel campo NumTel.
Io direi, sull'evento dopo aggiornamento del campo NumTel qualcosa del
genere:
"Se il numero di record con valore NumTel = Me.Numtel sono >0 allora
DoCmd.OpenForm...."
ruiscite a tradurmelo nel codice esatto?
Grazie mille,
Rossana


title: Conta record prima di aprire maschera

author: Alessandro Baraldi

text:
Rossana ha scritto:

Usa Dcount.
Ora dovrai decidere se eseguire l'azione su BeforeUpdate(da cui puoi
annullarla)
oppure su AfterUpdate da cui puoi solo prendere atto della cosa.
If Dcount("NumTel", "NomeTabell", "NumTel='" & Me!Numtel & "'")>0 Then
  Docmd.OpenForm.......
End if

@Alex


title: Conta record prima di aprire maschera

author: Access

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:1154873048....@m79g2000cwm.googlegroups.com...
Rossana ha scritto:

Usa Dcount.


Ciao, scusate l'intrusione, ma come si fa a trasferire i dati enventualmente
già esistenti nella maschera popup ?
Grazie Geppo
@Alex


title: Conta record prima di aprire maschera

text:
Access ha scritto:
[CUT]
> Ciao, scusate l'intrusione, ma come si fa a trasferire i dati enventualmente
> già esistenti nella maschera popup ?
> Grazie Geppo
Se la Form Popup ha la stessa origine Records della Form principale
puoi sfruttare
l'Argomento [condizioneWHERE] esposto e documentato nell'Help per
filtrare la stessa
con il solo record interessato.
@Alex


title: Conta record prima di aprire maschera

text:
Alex,
grazie mille.
Funziona! scusa per il ritardo con cui ti ringrazio.
Rossana
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:1154873048....@m79g2000cwm.googlegroups.com...
Rossana ha scritto:



title: IE6.0

text:
La path italiana
http://zeusnews.com/news.php3?cod=939
---
leo_duca


title: Visualizzazione Data in Report

author: CiPiStO

text:
Salve a tutti, vorrei che in un report compaia non tutta la data corrente ma
soltanto il mese in formato esteso tipo gennaio febbraio ecc ecc. E'
Possibile farlo?
Grazie CiPiStO


title: Visualizzazione Data in Report

text:
"CiPiStO" <
cip...@hotmail.com
> ha scritto nel messaggio
news:FFq0d.296634$5D1.13...@news4.tin.it...

Impostazione di riferimento per il campo:
=(Format([Data];"mmmm"))
Ciao
Rino Ferrari


title: Visualizzazione Data in Report

text:
Grazie Rino :)
"Ferrari Rino" <
rinof...@virgilio.it
> ha scritto nel messaggio
news:tjw0d.297053$5D1.
13108021
@news4.tin.it...



title: Visualizzazione Data in Report

text:
"CiPiStO" <
cip...@hotmail.com
> ha scritto nel messaggio
news:r8z0d.234478$OR2.10...@news3.tin.it...

Rispondi dopo il Quot. Gragie(Vedi Regole NG)
Ciao Rino


title: Visualizzazione Data in Report

text:
"CiPiStO" <
cip...@hotmail.com
> wrote in message news:<FFq0d.296634$
5D1.13...@news4.tin.it
>...

E' sufficiente, nelle proprietà del campo che ha come origine
controllo =Date(, scivere, nel formato, "mmmm"


title: Concatenare le stringhe

text:
Ciao,
Io ho creato un report che scrive il nominativo e l'indirizzo di una
persona, ho un campo nominativo, uno città, uno provincia;
Come faccio a scrivere la città concatenata alla provincia scritta tra le
parentesi?
es:
MILANO (MI)
invece di
MILANO                 MI
spero di essermi spiegato...
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Concatenare le stringhe

author: sv

text:
Daniele80 ha scritto:
> Ciao,
> Io ho creato un report che scrive il nominativo e l'indirizzo di una
> persona, ho un campo nominativo, uno città, uno provincia;
> Come faccio a scrivere la città concatenata alla provincia scritta tra le
> parentesi?
> es:
> MILANO (MI)
> invece di
> MILANO                 MI
> spero di essermi spiegato...
Controlla se va bene in questa maniera:
[Città]&" (" & [PV]& ")"
--
rgrds
SC



title: Concatenare le stringhe

text:
sv ha scritto:
> Daniele80 ha scritto:
> > Ciao,
> > Io ho creato un report che scrive il nominativo e l'indirizzo di una
> > persona, ho un campo nominativo, uno città, uno provincia;
> > Come faccio a scrivere la città concatenata alla provincia scritta tra le
> > parentesi?
> > es:
> > MILANO (MI)
> > invece di
> > MILANO                 MI
> > spero di essermi spiegato...
> Controlla se va bene in questa maniera:
> [Città]&" (" & [PV]& ")"
> --
> rgrds
> SC
Ci ho provato, mi becco un
Proprietà di controllo non valida: Origine controllo
Riferimento circolare (??????)



title: Concatenare le stringhe

text:
"Daniele80" <
ss...@gggg.it
> ha scritto nel messaggio
news:c3mgg2$amb$1...@news.newsland.it...
> sv ha scritto:
>
> > Daniele80 ha scritto:
>
> > > Ciao,
>
> > > Io ho creato un report che scrive il nominativo e l'indirizzo di una
> > > persona, ho un campo nominativo, uno città, uno provincia;
>
> > > Come faccio a scrivere la città concatenata alla provincia scritta tra
le
> > > parentesi?
>
> > > es:
>
> > > MILANO (MI)
> > > invece di
> > > MILANO                 MI
>
> > > spero di essermi spiegato...
>
> > Controlla se va bene in questa maniera:
>
> > [Città]&" (" & [PV]& ")"
>
> > --
> > rgrds
> > SC
>
>
> Ci ho provato, mi becco un
> Proprietà di controllo non valida: Origine controllo
> Riferimento circolare (??????)
>
Il controllo in questione deve avere un nome diverso dai nomi assegnati ai
campi di tabella/query che fanno parte dell'origine dati del report...
Ciao.
--
Sergio MAZZA


title: Concatenare le stringhe

text:
Sergio MAZZA ha scritto:


> Ciao.
> --
> Sergio MAZZA
Perfetto, adesso funziona, grazie mille....



title: Concatenare le stringhe

text:
Daniele80 ha scritto:
> sv ha scritto:
> > Daniele80 ha scritto:
> > > Ciao,
> > > Io ho creato un report che scrive il nominativo e l'indirizzo di una
> > > persona, ho un campo nominativo, uno città, uno provincia;
> > > Come faccio a scrivere la città concatenata alla provincia scritta tra le
> > > parentesi?
> > > es:
> > > MILANO (MI)
> > > invece di
> > > MILANO                 MI
> > > spero di essermi spiegato...
> > Controlla se va bene in questa maniera:
> > [Città]&" (" & [PV]& ")"
> > --
> > rgrds
> > SC
> Ci ho provato, mi becco un
> Proprietà di controllo non valida: Origine controllo
> Riferimento circolare (??????)
In questo caso il controllo deve avere un nome diverso dall'origine dati.
--
rgrds
SC



title: Spostamenti nella query

author: antcim

text:
Cordialita' a chi mi legge.
Aprendo una query, e' possibile posizionare il cursore su una colonna
diversa dalla prima..?
Grazie in anticipo.
Antcim


title: Spostamenti nella query

text:
"antcim" <
gabriel...@virgilio.it
> ha scritto nel messaggio
news:RY9u9.31723$aL4.9...@news1.tin.it...

Ah, dimenticavo
la query e' costruita da codice ed uso Access 97
Grazie
Antcim
>
>


title: Spostamenti nella query

author: Roberto da casa

text:
"antcim" <
gabriel...@virgilio.it
> ha scritto nel messaggio
news:Zfau9.31789$aL4.9...@news1.tin.it...

Ho risposto oggi alle ore 16:53 alla stessa domanda che hai posto in un
thread da te aperto il 22/10/2002 alle ore 19:47 che ha per subject Cursore
in una query.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------