mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: casella combinata convalida

Salve a tutti!
cerco di  spiegarmi! ho cinque campi;
collocazione
autore
titolo
data_prestito
data_rientro
ho creato una casella combinata associata a [collocazione], impostata ad 
accettare dati non univoci
e anche valori non presenti in elenco, quello che mi serve è una convalida 
che mi eviti di inserire la stessa collocazione in determinate condizioni 
tipo: [data_prestito] not null AND [data_rientro] null, in pratica non 
vorrei dare di nuovo in prestito l'oggetto se questo attualmente si trova 
ancora fuori [data_rientro] vuoto.
Quale sistema posso adottare

 Quale sistema posso adottare
Tony; quando si invia lo stesso quesito in piů NG (crosspost) si dovrebbe 
avvertire scrivendolo o nell'oggetto o nel corpo del messaggio. Questo per 
evitare confusione.
www.sitocomune.com
 Sezione ICAA - Come comportarsi in questo NG
Ciao.
-- 
Sergio MAZZA

Newsgroup: it.comp.appl.access
Titolo: Valuta Euro Nei Formati Standard di Access 97 ?

Nei formati delle query o dei report di access 97 esiste la possibilità di
scegliere quello della valuta, che ovviamente è quella della lira.
Esiste la possibilità di crearne od aggiungerne un'altro con la valuta in
Euro ?
Grazie!

 wrote in message
94Xg7.17299$4b5.4...@news6.giganews.com...

al posto di formato valuta metti
?  #.###,##
decimali 2
sostituisci il ? con il simbolo euro Alt Gr + E
quando crei la tabella scegli tipo valuta

 ha scritto nel messaggio
news:Ef0h7.13052$vC1.1...@news1.tin.it...

scusate se mi intrometto, ma nel campo valuta vengono considerati quattro
decimali e quindi, a parere mio, è opportuno inserire una funzione di
arrotondamento alla seconda cifra decimale onde evitare che nelle successive
manipolazioni dei dati si abbiano sorprese, poichè verrebbero utilizzati
dati della tabella con quattro decimali indipendentemente da quello che ti
fa vedere il formato.Spero di essere stato utile Ciao
--
lo...@tin.it
http://sicilia.cjb.net
http://bonavita.homepage.nu
http://space.tin.it/arte/loobo
http://www.geocities.com/bonavitao

 ha scritto nel messaggio
news:i2zh7.49489$TS4.2...@news2.tin.it...

Newsgroup: it.comp.appl.access
Titolo: Stato Avanzamento Lavori

Buongiorno a tutti
sto procedendo nello sviluppo di un programma che utilizza diversi DB.
A questo punto, lanciando una macro, il programma deve lavorare per circa 4
minuti operando su diversi files.
E' possibile fare in modo di fare apparire una scrolbar che visualizzi a che
punto è l'aggiornamento ?
Non è tanto per una questione estetica quanto per evitare che l'utilizzatore
pensi che il programma è fermo e faccia qualche cosa non dovuto.
Grazie
Luigi

 ha scritto nel messaggio
news:JsMRa.184367$lK4.5...@twister1.libero.it...

Hai anche la possibilità di visualizzare il cursore a forma di clessidra che
impedisce "clic strani" oltre a quella di dare un'occhiata sul sito comune
(
www.sitocomune.com
) dove c'è un esempio...
Ciao.
--
Sergio MAZZA

 ha scritto nel messaggio
news:bf85lg$8pt$1...@canarie.caspur.it...


 ha scritto nel messaggio
news:bf85lg$8pt$1...@canarie.caspur.it...


 l'aggiornamento dei files ?
[CUT]
Iniziando a scrivere DOPO il quoting
MAssimiliano

 ha scritto nel messaggio
news:_gNRa.285$w8....@news.edisontel.com...

Sorry

 ha scritto nel messaggio
news:JsMRa.184367$lK4.5...@twister1.libero.it...

Se quello che devi fare sui file lo esegui con una macro, penso che non sia
per niente facile impostare e pilotare una barra di progressione.
Oltre alla visualizzazione della clessidra, come ti ha giustamente suggerito
Sergio MAZZA, all'inizio dell'elaborazione potresti aprire una maschera
popup che avverte l'utente che c'è un'elaborazione in corso, maschera che
chiuderai alla fine dell'elaborazione. In alternativa nella maschera che è
visualizzata, all'inizio dell'elaborazione, potresti rendere visibile una
etichetta con una scritta di avviso: naturalmente l'etichetta la renderai
NON visibile all'apertura della maschera ed alla fine dell'elaborazione.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:f2PRa.184770$lK4.5...@twister1.libero.it...

Grazie Roberto
credo sia il sistema più rapido e semplice (alla portata delle mie
conoscenze :-))
Ciao
Luigi

Newsgroup: it.comp.appl.access
Titolo: X Antonio Di Marco

Nei tuoi messaggi al NG, usa Subject più corti.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


Sě scusatemi. Il fatto č che avevo scritto il messaggio in word e ho fatto
un copia e incolla nel posto sbagliato e me ne sono accorto solo dopo aver
spedito il messaggio.
Ciao e grazie ancora per i tuoi preziosi aiuti.
Antonio
Newsgroup: it.comp.appl.access
Titolo: DSum totale complessivo per ciascun record?

