title: Disabilitare Combo con testo via Codice

text:
If IsNull(Me.Parent.IdAnagrafica) Then Exit Sub ' serve per evitare
errore in creazione nuova ditta
MyCount = DCount("[NomeCognome]", "T_Lavoratori",
"[Id_Anagrafica_Lavoratori]= " & Me.Parent.IdAnagrafica)
If Me.Parent.N_Lavoratori < 15 Or (IsNull(Me.Parent.N_Lavoratori) And
MyCount < 15) Then
  Me.VerbaleEmergenza.SetFocus
  Me.RiunionePeriodica_stato.Enabled = False
  Me.RiunionePeriodica_data.Enabled = False
  Me.RiunionePeriodica_durata.Enabled = False
Else
  Me.VerbaleEmergenza.SetFocus
  Me.RiunionePeriodica_stato.Enabled = True
  Me.RiunionePeriodica_data.Enabled = True
  Me.RiunionePeriodica_durata.Enabled = True
End If
Succede che il campo combo RiunionePeriodica_stato rimane abilitato se
contiene qualcosa
Si disabilita solo dopo che gli ho cancellato il testo dentro
Io invece vorrei che il testo rimanesse e la combo si disabilitasse
(facendo veder in grigetto il testo) come fanno del reto il campo
RiunionePeriodica_data e RiunionePeriodica_durata
Sperando di essere stato chiaro e ringraziando Todos....
F.


title: Disabilitare Combo con testo via Codice

text:

