text:
[cut]
provato anche cosě ... nisba
Private Sub Form_Open(Cancel As Integer)
Dim USER_REC_NAMED As Long, USER_REC_ATTENDED As Long
Dim Class1 As String
    Class1 = "HP NAMED"
    USER_REC_NAMED = DLookup("[codice_cliente]",
"3_BCN_Registrate_Classificazioni", "[descrizione] = '" & Class1 & "'")
    Me.txt_BCN_Rec_Named.Value = USER_REC_NAMED
End Sub
Help me please!!! Mi stň probabilmente perdendo in un bicchier d'acqua...
--
**********
EmMeCi - Strano...Mavero
**********
Blog Personale:
http://www.setfocus.it
LOST: ecco cosa nasconde la fantomatica BOTOLA -
http://tinyurl.com/jev7v

Inviato da X-Privat.Org - Registrazione gratuita
http://www.x-privat.org/join.php


title: DLookup ... errore operatore mancante ... probabile errore su criterio di selezione

author: MA

text:
EmMeCi - Style wrote:
> [cut]
> Grazie MA, (l'AS String č stata una mia svista, pardon!!!)
>
> Ho fatto come mi hai giustamente suggerito ma su:
> Me.txt_BCN_Rec_Named = DLookup("[codice_cliente]",
> "3_BCN_Registrate_Classificazioni", "[descrizione] = " & chr(34) &
> cass1 & chr(34))
>
> mi ritorna errore operazione precedente annullata ...
Usare un campo col nome descrizione non č "igienico" prova a rinominarlo



author: Sergio MAZZA

text:
"EmMeCi - Style" <
mcs...@email.it
> ha scritto nel messaggio news:4486e...@x-privat.org...
> [cut]
> provato anche cosě ... nisba
>
> Private Sub Form_Open(Cancel As Integer)
>
> Dim USER_REC_NAMED As Long, USER_REC_ATTENDED As Long
> Dim Class1 As String
>    Class1 = "HP NAMED"
>    USER_REC_NAMED = DLookup("[codice_cliente]", "3_BCN_Registrate_Classificazioni", "[descrizione] = '" & Class1 & "'")
>    Me.txt_BCN_Rec_Named.Value = USER_REC_NAMED
> End Sub
>
> Help me please!!! Mi stň probabilmente perdendo in un bicchier d'acqua...
>
> --
> **********
> EmMeCi - Strano...Mavero
> **********
> Blog Personale:
http://www.setfocus.it
>
> LOST: ecco cosa nasconde la fantomatica BOTOLA -
http://tinyurl.com/jev7v
Prova a seguire il suggerimento di MAssimiliano; altrimenti quando sei in debug prova nella finestra immediata ad utilizzare il
dlookup con valori fissi per vedere il comportamento...
Ciao.
--
Sergio MAZZA


title: [OT] DEPRESSION

author: ciroteo

text:
Ehilà ragazzi ... scusate lo sfogo, ma dopo una mattinata passata a
"parlare" con il consulente globale a cui la mia azienda
a affidato lo studio di fattibilità di un
megafantasuperiperechipiùnehapiùnemetta software gestionale non ce la faccio
più!
E access non va bene di qua, e access ha limiti di qua ... e se un software
si usa più del 10% col mouse non va bene e la tendenza è un'altra
e questa rete non è protetta, e perchè c'è il front end e il back end ... e
microsoft non supporterà più, e il mio lavoro è per il 90 percento disegnare
database .... e che due marrons!
Possibile che per il solo fatto di essere un lavoratore dipendente questi
abbiano il diritto di far mettere il naso nel tuo lavoro dal primo p.
patentato che arriva?
Perchè mai cultura informatica vuol solo dire riempirsi la bocca di grandi
paroloni e grandi promesse che poi in fatto di fattibilità e realizzabilità
la metà degli utenti medi usa al massimo excel e peraltro al 10%?
bah ... che schifo.
Mi lamento non perchè sia stato chiamato qualcun altro a giudicare il mio
lavoro, ci mancherebbe tutto è migliorabile,  piuttosto mi annoia il fatto
che c'è tanta gente che si fa infinocchiare ...
p.s. lo studio di fattibilità sarà fatturato 4500 euri ... non voglio
immaginare il sofware ...
saluti ...


title: [OT] DEPRESSION

author: Nick

text:
ciroteo ha detto: in data 11/01/2006 13.35:

ehilà Teo!
credo che il punto "dolente" del patentato sia che al 90% lui disegna
database... ma il 10% che resta cosa lo usa a fare?.. probabilmente non
per usare i DB che crea...
Secondo il mio modesto giudizio disegnare database è una cosa... usarli
è un'altra!
...se lui dice che il mouse non è "di tendenza".. che mi dice del WEB? e
del fatto che office12 (per restare in casa microsoft) ha creato i nuovi
menu con "stile navigazione a schede" pertanto ottimali da usare con il
mouse? e il drag & drop.. che l'hanno inventato a fare??
vabbè... prendila con spirito... perchè
1) non sono soldi tuoi :)
2) magari fra un annetto ti chiamano come avvocato perchè hanno problemi :P
Ciao
Nick


title: [OT] DEPRESSION

text:
"ciroteo" <
ciroteochio...@libero.it
> ha scritto nel messaggio news:dq2u5o$bj3$1...@fittipaldi.interac.it...
> Ehilà ragazzi ... scusate lo sfogo, ma dopo una mattinata passata a "parlare" con il consulente globale a cui la mia azienda
> a affidato lo studio di fattibilità di un megafantasuperiperechipiùnehapiùnemetta software gestionale non ce la faccio più!
E' lo stesso della banca mediolanum?
> E access non va bene di qua, e access ha limiti di qua ... e se un software si usa più del 10% col mouse non va bene e la tendenza
> è un'altra
> e questa rete non è protetta, e perchè c'è il front end e il back end ... e microsoft non supporterà più, e il mio lavoro è per il
> 90 percento disegnare database .... e che due marrons!
Hi! Hi!
> Possibile che per il solo fatto di essere un lavoratore dipendente questi abbiano il diritto di far mettere il naso nel tuo lavoro
> dal primo p. patentato che arriva?
Un suggerimento per tenersi il fegato a posto? Attacca l'asino dove vuole il padrone!
> Perchè mai cultura informatica vuol solo dire riempirsi la bocca di grandi paroloni e grandi promesse che poi in fatto di
> fattibilità e realizzabilità la metà degli utenti medi usa al massimo excel e peraltro al 10%?
> bah ... che schifo.
Perché qui siamo ancora arretrati come cultura informatica; quindi chi si può permettere di sbandierare clienti prestigiosi o
software altisonanti riesce ad avere la meglio su chi ha esperienza nel lavoro.
> Mi lamento non perchè sia stato chiamato qualcun altro a giudicare il mio lavoro, ci mancherebbe tutto è migliorabile,  piuttosto
> mi annoia il fatto che c'è tanta gente che si fa infinocchiare ...
Io sono nelle stesse tue condizioni; sono uscito da poco da un gruppo di sviluppo web perché non andavo d'accordo con il
responsabile e il suo modo di "distribuire/concepire il lavoro" e
proprio ieri, un collega, mi aveva offerto di fare un sito web per un progetto di ricerca.
Ho rifiutato a malincuore ma non ho più palpitazioni e nausee la mattina (tranquilli! Nessuna gravidanza, ho le tube chiuse...).
> p.s. lo studio di fattibilità sarà fatturato 4500 euri ... non voglio immaginare il sofware ...
>
> saluti ...
Sai qual'é la cosa peggiore? E' che se queste persone sbagliano, non pagano in nessun modo! Mentre a te tocca rimettere mano a tutto
il lavoro...
Ciao.
--
Sergio MAZZA


title: [OT] DEPRESSION

author: cidi

text:
"ciroteo" <
ciroteochio...@libero.it
> ha scritto nel messaggio
news:dq2u5o$bj3$1...@fittipaldi.interac.it...

Ehilà AVVOCATO! che sono sti lamenti?
andiamo su coraggio!!! .... si guardi in giro....
a che le serve il PEZZO di carta?
ciao Matteo :))
---
Daniele


title: [OT] DEPRESSION

author: Alessandro Baraldi

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> wrote in message
news:dq2vmj$oj2$
1...@area.cu.mi.it
[CUT]
> Io sono nelle stesse tue condizioni;
Andiamoci piano con "siamo tutti nella stessa barca..!!"
[CUT]
>ho rifiutato a malincuore ma non ho più palpitazioni e nausee la mattina (tranquilli! Nessuna gravidanza, ho le tube chiuse...).
Le palpitazioni...?
Nause mattutine...?
Io ho avuto una gravidanza isterica, con tanto di Pancia al 7° mese..
si muoveva e scalciava ma mai palpitazioni...!!!
[CUT]
>
> Sai qual'é la cosa peggiore? E' che se queste persone sbagliano, non pagano in nessun modo! Mentre a te tocca rimettere mano a tutto
> il lavoro...
E' questo il bello.... sai che soddisfazione poi mettere a posto tutto
con calma e dimostrare che lo hai fatto funzionare!

> Ciao.
Non mi esprimo più di molto, ma da noi preferiscono spendere
qualche 100.000Euri per un gestionale di archiviazione piuttosto
che farlo fare a me...!
Forse fanno bene, sicuramente fanno bene...,
io non sono un programmatore, poi lavorerei gratisse, e chi
ci guadagna più..!!!!!
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: [OT] DEPRESSION

author: Ferrari Rino

text:
"ciroteo" <
ciroteochio...@libero.it
> ha scritto nel messaggio
news:dq2u5o$bj3$1...@fittipaldi.interac.it...

 Cut
Cirotè non e da te  farti vedere in codeste " fattanze"
da quel Matteo che sei , raccogli i cocci e tira avanti!!
di queste storie ne trovo una al giorno, non ci bado più ormai :-))))
Ciao
Rino
>


title: [OT] DEPRESSION

text:

Vengo e io e ti faccio lo studio di fattibilità _gratis_. Poi ti passo
l'analisi, se vuoi.
Detesto quando le persone si fanno pagare per il loro addestramento.
Normalmente io faccio l'analisi, ti preparo e consegno la relazione e poi mi
faccio pagare se
mi affidi la realizzazione del software: io voglio clienti che siano
convinti che io possa aiutarli,
non mi faccio pagare per le mie proposte, se rimangono tali.
So io come prendere il quasi mio compaesano...
Non insisto sulle boiate che ognuno sputa fuori per denigrare il lavoro
degli altri e
avvalorare (o meglio auto-avvalorare) il proprio.
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: [OT] DEPRESSION

author: Oscar Manfredini

