title: Gantt per Access

text:
Si lo avevo guardato per bene... quando avevo iniziato a voler fare un sistema di GANTT personalizzato, lo avevo contattato qualche anno fa, forse 2, mi aveva mandato un Demo Compilato, ma mi aveva spiegato la tecnica nel dettaglio, l'ho cercato ma non lo trovo più...

E' impressionante quanto è veloce... ed è incredibile in quanto si tratta di un'IMMAGINE, nella sostanza disegna tutto via API.

E' un gran lavoro, tecnicamente parlando per chi come me "studia" queste cose, è veramente fantastico... tuttavia non so quanto sia facilmente personalizzabile.

Come sai ho fatto qualche sperimentazione in questo ambito, questi sono un po di lavori su cui puoi giocare, ovviamente da autogestire:
https://1drv.ms/f/s!ALe2sGzrs4WChm4

Il GANT_ACTIVEX è molto complesso, si basa sul demo del TREEVIEW di Peter Thornton da cui ho avuto autorizzazione alla pubblicazione... non è finito, nel senso che c'è qualche BACO, non complicato da sistemare, ma non ho più avuto il tempo di lavorarci, secondo me sarebbe un gran lavoro tempo permettendo, ma nell'insieme non è affatto banale come complessità.

Gli altri sono più accessibili, e per accessibili mi riferisco principalmente alla manutenibilità nel tempo.

In un lavoro che feci una decina di anni fa, avevo usato la FlexGrid Activex, che per quanto serviva a me, era proprio una gestione prenotazioni alberghiera, era ottima, oggi quell'activex come tutti gli OCX a 32Bit non danno grandi speranze...

Ciao
@Alex


title: Gantt per Access

author: RobertoA

text:

Allora il tipo ha risposto
Sembra che possa fornire il programma in  "..fully editable version.."
ad un costo molto contenuto, meno di 100 euro tanto per inquadrare
A questo punto il 'cosa fa' mi sembra accettabile
Il 'quanto' mi sembra piu' che invitante
Resta da capire se viene fornito realmente il prodotto coi sorgenti
oppure ci sono parti che restano non modificabili
A questo scopo avevo scritto, per capire se qualcun avesse gia' avuto a
che fare con questo prodotto/produttore e se e' rimasto stato
soddisfatto dell'acquisto


title: Gantt per Access

text:
> Allora il tipo ha risposto
> Sembra che possa fornire il programma in  "..fully editable version.."
> ad un costo molto contenuto, meno di 100 euro tanto per inquadrare
> A questo punto il 'cosa fa' mi sembra accettabile
> Il 'quanto' mi sembra piu' che invitante
> Resta da capire se viene fornito realmente il prodotto coi sorgenti
> oppure ci sono parti che restano non modificabili
> A questo scopo avevo scritto, per capire se qualcun avesse gia' avuto a
> che fare con questo prodotto/produttore e se e' rimasto stato
> soddisfatto dell'acquisto

Il costo in se non è alto... la fruibilità però credo sia tale da richiedere un discreto impegno.
Sempre se ricordo bene, usa la CLASSE di Lebans che Emula la PictureBox per gestire la grafica...
Se ti piacciono API ed Alveari è certamente un buon mezzo per averne bisogno... io ci giocherei ;-)

Nel caso quindi accertati della compatiblità 32/64Bit

@Alex


title: Gantt per Access

text:

Le api biologiche mi sono simpatiche, quelle software mica tanto
Certo che se rendono possibile incrementi prestazionali di qualche
ordine di grandezza (come il bitBlit del vb anni fa) allora ce le
facciamo piacere
Mi dice che esiste sia la versione per ambiente a 32 che 64 bit
Ho il demo in accde di entrambe
Risoluzione minima al giorno, e nel mio caso e' troppo grossolana
Quindi dovrei aggiungere nella barra orizzontale oltre a settimana e
giorni almeno ore e minuti


title: Gantt per Access

text:
Non ho idea di cosa possa significare la personalizzazione di quello che dici... ma immagino non sia immediato.

Come ti dicevo ha performance incredibili ma il resto richiede impegno e non è detto sia fattibile per tutti.

@Alex


title: Gantt per Access

text:

Eh va beh, mica l'avra' fatto un alieno 'sto programma
Il punto importante e' avere i sorgenti
Se c'e' il codice, un po' alla volta si comprende
Ho deciso di provarlo, mal che vada chiedo aiuto


title: Gantt per Access

text:
No sicuramente è fattibile... in modo relativo...

Se fornirai i sorgenti magari ti aiutiamo ehehehe ;-)

@Alex


title: Gantt per Access

author: ciroteo

text:
Interessante, vi seguo.
Come alex sa anche io sono alla ricerca di un gannt fruibile in access.
Per ora abbiamo un planner in vb fornito da un esterno.

Se dovesse servire un contributo per l'investimento ci sto.
m



title: Gantt per Access

text:

Se fossero realmente disponibili i sorgenti, e se l'autore consentisse
un adeguamento del codice anche per altri utilizzi, credo il costo non
sia un problema per nessuno, anche in considerazione del fatto che
sistemi alternativi sono discretamente piu' costosi ma soprattutto non
ti danno i sorgenti (se non in cambio di rene e milza)
Tenete in caldo le tastiere, vi aggiorno appena possibile


title: Gantt per Access

text:
...
> Se fossero realmente disponibili i sorgenti, e se l'autore consentisse
> un adeguamento del codice anche per altri utilizzi, credo il costo non
> sia un problema per nessuno, anche in considerazione del fatto che
> sistemi alternativi sono discretamente piu' costosi ma soprattutto non
> ti danno i sorgenti (se non in cambio di rene e milza)
> Tenete in caldo le tastiere, vi aggiorno appena possibile

Una volta che hai il SORGENTE, l'autore ti ha autorizzato implicitamente a poterlo modifiare e personalizzare... ci mancherebbe... e sono certo che nel caso sarà anche disponibile al supporto, ovvio non intendo sviluppo....

Quando ho avuto modo di scabiare con lui qualche mail mi è parso molto disponibile oltre che tecnicamente bravo.

@Alex


title: Gantt per Access

text:

Si certo
Mi riferivo alla possibilita' di condividerlo


title: Gantt per Access

text:
...
> Si certo
> Mi riferivo alla possibilita' di condividerlo

Questo potrebbe essere un buon esercizio... possiamo parlarne sicuramente...

@Alex


title: Gantt per Access

text:

Valutando la complessità della faccenda e i dubbi sul funzionamento futuro della medesima (gira in Access 64 bit?), mi chiedo se non sia preferibile appoggiarsi ad applicazioni ad hoc preesistenti, peraltro di estrema completezza, come MS Project (che peraltro dovrebbe essere pilotabile tramite automazione OLE da Access).

Saluti


title: Gantt per Access

text:

Si, anche questa e' una possibilita', e di tutto rispetto
Ma Project non e' che te lo tirano dietro, mi sembra stia sui 800-900
euro la standard e 1400 circa la professional, se immagini un ufficio
reception camping con tre postazioni, gia' attrezzare un sistema
minuscolo come questo comporta una spesa non indifferente solo di licenze
In secondo luogo sembrerebbe di usare un bazooka per tirare ad una mosca
Se fosse disponibile un sistema piu' scarno come funzionalita', ma piu'
leggero come impiego risorse ed apprendimento, sarebbe ancora meglio


title: Gantt per Access

text:
> Si, anche questa e' una possibilita', e di tutto rispetto
> Ma Project non e' che te lo tirano dietro, mi sembra stia sui 800-900
> euro la standard e 1400 circa la professional, se immagini un ufficio
> reception camping con tre postazioni, gia' attrezzare un sistema
> minuscolo come questo comporta una spesa non indifferente solo di licenze
> In secondo luogo sembrerebbe di usare un bazooka per tirare ad una mosca
> Se fosse disponibile un sistema piu' scarno come funzionalita', ma piu'
> leggero come impiego risorse ed apprendimento, sarebbe ancora meglio

L'unico problema in effetti è che le versioni Standard non lo hanno... MSPj

Ovviamente serve una disamina di PRO-CONTRO... perchè programmare via Automazione MsPj non è proprio una cosa banale... ma sicuramente non hai problemi nel tempo.

Io però il mio giochetto lo trovo quasi meglio ;-)
https://1drv.ms/u/s!ALe2sGzrs4WChnI

@Alex


title: Gantt per Access

text:
>
> Io però il mio giochetto lo trovo quasi meglio ;-)
>
https://1drv.ms/u/s!ALe2sGzrs4WChnI

Beh, servirebbe una guida per capire cosa scaricare   ;-)

Quanto c'hai messo a realizzare tali "giochetti"?


title: Gantt per Access

text:

Quando si gioca, o in generale ci si diverte, il tempo assume una durata
diversa dal normale fluire
Se giochi passa subito, se fatichi non passa mai


title: Gantt per Access

text:
> >
> Quando si gioca, o in generale ci si diverte, il tempo assume una durata
> diversa dal normale fluire
> Se giochi passa subito, se fatichi non passa mai

Interessante, quindi ho capito male e sei tu l'autore dei giochetti?


title: Gantt per Access

text:

Parlavo in generale
No, non sono io l'autore


title: Gantt per Access

text:
> >> Quando si gioca, o in generale ci si diverte, il tempo assume una durata
> >> diversa dal normale fluire
> >> Se giochi passa subito, se fatichi non passa mai

> > Interessante, quindi ho capito male e sei tu l'autore dei giochetti?

> Parlavo in generale
> No, non sono io l'autore

Se non sei tu l'autore lascia che sia Alessandro a dirci quanto tempo c'ha messo e magari filosofeggiare sulla relatività del tempo.

Saluti


title: Gantt per Access

text:
Ciao Simone, inutile dire che il bilancio tempo/soldi è assolutamente negativo ;-)
Il demo in oggetto nasce dal progetto Treeview di Torthon e per capire come funzionava ho impiegato qualche settimana, purtroppo o per fortuna faccio altro ed il tempo notturno, che ahimè mi fa arrabbiare..., da dedicare a queste cose sarebbe meglio riuscire a dormire...
In ogni caso per la non immediatezza della logica OOP usata molto bene serve studiarlo.
Poi ho iniziato a modificarlo, sempre a tempo perso... un mesetto buono...
Tuttavia ha gadget che a mio avviso lo rendono un prodotto potenzialmente importante ad aver voglia e tempo di terminarlo... Certo dovrei campare con questi "giochini" ;-)

Saluti
@Alex


title: digitalizzatore vocale

text:
è possibile secondo voi far leggere a visual basic vocalmente lettera per
lettera il contenuto di una text box?
se per esempio scrivo la parola MARCO secondo voi è possibile fare in modo
che il computer magari atteraverso un ocx
legga la parola MARCO e se scrivo STEFANO pronunci vocalmente la parola
STEFANO?
Grazie a tutti .


title: digitalizzatore vocale

author: All Eyez On me

text:
"Tosto73" <
tos...@libero.it
> ha scritto nel messaggio
news:ZXW88.43572$nI1.1...@twister1.libero.it...

Certo devi usare le librerie sapi
AEOM


title: Controllo TreeView

author: Nicoletta

text:
Ho creato dei nodi da gestire con il controllo treeview.
Tutto ok tranne un particolare per me importante
Con il doppio clic sulle descrizioni, si apre correttamente il nodo
lasciandomi vedere eventuali child. Quando arrivo all'ultimo child (dove
sotto non potrei piů andare non avendo altri elementi), vorrei gestire il
doppio clic per eseguire una determinata operazione. Purtroppo (verificato
anche con il debug) non riesco ad intercettare l'evento.
Qualcuno puň aiutarmi?
Grazie
Nicky


title: Controllo TreeView

author: Paolo Beltrame

text:
"Nicoletta" <
for...@virgilio.it
> ha scritto nel messaggio
news:CtdY5.7233$x_2.4...@twister1.tin.it...

E' sufficiente che tu ti scriva manualmente la sub di evento:
Private Sub NomeControllo_DblClick(Cancel As Integer)
che non viene mostrata nelle proprieta' del controllo tree
view.
    Paolo


title: Controllo TreeView

text:
"Paolo Beltrame" <
ita...@agemont.it
> ha scritto nel messaggio
news:bAeY5.61216$IP1.1...@news1.giganews.com...
>
> "Nicoletta" <
for...@virgilio.it
> ha scritto nel messaggio
> news:CtdY5.7233$x_2.4...@twister1.tin.it...
> > Ho creato dei nodi da gestire con il controllo treeview.
> > Tutto ok tranne un particolare per me importante
> >
> > Con il doppio clic sulle descrizioni, si apre correttamente il nodo
> > lasciandomi vedere eventuali child. Quando arrivo all'ultimo child (dove
> > sotto non potrei più andare non avendo altri elementi), vorrei gestire
il
> > doppio clic per eseguire una determinata operazione. Purtroppo
(verificato
> > anche con il debug) non riesco ad intercettare l'evento.
> >
>
> E' sufficiente che tu ti scriva manualmente la sub di evento:
>
> Private Sub NomeControllo_DblClick(Cancel As Integer)
>
> che non viene mostrata nelle proprieta' del controllo tree
> view.
>
>     Paolo
>
>
Funziona perfettamente, ma non deve esserci il parametro.
Mi hai fatto venire un dubbio; ci sono altri eventi "nascosti" sui controlli
?
Grazie
Nicky


title: Trovare un record

author: Mik Mark

text:
Ciao,
    una domanda: se io uso il findfirst per trovare un record, dovreebbe
posizionarsi su quel record.
Quindi se poi io lo cancello dovrebbe cancellarmi il record trovato e non il
primo. Giusto?
strCriteria = "[IDPresenze] =" & Me!IDPresenze.Value
Rst.FindFirst strCriteria
Rst.Delete
Ma allora perchè mi cancella sempre il primo record?
                Mik