Inizio a sospettare di essere stato poco chiaro :-( sniff
Riprovo:
PROBLEMA
Casella combinata da disabilitare sulla base del valore di un altro
campo
(if ... then ... me. casellacombianta.enabled=false)
DOMANDE
perchè si disabilita solo se è vuota? ovvero:
se la casellacombinata è vuota si disabilita
se la casella è piena, posso cambiarla a mio paicimento fino a quando
non cancello tutto il contenuto (appena cancello si disabilita)


title: Disabilitare Combo con testo via Codice

text:
of
foreigners, were not persecuted in this manner, so, by a kind of mad
infatuation the Government seemed bent on encouraging and developing
immoral women and driving decent women either into prostitution, or,
by the reign of terror, out of the Colony. In 1869, five women
were charged before the Registrar General, and three of them were
discharged as innocent. Then the Registrar General decided _to make
the punishment of the first of the remaining two depend upon the state
of health of the second_. This second was examined and found diseased,
and in consequence of that fact, the first one was fined fifty dollars
or two months' imprisonment! The Commission speaks of this as a
"somewhat curious" case. We wonder how the punished woman described
it. Afterwards, the case was reopened, and "evidence was given
calculated to throw the gravest doubts on the credibility of the
informers" against these five women. What was then done? Were the
informers punished for giving false evidence designed to work
incalculable injury to five innocent women? Not at all. A few days
later the same informers were employed again as witnesses, and secured
the conviction of three more women. In one case, in 1870, it was
proved that an informer had entered a house and made an indecent
assault upon a woman, doubtless expecting to get his reward as usual.
But he was fined ten pounds instead. But how many others may have
done the same thing under circumstances where


title: Disabilitare Combo con testo via Codice

text:
Ho scoperto che dipende dalla formattazione condizionale:
Se il valore del campo ricade in una delle condizioni il campo non
viene disabilito, altrimenti si..
F.


title: Disabilitare Combo con testo via Codice

text:

Per cui termino il mio soliloquio, considerando che ho risolto
aggiungendo al codice:
di disattivazione della combo anche la rimozione della formattazione
condizionale (formatcondition.delete)
di riattivazione della combo  il ripristino delle formatcondition
(formatcondition.add...)
Grazie mille a me! hihihiiihhi
F.


title: Scrivere valore campo sul report su condizione

author: vuLCan Karayan

text:
Grazie al consiglio di Roberto, uso
=IIf([NomeCampo]>0;"";[NomeCampo])
nella proprietà Origine Controllo per visualizzare
un valore di campo se questo è maggiore di 0.
Vorrei però sostituire il valore non visualizzato
con una label.
L'intenzione è questa.
Una label nascosta che compare quando NomeCampo=<0 e quindi [NomeCampo] non
è visualizzato..
Sto provando con la proprietà SuFormattazione del report: sono sulla strada
giusta?
Tenete conto che il report visualizza record riga per riga.


text:
> Grazie al consiglio di Roberto, uso
> =IIf([NomeCampo]>0;"";[NomeCampo])
> nella proprietą Origine Controllo per visualizzare
> un valore di campo se questo č maggiore di 0.
Come non detto..
Ho messo
 =IIf([NomeCampo]>0;"";[NomeCampo])
nell'origine controllo di una casella di testo di un report
e mi viene fuori l'errore..
Dobrebbe essere..
Se NomeCampo>0 allora visualizza [NomeCampo]
No?


text:
> e mi viene fuori l'errore..
L'errore, per la cronaca è:
La proprietà Origine controllo del controllo selezionato è un'espressione
che include un riferimento al controllo. A causa del riferimento circolare
l'espressione avrà esito negativo.


title: memorizzazione formato data

author: fly

text:
e' possibile memorizzare il formato data cosi': gg/mm/aaaa
invece che con i minuti e secondi?
perche' se faccio l'exportazione in file  txt me lo visualizza cosi':
gg/mm/aa 00.00.00
anche se nella def della tabella ho scelto formato data in cifre gg/mm/aa
e non il formato generico.
grazie
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: memorizzazione formato data

author: Sib

text:
"fly" <
pip...@pluto.com
> ha scritto nel messaggio
> e' possibile memorizzare il formato data cosi': gg/mm/aaaa
> invece che con i minuti e secondi?
> perche' se faccio l'exportazione in file  txt me lo visualizza cosi':
> gg/mm/aa 00.00.00
Casomai la "eSportazione"
> anche se nella def della tabella ho scelto formato data in cifre gg/mm/aa
> e non il formato generico.
Usa la proprieta' formato del campo da esportare.
Sib


title: memorizzazione formato data

text:
Sib ha scritto:
> > perche' se faccio l'exportazione in file  txt me lo visualizza cosi':
> > gg/mm/aa 00.00.00
> Casomai la "eSportazione"
l'inglesizzazione avanza    :-(
> > anche se nella def della tabella ho scelto formato data in cifre gg/mm/aa
> > e non il formato generico.
> Usa la proprieta' formato del campo da esportare.
l'ho usata sia a livello della def del campo della tabella, che del campo
di immissione della maschera....quando esporto ci sono sempre i minuti :-(



title: memorizzazione formato data

text:
"fly" <
pip...@pluto.com
> ha scritto nel messaggio
> > > perche' se faccio l'exportazione in file  txt me lo visualizza cosi':
> > > gg/mm/aa 00.00.00
>
> > Casomai la "eSportazione"
>
> l'inglesizzazione avanza    :-(
>
> > > anche se nella def della tabella ho scelto formato data in cifre
gg/mm/aa
> > > e non il formato generico.
>
> > Usa la proprieta' formato del campo da esportare.
>
> l'ho usata sia a livello della def del campo della tabella, che del campo
> di immissione della maschera....quando esporto ci sono sempre i minuti :-(
Crea una query con un campo =Format(TuaData;"gg/mm/aaaa") ed esporta quella.
Sib


title: memorizzazione formato data

text:
Sib ha scritto:
> "fly" <
pip...@pluto.com
> ha scritto nel messaggio
> > > > perche' se faccio l'exportazione in file  txt me lo visualizza cosi':
> > > > gg/mm/aa 00.00.00
> >
> > > Casomai la "eSportazione"
minuti :-(
> Crea una query con un campo =Format(TuaData;"gg/mm/aaaa") ed esporta quella.
> Sib
infatti ho fatto una query select (tutti i campi della tabella)
dove le date sono nel formato da te dato,ma volevo sapere se a livello di
memorizzazione  si poteva evitare di memorizzare le ore e i minuti
in modo da esportare la tabella cosi' come e' memorizzata,
altrimenti avevo pensato di modificare il campo data in char di 10
e fare un controllo prima dell'immissione del dato con isdate....
siamo sicuri che il tipo date memorizzi per forza i secondi?
grazie



title: memorizzazione formato data

text:
"fly" <
pip...@pluto.com
> ha scritto nel messaggio
> Sib ha scritto:
>
> > "fly" <
pip...@pluto.com
> ha scritto nel messaggio
> > > > > perche' se faccio l'exportazione in file  txt me lo visualizza
cosi':
> > > > > gg/mm/aa 00.00.00
> > >
> > > > Casomai la "eSportazione"
> minuti :-(
>
> > Crea una query con un campo =Format(TuaData;"gg/mm/aaaa") ed esporta
quella.
>
> > Sib
> infatti ho fatto una query select (tutti i campi della tabella)
> dove le date sono nel formato da te dato,ma volevo sapere se a livello di
> memorizzazione  si poteva evitare di memorizzare le ore e i minuti
> in modo da esportare la tabella cosi' come e' memorizzata,
No a meno di non utilizzare il formato data. Ti sconsiglio di farlo perche'
perderesti moltissime possibilita' (primi fra tutti l'ordinamento e i filtri
da data a data)
Sib


title: memorizzazione formato data

text:
Sib ha scritto:
> "fly" <
pip...@pluto.com
> ha scritto nel messaggio
> > Sib ha scritto:
> >
> > > "fly" <
pip...@pluto.com
> ha scritto nel messaggio
> > > > > > perche' se faccio l'exportazione in file  txt me lo visualizza
> cosi':
> > > > > > gg/mm/aa 00.00.00
> > > >
> > > > > Casomai la "eSportazione"
> > minuti :-(
> >
> > > Crea una query con un campo =Format(TuaData;"gg/mm/aaaa") ed esporta
> quella.
> >
> Sib
grrrr  facendo l'esportazione della query a campi di lunghezza fissa
per il campo data mi mette 255 caratteri....



title: ordinare in base alla data

author: bcla

text:
Ciao a tutti.
sul una  tabella  ho la necessità di ordinare i record in base alla
data, ma  deve essere in sequenza
tutti i giorni di un mese poi tutti i giorni dell'altro mese e così
via
i dati sono in questo fornato 01-12-1999
utilizzando il comando ordina in modo crescente decresente, mi sistema
tutti i gioni 01 di tutti i mesi di tutti gli anni, poi il giono 02 di
tutti i mesi  ecc.
come si potrebbe fare?
grazie
Bcla


title: ordinare in base alla data

author: Dino

text:

Ti crei una query in base alla tab in esame,vai poi nella struttura
della query e nel campo "data" nella riga ordinamento metti crescente.
Dino


title: ordinare in base alla data

author: Antonio Biso

text:
"Dino" <
verreng...@alice.it
> ha scritto nel messaggio
news:66299cae-e49a-4816...@k30g2000vbn.googlegroups.com...


Dino
No Dino, questa è la stessa cosa fatta con ordina della tabella.
Il problema è che lui la data in realtà non è una data, ma un testo e quindi
in ordine lessicografico gli ordina proprio come dice lui.
Allora ok l'idea della query, ma deve creare un campo calcolato che formatti
in data il campo testo format(campo;"dd-mm-yy") e in quel campo calcolato
mettere l'ordinamento
Preciso cmq che l'informatico scaltro, le date messe in testo le scrive in
un altro ordine
1999-12-01
In questo modo anche se la data è un testo l'ordinamento è quello giusto
Antonio


title: ordinare in base alla data

text:
On 26 Nov, 09:59, "Antonio Biso" <
ab...@libero.it
> wrote:
> "Dino" <
verrengia.d...@alice.it
> ha scritto nel messaggionews:66299cae-e49a-4816...@k30g2000vbn.googlegroups.com...
> On 26 Nov, 06:30, bcla <
brotto...@gmail.com
> wrote:
>
>
>
>
>
> > Ciao a tutti.
>
> > sul una tabella ho la necessit di ordinare i record in base alla
> > data, ma deve essere in sequenza
> > tutti i giorni di un mese poi tutti i giorni dell'altro mese e cos
> > via
>
> > i dati sono in questo fornato 01-12-1999
>
> > utilizzando il comando ordina in modo crescente decresente, mi sistema
> > tutti i gioni 01 di tutti i mesi di tutti gli anni, poi il giono 02 di
> > tutti i mesi ecc.
>
> > come si potrebbe fare?
> > grazie
> > Bcla
>
> Ti crei una query in base alla tab in esame,vai poi nella struttura
> della query e nel campo "data" nella riga ordinamento metti crescente.
>
> Dino
>
> No Dino, questa la stessa cosa fatta con ordina della tabella.
> Il problema che lui la data in realt non una data, ma un testo e quindi
> in ordine lessicografico gli ordina proprio come dice lui.
>
> Allora ok l'idea della query, ma deve creare un campo calcolato che formatti
> in data il campo testo format(campo;"dd-mm-yy") e in quel campo calcolato
> mettere l'ordinamento
>
> Preciso cmq che l'informatico scaltro, le date messe in testo le scrive in
> un altro ordine
>
> 1999-12-01
>
> In questo modo anche se la data un testo l'ordinamento quello giusto
>
> Antonio- Nascondi testo citato
>
> - Mostra testo citato -
AAAhhhhh mi ha fregato.Convinto che il campo fosse come proprieta'
"Data ora".E allora come dice qualcuno di mia conoscenza "PORCA
PUPAZZA" basta cambiare prop. al campo e il gioco e' fatto.Che senso a
fare un campo data con prop. testo??? Mahhh
Dino
NB:Antonio io ho ancora bisogno di te.Il post dove andavo a stampare
solo il record selezionato nella riga corretta (che mi avevi risolto
con il codice) mi da ancora prob.
Puoi dare un 'occhio al post gentilmente (basta un click nei meno
recenti)
Grazie Dino eeeeeeee..."VOTA ANTONIO" "VOTA ANTONIO"


title: ordinare in base alla data

text:

> Grazie Dino eeeeeeee..."VOTA ANTONIO" "VOTA ANTONIO"- Nascondi testo citato
>
> - Mostra testo citato -
Forse non mi sono spiegato bene. Mi interessa che l'ordine sia:
01/01/ NON mi deve contare l'anno
01/02/
e non
01/12/1954
09/01/1960
grazie


title: ordinare in base alla data

text:

> grazie- Nascondi testo citato
>
> - Mostra testo citato -
Fammi capire il campo in esame ha proprieta' testo o data/ora???'
Perche' se interessa a te un aggiornamento per mese puoi fare un campo
mese (nella query campo calcolato : Month ([Tuocampodata])) con
ordinamento crescente e dovresti ragguiunger il tuo scopo.
Dino


title: ordinare in base alla data

author: CIDI

text:
"bcla" <
brot...@gmail.com
> ha scritto nel messaggio
news:e567f781-fffa-49e3...@q14g2000yqe.googlegroups.com...
> On 26 Nov, 10:10, Dino <
verrengia.d...@alice.it
> wrote:
>> On 26 Nov, 09:59, "Antonio Biso" <
ab...@libero.it
> wrote:
>>
>
> Forse non mi sono spiegato bene. Mi interessa che l'ordine sia:
nel tuo primo post hai detto:
> i dati sono in questo fornato 01-12-1999
che usano come delimitatore il "-"
mentre adesso hanno "/"
> 01/01/ NON mi deve contare l'anno
> 01/02/
>
>
> e non
> 01/12/1954
> 09/01/1960
prova a mettere un campo calcolato nella query:
Ordinamento:Format([nomecampodata];"ddmm")
ciao
Daniele


title: ordinare in base alla data

text:
"CIDI" <
dado...@spamtin.it
> ha scritto nel messaggio
news:4cefb732$0$12803$4faf...@reader5.news.tin.it...
>
> nel tuo primo post hai detto:
>> i dati sono in questo fornato 01-12-1999
>
> che usano come delimitatore il "-"
>
> mentre adesso hanno "/"
>
>> 01/01/ NON mi deve contare l'anno
>> 01/02/
>>
>>
>> e non
>> 01/12/1954
>> 09/01/1960
Santa pazienza...
Antonio


title: ordinare in base alla data

text:
On 26 Nov, 14:36, "Antonio Biso" <
ab...@libero.it
> wrote:
> "CIDI" <
dadonz...@spamtin.it
> ha scritto nel messaggionews:4cefb732$0$12803$4faf...@reader5.news.tin.it...
>
>
>
> > nel tuo primo post hai detto:
> >> i dati sono in questo fornato 01-12-1999
>
> > che usano come delimitatore il "-"
>
> > mentre adesso hanno "/"
>
> >> 01/01/ NON mi deve contare l'anno
> >> 01/02/
>
> >> e non
> >> 01/12/1954
> >> 09/01/1960
>
> Santa pazienza...
>
> Antonio
Si deve dire "Porca pupazza"
Dino


title: ordinare in base alla data

text:
"Dino" <
verreng...@alice.it
> ha scritto nel messaggio
news:e385ee68-b040-438e...@p38g2000vbn.googlegroups.com...

Quando ti arrabbi, quando sei talmente rassegnato che gnaaaafai manco ad
arrabbiarti allora č santa pazienza...
poi ti guardo il thread del report
Antonio


title: ordinare in base alla data

text:
On 26 Nov, 17:20, "Antonio Biso" <
ab...@libero.it
> wrote:
> "Dino" <
verrengia.d...@alice.it
> ha scritto nel messaggionews:e385ee68-b040-438e...@p38g2000vbn.googlegroups.com...
>
>
>
> > On 26 Nov, 14:36, "Antonio Biso" <
ab...@libero.it
> wrote:
> >> "CIDI" <
dadonz...@spamtin.it
> ha scritto nel
> >> messaggionews:4cefb732$0$12803$4faf...@reader5.news.tin.it...
>
> >> > nel tuo primo post hai detto:
> >> >> i dati sono in questo fornato 01-12-1999
>
> >> > che usano come delimitatore il "-"
>
> >> > mentre adesso hanno "/"
>
> >> >> 01/01/ NON mi deve contare l'anno
> >> >> 01/02/
>
> >> >> e non
> >> >> 01/12/1954
> >> >> 09/01/1960
>
> >> Santa pazienza...
>
> >> Antonio
>
> > Si deve dire "Porca pupazza"
>
> > Dino
>
> Quando ti arrabbi, quando sei talmente rassegnato che gnaaaafai manco ad
> arrabbiarti allora è santa pazienza...
>
> poi ti guardo il thread del report
>
> Antonio- Nascondi testo citato
>
> - Mostra testo citato -
OK!!!Ma il mio ero un "Porca pupazza" senza interesse
Dino


title: gestione ferie

author: P. Bianchi

text:
Arriva la stagione delle vacanze... vorrei sapere se qualcuno ha gia'
sviluppato applicazioni per programamre le ferie dei dipendenti
(postazioni di lavoro, skill dei lavoratori a ricoprire una certa
postazione, richieste dei periodi di ferie, controllo se una postazione
rimane sguarnita di operatori skillati, ecc.) e in tal caso come ha
impostato il problema in Access.
Oppure se siete a conoscenza di un applciativo commerciale che risolve
il problema.
Grazie
P. Bianchi


title: gestione ferie

author: Lorenzo Coronati

text:
Scrisse "P. Bianchi" <
no.publi...@so.sorry.it
>:

No, ma se ne puo' parlare ;-)
--
Lorenzo Coronati
--
<<Ragazzi, sapete indicarmi una utility in
internet che sia in grado di recuperare le
password da un database access e da un system mdw?
intendevo, gratuita...>>
(Marco Tullio Bisoli, 27/04/2001)
--


title: gestione ferie

text:
Lorenzo Coronati wrote:
> >sviluppato applicazioni per programamre le ferie dei dipendenti
> No, ma se ne puo' parlare ;-)
L'ho finito all'80%, non e' malaccio. Detto fra noi e' piu' un
problema da excel che da access, perche' si basa moltissimo su viste
tabellari che in access ottengo come "campi incrociati" a partire da
tabelle lineari, le tabelle lineari sono necessarie per mantenere un
approccio parametrizzato.
Esempio: se ci sono 20 dipendenti ad agosto, viene spontaneo pensare a
una tabella di 31 righe e 20 colonne, in ogni cella dice se i dip sono
presenti o assenti. Ma in qs. modo le 20 colonne dei 20 dipendenti
entrano in modo statico nella descrizione della tabella. Credo sia piu'
corretto fare una tabella "lineare" a un grado di astrazione maggiore
(giorno, id_dipendente, stato) che avra' 31*20=620 righe, e per ogni
giorno e per ogni dipendente una entry che dice lo status di quel dip in
quel giorno. poi con un crosstab si passa alla vista sinottica del mese.

TABELLE STATICHE:
tabella nominativa dipendenti. Ogni dip ha un suo ruolo (dirigente,
operativo, ausiliario ecc.) ed e' pesato 1 se  full time, 0.5 se
part-time e 0 se aspettativa.
tabella postazioni: postazione, numero minimo di operatori addetti,
skill minima per essere operativa (skill e' una variabile numerica
attribuita ai dipendenti, per pesarne la competenza su una certa
postazione)
tabella skill: idoperatore, idpostazione, skill: che skill ha
quell'operatore su quella postazione.
tabella ruoli: id ruolo, descruolo, numero max di assenze contemp per
quel ruolo.
tabelle accessorie (DOW, festivita', ecc.)
TABELLE INPUT:
tabella assenze (popolata da maschera): data assenza, dipendente,
causale-assenza (10 gg. di ferie=10 righe)
TABELLE DINAMICHE:
tabella calendario (generata da codice): giorno, dow, id_dipendente,
status (presente, assente x ferie, ass x festivita)
tabella copertura servizio (generata da codice): giorno, idpostazione,
skill minima richiesta dalla postazione, somma skill presenti in
servizio. Da questa tabella si selezionano le eventuali criticita',
cioe'  i giorni e le postazioni in cui le skill presenti in servizio non
superano o addirittura sono inferiori alle skill minime richieste.
Infine si fa una visione a calendario a campi incrociati, nelle righe i
giorni, nelle colonne i dipendenti,  nelle caselle si lascia vuoto se
sono in servizio o si scrive "ferie", "Domenica", "ferragosto" ecc. se
sono via, e in piu' di fianco ai giorni si aggiunge una colonna dove si
elencano le eventuali criticita' della giornata.
Iterativamente e manualmente si litiga coi dip, si modificano le assenze
e si rigenera il calendario finche' la colonna criticita' resta vuota.
Mi piace il sistema di pesatura delle abilita' (skill) grazie a cui
posso coprire una postazione da due operatori flessibilmente: o con uno
bravo, o con due normali, oppure una postazione da uno con un full time,
con due part-time normali o con un part-time solo ma bravo il doppio,
che del resto rispecchia la realta' del lavoro. Perche' i lavoratori
vengono si' creati uguali, ma poi crescono diversi.
Resta da fare la gestione della esclusivita' di postazioni, cioe' se uno
va su una postazione, per quel giorno le sue skill si azzerano ai fini
delle altre postazioni, altrimenti ora come ora un versatile mi nasconde
le criticita' effettive (i brocchi vanno in ferie piu' dei bravi: anche
questo riflette la realta').
Gia' cosi' lo strumento cmq e' risultato utile, da' una base oggettiva a
una pianificazione che provoca sempre litigi. Se interessa fammi un
cenno.
ciao
Se le skill presenti sono superiori alle skill necessarie va tutto bene,
se la differenza e' zero


title: Disabilitare Tastiera in una Form

author: Sparrow

text:
Ciao a tutti, dovrei collegare uno strumento di misura al mio Db, e
vorrei disabilitare la tastiera in fase di misura cosìcche la misura
non possa essere contraffatta.
cosa posso fare?


title: Disabilitare Tastiera in una Form

author: Michele (Giò)

text:
"Sparrow" <
andrei....@gmail.com
> ha scritto nel messaggio
news:1162828746.2...@e3g2000cwe.googlegroups.com...
Ciao a tutti, dovrei collegare uno strumento di misura al mio Db, e
vorrei disabilitare la tastiera in fase di misura cosěcche la misura
non possa essere contraffatta.
cosa posso fare?
Impostando Anteprima Tasti=Sě su Eventi maschera e su evento KeyDown (Su tasto giů)
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If MeasureIsRunnigng then KeyCode=0
End Sub
Dove MeasureIsRunning č una variabile di tipo boolean che se impostata a True comunica all'evento
che la misua č in esecuzione
Michele


title: Disabilitare Tastiera in una Form

text:
Ho provato ma la tastiera rimane abilitata,
Potendo quindi impostare dei valori contraffatti,
mentre dovrei accettare solo il dato introdotto dallo strumento.
Michele (Giò) ha scritto:
> "Sparrow" <
andrei....@gmail.com
> ha scritto nel messaggio
> news:1162828746.2...@e3g2000cwe.googlegroups.com...
> Ciao a tutti, dovrei collegare uno strumento di misura al mio Db, e
> vorrei disabilitare la tastiera in fase di misura cosìcche la misura
> non possa essere contraffatta.
> cosa posso fare?
>
> Impostando Anteprima Tasti=Sì su Eventi maschera e su evento KeyDown (Su tasto giù)
>
> Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
>
> If MeasureIsRunnigng then KeyCode=0
>
> End Sub
>
> Dove MeasureIsRunning è una variabile di tipo boolean che se impostata a True comunica all'evento
> che la misua è in esecuzione
>
> Michele


title: Disabilitare Tastiera in una Form

author: VedoTondo

text:
"Sparrow" <
andrei....@gmail.com
> ha scritto nel messaggio
news:1162893421.9...@e3g2000cwe.googlegroups.com...
Ho provato ma la tastiera rimane abilitata,
Potendo quindi impostare dei valori contraffatti,
mentre dovrei accettare solo il dato introdotto dallo strumento.
ma perchč non imposti i campi con:
tuocampo.locked = true
tuocampo.enabled = false
cosě vedi i dati e non li puoi manipolare.
per fare arrivare i dati al campo fai una dichiarazione:
dim pesata as single ' (o double a seconda di che dato ci devi mettere)
pesata=(risultato bilancia)
tuocampo=pesata
cosě facendo dovresti risolvere il problema.
--
Saluti Andrea
Cat. Principiante - Access 2003 - Windows XP


title: Disabilitare Tastiera in una Form

text:
"Sparrow" <
andrei....@gmail.com
> ha scritto nel messaggio
news:1162893421.9...@e3g2000cwe.googlegroups.com...
Ho provato ma la tastiera rimane abilitata,
Ma come ti rimane abilitata.....
Sei sicuro di aver impostato l'anteprima tasti=Sě?
Comunque il blocco cosě fatto vale solo per la maschera in cui vi č l'evento, non č che la tastiera
venga bloccata in assoluto. Se clicchi con il mouse fuori dalla finestra, la tastiera riprende la
sua normale funzione.
Michele


title: Disabilitare Tastiera in una Form

text:
Si ho verificato ho posizionato si "SI" e riesco tranquillamente ad
imputare i dati con la tastiera.


title: Disabilitare Tastiera in una Form

text:
"Sparrow" <
andrei....@gmail.com
> ha scritto nel messaggio
news:1162979800.4...@h48g2000cwc.googlegroups.com...
> Si ho verificato ho posizionato si "SI" e riesco tranquillamente ad
> imputare i dati con la tastiera.
>
Ma scrivendo all'interno della routine solo
Keycode=0
la tastiera si blocca oppure no?
Michele


title: Disabilitare Tastiera in una Form

author: Alessandro Cara

text:

Giň, a questo punto consiglierei che, attraverso la seriale, attivi
l'interruttore che porta l'alta tensione alla tastiera o che rilasci il
fermo che fa abbattere una mazzetta da 5 chili sulla tastiera medesima.
In entrambi i casi ottiene anche un sottoprodotto,interessante,
collaterale. Ha inibito l'operatore all'uso della tastiera vita natural
durante
Perdono. Ma il medico mi ha prescritto di cazzeggiare, per motivi di
salute, fra le 18 e le 19
--
ac
email: w+1=x


title: Disabilitare Tastiera in una Form

text:
"Alessandro Cara" <alessandro.cara@aw+
1asistemi.it
> ha scritto nel messaggio
news:IPo4h.717$GM5...@tornado.fastwebnet.it...
> Giò, a questo punto consiglierei che, attraverso la seriale, attivi l'interruttore che porta
> l'alta tensione alla tastiera o che rilasci il fermo che fa abbattere una mazzetta da 5 chili
> sulla tastiera medesima.
> In entrambi i casi ottiene anche un sottoprodotto,interessante, collaterale. Ha inibito
> l'operatore all'uso della tastiera vita natural durante
>
> Perdono. Ma il medico mi ha prescritto di cazzeggiare, per motivi di salute, fra le 18 e le 19
Io consiglierei invece di:
-smontare la tastiera
-montare sotto ad ogni tasto una pastiglia al neodimio e un solenoide a mo di elettrocalamita (e già
il monitor comincia a diventare viola e verde solo con il campo generato dai tasti)
-un interruttore tipo "Sedia elettrica" a due vie
-una batteria da Car Audio da 900 Ampere  di spunto (quelle al gel , è meglio)
Una volta collegato il tutto, prima della misurazione, si attivano le elettrocalamite tramite
interruttore da esecuzione capitale e il campo magnetico non solo ti impedirà di premere i tasti, ma
te li farà arrivare uttti in faccia. Nonchè la saturazione del campo magnetico nell'aria sarà tale
che il fascio catodico del monitor uscirà dai fori di ventilazione, e il tuo orologio meccanico si
fermerà anche se dietro c'è scritto "antimagnetic".
Michele


title: Disabilitare Tastiera in una Form

text:

Ma sei un "sadico"!
--
ac
email: w+1=x


title: Disabilitare Tastiera in una Form

text:
"Alessandro Cara" <alessandro.cara@aw+
1asistemi.it
> ha scritto nel messaggio
news:ipp4h.792$GM5...@tornado.fastwebnet.it...
> Ma sei un "sadico"!
E sai sotto all'interruttore cosa trovi scritto quando abbassi la leva?
Trovi scritto
Keycode=0
Michele


title: Disabilitare Tastiera in una Form

text:

E te pareva. Il tocco di "sadismo" finale.
--
ac
email: w+1=x


title: [OT] 15 agosto

author: Roberto dalla campagna

text:
Buon Ferragosto a tutti.
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: [OT] 15 agosto

author: GGAC & co

text:
"Roberto dalla campagna" <
r.masso...@libero.it
> ha scritto nel
messaggio news:uTZLe.18155$HM1.4...@twister1.libero.it...

Anche a te, e se si usa buon pollo con i peperoni,
Cld


title: [OT] 15 agosto

author: Gaspare

text:
"Roberto dalla campagna" <
r.masso...@libero.it
> ha scritto nel
messaggio news:uTZLe.18155$HM1.4...@twister1.libero.it...

Buona giornata anche a te e famiglia :-)


title: [OT] 15 agosto

author: Sandro

text:
"Roberto dalla campagna" <
r.masso...@libero.it
> ha scritto nel
messaggio news:uTZLe.18155$HM1.4...@twister1.libero.it...

Ciao Roby,
anche a te, ciao.
Sandro


title: [OT] 15 agosto

text: Buona giornata anche a te :-)


title: [OT] 15 agosto

text:
"GGAC & co" <
LEVAM...@tin.it
> ha scritto nel messaggio
news:X2_Le.18167$HM1.4...@twister1.libero.it...
>
> "Roberto dalla campagna" <
r.masso...@libero.it
> ha scritto nel
> messaggio news:uTZLe.18155$HM1.4...@twister1.libero.it...
> > Buon Ferragosto a tutti.
> >
> > --
> > Roberto
>
> Anche a te, e se si usa buon pollo con i peperoni,
In effetti per un romano DOC non è Ferragosto se non si mangia a pranzo il
pollo con i peperoni, ma in questo momento sono un romano trapiantato in
Umbria, quindi fettuccine con sugo d'oca ed oca arrosto.
> Cld



title: [OT] 15 agosto

text:
"Gaspare" <
break...@email.it
> ha scritto nel messaggio
news:iu0Me.73236$fm.49...@news4.tin.it...
>
> Buona giornata anche a te :-)
>
>
Heilà ciao Gaspare,
anche tu in gita fuori porta a quanto vedo :-)
Ciao e buon proseguimento di giornata.
Sandro.


title: [OT] 15 agosto

text:
> anche tu in gita fuori porta a quanto vedo :-)
>
Yes -> "una splendida giornata" ;-)