text:
"ciroteo"
> Ehilà ragazzi ... scusate lo sfogo, ma dopo una mattinata passata a
> "parlare" con il consulente globale a cui la mia azienda
> a affidato lo studio di fattibilità di un
> megafantasuperiperechipiùnehapiùnemetta software gestionale non ce la
faccio
> più!
> E access non va bene di qua, e access ha limiti di qua ... e se un
software
> si usa più del 10% col mouse non va bene e la tendenza è un'altra
> e questa rete non è protetta, e perchè c'è il front end e il back end ...
e
> microsoft non supporterà più, e il mio lavoro è per il 90 percento
disegnare
> database .... e che due marrons!
Se il problema riguarda Access, basta che tu mostri a questa persona (o a
chi ha deciso di pagarla) esempi di
megafantasuperiperechipiùnehapiùnemetta  gestionali sviluppati in Access in
giro per l'Italia.
(Se non ricordo male erano stai postati molti links tempo fa su quest'area)
Se invece la questione è più generale: ovvero perchè le aziende si affidano
spesso a commercialisti o consulenti informatici "spumoni" ... in tal caso
rassegnati: ci sarà pure un motivo alla base del declino industriale del
nostro paese, no?
Ciao, Oscar


title: [OT] DEPRESSION

author: Alessandro Cara

text:
Alessandro Baraldi wrote:
[cut]
> Non mi esprimo più di molto, ma da noi preferiscono spendere
> qualche 100.000Euri per un gestionale di archiviazione piuttosto
> che farlo fare a me...!
> Forse fanno bene, sicuramente fanno bene...,
> io non sono un programmatore, poi lavorerei gratisse, e chi
> ci guadagna più..!!!!!
a chi devo far fare l'offerta che poi "steccamo" ?
In quanto a "parolacce" talvolta me la cavo.
--
a.cara


title: [OT] DEPRESSION

text:
"Alessandro Cara" <
al...@puntablunet.it
> wrote in message
news:S5axf.26374$
av6....@tornado.fastwebnet.it
> Alessandro Baraldi wrote:
> [cut]
> > Non mi esprimo piů di molto, ma da noi preferiscono spendere
> > qualche 100.000Euri per un gestionale di archiviazione piuttosto
> > che farlo fare a me...!
> > Forse fanno bene, sicuramente fanno bene...,
> > io non sono un programmatore, poi lavorerei gratisse, e chi
> > ci guadagna piů..!!!!!
>
> a chi devo far fare l'offerta che poi "steccamo" ?
> In quanto a "parolacce" talvolta me la cavo.
> --
> a.cara
A me....!
Che mi offri...?
Accetto tutto, fuorchč botte o altre cose che possano
provocarmi dolore.



title: [OT] DEPRESSION

author: Morgan

text:
"ciroteo" <
ciroteochio...@libero.it
> ha scritto nel messaggio
news:dq2u5o$bj3$1...@fittipaldi.interac.it...
> Ehilà ragazzi ... scusate lo sfogo, ma dopo una mattinata passata a
> "parlare" con il consulente globale a cui la mia azienda
> a affidato lo studio di fattibilità di un
> megafantasuperiperechipiùnehapiùnemetta software gestionale non ce la
> faccio più!
Conosco il tipo di soggetti...
> E access non va bene di qua, e access ha limiti di qua ... e se un
> software si usa più del 10% col mouse non va bene e la tendenza è un'altra
...hanno tutti in comune l'arte di sparare cazzate e farle rendere
credibili...
> e questa rete non è protetta, e perchè c'è il front end e il back end ...
> e microsoft non supporterà più,
....a me e la mia capa un giorno uno di questi ci chiese che ci facevamo con
il
fax...
 e il mio lavoro è per il 90 percento disegnare
> database .... e che due marrons!
...ecco il problema, tra il dire ed il fare c'è di mezzo..di solito access.
> Possibile che per il solo fatto di essere un lavoratore dipendente questi
> abbiano il diritto di far mettere il naso nel tuo lavoro dal primo p.
> patentato che arriva?
No.Visto che come consulenti sono pagati profumatamente,perchè invece
di andare a sbirciare nel lavoro degli altri non prendono carta e penna e
partono
con l'analisi e specifica dei requisiti?
P.S.
Chiedigli il dizionario dei termini.....ah,ah,ah
> Perchè mai cultura informatica vuol solo dire riempirsi la bocca di grandi
> paroloni e grandi promesse che poi in fatto di fattibilità e
> realizzabilità la metà degli utenti medi usa al massimo excel e peraltro
> al 10%?
> bah ... che schifo.
Perchè fa fico parlare di  "matchare i dati","è un problema di Know How",
etc etc.
> Mi lamento non perchè sia stato chiamato qualcun altro a giudicare il mio
> lavoro, ci mancherebbe tutto è migliorabile,  piuttosto mi annoia il fatto
> che c'è tanta gente che si fa infinocchiare ...
...e ci prende i soldi per preneder questi consulenti.
>
>
> p.s. lo studio di fattibilità sarà fatturato 4500 euri ... non voglio
> immaginare il sofware ...
>
> saluti ...
>
La mia esperienza è questa.
Non esistono cattivi tools di sviluppo, esistono
cattivi analisti e cattivi programmatori...e capi stronzi!
Quindi
Daje dentro.
Morgan


title: [OT] DEPRESSION

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:ecf9c3511d7655f6ef...@mygate.mailgate.org...
> "Sergio MAZZA" <
sergi...@tiscali.it
> wrote in message
> news:dq2vmj$oj2$
1...@area.cu.mi.it
>
[CUTTONE]
>
> Non mi esprimo piů di molto, ma da noi preferiscono spendere
> qualche 100.000Euri per un gestionale di archiviazione piuttosto
> che farlo fare a me...!
> Forse fanno bene, sicuramente fanno bene...,
> io non sono un programmatore, poi lavorerei gratisse, e chi
> ci guadagna piů..!!!!!
>
> Ciao
> @Alex
>
>
@Alex ,scusa a nome del genere umano.
Questa non me la sare mai immaginata.
E' proprio vero che uno non č mai profeta in patria.
Morgan


title: [OT] DEPRESSION

text:
"Morgan" <
mor...@hotmail.it
> wrote in message
news:43c5511d$0$1081$
4faf...@reader3.news.tin.it
[CUT]
> @Alex ,scusa a nome del genere umano.
> Questa non me la sare mai immaginata.
> E' proprio vero che uno non è mai profeta in patria.
He..He...!!
In realtà chi mi conosce sà benissimo che il mio lavoro
è tutt'altro che sviluppare in Access, quindi l'azienda
del mio Hobby sa solo quello che io fino ad ora ho sviluppato
al fine di ottimizzare il lavoro di reparto, ma per interesse
personale.
Lavoro in un'azienda troppo grande, con sistemi informatici
estremamente complessi e spesso proprietari, quindi le scelte
non sono poi così strampalate.
La mia era una battuta, se mi mettessi a sviluppare certi applicativi
chi farebbe il mio lavoro....???
Mi direbbero che potrei sviluppare a casa(Gratisse), ma sai com'è
mio nonno nella piega del braccio metteva l'ombrello, io no.........!
;-)
> Morgan



title: [OT] DEPRESSION

text:

Alex, dalle mie parti "steccamo" non significa andiamo a giocare a
biliardo ma che si da un riconoscimento "solido".
Volendo far riferimento ad altro post in cui si discute di MAZZA, MAZZO,
MAZZI, MAZZE di potrebbero aggiungere anche i diminutivi, accrescitivi,
peggiorativi, vezzeggiativi, tipo ad esempio "mazzetta"
Cmq io dico sul serio. Abbiamo / ho anche qualche referenza (cliente
importante o presunto tale) Tu fai l'analisi io eseguo e poi ci facciamo
il giro dell'India dall'alpi alle piramidi, pardon, dal Ladak al TamilNadu.
--
a.cara


title: [OT] DEPRESSION

text:
"Alessandro Cara" <
al...@puntablunet.it
> wrote in message
news:nMcxf.26698$
av6....@tornado.fastwebnet.it
[CUT]
> Alex, dalle mie parti "steccamo" non significa andiamo a giocare a
> biliardo ma che si da un riconoscimento "solido".
> Volendo far riferimento ad altro post in cui si discute di MAZZA, MAZZO,
> MAZZI, MAZZE di potrebbero aggiungere anche i diminutivi, accrescitivi,
> peggiorativi, vezzeggiativi, tipo ad esempio "mazzetta"
L'ultima ha un nome gradevole, non sò perchè....!
> Cmq io dico sul serio. Abbiamo / ho anche qualche referenza (cliente
> importante o presunto tale) Tu fai l'analisi io eseguo e poi ci facciamo
> il giro dell'India dall'alpi alle piramidi, pardon, dal Ladak al TamilNadu.
La mia India, tu non hai idea di cosa non sarei capace di fare per
questo, non invogliarmi sai che è un tasto molto particolare.
A maggio prenoto il volo 3÷4 settimane, sono aperte iscrizioni...!
;-)
> --
> a.cara



title: [OT] DEPRESSION

author: Roberto da casa

text:
"ciroteo" <
ciroteochio...@libero.it
> ha scritto nel messaggio
news:dq2u5o$bj3$1...@fittipaldi.interac.it...

Parti dal presupposto che nel mondo che viviamo tutto viene valutato in base
a quanto costa: quindi un progetto per essere importante deve costare molto.
Questo è molto chiaro a chi di mestiere fa il consulente aziendale: se
costasse poco ed usasse strumenti poco costosi come Access sarebbe come dire
che il problema è poco importante, anche se così non è. D'altra parte non è
un mistero che ai tempi nostri è molto più importnte sembrare che essere.
Per motivi diversi, chi nella tua azienda è responsabile di quel progetto
spingerà verso una soluzione costosa, in quanto lui risulterà tanto più
importante quanto più costerà il progetto a lui affidato ed inoltre si
coprirà le spalle da eventuali insuccessi in quanto potrà sempre dire di
aver affidato il tutto a quanto di meglio offriva il mercato, ed il costo ne
è una testimonianza; insomma non vuole certo rischiare che in caso di
insuccesso si pensi che tutto è fallito perché lui ha pensato bene di
risparmiare; e poi, senza pensare ad una combine tra il responsabile ed il
consulaente, se il progetto è ricco sicuramente il consulente si ricorderà
in maniera generosa del tuo capo al primo Natale utile.
Se poi a tutto questo ci sommi il fatto che il tuo capo sa che ci sei tu che
ci metterai comunque una pezza il giro è chiuso: d'altra parte lui è sicuro
che ti darai da fare perché il tutto funzioni, visto che sei tu che stai
facendo l'intervista tecnica con il megaconsulente, intervista in base alla
quale lui redigerà l'analisi di fattibilità e poi l'analisi procedurale per
la realizzazione del datbase e il tuo capo sa che tu farai del tutto perché
non si possa pensare che l'eventuale insuccesso possa dipendere dal fatto
che tu non hai fornito al megaconsulente informazioni esatte e/o
sufficienti.
Nella mia carriera professionale io ho vissuto vicende come queste sia nei
panni del megaconsulente, che nel ruolo che ora stai vivendo tu ed infine ho
anche vissuto i panni del responsabile del progetto e che quindi si serviva
dei supermegaconsulenti.
Comunque ti posso asssicurare che la situazione più comoda era la prima in
cui recitavo il ruolo del megaconsulente, il quale normalmente se non è un
cretino matricolato è quello che ha più credibilità e se ha mestiere metterà
le cose in maniera tali che lui non avrà alcuna responsabilità: si limiterà
a presentare uno studio di fattibilità, ma sicuramente la decisione che le
soluzioni in esso proposte sono valide spetterà a qualcuno della tua azienda
e ti consiglio di stare attento che, magari per eccesso di zelo, non sia tu
ad assumere tale responsabilità.
Naturalmente la posizione più scomoda e rischiosa l'ho vissuta quando
operavo nella seconda situazione, quella che stai vivendo oggi tu.
Quindi stai calmo (ti ricordo che sicuramente il superconsulate gode di
molta più credibilità di te), alza le antenne, e in frangenti come questi
prenditi solo le responsabilità che competono al tuo ruolo: superdisponibile
durante le interviste, ma le valutazioni finali e la responsabilità delle
decisioni lasciale per intero al tuo capo, visto che sicuramente gli
competono.
>
> saluti ...
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: [OT] DEPRESSION

text:
"ciroteo" <
ciroteochio...@libero.it
> ha scritto nel messaggio
news:dq2u5o$bj3$1...@fittipaldi.interac.it...

Ragazzi, non posso che ringraziare tutti per i poderosi spunti di
riflessione.
Come già più volte sottolineato, ho trovato in questo gruppo "virtuale" più
compresnsione e professionalità che in altri ambiti della vita, e
quest'occasione per me sinceramente difficile, ancora una volta trovo un
serio supporto e un amichevole confronto alle mie decisioni.
Come ormai è di dominio pubblico, dopo tanti anni ho conseguito la laurea, e
sebbene in Italia ci siano più avvocati che cittadini (anzi a dire il vero
ci sono più commissari tecnici della nazionale) forse è meglio che faccia
fruttare un po' questo pezzo di carta. (il mitico cidi, da papà di una
giuresperita, mi capisce bene).
In questi mesi sono stato messo a fare un sacco di cose diverse, che, se da
un lato significavano una fase di test e di verifica da parte dei miei
dirigenti in merito alla mia disponibilità verso l'azienda, dall'altro mi
hanno allontanato dal fare ciò per cui ero stato inizialmente assunto per
fare e che costituisce una passione ed un lavoro "all'avanguardia" ... (un
azienda che ha avuto picchi di 900 dipendenti era 4 anni fa senza il benchè
minimo software gestionale).
La cosa è stata di difficile digestione, soprattutto perchè come tutti del
resto, ho utilizzato il software come semplice strumento di supporto e di
adeguamento alle ordinarie attività che le singole funzioni aziendali, con
le specifiche competenze professionali, andavano a svolgere. Quindi non ho
sviluppato niente di mirabolante, ma quantomeno funzionale.
Dopo le vacanze invernali, dove ho sedato un po' i tumulti dell'animo e
spellato un po' le ginocchia, oggi ho rassegnato le mie dimissioni.
In realtà l'incontro di questa mattina con il fanta consulente è solo la
punta di un iceberg di una situazione molto complessa.
La società per cui lavoro, anzi per cui ho lavorato, è in un settore
particolarmente delicato: servizi sociali per enti pubblici. In questo campo
non vale sempre la professionalità e la serietà delle persone, ma ahimè
spesso vale anche tanto l'aria che tira.
A questo punto è ora di cambiare anche io aria, di rinunciare allo stipendio
sicuro e di buttarmi nella pratica legale. Non è un addio al newsgroup,
perchè credo che Access mi accompagnerà molto, anzi molto più di prima.
Ho in corso altri progetti e altri ne potranno venire: che ne dite di un
software per il taglio delle camicie ... rino tremerebbe al solo pensiero!
Saluti


title: [OT] DEPRESSION

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:dq35u1$4ot$1...@area.cu.mi.it...

eheh ... povero lui in questo periodo è quello che ce l'ha in quel posto
peggio di tutti!
se non funzia ciò che gli promettono gli tagliano la testa!
:-(



title: [OT] DEPRESSION

author: fidirico

text:
"Roberto da casa" <
r.masso...@libero.it
> ha scritto nel messaggio
news:xadxf.39427$eD5.6...@twister2.libero.it...
>
> "ciroteo" <
ciroteochio...@libero.it
> ha scritto nel messaggio
> news:dq2u5o$bj3$1...@fittipaldi.interac.it...
[CUT]

Sottoscrivo ogni singola parola, anzi, ogni singola virgola! E mi riprometto in
futuro di rileggere questo intervento almeno una volta alla settimana o anche più
spesso, se avrò tempo.
> > saluti ...
>
> --
> Roberto
--
Ciao
Galliano.


title: [OT] DEPRESSION

text:
"ciroteo" <ciroteo(nospam)@
libero.it
> ha scritto nel messaggio
news:2gexf.123794$65.35...@twister1.libero.it...
>
> "ciroteo" <
ciroteochio...@libero.it
> ha scritto nel messaggio
> news:dq2u5o$bj3$1...@fittipaldi.interac.it...
[CUT]

Auguri sinceri, e ad majora!
--
Ciao
Galliano.


title: [OT] DEPRESSION

text:

>Perché no!! Cirotè
Sarebbe l'alternativa alla tua attività LEGALE :-))))))))))))))))))))
Se ti serve una mano behhhh.................  non ce che da chiedere.
Ciao
Rino


title: [OT] DEPRESSION

text:
ciroteo ha detto: in data 11/01/2006 21.54:
[CUT]
> La società per cui lavoro, anzi per cui ho lavorato, è in un settore
> particolarmente delicato: servizi sociali per enti pubblici. In questo campo
> non vale sempre la professionalità e la serietà delle persone, ma ahimè
> spesso vale anche tanto l'aria che tira.
>
lavorando anche io in quel settore posso capirti in pieno.. l'aria
sembra essere più improtante del resto.. (senza polemichie, solo una
battuta per conforto ;))
> A questo punto è ora di cambiare anche io aria, di rinunciare allo stipendio
> sicuro e di buttarmi nella pratica legale. Non è un addio al newsgroup,
> perchè credo che Access mi accompagnerà molto, anzi molto più di prima.
> Ho in corso altri progetti e altri ne potranno venire: che ne dite di un
> software per il taglio delle camicie ... rino tremerebbe al solo pensiero!
>
> Saluti
se ti servono i tovaglioli .. sai come trovarmi ;)
Tanti cari in bocca al lupo per il tuo futuro!!
Ciao
Nick