title: Trovare un record

author: Roberto dal portatile

text:
"Mik Mark" <
marcheso...@trentino.net
> ha scritto nel messaggio
news:9k3ftk$ub7$1...@news.flashnet.it...
> Ciao,
>     una domanda: se io uso il findfirst per trovare un record, dovreebbe
> posizionarsi su quel record.
> Quindi se poi io lo cancello dovrebbe cancellarmi il record trovato e non
il
> primo. Giusto?
>
> strCriteria = "[IDPresenze] =" & Me!IDPresenze.Value
> Rst.FindFirst strCriteria
> Rst.Delete
>
> Ma allora perchč mi cancella sempre il primo record?
>
>                 Mik
Probabilmente FindFirst non riesce a trovare alcun record che soddisfi i
criteri, quindi il BookMark del recordset resta posizionato sul primo record
che viene cosě cancellato.
Verifica l'esito della ricerca con NoMatch (vedi help), e cancella il record
solo se la ricerca ha avuto esito positivo.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: prestazioni scadenti in multiutenza

author: Simone Calligaris

text:
"massimo"
> Sui client con NT4 e Access97 le prestazioni sono buone (azzarderei
> ottime). I frontend con W2000 e Access2000, invece, vanno come
> lumache. Ho addirittura una postazione con XP e Access XP. In questo
> Ho trovato questa pagina in Rete.
>
http://www.granite.ab.ca/access/performancefaq.htm
> Microsoft Access Performance FAQ
> Mi stavo chiedendo dove sono queste caselle nella versione italiana
> di Access...
> - sub datasheet Name property set to [Auto] should be [None]
Proprietą struttura tabella: Fogli dati secondari espansi.
> - Track name AutoCorrect should be off
Correzione automatica (ma non serve se i FE sono .MDE)
> Inoltre faccio fatica a capire il significato di
> - LDB locking which a persistent recordset connection fixes
Vedi Help "migliorare prestazioni di tabelle collegate".
In sostanza devi tenere permanentemente collegato il FE al BE (con una
variabile recordset globale aperta oppure una mascherina nascosta connessa
alla base dati).
> Secondo voi, a prescindere dai palliativi(*), migliorerei la
> situazione convertendo il backend in formato Access2000 e installando
> Access2000 in tutte le postazioni?
Secondo me migliora, la soluzione mista che riferisci non mi piace.
Ma non sottavalutare i palliativi: sono molto efficaci, soprattutto il
secondo (direi essenziale).
Saluti.


title: prestazioni scadenti in multiutenza

author: massimo

text:
On 21 ago 2003, "Simone Calligaris" <
simo...@libero.it
> wrote in
news:gP61b.255648$
Ny5.7...@twister2.libero.it

> Vedi Help "migliorare prestazioni di tabelle collegate".
> In sostanza devi tenere permanentemente collegato il FE al BE
> (con una variabile recordset globale aperta oppure una
> mascherina nascosta connessa alla base dati).
Ok. Dalla guida leggo...
Č possibile migliorare notevolmente le prestazioni quando si aprono
il database principale e le tabelle e le maschere forzando il
database collegato in modo che rimanga aperto. A tal fine, creare una
tabella vuota nel database collegato e collegarla al database
principale, quindi utilizzare il metodo OpenRecordset per aprire la
tabella collegata. Ciň impedisce che il modulo di gestione di
database Microsoft Jet apra e chiuda piů volte il database collegato
e crei e distrugga il file con estensione ldb associato.
Ho creato quindi una maschera swap con base di dati una tabella
collegata al BE chiamata altresě swap. Nel VBA della maschera ho
scritto
Option Compare Database
Public rsAlwaysOpen As Recordset
Private Sub Form_Close()
rsAlwaysOpen.Close
Set rsAlwaysOpen = Nothing
End Sub
Private Sub Form_Open(Cancel As Integer)
Set rsAlwaysOpen = CurrentDb.OpenRecordset("swap")
End Sub
Purtroppo aprendo la maschera ottengo l'errore run-time 13 "tipo non
corrispondente". Premetto che ho  inserito dao 3.6 nei riferimenti.
Dove ho sbagliato?
Inoltre come posso fare per nascondere la maschera una volta aperta?


title: prestazioni scadenti in multiutenza

text:
On 21 ago 2003, "Simone Calligaris" <
simo...@libero.it
> wrote in
news:gP61b.255648$
Ny5.7...@twister2.libero.it

> Vedi Help "migliorare prestazioni di tabelle collegate".
> In sostanza devi tenere permanentemente collegato il FE al BE
> (con una variabile recordset globale aperta oppure una
> mascherina nascosta connessa alla base dati).
Ok. Dalla guida leggo...
Č possibile migliorare notevolmente le prestazioni quando si aprono
il database principale e le tabelle e le maschere forzando il
database collegato in modo che rimanga aperto. A tal fine, creare una
tabella vuota nel database collegato e collegarla al database
principale, quindi utilizzare il metodo OpenRecordset per aprire la
tabella collegata. Ciň impedisce che il modulo di gestione di
database Microsoft Jet apra e chiuda piů volte il database collegato
e crei e distrugga il file con estensione ldb associato.
Ho creato quindi una maschera swap con base di dati una tabella
collegata al BE chiamata altresě swap. Nel VBA della maschera ho
scritto
Option Compare Database
Public rsAlwaysOpen As dao.Recordset
Private Sub Form_Close()
rsAlwaysOpen.Close
Set rsAlwaysOpen = Nothing
End Sub
Private Sub Form_Open(Cancel As Integer)
Set rsAlwaysOpen = CurrentDb.OpenRecordset("swap")
End Sub
Ho  inserito dao 3.6 nei riferimenti.
Ora come posso fare per nascondere la maschera una volta aperta? Non
potrei usare allo scopo lo stesso quadro comandi principale?
Grazie per l'aiuto.


title: prestazioni scadenti in multiutenza

text:
"massimo"
> Option Compare Database
> Public rsAlwaysOpen As Recordset
> Private Sub Form_Close()
> rsAlwaysOpen.Close
> Set rsAlwaysOpen = Nothing
> End Sub
> Private Sub Form_Open(Cancel As Integer)
> Set rsAlwaysOpen = CurrentDb.OpenRecordset("swap")
> End Sub
> Purtroppo aprendo la maschera ottengo l'errore run-time 13 "tipo non
> corrispondente". Premetto che ho  inserito dao 3.6 nei riferimenti.
> Dove ho sbagliato?
Dillo tu a me ;-)
Immagino che avrai aperto molti altri recordset nell'applicazione, devo
quindi dedurre che non funzionano?
> Inoltre come posso fare per nascondere la maschera una volta aperta?
Se hai deciso di usare una maschera dedicata all'uopo non ti serve aprire il
suddetto recordset.
Basta assegnarle come origine dati la tabella Swap e aprirla all'avvio
dell'applicazione in modalità nascosta.
DoCmd.OpenForm "swap", , , , , acHidden
Saluti.


title: prestazioni scadenti in multiutenza

author: desio

text:
cut
> - sub datasheet Name property set to [Auto] should be [None]
> - Track name AutoCorrect should be off
Togliendo la spunta da questo comando che poi è nel menu
strumenti/opzioni/generale/tienitracciadelleinformazionidicorrezione, io ho
risolto tutti i problemi di lentezza che avevo
e mi funziona anche con gli .mde
Ciao desio


title: prestazioni scadenti in multiutenza

text:
"massimo"
> Ok. Ancora grazie per i consigli. Le prestazioni sono migliorate, ma
> restano insufficienti. Ho provato a convertire il BE in access2000 e
> tutto fila molto meglio.
Piů che molto meglio, dovrebbe filare bene.
 Tuttavia la soluzione di upgradare tutte le
> postazioni ad Access2000 non mi convince considerando il fatto che un
> altro collo di bottiglia č l'accesso alle cartelle condivise da SO
> diversi.
In che senso?
Ciao.


title: prestazioni scadenti in multiutenza

text:
On 23 ago 2003, "Simone Calligaris" <
simo...@libero.it
> wrote in
news:XXJ1b.260002$
Ny5.7...@twister2.libero.it

> "massimo"
>
>> Ok. Ancora grazie per i consigli. Le prestazioni sono
>> migliorate, ma restano insufficienti. Ho provato a convertire
>> il BE in access2000 e tutto fila molto meglio.
>
> Piů che molto meglio, dovrebbe filare bene.
Sě, ma le prestazioni di Access97 FE -> BE rimangono inavvicinabili.
>  Tuttavia la soluzione di upgradare tutte le
>> postazioni ad Access2000 non mi convince considerando il fatto
>> che un altro collo di bottiglia č l'accesso alle cartelle
>> condivise da SO diversi.
>
> In che senso?
Nel senso che trasferire un file sulla cartella condivisa da W2000
sembra richiedere piů tempo rispetto alla stessa operazione svolta da
una postazione NT4.


title: prestazioni scadenti in multiutenza

text:
"massimo" <
>
> Sě, ma le prestazioni di Access97 FE -> BE rimangono inavvicinabili.
Beh, non dovrebbe essere cosě evidente la differenza...
I Front-End sono .MDE?
> >  Tuttavia la soluzione di upgradare tutte le
> >> postazioni ad Access2000 non mi convince considerando il fatto
> >> che un altro collo di bottiglia č l'accesso alle cartelle
> >> condivise da SO diversi.
> > In che senso?
> Nel senso che trasferire un file sulla cartella condivisa da W2000
> sembra richiedere piů tempo rispetto alla stessa operazione svolta da
> una postazione NT4.
Ma questo non c'entra col fatto di sostituire Access 2000/XP al '97 su
alcuni clients.
Ciao.


title: prestazioni scadenti in multiutenza

text:
On 24 ago 2003, "Simone Calligaris" <
simo...@libero.it
> wrote in
news:7672b.262467$
lK4.8...@twister1.libero.it

>> Sě, ma le prestazioni di Access97 FE -> BE rimangono
>> inavvicinabili.
>
> Beh, non dovrebbe essere cosě evidente la differenza...
> I Front-End sono .MDE?
Anche in MDE non ci sono apprezzabili differenze (BTW, in MDB ho
fatto giŕ tutto il possibile per velocizzare)
>> Nel senso che trasferire un file sulla cartella condivisa da
>> W2000 sembra richiedere piů tempo rispetto alla stessa
>> operazione svolta da una postazione NT4.
>
> Ma questo non c'entra col fatto di sostituire Access 2000/XP al
> '97 su alcuni clients.
Concordo, ma qualcuno in alcuni vecchi articoli aveva paventato la
possibilitŕ che il jet non si trovasse proprio a suo agio su reti
W2000.


title: prestazioni scadenti in multiutenza

text:
"massimo"
> Concordo, ma qualcuno in alcuni vecchi articoli aveva paventato la
> possibilitą che il jet non si trovasse proprio a suo agio su reti
> W2000.
Paventava male: i problemi d'affidabilitą della versione 4.0 sono gli stessi
della precedente, con o senza win 2000.
Saluti.


title: mod CH8bis ?uro

author: miki

text:
Cerco, per access, programmino capace di compilare correttamente i nuovi
modelli
di bollettino postale.
Ringrazio anticipatamente chi, solerte, mi invia tale piccolo applicativo.
db.mi...@libero.it


title: mod CH8bis ?uro

author: Emyr

text:
On Wed, 17 Jul 2002 19:16:39 GMT, "miki" <
db.mi...@tiscali.it
>
wrote:
>solerte,
addirittura,
 è un vero peccato che io non ce l'abbia
Saluti.
Emanuele.


title: mod CH8bis ?uro

text:
"Emyr" <
fan...@lavoro.com
> ha scritto nel messaggio
news:itlcju8p227keknuf...@4ax.com...

Ritengo, se è vero quel che ho carpito, che sia assolutamente inutile quel
pizzico di ironia che hai messo nella tua risposta.
Ricordati che far parte di un news group significa scambiarsi amichevolmente
cosette (è di cosette che si tratta non di di programmoni) che ognuno, nei
ritagli di tempo, riesce a fare. Se non era tua intenzione ironizzare sulla
richiesta, scusami e, se nel frattempo tu avessi trovato quanto richiesto
fai ancora in tempo ad inviamela.
Cordialmente. MiKi


title: mod CH8bis ?uro

author: Massimiliano Amendola  kksrl

text:
Miki scrisse
> > >solerte,
Emyr rilevò:
> > addirittura,
> >  è un vero peccato che io non ce l'abbia
> > Saluti.
> > Emanuele.
Miki aggiunse:
> Ritengo, se è vero quel che ho carpito, che sia assolutamente inutile quel
> pizzico di ironia che hai messo nella tua risposta.
> Ricordati che far parte di un news group significa scambiarsi
amichevolmente
> cosette (è di cosette che si tratta non di di programmoni) che ognuno, nei
> ritagli di tempo, riesce a fare. Se non era tua intenzione ironizzare
sulla
> richiesta, scusami e, se nel frattempo tu avessi trovato quanto richiesto
> fai ancora in tempo ad inviamela.
> Cordialmente. MiKi
>
Alla fine intervengo io:
scusa, ma la filosofia del NG tu l'hai già sposata? Prima di apostrofare
(soprattutto qualcuno sempre disponibile come Emyr) guarda ciò che fai tu:
vieni (credo per la prima volta), chiedi, ti arrabbi e (spero) poi te ne
vai.
La parte tua di scambio dov'è?
O credi che scambio significhi prendere in maniera un tantinello boriosa?
Scusami Emyr, ma è da un pò che vedo personaggi del genere, che sinceramente
mi piacciono pochino
ciao MAssimiliano


title: mod CH8bis ?uro