dovrei calcolare il totale per ciascuna categoria descritta in una tabella
cat leggendo gli importi legati alle diverse categorie nella tabella imp,
usando Dsum non riesco a farlo, quando si tratta di mettere nelle condizioni
di DSum una singlìola categoria tipo
DSum("[importo]", "[imp]", "[IDCategoria] = Cat1"
non ci sono problemi,ma se devo farlo per ogni categoria?
il suggerimento preso dalla guida di access non funziona:
È possibile utilizzare una funzione di dominio nella riga Aggiorna a di una
query di aggiornamento. Se ad esempio si desidera tenere traccia in una
tabella Prodotti delle vendite correnti secondo il prodotto, è possibile
aggiungere alla tabella Prodotti un nuovo campo chiamato VenditeAggiornate
ed eseguire una query di aggiornamento per calcolare i valori corretti e
aggiornare i record. Creare una nuova query basata sulla tabella Prodotti e
scegliere Aggiorna dal menu Query. Aggiungere il campo VenditeAggiornate
alla griglia della query e immettere quanto segue nella riga Aggiorna a:
DSum("[Quantità]*[PrezzoUnitario]", "Dettagli Ordini", "[IDProdotto] = " _
    & [IDProdotto])
Quando si esegue la query, si calcola il totale complessivo delle vendite
per ciascun prodotto, in base alle informazioni di una tabella Dettagli
ordini. La somma delle vendite per ciascun prodotto viene aggiunta alla
tabella Prodotti.
--
mi da errore di conversione tra tipi: 2;
Grazie
Emiliano

DSum("[nominalamount]","Trade","AssetName=""" & [AssetName] & """")
risolto...
Emiliano

 ha scritto nel messaggio
news:beh9oj$117n0$1...@gno-4.fis.uniroma2.it...

E' anche possibile che io non abbia capito nulla del tuo problema, ma perché
non crei una query di raggruppamento per categoria basata sulla tabella
"imp" e chiedendo che effettui la somma del campo importo?
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: immagine di sfondo delle maschere...dove trovarle ?

ciao
ho modifcato un db di un amico, fatto quasi completamente con la 
composizione guidata, cercando di personalizzarlo e migliorarlo un po.
io, coma d'abitudine, vado per le cose semplici e senza tanti fronzoli e 
cosě rifacendo le maschere ho lasciato il colore grigio di sfondo...
ora l'amico vorrebbe le maschere con la stessa immagine che aveva messo lui 
(la retina bianca con righe verdi) ....
ho riaperto le sue maschere (che avevo salvato) e vedo che l'immagine č di 
tipo cianografica.......
ho cercato in access 2000 ma dove le trovo ???
(mi scoccerebbe dover rifare le 5 maschere)
grazie e tutti e buona domenica

 grazie e tutti e buona domenica
Per Office 97 (quindi per Access 97) i file .bmp che vengono usati come
sfondo stanno nella cartella che ha il seguente percorso:
C:\PROGRAMMI\MICROSOFT OFFICE\OFFICE\Bitmaps\Styles\
Scegli in quella cartella il file .bmp desiderato e inserisci il suo path
completo nella proprietà Immagine della maschera.
-- 
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------

 ha scritto nel messaggio 
news:H4b6e.57154$zZ1.1...@twister1.libero.it...

trovati....grazie

Newsgroup: it.comp.appl.access
Titolo: Eliminare parte di un record

Ho un database con circa 15.000 record in cui il campo Cognome e' seguito da
(numero)
come posso eliminare da codice le parentesi e in numero contenuto?
grazie per l'aiuto

walter ha scritto nel messaggio ...

Guarda sull' help le funzioni Mid() e Instr(), una volta
che le hai "comprese" te la cavi con una bella query
di aggiornamento....
Attenzione, prima è sempre buona norma farsi una
copia del db.
Bye, Ste

come posso eliminare da codice le parentesi e in numero contenuto?
dim ssql as string
ssql="UPDATE nometabella " & _
        "SET Cognome = trim(left(Cognome, instr(Cognome, '(' )))"
docmd.setwarnings false
docmd.runsql ssql
docmd.setwarnings true
questa cosa qui:
trim(left(Cognome, instr(Cognome, '(' )))
vuol dire: vedi con instr in che posizione si trova il primo carattere
"(" che si incontra partendo da sinistra nel campo cognome, diciano la
x-esima, poi prendi i primi x caratteri a partire da sinistra, togli
gli eventuali spazi all'inizio e alla fine, scrivi il risultato nel
campo cognome.
vedi sull'help setwarnings, runsql, left e instr.
occhio che la roba li' sopra corregge direttamente il campo cognome,
per cui magari fai una copia di riserva.
-----------------------------------
Per favore, accodate due zeri al mio stipendio.  E' per renderlo Y2K-compliant.
-----------------------------------
togliete NOSPAM per rispondermi.
-----------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access
Newsgroup: it.comp.appl.access
Titolo: Esempio 2.30 Sito Comune

Ciao a tutti,
sto provando ad applicare l’esempio 2.30 del Sito Comune al mio caso.
 
MiaTabella:
MioContatore (contatore)          MioCodComune (testo)
 
1		               H501
2		               D612
 
TabellaComuni:
idComune (contatore)  CodiceComune (testo) NomeComune (testo)
 
2801                             D612
FIRENZE
4076                             F205
MILANO
5914                             H501                           ROMA
7302                             L219                           TORINO
 
Con questa query:
 
SELECT MiaTabella.MioCodComune, TabellaComuni.NomeComune
FROM MiaTabella INNER JOIN TabellaComuni ON MiaTabella.MioCodComune =
TabellaComuni.CodiceComune
GROUP BY MiaTabella.MioCodComune, TabellaComuni.NomeComune;
 
ottengo l’elenco dei codici (MioCodComune) dei comuni inseriti nella
MiaTabella pescando i relativi nomi dalla TabellaComuni:
 
2801                             D612
FIRENZE
5914                             H501                           ROMA
 
Nell’esempio di Roberto vengono rappresentati in sequenza i valori
contenuti nel campo Descrizione per ogni Numeratore.
In realtà a me servirebbe rappresentare in sequenza e separati dalla
virgola tutti i record elencati nella suddetta query, a prescindere
dal Numeratore in modo da ottenere il seguente risultato:
 
D612,H501
 
Ho provato ad adattare la funzione proposta in questo modo ma non
riesco a farla funzionare:
 
Public Function UnisciValori(MioCampo As String) As String
Dim rst As DAO.Recordset
Dim strSQL As String
UnisciValori = ""
strSQL = "SELECT MiaTabella.MioCodComune FROM MiaTabella GROUP BY
MiaTabella.MioCodComune WHERE MioCodComune =" & MioCampo & " ORDER BY
MioCodComune;"
Set rst = CurrentDb().OpenRecordset(strSQL)
rst.MoveFirst
Do Until rst.EOF
    UnisciValori = UnisciValori And rst!CODICE_CTPARTIC And " "
    rst.MoveNext
Loop
UnisciValori = Left(UnisciValori, Len(UnisciValori) - 1)
Set rst = Nothing
End Function
 
Qualcuno mi può aiutare?
 
Grazie, cranze


Prova così:
 
Public Function UnisciValori() As String
 
Dim rst As DAO.Recordset
Dim strSQL As String
 
strSQL = "SELECT MioCodComune" & _
                " FROM MiaTabella" & _
                " GROUP BY MioCodComune"
 
Set rst = CurrentDb.OpenRecordset(strSQL)
 
Do Until rst.EOF
    UnisciValori = UnisciValori & rst!CODICE_CTPARTIC & ", "
    rst.MoveNext
Loop
 
UnisciValori = Left(UnisciValori, Len(UnisciValori) - 2)
 
Set rst = Nothing
 
End Function
 
Se non funziona, racconta come e da dove chiami il codice,
cosa esattamente succede (numero di errore ecc.) e come
si chiamano le tue tabelle ed i tuoi campi senza mescolare
nomi reali e simbolici.
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 
 
 

 Access FAQ:  
http://www.donkarl.com/it
 
 
Grazie Karl, così va bene.
Sei sempre gentilissimo e preciso.
 
Ciao, cranze
Newsgroup: it.comp.appl.access
Titolo: Problemi con calcolo del saldo

Ho un problemino con il calcolo del saldo, e non so come risolverlo.
Ho una tabella o una query con quattro colonne:
Descrizione   Dare   Avere    Saldo
Ora il saldo non deve essere la semplice differenza fra dare e avere
bensi deve essere il saldo progressivo.
In pratica, il calcolo del saldo non deve essere come nella tabella
seguente:
Descrizione   Dare  Avere   Saldo
   Descr 1       0       10       -10
   Descr 1     50         0        50
   Descr 1     10         5          5
   Descr 1     20       50       -30
   Descr 1     80       10        70
ma cosě:
Descrizione      Dare      Avere       Saldo
   Descr 1           0           10          -10
   Descr 1         50             0           40
   Descr 1         10             5           45
   Descr 1         20           50           15
   Descr 1         80           10           85
Con Excel non ho problemi a farlo, ma con una tabella di access, o meglio,
una query,
come faccio a calcolare il saldo progressivo?
Grazie
Stefano B.

 ha scritto nel messaggio
news:94sdl3$c...@news.edisons.net...

Quella di seguito č solo una delle possibili soluzioni; rispetto alla
struttura della tabella da te indicata prevede l'aggiunta di un campo ID
(contatore o comunque numerico), per poter utilizzare la funzione DSuM.
Inoltre il campo Saldo non fa parte della tabella, ma viene calcolato in
maniera dinamica dalla query.
Ipotizzando che la tabella si chiami Tabella1, l'SQL per la query da te
richiesta č il seguente:
SELECT Tabella1.ID, Tabella1.Descrizione, Tabella1.Dare, Tabella1.Avere,
DSum("Dare - Avere","Tabella1","ID<=" & [ID]) AS Saldo
FROM Tabella1
GROUP BY Tabella1.ID, Tabella1.Descrizione, Tabella1.Dare, Tabella1.Avere;
Ciao,
Alberto Covili.

 bensi deve essere il saldo progressivo.
Saldo: DSum("Dare-Avere";"TuaTabella";"ID<='" & [ID] & "'")
Attenzione che qui ho previsto un ID di formato testo, inoltre e' imperativo
che l'ID sia ordinato secondo la data e che la query preveda un ordinamento
per ID crescente. Se non hai ID ma solo una data devi ordinare per data e
modificare opportunamente la funzione DMax.
Sib
--
------------------------------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access
------------------------------------------------------
La mia home (ancora non completa)
http://digilander.iol.it/syb
------------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente
Newsgroup: it.comp.appl.access
Titolo: Access 97 e immagini

Ho inserito nel mio database delle immagini JPG, come sfondo delle mie
maschere, non + grandi di 150kb l'una. In tutto sono 4.
Ho un database grosso 7mb anche compattandolo.
E' un bug di Access97?!?
Grazie
Francesco I

...

è probabile che il file JPG venga convertito in
un BMP e di conseguenza viene perso tutto
il vantaggio di una compressione di file
grafico, perché un file BMP occupa un sacco
di spazio...
Micio

Newsgroup: it.comp.appl.access
Titolo: Domanda da newbie..

Relativamente ad un campo qual e' la formula da inserire in  "proprietą
valore predefinito" per avere nel record sucessivo i dati presenti in
quello precedente?
Grazie.
Sirio


Forse ppotresti impostare un dlookup sulla tabella che ti interessa,
affinchè ti visualizzi il record che vuoi tu impostando nei criteri il
contatore massimo presente:
=DLookup("[TuoCampo]";"TuaTabella";"[ID]=" & (DMax("[ID]";"TuaTabella")))
Buona notte!

 ha scritto nel
messaggio news:ts%v8.63110$m41.1...@twister2.libero.it...

Vai sul Sito Comune (link qui sotto) e nella Sezione General dai uno sguardo
alla FAQ di Federico Luciani intitolata "Ripetere un valore del record
precedente in una form"; penso che faccia proprio al caso tuo.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 precedente in una form"; penso che faccia proprio al caso tuo.
Saro' pirla (molto verosimile), ma non la trovo. : (
Sirio

 ha scritto

Ehehe...logico...non era nella sezione "General" ma in quella "Forms".
Sirio

 ha scritto nel
messaggio news:gocw8.65736$m41.1...@twister2.libero.it...

E questo vuol dire che il pirla sono io. :-)
Scusami.


 ha scritto nel
messaggio news:ts%v8.63110$m41.1...@twister2.libero.it...
E anche subject da newbie
Antonio

 E anche subject da newbie
Altrimenti avrebbe stonato.. ;-)
Sirio

 ha scritto nel
messaggio news:WP_w8.79660$m41.1...@twister2.libero.it...

E' vero, almeno sei stato coerente...
Antonio



su lostfocus 
me.defaultvalue=nz(me.value)
Saluti.
Emanuele.
Newsgroup: it.comp.appl.access
Titolo: strConv & UCase

Generalmente utilizzo:
Me.MioControllo= StrConv(Me.MioControllo, vbProperCase)
per l'iniziale maiuscola di ogni parola all'interno del MioControllo.
Ora dovrei rendere solo l'iniziale della prima parola maiuscola di un
campo txt di una Form. Ho guardato in lungo e in largo nei post
precedenti ma nulla.
Magari è più semplice di quello che credo.
Potreste darmi un aiuto?
Grazie
Paolo

 ha scritto nel messaggio 
news:1123626609.5...@g49g2000cwa.googlegroups.com...
Generalmente utilizzo:
Me.MioControllo= StrConv(Me.MioControllo, vbProperCase)


Potreste darmi un aiuto?
Grazie
Paolo
Così al volo ho buttato giù una funzione che però potrebbe avere dei 
problemi se si tratta di convertire un cognome doppio:
Per esempio dopo aggiornamento di un controllo:
Private Sub Testo0_AfterUpdate()
Me.Testo0 = PrimaMaiuscola(Me.Testo0)
End Sub
In un modulo pubblico:
Public Function PrimaMaiuscola(UnaFrase As String) As String
Dim pos As Integer
pos = InStr(1, UnaFrase, " ")
If pos = 0 Then
Exit Function
Else
PrimaMaiuscola = StrConv(Mid(UnaFrase, 1, pos - 1), vbProperCase) & 
Mid(UnaFrase, pos, Len(UnaFrase))
End If
End Function
Ciao, Carlo


Grazie innanzitutto...
Ok, funziona per la prima parola, ma trattandosi di un campo
"descrizione", a me servirebbe che tutto il resto del testo fosse
trasformato in minuscolo (cosa che non ho specificato nel 1° post)...
Grazie
Paolo

 Cosě al volo ho buttato giů una funzione che perň potrebbe avere dei

Grazie innanzitutto...

Grazie
Paolo
Ciao Paolo, potevi arrivarci da solo, non era difficile:
Public Function PrimaMaiuscola(UnaFrase As String) As String
Dim pos As Integer
pos = InStr(1, UnaFrase, " ")
If pos = 0 Then
Exit Function
Else
PrimaMaiuscola = StrConv(Mid(UnaFrase, 1, pos - 1), vbProperCase) & 
StrConv(Mid(UnaFrase, pos, Len(UnaFrase)), vbLowerCase)


 Ciao, Carlo
In realtà ci ho provato Carlo, ma credo di essermi perso in un
bicchier d'acqua...
Cmq grazie davvero...
Paolo

Newsgroup: it.comp.appl.access
Titolo: Collegare Access con Excel

Salve a tutti,
volevo chiedere se era possibile collegare una tabella di Access con una di
Excel, di modo che si aggiornino contemporaneamente in tempo reale, ovviamente
utilizzando anche codice Visual Basic.
Sicuro di una vostra risposta, mando un caloroso saluto a tutti gli amici del
newsgroup.
Tony
____________________________________________________________________
Get free email and a permanent address at 
http://www.netaddress.com/?N=1
-- 
Posted from 
nw173.netaddress.usa.net
 [204.68.24.73] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:200105180638...@nw173.netaddress.usa.net...
Salve a tutti,
volevo chiedere se era possibile collegare una tabella di Access con una di
Excel, di modo che si aggiornino contemporaneamente in tempo reale,
ovviamente
utilizzando anche codice Visual Basic.
Sicuro di una vostra risposta, mando un caloroso saluto a tutti gli amici
del
newsgroup.
Tony
Ciao Tony,
puoi fare di meglio... puoi collegare direttamente il foglio Excel come se
fosse una
tabella "allegata" di Access.
Divertiti !
Ciao a te e a tutto il NG.
VeeJay

Newsgroup: it.comp.appl.access
Titolo: Dati Ripetuti (2)

Buongiorno, ho pensato di abbandonare il 3d omonimo
ormai giunto a circa 70 post.
Il punto è: come assegnare il valore di un campo in una msk
uguale al valore contenuto, nel precedente inserimento,nello stesso campo in
modalità newrecord.
Si è giunti alla soluzione di A.Cara
Option Compare Database: Option Explicit
Dim DistrettoIrriguo As String
Private Sub Form_AfterUpdate()
DistrettoIrriguo = Me.DistrettoIrriguo
End Sub
If Me.NewRecord Then
   Me.DistrettoIrriguo = DistrettoIrriguo
 End If
 End sub
l'errore che mi resituisce (il campo
proprieta.distrettoIrriguo non può contenere
una stringa di lunghezza zero) non è che è derivato
dal fatto che lui alla prima apertura della mask
cmq si trova con l'assegnazione delle variabili che
hanno valore null, da qui l'errore, credo.
--
Debora


wrote:

Hai verificato che nella tabella di origine della maschera
nell'opzione del campo "consenti lunghezza zero" che ti genera
l'errore si impostato "si"?
Ciao da sittighorse

 ha scritto nel messaggio
news:4Hff9.4645$6O4....@twister1.libero.it...

Il mio credo era giusto, Infatti alla prima apertura
me.distrettoirriguo=null
 Distrettoirriguo=""
Ora credo che basterà mettere
un'altro ciclo if.
--
Debora

 Ciao da sittighorse
:-)))))))) Siiii, era proprio quello!!!!
:°-(   mi sento una stupida, andavo a
cercare le cose più impossibili e invece..
penso che non mi faro più sentre x la vergogna :-((((
P.S. grazie sittighorse.
--
Debora

 un'altro ciclo if.
questo l'ho visto solo adesso
si vede che vai a scuola dal Biso ;<) (senno' si incazza)
un altro "ciclo" if?
PFUI Debora!
--
a.cara

 PFUI Debora!
???? che vuol dire?!
--
Debora

???? che vuol dire?!
L'informatica e basata su tre "mattoni"
1) L'azione: cioe' fai una cosa (x=y)
2) La scelta: Cioe' fai una cosa o un'altra in base ad una condizione
    (if x=y the fai 1 else fai 2) (case e' una "quasi" inutile
complicazione)
3) L'iterazione o ciclo: cioe' esegui tante volte fino a che si verifica
    una condizione (until) o mentre una condizione e' verificata (while)
   (cioe' for...next  o  do ....loop)
Tutti i linguaggi, puo' cambiare la sintassi, hanno questi tre mattoni
l'if non e' un ciclo 
--
a.cara

 ha scritto nel messaggio
news:3D7E5D4D...@blunet.it...

Già, vedo che non ti sfugge niente!
:-)
--
Debora

 e molto esplicative, a differenza del Biso!
Ah... quando si fanno delle affermazioni pesanti, sarebbe il caso di
documentarle, suffragarle con prove od esempi.
Poi mi fai vedere quand'è che le mie risposte non sono chiare o poco
esplicative, eh?!?
Antonio

 ha scritto nel messaggio
news:cPBf9.11039$6O4.1...@twister1.libero.it...

un esempio? vai nel 3d Gestione immagini.
--
Debora

 l'if non e' un ciclo
    Io non mi sbilancerei troppo, fossi in te. Come ben sai il numero tre e
l'"informatica" fanno a pugni. Parlerei solamente di "assegnazione" e
"salto". Tutto il resto e' orpello.
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------
Newsgroup: it.comp.appl.access
Titolo: aggiungere degli 0 davanti a dei valori

Ciao a tutti,
1) Sto usando access 2003. Mi è stato richiesto di visualizzare un
campo numerico a nove cifre (senza decimali) con degli 0 iniziali per
numeri con meno di nove cifre. Esempio: un valore del tipo 12345
dovrebbe essere visualizzato come 000012345. E' possibile farlo?!
2) Per risolvere il problema ho pensato di convertire il campo da
numerico a testuale, forzando l'inserimento con una maschera che
richieda sempre nove cifre. Dovrei però inserire degli 0 davanti a
tutti i codici prodotto. Come posso scrivere una query che automatizzi
il processo?! Ogni spunto viene buono....


metti semplicemente 00000000 nel formato del tuo controllo
-- 
-- 
Massimiliano Amendola
www.accessgroup.it
Il sito italiano di svilupatori Access
www.donkarl.com/it/cisa
 

 
Funziona!! Grazie mille

Newsgroup: it.comp.appl.access
Titolo: Raggruppamento record in Tbl

Ciao a tutti!
La rogna che non riesco a risolvere si chiama Tbl Arrivi merce i cui campi
Id - codice articolo -Numero arrivo - Data - Quantita'
contengono record che vorrei raggruppare.
Questi record li prelevo tramite ODBC e un singolo arrivo (ad esempio il n.1
del 1-1-01) e' presente piu' volte con delle quantita' "parziali" il totale
merce infatti corrispondera alla somma dei parziali.
In pratica come posso avere un solo record con la somma delle quantita' di
tutti i record prelevati per n.documento?
Un grazie enorme a tutti voi
Mile


se ho capito bene:
SELECT Arrivi.NumDocumento, Sum(Arrivi.Qta) AS SommaDiQta
FROM Arrivi
GROUP BY Arrivi.NumDocumento;
ciao

 wrote in message
TI_Ia.110823$lK4.3...@twister1.libero.it...

Collegati alla tabella che contiene i dati e creati una query di
raggruppamento basata sulla tabella collegata e che raggruppa su Numero
arrivo e somma le Quantità.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: AIUTO !!!!!!!!!! Acces 97

Sto cercado da molto tempo di visualizzare su di un unico grafico le
spezzate di un grafico che si riferiscono ai fatturati mesnsili nei vari
anni. Ho quindi l'esigenza di confrontare l'andamento del 2001 con il 2000,
scandendo mensilmente l' arco temporale.
Qualcuno mi puo aiutare ??
Ringrazio Anticipatamente
Simon

 ha scritto nel messaggio
news:v%7J7.18395$5l.4...@news1.tin.it...

Newsgroup: it.comp.appl.access
Titolo: Ottenere lo script sql di una tabella  o più

E' possibile tramite ado ?
...

 ...
Parli di Access...?
Se si ----> No
Se no ----> Generalmente SI
Ciao
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


Azzo ma neanche nella vers. 2000 :| mi sembra una grossa limitazione ....
Sto tentando di riazzerare una tabella da codice (ado) e mi trovo mille muri 
sono in alto mare qualche consiglio ?

 ha scritto nel messaggio
news:JeKRd.564794$b5.25...@news3.tin.it...

Non mi dire che quanto hai chiesto era per azzerare un Counter....?
Svuotala e compatta
Docmd.RunSQL"DELETE * FROM NomeTabella", quindi vai sul sito di Karl
per vedere come si Compatta un DB accedendo al menů nativo ed usando
la voce di Compattazione.


 di codice)
Non capisco bene come stai operando.
Anche se usi C++ devi pur utilizzare o DAO o ADO.
In entrambi i casi puoi cancellare il contenuto della Tabella
passando la stringa al Metodo Execute dell'Oggetto istanziato.
Per compattare invece ADO non espone la possibilità di Compattare
ma DAO si tramite il Metodo CompactDatabase che trovi nell'Help di DAO.
Per poterlo eseguire devi chiudere tutti i Recordset e/o le connessioni
alle tabelle.


 ...
C'è un mio esempio sul 
www.sitocomune.com
 sez. tables che ti dà l'SQL di
una tabella, ma non è completo, ha parecchie limitazioni. Non esporta
tutti i tipi di campi e non esporta gli indici.
Namor
-- 
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 l'oggetto Connection.


 ergo come potrei fare ?
Che Interfaccia usi...??
Non c'č problema quanto ti ho indicato č sostituibile con:
OggettoDatabase.Execute "DELETE....."
Ti basta accedere a DAO, se usi DAO oppure ADO usando
l'oggetto Connection.
Ciao


 -- 



A ecco mi mancava dao .... ora faccio delle ricerche...

Newsgroup: it.comp.appl.access
Titolo: Tabelle colorate

Ciao a tutti.
E' possibile rendere i campi di una sottomaschera, in mod. tabella,
colorati....a seconda delle esigenze (x es. tutta la colonna di un
campo in verde...un altra in rosso...e cosě via...)
Grazie.
Paolo.

 campo in verde...un altra in rosso...e così via...)
Dipende dalla tua versione di Access.
(Per questo é meglio di sempre indicarla nel post.)
Solo se hai A00 puoi usare la formatazione condizinale (si chiama
cosí in Italiano? in Inglese: conditional formating).
Si trova al menu "format" della maschera se ha selezionato un
campo nella visualizzazione struttura. Al dialogo scrivi un condizione
che é giusto per tutti valori del campo é scegli un colore.
--
HTH
Karl
*********
Scusate il mio malissimo Italiano. Faccio solo esercizi qui.
Access-FAQ (Tedesco): 
http://www.donkarl.com
Newsgroup: it.comp.appl.access
Titolo: Note per la protezione di un DB

http://support.microsoft.com/default.aspx?scid=%2Fsupport%2FAccess%2FContent%2FSECFAQ.asp
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------

 
http://support.microsoft.com/default.aspx?scid=%2Fsupport%2FAccess%2FContent%2FSECFAQ.asp
Mi sa che fa proprio per me ....
Grazie
MArco
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Newsgroup: it.comp.appl.access
Titolo: Copiare struttura Query

  Creo una query (Q1) mediante codice a cui appoggio un maschera.
Da questa maschera ne apro un'altra che attualmente appoggia alla stessa 
query, ma dovrei appoggiarla ad un'altra query (Q2) che però a parte il 
nome deve essere uguale alla precedente.
Come posso da codice copiare Q1 sulla query esistente Q2?
ciao marco

 ciao marco
traducendo in italiano corrente e possibilmente con termini un pochino pi� 
tecnici, che vor d�?
Antonio 

 Antonio
nell'origine dati della maschera, devi sostituire il nome della query:
da Q1 a Q2
l.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Newsgroup: it.comp.appl.access
Titolo: Aiuto Creazione automatica appuntamenti.

Buona sera,
sto creando un database per la gestione dei miei clienti e mi si presenta un
problema:
stipulando un contratto di manutenzione con un cliente stabiliamo una data
per le manutenzioni che si verificheranno a cadenza annuale. Ho creato una
tabella appuntamenti nella quale registro tutti gli appuntamenti, sia quelli
sporadici che quelli legati ad un contratto; per quest'ultimi vorrei che,
una volta inserito il primo ed indicato che trattasi di manutenzione
programmata, si creassero più record a cadenza annuale, per un determinato
numero di anni.
Grazie a chiunque voglia e possa aiutarmi
Salvatore

 ha scritto nel messaggio
news:BXcq6.45476$Xj7.3...@news.infostrada.it...


 ha scritto nel messaggio
news:BXcq6.45476$Xj7.3...@news.infostrada.it...

Poiché ritengo che avrai anche una maschera nella quale registri i dati in
una tabella contratti, a fronte dell'evento "Dopo inserimento" di tale
maschera genera un codice VBA che apre un recordset sulla tabella
appuntamenti e ci va a registrare tutti gli appuntamenti programmati
desumibili dai dati contenuti nel record contratto appena registrato.
Se poi la tua procedura non prevede la creazione di una tabella contratti,
creati una maschera che contiene due controlli non associati (uno relativo
alla data del primo appuntamento ed un altro in cui digiti il numero di
appuntamenti da effettuare); il codice VBA di cui sopra generalo a fronte
dell'evento "Su clic" di un pulsante di comando.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: Casella combinata (Trova Record) non funziona

Situazione:
Tabella con IDprodotto a contatore, ma ho impostato il formato a "CW/"0000
quindi compare il numero progressivo automaticamente, es CW/0001 e sosì
via....
Problema:
Ho creato una maschera in cui ho necessità di cercare il relativo prodotto
con una casella combinata che va a trovare il record specifico (creata con
l'autocomposizione)
Errore:
Quando vado a selezionare il relativo codice sulla casella di testo mi dà
messaggio errore
"è stato immesso un valore non valido per il campo"
invece se dentro la casella combinata scrivo "5" mi va a trovare CW/0005
Dove sbaglio?
grazie Vittò

 ha scritto nel messaggio
news:93i16a$93a$1...@fe1.cs.interbusiness.it...



Nei messaggi che invii a questo NG controlla che la tua risposta sia posta
dopo i messaggi precedenti.
--
Silvio
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access
Newsgroup: it.comp.appl.access
Titolo: Invio in automatico

e' possibile in A97 fa eseguire l'invio automaticamente dopo una circa 4
secondi....
mi spiego meglio
ho una maschera Preventivo
con
Sottomaschera Righe_Preventivo
nelle righe preventivo (maschere continue)
una volta chiamato l'articolo mi posiziono su pz (pezzi)
una volta digitati i pezzi dell'articolo preventivato
devo fare una serie di invvi da tastiera per calolarmi il rigo del
preventivo (le formule
le ho inserite su disattivato di alcuni campi che si trovano susseguenti a
pz);
sarebbe comodo avere dopo aver inserito pezzi una stasi di 4 o 5 secondi se
non meno e poi un invio in
automaticofino all'inizio del nuovo record!!!
Si puo'????
Mi sembra un po' fantascientifico!!!
Ciao
e
Grazie
-------------------------------------------------------------
Luigi Corinna
Grafico - Creativo - Web Designer

 ha scritto nel messaggio
news:WlTA7.770$JR4....@news2.tin.it...

Prova a guardare l'evento "Su Timer" e il comando Sendkeys
Ciao, FABIO

 ha scritto nel messaggio
news:WlTA7.770$JR4....@news2.tin.it...

Dopo aggiornamento della casella di testo Pz fai un ciclo che aspetta 4 o 5
secondi e dopo vai a nuovo record es:
Private Sub Pz_AfterUpdate()
    Dim Ora As Variant
    Ora = Now
    Do While DateDiff("s", Ora, Now) < 5
        DoEvents
    Loop
    DoCmd.GoToRecord , , acNewRec
End Sub
Ciao Roberto - Syd

 ha scritto nel messaggio
news:3eVA7.1376$JR4....@news2.tin.it...

Mi da errore di questo tipo:
errore run-time '2105'
impossibile passare al record specificato
e' possibile che ci si trovi alla fine di un set record
come mai!
Ciao Luigi

 ha scritto nel messaggio
news:2WbB7.3492$C57....@news1.tin.it...

Non so come mai non puņ andare a nuovo record io ho provato su una maschera
e non mi dą problemi, adesso non so se tu hai una sottomaschera dovrebbe
funzionare comunque, a meno che non ci sia la proprietą Consenti aggiunte
impostata a No, ma non credo visto che usi la maschera per l'inserimento o
no?
Ciao Roberto - Syd
Newsgroup: it.comp.appl.access
Titolo: Somma di date e valori numerici

Buongiorno a tutti anzi buona domenica....
problema
in una maschera ho un campo con una data ed un altro con un valore numerico
riferito ad un totale giorni...
Esempio: data      12/10/01
valore numerico    60
...vorrei ottenere la somma della data con il valore numerico in formato
data....
cioe' (come dall'esempio) 12/10/01 piu' 60 giorni = 12/12/01
ed eventualmente con un campo Sě/No effettuare il calcolo fine mese
cioe' se e' 12/12/01 ed io spulcio la casella Sě/No mi aggiorna la data a
fine mese 31/12/01...
Si puo' o e' fantascienza!!!
Grazie 1000
-------------------------------------------------------------
Luigi Corinna
Grafico - Creativo - Web Designer

 cioe' se e' 12/12/01 ed io spulcio la casella Sì/No mi aggiorna la data a


 ha scritto nel messaggio
news:9qu2lg$7mg$1...@newsreader1.mclink.it...


 wrote in message
news:awxA7.4686$HT2.1...@news1.tin.it...



Sì, ti sei dimenticato di rispondere dopo il quoting.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com

 ha scritto nel messaggio
news:9quah0$8l2$1...@newsreader1.mclink.it...

Ho sbagliato termine volevo dire codice...
penso che il tuo codice riadattato dovrebbe funzionare.....
se me lo compili ti ringrazio...
ti ricordo i controlli
[Data Fattura] + [Giorni] = [Data Scadenza] possibilmente fine mese!!
Grazie
Luigi

Prova cosě:
Dim IntervalType As String
IntervalType = "d"
[Data Scadenza] = DateAdd(IntervalType, [Giorni], [Data Fattura])
[Data Scadenza] = DateAdd(IntervalType, -1, DateSerial(Year([Data
Scadenza]), Month([Data Scadenza]) + 1, 1))
Ciao.


 ha scritto nel messaggio
news:9r0lrk$imv$1...@newsreader1.mclink.it...

Funziona in maniera superba
grazie di cuore finalmente lo scadenziario
funzionera' calcolando automaticamente la data
scadenza!!!!
Ciao
Grazie ancora
Luigi

Newsgroup: it.comp.appl.access
Titolo: ODBC

Se voglio aprire un Database ODBC, che si trova su una macchina chiamata
pippo.it
, cosa debbo scrivere?
Ho provato così ma non funziona:
_________________________
Sub OpenConnectionX()
    Dim wrkODBC As Workspace
    Dim conConn As Connection
    Set wrkODBC = CreateWorkspace("NewODBCWorkspace", "", "", dbUseODBC)
    MsgBox "Apertura di Connection1..."
    Set conConn = wrkODBC.OpenConnection("Connection1", _
        dbDriverNoPrompt, , _
        "ODBC;DATABASE=pippo;UID="utente";PWD="password";DSN=pippo")
End Sub
_________________________
Se invece collego una tabella e poi entro nella sua proprietà, ho questa
stringa:
ODBC;DSN=pippo;DB=pippo;SERVER=
pippo.it
;
PORT=;OPTION=2;STMT=;;TABLE=nomedellatabella
come posso risolvere?
grazie Riccardo

 wrote in message
9i1emo$cg4$1...@news.panservice.it...

aggiungendo nella stringa ODBC anche SERVER=
pippo.it
 sono riuscito
ad attivare la connessione, pero' se attivo la connessione, e poi apro una
tabella
collegata al database pippo, mi si apre di nuovo la maschera di
configurazione
del Driver MySql per la connessione ODBC.
non dovrebbe essere già aperta?
grazie Riccardo
Newsgroup: it.comp.appl.access
Titolo: Come si esce da Access?

Salve al NG
Forse è facile ma non lo so fare.
Come si fa, dal pannello comandi, non soltanto a chiudere il database
ma ad uscire direttamente da Acces e tornare al desktop?
Grazie

 wrote in message
news:zs7FO6zWIam1cMJo0Lq+Q8fZo=G...@4ax.com...

Iserisci nel codice del pulsante di uscita questo codice al posto
di Docmd.Close
 ---->     DoCmd.Quit [acSave] 'è optional
@Alex.
-- 
Posted from  [62.98.12.105] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Newsgroup: it.comp.appl.access
Titolo: come fermare il codice in esecuzione

da tastiera, come blocco l'esecuzione del codice? (quando va in loop
qcosa, per esempio...)
___________________________________________
"in fondo anche l'amore è un sovrappensiero..."
m.querc...@sis-ter.it
Togli NOSPAM dall'e-mail per rispondere.

 wrote in message
llfm5tkb4ac6sp9ia...@4ax.com...

Newsgroup: it.comp.appl.access
Titolo: Campi ID un po particolari...

Ragazzi una domanda...
Un mio conoscente ha creato 5-6 anni fa un database in Works
(brividi...) ed ora mi ha domandato di aiutarlo a trasferirlo in
Access (2000).
Nella tabella Preventivi ha usato una codifica un po' particolare
(tipo targhe italiane)... con 3 campi.
Il primo campo va da A a Z - il secondo campo va da AA a ZZ ed il
terzo campo e' un valore numerico da 1 a 99.
Ecco un esempio':
--------------------------
CAMPO1 | CAMPO 2 | CAMPO3
--------------------------
  A    |  AA     |  01
  A    |  AA     |  02
.....
  A    |  AA     |  99
  A    |  AB     |  01
.....
  A    |  AB     |  99
  A    |  AC     |  01
.....
  A    |  ZZ     |  99
  B    |  AA     |  01
Questi 3 codici assieme creano il codice che si ritrova nei documenti
stampati e messi in archivio (in pratica non posso eliminarli).
Era troppo facile avere un campo numerico autoincrementale!!! (ma
forse works non lo fa?)
Come faccio a mantenere una simile struttura anche in access
(naturalmente in works veniva mantenuta manualmente) in modo che ad un
nuovo preventivo senza che io scriva niente mi venga proposto il primo
codice valido?
Ivan

 ha scritto nel messaggio
news:d9c7b02c.02072...@posting.google.com...

Dovrai scriverti una routine che al salvataggio del record ti calcola i
primi valori utili secondo dei criteri da te stabiliti
Antonio


Per prima cosa crea una query per ottenere l'ultimo ID inserito
SELECT Campo1 & Campo2 & Campo3 AS Codice, Campo1, Campo2, Campo3
FROM Tabella ORDER BY Desc
Leggendo il primo record restiuito dalla query ottieni la stringa da
"Incrementare"
poi con una funzione simile alla seguente ti calcoli il nuovo codice
Sub Calcola()
  Dim Campo1 As String
  Dim Campo2 As String
  Dim Campo3 As String
  Campo1 = "A"
  Campo2 = "ZZ"
  Campo3 = "99"
  If Campo3 = "99" Then
    Campo3 = "00"
    If Right(Campo2, 1) = "Z" Then
      If Left(Campo2, 1) = "Z" Then
        Campo2 = "AA"
        Campo1 = Chr(Asc(Campo1) + 1)
      Else
        Campo2 = Chr(Asc(Left(Campo2, 1)) + 1) & "A"
      End If
    Else
      Campo2 = Left(Campo2, 1) & Chr(Asc(Right(Campo2, 1)) + 1)
    End If
  Else
    Campo3 = Campo3 + 1
  End If
  MsgBox Campo1 & Campo2 & Campo3
End Sub
Queste operazioni le puoi mettere sull'evento di un pulsante per creare un
nuovo preventivo.

...

Ti ringrazio molto per il tuo aiuto...
ora mi metto al lavoro...
Ivan
Newsgroup: it.comp.appl.access
Titolo: ERRORE su Applicativo RUN-TIME

Chiedo gentilmente un aiuto agli esperti,
Ho creato un applicativo con Access 97 e con ODE97 TOOLS
ho generato il run-time con relativo Setup.
Se installo il setup ottenuto su una macchina con installato Office 97
Professional ( e quindi Access97 ) funziona tutto, se invece lo installo su
una macchina senza oppure con office 2000, ho il seguente errore dopo che si
è aperta la maschera dei comandi di avvio e dove c'è un pulsante che
richiama del codice dove legata all' espressione "su click" c'è il richiamo
ad un'altra maschera dello stesso data base.
L' ERRORE  quando clicco sul pulsante di comando.
" L'espressione (su clic ) immessa come impostazione della proprietà di
evento ha provocato un errore :
( L'espressione non corrisponde al nome di una macro, di una funzione
definita dall'utente oppure a routine evento.)
Si è verificato un errore durante la valutazione di una funzione, di un
evento o di una macro.
Ringrazio anticipatamente coloro che sapranno darmi una risposta !!!

 L' ERRORE  quando clicco sul pulsante di comando.
Prova a postare il codice.
Quasi sicuramente hai un problema di riferimenti a librerie.
Ciao, Simone

Newsgroup: it.comp.appl.access
Titolo: Bloccare e sbloccare inserimento dati

Salve a tutti,
ho questo problema: vorrei avere la possiilità, attraverso un pulsante di 
comando, di bloccare o sbloccare l'inserimento di dati in una serie di campi 
presenti in una maschera.
Grazie in anticipo per gli eventuali suggerimenti.
Marco 

 ha scritto nel messaggio 
news:45f58568$0$4793$4faf...@reader4.news.tin.it...

Se il blocco riguarda tutti i controlli ti basta impostare me.AllowEdits = 
false
Se il blocco riguarda solo alcuni controlli bisogna trovare il modo di far 
capire al codice quali controlli bloccare.
Per esempio si può usare la proprietà TAG dei controlli interessati in modo 
che un eventuale codice che cicla tra i controlli, vada a leggere tale 
proprietà e se è impostata, per esempio su "N", li considera, altrimenti no.
In quale condizione ti trovi?
Quale versione di Access?
Ciao, Carlo 

 ha scritto nel messaggio 
news:45f58568$0$4793$4faf...@reader4.news.tin.it...

Ciao,
l'unica cosa che mi viene in mente è attivare o disattivare i textbox etc... 
( i controlli) attraverso i quali andranno aggiornati i campi di 
riferimento...
Me.NomeTextBox.Enabled = True
Me.NomeTextBox.Enabled = False
Ovviamente stiamo parlando della relatva maschera d'immissione dati
Buon pomeriggio 

 ha scritto nel messaggio 
news:et4106$64t$1...@tdi.cu.mi.it...

Sì, il blocco riguarda tutti i controlli, ma potrebbe esserci l'eventualità 
di considerarne solo alcuni.
Nel primo caso dove impostare "me.AllowsEdits=False" ?
La versione è quella di MS Office 2003 Pro.
Grazie per la tempestiva risposta.
Ciao, Marco 

 ha scritto nel messaggio 
news:45f58ad9$0$4791$4faf...@reader4.news.tin.it...

Così per fare un esempio
Al click del pulsante:
If Me.AllowEdits = True Then
Me.AllowEdits = False
Else
Me.AllowEdits = True
End If
Questo imposta alternativamente AllowEdits a true o a false.
Ciao, Carlo
Newsgroup: it.comp.appl.access
Titolo: OT Traduzione FAQ 4.11

***********************
4.11 Storing calculated values
Problem
You want to store the value of a calculated control in the table
that is the data source of the form.
Solution
Generally it's not a good habit to store a calculated value.
First you should think over if it's really necessary to store it
because normally it can always be calculated again.
To store calculated values may be useful if parts of the
calculation can change over time and you don't want to
maintain an extra history table, or if you deal with complex
formulas and win performance by storing the value.
Obviously you need a field in the table that can hold the value.
Then you can use the following code either in the After Update
event of each control that contributes to the calculation or in the
Before Update event of the form:
Me!MyTableField = Me!MyCalculatedControl
**********************
-- 
cu
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

 **********************
Ovviamente ti servirà nella tabella un campo in cui salvare il valore.
Poi puoi usare il seguente codice, nell'evento After Update (Dopo
Aggiornamento) di ciascun controllo interessato dal calcolo o nell'evento
Before Update (Prima di Aggiornare) della maschera:
Me!NomeCampoDellaTabella = Me!NomeControlloCalcolato
-- 
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 **********************
Ciao MAssimiliano


Newsgroup: it.comp.appl.access
Titolo: Casella di controllo

Ho un problema con le caselle di controllo: ho applicato tramite delle macro
delle impostazioni di valore,ma ogni volta che queste regole devono essere
applicate(onclick sulla casella x intenderci) mi compare il messaggio
Errore di comunicazione con il server OLE o l'oggetto ACTIVEX
Chiudere il server ole e riavviarlo all'esterno di Access quindi ritentare
l'operazione originale in access.
Qualcuno m aiuta x favore?
--------------------------------
Inviato via 
http://usenet.libero.it

 l'operazione originale in access.
Forse dovresti provare a illustrare meglio il dettaglio delle tue macro
Antonio


Buondì
Su onclick sulla casella di controllo c'è un imposta valore su un'altra
casella di controllo.In pratica funzionano con questo ragionamento: se
casella A è vero allora casella B deve essere falso e contrario. Tieni conto
che queste "procedure" sono cose x me consolidate,nel senso che le ho già
fatte in altre mie piccole applicazioni.Quello che è cambiato è il pc (un P2
350 con 130 mb di ram Windows2000Pro e Access2000).Non ci capisco tanto ma
mi da l'impressione che sia questione di registrazione degli oggetti o
qualcosa di simile.Ma p***a p*****a, è la prima volta che mi capita e non ne
vengo fuori,dato che ovviamente ho bisogno di finire il lavoro presto e mi
servirebbe la classica "mano"!!!
Ciao e grazie cmq.