title: [OT] 15 agosto

text:
"Gaspare" <
break...@email.it
> ha scritto nel messaggio
news:kM0Me.73266$fm.49...@news4.tin.it...
>
>
>> anche tu in gita fuori porta a quanto vedo :-)
>>
>
> Yes -> "una splendida giornata" ;-)
>
Nel senso che olte al posto vi sono anche tantissimi fattori che influiscono
sulla definizione di "buona giornata"...che cmq rimane sempre qualcosa di
personale e suscettibile d'interpretazione :-)


title: [OT] 15 agosto

author: Marco Ragusa

text:
anche  a te
"Roberto dalla campagna" <
r.masso...@libero.it
> ha scritto nel
messaggio news:uTZLe.18155$HM1.4...@twister1.libero.it...



title: visualizza giorni lavorativi

author: reds

text:
ciao a tutti
chiedo un piccolo aiuto per un problema che non so risolvere se non in modo
che non mi
soddisfa. Partendo da 2 date vorrei avere su 4 variabili i primi 4 giorni
lavorativi (considerando lavorativo anche il sabato)
del periodo.
Es. dal 30/07/2004 al  08/08/2004
avere sulle variabili
giorno1  = 30/07/2004
giorno2 =  31/07/2004
giorno3 = 2/08/2004
giorno4 = 3/08/2004
Utilizzando le funzioni calcola lavorativi trovate sul sito comune, ottengo
il numero dei giorni mentre vorrei solo le date dei primi 4 lavorativi.
spero di essere stato chiaro.
grazie a tutti.
roberto


title: visualizza giorni lavorativi

author: Sergio MAZZA

text:
"reds" <
erre...@tin.it
> ha scritto nel messaggio
news:GItPc.87315$5D1.4...@news4.tin.it...

Parti dalla prima data e con la funzione DateAdd (vedi help) aggiungendo il
giorno ottieni la data...
Ciao.
P.S. Sempre se ho capito.
--
Sergio MAZZA


title: query

author: gerardo

text:
ho una query con i seguenti campi

cliente   categoria      venduto
paolo     attrezzature   500
roberto   ferramenta     400
piero     idraulica      300

le categorie sono 15 tipo elettrica elettrodomestici elettronica ec ecc:
Vorrei quindi per ogni cliente estrapolare tutti le categorie anche quelle non movimentate.
saluti


title: Abilitare Tasto TAB...

author: SuperPippo®

text:
salve.... ho una maschera in cui mi sposto con il tasto Invio tra i vari
controlli...
ebbene vorrei disabilitare tale tasto ed abilitare il Tab...
come e dove posso agire ???
Grazie...


title: Abilitare Tasto TAB...

author: Alex

text:
"SuperPippo®" <
ik0...@libero.it
> wrote in message
news:jDBC7.15545$Qj6.1...@news.infostrada.it...

OPS...vorrei sapere come hai fatto, a me funziona esattamente al contrario.
@Alex
--
Posted from  [62.98.31.198]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Abilitare Tasto TAB...

text:
"SuperPippo®" <
ik0...@libero.it
> wrote in message
news:jDBC7.15545$Qj6.1...@news.infostrada.it...
> salve.... ho una maschera in cui mi sposto con il tasto Invio tra i vari

Scusa se divago, ma "ik0qdd" a qualcosa a che fare con "OM"....!
Io sono "ik2zok".
Ciao @Alex



title: Abilitare Tasto TAB...

author: stwe

text:
"SuperPippo®" <
ik0...@libero.it
> ha scritto nel messaggio
news:jDBC7.15545$Qj6.1...@news.infostrada.it...

strumenti>opzioni>tastiera e selezioni con invio: nessuno spostamento.
Però se volessi farlo via codice solo per una casella di testo è possibile e
se si, come?
by
stwe
PS mi scuso ma ti ho risposto in privato


title: Abilitare Tasto TAB...

text:
"Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:1ea537b4a86ae668fa...@mygate.mailgate.org...
| "SuperPippoŽ" <
ik0...@libero.it
> wrote in message
| news:jDBC7.15545$Qj6.1...@news.infostrada.it...
|
| > salve.... ho una maschera in cui mi sposto con il tasto Invio tra i vari
| > controlli...
| > ebbene vorrei disabilitare tale tasto ed abilitare il Tab...
| > come e dove posso agire ???
| > Grazie...
---------------------------------------------
| >OPS...vorrei sapere come hai fatto, a me funziona esattamente al
contrario.
|
| Scusa se divago, ma "ik0qdd" a qualcosa a che fare con "OM"....!
| Io sono "ik2zok".
| Ciao @Alex
|
------------------------------
Ciao Alex... riguardo il tasto Invio... la sua funzione sembra sia quella
di Default... altrimenti controlla come dice Stwe in................
"strumenti>opzioni>tastiera e selezioni con invio: nessuno spostamento".
Cmq.. a me servirebbe usare via codice solo su un DB predefinito..
altrimenti il suggerimento sopra esposto si riferisce a tutte le funzioni
di Access installato.... o sbaglio ... boh...
non sono esperto in Access... perň devo dire che mi piace... e certo ne
sň di + di qualche anno fa....
Ciao "OM" Ik2zok......certo per un Radioamatore
non č difficile capire che Ik0qdd č un nominativo da "OM"....ben trovato..
Ciao '73... e non ti dico "good dx" perchč ormai in radio si ci stŕ ben
poco...
.. io ormai mi dedico esclusivamente al PC e qualche DX in CW...
Ciao....


title: Abilitare Tasto TAB...

text:
"SuperPippo®" <
ik0...@libero.it
> wrote in message
news:w7PC7.18465$Qj6.1...@news.infostrada.it...
> Ciao "OM" Ik2zok......certo per un Radioamatore
> non è difficile capire che Ik0qdd è un nominativo da "OM"....ben trovato..
> Ciao '73... e non ti dico "good dx" perchè ormai in radio si ci stà ben
> poco...
> .. io ormai mi dedico esclusivamente al PC e qualche DX in CW...
> Ciao....
Benissimo, mi fa piacere avere la conferma del tuo "QRZ"....
Per quel che mi riguarda sono 3 anni che ho reimballato il tutto.
Dove abito ora ho difficoltà ad istallare le mie Monobanda (10m e 15m)
autocostruite :-/  (Fino a qualche anno fà ero il progettista di una
ditta di antenne, solo CB purtroppo, ma ho avuto modo di affinarmi...!)
Ciao, grazie per le News....
@Alex
--
Posted from  [62.98.109.216]



title: Abilitare Tasto TAB...

text:
"Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:25697e1f0e0a4535a4...@mygate.mailgate.org...

----------------
Ok... mi fa piacere di averti "incontrato" "on air" ...anche se via cavo...
cmq.. frequento quasi sempre  NG di Access...e sicuramente capiterà
di incontrarci ancora... Ciao e un salutone al QRA...
--
SuperPippo®   [;o))


title: Abilitare Tasto TAB...

author: The-real-Isaac

text:
[CUT]
> Benissimo, mi fa piacere avere la conferma del tuo "QRZ"....
> Per quel che mi riguarda sono 3 anni che ho reimballato il tutto.
> Dove abito ora ho difficoltà ad istallare le mie Monobanda (10m e 15m)
> autocostruite :-/  (Fino a qualche anno fà ero il progettista di una
> ditta di antenne, solo CB purtroppo, ma ho avuto modo di affinarmi...!)
> Ciao, grazie per le News....
> @Alex
[CUT]
Antenne per CB ... Mantova ... non mi pare ci siano molte possibilità (o la
ditta finiva per "A" o per "L")
Ciao
--
Alberto


title: recordset da sottomaschera

author: Piero

text:
ciao a tutti

qual'� la sintassi per ricavare il recordset
dalla sottomaschera?
grazie


title: recordset da sottomaschera

text:
Me!NomeSubForm.Form.Recordset

@Alex


title: recordset da sottomaschera

text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:d4c548e9-f910-4fa3...@googlegroups.com...
> Me!NomeSubForm.Form.Recordset
>
> @Alex

grazie Alex


title: Somma di ore

author: carloB.

text:
E' possibile sommare le ore di tutti i record in una tabella con campi
data/ora formato hh:nn?
Io ho provato e ogni volta che si arriva a 24 ore, si azzera  il valore
nella casella del totale ore (nella maschera collegata alla query), e  va
avanti di un giorno.


title: Somma di ore

author: Carlo Costarella

text:
"carloB." <
sun...@tiscalinet.it
> ha scritto nel messaggio
news:3usb9.121458$n04.3...@twister2.libero.it...