text:
On Thu, 18 Jul 2002 10:25:52 GMT, "miki" <
db.mi...@tiscali.it
>
wrote:

scusa ma non ho resistito quel "solerte" era troppo invitante, mettiti
un pò nei miei panni.
Saluti.
Emanuele.


title: mod CH8bis ?uro

text:
On Thu, 18 Jul 2002 13:19:18 +0200, "Massimiliano Amendola  kksrl"
<
massimilia...@kksrl.com
> wrote:
>Scusami Emyr, ma è da un pò che vedo personaggi del genere, che sinceramente
>mi piacciono pochino
vai tranquillo, in fondo anche noi abbiamo il diritto di divertirci un
pò....ogni tanto...
Saluti.
Emanuele.


title: Stesso codice vba - client di posta diversi - possibbole ?

text:
Dal gestionale serve frequentemente 'preparare' l'email che poi
l'operatore verifichera' ed inviera'
Spostando lo stesso codice su pc diversi, con installati client diversi
ad esempio Outlook, Outlook Express, Thunderbird, LiveMail, ecc.., il
funzionamento non sempre e' coretto, nel senso che con Outlook funziona,
ma con Thunderbird no e via di questo passo
Come realizzare una procedura unica che riesca a 'pilotare'
correttamente client e-mail diversi?
Dove per 'pilotare' intendo aprire la schermata per invio e-mail,
scrivere nel campo il destinatario, eventuali destinatari nascosti,
l'oggetto, il testo, ed eventuali allegati


text:
L'idea di usare una maschera embedded nel progetto per la compilazione e delle parti da compilare e poi ti appoggi ad una libreria sicuramente presente MAPI...?

Alcuni usano BLAT che però va redistribuito...

La sostanza è rendersi indipendenti, oppure scrivere codice MultiClient ansa do a leggere dal Registry il Default e pilotando poi il VBA di conseguenza.

@Alex


text:

Anch'io ho usato Blat ed ora ancor meglio Swithmail che permette di
inviare anche verso server che consentono collegamento solo ssl tipo
smtp.office365.com

Ma e' ben diverso inviare tutto in automatico dal 'preparare' il
messaggio per l'operatore e consentirgli di inviarlo premendo solo il
tasto INVIO
Se l'email la fai partire dal client di posta il messagio resta
archiviato tra gli altri 'inviati', e quindi ricercabile esattamente
come le email inviate a mano dall'operatore, e' una possibilita' che
preferirei rispetto all'invio 'al buio'
Si, forse la soluzione multiclient (codice diverso a seconda del client
e-mail predefinito)  e' l'unica praticamente adottabile


author: BFS

text:

io uso un file ini letto in fase di apertura del client
uno delle righe del ini è proprio il client di posta usato
e ovviamente dentro il gestionale in un modulo ho le procedure di invio
mail riservare ai vari client di posta
Nel caso non esista un client di posta vado di CDO

ciao
BFS


text:

Quindi procedura 'multi-client' con comandi specifici per ognuno
Speravo ci fosse un sistema generico per farlo


text:

ho fatto comandi specifici per il discorso che alcune cose sono ingestibili.
tipo la firma della mail.
Su Outlook devo infilargliela via codice
su TB inveve prende di defaul quella impostata da programma
su wlm neppure la considera

se invece non ho nessun clien ho realizzato la classica form con a: cc:
oggetto, corpo e allegato e invio tutto tramite cdo

ciao


title: Ritorno da un'istruzione Openform

author: Fabar

text:
Salve!!
volevo sapere se esiste un modo per ritornare all'istruzione immediatamente
successiva a quella che apre una maschera con una istruzione OpenForm.......
mi spiego meglio......ad un certo punto (A) della mia subroutine, apro una
maschera con una istruzione OpenForm (punto B).
All'uscita da quest'ultima, vorrei tornare all'istruzione immediatamente
successiva al punto B........è possibile?????
Scusatemi tanto, ma provengo da vecchi linguaggi procedurali in cui il tutto
era fattibile mediante un certo tipo di comandi.....
....dovrei forse dichiararmi una etichetta di riga valida per tutte le
routine???
Ringrazio anticipatamente


title: Ritorno da un'istruzione Openform

author: Maurizio Borrelli

text:
> "Fabar" news:SMdv9.52760$
TD1.2...@news2.tin.it
:

    Funziona ancora tutto come una volta anche col VB6 di A00.
    GoTo, GoSub, On...GoTo, On...GoSub
    Le etichette possono essere numeri oppure testo iniziante con un
carattere alfabetico seguite dai due punti.
        Sub GoTo_Test()
        GoTo B
        A: ...
           ...
        Goto 10
        B: ...
           ...
        Goto A
        10 ...
           ...
        End Sub
    Ma... Se ti sforzi appena un po' e riesci a non usarle ti troverai
meglio.
    Io pero' credo di non aver capito cosa vuoi fare. Esemplifico quello che
ho capito:
        A: qui apri una maschera (punto B)
    Che vuol dire?
    Cosa intendi con "uscire dall'istruzione OpenForm"? Immagino che tu ti
riferisca a:
        DoCmd.OpenForm ...
e una volta eseguita questa istruzione si passa alla successiva. No...
Proprio non capisco, scusami.
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


title: Ritorno da un'istruzione Openform

author: Antonio Biso

text:
"Fabar" <
fabio.a...@tin.it
> ha scritto nel messaggio
news:SMdv9.52760$TD1.2...@news2.tin.it...
> Salve!!
>
> volevo sapere se esiste un modo per ritornare all'istruzione
immediatamente
> successiva a quella che apre una maschera con una istruzione
OpenForm.......
> mi spiego meglio......ad un certo punto (A) della mia subroutine, apro una
> maschera con una istruzione OpenForm (punto B).
> All'uscita da quest'ultima, vorrei tornare all'istruzione immediatamente
> successiva al punto B........è possibile?????
No!
Cioè, quando apri la seconda form, l'elaborazione non si interrompe ma
prosegue.
Quindi se hai altro codice viene eseguito anche se hai aperto la seconda
form.
Se tu vuoi eseguire del codice alla chiusura della seconda form, lo
scriverai nell'evento su chiusura della seconda form.
E' chiaro che eventuali riferimenti alla prima form, non potrà essere tipo
me.XXX, ma
forms("Prima form").XXX
Antonio


title: Ritorno da un'istruzione Openform

author: Roberto da casa

text:
"Fabar" <
fabio.a...@tin.it
> ha scritto nel messaggio
news:SMdv9.52760$TD1.2...@news2.tin.it...

Dopo aver aperto la nuova maschera con la OpenForm, Access esegue,
immediatamente dopo aver aperto la maschera, le righe di codice VBA che
seguono la DoCmd.OpenForm... , non devi memorizzarti e/o gestire alcun
rientro.
Se nel metodo OpenForm NON usi il parametro modalitàfinestra (vedi help),
Access esegue il codice che segue la DoCmd.OpenForm subito dopo aver aperto
la maschera, ovvero mentre la maschera è ancora aperta; se vuoi invece che
tale codice venga eseguito solamente dopo che tu hai chiuso la maschera, nel
metodo OpenForm imposta l'argomanto modalitàfinestra a acDialog: così
facendo Access apre la maschera ad esecuzione obbligatoria e in modalità
popup, con tutto quello che ne consegue.
Per maggiori dettagli leggiti cosa dice l'help circa il metodo OpenForm ed i
suoi argomenti.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Ritorno da un'istruzione Openform

author: Alessandro Cara

text:
Antonio Biso wrote:
[cut]
> No!
> Cioč, quando apri la seconda form, l'elaborazione non si interrompe ma
> prosegue.
> Quindi se hai altro codice viene eseguito anche se hai aperto la seconda
> form.
la lucania ti sta massacrando. E se la form che apri e' modale? Fermo
restando
che le due tue asserzioni sono valide ma forse non esaustive.
--
a.cara


title: Ritorno da un'istruzione Openform

text:
"Alessandro Cara" <
al...@blunet.it
> ha scritto nel messaggio
news:3DBD72EE...@blunet.it...

Embč?
Se č modale il codice viene esguito lo stesso!!!
Antonio


title: Ritorno da un'istruzione Openform

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:Uwev9.87298$RO.22...@twister1.libero.it...

Si, ma quando chiudi la maschera, e non fintanto che la maschera č aperta.
;-)
>
> Antonio



title: Ritorno da un'istruzione Openform

text:

va bene va bene non adombrarti (situazione mostrata dai 2 ! in eccesso)
codice di a-> openform b-> prosegue codice di a   (come ben sai con b
modeless)
codice di a->openform b->elaborazione di b-> chiusura di b->ritorno a
codice di a
            (come ben sai con b modal)
avevo ben scritto che le tue asserzioni erano valide
--
a.cara


title: Ritorno da un'istruzione Openform

text:
"Alessandro Cara" <
al...@blunet.it
> ha scritto nel messaggio
news:3DBD7947...@blunet.it...
> Antonio Biso wrote:
> >
> codice di a-> openform b-> prosegue codice di a   (come ben sai con b
> modeless)
>
> codice di a->openform b->elaborazione di b-> chiusura di b->ritorno a
> codice di a
>             (come ben sai con b modal)
> avevo ben scritto che le tue asserzioni erano valide
Scusate eh, tu e Roberto.
Io ho provato anche con b modale e il codice di a me lo continua ad eseguire
lo stesso!!!
Antonio


title: Ritorno da un'istruzione Openform

text:
Antonio Biso wrote:
[cut]
> Scusate eh, tu e Roberto.
> Io ho provato anche con b modale e il codice di a me lo continua ad eseguire
> lo stesso!!!
Anto'
io gia' ho poche certezze. Anche quelle mi vuoi togliere?
delle due l'una
o ti hanno taroccato access
o ti hanno taroccato access
--
a.cara


title: Ritorno da un'istruzione Openform

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:aUev9.87423$RO.22...@twister1.libero.it...
> "Alessandro Cara" <
al...@blunet.it
> ha scritto nel messaggio
> news:3DBD7947...@blunet.it...
[CUT]
>
> Scusate eh, tu e Roberto.
> Io ho provato anche con b modale e il codice di a me lo continua ad
eseguire
> lo stesso!!!
>
Anche usando l'argomento acDialog nella OpenForm?
Penso proprio di no. ;-)
Comunque è strano; mi ricordo che questa discussione,io e te, la rifacemmo
circa un anno e mezzo fa; allora però alla fine ha funzionato anche a te l'
acDialog ed il conseguente congelamento del codice VBA sino alla chiusura
della maschera.



title: Ritorno da un'istruzione Openform

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:Ilfv9.89255$%M1.22...@twister2.libero.it...
[CUT]
>
> Anche usando l'argomento acDialog nella OpenForm?
> Penso proprio di no. ;-)
>
> Comunque è strano; mi ricordo che questa discussione,io e te, la rifacemmo
> circa un anno e mezzo fa; allora però alla fine ha funzionato anche a te
l'
> acDialog ed il conseguente congelamento del codice VBA sino alla chiusura
> della maschera.
>
La volta scorsa ti sei convinto dopo che ti ho postato il seguente stralcio
di help:
=========
<omissis>
Quando si apre una maschera con l'argomento Modalità Finestra impostato a
Dialogo, Microsoft Access interrompe l'esecuzione della macro (o del codice
VBA) fino a quando la maschera viene chiusa o nascosta. È possibile
nascondere una maschera impostando a No la proprietà Visibile, <omissis>
==========
Naturalmente te lo sarai poi andato a leggere da solo. :-)



title: Ritorno da un'istruzione Openform

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:Ilfv9.89255$%M1.22...@twister2.libero.it...
>
> > Scusate eh, tu e Roberto.
> > Io ho provato anche con b modale e il codice di a me lo continua ad
> eseguire
> > lo stesso!!!
> >
>
> Anche usando l'argomento acDialog nella OpenForm?
> Penso proprio di no. ;-)
>
Aha ha ha!
Ecco l'inghippo!
Se si usa il parametro è come dite voi, ma se la maschera è modale come
proprietà base, il codice non si ferma.
Provate!
Antonio


title: Ritorno da un'istruzione Openform

text:
Antonio Biso wrote:
>
> "Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
> news:Ilfv9.89255$%M1.22...@twister2.libero.it...
[cut]
> Ecco l'inghippo!
> Se si usa il parametro è come dite voi, ma se la maschera è modale come
> proprietà base, il codice non si ferma.
> Provate!
>
> Antonio
you got it
perche' il default della openform e' acNormal? e fa override come
d'altra
parte fa un acdialog su una finestra acnormal?
possiamo accordarci su un sostanziale pareggio?
--
a.cara


title: Ritorno da un'istruzione Openform

text:
"Alessandro Cara" <
al...@blunet.it
> ha scritto nel messaggio
news:3DBD8E47...@blunet.it...
> Antonio Biso wrote:
> >
> > Ecco l'inghippo!
> > Se si usa il parametro è come dite voi, ma se la maschera è modale come
> > proprietà base, il codice non si ferma.
> > Provate!
> >
> > Antonio
> you got it
> perche' il default della openform e' acNormal? e fa override come
> d'altra
> parte fa un acdialog su una finestra acnormal?
>
> possiamo accordarci su un sostanziale pareggio?
Perfetto!
Certo, io ero fuori casa, quindi la mia media inglese ne esce
avvantaggiata!!!
Hehe he ee he
Antonio


title: errore campo calcolato

author: tmtube

text:
in una maschera in visualizzazione continua quando aggiungo un record nuovo
visualizzo il messaggio

il campo non può essere calcolato e nella query il campo è il seguente