title: [OT] DEPRESSION

author: luigi onofrio

text:
ciroteo ha scritto:





> Saluti
come ti capisco! ho visto me nel tuo racconto!
io però, non sono laureato, ho moglie e 3 figlie a carico e lo stipendio
sicuro MI SERVE! quindi un pizzico sulla pancia e vado avanti!
per il resto ti auguro tanta fortuna, anche perchè gli avvocati in italia
non si sono mai morti di fame, ma di lavoro ne hanno in abbondanza.
in bocca AL LUPO!
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: [OT] DEPRESSION

text:
Alessandro Cara ha scritto:
> Alessandro Baraldi wrote:
> > "Alessandro Cara" <
al...@puntablunet.it
> wrote in message
> > news:S5axf.26374$
av6....@tornado.fastwebnet.it
> >
> >
> >>Alessandro Baraldi wrote:
> >>[cut]
> >>
> >>>Non mi esprimo più di molto, ma da noi preferiscono spendere
> >>>qualche 100.000Euri per un gestionale di archiviazione piuttosto
> >>>che farlo fare a me...!
> >>>Forse fanno bene, sicuramente fanno bene...,
> >>>io non sono un programmatore, poi lavorerei gratisse, e chi
> >>>ci guadagna più..!!!!!
> >>
> >>a chi devo far fare l'offerta che poi "steccamo" ?
> >>In quanto a "parolacce" talvolta me la cavo.
> >>--
> >>a.cara
> >
> >
> >
> > A me....!
> > Che mi offri...?
> > Accetto tutto, fuorchè botte o altre cose che possano
> > provocarmi dolore.
> Alex, dalle mie parti "steccamo" non significa andiamo a giocare a
> biliardo ma che si da un riconoscimento "solido".
> Volendo far riferimento ad altro post in cui si discute di MAZZA, MAZZO,
> MAZZI, MAZZE di potrebbero aggiungere anche i diminutivi, accrescitivi,
> peggiorativi, vezzeggiativi, tipo ad esempio "mazzetta"
> Cmq io dico sul serio. Abbiamo / ho anche qualche referenza (cliente
> importante o presunto tale) Tu fai l'analisi io eseguo e poi ci facciamo
> il giro dell'India dall'alpi alle piramidi, pardon, dal Ladak al TamilNadu.
> --
> a.cara
..azz!!  che fantasia!   complimenti! (sul serio)



title: [OT] DEPRESSION

text:
"ciroteo" <ciroteo(nospam)@
libero.it
> ha scritto nel messaggio news:2gexf.123794$65.35...@twister1.libero.it...
>
> Ragazzi, non posso che ringraziare tutti per i poderosi spunti di
> riflessione.
---omissis---
> Dopo le vacanze invernali, dove ho sedato un po' i tumulti dell'animo e
> spellato un po' le ginocchia, oggi ho rassegnato le mie dimissioni.
---omissis---
> A questo punto è ora di cambiare anche io aria, di rinunciare allo stipendio
> sicuro e di buttarmi nella pratica legale. Non è un addio al newsgroup,
> perchè credo che Access mi accompagnerà molto, anzi molto più di prima.
> Ho in corso altri progetti e altri ne potranno venire: che ne dite di un
> software per il taglio delle camicie ... rino tremerebbe al solo pensiero!
>
> Saluti
Per quello che hai fatto e dimostrato, hai tutti gli attributi (fisici e spirituali) per migliorare la tua situazione.
Hai la mia ammirazione e il rispetto.
Ciao e a risentirci presto.
--
Sergio MAZZA


title: [OT] DEPRESSION

text:
"ciroteo" <ciroteo(nospam)@
libero.it
> ha scritto nel messaggio
news:2gexf.123794$65.35...@twister1.libero.it...

Ora si spiega la tua DEPRESSION: eri alla vigiglia delle tue dimissioni da
lavoratore dipendente, ovvero davi una addio allo stipendio sicuro, dopo
aver preso forse una delle decisioni più importanti della tua vita.
Io sono sempre stato lavoratore dipendente, ma le dimissioni nel mio iter
professionale le ho date una dozzina di volte e tutte le volte ho avuto un
po' di sana ansia che significava immancabilmente qualche momento di
depressione.
Appurato quindi che la tua depressione è del tutto fisiologica e non è
patologia, mi rimangio il pistolotto del mio messaggio precedente, in quanto
non ti serve assolutamente ad un tubo, e ti dico semplicemente "in culo alla
balena", anche perché a mio avviso un po' di fortuna è una componente
essenziale del successo; è un po' come i soldi, non sono tutto per vivere,
ma senza sicuramente è veramente dura.



title: [OT] DEPRESSION

author: Massimo Piubelli

text:
ciroteo wrote:
> Ehilà ragazzi ... scusate lo sfogo, ma dopo una mattinata passata a
> "parlare" con il consulente globale a cui la mia azienda
> a affidato lo studio di fattibilità di un
> megafantasuperiperechipiùnehapiùnemetta software gestionale non ce la
> faccio più!
> E access non va bene di qua, e access ha limiti di qua ... e se un
> software si usa più del 10% col mouse non va bene e la tendenza è
> un'altra e questa rete non è protetta, e perchè c'è il front end e il back
> end
> ... e microsoft non supporterà più, e il mio lavoro è per il 90
> percento disegnare database .... e che due marrons!
> Possibile che per il solo fatto di essere un lavoratore dipendente
> questi abbiano il diritto di far mettere il naso nel tuo lavoro dal
> primo p. patentato che arriva?
> Perchè mai cultura informatica vuol solo dire riempirsi la bocca di
> grandi paroloni e grandi promesse che poi in fatto di fattibilità e
> realizzabilità la metà degli utenti medi usa al massimo excel e
> peraltro al 10%? bah ... che schifo.
> Mi lamento non perchè sia stato chiamato qualcun altro a giudicare il
> mio lavoro, ci mancherebbe tutto è migliorabile,  piuttosto mi annoia
> il fatto che c'è tanta gente che si fa infinocchiare ...
Ciao Matteo,
prima di tutto, ti capisco, quando ero dipendente sono cascato in una cosa
moolto simile; inoltre secondo me il consulente sbaglia pure approccio.
aggiungo solo una cosetta a quanto detto dagli altri, che a me da un pochino
fastidio di certi consulenti.
L'usare access è la scelta di uno strumento sicuramente più semplice ed
economico di altri, ma non di livello straccione.
E pongo un esempio che feci ad un mio cliente qualche tempo fa.
Se il Manzoni (ai tempi odierni) avesse scritto i promessi sposi con Word
piuttosto che con Open Office che cosa sarebbe cambiato, nulla, una grande
opera è e resta.
Lo "strumento" che uso per disegnare il FE è il mah 10/20 % di quello che
può essere il programma.
per il resto quoto in pieno in particolare il discorso di Roberto,
> p.s. lo studio di fattibilità sarà fatturato 4500 euri ... non voglio
> immaginare il sofware ...
 comunque se serve l'analisi di fattibilità te la faccio io, per 4499
euro:-) via all'asta su ebay
>
> saluti ...
Ciao,
su col morale, alla fine sarà comunque un'esperienza che ti può arricchire,
fatti spiegare bene cosa fa, perchè lo fa così e come si potrebbe fare in
altri modi, farai bagaglio di queste informazioni per il futuro.
Ciao,
Max


title: excel non trova il file di access da cui prende i dati

author: Pileggi

text:
ciao a tutti,
ho collegato un foglio di lavoro di excel a 3 tabelle di access
dati - importa dati esterni - importa dati...
questa è la connessione di ogni query:
Provider=Microsoft.Jet.OLEDB.4.0;User ID=...;Data Source=C:
\...;Mode=Read;Extended Properties="";Jet OLEDB:System database="";Jet
OLEDB:Registry Path="";Jet OLEDB:Engine Type=5;Jet OLEDB:Database
Locking Mode=0;Jet OLEDB:Global Partial Bulk Ops=2;Jet OLEDB:Global
Bulk Transactions=1;Jet OLEDB:New Database Password="";Jet
OLEDB:Create System Database=False;Jet OLEDB:Encrypt
Database=False;Jet OLEDB:Don't Copy Locale on Compact=False;Jet
OLEDB:Compact Without Replica Repair=False;Jet OLEDB:SFP=False
il file di excel aggiorna i dati all'apertura in questo modo:
    Dim qt As QueryTable
    For Each qt In Worksheets("DATI").QueryTables
        qt.Refresh BackgroundQuery:=False
    Next
apro il file di excel da una maschera di access, ma alcune volte non
riesce ad aggionare i dati, non trova il file di access e il codice si
blocca su qt.Refresh BackgroundQuery:=False
Se in questi casi chiudo il file di Access (.mdb) il file di excel
torna ad aprirsi e ad aggiornarsi normalmente.
Ho provato a modificare il modo di connessione da Mode:ReadWrite a
Mode:Read ma non cambia niente.
Non capisco, alcune volte funziona tutto bene, altre no!
Grazie tante a chi mi aiuterà!
Pileggi
PS Da venerdì i newsgroup in italiano di microsoft non sono più
raggiungibili, qualcuno sa perchè?


text:
"Pileggi" <
mig...@tecnetica.com
> ha scritto nel messaggio
news:5e2c378f-59f5-4d39...@i72g2000hsd.googlegroups.com...






[risposta]
Perché fai fare l'aggiornamento al codice VBA e non ad Excel all'apertura
della cartella(file)?
PS Da venerdì i newsgroup in italiano di microsoft non sono più
raggiungibili, qualcuno sa perchè?
[risposta]
Io li leggo; quale newsserver utilizzi?
Ciao.
--
Sergio MAZZA


text:
On 17 Dic, 12:01, "Sergio MAZZA" <
sergioma...@tiscali.it
> wrote:
> Perché fai fare l'aggiornamento al codice VBA e non ad Excel all'apertura
> della cartella(file)?
Attualmente lo faccio fare ad Excel tramite codice, all'apertura del
file:
Private Sub Workbook_Open()
    Dim qt As QueryTable
    For Each qt In Worksheets("DATI").QueryTables
        qt.Refresh BackgroundQuery:=False
    Next
    Set qt = Nothing
End Sub
Non so se è quello che intendi...
> PS Da venerdì i newsgroup in italiano di microsoft non sono più
> raggiungibili, qualcuno sa perchè?
>
> [risposta]
> Io li leggo; quale newsserver utilizzi?
io ci provo da Explorer partendo dalla pagina
http://www.microsoft.com/italy/communities/newsgroups/default.mspx
i newsgroup che ho utilizzato fin'ora sono quelli di Access ed Excel
Grazie mille,
Pileggi


text:
Pileggi wrote:
>
> Attualmente lo faccio fare ad Excel tramite codice, all'apertura del
> file:
>
> Private Sub Workbook_Open()
>     Dim qt As QueryTable
>     For Each qt In Worksheets("DATI").QueryTables
>         qt.Refresh BackgroundQuery:=False
>     Next
>     Set qt = Nothing
> End Sub
>
> Non so se è quello che intendi...
Ti chiedevo il perché lo facessi da codice invece di farlo fare ad excel.
Excel, se importi dati da una fonte (riconosciuta) qualsiasi collegandoli
all'origine, ogni volta che apri il file ti richiede se vuoi aggiornare i
dati.
> io ci provo da Explorer partendo dalla pagina
>
http://www.microsoft.com/italy/communities/newsgroups/default.mspx
> i newsgroup che ho utilizzato fin'ora sono quelli di Access ed Excel
Puoi utilizzare OE inserendo come newsserver:
news.microsoft.com
 e
scegliendi i newsgroup che vuoi legere; trovi info su:
www.riolab.org/newsgroup.asp
> Grazie mille,
> Pileggi
Ciao.
--
Sergio MAZZA


title: come togliere il logo di access?

author: Marco

text:
Come posso fare perchč all'avvio della mia applicazione non compaia il logo
"MS ACCESS97, prodotto in licenza a  ... ecc." ma una immagine da me scelta?
Le applicazioni sarebbero un pň piů professionali!
Seconda domanda:
Quale il vantaggio di usare una "opendatabase" invece che allegare le
tabelle?
Grazie a chi mi puň aiutare!
Ciao
Marco


title: come togliere il logo di access?

author: Luciano (DOC)

text:
"Marco" <
marb...@libero.it
> wrote in message
news:9g7af5$um75$1...@news01.it.net...
> Come posso fare perchč all'avvio della mia applicazione non compaia il
logo
> "MS ACCESS97, prodotto in licenza a  ... ecc." ma una immagine da me
scelta?
Crea un file BMP con lo stesso nome del tuo MDB/MDE e mettilo nell stessa
directory.
Se lo crei a dimensione 0 non verra visualizzato nulla.
Saluti.
Luciano
(DOC)


title: come togliere il logo di access?

text:
Grazie mille!!
"Luciano (DOC)" <
lucia...@sitocomune.com
> ha scritto nel messaggio
news:9g7dp5$7h5g4$1...@ID-86073.news.dfncis.de...



title: come togliere il logo di access?

author: Simone