Prova con questa funzione di Silvio Berruti:
Public Function SommaOrari(Orario1 As Date, Orario2 As Date) As String
   ' Autore: Silvio Berruti
   ' Restituisce una stringa contenente la somma di Orario1 e Orario2
   ' Può essere facilmente riconvertita in formato data con DateValue
   Dim ora1, ora2, min1, min2, s_min, sec1, sec2, s_sec
   ora1 = Hour(Orario1): ora2 = Hour(Orario2)         ' Separo ore
   min1 = Minute(Orario1): min2 = Minute(Orario2)     '        minuti
   sec1 = Second(Orario1): sec2 = Second(Orario2)     '        secondi
   ' Calcolo il riporto per i secondi e per i minuti
   s_sec = (sec1 + sec2) \ 60                         ' =1 se sec1 + sec2 >
59 altrimenti =0
    s_min = (min1 + min2 + s_sec) \ 60                 ' =1 se min1 + min2 >
59 altrimenti =0
    SommaOrari = (ora1 + ora2 + s_min) & "." & (min1 + min2 + s_sec) Mod 60
& "." & (sec1 + sec2) Mod 60
End Function
Se scrivi: SommaOrari("21.23","23.25") restituisce 44.48.0 che sono
44 ore
48 minuti
0 secondi
Va bene?
Ciao, Carlo


title: Elenco stampanti Installate

author: ZAMAGNA BRUNO

text:
Ho incominciato da poco tempo a usare Access per piccole applicazioni;
vista la mia inesperienza non sono ancora riuscito a trovare un modo per
far apparire in un Menù di stampa di una qualsiasi tabella l'elenco delle
stampanti già installate nel sistema windows 95/98/ME.In questo modo potrei
scegliere quale stampante meglio si adatta alla stampa del mio Report senza
tutte le volte impostarla del Menu - File - Stampa. Volete aiutarmi ? Vi
ringrazio anticipatamente per quanto potrete fare.
--------------------------------
Inviato via
http://usenet.iol.it


title: codici avviamento postali

author: rudy

text:
purtroppo devo cercare a mano ogni c.a.p. delle citta' e per me e le mie
colleghe e' un vero lavoraccio. So che esiste un programma da scaricare da
internet che si chiama TUTTOC.A.P. qualcuno sa dove trovarlo?
aiutatemi ,
vi preghiamo . grazie .
rudy.
--------------------------------
Inviato via
http://usenet.iol.it


title: codici avviamento postali

author: massimiliano

text:
>purtroppo devo cercare a mano ogni c.a.p. delle citta' e per me e le mie
>colleghe e' un vero lavoraccio. So che esiste un programma da scaricare da
>internet che si chiama TUTTOC.A.P. qualcuno sa dove trovarlo?
non è
tutto c.a.p. ma un db di creazione codice fiscale, quindi con la tabella
che ti interessa
lo trovi su
www.sitocomune.com

ciao e un bacione a te
e alle tue colleghe
Massimiliano



title: codici avviamento postali

author: Alfio

text:
> internet che si chiama TUTTOC.A.P. qualcuno sa dove trovarlo?
> aiutatemi ,
> vi preghiamo . grazie .
> rudy.
> --------------------------------
> Inviato via
http://usenet.iol.it
prova qui
http://www.manager.it/default.asp?page=A_cap.html&folder=f_download
Alfio
p.s.: ricerca effettuata con google


title: codici avviamento postali

author: sd

text:
"rudy" <
in...@emporiolubrificanti.it
> ha scritto nel messaggio
news:62Z10Z110Z195Y1...@usenet.iol.it...

falle lavorare le tue colleghe...
sdamy


title: codici avviamento postali

author: Luciano (DOC)

text:
"massimiliano" <-------@------.--> ha scritto nel messaggio
news:81Z73Z224Z132Y...@usenet.iol.it...
> ciao e un bacione a te
> e alle tue colleghe
> Massimiliano
Bisex?:-)
Saluti.
Luciano


title: codici avviamento postali

text:
>> ciao e un bacione a te
>> e alle tue colleghe
>> Massimiliano
>Bisex?:-)
>Saluti.
>Luciano
caro Luciano, non potendo accettare (x
invidia pura) che fosse l'unico uomo in un ufficio di tutte donne ho
interpretato "rudy" come un diminutivo di non so quale nome femminile.
Bisex no, ma a giudicare da come mi sta andando ultimamente con la mia
fidanzata su un qualsiasi form che dovesse chiedermi sesso "M" o "F" io
spunterei "poco"!!! :-$
ciao Massimiliano



title: Copiare negli appunti con Access 97

author: Patrick De Angelis

text:
Salve,
Vorrei sapere come faccio a copiare negli appunti il contenuto di una
TextBox.
Ho provato con
Txt.SetFocus
SendKeys "^C"
Ma non funziona.
Grazie.
Patrick


title: Copiare negli appunti con Access 97

author: EmMeCi - Style

text:
"Patrick De Angelis" <
patr...@vodafone.it
> ha scritto nel messaggio
news:PNfff.1677$tc5...@tornado.fastwebnet.it...

DoCmd.RunCommand acCmdCopy
... magari mi sbaglio ... ma cosě, al volo ... direi di provare il suddetto
comando! ... ovviamente dopo aver attivato il campo all'interno del quale
copiare il contenuto!
Ciao!
--
**********
EmMeCi
**********


title: Copiare negli appunti con Access 97

text:
"Patrick De Angelis" <
patr...@vodafone.it
> ha scritto nel messaggio
news:PNfff.1677$tc5...@tornado.fastwebnet.it...

SendKeys "^{INSERT}", True
Inoltre possono esserci altre strade...
Ciao, Carlo


title: Copiare negli appunti con Access 97

author: Karl Donaubauer

text:
Patrick De Angelis wrote:
> Vorrei sapere come faccio a copiare negli appunti il contenuto di una
> TextBox.
> Ho provato con
>
> Txt.SetFocus
> SendKeys "^C"
>
> Ma non funziona.
www.donkarl.com/it
 FAQ 6.15 Copiare un testo su o dalla clipboard
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it
+ Conferenza Italiana per Sviluppatori di Access (CISA)


title: Copiare negli appunti con Access 97

text:
Siete stati fantastici!! Per la cronaca:
Ha funzionato SendKeys "^{INSERT}", True.
RunCommand non ha funzionato perchè la maschera in questione è in pop-up a
scelta obbligatoria, e il menu in questione è disabilitato.
Buona giornata! :-)
Patrick
"Patrick De Angelis" <
patr...@vodafone.it
> ha scritto nel messaggio
news:PNfff.1677$tc5...@tornado.fastwebnet.it...



title: Database a scadenza

author: Massimiliano

text:
Per evitare noie (lavoro fatto e non pagato),
avevo pensato ad una soluzione e vorrei un vostro parere.
Ho creato la tabella SCADENZA con il campo: Data_Scadenza in cui inserisco
un unico record che rappresenta la data della scadenza del mio programma.
All'apertura del database confronto la data attuale con quella presente
nella tabella SCADENZA.
Se Now() è maggiore della data di scadenza il database è scaduto quindi
scrivo una MsgBox ed esco da access,
in caso contrario apro la maschera principale del database.
Il problema è che la tabella non deve poter essere accessibile a nessuno
quindi ho pensato subito a disabilitare
il famoso tasto shift.
Sul sito comune ho letto che l'uso di tale metodo è sconsigliato.
Sapete dirmi perchè?
Che ne pensate della mia idea?
Avete qualcos'altro da consigliarmi?
Grazie a tutti!!


title: Database a scadenza

text:
"Massimiliano" <
massimo...@operamail.com
> ha scritto nel messaggio
news:JYfW8.28$rJ2....@nreader2.kpnqwest.net...
> Per evitare noie (lavoro fatto e non pagato),
> avevo pensato ad una soluzione e vorrei un vostro parere.
>
> Ho creato la tabella SCADENZA con il campo: Data_Scadenza in cui inserisco
> un unico record che rappresenta la data della scadenza del mio programma.
> [cut]
Private Sub Form_Load()
Dim TextLine, caldata, oklccheck, okfold, pathlic, slash
shareware.ForeColor = RGB(0, 0, 0)
pathlic = "c:\windows\system"
'*****  controllo presenza directory di lavoro
Call solo_checkfolder(pathlic, okfold)
If okfold = True Then
'*****  controllo presenza file licenza
    Call solo_checkfile("lc.dll", pathlic, oklccheck)
        If oklccheck = True Then
            Open pathlic & "\" & "lc.dll" For Input As 1
            Do While Not EOF(1)    ' Ripete fino alla fine del file.
            Line Input #1, TextLine    ' Assegna la riga a una variabile.
            Debug.Print TextLine    ' Scrive nella finestra Immediata.
        Loop
        Close #1    ' Chiude il file.
        ' ----  licenza corretta definitiva OK
            If Right(TextLine, 2) = Chr(126) & Chr(88) Then
            okLC = "True"
            shareware.ForeColor = RGB(0, 127, 0)
            shareware = "Illimitata"
            Exit Sub
            Else
        ' ----  licenza corretta definitiva NO
        ' ----  valutazione del tempo shareware
            caldata = Mid(TextLine, 2, 2) & "/" & Mid(TextLine, 5, 2) & "/"
& Mid(TextLine, 8, 2) & Mid(TextLine, 11, 2)
                If DateValue(Now()) > DateValue(caldata) Then
                    Call barra(pathlic, slash)
                    Kill pathlic & slash & "lc.dll"
                    okLC = "False"
                    GoTo finelicenza
                End If
            okLC = "True"
            shareware = caldata
            MsgBox "Il programma non è ancora stato registrato." & vbCr &
vbCr & "In data " & caldata & " scade la licenza provvisoria," & vbCr & "che
renderà il programma non più funzionante." & vbCr & vbCr & vbCr &
"Contattare il fornitore del Software per la licenza definitiva.",
vbInformation, "Avviso..."
            End If
        Else
finelicenza:
        okLC = "False"
        shareware = "Scaduta"
        shareware.ForeColor = RGB(255, 0, 0)
        MsgBox "Il tempo di Valutazione Software è Scaduto, per continuare
ad usare il programma acquistare la licenza d'uso definitiva",
vbInformation, "Licenza d'uso scaduta"
        pls_entra.Visible = False
        End If
End If
End Sub
questo è una parte del codice di ricerca protezione...
le altre routine sono queste
Public Function solo_checkfile(checknome, directory, fileesiste)
Dim fs, f, f1, fc
Dim risp
    Set fs = CreateObject("Scripting.FileSystemObject")
    Set f = fs.GetFolder(directory)
    Set fc = f.files
    For Each f1 In fc
        If
f1.name
 = checknome Then
        fileesiste = True
        Exit Function
        End If
    Next
    fileesiste = False
End Function
Public Function solo_checkfolder(checkdir, pathesiste)
On Error GoTo errori
Dim risp
ChDir checkdir
pathesiste = True
Exit Function
errori:
    If Err.Number = 76 Then
    pathesiste = False
    End If
End Function
per la maschera che contiene il codice ve la invio in privato e la mando poi
anche sul sito comune.


title: Database a scadenza

author: All Eyez On me

text:
"### CH v.2002 ###" <
ngma...@genio-af.it
> ha scritto nel messaggio
news:agc2k0$bkv$1...@fe1.cs.interbusiness.it...
>
> "Massimiliano" <
massimo...@operamail.com
> ha scritto nel messaggio
> news:JYfW8.28$rJ2....@nreader2.kpnqwest.net...
> > Per evitare noie (lavoro fatto e non pagato),
> > avevo pensato ad una soluzione e vorrei un vostro parere.
> >
> > Ho creato la tabella SCADENZA con il campo: Data_Scadenza in cui
inserisco
> > un unico record che rappresenta la data della scadenza del mio
programma.
> > [cut]
>
> Private Sub Form_Load()
> Dim TextLine, caldata, oklccheck, okfold, pathlic, slash
> shareware.ForeColor = RGB(0, 0, 0)
>
> pathlic = "c:\windows\system"
>
> '*****  controllo presenza directory di lavoro
>
> Call solo_checkfolder(pathlic, okfold)
>
> If okfold = True Then
>
> '*****  controllo presenza file licenza
>
>     Call solo_checkfile("lc.dll", pathlic, oklccheck)
...cut
>
>
> per la maschera che contiene il codice ve la invio in privato e la mando
poi
> anche sul sito comune.
>
Scusa ma allora basta copiare il file di licenza su tutti i computer che
usano il programma
e si sbloccano tutti.
Se conosco qualcuno con lo stesso programma gli passo il file e gli si
sblocca anche il suo!
AEOM


title: Database a scadenza

author: Roberto Pasqualini

text:


Io ho risolto così: la data impostata nella tabella non è in chiaro ma
viene codificata tramite l'utilizzo della funzione Instr() e
confrontata con una stringa fissa di nove caratteri all' interno del
codice. Ad esempio:
stringa fissa = ACKDWZZLR
chiave di attivazione =KAACCTPK
Eseguendo una routine che scorre carattere per carattere la chiave di
attivazione ed applicando la funzione Instr() utilizzando come stringa
di confronto la stringa fissa ottengo la seguente stringa = '31122003'
dalla quale è molto facile ricavare una data. A questa poi aggiungo un
numero di mesi fisso (sempre cablato nel codice) ed ottengo la data di
scadenza da confrontare con la data del giorno.
Cosi' facendo e salvando il codice dentro un file mde o ade, in modo
che non sia visualizzato, anche se la chiave di attivazione dentro la
table risulta leggibile è difficile capire come è codificata. Inoltre
basta spedire al cliente un file batch che esegua l'aggiornamento,
tramite comandi SQL del campo della tabella per sbloccare la
procedura. Se qualcuno è interessato mi faccia sapere che gli spedisco
il codice completo.
Pasqualini Roberto


title: Database a scadenza

author: Govardo Libero