Giacenza: nz(nz(DSum("qta";"MagazzinoCaricoScarico";"cs=-1 and idarticolo="
& [magazzino]![id]);0)-nz(DSum("qta";"MagazzinoCaricoScarico";"cs=0 and
idarticolo=" & [magazzino]![id]);0);0)

secondo voi come posso evitare questo errore?


title: errore campo calcolato

author: Mancini

text:
> il campo non può essere calcolato

Strano quel testo di errore,   Ma si tratta di una FinestraMessaggio di Access con esattamente quel testo  in italiano ??

venendo poi alla formula mi sembra Funzionale anche se hai usato un Nz di troppo:
Tu hai fatto:
nz(
nz(DSum(" .... ";" ..... ";" .... ");0) -
nz(DSum(" .... ";" ..... ";" .... ");0)
;0)
 Il 1° Nz è certamente inutile in quanti i 2 addendi da sottrarre sono entrambi certamente NonNulli

.


title: errore campo calcolato

author: pfmarro

text:

prova a spezzettare il campo calcolato e vedere dove ti salta fuori l'errore


title: Query e avvisi

author: Lucio

text:
Vorrei eseguire la query di accodamento "X" alla chiusura di maschera ma
senza che appaiano gli avvisi di access, dovrei farlo da codice perchč il Db
potrebbe essere aperto da piů postazioni e per cui non potrei girarmeli
tutti per moificare le opzioni di access.
Grazie


title: Query e avvisi

text:
Lucio <
151...@virgilio.it
> wrote in message
4Mgl8.71648$_u5.2...@news1.tin.it...

Falla partire da codice, ma prima devi utilizzare per disattivare i messaggi
di sistema il comando DoCmd.SetWarnings False; alla fine della query
ripristina l'attivazione dei suddetti (potrebbero sempre servirti) con
DoCmd.SetWarnings True...
Questo č quanto.
Maurizio


title: Query e avvisi

text:
"Maurizio75" <
maurizio...@gevi.it
> ha scritto nel messaggio
news:gthl8.34071$1S3.1...@twister1.libero.it...

Ti ringrazio, vorrei approfittare per chiederti se hai anche la risposta al
messaggio che ho scritto sopra re: "accesso condizionato al Db" e comunque
grazie ancora


title: Query e avvisi

author: Max De Poli

text:
"Lucio" <
151...@virgilio.it
> wrote in message news:<4Mgl8.71648$_
u5.20...@news1.tin.it
>...
> Vorrei eseguire la query di accodamento "X" alla chiusura di maschera ma
> senza che appaiano gli avvisi di access, dovrei farlo da codice perchè il Db
Private sub form_close()
Docmd.setawarnings false
Docmd.openquery "X"
Docmd.setwarnings true
...
...
End sub
Cia'
Max


title: recordset non aggiornabile sicuramente sbaglio la query, ma dove?

author: NSantini

text:
Salve a tutto il NG
In origine avevo due tabelle: la solita anagrafica e una tabella per
registrare gli incarichi (servizio, dal, al, qualifica ecc).
Le due tabelle erano in relazione Uno (dipendente)-Molti (incarichi).
Successivamente nella tabella anagrafica ho aggiunto dei campi relativi alla
medicina preventiva (ultima visita, prossima visita, periodicità visite,
giudizio idoneità ecc.). Però questi dati non hanno a che fare con la
anagrafica e ho creato una terza tabella con questi dati e mettendola in
relazione uno-uno
In Pratica ho:
Tabella           tabella                  tabella
dipendete       incarichi                MedPrev
IDDip            IDInc                  IDPrev              (campi
contatore)
.....                 KeyIncDip          KeyPrevDip      (campi numerici)
........              ..........                 .............
IDDip  uno > molti KeyIncDip
IDDip  uno > uno   KeyPrevDip
Ho costruito una query che reperisce il nominativo, la qualifica, il
servizio e la data della prossima visita, ma il recordset che viene fuori
non è aggiornabile. Come mai? Nella query devo aggiungere i campi chiave?
quali?
Grazie per la disponibilità che dimostrate.
--
Saluti
NSantini


text:
"NSantini" <
nu...@iol.it
> ha scritto nel messaggio
news:3CyC9.29890$744.1...@news1.tin.it...

Una query creata dal join di tabelle tra loro in relzione uno-a-molti
risulta essere per definizione un recordset non aggiornabile.
Normalmente due tabelle in relzione uno-a-molti vengono aggiornate con la
tecnica della maschera/sottomaschera.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: utilizzare il valore di un'etichetta

author: nadia

text:
Buon giorno a tutti
ho un altro problema che non riesco a risolvere sfruttando quanto già
postato da altri
Ho trovato un po' di post in cui si parla di inserire il valore di un campo
in un'etichetta io invece dovrei utilizzare il valore di un'etichetta per
inserirlo nel messaggio di errore di una MsgBox
Ho trovato nei post stringhe tipo
for K=1 to 10
Me.Controls("nome" & Trim(Str(k))).Caption = "quel che è"
....
e avendo (come da finestra proprietà)
origine controllo =  cons1
nome elemento =  cons1
etichetta = pippo
nome elemento = etic_cons1
ho scritto nel codice
1          Dim nnn As Integer
2          Dim Etic As String
3          For nnn = 1 To 5
4          Etic = Me.Controls("cons" & Trim(Str(nnn))).Caption
5           If (Me("valA" & nnn) < Me("val" & nnn)) Then
6                   MsgBox "il valore Max per la consistenza " & Etic & "
manca o non è corretto",
                        vbExclamation, "Valore Richiesto"
7                    Me("valA" & nnn).SetFocus
8                    Exit Sub
9             End If
10         Next nnn
Ma sulla riga 4 (se tolgo quella il resto funzina) si blocca e mi da "errore
di run time 438 proprietà o metodo non supportati dall'oggetto"
Dai tentativi fatti quello che non accetta è Caption, che io lo metta in
fondo alla riga o al posto di Controls [Etic = Me.Caption("cons" &
Trim(Str(nnn))) -- come ho trovato in un altro post]
Grazie anticipatamente per ogni consiglio per risolvere questo intoppo
Nadia


title: utilizzare il valore di un'etichetta

author: George

text:
"nadia" <
n.mene...@yard.it
> ha scritto nel messaggio
news:bbnjed$6l$1...@grillo.cs.interbusiness.it...

Nadia, il problema è che tu cerchi di modificare la proprietà caption del
controllo cons1 che è una casella di testo associata.
Devi modificare la proprietà caption del controllo etichetta:
Etic = Me.Controls("etic_cons" & Trim(Str(nnn))).Caption (...)
Anche se i due controlli sono assogiati graficamente, sono assolutamente
disgiunti.
Ciao.


title: utilizzare il valore di un'etichetta

text:
"George" <
giorgio.ben...@libero.it
> ha scritto nel messaggio
news:bbpcvj$1hf$1...@newsreader.mailgate.org...

Cavoli è vero! devo proprio prendermi qualche giorno di ferie!!!
Ti ringrazio moltissimo, adesso funziona tutto benissimo
Nadia


title: RecordSource dinamico

author: Massimiliano

text:
Salve a tutti, ho bisogno di un consiglio.
Ho creato una maschera la cui origine č la tabella clienti.
Questa tabella ha diversi campi Si/No. Vorrei filtrare i dati contenuta in
essa nel modo piů semplice
possibile.
Ho pensato di inserire sulla maschera degli optionbutton per ognuno dei
campi Si/No da filtrare. Es:
-Sposato (Si No Indifferente)
-MiliteEsente (Si No Indifferente)
-Disoccupato (Si No Indifferente)
-pulsante Filtra!
Inizialmente i valori di default saranno su Indifferente quindi premendo il
tasto Filtra! otterrei i dati non filtrati.
Premendo Si o No sui rispettivi campi da filtrare visualizzerň i dati che mi
interessano.
Ora arriva la parte piů difficile.
Sull'evento OnClick del controllo Filtra! creo una stringa SQL che userň per
settare di volta in volta il RecordSource della maschera.
Purtroppo non os come trattare i valori degli optionButton. La mia idea č
questa:
stringaSQL as string
string= "SELECT * from CLIENTI WHERE"
if optionButton_Sposato=si
    stringa=stringa & "Sposato=true and"
if optionButton:MiliteEsente=si
    stringa=stringa & "MiliteEsente=true and"
if optionButton_Disoccupato = si
    stringa = stringa & "Disoccupato=true
if optionButton_Disoccupato = no
    stringa = stringa & "Disoccupato=false
if optionButton_Disoccupato = entrambi
    stringa = stringa & "Disoccupato=true or Disoccupato=false
a questo punto cambio il RecordSource utilizzando la stringa SQL cosě
ottenuta.
Spero di essere stato chiaro.
Grazie a tutti anticipatamente!!
P.S. Se esiste una soluzione piů semplice (o migliore) accetto consigli. A
presto


title: RecordSource dinamico

author: Alessandro Nazzani

text:
Ciao Massimiliano.
> Ho pensato di inserire sulla maschera degli optionbutton per ognuno dei
> campi Si/No da filtrare. Es:
> -Sposato (Si No Indifferente)
> -MiliteEsente (Si No Indifferente)
> -Disoccupato (Si No Indifferente)
Usa un OptionGroup
> Purtroppo non os come trattare i valori degli optionButton. La mia idea è
> questa:
> stringaSQL as string
> string= "SELECT * from CLIENTI WHERE"
>
> if optionButton_Sposato=si
>     stringa=stringa & "Sposato=true and"
stringaSQL as string
stringaSQL = "SELECT * from CLIENTI WHERE "
If optionGroup_Sposato=1 then
   stringaSQL = stringaSQL & "Sposato=True and "
ElseIf optionGroup_Sposato=2 Then
   stringaSQL = stringaSQL & "Sposato=False and "
End If
.
.
ecc.
Nel caso di "Indifferente" non metterei nessun criterio, ma se preferisci
usare un Or come nel tuo esempio dovrebbe andare ugualmente bene, purchè tu
abbia l'accortezza di racchiuderlo in parentesi. Se invece decidi di non
specificare il criterio, dovrai allora fare un attenzione a come viene
costruita la stringa SQL, evitando che termini con un " and " di troppo.
Ciao.
Alessandro


title: ADO o/e DAO

author: Linox

text:
Buongiorno a tutto il ng
scusate se la mia domanda é troppo banale (I'm a newbie) :-((
ho il seguente problema:
Devo popolare delle tabelle in Access con dei dati recuperati da un As400 e
visto che quest'ultimo mi mette a disposizione un provider OLE DB avevo
pensato di utilizzare ADO.
Ho trovato anche indicazioni su come accedere ad Access con ADO, ma a questo
punto mi sorge un dubbio.
Visto che il codice che devo eseguire risiede nel db che devo popolare, é
giusto che devo utilizzare una connessone ADO con riferimento al mio db
oppure esiste un modo più veloce e meno macchinoso x eseguire le operazioni?
X esempio oggetto Database che però fa parte della libreria DAO.
E' possibile referenziare entrambe le librerie o questo crea dei casini?
Spero di essermi spiegato bene
Grazie a tutti in anticipo


title: ADO o/e DAO

text:
> "Linox" news:aogkf4$m1f3o$
1...@ID-160104.news.dfncis.de
:
> Devo popolare delle tabelle in Access con dei dati recuperati da un As400
e
> visto che quest'ultimo mi mette a disposizione un provider OLE DB avevo
> pensato di utilizzare ADO.
> Ho trovato anche indicazioni su come accedere ad Access con ADO, ma a
questo
> punto mi sorge un dubbio.
    Anche a me. Non capisco casa intendi con "accedere *ad* Access con ADO".
> Visto che il codice che devo eseguire risiede nel db che devo popolare, é
> giusto che devo utilizzare una connessone ADO con riferimento al mio db
> oppure esiste un modo piů veloce e meno macchinoso x eseguire le
operazioni?
    Se ho capito bene... Potresti allegare mediante:
        File > Carica dati esterni > Collega tabelle...
le tabelle del database dell'AS400 al file mdb.
> X esempio oggetto Database che perň fa parte della libreria DAO.
> E' possibile referenziare entrambe le librerie o questo crea dei casini?
    Ti rispondo con un esempio.
    Nella situazione di cui parli questa riga potrebbe creare dei casini:
        Dim rst As Recordset
queste no:
        Dim rst As ADODB.Recordset
        Dim rst As DAO.Recordset
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


title: ADO o/e DAO

text:
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:aogndl$m64lf$1...@ID-52090.news.dfncis.de...
>     Anche a me. Non capisco casa intendi con "accedere *ad* Access con
ADO".
 intendevo dire accedere ad una tabella in un db Access
>     Se ho capito bene... Potresti allegare mediante:
>
>         File > Carica dati esterni > Collega tabelle...
>
> le tabelle del database dell'AS400 al file mdb.
Ho pensato alla soluzione di collegare le tabelle ma non so se nel mio caso
é la soluzione migliore.
Tentero di spiegare cosa devo fare:
Su As400 ho 8 tabelle che contengono varie informazioni. Queste tabelle non
sono correlate tra di loro visto che sul DB aziendale le relazioni sono
implementate a livello di pgm e non a livello DB e quindi mi ritrovo con dei
file DB piatti non normalizzati ecc. Oltre questo problema devo convertire
alcuni tipi di dati in formato Access (x esempio data che sotto As é
scomposta in tre campi GG, MM, AAAA) Ho creato un DB relazionale in Access
che devo popolare con i vari dati delle tabelle che trovo su As400. Il DB
Access mi serve x elaborare delle statistiche e quindi i dati vanno
ricaricati giornalmente. Ho pensato a risolvere il tutto con X query di
accodamento/aggiornamento ecc. ma mi sembra una soluzione poco performante
(correggimi se sbaglio) ed inoltre non so se questo mi puo dare problemi a
livello di integrità referenziale, visto che parto con un DB vuoto ogni
volta che devo elaborare le statistiche (a fine elaborazione di dati vengono
eliminati dalle tabelle del DB Access).
Questi sono i motivi x cui mi é venuta l'idea (buona o cattiva che sia) di
eseguire queste operazioni tramite codice.
Ho trovato un esempio di codice (che ho riportato sotto)  nella
documentazione ibm ma ovviamente mi da errore  Tipo definito dall utente non
definito che ovviamente é dato dal fatto che non c'é il riferimento alla
libreria DAO ma a quella ADO mentre Database é un oggetto DAO
Option Compare Database
Option Explicit
Public cnnX As New ADODB.Connection
Public Err As ADODB.Errors
Public cmdX As New ADODB.Command
Public rstX As ADODB.Recordset
Private Sub Class_Initialize()
    cnnX.Open "provider=IBMDA400;data source=XXX;"
        Set cmdX.ActiveConnection = cnnX
        cmd.CommandText = " istruzione select"
End Sub
Sub Importa()
    Dim rowCount As Integer
    Dim colCount As Integer
    Dim dbs As Database
    Dim AccessRS As Variant
    Set dbs = CurrentDb
    Set AccessRS = dbs.OpenRecordset("tblOrdine")
    Set rstX = cmdX.Execute()
    While Not rstX.EOF
        With AccessRS
            .AddNew
            !chrIDEnte = rstX.Fields(1).Value
            !chrIDDitta = rstX.Fields(2).Value
            !chrIDClienteFatturazione = rstX.Fields(3).Value
            !chrClienteFinale = rstX.Fields(4).Value
            !dtmImmissione = CDate("rstX.Fields(7).Value" & "." & _
                                   "rstX.Fields(6).Value" & "." & _
                                   "rstX.Fields(5).Value")
            .Update
        End With
        rstX.MoveNext
    Wend
    Set rstX = Nothing
    Set AccessRS = Nothing
End Sub
>     Ti rispondo con un esempio.
>
>     Nella situazione di cui parli questa riga potrebbe creare dei casini:
>
>         Dim rst As Recordset
>
> queste no:
>
>         Dim rst As ADODB.Recordset
>
>         Dim rst As DAO.Recordset
>
OK, cosi é chiaro chiaro
Spero che questa volta sia riuscito a spiegarmi meglio
Grazie in anticipo


title: CommandBar

author: Emiliano

text:
Ciao,
ho trovato in rete degli esempi di codice per la creazione di
CommandBar per Access97, ma anche per Access2000 e pensavo di
applicarli pari pari in A2003.
Nei riferimenti ho messo Microsoft Office 12.0 Object Library.
Ho caricato la sub in un modulo chiamandola dall'evento load di una
maschera, ma quando apro la maschera ottengo subito il messaggio di
errore "Chiamata di routine o argomenti non validi" in corrispondenza
dell'ultima istruzione del pezzetto di codice di seguito riportato:
Sub AddNewCB()
   Dim CBar As CommandBar, CBarCtl As CommandBarControl
   On Error GoTo AddNewCB_Err
   ' Create a new floating toolbar and make it visible.
   Set CBar = CommandBars.Add(Name:="Sample Toolbar", Position:= _
      msoBarFloating)
Altri riferimenti installati:
Visual Basic for Application
MS Access 11.0 Object Library
Ole Automation
MS DAO 3.6 Object Library
MS ActiveX Data Objects 2.5 Library
--
******************************
Grazie e saluti, Emiliano
******************************


title: fattura elettronica terzo intermediario

author: BFS

text:
la novità della mattina
agyo dice che se la fattura viene inviata tramite il loro hub va
compilata anche la parte TerzoIntermediarioOSoggettoEmittente
con i loro dati

vi risulta?
BFS

---
Questa email è stata esaminata alla ricerca di virus da AVG.
http://www.avg.com


title: fattura elettronica terzo intermediario

author: RobertoA

text:
Il 13/12/2018 13:47, BFS ha scritto:
> la novità della mattina
> agyo dice che se la fattura viene inviata tramite il loro hub va
> compilata anche la parte TerzoIntermediarioOSoggettoEmittente
> con i loro dati
>
> vi risulta?
> BFS
>

Pensavo l'intermediario fosse l'agenzia che fornisce servizi al cliente
XYX per conto del fornitore (cliente dell'agenzia) ABC
Ad esempio l'agenzia di pratiche LAMEJO SRL, fornisce il servizio di
accompagnamento entrata in porto (erogato dalla PILOTI SUPER SPA)  alla
nave della societa' PEPPA SRL
Concluso il servizio, la PILOTI SUPER SPA inviera' fattura di vendita
alla PEPPA SRL
In questa fattura, l'intermediario sara' indicato come AGENZIA LAMEJO SRL
Cedente, cessionario, intermediario, sono gia' tutti impegnati
Dove lo metti l'id della Team System?
Non gli basta il trasmittente, pure sull'intermediario vogliono andare?


title: fattura elettronica terzo intermediario

text:

ecco cosa dicono

Gentile Cliente

  di seguito sono indicati i dati del trasmittente che devono essere
inseriti nel file XML della fatture per essere trasmessi dal portale AGYO.

  <DatiTrasmissione>

       <IdTrasmittente>
<IdPaese>IT</IdPaese>
<IdCodice>01641790702</IdCodice>
        </IdTrasmittente>

<ContattiTrasmittente>
<Telefono>0874-60561</Telefono>
        </ContattiTrasmittente>

<TerzoIntermediarioOSoggettoEmittente>
<DatiAnagrafici>
<IdFiscaleIVA>
<IdPaese>IT</IdPaese>
<IdCodice>01641790702</IdCodice>
</IdFiscaleIVA>
<CodiceFiscale>01641790702</CodiceFiscale>
<Anagrafica>
<Denominazione>TEAMSYSTEM SERVICE SRL</Denominazione>
</Anagrafica>
</DatiAnagrafici>
</TerzoIntermediarioOSoggettoEmittente>
   <SoggettoEmittente>TZ</SoggettoEmittente>

bah!



title: fattura elettronica terzo intermediario

text:

Prova a chiedere loro dove dovresti inserire l'agenzia
Per le vendite procurate da agente esterno


title: fattura elettronica terzo intermediario

text:
Il 13/12/2018 14:30, BFS ha scritto:

https://forum.italia.it/t/id-codice-trasmittente-fattura-elettronica/6406

sembra che inviando usando Infocert, anche loro mettano i loro dati su
TerzoItermediario


title: fattura elettronica terzo intermediario

text:

un conto è che i vari portali aggiungano dei tag al xml autonomamente e
mi starebbe anche bene

un altro che lo devo fare io monte, in base al portale scelto dal cliente.
mi trovo a dover chiedere ad ogni cliente che portale usano e di
conseguenza modificare la procedura di creazione del file

è assurda questa cosa.

per ora io compilerò solamente l'id trasmittente in base al trasmittente
scelto, un parametro in più da far configurare al cliente che dovrà
inserire una tantum la partita iva del portale

il resto non lo tocco



title: fattura elettronica terzo intermediario

text:
> un conto è che i vari portali aggiungano dei tag al xml autonomamente e
> mi starebbe anche bene
>
> un altro che lo devo fare io monte, in base al portale scelto dal cliente.
> mi trovo a dover chiedere ad ogni cliente che portale usano e di
> conseguenza modificare la procedura di creazione del file

"basterebbe" inserire tali campi nei parametri generali Azienda, poi se li compilano i clienti.

Saluti


title: AIUTO por FAvor

author: GIGIGNO

text:
Access 97...
Nei report c'e' quella bella possibilita' di settare
una macro in "Report Vuoto"...in maniera tale che se il report
non attinge informazioni la macro mi spara un bell'avviso
stoppando tutte le macro...
Ma in maschera come faccio...se una maschera e' vuota  come faccio o dove
posiziono una macro che mi avvisi della mancanza di
record  e mi stoppi la macro in azione!!!???
Grazie a che mi aiuta
Ciao


title: AIUTO por FAvor

author: Roberto in campagna

text:
"GIGIGNO" <
gco...@tin.it
> ha scritto nel messaggio
news:AmG_6.16592$G35....@news2.tin.it...

A fronte dell'evento "Su apertura" della maschera genera il seguente codice
VBA:
If Me.RecordsetClone.RecordCount = 0 Then
    MsgBox "Nella Maschera non c'è nulla da visualizzare"
    DoCmd.Close
End If
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: AIUTO por FAvor

text:
e se dopo questa routine volessi un setfocus su Codice_Articolo
...come faccio!!!!
Ciao
e grazie 1000
Roberto in campagna <
r.ma...@libero.it
> wrote in message
VFH_6.6131$z11.4...@news.infostrada.it...



title: AIUTO por FAvor

text:
"GIGINO_LA_SCAMA" <
gco...@tin.it
> ha scritto nel messaggio
news:dvZ_6.13509$bp5.1...@news1.tin.it...
> e se dopo questa routine volessi un setfocus su Codice_Articolo
> ...come faccio!!!!
> Ciao
> e grazie 1000
>
[CUT]
Ti ricordo che in questo NG c'è una regola per la quale si risponde dopo e
non prima dei messaggi precedenti: ti saremmo grati, io e molti altri, se in
futuro la rispettassi.
A fronte dell'evento "Su corrente" della maschera genera la seguente riga di
codice VBA:
Me!Codice_Articolo.SetFocus



title: Visto la domanda su Word chiedo dei chiarimenti - e su recordset

author: vf

text:
Io devo stampare da delle lettere in Word premendo un pulsante da Access.
Tutto bene se devo lanciare delle lettere con base su una tabella.
Problematico quando da una maschera vorrei stampare una lettera in stampa
unione con delle sottomaschere e dei dati variabile da cliente a cliente che
scelgo al momento.
Come presumo, visto i vari esempi che vedo sia nel newsgroup e altri, che si
debba usare i recordset, esiste da qualche parte / manuale / altro dove
capire gradualmente con esempi come usarlo questo mefito Recordset?
Grazie
Valter


author: Emyr

text:


i recordset non sono altro che le query che generi con il wizard
specificati via codice....
si tratta di linguaggio SQL
vedi sul menu
database
recordset
openrecordset
Saluti.
Emanuele.


title: Cerco Office XP developer

text: ccu...@tin.it


title: Cerco Office XP developer

author: Carlo Costarella

text:
"
news.tin.it
" <
ccu...@tin.it
> ha scritto nel messaggio
news:X%Qva.83746$3M4.1...@news1.tin.it...
>
ccu...@tin.it
>
>
E' difficile che in questo NG trovi una versione Developer di OfficeXP
usata. Chi frequenta questo NG, se ha la Developer, se la tiene stretta
stretta perchè solo così può distribuire i suoi applicativi.
La Nuova la trovi in tutti i negozi di informatica.
Per l'usata prova sui NG di VB o Delphi.
Ciao, Carlo


title: Cerco Office XP developer

author: Sib

text:
"Carlo Costarella" <
carloantoni...@virgilio.it
> ha scritto nel
messaggio
> "
news.tin.it
" <
ccu...@tin.it
> ha scritto nel messaggio
> E' difficile che in questo NG trovi una versione Developer di OfficeXP
> usata. Chi frequenta questo NG, se ha la Developer, se la tiene stretta
> stretta perchč solo cosě puň distribuire i suoi applicativi.
> La Nuova la trovi in tutti i negozi di informatica.
> Per l'usata prova sui NG di VB o Delphi.
Sono d'accordo sul non affollare il ng con queste richieste, ma piu' volte
ho visto persone che lo offrivano proprio su questo ng (una l'ho comprata
pure io ;-)
Sib


title: aggiornare un campo tabella da form

text:
Salve a tutti,
volevo sapere come si fa
a popolare un campo della tabella, con i dati generati in un campo FORM che
contiene un'Espressione?
per esempio: il risultato nel campo form chiamato Prezzo viene generato da
un' espressione , e questo risultato deve andare a popolare il campo della
tabella Acquisti.
Bisogna usare VBA??
Se si, come?
Grazie a tutto l'NG e Buone Feste


title: aggiornare un campo tabella da form

author: MA

text:

    Se il tuo campo da aggiornare è presente sulla maschera con un controllo
(anche nascosto) puoi fare sull'evento che ti interessa
me.TuocampoNascosto = me.tuocampocalcolato
MAssimiliano
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: aggiornare un campo tabella da form

author: Alessandro Baraldi

text:
"Sylver65" <
in...@mwfsystem.it
> wrote in message
news:cquld1$ccb$
1...@fata.cs.interbusiness.it

Il calcolo andrą effettuato in base ad altri dati oppure
sul'Evento prima di Aggiornare del Record se tutti i dati
del calcolo sono stati inseriti.
Dovresti spiegare meglio qual'č il calcolo e quando poterlo
ritenere valido in modo da indirizzarti sull'evento corretto.
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: aggiornare un campo tabella da form

text:
> Il calcolo andrà effettuato in base ad altri dati oppure
> sul'Evento prima di Aggiornare del Record se tutti i dati
> del calcolo sono stati inseriti.
> Dovresti spiegare meglio qual'è il calcolo e quando poterlo
> ritenere valido in modo da indirizzarti sull'evento corretto.
>
> Ciao
> @Alex
Mi spiego il meglio che posso:
Il form ha vari campi, per generare il totale nel campo PREZZO (che non è un
campo associato), è stata creata un'espressione del tipo  "= Campo1 *
Campo2"
quindi, l'espressione genera il PREZZO.
Il mio problema è come inserire questo risultato nel campo chiamato
"RISULTATO", che è sito nella Tabella "Prodotti"
Spero di essere stato chiaro.
Grazie a tutti per l'aiuto.


title: aggiornare un campo tabella da form

text:
"Sylver65" <
in...@mwfsystem.it
> ha scritto nel messaggio
news:crbufh$hg3$1...@balena.cs.interbusiness.it...

------- Non riesco a risolvere il problema.. mi aiutate,,??


title: [OT] Protezione dei file

author: Massimo Piubelli

text:
Parlando con un cliente, è emersa la tematica della protezione dei
documenti.
In sostanza, se domani un dipendente si licenzia e se ne va, prima di farlo
potrebbe portarsi a casa una serie di documenti, file, database, fogli di
excel ecc.
Ho proposto una prima soluzione hardware: rendere difficile l'esportazione
dei file, niente masterizzatori, niente porte USB, niente floppy, niente
modem sui PC.
Secondo voi esiste qualcosa di SW, tipo, non accedo alla cartella condivisa,
ma ad un programma, che mi da il file che gli chiedo io.
Poi lo salvo e lui in realtà lo salva e lo rimette al posto in cui stava.
Così, almeno, si avrebbero informazioni relativamente agli accessi ai file.
Ciao a tutti e grazie per ogni idea,
Massimo


title: [OT] Protezione dei file

text:
Ti prospetto quanto abbiamo fatto noi per una tematica leggermente
diversa, ma
assimilabile.
Server SQL, e file BLOB.
Devi stamparlo, lo esporti in una cartella TEMP, lo stampi e quando lo
chiudi
lo elimini...!
Nessun File è liberamente visibile in questo modo.
Tieni presente che non stò parlando di 2 file, ma di un'archivio
Documenti
di oltre 600.000 File
@Alex


title: [OT] Protezione dei file

text:

Da un mio cliente ho risolto usando il controllo richtext di lebans
In pratica tutta la documentazione viene editata in un file mdb e quindi
viene protocollato e protetto come si vuole
Non esiste quindi notepad o altre cose su cui copiaincollare, e la posta
passa per exchange
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: [OT] Protezione dei file

text:
Alessandro Baraldi wrote:
> Ti prospetto quanto abbiamo fatto noi per una tematica leggermente
> diversa, ma
> assimilabile.
>
> Server SQL, e file BLOB.
Ovvero salvare il tutto dentro una tabella giusto?
> Devi stamparlo, lo esporti in una cartella TEMP, lo stampi e quando lo
> chiudi
> lo elimini...!
Problemino... tra i vari documenti.
C'è anche una serie di disegni di autocad inventor tipo.
Il quale, non lo conosco molto premetto, ma si incazza alquanto se si
cambiano i percorsi dei file.
Sarebbe da fare sempre una cosa in C:\temp giusto?
> Tieni presente che non stò parlando di 2 file, ma di un'archivio
> Documenti
> di oltre 600.000 File
Una domanda, immagino SQL Server dedicato alla cosa in quanto il db penso si
appesantisca non poco con cotanta mole di dati giusto?
> @Alex
Grazie mille per la risposta,
Ciao,
Massimo


title: [OT] Protezione dei file

text:
MA wrote:
> Da un mio cliente ho risolto usando il controllo richtext di lebans
> In pratica tutta la documentazione viene editata in un file mdb e
> quindi viene protocollato e protetto come si vuole
> Non esiste quindi notepad o altre cose su cui copiaincollare, e la
> posta passa per exchange
Ci avevo pensato anche io in origine... ma mi sono scordato di dire che
purtroppo, i documenti non solo solo doc,
ma anche disegni di autocad, database, e fogli di excel :-(
Grazie mille comunque MA
Ciao,
Massimo


title: [OT] Protezione dei file

author: Sergio MAZZA

text:
"Massimo Piubelli" <
massim...@dominio.it
> ha scritto nel messaggio
news:e284bm$qaf$1...@area.cu.mi.it...

Forse un sistema di accesso autenticato ad ogni cartella/file; alla
creazione di un dominio di rete e ai privilegi degli utenti/gruppi utente
che accedono...
Ciao.
--
Sergio MAZZA


title: [OT] Protezione dei file

author: Alessandro Cara

text:

Grosso modo Visual Source Safe fa questo (ci sono altri prodotti simili
(Change Management)). Il problema e' che quando risalvi non cancella la
copia locale, o meglio la cancella se gli dici di cancellarla.
--
ac


title: [OT] Protezione dei file

text:
Sergio MAZZA wrote:
>
>
> Forse un sistema di accesso autenticato ad ogni cartella/file; alla
> creazione di un dominio di rete e ai privilegi degli utenti/gruppi
> utente che accedono...
Grazie Sergio anche a te
al momento l'accesso avviene tramite un domain controller.
Solo che loro possono leggere, quindi possono copiare :-(
> Ciao.
Ciao,
Massimo


title: [OT] Protezione dei file

text:
Alessandro Cara wrote:
> Grosso modo Visual Source Safe fa questo (ci sono altri prodotti
> simili (Change Management)). Il problema e' che quando risalvi non
> cancella la copia locale, o meglio la cancella se gli dici di
> cancellarla.
Effettivamente non ci avevo pensato...
sarebbe buona come cosa.
Ora lo provo
Grazie mille
Ciao,
Massimo


title: [OT] Protezione dei file

text:
"Massimo Piubelli" <
massim...@dominio.it
> ha scritto nel messaggio
news:e28hvj$jqc$1...@area.cu.mi.it...
>
> Grazie Sergio anche a te
> al momento l'accesso avviene tramite un domain controller.
> Solo che loro possono leggere, quindi possono copiare :-(
>
> Ciao,
> Massimo
- Imposta i privilegi dell'utente per non scrivere nulla sull'HD;
- rimuovi il floppy;
- disabilita da bios le porte USB;
- imposta una password all'accesso del Bios;
- rimuovi l'eventuale masterizzatore;
tutto questo da dove si logga...
Ciao.
--
Sergio MAZZA


title: [OT] Protezione dei file

text:
"Massimo Piubelli" <
massim...@dominio.it
> ha scritto nel messaggio
news:e284bm$qaf$1...@area.cu.mi.it...

Hai preso in considerazione software come DeviceLock?
http://www.protect-me.com/it/
Puoi anche provarlo gratis e costa dai 14 ai 32.00 euro.
Ciao, Carlo


title: [OT] Protezione dei file

author: PBsoft

text:

Reputo molto interessante questo approccio e vorrei saperne di più.
Per il momento sono riuscito a capire che, con versioni di SQL < 2005, si
dovevano utilizzare, ad esempio, campi di tipo IMAGE e speciali stored procedure
(riferimento
http://www.absistemi.it/doc/text.aspx
), mentre con SQL 2005
è possibile continuare ad utilizzare, ad esempio, campi di tipo NVARCHAR(MAX),
che permettono di sfruttare le normali SELECT, INSERT, UPDATE.
Immagino che bisognerebbe realizzare una procedura, ad esempio un ADP, che
elenca i documenti memorizzati nel database e permette di aprirli: ma come?
Seleziono un documento da un elenco, copio il campo interessato in una tabella
temporanea, apro Word e gli passo in qualche modo il documento? Ma come gli
passo il documento che, nello specifico, non esiste?
Curiosità: non sarebbe tutto più semplice se si utilizzasse il formato XML
(a scapito della retrocompatibilità)?
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype: pbsoftsolution


title: [OT] Protezione dei file

text:
L'applicativo in questione è stato fatto con SQL6, da qualche mese
upgradato a SQL_2000
La prima interfaccia utente era A97 ed ora è A_2003, ma non un
progetto ADP(MDB/E)
Per l'incapsulamento dei Documenti ho usato ADO(AppendChunk) ma credo
che anche usando
l'oggetto Stream sarebbe altrettanto comodo.
Ovviamente il campo è di tipo Image come hai giustamente osservato.
Per aprirli nulla di piu semplice, basta spararli in una cartella
loacale ed aprirli, la tecnica dei BLOB
importa i file come Binary ed esportandoli nello stesso modo vengono
ricomposti, quindi per
aprirli basta poi una Shell...!
Nel SC trovi un demo di come usare la tecnica dei BLOB con A97(DAO)
trovo più comodo ADO
ma sostanzialmente è la stessa cosa.
Ciao
@Alex


title: [OT] Protezione dei file

text:
Alessandro Baraldi wrote:
> Per aprirli nulla di piu semplice, basta spararli in una cartella
> loacale ed aprirli, la tecnica dei BLOB
> importa i file come Binary ed esportandoli nello stesso modo vengono
> ricomposti, quindi per
> aprirli basta poi una Shell...!
Questo, anche vedendo sulla documentazione di Microsoft, mi sembra
abbastanza chiaro
> Nel SC trovi un demo di come usare la tecnica dei BLOB con A97(DAO)
> trovo più comodo ADO
> ma sostanzialmente è la stessa cosa.
Infatti stavo pensando ad un applicazione basata su ADO.
Tuttavia, a livello di DB, quanto pesa in termini di "pesantezza" del
database?
Ovvero, nel tuo caso, con circa 600 mila file, quanti MB / GB è il db?
> Ciao
> @Alex
Ciao e di nuovo grazie
Massimo


title: [OT] Protezione dei file

text:

Questo bloccherebbe le periferiche...
se non sbaglio.
Mi resterebbe sempre il problema della cartella condivisa :-(
Grazie comunque per la segnalazione, è molto interessante anche questo.
> Ciao, Carlo
Ciao,
Massimo


title: [OT] Protezione dei file

text:
Ciao Massimo.
Non uso un MDB ma SQL_Server2000 e la dimensione è notevole in GB,
inaffrontabile con Access(BE)
Tieni presente che molti documenti sono in formato PDF e TIFF, altri in
DWG, pochissimi in DOC/XLS.
Inizialmente non era stato concepito per un carico di lavoro simile,
quindi è probabile che non sia
il metodo migliore, ma nonostante la pesanteza, la sua funzionalità è
molto elevata.
Ciao
@Alex


title: Scansione di un recordset da VBA

author: il barbi

text:
Nel mio DB mi costruisco manualmente un filtro e lo applico,
ottenendo un sottoinsieme dei record della maschera
principale. Ora vorrei eseguire una certa routine in VBA che
mi scandisce i record trovati uno per uno e fa quello che
deve fare, e ho difficolta' a impostare la routine. Cioe'
come faccio a riferirmi al sottoinsieme appena trovato? come
lo chiamo? devo rifare in VBA quello che ho gia' fatto
manualmente, e cioe' l'applicazione del filtro?
il barbi


title: Scansione di un recordset da VBA

author: Antonio Biso

text:
"il barbi" <
ilb...@tin.it
> ha scritto nel messaggio
news:3YHKb.50746$VW.22...@news3.tin.it...

me.recordsetclone ti restituisce un recordset corrispondente ai record
correntemente visualizzati in maschera
Vedi help
Antonio


title: Aggiornamento ora in una txtbox

author: knives

text:
Salve,
č possibile far sě che una txtbox, nella quale io imposto il valore origine
a Time(), si aggiorni in modo continuativo dall'apertura della form?
Ciao e grazie


title: Aggiornamento ora in una txtbox

author: ALESSANDRO Baraldi

text:
"knives" <x@x.x> ha scritto nel messaggio
news:yX33c.19274$O31.8...@news4.tin.it...

Su evento LOAD della Form scrivi:
Me.TuaTwxtBox=Now()
Ciao.
@Alex.


title: Aggiornamento ora in una txtbox

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:c2ij22$hus$1...@lacerta.tiscalinet.it...

E non manca la gestione dell'evento "su timer" (Me.TuaTwxtBox=Now()) e
l'impostazione a 1000 dell'intervallo timer?
Forse nelle versioni di access superiori alla 97 non servono piů?
Ciao.
--
Sergio MAZZA


title: Aggiornamento ora in una txtbox

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> wrote in message
news:fXe3c.21015$
O31.9...@news4.tin.it
[CUT]
>
> E non manca la gestione dell'evento "su timer" (Me.TuaTwxtBox=Now()) e
> l'impostazione a 1000 dell'intervallo timer?
>
> Forse nelle versioni di access superiori alla 97 non servono più?
>
> Ciao.
Sergio MAZZA
No, solo avevo capito che l'aggiornamento servisse solo all'APERTURA
di conseguenza.......!
Poi in PVT mi ha chiarito la questione e gli ho aggiunto ovviamente
l'EVENTO TIMER, ma con TimeInterval=500....!(Banalità)
Ciao Sergio.
@ALex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: FANTACALCIO

author: HARLOCK

text:
sto elaborando un database per gestire il fantacalcio con MS ACCESS.
ho creato:
una tabella con la lista dei giocatori
una tabella con la lista delle fantasquadre
devo fare
una tabella che contenga le rose di ogni fantasquadra
portiere 1
portiere 2
portiere 3
difensore 1
difensore 2
etc
dove i valori di portiere 1, portiere 2.. vengono pescati, divisi per
ruolo, dalla tabella GIOCATORI, attraverso una casella combinata.
vorrei escludere un giocatore se questo è già stato scelto, cioè un
giocatore può essere scelto solo una volta dalla stessa squadra, se lo
metto nel campo PORTIERE 1, non deve apparire nella lista di scelta
del campo PORTIERE 2
come si fa???


title: FANTACALCIO

text:
"HARLOCK" <
harl...@hotmail.com
> ha scritto nel messaggio
news:836e187a.02111...@posting.google.com...

Per ogni giocatore inserisci il campo 'Scelto' di tipo boolean e vincola
con questo l'sql che genera la lista di giocatori disponibili.
---
leo_duca


title: problema con trasferimenti

author: pol

text:
Questo č il problema che mi assilla :
Ho una tabella formata da 5 o 6 campi e da circa 80.000 righe ( č un listino
METEL )
vorrei posizionarmi su di una riga che scelgo ( scorrendo la tabella )
( la chiamo Tabella 1 )
fare doppio clik e la riga che ho selezionato ( con tutti i suoi campi)
vada dentro ad un'altra tabella ,  ( es. Tabella 2 )
cosě via per tutte le righe che voglio selezionarmi
dalla Tabella 1.  Le righe che vanno nella Tabella 2 dovrebbero accatastarsi
una sull' altra automaticamente senza usare ( se non con routine varie )
filtri ( cosa che ho fatto con EXCEL , ma molto laboriosa )
Per finire inerente alla Tabella 2 dovrebbe esistere un pulsante di RESET
che mi cancelli la/le righe che seleziono ( se per caso sbaglio a cliccare
su una riga della Tabella 1 ).
Premetto che con VBA sono una frana , č un macello , non cavo
un ragno dal buco.
Vorrei chiedere se qualcuno mi insegna una procedura
con ACCESS ( di Office97 ) o qualcosa di VBA di ACCESS.
Ringrazio fin d'ora tutti quelli che mi leggeranno e possibilmente
mi risponderanno anche mandandomi qualche file di esempio.
mia e-mail
ec...@libero.it


title: problema con trasferimenti

author: Carlo Ve

text:
pol ha scritto nel messaggio ...
>Questo č il problema che mi assilla :
>Ho una tabella formata da 5 o 6 campi e da circa 80.000 righe ( č un
listino
>METEL )
>vorrei posizionarmi su di una riga che scelgo ( scorrendo la tabella )
>( la chiamo Tabella 1 )
>fare doppio clik e la riga che ho selezionato ( con tutti i suoi campi)
>vada dentro ad un'altra tabella ,  ( es. Tabella 2 )
>cosě via per tutte le righe che voglio selezionarmi
Direttamente da tabella a tabella ???
mmm mmm  la vedo dura
perche' non vuoi utilizzare i bei controlli che mamma M$ ti mette
disposizione
che ne so Listbox o una sottomaschera elaborata ?
Carlo Ve


title: problema con trasferimenti

author: CarloCos

text:
"Carlo Ve" <
Car...@mail.dex-net.com
> ha scritto nel messaggio
news:8e422h$5lh$2...@serv1.iunet.it...
>
> pol ha scritto nel messaggio ...
> >Questo è il problema che mi assilla :
> >Ho una tabella formata da 5 o 6 campi e da circa 80.000 righe ( è un
> listino
> >METEL )
> >vorrei posizionarmi su di una riga che scelgo ( scorrendo la tabella )
> >( la chiamo Tabella 1 )
> >fare doppio clik e la riga che ho selezionato ( con tutti i suoi campi)
> >vada dentro ad un'altra tabella ,  ( es. Tabella 2 )
> >così via per tutte le righe che voglio selezionarmi
>
>
> Direttamente da tabella a tabella ???
> mmm mmm  la vedo dura
>
> perche' non vuoi utilizzare i bei controlli che mamma M$ ti mette
> disposizione
> che ne so Listbox o una sottomaschera elaborata ?
>
>
>
> Carlo Ve
>
Molto facile con una query di Accodamento che farai partire al doppio clic
di un valore nella ListBox che si alimenta dalla tabella1.
La query che si alimenta dalla prima tabella, avrà nella riga criteri, nella
colonna da te voluta, il valore della ListBox e "Accoda" alla tabella2.
Il gioco è fatto: solo qualche riga di codice.
Ciao, Carlo


title: problema con trasferimenti

text:
Vorrei tanto ringraziare CarloCol , CarloVe
per i loro suggerimenti.
Sopratutto Ringrazio tantissimo  Pabel  che
mi ha rimandato perfettamente funzionante
un database che non riuscivo a fare
E' un genio !
UN SALUTO AL GRUPPO
Ciao bye  POL


title: HO BISOGNO DISPERATO DI AIUTO URGENTE

author: Mirko

text:
Ciao a tutti.
Ho creato una tabella con access e , nella maschera, ho inserito un bottone
che permette di ricercare e visualizzare qualsiasi nominativo inserito della
tabella stessa, semplicemente digitando il nome o il cognome.
Ho poi esportato la maschera e la tabella come file HTML e con sgradita
sorpresa ho scoperto che il bottone "trova" non funzionava più, dato che il
codice di funzionamento non  è stato esportato con la tabella.
Ora mi ritrovo con un bottono privo di funzionalità
Vorrei sapere se sia possibile esportare anche il codice annesso al bottone,
oppure come potrei fare per rendere funzionale la ricerca anche in una
pagina HTML.
Ringrazio anticipatamente tutte le persone che si prodigheranno per aiutarmi
:o)
Ciao
Mirko
renz...@tin.it


title: HO BISOGNO DISPERATO DI AIUTO URGENTE

author: Lbo da casa

text:
>Ho creato una tabella con access e , nella maschera, ho inserito un bottone
>che permette di ricercare e visualizzare qualsiasi nominativo inserito della
>tabella stessa, semplicemente digitando il nome o il cognome.
>
>Ho poi esportato la maschera e la tabella come file HTML e con sgradita
>sorpresa ho scoperto che il bottone "trova" non funzionava più, dato che il
>codice di funzionamento non  è stato esportato con la tabella.
>Ora mi ritrovo con un bottono privo di funzionalità
eccone un altro che crede che le applicazioni fatte con access si
"esportano" in html.
quello che tu vuoi fare non si puo'.  punto.
una cosa e' far girare un'applicazione in un certo ambiente (access su
un pc), un'altra e' far girare un'"applicazione" in html (cosa assurda
solo a pronunciarla).
una cosa e' il web, un'altra il tuo pc.
--------------------------------------------------
ATTENZIONE!
it.comp.database.access diventera' it.comp.appl.access!
cercalo tra i nuovi ng e linkalo!
-----------------------------------
rimuovere NOSPAM. per mandare email
-----------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access


title: HO BISOGNO DISPERATO DI AIUTO URGENTE

text:
Ah quasi mi scordavo,
Dato che è impossibile fare girare applicazioni access sul web.
E' altrettanto impossibile fare girare applicazioni access, (esportate come
asp) anche sul pc di casa?
Attendo risposta.
Mirko


title: HO BISOGNO DISPERATO DI AIUTO URGENTE

text:
ok ho capito.
Quindi per fare un modulo di ricerca simile, access è da escludere?
Mi puoi consigliare un modo alternativo?
grazie
Mirko


title: HO BISOGNO DISPERATO DI AIUTO URGENTE

author: Lbo dall'ufficio

text:
>Dato che è impossibile fare girare applicazioni access sul web.
>E' altrettanto impossibile fare girare applicazioni access, (esportate come
>asp) anche sul pc di casa?
a mio avviso e' impossibile.  credo che sia una specie di presa in
giro da parte di microsoft.  microsoft non dice mai che le
applicazioni di access si portano sul web ma lo lascia capire ai meno
esperti con giri di parole.  non e' un comportamenti in buona fede.
il massimo che si puo' fare e' creare degli activex (ma non so come)
che simulino certi comportamenti della maschera, pero' poi queste cose
funzionano solo con explorer.
installando un server su un qualsiasi pc (anche quello di casa), ad
es. il personal web server per windows 95 che dovrebbe essere free, e'
possibile far girare applicazioni asp.
queste applicazioni asp possono leggere/scrivere dati di database
access, ma anche di altri db attraverso una connessione odbc.
le applicazioni asp sono un misto di html e vbscript (che poi e' un
fratello minore del vb) e/o javascript.
un motivo per il quale non si possono portare applicazioni access e'
che gli oggetti con i quali si interagisce con l'applicazione
(listbox, combo ecc.) sono diverse da quelle delle form html.
comunque prova a vedere su it.comp.www.asp.
-----------------------------------
ATTENZIONE: il ng it.comp.database.access cambia nome e diventa it.comp.appl.access
linkatelo!



title: HO BISOGNO DISPERATO DI AIUTO URGENTE

text:
Ti ringrazio per l'aiuto.
ciao e a presto


title: HO BISOGNO DISPERATO DI AIUTO URGENTE

text:
>Quindi per fare un modulo di ricerca simile, access è da escludere?
dipende...
>Mi puoi consigliare un modo alternativo?
puoi sempre realizzare uno script asp che interroga una base dati
access, pero' devi sfruttare come input gli strumenti delle form html.
--------------------------------------------------
ATTENZIONE!
it.comp.database.access diventera' it.comp.appl.access!
cercalo tra i nuovi ng e linkalo!
-----------------------------------
rimuovere NOSPAM. per mandare email
-----------------------------------



title: CasellaCombinata collegata

author: Motore

text:
        Sto cercando di collegare una casella combinata al contenuto di un
db di nome
        PR1.mdb alla colonna peso , ma continua a darmi questo errore:
                    -
2147217904
  Nessun valore specificato per alcuni
paramentri necessari
    On Error GoTo UserForm_Initialize_Err
     Dim cnn As New ADODB.Connection
     Dim rst As New ADODB.Recordset   ' Occorre caricare la libreria
Mocrosoft Activex Data Objects 2.8
     cnn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data
Source=C:\LAV\PR1.mdb"
     rst.Open "SELECT DISTINCT [Peso] FROM cilll ORDER BY [Peso];", _
             cnn, adOpenStatic
    rst.MoveFirst
     With Me.CasellaCombinata0
'       .Clear
        Do
            .AddItem rst![Department]
            rst.MoveNext
        Loop Until rst.EOF
    End With
UserForm_Initialize_Exit:
    On Error Resume Next
    rst.Close
    cnn.Close
    Set rst = Nothing
    Set cnn = Nothing
    Exit Sub
UserForm_Initialize_Err:
    MsgBox Err.Number & vbCrLf & Err.Description, vbCritical, "Error!"
'   Resume UserForm_Initialize_Exit
End Sub
    Grazie


title: OPERAZIONI

text:
COME FACCIO A METTERE IN UN DATABASE ACCESS delle operazioni che mi deve
svolgere in automatico? (somma, sottrazione, etc?) grazie.


title: OPERAZIONI

text:
"{S}a[V]|0" <
sav...@libero.it
> ha scritto nel messaggio
news:n6R09.11055$lu5.3...@twister1.libero.it...
> COME FACCIO A METTERE IN UN DATABASE ACCESS delle operazioni che mi deve
> svolgere in automatico? (somma, sottrazione, etc?) grazie.
E che vor dě?
Antonio


title: OPERAZIONI

text:
"{S}a[V]|0" <
sav...@libero.it
> ha scritto nel messaggio
news:n6R09.11055$lu5.3...@twister1.libero.it...
> COME FACCIO A METTERE IN UN DATABASE ACCESS delle operazioni che mi deve
> svolgere in automatico? (somma, sottrazione, etc?) grazie.
>
fai delle funzioni somma sottrazione ecc.........


title: OPERAZIONI

text:
"@----- Pinco --@-- Pallino -----@" <
tos...@libero.it
> ha scritto nel
messaggio news:DfT09.11006$n04.3...@twister2.libero.it...

Sě, va beh...
mo dě che hai capito quello che vuole....
Antonio


title: OPERAZIONI

text:
sono scarso come si inseriscono?
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:yJT09.11113$n04.3...@twister2.libero.it...



title: OPERAZIONI

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:yJT09.11113$n04.3...@twister2.libero.it...

ok non ho capito, perň ho capito che vuole fare somm,e sottrazzioni
ecc......
quindi funzioni del tipo
function somma (i as integer, j as integer) as integer
somma= i + j
end function
poi la richiami in ogni punto del programma cosi
somma(3,4)


title: OPERAZIONI

text:
"@----- Pinco --@-- Pallino -----@" <
tos...@libero.it
> ha scritto nel
messaggio news:K8019.12758$n04.3...@twister2.libero.it...
>
> > Sě, va beh...
> > mo dě che hai capito quello che vuole....
> >
> > Antonio
> >
>
> ok non ho capito, perň ho capito che vuole fare somm,e sottrazzioni
> ecc......
>
> quindi funzioni del tipo
>
> function somma (i as integer, j as integer) as integer
> somma= i + j
> end function
>
> poi la richiami in ogni punto del programma cosi
>
> somma(3,4)
Beh, questa mi sembra una cosa molto furba....
Antonio


title: OPERAZIONI

text:
"{S}a[V]|0" <
sav...@libero.it
> ha scritto nel messaggio
news:A6Y09.12158$n04.3...@twister2.libero.it...
> sono scarso come si inseriscono?
Scrivi DOPO il quoting!!!
Antonio


title: OPERAZIONI

author: Emyr

text:
On Sun, 28 Jul 2002 12:05:39 GMT, "{S}a[V]|0" <
sav...@libero.it
>
wrote:
>COME FACCIO A METTERE IN UN DATABASE ACCESS delle operazioni che mi deve
>svolgere in automatico? (somma, sottrazione, etc?) grazie.
>
 c:a+b
d:c*b
etc...
Saluti.
Emanuele.


title: [parzialmente OT, ma pur sempre di office si tratta] gruppo vivo per outlook?

author: Ammammata

text:
il mio server news (solani) ne mostra una dozzina di vari paesi
quelli più frequentati sono purtroppo pieni di spam pare non ci sia traccia
di discussioni serie come qui da noi, gli altri paiono morti da sempre

io ci ho provato lo stesso, scrivendo un post su
microsoft.public.outlook.general:

the inbox folder contained around one thousand mails, each one with its own
category (about 20 different)
the a.m. has been copied to the new PST, all categories are still present
on the messages, I can group and sort, but colors are missing
in addition, if I try to assign one of the previous categories to new
incoming mails, the old ones do not show in the category list

question: how can I collect the old categories from Inbox and activate them
in the new PST? the "New note" trick doesn't work because, as I wrote
above, the old categories can't be assigned

ma visto che resterà senza risposte, dove si può andare a chiedere?

--
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
-=- -=- -=- -=- -=- -=- -=- -=- - -=-
........... [ al lavoro ] ...........


title: errore data

text:
 Ho realizzato questa funzione per il calcolo dei giorni in mesi
considerando anche i 15 giorni, che vengono calcolati per un mese.
Purtroppo se parto dal 2002 al 2006 tutto OK , ma se la data va dal
1999 2001 0 2001 al 2006 mi considera un mese in più.
Dove sbaglio? Grazie
Dim a As Double
Dim b As Double
    a = (Me.data_fine - Me.inizio)
'arrotondamento dei 15 giorni
    b = Int([a] / 30) + IIf((([a] / 30) - Int([a] / 30) >= 0.5), 1, 0)
     Me.calcolo = b


title: errore data

author: Paolo Dal Bosco

text:
<
gepp...@gmail.com
> ha scritto nel messaggio
news:1158249563.2...@k70g2000cwa.googlegroups.com...
Ho realizzato questa funzione per il calcolo dei giorni in mesi
considerando anche i 15 giorni, che vengono calcolati per un mese.
Purtroppo se parto dal 2002 al 2006 tutto OK , ma se la data va dal
1999 2001 0 2001 al 2006 mi considera un mese in piů.
Dove sbaglio? Grazie
Dim a As Double
Dim b As Double
    a = (Me.data_fine - Me.inizio)
'arrotondamento dei 15 giorni
    b = Int([a] / 30) + IIf((([a] / 30) - Int([a] / 30) >= 0.5), 1, 0)
     Me.calcolo = b
--------------------------------------------
l'unica cosa che vedo non corretta sono le parentesi quadre.
non ci dovrebbero essere.
b = Int(a]/ 30) + IIf(((a / 30) - Int(a / 30) >= 0.5), 1, 0)
poi non comprendo a cosa possa servire,
Ciao
Paolo


title: errore data

text:
"Paolo Dal Bosco" <
bos...@tin.it
> ha scritto nel messaggio
news:45097fab$0$47972$4faf...@reader3.news.tin.it...

errata corrige:
b = Int(a/ 30) + IIf(((a / 30) - Int(a / 30) >= 0.5), 1, 0)
ciao
Paolo


title: errore data

text:
Paolo Dal Bosco ha scritto:
> "Paolo Dal Bosco" <
bos...@tin.it
> ha scritto nel messaggio
> news:45097fab$0$47972$4faf...@reader3.news.tin.it...
> >
> > <
gepp...@gmail.com
> ha scritto nel messaggio
> > news:1158249563.2...@k70g2000cwa.googlegroups.com...
> > Ho realizzato questa funzione per il calcolo dei giorni in mesi
> > considerando anche i 15 giorni, che vengono calcolati per un mese.
> > Purtroppo se parto dal 2002 al 2006 tutto OK , ma se la data va dal
> > 1999 2001 0 2001 al 2006 mi considera un mese in più.
> > Dove sbaglio? Grazie
> >
> > Dim a As Double
> > Dim b As Double
> >
> >     a = (Me.data_fine - Me.inizio)
> > 'arrotondamento dei 15 giorni
> >
> >     b = Int([a] / 30) + IIf((([a] / 30) - Int([a] / 30) >= 0.5), 1, 0)
> >
> >      Me.calcolo = b
> > --------------------------------------------
> > l'unica cosa che vedo non corretta sono le parentesi quadre.
> > non ci dovrebbero essere.
> > b = Int(a]/ 30) + IIf(((a / 30) - Int(a / 30) >= 0.5), 1, 0)
> > poi non comprendo a cosa possa servire,
> >
> > Ciao
> > Paolo
> >
> errata corrige:
> b = Int(a/ 30) + IIf(((a / 30) - Int(a / 30) >= 0.5), 1, 0)
>
> ciao
> Paolo
Sarà un problema di interfaccia grafica, ma le parentesi sono corrette
 b = Int([a] / 30) + IIf((([a] / 30) - Int([a] / 30) >= 0.5), 1, 0)
Il tutto mi sreve per uncalcolo particolare da attribuire a persone,
che sefanno quindi giorni vale un mese, 45 giorni due mesi 60 giorni
due mesi tutto è OK  quando il clcolo va dal 2002 al 2006 ma dal 2001
a ritroso si porta un mese in più. Spero di essere stato più chiaro


title: errore data

text:
Sarà un problema di interfaccia grafica, ma le parentesi sono corrette
>  b = Int([a] / 30) + IIf((([a] / 30) - Int([a] / 30) >= 0.5), 1, 0)
> Il tutto mi sreve per uncalcolo particolare da attribuire a persone,
> che sefanno quindi giorni vale un mese, 45 giorni due mesi 60 giorni
> due mesi tutto è OK  quando il clcolo va dal 2002 al 2006 ma dal 2001
> a ritroso si porta un mese in più. Spero di essere stato più chiaro
geppo...@gmail.com
 ha scritto:



title: errore data

text:
<
gepp...@gmail.com
> ha scritto nel messaggio
news:1158251058....@i42g2000cwa.googlegroups.com...


----------------------------------------------------------
non non è un problema di interfacia grafica, con le parentesi quadre
si prende il valore di un campo non di una varialile,
devi avere nella maschera un campo che si chiama "a"
Ciao
Paolo


title: errore data

text:


Questa funzione parte dopo l'inserimento della data d'inizio nella
form. Tutto va bene per la date dal 2002, perchè la funzione non va  a
ritroso e si porta un mese.


title: errore data

text:
Il tutto funziona perfettamente dopo l'inserimento della data inzio,
per i periodi che vanno dal 2002 al 2006, ma dal 2001 a ritroso si
porta un mese in più nel calcolo non riesco a capire il perchè.



title: errore data

text:
<
gepp...@gmail.com
> ha scritto nel messaggio
news:1158251225....@i3g2000cwc.googlegroups.com...

geppo...@gmail.com
 ha scritto:

-------------------------------
il problema sta nell'IIF
se provi con due anni va bene, b=24
3 anni .> b=37  che è un mese in più
 e poi l'errore si autoincrementa.
Ciao
Paolo


title: errore data

text:
Cosa devo fare?



title: errore data

text:
<
gepp...@gmail.com
> ha scritto nel messaggio
news:1158253529.3...@h48g2000cwc.googlegroups.com...
Cosa devo fare?
Paolo Dal Bosco ha scritto:
> <
gepp...@gmail.com
> ha scritto nel messaggio
> news:1158251225....@i3g2000cwc.googlegroups.com...
> Sarŕ un problema di interfaccia grafica, ma le parentesi sono corrette
> >  b = Int([a] / 30) + IIf((([a] / 30) - Int([a] / 30) >= 0.5), 1, 0)
> > Il tutto mi sreve per uncalcolo particolare da attribuire a persone,
> > che sefanno quindi giorni vale un mese, 45 giorni due mesi 60 giorni
> > due mesi tutto č OK  quando il clcolo va dal 2002 al 2006 ma dal 2001
> > a ritroso si porta un mese in piů. Spero di essere stato piů chiaro
>
>
geppo...@gmail.com
 ha scritto:
>
> > Paolo Dal Bosco ha scritto:
> >
> > > "Paolo Dal Bosco" <
bos...@tin.it
> ha scritto nel messaggio
> > > news:45097fab$0$47972$4faf...@reader3.news.tin.it...
> > > >
> > > > <
gepp...@gmail.com
> ha scritto nel messaggio
> > > > news:1158249563.2...@k70g2000cwa.googlegroups.com...
> > > > Ho realizzato questa funzione per il calcolo dei giorni in mesi
> > > > considerando anche i 15 giorni, che vengono calcolati per un mese.
> > > > Purtroppo se parto dal 2002 al 2006 tutto OK , ma se la data va dal
> > > > 1999 2001 0 2001 al 2006 mi considera un mese in piů.
> > > > Dove sbaglio? Grazie
> > > >
> > > > Dim a As Double
> > > > Dim b As Double
> > > >
> > > >     a = (Me.data_fine - Me.inizio)
> > > > 'arrotondamento dei 15 giorni
> > > >
> > > >     b = Int([a] / 30) + IIf((([a] / 30) - Int([a] / 30) >= 0.5), 1,
0)
> > > >
> > > >      Me.calcolo = b
> > > > --------------------------------------------
> > > > l'unica cosa che vedo non corretta sono le parentesi quadre.
> > > > non ci dovrebbero essere.
> > > > b = Int(a]/ 30) + IIf(((a / 30) - Int(a / 30) >= 0.5), 1, 0)
> > > > poi non comprendo a cosa possa servire,
> > > >
> > > > Ciao
> > > > Paolo
> > > >
> > > errata corrige:
> > > b = Int(a/ 30) + IIf(((a / 30) - Int(a / 30) >= 0.5), 1, 0)
> > >
> > > ciao
> > > Paolo
> > Sarŕ un problema di interfaccia grafica, ma le parentesi sono corrette
> >  b = Int([a] / 30) + IIf((([a] / 30) - Int([a] / 30) >= 0.5), 1, 0)
> > Il tutto mi sreve per uncalcolo particolare da attribuire a persone,
> > che sefanno quindi giorni vale un mese, 45 giorni due mesi 60 giorni
> > due mesi tutto č OK  quando il clcolo va dal 2002 al 2006 ma dal 2001
> > a ritroso si porta un mese in piů. Spero di essere stato piů chiaro
> -------------------------------
> il problema sta nell'IIF
> se provi con due anni va bene, b=24
> 3 anni .> b=37  che č un mese in piů
>
>  e poi l'errore si autoincrementa.
>
> Ciao
> Paolo
---------------------------------------
onestamente non ho capito bene l'uso che ne farai
> > Il tutto mi sreve per uncalcolo particolare da attribuire a persone,
> > che sefanno quindi giorni vale un mese, 45 giorni due mesi 60 giorni
farei piuttosto un controllo sui giorni
se <15 diventa 30
se >15 e <45 diventa 30
se >45 diventa 40
s2 =30 rimane 30
e cosě via.
E' solo un'idea
Buona serata
Paolo


title: errore data

author: Alessandro Baraldi

text:
gepp...@gmail.com
 ha scritto:

Vedi se la mia soluzione nel nuovo Post può andare...!
@Alex


title: errore data

text:
Non la trovo puoi darmi inicazioni?



title: [A2000 : W2000] Errore runtime 3000 - errore riservato (-1104)

author: Il Giova

text:
Salve a tutti,
vi espongo il mio problema nella speranza che qualche anima pia sia così
gentile da darmi una dritta :
In una maschera di tipo continuo ho la necessità di aprire una seconda
maschera da cui prendo un valore diffente a seconda del variare di un campo
della prima.
Siccome sono molto scarso nel programmare, da sempre, uso questo
"stratagemma" per prelevare un valore da un'altra maschera, ovvero :
- dalla prima maschera lancio l'apertura della seconda maschera con un
filtro
- la seconda maschera si apre ed esegue il codice impostato sull'evento
apertura che identifica il valore da copiare e lo mette nella prima maschera
- si chiude la seconda maschera
- prosegue il codice della prima
Tutto ciò funziona per "automatismi" inferiori a 30 volte.
Se questa operazione viene ripetuta in un ciclo per più di 30 volte mi da il
seguente errore aprendo la seconda maschera :
errore runtime 3000
errore riservato (-1104), non ci sono messaggi per questo errore
A qualcuno di Voi è mai capitato? Qual'è il motivo per cui genera questo
errore?
C'è forse un modo più "cristiano" per estrarre i valori da una seconda
maschera senza abbandonare il codice della prima maschera corrente?
(ho provato ad usare la funzione dlookup però non riesco ad usare l'AND o
l'OR nel criterio...)
Vi ringrazio a tutti per l'attenzione
Saluti
Sergio Della Giora


author: Salvatore

text:
"Il Giova" <
sergio_d...@infinito.it
> ha scritto nel messaggio
news:bs6a3g$9smro$1...@ID-84518.news.uni-berlin.de...

Usa dlookup. Se non riesci a scrivere la sintassi con and e or (comunque nei
post di novembre c'era qualcosa) usa una query per impostare i criteri e fai
riferimento con il dlookup a detta query. Altrimenti posta il problema in
modo più dettagliato, specificando i criteri di prelevamento del valore.
Ciao
Salvatore


author: MA

text:

Dlookup è la strada migliore.
Dai qualche elemento in più e ti aiutiamo a scrivere l'istruzione.
MAssimiliano


author: David

text:
"Il Giova" <
sergio_d...@infinito.it
> ha scritto nel messaggio
news:bs6a3g$9smro$1...@ID-84518.news.uni-berlin.de...

Quando apri la seconda maschera metti il valore in una variabile che puoi
usare ovunque
ciao


text:
[stra-cut]
Innanzitutto Vi ringrazio per avermi risposto. Dai Vs suggerimenti ho capito
che la strada giusta sia quella di imparare bene ad usare il comando
dlookup.
Cerco ora di esporVi la mia esigenza :
ho due tabelle :
"calcolo" con i campi : id, vertenza, datarif,  paga...
"paga" con i campi : id, vertenza, dataini, dataend, totale...
Ho una maschera aperta su calcolo dove su aggiornamento di un campo inserito
dall'utente mi deve estrapolare il campo totale dalla tabella paga con il
seguente criterio :
vertenza = vertenza
dataini<datarif <dataend
La sintassi che uso č la seguente :
DLookup("totale", "paga", "vertenza = " & Me.vertenza.Value And "dataini < "
& Me.datarif.Value And "dataend > " & Me.datarif.Value)
e l'errore che mi visualizza č il seguente :
"Errore di runtime '13' - Tipo non corrispondente"
Ho provato a mettere anche la & per separare gli AND dal resto delle
parole... ma non mi accetta neanche la sintassi!
Dove sbaglio? Grazie a tutti!
Saluti
Sergio Della Giora