text:
3 possibilità:
- non funziona con A2000
- ti sei spiegato male
- non ho capit ocome fare
Fatto sta che con A2000 non funziona!!!
Simone
"Luciano (DOC)" <
lucia...@sitocomune.com
> ha scritto nel messaggio
news:9g7dp5$7h5g4$1...@ID-86073.news.dfncis.de...
>
> "Marco" <
marb...@libero.it
> wrote in message
> news:9g7af5$um75$1...@news01.it.net...
>
> > Come posso fare perchè all'avvio della mia applicazione non compaia il



title: come togliere il logo di access?

text:
"Simone" <
rik...@katamail.com
> wrote in message
news:9g9obt$1cs$1...@news.mclink.it...
> 3 possibilità:
> - non funziona con A2000
> - ti sei spiegato male
> - non ho capit ocome fare
Possibilita' 1: non lo so, non l'ho mai provato con il 2000.
Possibilita' 2: non mi sembra, l' altro ha capito.
Possibilita' 3: misconosco le tue capacita' intellettive.:-)
Saluti.
Luciano
(DOC)


title: come togliere il logo di access?

author: Guycho

text:
Luciano (DOC) <
lucia...@sitocomune.com
> wrote in message
9ga3hh$84hra$1...@ID-86073.news.dfncis.de...
> "Simone" <
rik...@katamail.com
> wrote in message
> news:9g9obt$1cs$1...@news.mclink.it...
>
> > 3 possibilità:
> > - non funziona con A2000
> > - ti sei spiegato male
> > - non ho capit ocome fare
>
funziona anche con A2000
ciao


title: come togliere il logo di access?

author: Silvio Berruti

text:
"Luciano (DOC)" <
lucia...@sitocomune.com
> ha scritto nel messaggio
news:9g7dp5$7h5g4$1...@ID-86073.news.dfncis.de...
>

Bravo. Con la dimensione 0 non avevo ancora provato.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


title: Calcolo delle settimane annuali e somma sulle stesse

author: Marco e Tony Dell'oste

text:
Ciao NG,
Come posso fare il calcolo delle settimane annuali??  Mi spiego, abbiamo
settimane da 52 e da 53 a seconda dell' anno, come posso fare a calcolarla??
Seconda domanda,
In un programma utilizzo i decimali per fare una previsione di preparazione
di determinati ordini, per esempio, so che devo preparare il tal ordine per
inizio settimana 47 oppure se è 47,3 per mercoledi (+o-) 47,9 fine settimana
(prossimamente faro i decimali che corrispondono al giorno settimanale 47,1
lunedi/47,2 martedi ecc)
Per arrivare a questo lavoro in questo modo:
Settimana di consegna -(1settimana di imballo+tempo di stagionatura che
dipende dalle proprietà dell'articolo e sono ben definite in 4 categorie)
Ecco qui di seguito l'esempio effettivo:
SETT: ([SETTIMANA_CONSEGNA]-((Int([TEMPO_STAGIONATURA]*10/7)/10)+1))
cosi ottengo il numero della settimana con 1 decimale.
Ora però con il nuovo anno, ottengo dei valori negativi, poiche avendo
SETTIMANA_CONSEGNA=1 oppure  =2 o....
SETT viene ad avere un valore 0 oppure -0,2 oppure -1 ecc invece di darmi
realmente SETT= 52 / 51,8 / 51 / ....
Come posso ovviare???
Mille grazie
Marco


author: Federico Luciani

text:
Marco e Tony Dell'oste wrote:
> Ciao NG,
> Come posso fare il calcolo delle settimane annuali??  Mi spiego, abbiamo
> settimane da 52 e da 53 a seconda dell' anno, come posso fare a calcolarla??
Function retSettAnno(iAnno As Integer) As Integer
  retSettAnno = DateDiff("ww", DateSerial(iAnno, 1, 1),
DateSerial(iAnno, 12, 31))
End Function
> Seconda domanda,
> In un programma utilizzo i decimali per fare una previsione di preparazione
> di determinati ordini, per esempio, so che devo preparare il tal ordine per
> inizio settimana 47 oppure se è 47,3 per mercoledi (+o-) 47,9 fine settimana
> (prossimamente faro i decimali che corrispondono al giorno settimanale 47,1
> lunedi/47,2 martedi ecc)
> Per arrivare a questo lavoro in questo modo:
> Settimana di consegna -(1settimana di imballo+tempo di stagionatura che
> dipende dalle proprietà dell'articolo e sono ben definite in 4 categorie)
> Ecco qui di seguito l'esempio effettivo:
> SETT: ([SETTIMANA_CONSEGNA]-((Int([TEMPO_STAGIONATURA]*10/7)/10)+1))
> cosi ottengo il numero della settimana con 1 decimale.
> Ora però con il nuovo anno, ottengo dei valori negativi, poiche avendo
> SETTIMANA_CONSEGNA=1 oppure  =2 o....
> SETT viene ad avere un valore 0 oppure -0,2 oppure -1 ecc invece di darmi
> realmente SETT= 52 / 51,8 / 51 / ....
> Come posso ovviare???
non so se ho capito bene,
la prima cosa che mi viene in mente e' che puoi prendere in
considerazione solo la settimana dell'anno, ma devi considerare anche
l'anno di consegna.
prova cosi', verificalo, ho fatto pochi tentativi:
Function retSettPrep(iSettCons As Integer, iTempoPrep As Integer,
iAnnoCons As Integer)
  retSettPrep = (iSettCons - ((Int(iTempoPrep * 10 / 7) / 10) + 1)) +
_
      IIf((iSettCons - ((Int(iTempoPrep * 10 / 7) / 10) + 1)) <= 0,
retSettAnno(iAnnoCons), 0)
End Function
dove retSettAnno e' la funzioncina che ti ho scritto sopra
--
Federico
----------------------------------
Rimuovi paperino. per e-mail
----------------------------------
Tutte le richieste che arrivano
in privato, vengono cestinate.
----------------------------------
Sito Comune di it.comp.appl.access
http://www.sitocomune.com
mailto:
webm...@sitocomune.com
----------------------------------


text:
[cut]>
> Function retSettAnno(iAnno As Integer) As Integer
>   retSettAnno = DateDiff("ww", DateSerial(iAnno, 1, 1),
> DateSerial(iAnno, 12, 31))
> End Function
>
>
[cut]
>
> Function retSettPrep(iSettCons As Integer, iTempoPrep As Integer,
> iAnnoCons As Integer)
>   retSettPrep = (iSettCons - ((Int(iTempoPrep * 10 / 7) / 10) + 1)) +
> _
>       IIf((iSettCons - ((Int(iTempoPrep * 10 / 7) / 10) + 1)) <= 0,
> retSettAnno(iAnnoCons), 0)
> End Function
>
> dove retSettAnno e' la funzioncina che ti ho scritto sopra
>
Ti ringrazio, dovro fare qualche prova ma mi sembra una buona soluzione!!!!!
1K grazie
Marco


title: Can Someone please help me with my Computer stuff? 17439

author: Virgina Hernandez

text:
I use the computer and the Net on a regular basis but I don't know a whole lot about it all, especially when it gets technical.  I have an Acer Aspire AM5100-U5300A.  I would like to speed this computer up, I would like a very good grasphics card without spending a fortune. Once I find out what I need I willo just go to ebay but I don't know what kind of meory, cards and such are compaitble with my machine.  Help please.
Virgina
gh...@yahoo.com
http://ipods-imacs.com
roh(I?k<UQ=^=L?PC.bDy^fK*


title: effetti speciali!

author: Woodrov

text:
ciao!
Secondo voi com'è possibile far lampeggiare un controllo etichetta di
testo?
Avrei intenzione di far lampeggiare un'etichetta mentre un filtro è
attivo e farla sparire quando il filtro non è piu' attivo...
avete consigli?
gra$ie!  ;-)
	luca


title: effetti speciali!

text:
"Woodrov" <
luca....@tiscali.it
> ha scritto nel messaggio
news:m62u0vsdjh8jh3n55...@4ax.com...

Se la etichetta si chiama Etichetta.
A fronte dell'evento "Su timer" della tua maschera genera il seguente codice
VBA:
Private Sub Form_Timer()
Me!Etichetta.Visible = Not Me!Etichetta.Visible
End Sub
Quando attivi il filtro esegui anche questa riga di codice VBA:
Me.TimerInterval = 500
e quando disattivi il filtro esegui anche questa riga di codice VBA:
Me.TimerInterval = 0
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: effetti speciali!

text:
On Sun, 29 Dec 2002 15:15:36 GMT, "Roberto da casa"
<
r.ma...@libero.it
> wrote:
>
>"Woodrov" <
luca....@tiscali.it
> ha scritto nel messaggio
>news:m62u0vsdjh8jh3n55...@4ax.com...
>> ciao!
>>
>> Secondo voi com'è possibile far lampeggiare un controllo etichetta di
>> testo?
>> Avrei intenzione di far lampeggiare un'etichetta mentre un filtro è
>> attivo e farla sparire quando il filtro non è piu' attivo...
>>
>> avete consigli?
>>
>> gra$ie!  ;-)
>>
>> luca
>
>Se la etichetta si chiama Etichetta.
>A fronte dell'evento "Su timer" della tua maschera genera il seguente codice
>VBA:
>
>Private Sub Form_Timer()
>Me!Etichetta.Visible = Not Me!Etichetta.Visible
>End Sub
>
>Quando attivi il filtro esegui anche questa riga di codice VBA:
>
>Me.TimerInterval = 500
>
>e quando disattivi il filtro esegui anche questa riga di codice VBA:
>
>Me.TimerInterval = 0
Grazie!
Come al solito sei puntuale, preciso, rigoroso e completo!
complimenti!


title: effetti speciali!

text:
On Sun, 29 Dec 2002 15:15:36 GMT, "Roberto da casa"
<
r.ma...@libero.it
> wrote:
>
>"Woodrov" <
luca....@tiscali.it
> ha scritto nel messaggio
>news:m62u0vsdjh8jh3n55...@4ax.com...
>> ciao!
>>
>> Secondo voi com'è possibile far lampeggiare un controllo etichetta di
>> testo?
>> Avrei intenzione di far lampeggiare un'etichetta mentre un filtro è
>> attivo e farla sparire quando il filtro non è piu' attivo...
>>
>> avete consigli?
>>
>> gra$ie!  ;-)
>>
>> luca
>
>Se la etichetta si chiama Etichetta.
>A fronte dell'evento "Su timer" della tua maschera genera il seguente codice
>VBA:
>
>Private Sub Form_Timer()
>Me!Etichetta.Visible = Not Me!Etichetta.Visible
>End Sub
>
>Quando attivi il filtro esegui anche questa riga di codice VBA:
>
>Me.TimerInterval = 500
>
>e quando disattivi il filtro esegui anche questa riga di codice VBA:
>
>Me.TimerInterval = 0
Un commentino:
l'evento timer l'ho capito, nel senso che so bene che l'enunciato
viene eseguito ogni volta che il timer da 500ms va a 0 (attivazione
filtro) e non viene eseguito quando il timer è uguale a 0 sec.
Non ho ben capito invece l'enunciato contenuto nella Sub Form_Timer()
Me!Etichetta.Visible = Not Me!Etichetta.Visible
Me lo potresti commentare?
Cosa vuol dire che la proprietà Visible dell'etichetta è uguale al suo
opposto?


title: effetti speciali!

text:
"Woodrov" <
luca....@tiscali.it
> ha scritto nel messaggio
news:jb6u0vs40jgv0t81n...@4ax.com...
[CUT]
>
> Un commentino:
> l'evento timer l'ho capito, nel senso che so bene che l'enunciato
> viene eseguito ogni volta che il timer da 500ms va a 0 (attivazione
> filtro) e non viene eseguito quando il timer è uguale a 0 sec.
>
> Non ho ben capito invece l'enunciato contenuto nella Sub Form_Timer()
> Me!Etichetta.Visible = Not Me!Etichetta.Visible
>
> Me lo potresti commentare?
> Cosa vuol dire che la proprietà Visible dell'etichetta è uguale al suo
> opposto?
Visto che tu vuoi che l'etichetta lampeggi, occorre che ogni 500ms se
l'etichetta è visibile diventi non visibile e se è non visibile diventi
invece visibile: per fare questo non ho fatto altro che, ogni 500ms,
assegnare alla proprietà Visible dell'etichetta il suo valore opposto.
Forse ti sarebbe stato più chiaro se avessi scritto così:
If Me!Etichetta.Visible = True Then
    Me!Etichetta.Visible = False
Else
    Me!Etichetta.Visible = Tue
Endi If
Ma poiché la proprietà Visible non è altro che una variabile booleana, le
due soluzioni si equivalgono.



title: pagina web Popup

author: MarcoMac

text:
Buonasera al newsgroup.
Ho creato un controllo  Webbrowser che mi apre una pagina web da
access al fine di importarne i dati. Il mio problema è che i dati che
mi servono vengono caricati in una finestra popup che si apre
cliccando su un link della pagina.
La finestra popup si apre attraverso un javascript all'infuori di
access e restituisce un errore poiché si apre con Internet Explorer.
Quello che non riesco a capire è come intercettare l'evento "Click"
del link (non so se si chiama così) in modo da poter inviare al server
un tipo di richiesta diversa ed intercettarne i dati.
Oppure, come far aprire la finestra popup all'interno di access
grazie in anticipo a tutti e buone feste
MarcoMac


title: URG arrotondamenti IVA per eccesso

author: Dante Soravito de Franceschi