text:
"Massimiliano" <
massimo...@operamail.com
> ha scritto nel messaggio
news:JYfW8.28$rJ2....@nreader2.kpnqwest.net...
> Per evitare noie (lavoro fatto e non pagato),
> avevo pensato ad una soluzione e vorrei un vostro parere.
> Avete qualcos'altro da consigliarmi?
>
Se:
1) distribuisci il file in formato mde;
2) usi in una tabella "importante" un campo data che non può essere vuoto
e/o inferiore alla data di sistema;
3) compili tale campo tramite un controllo che non può accettare una data
inferiore a quella di sistema;
4) stabilisci che tale controllo non può assumere un data maggiore della
data di scadenza del programma;
Hai una garanzia sufficiente che alla scadenza l'utente non potrà utilizzare
una funzione importante del tuo programma.
Naturalmente sono valide tutte le altre strade più sofisticate.
Ciao, Angelo.


title: Database a scadenza

text:
"Govardo Libero" <
gov...@libero.it
> ha scritto nel messaggio
news:agcl95$nes$1...@lacerta.tiscalinet.it...

Devi però controllare almeno il numero di serie dell'hard disk altrimenti un
oscompra la licenza e passa il programma a tutti gli altri.
AEOM


title: Database a scadenza

author: VT @ work

text:
On Mon, 08 Jul 2002 12:55:05 GMT, "Massimiliano"
<
massimo...@operamail.com
> wrote:
>Per evitare noie (lavoro fatto e non pagato),
>avevo pensato ad una soluzione e vorrei un vostro parere.
> (.....)
Stai *molto* *molto* *molto* attento !
Una pratica del genere, se scoperta dal tuo cliente, ti espone al
rischio di essere denunciato per danni, con conseguente probabile
addebito dei medesimi nei tuoi confronti.
Quindi rischi oltre al danno (non vederti pagato il lavoro) anche la
beffa (pagare tu i danni al cliente).
Se proprio vuoi fare una cosa del genere cerca di farla nella maniera
piů "pulita" possibile, ovvero:
evita di bloccare la procedura con messaggi del tipo "Il programma
risulta bloccato per insoluto" preferendo invece messaggi del tipo
"Errore generale di protezione X28AF13FF3r49K. Se il problema persiste
rivolgersi al fornitore."
nascondi il meglio possibile i parametri il cui valore determina il
blocco della procedura (per es. memorizzali nel registry in forma
criptata e dentro chiavi con nomi incomprensibili).
Vincenzo Turturro
---------------------------------------------
il sito comune di it.comp.appl.access:
http://www.sitocomune.com/
---------------------------------------------
E quello di it.comp.as400:
http://www.faq400.com/
---------------------------------------------


title: Database a scadenza

author: Abcd Efgh