text:
Sono un neofita in programmazione access e chiedo lumi per risolvere questo
problema: in una fattura possono esserci diverse aliquote IVA e diversi non
imponibili. Se per questi ultimi l'imposta è zero [Null], per gli altri
possiamo trovare delle imposte con qualche decimale; mi spiego meglio, se un
dato imponibile mi da un'imposta pari a 29.145,1, l'importo che devo
visualizzare sulla fattura è 29.146. L'espressione che utilizzo per trovare
l'imposta è questa:
Imposta: IIf([IvaAux]<=20;[SommaDiImponibile]*[IvaAux]/100;Null)
Questa espressione (si trova in una query di raggruppamento) arrotonda per
eccesso solo quando il decimale è = o superiore a 5. Come devo fare per
ottenere l'arrotondamento alla lira superiore anche quando il decimale è
inferiore a 5?
Sentiti ringraziamenti.
Dante


title: URG arrotondamenti IVA per eccesso

author: Paolo Simone

text:
Dante Soravito de Franceschi <
dso...@tin.it
> wrote in message
87v8tm$pcf$1...@nslave2.tin.it...
> eccesso solo quando il decimale č = o superiore a 5. Come devo fare per
> ottenere l'arrotondamento alla lira superiore anche quando il decimale č
> inferiore a 5?
ValoreArrotondato=Int(ValoreDaArrotondare+0.9999999)


title: URG arrotondamenti IVA per eccesso

author: Battistin Umberto

text:
Imposta: IIf([IvaAux]<=20;Int([SommaDiImponibile]*[IvaAux]/100+0,9);Null)
Dante Soravito de Franceschi <
dso...@tin.it
> wrote in message
87v8tm$pcf$1...@nslave2.tin.it...



title: arrotondare un campo numerico in una query

author: Bruco

text:
Cercando in groups.google ho visto che per arrotondare un campo alla
n-esima cifra decimale viene più consigliata più volte la funzione
fctround.
Ma perché scrivere e richiamare una funzione apposita quando (IMHO)
esiste una soluzione più semplice?
Se per esempio si vuole arrotondare alla n-esima cifra decimale il
campo importo, basta scrivere
Int([importo]*10^[n]+0,5)/10^[n]
Volendo, ovviamente, si può fare anche a meno di rendere la query
parametrica sostituendo a [n] il valore desiderato.
Se mi sfugge qualcosa, ditemelo per favore...


author: MA

text:

Sbaglio o più o meno fctround fa questo
Solo che tra l'altro testa se è un numero o meno
Dov'è il problema
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


author: Roberto

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:QQtBe.25919$TR5....@news.edisontel.com...

Il problema è che int(1,54)  = 1 mentre l'arrotondomento dovrebbe essere = 2
Ciao Roberto


author: Roberto dalla campagna

text:
"Bruco" <
br...@mailinator.com
> ha scritto nel messaggio
news:1121346423.7...@z14g2000cwz.googlegroups.com...

Ti auguro che Karl Donaubauer (autore della funzione fctround) legga il tuo
quesito: è l'unico che può spiegarti in quali casi la tua formula non
restituisce un risultato esatto.
Puoi anche rintracciare su Google le argomentazioni di Karl scritte in
vecchi thread di questo NG che ponevano il tuo stesso quesito.
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


author: giorgio rancati

text:
"Bruco" <
br...@mailinator.com
> ha scritto nel messaggio
news:1121346423.7...@z14g2000cwz.googlegroups.com...




Cio Bruco,
il problema è che la tua funzione non sempre rende il risultato arrotondato
secondo le regole commerciali.
prova a vedere
-----
Sub ProvaArrotondamento()
Dim Importo As Double
Dim N As Integer
N = 2
Importo = 1.155
Debug.Print Int([Importo] * 10 ^ [N] + 0.5) / 10 ^ [N]
Importo = 2.155
Debug.Print Int([Importo] * 10 ^ [N] + 0.5) / 10 ^ [N]
End Sub
----
Primo risultato
1,16   OK :-)
Secondo Risultato
 2,15  KO :-(
Ciao Giorgio


title: Differenza tra date

author: Roberto Rossi

text:
Scusate..
ho un piccolo problema, ho 2 date espresse in gg/mm/aaaa hh.mm.ss ora se io
faccio la differenza tra data1 e data2,
finchè essa è inferiore a 24 ore tutto bene, in caso contrario riparte da 0.
Ora io non voglio che venga espressa in giorni ma solo in
hh.mm
 es. 48h,58m.
Chi mi da una mano.. grazie in anticipo roberto


title: Differenza tra date

author: Roberto dal portatile

text:
"Roberto Rossi" <
err...@tin.it
> ha scritto nel messaggio
news:o_cJ7.404$_h6....@news1.tin.it...

La differenza in ore e minuti, se superiore a 24 ore, in Access (al
contrario di Excel) non la puoi ottenere.
Però se moltiplichi  per 24 l'oggetto che contiene la differenza e gli
imposti il formato a Fisso, otterrai il risultato in ore e frazioni di ore,
ovvero 48,97.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: stampare una etichetta singola

author: tonidrummer

text:
Ciao. Dopo aver risolto grazie a tutti voi i quesiti precedenti, mi rimane
un ultimo (spero)problemino : come faccio a stampare solo l'etichetta del
record corrente?
Grazie. Toni.


title: stampare una etichetta singola

author: Govardo Libero

text:
"tonidrummer" <tonia...@CICCIONEtin.it> ha scritto nel messaggio
ews:Aply7.20162$pm2.3...@news2.tin.it...

Se intendi lanciare la stampa da una maschera, inserisci nel evento click di
un pulsante che chiamerai  PrintRec il seguente codice:
'---------------------------------
Private Sub PrintRec_Click() 'SubRoutine per la stampa di singoli records
On Error GoTo Err_PrintRec_Click
    Dim stDocName As String
    Dim Criterio As String
    stDocName = "nome del tuo report"
    Criterio = "[nome campo sul tuo report] = '" & Me![nome campo della
maschera] & "'"
    DoCmd.OpenReport stDocName, acPreview, "", Criterio
Exit_PrintRec_Click:
    Exit Sub
Err_PrintRec_Click:
    MsgBox Err.Description
    Resume Exit_PrintRec_Click
End Sub ' Angelo 30.09.2001
'---------------------------------
--
                     Angelo
------------------------------------------------------
Sito comune di it.comp.appl.access
http://www.sitocomune.com
------------------------------------------------------


title: stampare una etichetta singola

text:
> > Ciao. Dopo aver risolto grazie a tutti voi i quesiti
precedenti, mi rimane
> > un ultimo (spero)problemino : come faccio a
stampare solo l'etichetta del
> > record corrente?
> > Grazie.
Toni.
> >
> >
> Se intendi lanciare la stampa da una
maschera, inserisci nel evento click di
> un pulsante che chiamerai
PrintRec il seguente codice:
>
>
'---------------------------------
> Private Sub PrintRec_Click()
'SubRoutine per la stampa di singoli records
> On Error GoTo
Err_PrintRec_Click
>
>     Dim stDocName As
String
>     Dim Criterio As String
>
>
    stDocName = "nome del tuo report"
>
Criterio = "[nome campo sul tuo report] = '" & Me![nome campo della
>
maschera] & "'"
>
>
>
DoCmd.OpenReport stDocName, acPreview, "", Criterio
>
>
Exit_PrintRec_Click:
>     Exit Sub
>
>
Err_PrintRec_Click:
>     MsgBox Err.Description
>
    Resume Exit_PrintRec_Click

Caro Angelo, ti ringrazio, ma il codice non funziona. Al posto
dell'etichetta mi dà "#errore

 #errore #errore". Io ho previsto che l'iddestinatario
della maschera anagrafico all'evento click stampi la singola etichetta con il
report "Etichette Indirizzi Anteprima". Quest'ultimo è generato da una query
dove c'è il campo idanagrafico. Anche nel report c'è il campo idanagrafico. Ho
inserito il nome esatto del report e della maschera con "genera" ed ho ottenuto
quanto segue:

Private Sub PrintRec_Click() 'anteprima etichette
On Error
GoTo Err_PrintRec_Click

    Dim stDocName As
String
    Dim Criterio As String

    stDocName = "Etichette Indirizzi
Anteprima"
    Criterio = "Reports![Etichette Indirizzi
Anteprima]![idanagrafico]   = '" & Me![Anagrafico.idanagrafico]
& "'"

    DoCmd.OpenReport stDocName, acPreview,
"", Criterio

Exit_PrintRec_Click:
    Exit
Sub

Err_PrintRec_Click:
    MsgBox
Err.Description
    Resume Exit_PrintRec_Click
End
Sub

Se apro il report in struttura, sotto la query di origine, al
filtro, è indicato il record con l'id esatta, ma poi non funziona. E' grave,
dottore?

Ciao.Toni.


title: Visualizzare il record corrente in un report

author: Ludo

text:
Ciao a tutti,
Come faccio a far visualizzare in un anteprima di report il record
corrente?mi spiego meglio:
ho in un database una maskera di inserimento dati. Inserisco x esempio 5
record: A,B,C,D,E e ad esempio mi posiziono sul record C.
Premendo il pulsante di anteprima del report (appositamente creato), vorrei
ke mi venisse visualizzata la pagina contenente il record C,ma invece mi
viene fuori il primo record, A.
Grazie mille..
Ciao ludovico


author: Sandro

text:
"Ludo" <
ludo...@tele2.it
> ha scritto nel messaggio
news:YIsOe.26300$hV3....@nntpserver.swip.net...

Ciao Ludovico,
       devi filtrare il report tramite, magari, la chiave primaria che
identificaa A,B,C,D,.......
    DoCmd.OpenReport stDocName, acViewPreview, , "[chiavePrimaria]=" &
Me![ChiavePrimaria]
dai un'occhio all'help quanto previsto dalla condizione Where.
Notte, Sandro


title: Un numero appartiene ad un intervallo????

text:
Ciao a tutti, e complimenti alla "testa geniale" di tutti quelli che
rispondono ai vari quesiti.
Mi sono messa in testa di fare un piccolo database e quindi mi sto
affacciando ad access vba.
Ho un problema forse talmente semplice che non sono nemmeno riuscita a
trovarlo sui vari forum... probabilmente è troppo semplice!
Allora, ho una maschera con diversi campi.
In particolare 2, che si chiamano MAX e MIN (che conterranno valori
negativi) e uno chiamato VAR, che è un campo numerico derivato da
altri campi ancora.
Premo un pulsante. Se il campo VAR contiene un numero che NON
appartiene all'intervallo tra max e min, devo cancellare il record
(dopo aver fatto uscire un msgbox che mi avverte della cosa),
altrimenti resetto la form, e continuo con un altro record.
Ad esempio:
min=-8
max=-20
var=-12 resetto la form
var=-30 appare il msgbox e poi cancello il record
Io ho abbozzato quanto segue:
If var > max And var < min = False Then
    intRisposta = MsgBox("Eliminare il record" & Me.NserieIR & "?",
vbYesNo, "Attenzione!")
        If intRisposta = vbYes Then
            DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
            DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
            MsgBox "Eliminato", vbInformation
            Forms!frm_fosfatazione.casella_ricerca_nserieir.Value = ""
            Forms!frm_fosfatazione.casella_ricerca_nserieir.SetFocus
            Forms!frm_fosfatazione.cmdfind.Visible = True
            Me.Visible = False
         End If
Else
    'Resetta la subfrm
    Forms!frm_fosfatazione.casella_ricerca_nserieir.Value = ""
    Forms!frm_fosfatazione.casella_ricerca_nserieir.SetFocus
    Forms!frm_fosfatazione.cmdfind.Visible = True
    Me.Visible = False
End If
-----------------------------------------------------------------------------------------------------------------------------------------
visto che non va, ho provato a fare una mascherina semplice semplice
con 3 campi, semplificando un po' le cose... ma non funziona nemmeno
questo
If var > max Then
    If var < min Then
        MsgBox "Nell'intervallo"
    Else
        MsgBox "NON nell'intervallo"
    End If
Else
        MsgBox "NON nell'intervallo"
End If
-------------------------------------------------------------------------------------------------------------------------------------------
potete aiutarmi?


author: VT @ home

text:
Il Fri, 27 Jul 2007 21:16:25 -0000,
mys...@gmail.com
 ha scritto:
>(.....)
>Ciao a tutti, e complimenti alla "testa geniale" di tutti quelli che
>rispondono ai vari quesiti.
>
>Mi sono messa in testa di fare un piccolo database e quindi mi sto
>affacciando ad access vba.
>
>Ho un problema forse talmente semplice che non sono nemmeno riuscita a
>trovarlo sui vari forum... probabilmente è troppo semplice!
>
>Allora, ho una maschera con diversi campi.
>In particolare 2, che si chiamano MAX e MIN (che conterranno valori
>negativi) e uno chiamato VAR, che è un campo numerico derivato da
>altri campi ancora.
>
>Premo un pulsante. Se il campo VAR contiene un numero che NON
>appartiene all'intervallo tra max e min, devo cancellare il record
>(dopo aver fatto uscire un msgbox che mi avverte della cosa),
>altrimenti resetto la form, e continuo con un altro record.
>
>Ad esempio:
>min=-8
>max=-20
Attenzione: trattandosi di numeri negativi, il valore massimo non è "il più negativo dei due", bensì "il meno negativo
dei due".
In altre parole, -8 è maggiore di -20 e quindi max=-8, min=-20.
Nulla ti vieta di chiamare min il valore più alto e max il valore più basso, però questo non contribuisce certo alla
chiarezza !
>var=-12 resetto la form
>var=-30 appare il msgbox e poi cancello il record
>
>Io ho abbozzato quanto segue:
>
>If var > max And var < min = False Then
Fermo restando quanto osservato sui nomi delle variabili e prendendo per buoni i tuoi nomi, prova a sostituire
l'istruzione sopra con
If var < max Or var > min Then
>    intRisposta = MsgBox("Eliminare il record" & Me.NserieIR & "?",
>vbYesNo, "Attenzione!")
>        If intRisposta = vbYes Then
>            DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
>            DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
>            MsgBox "Eliminato", vbInformation
>            Forms!frm_fosfatazione.casella_ricerca_nserieir.Value = ""
>            Forms!frm_fosfatazione.casella_ricerca_nserieir.SetFocus
>            Forms!frm_fosfatazione.cmdfind.Visible = True
>            Me.Visible = False
>         End If
>Else
>    'Resetta la subfrm
>    Forms!frm_fosfatazione.casella_ricerca_nserieir.Value = ""
>    Forms!frm_fosfatazione.casella_ricerca_nserieir.SetFocus
>    Forms!frm_fosfatazione.cmdfind.Visible = True
>    Me.Visible = False
>End If
>
>-----------------------------------------------------------------------------------------------------------------------------------------
>
>visto che non va, ho provato a fare una mascherina semplice semplice
>con 3 campi, semplificando un po' le cose... ma non funziona nemmeno
>questo
Cioè ? Che vuol dire non funziona ?
Con quali valori delle tre variabili hai provato ?
>If var > max Then
>    If var < min Then
>        MsgBox "Nell'intervallo"
>    Else
>        MsgBox "NON nell'intervallo"
>    End If
>Else
>        MsgBox "NON nell'intervallo"
>End If
>
>-------------------------------------------------------------------------------------------------------------------------------------------
>
>potete aiutarmi?
Vincenzo Turturro
Certificato Eucip Core Level
ITA 0000-002299 del 14/05/2007
---------------------------------------------
il sito comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
risorse Access:
http://www.accessgroup.it
---------------------------------------------
Il sito comune di it.comp.as400
http://www.faq400.com
---------------------------------------------


author: ALESSANDRO Baraldi

text:
<
mys...@gmail.com
> ha scritto nel messaggio
news:1185570985.2...@g4g2000hsf.googlegroups.com...








----------------------------------------------------------------------------
-------------------------------------------------------------


----------------------------------------------------------------------------
---------------------------------------------------------------
potete aiutarmi?
[Risposta]
Ipotiziamo:
min=-8
max=-20
var=-12
Perchè per semplificarti la vita non effettui il confronto sul valore
Assoluto...?
If abs(var) > abs(min) and abs(var) < abs(max) then
    resetto la form
Else
    non resetto
End if
Vedrai che funziona anche con -30 ecc.... vedi tu se ti serve l'uguaglianza
stretta metti anche gli UGUALE
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------


text:
> >Ad esempio:
> >min=-8
> >max=-20
> >var=-12
> Fermo restando quanto osservato sui nomi delle variabili e prendendo per
buoni i tuoi nomi, prova a sostituire
> l'istruzione sopra con
> If var < max Or var > min Then
Mi pare che entrambe le condizioni diano falso in questo modo e
matematicamente sembrerebbe vero...!



title: Conteggio su filtro

text:
Salve a tutti pongo il mio quesito:
Ho una tabella chiamata "tb_Censimento" con i seguenti campi:
[ID],[Compartimento],[ImpiantoRaccordato],[DescrizioneRaccordo],[StatoRaccordo],[TipoMezzo],[Anormalita]
Poi ho una Maschera su cui ho:
2) una listbox "ListaCens"
3) una textbox non associata "TCerca" la cui funzione è di filtraggio
della listbox
su evento <<Su modifica>> della "TCerca" ho inserito questa stringa sql :
************************************************************************************************************************
Private Sub TCERCA_Change()
Dim sSql As String
sSql = "SELECT
[ID],[Compartimento],[ImpiantoRaccordato],[DescrizioneRaccordo],[StatoRaccordo],[TipoMezzo],[Anormalita]FROM
[tb_Censimento] WHERE  [ImpiantoRaccordato] LIKE '*" & TCERCA.Text & "*'"
ListaCens.RowSource = sSql
************************************************************************************************************************
In pratica quando vado a digitare del testo in "TCerca" la listbox
ListaCens" mi filtra i dati (in base a cio che digito)
bene fin qui ok
4) Poi ho messo un una textbox non associata "NRMezzi" che mi deve
conteggiare il numero di mezzi presenti (cioe campo [TipoMezzo])
                  Quello che vorrei fare è questo:
Quando vado a digitare nella "TCerca", oltre a filtrare i dati della
listbox (che gia fa), la textbox "NRMezzi" deve restituirmi il conteggio
DINAMICO del numero dei mezzi (ovvero del campo [TipoMezzo] della tabella
"tb_Censimento") che man man che digito e filtra.
Cioe man mano che digito nella "TCerca" la listbox mi filtra i dati in
base a ciò che digito in TCerca e a sua volta la textbox "NRMezzi" man
mano deve restituirmi il conteggio del campo [TipoMezzo]
Spero di essere stato chiaro
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Conteggio su filtro

text:
Volevo aggiungere che non mi serve il semplice conteggio dei record usando
la proprietà ListCount
ma il conteggio dei record per cui il campo [TipoMezzo] non è nullo
Grazie
Domy73 ha scritto:



title: Conteggio su filtro