text:
"Massimiliano" <
massimo...@operamail.com
> wrote in message
news:JYfW8.28$
rJ2....@nreader2.kpnqwest.net
...
> Il problema è che la tabella non deve poter essere accessibile a nessuno
> quindi ho pensato subito a disabilitare
> il famoso tasto shift.
>
> Sul sito comune ho letto che l'uso di tale metodo è sconsigliato.
>
> Sapete dirmi perchè?
>
> Che ne pensate della mia idea?
>
> Avete qualcos'altro da consigliarmi?
>
> Grazie a tutti!!
Il problema é che non riuscirai MAI PIÙ ad "entrare" nel codice del Db.
DEVI quindi assicurarti di fare sempre una copia della versione che
consegnerai e proteggere quella. Il giorno che sbaglierai, ti rimangerai
le diatta una per una!!!!!
Guardate questo sito:
http://www.globetrotter.com/
Questi signori hanno un software di "licensing"  (anche di "pay per
use") molto efficace che vedo in uso in alcuni pacchetti molto "tosti".
Non ho idea di quanto costi!
Gilberto
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Selezionare dato da maschera

author: Fabrizio

text:
Salve Ragazzi ,
volevo sapere se era possibile , selezionare un valore , anzichè da
casella combinata da una maschera ....
esempio:
Mi trovo nella maschera ordini sto immettendo l'ordine di un mio
cliente, arrivo al'immissione del corriere , me lo scelgo da una
casella combinata . ecco piuttosto che usare la casella combinata
vorrei che ad esempio quando con il caps lok passo sul campo corriere
mi si apra una maschera Corriere io mi posiziono con il cursore sul
corriere che voglio immettere premo invio e nel campo corriere vi si
salva il valore prescelto....
Ho visto molti software in VB6 che utilizzano questo principio e vorrei
utilizzarlo per il mio database. si può fare?
Mi aiutatte :-(


title: Selezionare dato da maschera

author: MA

text:

Il caps lock è gestibile con le macro autokeys
poi l'apertura la metti nella funzione lanciata dalla tua macro.
Vedi
www.accessgroup.it
--
--
Massimiliano Amendola
www.accessgroup.it
Il sito italiano di svilupatori Access
www.donkarl.com/it/cisa


title: Selezionare dato da maschera

author: Sergio MAZZA

text:
"Fabrizio" <
f_j...@libero.it
> ha scritto nel messaggio
news:mn.e2c57d6b9...@libero.it...

Col caps-lock? Di tanti tasti funzione e combinazioni con tasti speciali
(ALT/CTRL) proprio sul quello vuoi far attivare la routine?
Non mi sembra proprio "usabile" o intuitivo...
Ciao.
--
Sergio MAZZA


title: Selezionare dato da maschera

text:
Sergio MAZZA ha spiegato il 28/11/06 :

Si scusate ho detto un tasto a caso , ma può pastre qualsiasi
combinazioni di tasti , ma non hoi capito come devo fare , ci sono
degli esempi in giro?


title: Selezionare dato da maschera

text:
"Fabrizio" <
f_j...@libero.it
> ha scritto nel messaggio
news:mn.e34d7d6b7...@libero.it...
>
> Si scusate ho detto un tasto a caso , ma può pastre qualsiasi combinazioni
> di tasti , ma non hoi capito come devo fare , ci sono degli esempi in
> giro?
Crea una macro AutoKeys; visualizza la colonna "nome macro"; inserisci tra
parentesi graffe il nome del tasto funzione o combinazioni di questi (vedi
su SendKeys) esempio {F11}; come azione scegli "esegui codice" e in "nome
funzione" ci inserisci il nome della funzione pubblica che verrà eseguita
alla pressione dei tasti.
Ovviamente nella funzione ci inserirai il codice VBA da eseguire...
Ciao.
--
Sergio MAZZA


title: Selezionare dato da maschera

text:
Sergio MAZZA ci ha detto :

Ciao Sergio Grazie della risposta , ma proprio non riesco ....
allora ho creato la macro come dici tu !!!
allora poi nella funzione pubblica ho messo
Function OpenPop()
DoCmd.OpenForm "Corriere"
End Function
poi nell'evento su pressione della casella combinata ho messo autokeys
ma non funziona.
dopo come faccio mettiamo che mi si apra la maschera corriere ed ho
impstato sumascehra  continue a selezionare la terz riga corrispondente
ad esempio al corriere pinco e su invio i dati di pinco devono essere
viusalizzati sui campi predisposti della maschera ordini...?
:'(


title: Selezionare dato da maschera

text:
Nel suo scritto precedente, Fabrizio ha sostenuto :

ok primo quesito risolto.... apertura della maschera ordini da
pressione f11 riuscita.
adesso tocca al secondo quesito come poter memorizzare i dati da
maschera Corriere su maschera ordini in base a quello selezionato
grazie in anticipo


title: Selezionare dato da maschera

text:
"Fabrizio" <
f_j...@libero.it
> ha scritto nel messaggio
news:mn.e3d57d6bc...@libero.it...
> ok primo quesito risolto.... apertura della maschera ordini da pressione
> f11 riuscita.
>
> adesso tocca al secondo quesito come poter memorizzare i dati da maschera
> Corriere su maschera ordini in base a quello selezionato
>
>
> grazie in anticipo
Non ho capito; l'f11 apre una form "Corriere" e qui che deve succedere?
Oppure descrivi dall'inizio cosa vorresti fare...
Ciao.
--
Sergio MAZZA


title: Selezionare dato da maschera

text:
Dopo dura riflessione, Sergio MAZZA ha scritto :

Allora cerco di spiegarmi meglio.....
Ho una maschera ordini che utilizzo per effettuare ordini di ritiro
merci presso clienti.. allora dovrei immettere nell'ordine il corriere
che mi effettuera il ritiro..
quidi dovrei popolare la mia maschera ordini con i seguenti campi:
NomeCorriere
Telefono
Fax
Contatto
quindi vorrei che con l'utilizzo del {f11} vorrei aprire l'elenco di
tutti i corrieri che ho nel database, tipo, elenco a maschere continue,
e spostarmi su quello desiderato quindi con la pressione di invio i
dati che sono contenuti su questa Form Corrieri vadano a popolare i
campi della mascera Ordini.
ad esempio mettiamo che apro la from Corrieri ed alla terza riga si
trovi:
Tnt
 0422-00000
0422-0000
Tizio
premo invio
e va a popolarmi i campi su maschera ordini
Lo so che può essere benissimo fatta con una casella combinata , ma
voorei dare un abbellimento  in + al mio programma


title: Selezionare dato da maschera

text:
"Fabrizio" <
f_j...@libero.it
> ha scritto nel messaggio
news:mn.e41e7d6be...@libero.it...
>
> Allora cerco di spiegarmi meglio.....
>
> Ho una maschera ordini che utilizzo per effettuare ordini di ritiro merci
> presso clienti.. allora dovrei immettere nell'ordine il corriere che mi
> effettuera il ritiro..
>
> quidi dovrei popolare la mia maschera ordini con i seguenti campi:
>
> NomeCorriere
>
>
> Telefono
> Fax
> Contatto
>
> quindi vorrei che con l'utilizzo del {f11} vorrei aprire l'elenco di tutti
> i corrieri che ho nel database, tipo, elenco a maschere continue, e
> spostarmi su quello desiderato quindi con la pressione di invio i dati che
> sono contenuti su questa Form Corrieri vadano a popolare i campi della
> mascera Ordini.
>
> ad esempio mettiamo che apro la from Corrieri ed alla terza riga si trovi:
>
> Tnt
> 0422-00000
> 0422-0000
> Tizio
>
> premo invio
> e va a popolarmi i campi su maschera ordini
>
> Lo so che può essere benissimo fatta con una casella combinata , ma voorei
> dare un abbellimento  in + al mio programma
Si tratta di gestire l'evento "su chiusura" della form "Corriere".
Devi controllare se c'è un record selezionato, se c'è inserire i dati nella
form "chiamante".
Es. (su chiusura form Corriere)
if not isnull(me!nomeCorriere) then
    forms!ordini!nomeCorriere = me!nomeCorriere
    forms!ordini!telefonoCorriere = me!telefonoCorriere
...etc. etc...
endif
Ciao.
--
Sergio MAZZA


title: Selezionare dato da maschera

text:
Il 28/11/06, Sergio MAZZA ha detto :

Grazie Sergio della risposta adesso provo e ti faccio sapere .....


title: mdw da 180 MB

author: alessandro daniel

text:
Buongiorno a tutti,
in azienda, ormai da 15 anni, utilizzo un mdw per gestire gli accessi ad una serie di database costruiti negli anni.
Un collega mi ha fatto notare che il file mdw è di 180 MB. C'è maniera di compattarlo?
Ora in azienda usiamo Office 365 e difatti per continuare ad utilizzare il mdw, creo ancora database .mdb, ma non essendo il mio lavoro principale, non ho certo modo di "smontare tutto" e creare un sistema di accesso utenti "a mano".

Grazie per l'aiuto

alessandro


title: mdw da 180 MB

text:

Prova a leggere questi suggerimenti:
https://www.tek-tips.com/viewthread.cfm?qid=495587

@Alex


title: mdw da 180 MB

text:
>
> Prova a leggere questi suggerimenti:
>
https://www.tek-tips.com/viewthread.cfm?qid=495587

>
> @Alex

Grazie, leggerò volentieri!

A.


title: evento con combobox

author: Nico

text:
Ho iniziato da poco col 2000 (mi ero fermato all' 1.1) e mi sono bloccato
davanti a questo (probabilmente di facile soluzione per altri) problema:
vorrei evitare che in controllo di una maschera (legato ad un elenco di 4
valori) venga immesso un testo diverso o niente.
Imposto il tutto da codice ma il puntatore supera comunque il controllo
anche se non vi digito niente.
Ho provato con i vari tipi di eventi quindi ci dev'essere qualcos'altro che
non va, forse nelle varie forme di codice che ho usato; inizialmente avevo
anche provato con
valido.se
.
Grazie in anticipo,
Nico


title: evento con combobox

author: Anceschi Emiliano

text:


Prova con la proprietą solo in elenco impostata a Sģ


title: evento con combobox

text:
"Anceschi Emiliano" <
e.anc...@kelyansmc.it
> ha scritto nel messaggio
news:3c444f97...@News.CIS.DFN.DE...

ci ho provato ma se non metto niente mi consente di passare avanti


title: evento con combobox

text:


prova con un dati->valido se-> not null or <> ""


title: evento con combobox

author: Mrok

text:
"Nico" <
ni...@axiria.com
> ha scritto nel messaggio
news:10111129...@server.iranet.it...

č un controllo associato o no?


title: evento con combobox

text:
No, non è associato. E' legato ad un elenco di valori (4)
"Mrok" <
flag...@tin.it
> ha scritto nel messaggio
news:yaZ08.1436$WS2....@news1.tin.it...
> "Nico" <
ni...@axiria.com
> ha scritto nel messaggio
> news:10111129...@server.iranet.it...
> >
> >
> >
> > "Anceschi Emiliano" <
e.anc...@kelyansmc.it
> ha scritto nel messaggio
> > news:3c444f97...@News.CIS.DFN.DE...
> > > On Tue, 15 Jan 2002 15:22:31 GMT, "Nico" <
ni...@axiria.com
> wrote:
> > >
> > > >Ho iniziato da poco col 2000 (mi ero fermato all' 1.1) e mi sono
> bloccato
> > > >davanti a questo (probabilmente di facile soluzione per altri)
> problema:
> > > >vorrei evitare che in controllo di una maschera (legato ad un elenco
di
> 4
> > > >valori) venga immesso un testo diverso o niente.
> > > >Imposto il tutto da codice ma il puntatore supera comunque il
controllo
> > > >anche se non vi digito niente.
> > > >Ho provato con i vari tipi di eventi quindi ci dev'essere
qualcos'altro
> > che
> > > >non va, forse nelle varie forme di codice che ho usato; inizialmente
> > avevo
> > > >anche provato con
valido.se
.
> > > >Grazie in anticipo,
> > > >Nico
> > > >
> > > >
> > >
> > > Prova con la proprietà solo in elenco impostata a Sì
> > >
> >
> >
> >
> > ci ho provato ma se non metto niente mi consente di passare avanti
> >
> >
> >
>
> è un controllo associato o no?
>
>


title: evento con combobox

author: Antonio Biso

text:
Nico <
ni...@axiria.com
> wrote in message
10111129...@server.iranet.it...
>
>
>
> "Anceschi Emiliano" <
e.anc...@kelyansmc.it
> ha scritto nel messaggio
> news:3c444f97...@News.CIS.DFN.DE...
> > On Tue, 15 Jan 2002 15:22:31 GMT, "Nico" <
ni...@axiria.com
> wrote:
> >
> > >Ho iniziato da poco col 2000 (mi ero fermato all' 1.1) e mi sono
bloccato
> > >davanti a questo (probabilmente di facile soluzione per altri)
problema:
> > >vorrei evitare che in controllo di una maschera (legato ad un elenco di
4
> > >valori) venga immesso un testo diverso o niente.
> > >Imposto il tutto da codice ma il puntatore supera comunque il controllo
> > >anche se non vi digito niente.
> > Prova con la proprietà solo in elenco impostata a Sì
>
>
> ci ho provato ma se non metto niente mi consente di passare avanti
Sull'evento lostfocus vai a testare se dentro non c'è nulla. Se è così,
mandi un messaggio, poi fai un setfocus su un qualsiasi altro controllo,
quindi di nuovo un setfocus sulla combo. Finche non ci sarà un valore
accettabile, non si schioderà da lì.
Altre soluzioni:
Pulsante di convalida che testa il valore e se non c'è non salva nulla
valore predefinito in modo che almeno un valore sia presente
Antonio


title: evento con combobox

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:qf218.32223$aD.11...@twister2.libero.it...
> Nico <
ni...@axiria.com
> wrote in message
> 10111129...@server.iranet.it...
> >
> >
> Sull'evento lostfocus vai a testare se dentro non c'è nulla. Se è così,
> mandi un messaggio, poi fai un setfocus su un qualsiasi altro controllo,
> quindi di nuovo un setfocus sulla combo. Finche non ci sarà un valore
> accettabile, non si schioderà da lì.
>
> Altre soluzioni:
> Pulsante di convalida che testa il valore e se non c'è non salva nulla
> valore predefinito in modo che almeno un valore sia presente
>
> Antonio
>
>
ci ho provato, ma col tabulatore mi passa tranquillamente al controllo
successivo:
Private Sub Addetto_LostFocus()
If Me.Addetto = "" Then                        (provato anche Me.Addetto =
Null  etc. etc.)
    Me.NumComponenti.SetFocus
    Me.Addetto.SetFocus
End If
End Sub
Nico


title: evento con combobox

text:
Nico <
ni...@axiria.com
> wrote in message
10111877...@server.iranet.it...

Per testare il null non si può fare addetto = null, ma isnull(addetto)
Prova così, vedrai che funziona..
Antonio
P.S.
Io uso una funzione da me creata
public function vuoto(x as variant) as boolean
if isnull(x) or trim(x) = "" then
  vuoto = true
else
  vuoto = false
end if
end function
Quindi
if vuoto(addetti) then...


title: Valorizzare ore lavoro

author: G. Palumbo

text:
Salve a tutti.
Ho una form OreLavoro con due controlli DalleOre e AlleOre tipo dato
Data/ora, formato ora breve H24 e un terzo controllo TotOre dato dalla diff
dei due controlli. Vorrei valorizzare il TotOre in base ad un controllo
CostoOrario, formato valuta euro. Ma nel controllo TotValore, formato valuta
euro, dato dal prodotto di CostoOrario*TotOre i valori non sono coerenti.
Come posso risolvere il problema?
Grazie


title: Valorizzare ore lavoro

author: Roberto da casa

text:
"G. Palumbo" <
gius...@tin.it
> ha scritto nel messaggio
news:TJtYb.248338$VW.99...@news3.tin.it...

Se:
TotOre = AlleOre - DalleOre
devi moltiplicare TotOre per 24, ovvero:
TotValore = CostoOrario * (TotOre *24)
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Valorizzare ore lavoro

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:ZYHYb.15240$Kc3.4...@twister2.libero.it...
>
> "G. Palumbo" <
gius...@tin.it
> ha scritto nel messaggio
> news:TJtYb.248338$VW.99...@news3.tin.it...
> > Salve a tutti.
> > Ho una form OreLavoro con due controlli DalleOre e AlleOre tipo dato
> > Data/ora, formato ora breve H24 e un terzo controllo TotOre dato dalla
> diff
> > dei due controlli. Vorrei valorizzare il TotOre in base ad un controllo
> > CostoOrario, formato valuta euro. Ma nel controllo TotValore, formato
> valuta
> > euro, dato dal prodotto di CostoOrario*TotOre i valori non sono
coerenti.
> > Come posso risolvere il problema?
> > Grazie
>
> Se:
>
> TotOre = AlleOre - DalleOre
>
> devi moltiplicare TotOre per 24, ovvero:
>
> TotValore = CostoOrario * (TotOre *24)
>
> --
> Roberto
>
Grazie


title: Report -> files leggibili

author: ema

text:
'Ao.
Come si e` risolta la storia delle stampe dei report in file "decenti",
tipo pdf, ps o altro?
Preferirei una soluzione senza spendere $$ :-)
E con l'esportazione in formati Office come siamo messi? Ho visto che
Access 97 salva in un penoso html (strano!) ed .xls. Col 2000 le cose
vanno meglio? Hanno aggiunto anche l'export in word (o dovro` proprio
farmelo a manina)?
bye!
--
Emanuele Cesena
http://www.penguinpowered.com/~ecesena
<
ece...@penguinpowered.com
> - rimuovi XXX x rispondere    ICQ #8814554
BTW: ho un nome migliore per il software... Microsoft Internet Exploder.
		-- George Bonser


title: Report -> files leggibili

text:
Con shapshotviewer gratis dalla MS vengono perfetti, solo che se li spedisci
in allegato costringi chi lo riceve a scaricarsi il plug-in.
Oppure la versione completa di acrobat (reader+writer) che però non so
quanto costi
Ciao, Bobbit
"ema" <ece...@XXXpenguinpowered.com> ha scritto nel messaggio
news:8l4o6c$h1$1...@ema.it...



title: Report -> files leggibili

author: TopGun

text:
On Fri, 21 Jul 2000 16:44:10 GMT, "bobbit_barton" <
bobbit...@wappi.com
>
wrote:
[CUT]
>Oppure la versione completa di acrobat (reader+writer) che perň non so
>quanto costi
>
>Ciao, Bobbit
Oppure, se vuoi realizzare un documento PDF senza
acquistare nulla, fai cosě (non č farina del mio sacco, č preso da un msg
apparso su it.comp.lang.visual-basic parecchio tempo fa):
######################################
1 - Installa una stampante PostScript. Non importa che tu non ce l'abbia,
basta che carichi i driver di stampa di una PostScript. Prova con qualcuna
(ricorda che se vuoi fare dei PDF a colori, devi installare il driver di
una laser PS a colori).
Come installare il driver?
- vai a "avvio - impostazioni - stampanti"- clicca su "aggiungi stampante"
- clicca su "avanti"
- spunta "stampante locale", quindi clicca "avanti"; si crea la lista delle
stampanti di cui possiede i driver e poi te la propone
- a questo punto scorri la lista e scegli una marca (io ho selezionato
Lexmark, ma non e` obbligatorio)
- scegli una stampante con la sigla PS (es. Lexmark Optra C PS, che e` a
colori); clicca su "avanti"- ti chiedera` di scegliere la porta; va bene
LPT1, clicca su "avanti"
- ancora "avanti"- a  questo punto dovrebbe avere completato
l'installazione.
2 - installa GhostScript e Gostview (freeware) che troverai qui:
http://www.cs.wisc.edu/~ghost/aladdin/get550.html
 . Il file gsv27550.exe li
contiene tutti e due. Se il download e` lento, installa Download
Accelerator (
www.lidan.com
 )
A questo punto sei pronto. Carica il tuo documento,
p.es
. un file di Word
(ma la procedura funziona con TUTTI i programmi di Windows),
vai a file - stampa, scegli come stampante la PS, e spunta la voce "Stampa
su file". Ti verra` chiesto il nome da dare al file e dove salvarlo.
Poi lancia GhostView e vai a file - open e seleziona il file .prn appena
prodotto. Dopo che l'hai aperto, vai a file - print. Nella finestra che
apparira` scegli come Device "pdfwrite", scegli la risoluzione, spunta la
casella "Print to file" e scegli il nome da dargli (con estensione .pdf) e
il percorso. E voila`, ecco il tuo PDF. La procedura non e` delle piu`
lineari, ma e` gratis.
... inoltre potrai trovare della "grafica" delle operazioni a questo
indirizzo:
http://209.1.224.12/CapeCanaveral/Lab/6562/general/pdf.html
 .
######################################
Sembra un po' complicato, perň io ho provato e ti assicuro che funziona.
Ciao,
Marco "TopGun"


title: Report -> files leggibili

author: RoDAgo

text:
"TopGun" ha scritto nel messaggio ...
> Oppure, se vuoi realizzare un documento PDF senza
> acquistare nulla, fai cosě
[cut]
Ottimo, non troppo complicato e perfettamente funzionante!!
Anche se la richiesta non č partita da me ti volevo ringraziare per la
dritta.  :-)
> Ciao,
> Marco "TopGun"
Ciao
 RoDAgo


title: Report -> files leggibili

text:
On Sat, 22 Jul 2000 12:16:37 +0200, "RoDAgo" <
rodago...@tiscalinet.it
> wrote:
>Ottimo, non troppo complicato e perfettamente funzionante!!
>Anche se la richiesta non è partita da me ti volevo ringraziare per la
>dritta.  :-)
Sono contento di esserti stato utile, comunque come ho scritto il metodo non è
di mia invenzione, l'ho trovato in un vecchio messaggio di
it.comp.lang.visual-basic (visto a cosa servono i vecchi post!!!), l'ha
riportato mi sembra un certo Rogis, che a sua volta l'aveva sentito da un
altro.... chissà chi è che si è inventato quella strada....
Comunque, finalmente anche io sono riuscito a dare un valido contributo a questo
fantastico NG, se vuoi possiamo mettere il procedimento sul Sito Comune.
>Ciao
> RoDAgo
Ciao,
Marco "TopGun"


title: Report -> files leggibili

author: Federico Luciani

text:
TopGun wrote:
> On Fri, 21 Jul 2000 16:44:10 GMT, "bobbit_barton" <
bobbit...@wappi.com
>
> wrote:
> Oppure, se vuoi realizzare un documento PDF senza
> acquistare nulla, fai cosě (non č farina del mio sacco, č preso da un msg
> apparso su it.comp.lang.visual-basic parecchio tempo fa):
> [cut]
non mi serve, ma e' interessante. :-)
domani ci provo.
--
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------


title: Report -> files leggibili

author: warp

text:
Mi associo ai complimenti di RoDago!!
CIAO, warp


title: Report -> files leggibili

text:
"TopGun" ha scritto nel messaggio ...
[cut]
> Comunque, finalmente anche io sono riuscito a dare un valido contributo a
questo
> fantastico NG, se vuoi possiamo mettere il procedimento sul Sito Comune.
Per questo bisogna rivolgersi al sottostante Fede o ad Antonello.
Cmq, date le domande sull'argomento che ho letto prima su ICDA e poi su
ICAA, riterrei la sua pubblicazione abbastanza utile.



title: Report -> files leggibili

text:
Mio cuggino mi ha detto che TopGun <
marc...@nospam.lycosmail.com
> scrisse:
>
scusatemi: ho chiesto e sono sparito...
Grazie mille per tutte le dritte, cmq.
Nessuno sa di esportazione in file .doc?
bye!
--
Emanuele Cesena
http://www.penguinpowered.com/~ecesena
<
ece...@penguinpowered.com
> - rimuovi XXX x rispondere    ICQ #8814554
Non sono disordinato.  Sono solo un massimizzatore di entropia.


title: Come trasformare tutto in maiuscolo?

author: Cataldo

text:
ciao a tutti del N.G.
come trasformare il testo -carattere minuscolo-immesso in una casella di
testo, in carattere tutto maiuscolo.
ancora , come stabilire la differenza tra un campo "carico" ed un campo
"scarico"
Grazie e saluti
        CF


title: Come trasformare tutto in maiuscolo?

author: Paolo opg

text:
su afterupdate
    me!nomedelcontrollo=StrConv(me!nomedelcontrollo,vbUpperCase)
--
---
Cataldo <
form...@libero.it
> wrote in message
news:25Cv4.57026$qv.5...@news.infostrada.it...



title: Come trasformare tutto in maiuscolo?

text:
vado subito a provare, grazie CF
Paolo opg <
jan...@hotmail.com
> wrote in message
m9Cv4.57056$qv.5...@news.infostrada.it...



title: Come trasformare tutto in maiuscolo?

author: cele

text:
Semplicemente mettendo il simbolo maggiore ">" nella casella FORMATO del
controllo
Ciao Ceele



title: Come trasformare tutto in maiuscolo?

text:
non lo sapevo!
grazie :-))
--
+-----
| Paolo opg
|
jan...@hotmail.com
+-----
cele <
ccas...@libero.it
> wrote in message
wYIv4.57952$qv.5...@news.infostrada.it...



title: Come trasformare tutto in maiuscolo?

text:
cele ha scritto nel messaggio ...
>Semplicemente mettendo il simbolo maggiore ">" nella casella FORMATO del
>controllo
Peccato che cosě solo la visualizzazione del valore del campo sia in
maiuscolo mentre i dati vengono memorizzati in tabella come inseriti!
Antonio


title: Come trasformare tutto in maiuscolo?

author: neofita

text:
> Semplicemente mettendo il simbolo maggiore ">" nella casella FORMATO del
> controllo
> Ciao Ceele
ho notato perņ che il risultato lo ottieni solo in maschera , non viene
memorizzato in maiuscolo sul DB ... mi pare
ciao


title: Come trasformare tutto in maiuscolo?

author: lbo dal portatile

text:
>come trasformare il testo -carattere minuscolo-immesso in una casella di
>testo, in carattere tutto maiuscolo.
me.controllo=ucase(me.controllo)
>ancora , come stabilire la differenza tra un campo "carico" ed un campo
>"scarico"
wot?
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/


title: Come trasformare tutto in maiuscolo?

author: Harry Evans

text:
Non esiste una scorciatoia per dire ad una casella di testo (ad es. di 50
caratteri) di trasformare in maiuscolo DURANTE la digitazione, senza dover
mettere un kilometrico ">???????????????????????......"
In Clipper esisteva un "@!" per dire tutta la stringa in maiuscolo.
Intanto risolvo con un ucase dopo l'aggiornamento, ma se esistesse ....
bye


title: Come trasformare tutto in maiuscolo?

author: Silvio Berruti

text:
"Harry Evans" <
harry...@infinito.it
> ha scritto nel messaggio
news:89qd30$2hm$1...@nslave1.tin.it...

Non č cosě breve, ma abbastanza...
"Su pressione" della tua casella di testo scrivi:
Private Sub TuaCasella_KeyPress(KeyAscii As Integer)
    Select Case KeyAscii
      Case 97 To 122, 192 To 253: KeyAscii = KeyAscii - 32
    End Select
End Sub
e il gioco č fatto!
Ciao
Silvio


title: Come trasformare tutto in maiuscolo?

author: sib

text:
Harry Evans <
harry...@infinito.it
> wrote in message
89qd30$2hm$1...@nslave1.tin.it...
> Non esiste una scorciatoia per dire ad una casella di testo (ad es. di 50
> caratteri) di trasformare in maiuscolo DURANTE la digitazione, senza dover
> mettere un kilometrico ">???????????????????????......"
> In Clipper esisteva un "@!" per dire tutta la stringa in maiuscolo.
>
> Intanto risolvo con un ucase dopo l'aggiornamento, ma se esistesse ....
Io preferisco usare la piu' potente istruzione StrConv(Stringa,Modalita)
Che consente anche di trasformare in maiuscole le prime lettere delle parole
e in minuscole tutte le altre (ottima per i nomi propri)
Inoltre >??? ecc modifica la visualizzazione e non il contenuto.
Poi qual e' la difficolta' nell'usare ucase o strconv invece di @! ?
Se proprio non puoi aspettare di finire di digitare per convertire il testo,
ti imposti il codice nell'evento SuModifica.
Ciao, Sib
--
------------------------------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access
------------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente


title: Come trasformare tutto in maiuscolo?

author: Rox

text:
ATTENZIONE:
Non è proprio giusto, metti questo CASE:
Case 97 To 122, 224 To 253: KeyAscii = KeyAscii - 32
:
con il 224 al posto del 192 che proponi. Il resto è OK
> Private Sub TuaCasella_KeyPress(KeyAscii As Integer)
>     Select Case KeyAscii
>       Case 97 To 122, 192 To 253: KeyAscii = KeyAscii - 32
                                       ===== >> non 192, ma 224
>     End Select
> End Sub
Se poi la usi spesso, conviene creare una fn in un modulo con questa codice
e poi chiamare dall'evento la fn
Private Sub TuaCasella_KeyPress(KeyAscii As Integer)
     KeyAscii = MkUpper(  KeyAscii )
 End Sub
Publice Function MkUpper(KeyAscii As Integer)
     Select Case KeyAscii
         Case 97 To 122, 224 To 253: KeyAscii = KeyAscii - 32
     End Select
End Function


title: Come trasformare tutto in maiuscolo?

text:
>Private Sub TuaCasella_KeyPress(KeyAscii As Integer)
>    Select Case KeyAscii
>      Case 97 To 122, 192 To 253: KeyAscii = KeyAscii - 32
>    End Select
>End Sub
be', allora perche' non
Private Sub TuaCasella_KeyPress(KeyAscii As Integer)
	KeyAscii = ucase(KeyAscii)
End Sub



title: Come lanciare uno script

author: Valeri Stefano

text:
Mi sto avvicinando da qualche mese al mondo di SQL Server ed ora mi è sorta
una curiosità che sicuramente voi soddisferete prontamente. Sono riuscito a
creare lo script che dovrebbe generare tutto il lavoro fatto (Stored
procedure, Tabelle, Visualizzazioni ecc.)ma come faccio per eseguirlo in una
altro PC con SQL Server installato???
Grazie anticipatamente


title: Come lanciare uno script

text:
Anche un'ulteriore curiosità.....il NG su SQL deve ancora aprire se si
quando?


title: Come lanciare uno script

author: Alberto S.

text:
"Valeri Stefano" <
air...@tiscali.it
> ha scritto nel messaggio
news:ar1722$i2v$1...@lacerta.tiscalinet.it...
> Anche un'ulteriore curiosità.....il NG su SQL deve ancora aprire se si
> quando?
Non è stato approvato per aver ottenuto solo 60 voti (sui 100 richiesti).
Risultato del 10/11/2002.
Ciao.
--
Alberto


title: Activex Adobe Acrobat

author: Filippo

text:
BuonGiorno a tutti,
Ho un problema che è il seguente:
Dovrei sviluppare un'applicazione che gestisca il batabase di documenti in
formato PDF,ma non so come programmare le ocx fornite da tale programma.
A me piacerebbe che selezionandi il mio "tastino" nuovo apparise adobe e
parta la scansione dei documenti in automatico e venga salvata con un nome
che è quello che io aggiungero al database con il suo eventuale percorso.
Sono un pò al buio e non risco a trovare una lampadina che mi accenda la
giornata.
Se avete bisogno di chiarimenti per la risposta chiedete,
risolvere questo problema sarebbe una cosa fantastica vi prego aiutatemi.
Vi ringrazio Tanto
Filippo Mazzella


title: Activex Adobe Acrobat

author: George

text:
"Filippo" <
flo...@virgilio.it
> ha scritto nel messaggio
news:0IGAa.157447$3M4.3...@news1.tin.it...

Forse è il caso che tu cerchi sul sito Adobe.
Non mi sembra un problema di Access questo...


title: Activex Adobe Acrobat

text:
"George" <
giorgio.ben...@libero.it
> ha scritto nel messaggio
news:baved0$bfr$1...@newsreader.mailgate.org...

> Come faccio a dire ad access che il nome da aggiungere al database
corrisponde al nome con cui ho salvato il file?
> Su sitocomune c'è la spiegazione di come attendere che un programma sia
terminato ,e io l'ho trovato simile al problema che ho riscontrato.
Quindi deduco che il problema non è in adobe ma in access e la sua
interfacciabilità con gli applicativi di windows ragion per cui ho postato
qui.
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>


title: Activex Adobe Acrobat

author: Sergio MAZZA

text:
"Filippo" <
flo...@virgilio.it
> ha scritto nel messaggio
news:0IGAa.157447$3M4.3...@news1.tin.it...
> BuonGiorno a tutti,
>
> Ho un problema che è il seguente:
>
> Dovrei sviluppare un'applicazione che gestisca il batabase di documenti in
> formato PDF,ma non so come programmare le ocx fornite da tale programma.
Se hai gli ocx hai anche la documentazione che ti spiega come utilizzare le
loro proprietà; in caso contrario puoi provare a cercare in rete con motori
di ricerca o in altri NG (magari VB).
> A me piacerebbe che selezionandi il mio "tastino" nuovo apparise adobe e
> parta la scansione dei documenti in automatico e venga salvata con un nome
> che è quello che io aggiungero al database con il suo eventuale percorso.
Che intendi per scansione? Scanner --> Documento PDF?
> Sono un pò al buio e non risco a trovare una lampadina che mi accenda la
> giornata.
Prima lampadina: Internet e motori di ricerca, altro NG, sito Adobe (magari
la sezione supporto).
> Se avete bisogno di chiarimenti per la risposta chiedete,
> risolvere questo problema sarebbe una cosa fantastica vi prego aiutatemi.
Sarebbe meglio che tu ci fornisca subito le informazioni che potrebbero
aiutarCI ad aiutarTI, che ne dici?
> Vi ringrazio Tanto
> Filippo Mazzella
>
Ciao.
--
Sergio MAZZA


title: Activex Adobe Acrobat

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:bavkr5$8ji$2...@canarie.caspur.it...

> __________________________________
Io credevo di averle fornite comunque probabilmente mi sono espresso male.
In sostanza è questo.
Io voglio creare un database che gestisca dei file sul computer e nello
specifico file in pdf in qui sono memorizzate delle attività.
Il programma però dovrebbe automaticamente creare questi file.
Esempio.
Apro il database e ho il pulsante su una maschera "nuovo".
A quel punto lo scanner deve essere inizializzato e scandire il foglio poi
memorizzare il file sull'hd che deve corridspondere un numero di commessa e
una data oltre che al consueto indice.
Poi facendo una ricerca digito il numero di commessa e mi viene fuori il
coll.ipertestuale al file e così l'operatore potrà aprirlo.
Il punto critico e lo scanner perchè non so proprio come usarlo in access.
premetto che sono un programmatore di access è ho usato un linguaggio
semplice non per offedere ma perchè ho difficolta ad esprimere il problema.
In concuclusione comunque dovrei accingermi ad un programma che operi sui
file creati con lo scanner.
Scusatemi e vi ringrazio molto per l'attenzione che mi è stata data.
Filippo Mazzella.


title: Activex Adobe Acrobat

text:
"Filippo" <
flo...@virgilio.it
> ha scritto nel messaggio
news:wcJAa.13$pR3...@news1.tin.it...
>
> "Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
> news:bavkr5$8ji$2...@canarie.caspur.it...
> > "Filippo" <
flo...@virgilio.it
> ha scritto nel messaggio
> > news:0IGAa.157447$3M4.3...@news1.tin.it...
> > > BuonGiorno a tutti,
> > >
[cut]
> > __________________________________
> Io credevo di averle fornite comunque probabilmente mi sono espresso male.
> In sostanza è questo.
>
> Io voglio creare un database che gestisca dei file sul computer e nello
> specifico file in pdf in qui sono memorizzate delle attività.
>
> Il programma però dovrebbe automaticamente creare questi file.
> Esempio.
> Apro il database e ho il pulsante su una maschera "nuovo".
> A quel punto lo scanner deve essere inizializzato e scandire il foglio poi
> memorizzare il file sull'hd che deve corridspondere un numero di commessa
e
> una data oltre che al consueto indice.
> Poi facendo una ricerca digito il numero di commessa e mi viene fuori il
> coll.ipertestuale al file e così l'operatore potrà aprirlo.
>
> Il punto critico e lo scanner perchè non so proprio come usarlo in access.
> premetto che sono un programmatore di access è ho usato un linguaggio
> semplice non per offedere ma perchè ho difficolta ad esprimere il
problema.
> In concuclusione comunque dovrei accingermi ad un programma che operi sui
> file creati con lo scanner.
> Scusatemi e vi ringrazio molto per l'attenzione che mi è stata data.
>
> Filippo Mazzella.
>
>
Ribadisco... non è un problema di Access ma di uso di un OCX o un comune
server OLE.
Cmq, la manipolazione di file la si fa con le funzioni Dir(), Kill() e
FileCopy() di VBA.


title: Activex Adobe Acrobat

text:
"Filippo" <
flo...@virgilio.it
> ha scritto nel messaggio
news:wcJAa.13$pR3...@news1.tin.it...
>
> Io credevo di averle fornite comunque probabilmente mi sono espresso male.
> In sostanza è questo.
>
> Io voglio creare un database che gestisca dei file sul computer e nello
> specifico file in pdf in qui sono memorizzate delle attività.
>
> Il programma però dovrebbe automaticamente creare questi file.
> Esempio.
> Apro il database e ho il pulsante su una maschera "nuovo".
> A quel punto lo scanner deve essere inizializzato e scandire il foglio poi
> memorizzare il file sull'hd che deve corridspondere un numero di commessa
e
> una data oltre che al consueto indice.
> Poi facendo una ricerca digito il numero di commessa e mi viene fuori il
> coll.ipertestuale al file e così l'operatore potrà aprirlo.
>
> Il punto critico e lo scanner perchè non so proprio come usarlo in access.
> premetto che sono un programmatore di access è ho usato un linguaggio
> semplice non per offedere ma perchè ho difficolta ad esprimere il
problema.
> In concuclusione comunque dovrei accingermi ad un programma che operi sui
> file creati con lo scanner.
> Scusatemi e vi ringrazio molto per l'attenzione che mi è stata data.
>
> Filippo Mazzella.
>
Nessuno si è offeso, almeno io no; ora è più chiaro su cosa devi fare e
come. Per gestire lo scanner non ci sono problemi, nel sito comune
(
www.sitocomune.com
) trovi un esempio e se comunque trovi problemi qui (NG)
ci sono le soluzioni. Dai un'occhiata all'esempio e facci sapere...
Ciao.
--
Sergio MAZZA


title: Activex Adobe Acrobat

text:
"Filippo" <
flo...@virgilio.it
> ha scritto nel messaggio
news:0IGAa.157447$3M4.3...@news1.tin.it...

Salve torno a proporre il problema in quanto non sono riuscito su sitocomune
a trovare nessun esplicito riferimento allo scanner.
Se potete darmi una dritta....
Grazie e vi farò sapere delle evoluzioni che prenderà il programma...


title: Activex Adobe Acrobat

text:
"Filippo" <
flo...@virgilio.it
> ha scritto nel messaggio
news:gC_Aa.4334$pR3....@news1.tin.it...
>
> Salve torno a proporre il problema in quanto non sono riuscito su
sitocomune
> a trovare nessun esplicito riferimento allo scanner.
> Se potete darmi una dritta....
>
> Grazie e vi farò sapere delle evoluzioni che prenderà il programma...
>
A parte che riproporre il problema non serve; casomai scrivi che non hai
risolto con i suggerimenti ricevuti.
Nei riferimenti (Strumenti - riferimenti) inserisci Kodak o Wang Image Scan
control per controllare lo scanner e Kodak o Wang Image Edit Control.
Poi inserisci nella maschera il controllo Kodak o Wang Image Scan control
(qui chiamato [CtlActiveX11]).
Poi attivi i metodi sottoelencati.
Per avere una anteprima dell'immagine si inserisce il controllo Kodak o Wang
Image Edit Control automaticamente viene visualizzata l'anteprima della
immagine.
Nell'evento "su clic" di un bottone:
'-----------
On Error GoTo ScanError
CtlActiveX11.ShowSelectScanner
CtlActiveX11.PageType = 1
CtlActiveX11.ScanTo = 0
CtlActiveX11.ShowSetupBeforeScan = True
CtlActiveX11.StartScan
ScanExit:
    Exit Sub
ScanError:
    MsgBox Err.Number & ", " & Err.Description
'-----------
Ciao.
--
Sergio MAZZA


title: Activex Adobe Acrobat

author: Roberto da casa

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:bb52os$4ja$1...@canarie.caspur.it...
> "Filippo" <
flo...@virgilio.it
> ha scritto nel messaggio
> news:gC_Aa.4334$pR3....@news1.tin.it...
> >
> > Salve torno a proporre il problema in quanto non sono riuscito su
> sitocomune
> > a trovare nessun esplicito riferimento allo scanner.
> > Se potete darmi una dritta....
> >
> > Grazie e vi farň sapere delle evoluzioni che prenderŕ il programma...

O molto piů semplicemente:
CtlActiveX11.ShowScanNew
Cosě ti compare na finestra di dialogo con la quale puoi impostare le
opzioni e poi effettuare la scansione.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Activex Adobe Acrobat

text:
"Filippo" <
flo...@virgilio.it
> ha scritto nel messaggio
news:gC_Aa.4334$pR3....@news1.tin.it...

Come puoi vedere dalle risposte a questo tuo messaggio da un applicazione
Access si può governare uno scanner.



title: Activex Adobe Acrobat

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:5poBa.43325$Ny5.1...@twister2.libero.it...
>
>
> O molto più semplicemente:
>
> CtlActiveX11.ShowScanNew
>
> Così ti compare na finestra di dialogo con la quale puoi impostare le
> opzioni e poi effettuare la scansione.
>
> --
> Roberto
>
> ---------------------------------------------
> il Sito Comune di it.comp.appl.access:
>
http://www.sitocomune.com
> ---------------------------------------------
>
Minimalista!
Ciao.
--
Sergio MAZZA


title: Activex Adobe Acrobat

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:bb5c3i$9cg$1...@canarie.caspur.it...
> "Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
> news:5poBa.43325$Ny5.1...@twister2.libero.it...
> >
> >
> > O molto più semplicemente:
> >
> > CtlActiveX11.ShowScanNew
> >
> > Così ti compare na finestra di dialogo con la quale puoi impostare le
> > opzioni e poi effettuare la scansione.
> >
>
> Minimalista!
E' colpa della mia proverbiale pigrizia. :-)
>
> Ciao.
>
> --
> Sergio MAZZA
Ciao
Roberto


title: Activex Adobe Acrobat

author: MA

text:
Il 29 Mag 2003, 15:46, "Sergio MAZZA" <
sergi...@tiscalinet.it
> ha
scritto:
> "Filippo" <
flo...@virgilio.it
> ha scritto nel messaggio
> news:gC_Aa.4334$pR3....@news1.tin.it...
> >
> > Salve torno a proporre il problema in quanto non sono riuscito su
> sitocomune
> > a trovare nessun esplicito riferimento allo scanner.
> > Se potete darmi una dritta....
> >
> > Grazie e vi farň sapere delle evoluzioni che prenderŕ il programma...

Ciao,
ho bisogno di gestire uno scanner e per questo ho riprodotto la procedura
suggerita.
Tutto ok parte lo scanner, perň...
Non mi visualizza l'anteprima
Mi richiede la Twain mentre io vorrei darla di predefinita
vorrei salvare il file ma non so dove va a sarlavrlo cosě da permettermi di
spostare e rinominare.
Mi aiutate
grazie
MAssimiliano
--------------------------------
Inviato via
http://usenet.libero.it


title: Activex Adobe Acrobat

text:
"MA" <
massimilia...@kksrl.com
> ha scritto nel messaggio
news:62Z94Z199Z30Y1...@usenet.libero.it...
> Ciao,
Ciao,
> ho bisogno di gestire uno scanner e per questo ho riprodotto la procedura
> suggerita.
> Tutto ok parte lo scanner, però...
> Non mi visualizza l'anteprima
> Mi richiede la Twain mentre io vorrei darla di predefinita
> vorrei salvare il file ma non so dove va a sarlavrlo così da permettermi
di
> spostare e rinominare.
>
> Mi aiutate
> grazie
> MAssimiliano
>
>
> --------------------------------
> Inviato via
http://usenet.libero.it
per avere la scansione diretta togli la riga "ShowSelectScanner" e imposti
ShowSetupBeforeScan = False.
Per l'anteprima devi inserire il controllo Kodak o Wang Image Edit Control;
ti invio parte dell'help dei controlli Wang/Kodak per la proprietà ScanTo:
'----------
Setting Description
0  (default) Display the scanned image.
1 Display the scanned image and write it to a file.
2 Write the scanned image to a file.
3 Write the scanned image to a file using a template, and display the image.
4 Write the scanned image to a file using a template.
5 Fax the scanned image.
Remarks
Images scanned to display must be saved in the Wang ImageEdit control.
Ensure that the ImageEdit control's Image property is set correctly.
Copyright Wang Laboratories, Inc. 1995-1996
'----------
Ciao.
--
Sergio MAZZA


title: Query per cercare numeri mancanti...

author: SuperPippo®

text:
salve a tutti... vediamo se riesco a spiegarmi dato che l'argomento
è un pò complesso..
mi occorrerebbe una query che mi calcola i numeri mancanti cominciando
da 1... ma il problema è un altro...
in una tabella ho un campo N_Protocollo
ed i numeri inseriti sono scritti così...:
1/2000/F234
23/2003/G3356
ossia il primo numero è il progressivo
il secondo è l'anno
ed il terzo è il numero di protocollo sempre
preceduto da una lettera che in tutto sono
5   (F) + (G) + (M) + (I) + (P)...
quindi il mio intento è di sapere per ciascuna lettera
alfabetica i numeri mancanti cominciando da 1...
però capita che (P) arrivi a 500 record
mentre (F) arrivi a 6000 record...
questo mi servirebbe dato che nel DB anagrafico capita
di fare delle cancellazioni per decessi per cui sono rimasti
molti "vuoti"...
spero di essermi spiegato...
Ciao a tutti...


title: Query per cercare numeri mancanti...

author: Antonio Biso

text:
" SuperPippo®" <ik0qddT...@TOGLISPAMlibero.it> ha scritto nel messaggio
news:zLvNa.148794$lK4.4...@twister1.libero.it...

Io te lo saprei anche fare questo, ma:
1) non dici che cosa fare con i numeri trovati liberi.
2) sei sicuro di quello che vuoi fare?
Che ti frega dei buchi? Questi sono codici univoci, quindi se c'è un buco
ciccia, basta che vengano sempre usati numeri mai usati prima. Inoltre,
comunque questi numeri potrebbero avere una storia, secondo me non è
corretto riutilizzarli...
Antonio


title: Query per cercare numeri mancanti...

text:
Antonio Biso wrote:
> " SuperPippo®" <ik0qddT...@TOGLISPAMlibero.it> ha scritto nel
[CUT]
>> in una tabella ho un campo N_Protocollo
>> ed i numeri inseriti sono scritti così...:
>>
>> 1/2000/F234
>> 23/2003/G3356
>>
>> ossia il primo numero è il progressivo
>> il secondo è l'anno
>> ed il terzo è il numero di protocollo sempre
>> preceduto da una lettera che in tutto sono
>> 5   (F) + (G) + (M) + (I) + (P)...
>>
>> quindi il mio intento è di sapere per ciascuna lettera
>> alfabetica i numeri mancanti cominciando da 1...
>> però capita che (P) arrivi a 500 record
>> mentre (F) arrivi a 6000 record...
>> questo mi servirebbe dato che nel DB anagrafico capita
>> di fare delle cancellazioni per decessi per cui sono rimasti
>> molti "vuoti"...
>> spero di essermi spiegato...
>
> Io te lo saprei anche fare questo, ma:
> 1) non dici che cosa fare con i numeri trovati liberi.
> 2) sei sicuro di quello che vuoi fare?
> Che ti frega dei buchi? Questi sono codici univoci, quindi se c'è un
> buco ciccia, basta che vengano sempre usati numeri mai usati prima.
> Inoltre, comunque questi numeri potrebbero avere una storia, secondo
> me non è corretto riutilizzarli...
-------------------------
Ciao Antonio...allora rispondo alle tue..lecite domande...
1- questi numeri liberi devo essere assegnati a dei tesserini...[#]
2- SI !
3- le 5 lettere alfabetiche corrispondono all'iniziale del Comune
    ai quali sono assegnati questi numeri di protocollo di tesserino.
    supponiamo il Comune F.. a tutt'oggi è arrivato circa al numero
    6.000... mentre in realtà sono circa 5.600... vuoi per decessi,
    per trasferimenti etc. etc..."potrebbero" avere una storia..
o meglio registrare uno storico... ma supponi che il codice
F345 decede oppure il codice M3456 si trasferisce...
cosa vuoi che importi + ???
quindi quel numero può essere assegnato ad un altro utente....
il tutto per mantenere anche un esatto
    conteggio dell'anagrafica utenti...
    ho fatto queste ricerche lavorando con Excel.. un pò meno ostico
    per me...ma se avessi una routine del genere potrei inserirla
direttamente
    nel Db e risparmierei un bel pò di lavoro...
Ciao...


title: Query per cercare numeri mancanti...

text:
" SuperPippo®" <ik0qddT...@TOGLISPAMlibero.it> ha scritto nel messaggio
news:%qfOa.154318$lK4.4...@twister1.libero.it...

Faccio un altro tentativo prima di risponderti.
Se F345 decede e tu riassegni il codice ad un altro utente, se poi vai a
fare un'interrogazione, ti vengono fuori anche tutti i movimenti di quello
morto, compresa la morte!!!
Allora eventualmente dovresti salvare una data di cambio assegnazione in
modo da interrogare il sistema solo da lì in poi...
Ma la soluzione più corretta sarebbe quella di aggiungere un campo Sì/No che
ti dice se il numero è attivo o meno. In questo modo i non attivi non li
gestisci per le statistiche e lavori solo con i nuovi codici
Antonio


title: Query per cercare numeri mancanti...

text:
Antonio Biso wrote:
> " SuperPippo®" <ik0qddT...@TOGLISPAMlibero.it> ha scritto nel
[superCUT]
> Faccio un altro tentativo prima di risponderti.
> Se F345 decede e tu riassegni il codice ad un altro utente, se poi
> vai a fare un'interrogazione, ti vengono fuori anche tutti i
> movimenti di quello morto, compresa la morte!!!
> Allora eventualmente dovresti salvare una data di cambio assegnazione
> in modo da interrogare il sistema solo da lì in poi...
beh... a dir la verità non è che ti ho capito molto.... cmq...quando abbiamo
la
comunicazione di un decesso oppure trasferimento etc.-.. il record viene
fisicamente cancellato....per cui F345 non esiste + nel DB....
> Ma la soluzione più corretta sarebbe quella di aggiungere un campo
> Sì/No che ti dice se il numero è attivo o meno. In questo modo i non
> attivi non li gestisci per le statistiche e lavori solo con i nuovi
> codici
questa invece sarebbe stata un'ottima soluzione...se fosse stata
implementata
fin dall'inizio gestione DB (anno 2000).... anche per la ricerca dei
codici mancanti sarebbe stato facile fare un filtraggio...ma c'è un però...
io non li devo gestire solo per le statistiche..  ma anche in pratica...
è inutile scrivere su un tesserino di un paziente F 9599  quando in realtà
ne sono 5000... se dovessi seguire il tuo ragionamento tra 5 anni
si arriverebbe a 15000 ...
questo è il quanto...
se hai ulteriori idee ben vengano...
Ciao...