text:
----TROVATA SOLUZIONE -----
Smanettando un po ho trovato la soluzione, e cioè:
ho creato una query chiamata "qr_ConteggioNrMezzi_su_filtro" la cui
stringa SQL è la seguente:
SELECT tb_Censimento.ID, tb_Censimento.Compartimento,
tb_Censimento.ImpiantoRaccordato, tb_Censimento.DescrizioneRaccordo,
tb_Censimento.StatoRaccordo, tb_Censimento.TipoMezzo,
tb_Censimento.Anormalita
FROM tb_Censimento
WHERE (((tb_Censimento.ImpiantoRaccordato) Like "*" &
[forms]![fr_RiepilogoCensimento]![TCERCA].[text] & "*"));
e poi ho nell'evento "Su Modifica" della textbox TCerca ho mutilizzato la
funzione DCount (come segue)
Me.NrMezzi = DCount("*", "qr_ConteggioNrMezzi_su_filtro", "Not
IsNull([TipoMezzo])")
FUNZIONA ALLA GRANDE SPERO DI ESSERE STATO UTILE ANCHE AD ALTRI
CIAUUUUU
Domy73 ha scritto:



title: Antonio, Antonio (Biso) ....

author: Pseudo Antonio Biso

text:
Antò, ma te pare che a Infostrada glie possà fregà qualkosa delle tu fregnacce!!!
Gli unici avvertimenti che quei bastardi mandano agli abbonati sono le kagate iOLnews, li
mortacci...
Fai il bravo, sennò il castigamatti arriva anche nel 2001  ;-D
Pseudo Bìso.


title: Antonio, Antonio (Biso) ....

author: Antonio Biso

text:
Pseudo Antonio Biso <
pseud...@etruria.net
> wrote in message
Kgo36.209299$hk4.7...@news.infostrada.it...

E ci vuole un bel coraggio a fare il castigamatti nell'anonimato,
complimenti ciccio!!!
Antonio


title: Calcolare % su Query

author: matafra

text:
Ho una query1 del tipo:
Data                nome                    valore
12/12/2001        A                            2
13/12/2001        A                            3
14/12/2001        A                            1
12/12/2001        B                            5
13/12/2001        B                            25
14/12/2004        B                            20
Vorredi se possibile una query1 che mi restituisca:
Data                nome                    valore            %
12/12/2001        A                            2
13/12/2001        A                            3                % +50
14/12/2001        A                            1                % - 66,6
12/12/2001        B                            5
13/12/2001        B                            25              %+50
14/12/2004        B                            20              %-20
Cioč la variazione percentuale tra il valore del record "1" rispetto al
record "2"
Non so se mi sono spiegato.
Grazie del vostro aiuto.


title: close che non funziona

text:
ciao a tutti,
ho un problema piccolo ma che non so risolvere.
ho una maschera e una sottomaschera per inserire i dati. poi ho due
pulsanti, un salva e un cancella le modifiche.
quando clicco su cancella le modifiche non funziona perchè access che
funziona a c...o di cane quando inserisco i dati nella sottomaschera
salva già il record e quindi diventa alquanto complicato poi
eliminarlo.
mi è stato detto che è possibile fare qualcosa con le cosiddette
transazioni... però non è che io sia molto esperto e quindi mi farebbe
piacere che qualcuno mi desse un aiuto sia un punto di vista teorico
(che sono le transazioni) e qualche esempio pratico abbastanza
calzante (ne ho visto uno sul sito comune ma non era molto chiaro...
dava per scontate un po' troppe cose, tipo apri db, apri warehouse o
giù di lì....).
grazie molte!
ciao a tutti
ulix


title: close che non funziona

author: David Martin

text:
fabiani...@gmail.com
 wrote:
> ho una maschera e una sottomaschera per inserire i dati. poi ho due
> pulsanti, un salva e un cancella le modifiche.
> quando clicco su cancella le modifiche non funziona perchè access che
> funziona a c...o di cane quando inserisco i dati nella sottomaschera
> salva già il record e quindi diventa alquanto complicato poi
> eliminarlo.
Intanto non è Access che funziona nel modo in cui l'hai descritto... se
fai una maschera collegata ad un'origine dati, sta tranquillo che Access
non memorizza le modifiche se non sei tu a salvare esplicitamente, ad
esempio spostandoti da un record ad un altro...
Detto ciò, io quando voglio fare ciò che hai descritto, mi creo un form
non collegato, ci metto i campi che mi servono, e lo uso:
- in inserimento, per far scrivere all'utente i valori, che poi
controllo e inserisco nella tabella/e solo se l'operazione viene confermata;
- in modifica, caricando i valori dalla tabella e poi gestendo le
modifiche nello stesso modo descritto sopra per l'inserimento... ovvero,
valuto i valori inseriti e se sono ok li memorizzo quando l'utente li
salva, altrimenti li "scarico" e la tabella resta così com'era, se
l'utente annulla l'operazione.
> mi è stato detto che è possibile fare qualcosa con le cosiddette
> transazioni... però non è che io sia molto esperto e quindi mi farebbe
> piacere che qualcuno mi desse un aiuto sia un punto di vista teorico
Tanto per avere un'idea:
http://it.wikipedia.org/wiki/Transazione_%28database%29
--
David Martin


title: close che non funziona

text:
On 2 Apr, 10:44, David Martin <
david.mar...@libero.it
> wrote:

ti ringrazio per la risposta, ma non mi è molto chiara (scusa
l'ignoranza)
in modifica, caricando i valori dalla tabella e poi gestendo le
> modifiche nello stesso modo descritto sopra per l'inserimento... ovvero,
> valuto i valori inseriti e se sono ok li memorizzo quando l'utente li
> salva, altrimenti li "scarico" e la tabella resta così com'era, se
> l'utente annulla l'operazione.
potresti gentilmente spiegarmi un po' meglio? io ho dei dati collegati
tra tabelle collegati uno a molti e.
non ho capito in particolare la parte in cui dici se l'operazione
viene confermata.... il problema è che quando l'utente arriva alla
fine e si accorge di avere inserito dati sbagliatie vuole tornare
indietro... sicuramente non ho capito io!!
ciao


title: close che non funziona

author: Alessandro Baraldi

text:
On 2 Apr, 10:48, "
fabiani.uli...@gmail.com
" <
fabiani.uli...@gmail.com
>
wrote:

> ciao- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
Perchè 2 3D con la stessa domanda.... ?
@Alex


title: close che non funziona

text:
fabiani...@gmail.com
 wrote:
> potresti gentilmente spiegarmi un po' meglio? io ho dei dati collegati
> tra tabelle collegati uno a molti e.
> non ho capito in particolare la parte in cui dici se l'operazione
> viene confermata.... il problema è che quando l'utente arriva alla
> fine e si accorge di avere inserito dati sbagliatie vuole tornare
> indietro... sicuramente non ho capito io!!
Beh, potresti anche sprecarti a scrivere un pochino meglio e dando
qualche dettaglio in più...
Nel post iniziale hai scritto che hai una maschera (la chiamiamo form1)
e una sottomaschera (la chiamiamo subform1), quindi ipotizzo che gli
utenti facciano delle scelte (filtri) nella maschera e poi visualizzino
il dettaglio dei dati nella sottomaschera.
A questo punto vuoi dargli la possibilità di fare modifiche ai dati
presenti nella sottomaschera. Quello che ti suggerivo è: quando l'utente
vuole modificare un record visualizzato nella sottomaschera (subform1),
carichi i dati del record in un'altra maschera (form2), non associata
alla tabella/query alla quale invece è associata la sottomaschera
(subform1).
Questa maschera (form2) è una sorta di contenitore vuoto, i cui campi
sono valorizzati da te a seconda del record scelto dall'utente. In
questa stessa maschera, hai i tuoi pulsanti "salva" e "annulla".
A questo punto, l'utente fa le modifiche che vuole e le conferma
cliccando su salva, oppure le cancella cliccando su annulla.
Fino a quando l'utente non salva le modifiche nella tabella, ha la
possibilità di modificare i valori che sta digitando nella maschera di
modifica (form2).
HTH
--
David Martin


title: close che non funziona

text:
On 2 Apr, 11:11, David Martin <
david.mar...@libero.it
> wrote:

ok, ti ringrazio, adesso ho capito, ma, se devo essere sincero, non mi
pare il massimo della comodità!
io sto cercando una soluzione un poco più professionale, cercherò di
studiare con un po' di attenzione la parte delle transazioni.
grazie
ciao


title: close che non funziona

author: Alessandro Cara

text:
fabiani...@gmail.com
 wrote:
[cut]
> ok, ti ringrazio, adesso ho capito, ma, se devo essere sincero, non mi
> pare il massimo della comodità!
> io sto cercando una soluzione un poco più professionale, cercherò di
> studiare con un po' di attenzione la parte delle transazioni.
> grazie
>
> ciao
>
C'era un "demo" sul sitocomune [
www.sitocomune.com
] ( non lo trovo
piu',puoi pero' vedere il 6.20) che realizzava quello che chiedi in modo
decisamente semplice. Ovviamente usa le transazioni che "in finale" si
riducono a : .begintrans ; .commit ; .rollback "tutto il resto e' noia"
(cit)
--
ac
y-1=x


title: close che non funziona

text:
grazie molte



title: Query di creazione tabella che funziona solo se avviata manualmente

text:
Ciao a tutti
Ho un DB access 2007 che esporta dei dati in file csv per una
successiva acquisizione in tabelle di phpmyadmin.
In questo Db ho una query di crezione tabella che tra i vari campi
trasferiti in tabella ne ha 5 numerici con decimali.
ho impostato su questi campi la funzioni del tipo
replace(cstr([prezzo]);",";".") in modo che vengano convertiti in
testo e che la virgola venga sostituita dal punto.
Ora, eseguendo la query manualmente funziona alla perfezione,
avviandola invece da codice VBA i campi vengono ignorati e la tabella
risultante dà sui 5 campi valore null...

Sapete spiegarmi questo mistero ed eventualmente illuminarmi su come
risolvere??

grazie 1000

Nicola


author: Popi - TheBadHabits

text:
Il giorno mercoledì 28 marzo 2012 12:10:08 UTC+2, N1C0L4 ha scritto:
> Ciao a tutti
> Ho un DB access 2007 che esporta dei dati in file csv per una
> successiva acquisizione in tabelle di phpmyadmin.
> In questo Db ho una query di crezione tabella che tra i vari campi
> trasferiti in tabella ne ha 5 numerici con decimali.
> ho impostato su questi campi la funzioni del tipo
> replace(cstr([prezzo]);",";".") in modo che vengano convertiti in
> testo e che la virgola venga sostituita dal punto.
> Ora, eseguendo la query manualmente funziona alla perfezione,
> avviandola invece da codice VBA i campi vengono ignorati e la tabella
> risultante dà sui 5 campi valore null...

Ciao!

Prova a postare il sql completo ed i comandi che usi per eseguirla.

HTH
Popi


text:

Ciao

il codice (un pò lunghino) è questo:

SELECT [articoli2].[ditta] & [articoli2].[articolo] & [articoli2].
[ean] AS ID, articoli2.ean, articoli1.Articolo, IIf(IsNull([datid].
[categoria]),[datix].[categoria],[datid].[categoria]) AS Categoria,
IIf(IsNull([datid].[sottocategoria]),[datix].[sottocategoria],[datid].
[sottocategoria]) AS SottoCategoria, articoli1.descrizione AS
Descrizione, articoli1.UM, articoli1.Imballo, IIf([articoli1].
[sottimballo]="",1,[articoli1].[sottimballo]) AS Sottimballo,
Replace(CStr([articoli1].[lis2]),",",".") AS Lis2,
Replace(CStr([articoli1].[lis4]),",",".") AS lis4,
Replace(CStr([articoli1].[lis7]),",",".") AS lis7,
CStr(IIf(IsNull([estatt]),0,IIf([estatt]-[qtaipgcli]<0,0,[estatt]-
[qtaipgcli]))) AS Disponibile, CStr(IIf(IsNull([estatt]),
0,IIf([estatt]-[qtaipgcli]+[qtaordfor]<0,0,[estatt]-[qtaipgcli]+
[qtaordfor]))) AS Ordinabile, articoli1.DataCre, IIf(IsNull([datid].
[percorso]),[datix].[percorso],[datid].[percorso]) AS Percorso,
Replace(CStr([articoli1].[peso]),",",".") AS peso,
Replace(CStr([articoli1].[volume]),",",".") AS volume,
IIf([Ordinabile]>[Disponibile],"1","0") AS Arriva INTO ARTICOLIWEB
FROM ((Ditte INNER JOIN ((articoli1 LEFT JOIN articoli3 ON
(articoli1.Articolo = articoli3.Articolo) AND (articoli1.Ditta =
articoli3.Ditta)) INNER JOIN articoli2 ON (articoli1.Ditta =
articoli2.Ditta) AND (articoli1.Articolo = articoli2.Articolo)) ON
(Ditte.CodCli = articoli2.Fornitore) AND (Ditte.Ditta =
articoli2.Ditta)) LEFT JOIN datid ON articoli2.nomefile =
datid.codice) LEFT JOIN datix ON articoli2.nomefile = datix.codice
WHERE (((IIf(IsNull([datid].[percorso]),[datix].[percorso],[datid].
[percorso])) Is Not Null And (IIf(IsNull([datid].[percorso]),[datix].
[percorso],[datid].[percorso])) Not Like "*esaurit*") AND
((articoli1.Annullato) Not Like "C") AND ((IIf([descrizione] Like
"*@*" And [estatt]-[qtaipgcli]+[qtaordfor]<=0,"togli",""))="")) OR
(((IIf(IsNull([datid].[percorso]),[datix].[percorso],[datid].
[percorso])) Is Not Null And (IIf(IsNull([datid].[percorso]),[datix].
[percorso],[datid].[percorso])) Not Like "*esaurit*") AND
((articoli1.Annullato) Is Null) AND ((IIf([descrizione] Like "*@*" And
[estatt]-[qtaipgcli]+[qtaordfor]<=0,"togli",""))=""));

Nicola


text:
Il giorno mercoledì 28 marzo 2012 12:29:56 UTC+2, N1C0L4 ha scritto:
> On 28 Mar, 12:22, Popi - TheBadHabits <
rlu...@yahoo.com
> wrote:
> > Il giorno mercoledì 28 marzo 2012 12:10:08 UTC+2, N1C0L4 ha scritto:
> >
> >
> > Prova a postare il sql completo ed i comandi che usi per eseguirla.
> >
>
> il codice (un pò lunghino) è questo:
>
> SELECT [articoli2].[ditta] & [articoli2].[articolo] & [articoli2].

Ciao!

Con che comandi la esegui da vba?

Popi


text:

la tabella la creo con:
DoCmd.OpenQuery "ARTMAGWEB"
mi viene generata la tabella ARTICOLI WEB
e la esporto con
DoCmd.TransferText acExportDelim, "ESPORTA_ARTICOLI2", "ARTMAGWEB", "\
\serverftp\agenti\aggiornamenti\www\admin\articoli.csv", False

dove la specifica ESPORTA_ARTICOLI2 indica che il separatore di campo
deve essere la virgola e il separatore decimale il punto.

Nicola


title: Prelevare dati da 1 maschera

author: Marianna

text:
Ciao a tutti,
un mio amico mi sta facendo impazzire in quanto ha diverse
query dalle quali apre delle maschere.
A questo punto vuole che dei dati contenuti in un campo particolare (email)
di quella maschera vengano raccolti in un'altra maschera all'interno di una
lista a tendina dove poi sceglie le email che gli interessano e quindi sulla
base di quelle effettua l'invio utilizzando il client di posta predefinito.
Gli ho spiegato che una maschera trae origine da una tabella o query ma non
riesco a raccogliere i dati di un campo di una maschera che si trovano
all'interno di un testo da qualche parte (lista a tendina etc...) perchè
essi sono dei record veri e propri e non essendoci numerazione progressiva
sui testi non posso fare neanche un ciclo per raccoglierne i valori.
Mi date una mano per favore nel risolvere questo quesito?
Grazie mille
Marianna


title: Prelevare dati da 1 maschera

text:
>
> infine
> docmd.sendobject ecc.... stringa
>
> Ciao Simba883
>
>
dimenticavo alla fine dell'invio
esegui una query di aggiornamento che rimetta a 0 il campo "selezionato" di
tutti i record
Ciao Simba883


title: Prelevare dati da 1 maschera

text:
> Gli ho spiegato che una maschera trae origine da una tabella o query ma
> non riesco a raccogliere i dati di un campo di una maschera che si trovano
> all'interno di un testo da qualche parte (lista a tendina etc...) perchè
> essi sono dei record veri e propri e non essendoci numerazione progressiva
> sui testi non posso fare neanche un ciclo per raccoglierne i valori.
>
> Mi date una mano per favore nel risolvere questo quesito?
>
> Grazie mille
>
> Marianna
a quanto ho capito devi poter selezionare i record a cui spedire un email
allora aggiungi un campo "selezionato" di tipo si/no alla tabella con le
email
poi crei una maschera che visualizza in modalità continua i record
poi scegli i record a cui inviare l'email cliccando sul campo di selezione
"selezionato"
infine esegui un ciclo for per costruire la stringa di email ovvero
selezioni un recorset dalla tabella solo dei record con campo "selezionato"
a -1
select email from tuatabella where selezionato=-1
poi
dim stringa
dim i
rs.movefirst
for i = 1 to rs.recordcount
    if i =1 then
        stringa=rs!email
    else
        stringa=stringa & ";" & rs!email
    end if
    rs.movenext
next i



title: Prelevare dati da 1 maschera

text:
"Simba883" <
simb...@libero.it
> ha scritto nel messaggio
news:425cd7e1$0$11716$5fc...@news.tiscali.it...

Grazie lo stesso per i tuoi suggerimenti ma non è questo che vuole il mio
amico, non vuol sentire parlare di tabelle o query o modificare le stesse.
Lui preleva i dati da diverse query e/o tabelle e quindi non vuole
modificare esse stesse ma solo raccogliere dalle maschere che di volta in
volta vengono aperte gli indirizzi email per poi selezionarli e spedirli.
Bisognerebbe trovare una procedura che mi consenta di prelevare i dati da
una maschera (una qualsiasi insomma) per poi applicarla a tutte le
successive maschere per raggiungere quest'obiettivo.
Spero di essere stata chiara
Grazie comunque
Marianna


title: Prelevare dati da 1 maschera

text:
> Bisognerebbe trovare una procedura che mi consenta di prelevare i dati da
> una maschera (una qualsiasi insomma) per poi applicarla a tutte le
> successive maschere per raggiungere quest'obiettivo.
>
> Spero di essere stata chiara
>
> Grazie comunque
>
> Marianna
dichiari una variabile globale in un modulo
Public stringa
poi su evento doppio click di ogni form aperta metti il seguente codice
if stringa="" then
    stringa=me.email
else
    stringa=stringa & ";" & me.email
endif
in questo modo facendo doppio click sui vari record interessati delle varie
form
la variabile globale stringa verrà costruita e poi su click di un pulsante
eseguite il sendobject
se non gli và bene cosi non saprei
P.S. non postare più volte la stessa identica domanda Grazie.
ciao. Simba883


title: Prelevare dati da 1 maschera

text:
"Simba883" <
simb...@libero.it
> ha scritto nel messaggio
news:425ced60$0$11722$5fc...@news.tiscali.it...

Grazie mille e scusa pensavo che non mi rispondessi più! :-(
Marianna


title: piccoli intervalli

author: HapPy

text:
Ancora un cordiale saluto
l'attuale problema è banalissimo, ma intrigante... almeno credo:
    Me.testo1.Visible = True
    Me.testo2.Visible = True
    Me.testo3.Visible = True
    Me.testo4.Visible = True
    etc......
sono una serie di testi che vorrei si "accendessero" con piccoli intervalli
l'uno dopo l'altro per una piccola coreografia.
come potrei fare?
Ancora grazie,
Antonio


title: piccoli intervalli

author: Marco Pizzamiglio

text:
HapPy ha scritto:


1. Dichiari un contatore a livello di modulo (fuori dalle sub)
  dim n as integer
2. All'apertura della maschera (o quando vuoi far partire l'effetto)
inizializzi il contatore e fai partire il timer:
  n=1
  me.timerinterval=700 'in millesimi di secondo
3. Sull'evento Form_Timer rendi visibile un controllo e incrementi il
contatore, interrompendo il ciclo quando hai reso visibile l'ultimo
controllo (NUM è il numero dell'ultimo controllo):
  me.controls("testo" & format(n,"0")).visible = true
  n=n+1
  if n > NUM then me.timerinterval=0
Puoi usare lo stesso sistema anche per cambiare il colore di sfondo, il
tipo carattere, ecc...
Ciao.
-Marco-
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: piccoli intervalli

text:
Marco Pizzamiglio ha scritto:
> HapPy ha scritto:



>   dim n as integer





..oppure usi Powerpoint, è fatto apposta per queste cose!



title: piccoli intervalli

text:
"Marco Pizzamiglio" <
marco.pi...@gmail.com
> ha scritto nel messaggio
news:gsnjsq$dig$1...@news.newsland.it...
> Marco Pizzamiglio ha scritto:
>
>> HapPy ha scritto:
>
>> > Ancora un cordiale saluto
>> > l'attuale problema č banalissimo, ma intrigante... almeno credo:
>
>> >     Me.testo1.Visible = True
>> >     Me.testo2.Visible = True
>> >     Me.testo3.Visible = True
>> >     Me.testo4.Visible = True
>> >     etc......
>> > sono una serie di testi che vorrei si "accendessero" con piccoli
> intervalli
>> > l'uno dopo l'altro per una piccola coreografia.
>> > come potrei fare?
>> > Ancora grazie,
>> > Antonio
>
>
>> 1. Dichiari un contatore a livello di modulo (fuori dalle sub)
>
>>   dim n as integer
>
>
>> 2. All'apertura della maschera (o quando vuoi far partire l'effetto)
>> inizializzi il contatore e fai partire il timer:
>
>>   n=1
>>   me.timerinterval=700 'in millesimi di secondo
>
>
>> 3. Sull'evento Form_Timer rendi visibile un controllo e incrementi il
>> contatore, interrompendo il ciclo quando hai reso visibile l'ultimo
>> controllo (NUM č il numero dell'ultimo controllo):
>
>>   me.controls("testo" & format(n,"0")).visible = true
>>   n=n+1
>>   if n > NUM then me.timerinterval=0
>
>
>> Puoi usare lo stesso sistema anche per cambiare il colore di sfondo, il
>> tipo carattere, ecc...
>> Ciao.
>> -Marco-
>
>
> ..oppure usi Powerpoint, č fatto apposta per queste cose!
> Ciao.
> -Marco-
>
>
> --
>
> questo articolo e` stato inviato via web dal servizio gratuito
>
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it
>
Grazie per la risposta rapidissima, ma non sono riuscito a metterla a frutto
Spiego meglio il problema:
al clic di un pulsante deve accendersi il controllo testo1
dopo un secondo, il testo2 e cosě fino al testo6 e poi stop.
Io ho fatto cosě:
Option Compare Database
Dim n As Integer
Private Sub Comando2_Click()
n = 1
Me.TimerInterval = 1000
End Sub
Private Sub Form_Timer()
Me.Controls("ok1" & Format(n, "0")).Visible = True
n = n + 1
If n > 1 Then Me.TimerInterval = 0
End Sub
 ... ma non so andare avanti.
Hai qualche consiglio?
Grazie,
Antonio


title: piccoli intervalli

text:
HapPy ha scritto:

> Grazie per la risposta rapidissima, ma non sono riuscito a metterla a frutto
> Spiego meglio il problema:
> al clic di un pulsante deve accendersi il controllo testo1
> dopo un secondo, il testo2 e cosě fino al testo6 e poi stop.
> Io ho fatto cosě:
> Option Compare Database
> Dim n As Integer
> Private Sub Comando2_Click()
> n = 1
> Me.TimerInterval = 1000
> End Sub
> Private Sub Form_Timer()
> Me.Controls("ok1" & Format(n, "0")).Visible = True
> n = n + 1
> If n > 1 Then Me.TimerInterval = 0
> End Sub
>  ... ma non so andare avanti.
> Hai qualche consiglio?
> Grazie,
> Antonio
Come si chiamano i controlli da accendere? testo1, testo2, ecc...?
Allora questo non va: Me.Controls("ok1" & ...
Devi usare: Me.Controls("testo" & ...
E se ne hai 6 devi cambiare anche il numero nell'if, sennň ti si accende
solo il primo: If n > 6 Then .....
Il resto va bene.



title: piccoli intervalli

author: Pablitomf

text:
Public n as integer
Private Sub Comando2_Click()
n = 1
Me.TimerInterval = 1000
End Sub
Private Sub Form_Timer()
Me.Controls("testo" & n).Visible = True
n = n + 1
If n > 6 Then Me.TimerInterval = 0
End Sub
--
---
Ciao
Pablitomf
FORZA NAPOLI - - - SEMPRE!
Tifosi Napoletani, gente fantastica
http://it.youtube.com/watch?v=gUqFHOXrK-M&feature=related
"HapPy" <
nibb...@tin.it
> ha scritto nel messaggio
news:49f0824d$0$1122$4faf...@reader1.news.tin.it...


title: piccoli intervalli

author: Franchi Graziano & Famiglia

text:
"Pablitomf" <
pabl...@hotmail.it
> ha scritto nel messaggio
news:gsq8a9$bne$1...@tdi.cu.mi.it...
> Public n as integer
>
> Private Sub Comando2_Click()
> n = 1
> Me.TimerInterval = 1000
> End Sub
>
> Private Sub Form_Timer()
> Me.Controls("testo" & n).Visible = True
> n = n + 1
> If n > 6 Then Me.TimerInterval = 0
> End Sub
Private Sub Comando2_Click()
  n = 0
  Me.TimerInterval = 1000
End Sub
Private Sub Form_Timer()
  n = n + 1
  If n > 6 Then n = 1
  Me.Controls("testo" & n).Visible = Not (Me.Controls("testo" & n).Visible)
End Sub
Prova FUNZIONA
Ciao
Graziano


title: Errore SQL

author: cumenda

text:
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
[Microsoft][ODBC Microsoft Access 97 Driver] Syntax error (missing operator)
in query expression.....
Su win2000 sp2 - IIS 5 non ottengo nessun errore
Il problema si presenta su Nt4svr sp6 - IIS 4
Puň essere un problema di MDAC o Jet? Se sě, che versione devo installare?
P.S. Il database č access formato 97.
grazie e ciao
cumenda


title: Errore SQL

author: Luciano (DOC)

text:
"cumenda" <
ygwy...@yahoo.it
> ha scritto nel messaggio
news:9pv1p0$jcj$1...@pegasus.tiscalinet.it...
> [Microsoft][ODBC Microsoft Access 97 Driver] Syntax error (missing
operator)
> in query expression.....
> Puň essere un problema di MDAC o Jet? Se sě, che versione devo installare?
A occhio di dire di no, dice missing operator....
Controlla l'sql.
Saluti.
Luciano


title: Conversione Access2000 ---> Access97

text:
Cari amici,
tempo fa' ho realizzato un'applicazione in Access97.
Successivamente ho migrato questa applicazione in ambiente
Access2000 apportando alcune modifiche non legate alla nuova
applicazione. Ho la necessita' di riportare il database in Access97
senza avere a disposizione Access2000. Sapete se esiste una
funzione o un programma che permetta di effettuare questa
operazione. Grazie a tutti.
   Linus

   mailto:
p.ant...@tno.it

--
Posted from
sirio.tno.it
 [138.66.200.5]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Conversione Access2000 ---> Access97

author: Carlo Ve

text:
p.ant...@tno.it
 ha scritto nel messaggio
<
200006191715...@sirio.tno.it
>...
Cari amici,
tempo fa' ho realizzato un'applicazione in Access97.
Successivamente ho migrato questa applicazione in ambiente
Access2000 apportando alcune modifiche non legate alla nuova
applicazione. Ho la necessita' di riportare il database in Access97
senza avere a disposizione Access2000. Sapete se esiste una
funzione o un programma che permetta di effettuare questa
operazione. Grazie a tutti.
Mi sa che ti devi procurare A2000 per forza se vuoi
convertirle il tuo db alla versione 97
Carlo Ve


title: Conversione Access2000 ---> Access97

author: ema

text:
Mio cuggino mi ha detto che
p.ant...@tno.it
 scrisse:
> Access2000 apportando alcune modifiche non legate alla nuova
> applicazione. Ho la necessita' di riportare il database in Access97
> senza avere a disposizione Access2000. Sapete se esiste una
> funzione o un programma che permetta di effettuare questa
> operazione. Grazie a tutti.
>
sorry, ma scordatela.
bye!
--
Emanuele Cesena
http://www.penguinpowered.com/~ecesena
<
ece...@penguinpowered.com
> - rimuovi XXX x rispondere    ICQ #8814554
Troppo spesso la saggezza e' solamente la prudenza piu' stagnante,
e quasi sempre dietro la collina e' il sole.
		-- Battisti-Mogol, "La collina dei ciliegi"


title: Eliminazione relazione

author: Ferrari Rino

text:
Salve
Come poter eliminare una Relazione tra due tabelle da codice?
Mi hanno indicato <F1>Relations per l'uso del metodo Delete
ma non riesco a trovare l'esempio  indicatomi per il metodo
Delete
Grazie
Ferrari Rino


title: IIf su criteri query

text:
Sto creando una query di access 2003 e sui criteri vorrei dire: chiedimi un
parametro se il parametro è "a" il filtro non deve esserci e mostrami tutti
i valori mentre se è diverso da "a" filtra per il parametro.
Ho all'inizio scritto sui criteri della query:  iif([richiesta parametro]="a";"*";[
richiesta parametro]).
Ora se inserisco il parametro funziona ma non riesce a capire la condizione
vera. Ho provato vari caratteri jolly o condizioni ma entro la funzione iif
non mi funziona niente neanche > o <>. Come posso risolvere?
Grazie


title: IIf su criteri query

author: Karl Donaubauer

text:

www.donkarl.com/it
 FAQ 3.14 Criterio che restituirà tutti i record
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: Conversione Access2000 a SQL 2000

author: Red Foxy

text:
Ciao a tutti, ci sono programmi per la conversione completa senza problemi
da Access2000 a SQL 2000?
Non uso query parametriche e ho pochi campi memo che posso eliminare o
convertire in un altro formato...
Non includo ogetti ole o capi tipo link-ipertestuali...
Con il mioglio programma che conoscete per la conversione (anche da
comprare), quanta % perderei (inteso come dati da sistemare) del db da
convertire?
--
Massimo "Red Foxy" Ciccio'
Home Page:
http://www.redfoxy.go.to/
ICQ: 65721997
Fax: 1782217407
http://www.intelliad.com/?244F5F07
 <-- Iscrivetevi subito!!!
.o0 Dentro ognuno di noi c'e' un animale, sta' a noi scoprirlo e domarlo 0o.


title: Re: Maschera-Chiave di ricerca

author: MA

text:
>> ...
>> > Ciao, è possibile associare a delle query una
>> chiave di ricerca
>> > selezionata da una tabella combinata in un
>> maschera?? Se si,
>> > come?
>> > grazie
>> >
>> > Ste.
>> Ehm... non sei stato chiarissimo.
>> Spiega con maggiore calma quello che vuoi ottenere
>> MAssimiliano
>>
>>
>
> Scusate, vedo di essere più chiaro... in questo momento ho una
> serie di query tramite le quali impostando un parametro di
> ricerca ottengo delle informazioni che vengono poi inserite in
> un report... quello che vorrei fare è selezionare la chiave di
> ricerca direttamente da una casella di riepilogo/combinata
> presente in una maschera senza dover ogni volta digitare la
> chiave stessa e poi lanciare la stampa del report...
> grazie
Ci provo, perchè ancora non ho capito fino in fondo.
Tu hai iuna maschera Pippo.
Lì ci vuoi mettere una casella combinata cboPluto.
Sul valore restituito da quella lancire un report che ha come origine
una serie di query.
Se è così ti basterà mettere come criterio delle query
forms!Pippo!cboPluto.
Se non è così fai un altro sforzo per chiarire.
Se invece è così, voglio far presente a Roberto, che quella partita di palle
di cristallo di cui gli ho parlato, funzionano e visto che la sua è in
assistenza da tempo, se mi contatttagli faccio un prezzo di favore.
;-P
MAssimiliano


title: Re: Maschera-Chiave di ricerca

author: fx

text:
Ciao, è possibile associare a delle query una chiave di ricerca
selezionata da una tabella combinata in un maschera?? Se si,
come?
grazie
Ste.
--
Inviato da Virgilio
http://newsgroup.virgilio.it
Filtra gli antipatici, segnala le risposte, segue i thread, e tutto da web


title: Re: Maschera-Chiave di ricerca

text:
"fx" <
utente_virgi...@virgilio.it
> ha scritto nel messaggio
news:18466819.1109004279822.JavaMail.newsgroup@sc-ng-1...
> Ciao, è possibile associare a delle query una chiave di ricerca
> selezionata da una tabella combinata in un maschera?? Se si,
> come?
> grazie
>
> Ste.



title: Re: Maschera-Chiave di ricerca

text:
MA ha scritto:

Scusate, vedo di essere più chiaro... in questo momento ho una
serie di query tramite le quali impostando un parametro di
ricerca ottengo delle informazioni che vengono poi inserite in
un report... quello che vorrei fare è selezionare la chiave di
ricerca direttamente da una casella di riepilogo/combinata
presente in una maschera senza dover ogni volta digitare la
chiave stessa e poi lanciare la stampa del report...
grazie



title: Re: Maschera-Chiave di ricerca

author: sv

text:
fx ha scritto:
> MA ha scritto:
> >
> > "fx" <
utente_virgi...@virgilio.it
> ha
> > scritto nel messaggio
> > news:18466819.1109004279822.JavaMail.newsgroup@sc-ng-1
> > ...
> > > Ciao, č possibile associare a delle query una
> > chiave di ricerca
> > > selezionata da una tabella combinata in un
> > maschera?? Se si,
> > > come?
> > > grazie
> > >
> > > Ste.
> > Ehm... non sei stato chiarissimo.
> > Spiega con maggiore calma quello che vuoi ottenere
> > MAssimiliano
> >
> >
> Scusate, vedo di essere piů chiaro... in questo momento ho una
> serie di query tramite le quali impostando un parametro di
> ricerca ottengo delle informazioni che vengono poi inserite in
> un report... quello che vorrei fare č selezionare la chiave di
> ricerca direttamente da una casella di riepilogo/combinata
> presente in una maschera senza dover ogni volta digitare la
> chiave stessa e poi lanciare la stampa del report...
> grazie
Oltre al suggerimento di Massimiliano prova a leggere:
http://www.donkarl.com/it/
FAQ 5.9
--
rgrds
SC
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Cerco programmatore access

author: AP

text:
Per aggiungere funzionalita' a una applicazione in access.
Zona sud milano
scrivere a
info-chiocciola-minuterie-tornite.com
--
www.iaciners.org


title: quesito su report

author: Frank

text:
ciao a tutti!
un piccolo problema con i report:
ho due tabelle: una con un campo data e l'altra con altri campi raccordati
alla prima tabella con un collegamento classico uno a molti dove la parte 1
č sulla tabella contenente la data.
ho impostato una maschera che mi permette di selezionare un intervallo di
data (per es. 5 giorni a partire da un giorno specifico) da stampare. su un
report. il mio problema č che di questo intervallo di dati (estratti con una
query) non deve mai essere stampato il primo valore estratto
come posso fare?
io pensavo di impostare una routine durante la formattazione del report, ma
non ho la piů pallida idea di COSA impostare! qualcuno puň darmi una mano???
grazie
Carlo


title: quesito su report

text:

Se i record della tua sottomaschera sono ordinati con un id, findfirst(ati)
il primo e rowsource(ati) la sottomaschera con un id maggiore (oltre al
criterio della data).
ciao MAssimiliano
--------------------------------
Inviato via
http://usenet.libero.it