title: quesito su report

text:
>
> Se i record della tua sottomaschera sono ordinati con un id,
findfirst(ati)
> il primo e rowsource(ati) la sottomaschera con un id maggiore (oltre al
> criterio della data).
> ciao MAssimiliano
>
>
Aspetta, forse non mi sono spiegato bene: la mia maschera di selezione
contiene esclusivamente due campi: uno per la data di "nizio selezione"per
la data di "fine selezione"
contiene poi un pulsante di comando che crea un report contenente
l'estrazione dei valori compresi tra le due date (l'estrazione viene
effettuata con una normalissima query di selezione).
è a questo punto che io vorrei intervenire, cioè nella formazione del
report, dicendogli che il primo valore estratto (quindi la prima riga che
dovrebbe stampare il report) venga eliminata.
esempio:
ho selezionato l'intervallo di data tra il 05/04/03 ed il 10/04/03
e la quesry mi estrae i seguenti valori:
data            ora            appuntamento
05/04/03    7:30            con tizio
05/04/03    9:30            con caio
05/04/03    18:00            con sempronio
06/04/03    9:00            con xxxxx
06/04/03    11:00            con yyyyyyy
ecc. ecc. sino al 10/04/03
ecco, io vorrei (non sto qui a spiegare per quale motivo la mia mente
contorta e contraddittoria abbia la necessita di questa cosa) che la prima
riga estratta dalla query:
05/04/03    7:30            con tizio
non venga stampata nel report
grazie


title: quesito su report

author: MA

text:

Ecco appunto, non l'hai segnato ma la tabella avra un campo contatore!
cerca sull'help Findfirst per ottenere il primo contatore della query che
ottieni. Se la query è ordinata in maniera diversa assegna l'id
dinamicamente seguendo l'esempio su
www.sitocomune.com



title: quesito su report

author: Frank

text:
>
> Ecco appunto, non l'hai segnato ma la tabella avra un campo contatore!
> cerca sull'help Findfirst per ottenere il primo contatore della query che
> ottieni. Se la query č ordinata in maniera diversa assegna l'id
> dinamicamente seguendo l'esempio su
www.sitocomune.com
> ciao MAssimiliano
>
>
Grazie, questa sera ci proverň
Carlo


title: Query a campi incrociati con parametri

author: facso

text:
Un saluti a tutti!!
Ho il seguente problema..
Non riesco ad impostare una query a campi incrociati (che vergogna!)
in modo che mi tiri fuori il numero di Ricorsi presentati dai
Ricorrenti in una specifica Materia in un arco di tempo detrminato...
Criterio: Between nz([Forms]![Conta
ricorsi]![AnnoInizio];DMin("Anno";"Ricorsi")) And nz([Forms]![Conta
ricorsi]![AnnoFine];DMax("Anno";"Ricorsi")).
Il problema è che se in questo arco di tempo non ci sono ricorsi per
quella materia, la query mi restituisce l'errore "Il modulo di
gestione di database Microsoft Jet non riconosce " come nome di campo
o espressione valida.".
Ho provato a creare campi calcolati.. funzioni nz.. ma niente!
Su quali campi dovrei impostare tali criteri? Sul Conteggio di
IDMateria? Su quello di IDRicorso?
Avevo impostato..
Campo:        Cognome     Nome        Anno        Materia    IDRicorso
Tabella:      Ricorrenti  Ricorrenti  Ricorrenti  Materie    Ricorsi
Formula:      Raggr.      Raggr.      Raggr.      Raggr.     Conteggio
Campi incr.:  Int. riga   Int. riga   Int. riga   Int. col.  Valore
Dove sbaglio?
Il database è così strutturato..
Tabelle:
Ricorrenti	        Ricorsi			Materie
IDRicorrente		IDRicorso		IDMateria
Cognome		        Anno			Materia
Nome			IDRicorrente
			IDMateria
Relazioni:
Ricorrenti	--->	Ricorsi		(uno a molti)
Materie	        --->	Ricorsi		(uno a molti)
...grazie!


title: Query a campi incrociati con parametri

author: Carlo Costarella

text:
"facso" <-
fac...@libero.it
> ha scritto nel messaggio
news:478503f2.03051...@posting.google.com...

Aggiungi un criterio alla colonna [Anno] (in pratica una nuova colonna
impostata a "DOVE"): Not is null.
Pulisci tutto il resto.
Between nz([Forms]![Conta
ricorsi]![AnnoInizio];DMin("Anno";"Ricorsi")) And nz([Forms]![Conta
ricorsi]![AnnoFine];DMax("Anno";"Ricorsi")).
Diventa:
Between [Forms]![Conta
ricorsi]![AnnoInizio] And [Forms]![Conta
ricorsi]![AnnoFine].
Se poi vuoi comunque immettere un valore anche se il controllo sulla
maschera è nullo o vuoto (DMin("Anno";"Ricorsi")) allora
usa due funzioni del tipo:
Public Function DimmiSostituisciAnno1() as Integer '(se di tipo intero o
string se di tipo testo)
If IsNull([Forms]![Conta ricorsi]![AnnoInizio]) or [Forms]![Conta
ricorsi]![AnnoInizio] = 0 then
DimmiSostituisciAnno1 = DMin("ANNO","Ricorsi")
else
DimmiSostituisciAnno1 = [Forms]![Conta ricorsi]![AnnoInizio]
End If
Public Function DimmiSostituisciAnno2() as Integer '(se di tipo intero o
string se di tipo testo)
If IsNull([Forms]![Conta ricorsi]![AnnoFine]) or [Forms]![Conta
ricorsi]![AnnoInizio] = 0 then
DimmiSostituisciAnno2 = DMax("ANNO","Ricorsi")
else
DimmiSostituisciAnno2 = [Forms]![Conta ricorsi]![AnnoFine]
End If
Il Criterio nella query diventa:
Between DimmiSostituisciAnno1() And DimmiSostituisciAnno2()
Sono possibili altre strade.
Ciao, Carlo


title: Query a campi incrociati con parametri

text:
"Carlo Costarella" <
carloantoni...@virgilio.it
> wrote in message news:<nvNva.154598$
K35.3...@news2.tin.it
>...

Ti ringrazio per la risposta.. ma forse la mia domanda non è stata
abbastanza chiara.
Voglio che la query mi includa anche le materie in cui c'è un valore
null, non che le escluda!! Perché Is Not Null? Perché intervenire
sull'anno?


title: Query a campi incrociati con parametri

text:

Sì per l'anno puoi omettere il criterio.
La tua richiesta è stata molto precisa: "...che mi tiri fuori il numero di
Ricorsi presentati dai
Ricorrenti in una specifica Materia in un arco di tempo detrminato".
Se è solo questo i suggerimenti che ti ho dato vanno benissimo.
Se invece vuoi comunque vedere il risultato ti consiglio di usare due query
e gestire il tutto da codice.
La seconda query non contiene criteri o filtri.
Da codice: Apri la prima query, gestisci l'errore, se l'errore è quello che
hai detto...apri la seconda query e, solo a questo punto, visualizzi o usi
l'una o l'altra.
Ciao, Carlo


title: Query a campi incrociati con parametri

text:
"Carlo Costarella" <
carloantoni...@virgilio.it
> wrote in message news:<U61wa.85999$
3M4.2...@news1.tin.it
>...

Continuo a non capire.. o a non farmi capire.
Ad esempio..
es. 1
ho 8 Materie: mat1; mat2; mat3... mat8
ho un periodo di tempo: 2003
se nel 2003 non è stato presentato alcun ricorso per la mat2 e/o la
mat 5, il report mi restituisce il messaggio "Il modulo di gestione di
database Microsoft Jet non riconosce " come nome di campo o
espressione valida."
es. 2
ho 8 Materie: mat1; mat2; mat3... mat8)
ho un periodo di tempo: dal 2000 al 2003
in questo arco di tempo sono stati presentati ricorsi per tutte le
materie (in 4 anni vorrei vedere..!) e, quindi, il report mi
visualizza ciò che dovrebbe.
Domanda:
Come devo impostare la query in modo che nell'es. 1 mi comprenda nel
report anche le materie con valore null?
Ciao..


title: Query a campi incrociati con parametri

text:
CUT
>
> Ad esempio..
>
> es. 1
> ho 8 Materie: mat1; mat2; mat3... mat8
> ho un periodo di tempo: 2003
> se nel 2003 non è stato presentato alcun ricorso per la mat2 e/o la
> mat 5, il report mi restituisce il messaggio "Il modulo di gestione di
> database Microsoft Jet non riconosce " come nome di campo o
> espressione valida."
>
> es. 2
> ho 8 Materie: mat1; mat2; mat3... mat8)
> ho un periodo di tempo: dal 2000 al 2003
> in questo arco di tempo sono stati presentati ricorsi per tutte le
> materie (in 4 anni vorrei vedere..!) e, quindi, il report mi
> visualizza ciò che dovrebbe.
>
> Domanda:
> Come devo impostare la query in modo che nell'es. 1 mi comprenda nel
> report anche le materie con valore null?
>
> Ciao..
Questa istruzione non restituisce nulla perchè nel 2003 non ci sono ricorsi
per nessuna materia:
TRANSFORM Count(MRicorsi.Ricorso) AS ConteggioDiRicorso
SELECT MRicorsi.Anno
FROM Materie INNER JOIN MRicorsi ON Materie.IDM = MRicorsi.Materia
WHERE (((MRicorsi.Anno) Between 2003 And 2003) AND
((MRicorsi.Ricorso)=True))
GROUP BY MRicorsi.Anno
PIVOT Materie.Materia;
Quest'altra istruzione ritorna tutti i ricorsi (ricorso = Vero) per tutte le
materie e anche per le materie che non hanno avuto ricorsi nel periodo
specificato:
TRANSFORM Count(MRicorsi.Ricorso) AS ConteggioDiRicorso
SELECT MRicorsi.Anno
FROM Materie INNER JOIN MRicorsi ON Materie.IDM = MRicorsi.Materia
WHERE (((MRicorsi.Anno) Between 1998 And 2001))
GROUP BY MRicorsi.Anno
PIVOT Materie.Materia;
Le tabelle che ho usato sono due:
Materie: IDM di tipo contatore; Materia di tipo Testo
MRicorsi: ID contatore, Materia numerico, Ricorso sì/no, Anno numerico.
Join 1 a molti integrità referenziale tra IDM e Materia.
Con questo sistema (provare per credere) non ho alcun errore.
Tutto ciò è vero se hai usato due tabelle come nell'esempio.
Questo per quanto riguarda la query.
E' chiaro che nel report devi usare (e solo ora ho capito che parlavi di un
REPORT che non hai mai menzionato nei post precedenti) solo i campi presenti
nelle intestazioni delle colonne. Se uno dei controlli che hai usato nel
report (MAt1,Mat2,Mat3, ecc.) non è presente nelle intestazioni di colonna o
non è compreso nel risultato della query, avrai l'errore descritto.
Come potrebbe il report usare un'origine controllo che non esiste?
La soluzione è quella di includere tutte le materie sia come controlli nel
report che, e soprattutto, nelle intestazioni di colonna della query.
Per il report sai come si fà; per la query aprila in struttura ti posizioni
sul campo impostato a "Intestazione colonna", tasto destro, "Proprietà" e in
"Intestazioni colonne" metti (scrivi) tutte ma proprio tutte le materie
separate da un punto e virgola (;). Alimenta il report con questa query e
vedrai che nell'elenco dei campi disponibili per il report troverai l'elenco
di tutte le materie. Ti è sufficiente trascinare tutti i campi nel corpo del
report.
Ciao, Carlo


title: Query a campi incrociati con parametri

text:
"Carlo Costarella" <
carloantoni...@virgilio.it
> wrote in message news:<6Xrwa.93561$
3M4.2...@news1.tin.it
>...

Hai ragione... mi sono accorto che non ho fatto alcun cenno al report.
Cmq.. sei grande!! Ho risolto scrivendo nelle proprietà del campo che
funge da intestazione colonna tutte le materie previste.
A questo punto la domanda sorge spontanea.. le materie erano soltanto
8. Se fossero state 100 avrei dovuto metterle tutte come intestazioni
di colonna o c'è un modo più rapido (o, cmq, diverso) di risolvere la
questione?
Grazie infinite!!!


title: Impostazione ricerca per data

author: Giorgio A.

text:
Per cortesia un aiuto per creare al meglio la struttura.
Qualsiasi ipotesi al meglio č ben accettata
La tabella contiene dati anagrafici
Vorrei creare una procedura per una ricerca per data (dal giorno  al giorno)
che mi visualizzi (in una maschera) un elenco generale dei Clienti, e una
ricerca associata ad una lettera alfabetica del campo Cognome:
Presumo si debba creare dei ComboBox:
-Per inserimento dal Giorno:
1 ComboBox con i giorni del mese
1 ComboBox con i mesi dell'anno
1 ComboBox con l'anno
-Il tutto replicato per inserimento al Giorno:
1 ComboBox con i giorni del mese
1 ComboBox con i mesi dell'anno
1 ComboBox con l'anno
-Inoltre 1 ComboBox che  mi permetta di selezionare o la voce "Tutti" oppure
una lettera alfabetica.
-1 Bottone di avvio ricerca
Premetto che la lista ricercata va stampata.
Per cortesia se possibile indicatemi passo a passo, č la prima volta che
cerco di creare una struttura di ricerca.
Grazie 1000
Giorgio


title: Eseguire maschera al clic su un record in tabella

author: Precog Cipelletti

text:
Se da una query semplice io ricevo un elenco di record visualizzati in
tabella, posso al clic su uno dei record visualizzare tali dati su una
maschera già preparata.
Es. ho una serie di città in tabella con dati su popolazione, targa automob,
prefisso.... La query m iestrapola a richiesta quelle di una regione.
Dall'elenco scaturito smpre in tabella è possibile cliccando su uno dei
record che vedo poter espandere in una maschera tutti i dati (più bella a
vedersi) che ho già preparato?
Grazie
Precog


author: GC

text:

Potresti creare una maschera associata alla tua query (alla quale, se
vuoi, puoi anche applicare la visualizzazione foglio dati per
mostrarne i risultati come se fosse una tabella o una query) e
associare, all'evento Current, l'apertura della maschera più bella a
vedersi.


text:
Ti ringrazio. Ho fatto come dici. Funziona quasi tutto. Il problema è che
dall'elenco su foglio dati della maschera se clicco su un record mi apre la
maschera che ho impostato "Su Corrente" però non mette i dati del record su
cui ho cliccato ma sul primo del database. E' possibile fare in modo che
vengano inseriti nella maschera "più bella" i dati delrecord su cui ho
cliccato nella maschera foglio dati?
Ringrazio fin da ora
Precog
"GC" <
g.cal...@yahoo.it
> ha scritto nel messaggio
news:1171792838.6...@k78g2000cwa.googlegroups.com...



text:
On 18 Feb, 16:01, "Precog Cipelletti" <
pre...@alice.it
> wrote:
> Ti ringrazio. Ho fatto come dici. Funziona quasi tutto. Il problema è che
> dall'elenco su foglio dati della maschera se clicco su un record mi apre la
> maschera che ho impostato "Su Corrente" però non mette i dati del record su
> cui ho cliccato ma sul primo del database. E' possibile fare in modo che
> vengano inseriti nella maschera "più bella" i dati delrecord su cui ho
> cliccato nella maschera foglio dati?
>
puoi impostare la proprietà Filter della nuova maschera. Nell'evento
Current, prima di chiamare il comando di apertura del form, ti crei
una variabile stringa StringaFiltro in cui inserisci qualcosa del tipo
"ID=" & Me.Id (supponendo che tu abbia un identificativo univoco del
record e che questa chiave primaria si chiami ID). Imposti poi
NuovaForm.Filter=StringaFiltro


text:
Ti chiedo scusa e approfitto della tua grande disponibilità (e quella di
tutti). Non ho molta dimestichezza con i comandi un pò più introversi di
Access. Io nell' Evento "Su Corrente" ho inserito l'indicazione di una macro
che mi apre la maschera che io definisco "più bella". Quando dici "prima di
chiamare il comando di apertura crei una variabile stringa" intendi dire che
devo farlo su Visual Basic o posso farlo usando le opzioni di Access? Ho una
chiave primaria nei record che si chiama "progr". In pratica la mia
difficoltà è scoprire dove scrivere quel codice che mi hai indicato. Puoi
ancora aiutarmi?
Grazie e  scusa
Precog
"GC" <
g.cal...@yahoo.it
> ha scritto nel messaggio
news:1171811721.7...@v45g2000cwv.googlegroups.com...



text:
Ho risolto. A tentativi ho inserito con generatore codice all'incirca quanto
dicevi, aggiungendo anche un if se non vuoto.
Grazie mille
Precog
"GC" <
g.cal...@yahoo.it
> ha scritto nel messaggio
news:1171811721.7...@v45g2000cwv.googlegroups.com...



title: Maschera con tolleranze

author: ferplus

text:
ho fatto due tabelle:_
tblQualita con
idQualita -chiave primaria contatore
Qualita   -testo
tblTolleranze con
idTolleranza -chiave primaria contatore
Da        -numerico
A         -numerico
idQualita -numerico chiave esterna
vorrei fare questo:
in una maschera una combo non associata dove scelgo la qualita,
e due controlli uno dove digito un numero e
in relazione  alla qualita che scelgo es:
g20
f40
h10
se il numero digitato è in tolleranza cioè compreso nell'intervallo (da a)
nell'altro controllo non scrive nulla
altrimenti deve scrivere "fuori tolleranza".
esempio:
g20 1340-1370
f40 1200-1270
h10 1600-1650
scelgo nella combo g20
scrivo nel controllo 1345 ok
scrivo nel controllo 1375 "fuori tolleranza"
pensavo di fare una query query1:
SELECT tblQualita.QUALITA, tblTolleranze.DA, tblTolleranze.A
FROM tblQualita INNER JOIN tblTolleranze ON tblQualita.IDQUALITA =
tblTolleranze.idQualita;
epoi con un DLooKUp fare una struttura if
ma non ne vengo fuori mi aiutate?
grazie
--
ciao


title: Maschera con tolleranze

author: Maurizio Borrelli

text:
> "ferplus" [...]:

Query "orQualitàETolleranze":
SELECT
    tblQualità.Qualità
  , tblTolleranze.Da
  , tblTolleranze.A
  , tblQualità.idQualità
FROM
    tblQualità
    INNER JOIN
    tblTolleranze
    ON tblQualità.idQualità = tblTolleranze.idQualità
ORDER BY
    tblQualità.Qualità
;
Maschera "x_ferplus Qualità e Tolleranze":
'
' ccQualita, Casella combinata
'   Origine riga: orQualitàETolleranze
'   Numero colonne: 4
'   Larghezza: 3 cm
'   Larghezza colonne: 0,99 cm;0,99 cm;0,99 cm;0 cm
'   Colonna associata: 4
' cdtValore, Casella di testo
' cdtMessaggio, Casella di testo
'
Option Compare Database: Option Explicit
Private Sub ccQualità_Change()
  With Me
    .cdtValore.Value = Null
    .cdtMessaggio.Value = Null
  End With
End Sub
Private Sub cdtValore_Exit( _
  ByRef Cancel As Integer)
  Const c_sMsgOk = "Ok."
  Const c_sMsgKo = "Fuori tolleranza."
  Const c_lColDa = 1
  Const c_lColA = 2
  Dim lVal  As Long
  Dim lDa   As Long
  Dim lA    As Long
  If IsNull(Me.ccQualità.Value) Then Exit Sub
  If IsNull(Me.cdtValore.Value) Then Exit Sub
  With Me
    With .ccQualità
      lDa = .Column(c_lColDa, .ListIndex)
      lA = .Column(c_lColA, .ListIndex)
    End With
    lVal = Val(.cdtValore.Value)
    With .cdtMessaggio
      If ((lDa <= lVal) And (lVal <= lA)) Then
        .Value = c_sMsgOk
      Else
        .Value = c_sMsgKo
      End If
    End With
  End With
End Sub
Private Sub Form_Load()
  With Me
    With .ccQualità
      .DefaultValue _
        = Chr$(34) _
        & .Column(.BoundColumn - 1, 0) _
        & Chr$(34)
    End With
  End With
End Sub
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


title: Maschera con tolleranze

author: Roberto da casa

text:
"ferplus" <
rof...@inwind.it
> ha scritto nel messaggio
news:t1Qd9.6256$AW6.1...@twister2.libero.it...

Posso non aver capito nulla, ma mi è sembrato di capire che ogni Qualità ha
solamente un range di valori Da e A; se questo è vero non capisco perche
lavori con due tabelle e non con una sola che abiia la seguente struttura:
tblQualita con
idQualita -chiave primaria contatore
Qualita   -testo
Da        -numerico
A         -numerico
Una struttura del genere ti eviterebbe un sacco di problemi.
Ipotizziamo che si lavori con una sola tabella, come penso io.
Se nella maschera il controllo in cui digiti la Qualità si chiama
txtQualita.
Se nella maschera il controllo in cui digiti il numero di cui verificare la
congruità si chiama txtNumero.
Nell'origine controllo della casella di testo non associata in cui vuoi
evidenziare l'eventuale errore scrivi:
=IIf(IsNull([txtQualita]) Or
IsNull([txtNumero]);"";IIf([txtNumero]>=DLookUp("Da";"tblQualita";"Qualita="
& Chr$(34) & [txtQualita] & Chr$(34)) And
[txtNumero]<=DLookUp("A";"tblQualita";"Qualita=" & Chr$(34) & [txtQualita] &
Chr$(34));"";"Fuori tolleranza"))
Già che ci sei, ti consiglio anche di verificare l'esattezza della qualità
digitata in txtQualita: a fronte dell'evento "Prima di aggiornare" di
txtQualita genera il seguente codice VBA:
Private Sub txtQualita_BeforeUpdate(Cancel As Integer)
If IsNull(DLookup("IDQualita", "tblQualita", _
"Qualita =" & Chr$(34) & Me!txtQualita & Chr$(34))) Then
    MsgBox "La qualità " & Me!txtQualita & " non esiste"
    Cancel = True
    Me!txtQualita.Undo
End If
End Sub
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Maschera con tolleranze

text:
--

> ti ringrazio perche' è utile anche questa possibilità ma non posso
inserire tutto in una tabella perchè ho più tolleranze per la stessa
qualità.
ciao
>


title: Maschera con tolleranze

author: Alessandro Cara

text:
Maurizio Borrelli wrote:
[cut]
>
ma come, sei il re delle "condensed solutions" e poi te ne vieni
fuori con c h i l o m e t r i di codice?
> ?SPQR(C)
ma che vordi'
--
a.cara


title: Maschera con tolleranze

text:
"ferplus" <
rof...@inwind.it
> ha scritto nel messaggio
news:3F%d9.7934$AW6.1...@twister2.libero.it...
[CUT]
> ti ringrazio perche' è utile anche questa possibilità ma non posso
> inserire tutto in una tabella perchè ho più tolleranze per la stessa
> qualità.
> ciao
Scusami, ma c'è qualcosa che non mi quadra; se per una Qualita esistono più
range di tolleranza, al momento che digiti solo la qualità come fa Access a
capire a quale dei tanti range di tolleranza di quella qualità deve far
riferimento?
Insomma se, come dici, non c'è univocità tra la qualità ed la tolleranza
(alias range Da-A) non credi che c'è qualcosa che non va?



title: Maschera con tolleranze

text:
> "ferplus" [...]:
> > non posso
> > inserire tutto in una tabella perchè ho più tolleranze per la stessa
> > qualità.
    Allora dillo che mi vuoi male, cosi' facciamo prima.



title: Maschera con tolleranze

text:
--
ciao
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:ala343$1nglml$1...@ID-52090.news.dfncis.de...
> > "ferplus" [...]:
> > > non posso
> > > inserire tutto in una tabella perchè ho più tolleranze per la stessa
> > > qualità.
>
>     Allora dillo che mi vuoi male, cosi' facciamo prima.
>
perche mi va bene il tuo codice per questa cosa
intendo dire che la qualita ha piu tolleranze ma non della stessa cosa
ci sono le tolleranze della durezza dei materiali
           le tolleranze delle percentuali di componenti ecc... ecc....
ciaoooooooo


title: Maschera con tolleranze

text:
> tblQualita con
> idQualita -chiave primaria contatore
> Qualita   -testo
> Da        -numerico
> A         -numerico
>
> Una struttura del genere ti eviterebbe un sacco di problemi.
>
> Ipotizziamo che si lavori con una sola tabella, come penso io.
>
> Se nella maschera il controllo in cui digiti la Qualità si chiama
> txtQualita.
> Se nella maschera il controllo in cui digiti il numero di cui verificare
la
> congruità si chiama txtNumero.
>
> Nell'origine controllo della casella di testo non associata in cui vuoi
> evidenziare l'eventuale errore scrivi:
>
> =IIf(IsNull([txtQualita]) Or
>
IsNull([txtNumero]);"";IIf([txtNumero]>=DLookUp("Da";"tblQualita";"Qualita="
> & Chr$(34) & [txtQualita] & Chr$(34)) And
> [txtNumero]<=DLookUp("A";"tblQualita";"Qualita=" & Chr$(34) & [txtQualita]
&
> Chr$(34));"";"Fuori tolleranza"))
**************************************************************
è possibile che se il numero è fuori tolleranza, lo stesso numero diventi
rosso.
senza altri controlli oltre a quello txtqualità e txtnumero?


title: Maschera con tolleranze

author: Roberto dalla campagna

text:
ferplus <
rof...@inwind.it
> wrote in message
UJie9.12918$%z1.2...@twister1.libero.it...

A fronte dell'evento "Dopo aggiornamento" di txtnumero prova con:
If Me!txtNumero >=DLookUp("Da", "tblQualita", "Qualita=" _
& Chr$(34) & Me!txtQualita & Chr$(34)) And
Me!txtNumero <= DLookUp("A","tblQualita", "Qualita=" _
& Chr$(34) & Me!txtQualita & Chr$(34)) Then
    Me!txtNumero.ForeColor = 0
Else
    Me!txtNumero.ForeColor = 255
End If
Però ti funzionerà solo se la maschera ha una visualizzazione a Maschera
Singola.
Se invece la tua maschera ha una visualizzazione a Maschere continue la
soluzione la trovi tra le FAQ del Sito Comune (link qui sotto) o, se usi
A2000 o AXP, nella formattazione condizionale.



title: Maschera con tolleranze

text:
> > **************************************************************
> > è possibile che se il numero è fuori tolleranza, lo stesso numero
diventi
> > rosso.
> > senza altri controlli oltre a quello txtqualità e txtnumero?
>
> A fronte dell'evento "Dopo aggiornamento" di txtnumero prova con:
>
> If Me!txtNumero >=DLookUp("Da", "tblQualita", "Qualita=" _
> & Chr$(34) & Me!txtQualita & Chr$(34)) And
> Me!txtNumero <= DLookUp("A","tblQualita", "Qualita=" _
> & Chr$(34) & Me!txtQualita & Chr$(34)) Then
>     Me!txtNumero.ForeColor = 0
> Else
>     Me!txtNumero.ForeColor = 255
> End If
>
> Però ti funzionerà solo se la maschera ha una visualizzazione a Maschera
> Singola.
>
non funziona mi da il numero sempre in rosso probabilmente la struttura a
qualche problema
ho provato a fare qualche cambiamento ma niente???????????''


title: Maschera con tolleranze

text:
ferplus <
rof...@inwind.it
> wrote in message
kVqe9.14506$AW6.3...@twister2.libero.it...
[CUT]
> non funziona mi da il numero sempre in rosso probabilmente la struttura a
> qualche problema
> ho provato a fare qualche cambiamento ma niente???????????''
Beh, la mia soluzione presuppone che tu abbia una tabella unica
Qualita/Tolleranze; mi sono dimenticato che tu operi con due tabelle
combinate; comunque continua a sfuggirmi come fai a identificare il renge di
valori conoscendo solo la qualità.



title: INTESTAZIONE REPORT

author: lenin

text:
Ho costruito un applicazione per gestire i dati di un'azienda vorrei che su
ogni report apparissero i dati (denominazione cf pi sede....) come posso
fare
grazie per l'aiuto
Marco


title: INTESTAZIONE REPORT

author: Max

text:
"lenin" <
leni...@inwind.it
> ha scritto nel messaggio
news:9hpj4b$qac$1...@nreadB.inwind.it...

Hai già inserito questi dati nella query sottostante al report?
Max


title: INTESTAZIONE REPORT

text:
"Max" <
ciccio...@libero.it
> ha scritto nel messaggio
news:9hpkdm$3bq$1...@pegasus.tiscalinet.it...
>
> "lenin" <
leni...@inwind.it
> ha scritto nel messaggio
> news:9hpj4b$qac$1...@nreadB.inwind.it...
> > Ho costruito un applicazione per gestire i dati di un'azienda vorrei che
> su
> > ogni report apparissero i dati (denominazione cf pi sede....) come posso
> > fare
> > grazie per l'aiuto
> > Marco
> >
>
> Hai gią inserito questi dati nella query sottostante al report?
>
> Max
>
> l'applicazione usa diversi report e vorrei evitare di inserire i dati in
ogni query sottostante a ogni report
mi piacerebbe rendere automatico l'inesrimento dei dati generali in ogni
report


title: INTESTAZIONE REPORT

author: Silvio Berruti

text:
"lenin" <
leni...@inwind.it
> ha scritto nel messaggio
news:9hpj4b$qac$1...@nreadB.inwind.it...
> Ho costruito un applicazione per gestire i dati di un'azienda vorrei che
su
> ogni report apparissero i dati (denominazione cf pi sede....) come posso
> fare
Controlla se la mia traduzione è corretta:
"Poiché ho costruito un'applicazione per gestire i dati di un'azienda e
volendolo distribuire a + ditte mie clienti, come posso fare x far apparire
nell'intestazione dei report i dati fiscali della ditta medesima?".
Se la traduzione è corretta, potresti inserire i dati che ti interessano un
una tabella apposita e recuperarli (DLookUp ?) poi con controlli inseriti
nell'intestazione pagina dei report.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


title: INTESTAZIONE REPORT

author: Roberto in campagna

text:
"lenin" <
leni...@inwind.it
> ha scritto nel messaggio
news:9hpj4b$qac$1...@nreadB.inwind.it...

Una soluzione potrebbe essere quella di memorizzare questi dati nei campi
dell'unico record di una tabella.
Creati un sottoreport che abbia come origine record questa tabella, quindi
inserisci tale sottoreport nell'intestazione di tutti i tuoi report.
Se nel tempo cambierà qualche dato, basterà aggiornare la tabella, senza
intervenire sui report.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Update Campo

author: antcim

text:
Cordialita' a chi mi legge.
Come si fa a sostituire dati di campi di una tabella (es. sotto: BASE)
con dati di campi di un'altra tabella (es. sotto:  recordset TabAree) ..?
(Entrambe le tabelle hanno gli stessi campi).
Questo codice non funziona..! (riferito al recordset)
dbas.Execute "UPDATE BASE SET UBICAZIONE = '" & TabAree!ubicazione & "', " &
_
                                                       "AREA = '" &
TabAree!AREA & "', " & _
                                                       "UTENTE = '" &
TabAree!UTENTE & "', " & _
                                                       "PIANO = '" &
TabAree!PIANO & "';"
Questa codice, invece, funziona..! (riferito a Caselle di Testo)
dbas.Execute "UPDATE BASE SET COD_FORN = '" & Me.T1.Value & "', " & _
                                                       "ORDINE = '" &
Me.T2.Value & "', " & _
                                                       "EMIS_CICLO = '" &
Me.T3.Value & "', " & _
                                                       "CICLO = '" &
Me.T4.Value & "', " & _
                                                       "RESPONSABI = '" &
Me.T5.Value & "';"
Grazie di cuore a chi mi rispondera'
Antcim


title: Update Campo

author: Emyr

text:


per accodare i dati
INSERT INTO Tabella2
SELECT Tabella1.*
FROM Tabella1;
al limite prima cancelli tutto
DELETE Tabella2.*
FROM Tabella2;
Saluti.
Emanuele.


title: list box

author: franz

text:
tramite una list box č possibile selezionare i dati da un campo di una
tabella e inserirli in un campo di una seconda tabella, ma č possibile
inserire ad esempio il primo dato in un campo il secondo dato in un
secondo campo e cosě via? Grazie
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: list box

text:
"franz" <
ces...@tiscalinet.it
> ha scritto nel messaggio
news:b7gej2$7fe$1...@news.newsland.it...
> tramite una list box č possibile selezionare i dati da un campo di una
> tabella e inserirli in un campo di una seconda tabella, ma č possibile
> inserire ad esempio il primo dato in un campo il secondo dato in un
> secondo campo e cosě via? Grazie
>
Si; creati ed esegui una query di accodamento che accoda nella seconda
tabella il record della prima tabella che hai selezionato nella casella di
riepilogo.
Penso che la cosa migliore sia quella di crearti dinamicamente in VBA la
stringa SQL della query di accodamento e poi eseguirla tramite il metodo
RunSQL.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Copier un état dans une base externe

author: michel laflamme

text:
J'ai une copie non à jour d'une bd d'un client.
Il me demande de lui préparer un nouveau rapport. Mais comment faire par la
suite pour lui envoyer ce nouveau formulaire afin qu'il le copie dans sa bd
sur son.
Merci de vos conseils
Michel


title: Copier un état dans une base externe

text:
"michel laflamme" <
cex...@videotron.ca
> ha scritto nel messaggio
news:DYKff.8940$0u1.2...@weber.videotron.net...
> J'ai une copie non à jour d'une bd d'un client.
> Il me demande de lui préparer un nouveau rapport. Mais comment faire par
la
> suite pour lui envoyer ce nouveau formulaire afin qu'il le copie dans sa
bd
> sur son.
Crea nella tua copia del database il nuovo report.
Creati un nuovo database vuoto ed importa in esso il nuovo report.
Invia il database contenente solo il nuovo report al tuo cliente il quale
importerà il nuovo report nel suo database.
>
> Merci de vos conseils
Prego
> Michel
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Copier un état dans une base externe

author: Ascorbic

text:
On Sun, 20 Nov 2005 06:55:27 GMT, "Roberto da casa"
<
r.masso...@libero.it
> wrote:
>
>"michel laflamme" <
cex...@videotron.ca
> ha scritto nel messaggio
>news:DYKff.8940$0u1.2...@weber.videotron.net...
>> J'ai une copie non à jour d'une bd d'un client.
>> Il me demande de lui préparer un nouveau rapport. Mais comment faire par
>la
>> suite pour lui envoyer ce nouveau formulaire afin qu'il le copie dans sa
>bd
>> sur son.
>
>Crea nella tua copia del database il nuovo report.
>Creati un nuovo database vuoto ed importa in esso il nuovo report.
>Invia il database contenente solo il nuovo report al tuo cliente il quale
>importerà il nuovo report nel suo database.
>
>>
>> Merci de vos conseils
>
>Prego
>
>> Michel
Roberto, sei fantastico, aiuti anche i francesi...
ciao.


title: Copier un état dans une base externe

text:
"Ascorbic" <
portaz_...@hotmail.com
> ha scritto nel messaggio
news:20h0o152bb4enknmj...@4ax.com...

Anche i francesi sono figli di Bill Gate. ;-)
> ciao.



title: realizzazione database

author: andler

text:
Ciao a tutti.
sto realizzando un piccolo database per il mio Studio che possa essere
utilizzato nella intranet.
Tutte le postazioni sono dotate di office XP, di cui però solo una ha
access.
Per tale motivo ho creato il database sulla macchina con access e le
altre imputano i dati nel database con le pagine di accesso ai dati.
I vari utenti devono solo inserire dati, modificarli ed eventualmente
cancellarli
La gestione dei report e delle query verrà effettuata dalla macchina con
access.
Fin qui, al momento, nessun problema.
L'imputazione dei dati sembra al momento funzionare (grazie anche
all'aiuto del NG).
Il problema sarà però quando la mole dei dati sarà rilevante.
Ogni utente inserisce giornalmente i seguenti dati:
nome utente
data
cliente
tipo di prestazione eseguita
durata
dettaglio della prestazione eseguita
ID del rapportino (è inserito automaticamente dalla pagina di accesso ai
dati)
La domanda è la seguente:
con la barra di scorrimento in fondo alla pagina di accesso ai dati
posso scorrere i singoli rapportini. Se però i rapportini sono 1000 come
faccio a selezionare il singolo rapportino?
E' possibile fare in modo che dopo che il singolo utente ha selezionato
il proprio nome dalla casella combinata "nome utente" si apra nella
pagina di accesso ai dati una specie di "sottomaschera" con tutti i suoi
rapportini inseriti, in ordine di data?
grazie
ciao
andler


title: Scelta voci multiple

author: Beppe

text:
In un campo di una maschera avrei l'esigenza di inserire una serie di
optional
per non farli digitare di volta in volta all'utente vorrei presentargli un
elenco dal quale sia possibile
selezionare una o più voci in modo che alla pressione di un pulsante
venissero incollate nel campo di testo
Non so porprio da dove iniziare per ottenere un comportaemnto simile  ...
qualche esempio?


title: Scelta voci multiple

author: Carlo Costarella

text:
"Beppe" <
Be...@bb.it
> ha scritto nel messaggio
news:43cf967d$0$1080$4faf...@reader3.news.tin.it...

Usa una combo che si appoggia ad una tabella con tutti i valori che vuoi
oppure, se il numero di "opzioni" è limitato, alimenta la combo con "elenco
valori" che scriverai separati da un punto e virgola.
Poi su clic della combo:
Me.Miocontrollo = me.MiaCombo.
Ciao, Carlo


title: Scelta voci multiple

text:
"Beppe" <
Be...@bb.it
> ha scritto nel messaggio
news:43cf967d$0$1080$4faf...@reader3.news.tin.it...
>

Mi era sfuggita la frase "una o più voci".
In questo caso potresti usare una casella di riepilogo impostando la
"selezione multipla" ad estesa.
In aggiunta conviene usare un pulsante "trasferisci valori" (nome di
fantasia) che cicla sui valori selezionati e li incolla nella tua casella di
testo.
Ciao, Carlo


title: Scelta voci multiple

text:
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:43cf9a3a$0$1074$4faf...@reader4.news.tin.it...

Potresti farmi un esempio


title: Scelta voci multiple

text:
"Beppe" <
Be...@bb.it
> ha scritto nel messaggio
news:43cf9da1$0$1073$4faf...@reader3.news.tin.it...

Una possibile strada.
Supponiamo di avere una casella di riepilogo chiamata "Elenco0" e un
pulsante di comando chiamato "Comando2".
Dopo aver selezionato più valori dall'elenco usando la collaborazione del
tasto CTRL per selezionare più valori non ravvicinati, su click del pulsante
scrivo:
Private Sub Comando2_Click()
    Dim frm As Form, ctl As Control, MiaFrase As String
    Dim varItm As Variant
    Set frm = Forms!Maschera1 'qui metti il nome della tua maschera
    Set ctl = frm!Elenco0 'qui metti il nome del tuo elenco
    If ctl.ItemsSelected.Count = 0 Then
    Exit Sub
    End If
    MiaFrase = ""
    For Each varItm In ctl.ItemsSelected
    MiaFrase = MiaFrase & vbCrLf & ctl.Column(1, varItm)
    Next varItm
    MsgBox MiaFrase ' qui puoi sostituire il msgbox con : me.MioControllo =
MiaFrase
End Sub
Ho usato vbCrLf supponendo che dopo ogni valore vuoi il ritorno a capo.
Ciao, Carlo


title: Nuovo DB

text:
Il Tue, 27 Feb 2001 17:36:57 GMT, "Cataldo Formaro"
<
formaro...@libero.it
> scrisse:
>(.....)
>Salve,
>vorrei porre delle domande di carattere generale sulla creazione di un nuovo
>DB.
Più che di carattere generale, direi addirittura filosofiche !
>(.....)
>- Conviene crearlo con più tabelle o con poche tabelle e molti campi (nelle
>poche tabelle) ???
La qualità di un database (Access o no) non si misura con il numero di
tabelle o di campi definiti in ciascuna di esse.
Premesso che la progettazione di basi di dati è una disciplina molto
legata alla teoria degli insiemi e quindi alla matematica (nella sua
accezione più ampia), sappi che esistono regole ben precise alle quali
uniformarsi nella progettazione di una base di dati.
Le regole fondamentali da utilizzare per progettare un buon database
sono le cosiddette "regole di normalizzazione" o "forme normali".
Ne esistono 4, ma quelle veramente fondamentali sono le prime tre.
Visita l'indirizzo
http://www.unibg.it/ctd/elab/relazio/
per avere una trattazione sintetica ma efficace e soprattutto con
esempi concreti; se qualcosa non è chiaro, riposta.
>- Nell'immissione dei dati è meglio creare una singola maschera per ogni
>tabella, o poche maschere che raggruppano i campi di più tabelle????
Dipende dalle necessità dell'utente e da quelle funzionali della
procedura.
Pensando per esempio ad una gestione di immissione ordini cliente,
sarebbe poco consigliabile avere sulla stessa form i controlli per
immettere i dati anagrafici del cliente ed i dati dell'ordine; mentre
è fortemente consigliato avere sulla medesima form (con una struttura
maschera/sottomaschera) sia i dati di intestazione dell'ordine, sia le
sue righe di dettaglio.
>- Partendo dalla tabella1con un Codice Identificativo (Non contatore ma
>numerico), come restituire lo stesso valore nel corrispondente campo delle
>altre tabelle successive??
Se usi una struttura maschera/sottomaschera, basta legarle sulla base
dei campi corrispondenti nelle due tabelle o query sottostanti.
Vincenzo Turturro
---------------------------------------------------------
Se no diventiamo tutti **** dai portatili o peggio ancora
provetti poeti fiorentini come vturturro.
(Così disse Ivan Lelli Ven 25 Aug 2000 09:34:52 +0200)
---------------------------------------------
il sito comune di it.comp.appl.access:
http://www.sitocomune.com/
---------------------------------------------
... e quello di it.comp.as400:
http://www.faq400.com/
---------------------------------------------


title: Nuovo DB

author: Cataldo Formaro

text:
>
> Vincenzo Turturro
> ---------------------------------------------------------
> Se no diventiamo tutti **** dai portatili o peggio ancora
> provetti poeti fiorentini come vturturro.
>
> (Cosě disse Ivan Lelli Ven 25 Aug 2000 09:34:52 +0200)
> ---------------------------------------------
> il sito comune di it.comp.appl.access:
>
http://www.sitocomune.com/
> ---------------------------------------------
> ... e quello di it.comp.as400:
>
http://www.faq400.com/
> ---------------------------------------------
Grazie 1000 Vincenzo, intanto mi acculturo un pochino e poi riparto.
Saluti CF


title: Report posseduti

author: Naponet

text:
Proprio così, non mi sono sbagliato a scrivere l'oggetto;
ho un Db dove i report a pare mio sono posseduti,
mi spiego, creo il report, gli dò la formattazzione, i margini e
l'allineamento, senza nessuna spiegazione o motivazione valida, ogni tanto
perde i margini o l'allineamento o tutti e due, cosa posso fare?
Spero riusciate a darmi una mano altrimenti mi toccherà chiamare
l'esorcista....
Grazie in anticipo


title: Report posseduti

text:


cerca nei post precedenti...
imposta la correzione automatica nome sulle opzioni a falso per
evitare il problema, sul sito microsoft c'è una faq al tuo problema,
scarica il service pack di office per eliminarlo
Saluti.
Emanuele.


title: oggetti UserForm

author: Paolo A.

text:
qualcuno ha mai usato oggetti UserForm all'interno di applicazioni
Access?
se si, come si creano?
ciao
Paolo
--
-------------------------------------------------------------------------------
Un giorno le macchine riusciranno a risolvere tutti i nostri problemi.
Ma nessuna macchina sarà in grado di porne uno.
-------------------------------------------------------------------------------


title: problema con grafico da query

author: Luciano

text:
ciao
ho una query che filtra il campo data in questo modo:
Between #01/01/2004# And #31/12/2004#
e anche in questo:
Between [Dal] And [Al]
entrambe funzionano come query, ma quando apro il grafico associato alla
query solo il primo modo mi restituisce i dati. Il secondo mi da il seguente
messaggio:
"Il modulo di gestione di database Microsoft Jet non riconosce '[Dal]' come
nome di campo o espressione valida".
Premetto che ho installato
Microsoft Jet 4.0 Service Pack 8, se intende quello.
come posso fare per avere un grafico che risponda ai parametri "Dal" e "Al"?
grazie


title: Query per campi booleani

author: mario menicocci

text:
da una tabella contenente una Pk e tre campi, di tipo booleani, si vogliono
recuperare, conteggiati, i dati relativi ai campi Si/no ugali a si.
Sbatto la testa e poi.... non so...


title: Query per campi booleani

text:
"mario menicocci" <
m.men...@inwind.it
> ha scritto nel messaggio
news:vFGa9.107617$lu5.2...@twister1.libero.it...

Forse una query di unione fa al caso tuo.
Cioč unire due o piů query che contengono gli stessi campi e che di volta in
volta avrai opportumanete filtrate con il criterio = True (Vero nella
query).
Guarda nella guida le query di unione
Un'altra strada č quella, un po' piů complicata, di usare il codice e
ciclare tra i valori della tabella, accodando il risultato in una tabella di
appoggio.
Ciao, Carlo


title: Query per campi booleani

author: Maurizio Borrelli

text:
> "mario menicocci" [...]:
> da una tabella contenente una Pk e tre campi, di tipo booleani, si
> vogliono
> recuperare, conteggiati, i dati relativi ai campi Si/no ugali a si.
    SELECT
        Sum(Abs([tblXMarioMenicocci].[Campo1])) AS Espr1
      , Sum(Abs([tblXMarioMenicocci].[Campo2])) AS Espr2
      , Sum(Abs([tblXMarioMenicocci].[Campo3])) AS Espr3
    FROM
        tblXMarioMenicocci
    ;
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


title: orderby

author: Alessandro

text:
Ciao a tutti,
in una maschera ho un pulsante che duplica il record; se però, prima di
duplicare, la maschera è stata ordinata per un qualsiasi altro campo non
riesco a far visualizzare il nuovo record dopo la duplicazione.
Ho seguito due strade:
1-Ho provato prima con gotorecord ma nella sintassi "offset" non riesco a
farlo posizionare al numero del contatore max (il contatore della Query
sottostante è IDLAVORI)
2- Ho provato con orderby scrivendo
Forms!M_Lavori.OrderBy "IDLAVORI" ma mi restituisce utilizzo non valido di
proprerty anche se orderby è applicabile a maschere.
Grazie a tutti per ora le due strade sono senza uscita!!!


title: orderby

author: Sergio MAZZA

text:
"Alessandro" <
ale...@tiscali.it
> ha scritto nel messaggio
news:boqgr5$jon$1...@lacerta.tiscalinet.it...

Forse devi fare un refresh della form dopo la duplicazione del record...
Ciao.
--
Sergio MAZZA


title: orderby

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:bor66d$5b8$1...@canarie.caspur.it...

Già fatto
Ti posto il codice per chiarezza
'Aggiunge il record
rst.AddNew
'specifico i record da aggiungere
rst!IDANAGRA = Me!IDANAGRA
'Salva le modifiche
rst.Update
'Chiude il recordset
rst.Close
'Posiziona il record sul nuovo record
Requery
DoCmd.GoToRecord , , acLast
anche se la query è impostata con idlavoro (che è il contatore) crescente,
il Requery non ripristina l'ordine e quindi gotorecord visualizza l'utimo
record a seconda dell'ordinamento della maschera.
Sigh!


title: orderby

author: Maurizio

text:
"Alessandro" <
ale...@tiscali.it
> wrote in message news:<borbem$kh2$
1...@lacerta.tiscalinet.it
>...

Dim rst As Recordset
Dim db As Database
Dim DescrNew As String
Set db = CurrentDb
Set rst = db.OpenRecordset("Tabella1 Query")
' Salvo Descrizione
DescrNew = Me.Descrizione
'Aggiunge il record
rst.AddNew
'specifico i record da aggiungere
rst!Descrizione = DescrNew
'Salva le modifiche
rst.Update
'Chiude il recordset
rst.Close
'Posiziona il record sul nuovo record
Me.RecordSource = "Tabella1 Query"
Riprendo il RecordSource.
Ciao
maurizio.


title: orderby

text:
"Alessandro" <
ale...@tiscali.it
> wrote in message news:<borbem$kh2$
1...@lacerta.tiscalinet.it
>...

Se pero' dopo  rst.Close fai Me.Requery funziona comunque.
Ciao
maurizio.


title: Cambiare l'estensione di un file

author: E. Delacroix

text:
Con access 97 e' stato facile convincere che files tipo xxxggmm.aa
erano files di testo. Ho fatto cosi': ho aperto uno dei files con word
e l'ho poi salvato come xxxggmm.doc, quindi ho fatto l'importazione in
access 97 di questo file ricavandone la specifica d'importazione.
Tutti gli altri files sono poi stati importati con la stessa specifica
d'importazione senza alcun bisogno di cambiarne l'estensione.
Con access 2000 niente da fare. Bisogna fare il rename di tutti i
files cambiando l'estensione in .txt. Il problema e' che sono
centinaia e centinaia.
In access 2000 c'e' un modo per cambiare l'estensione dei files da
codice?
Salutoni
Pino


title: Cambiare l'estensione di un file

author: Alberto S.

text:
On Sat, 08 May 2004 01:19:15 +0200, E. Delacroix <
gimo...@libero.it
>
wrote:
[cut]
>In access 2000 c'e' un modo per cambiare l'estensione dei files da
>codice?
Name "C:\Documenti\MioFile.doc" As "C:\Documenti\MioFile.txt"
Cerca comunque nella guida in linea 'Istruzione Name'
Ciao
--
Alberto
No alle guerre


title: Cambiare l'estensione di un file

author: Karl Donaubauer

text:
E. Delacroix ha scritto:

Hai già una risposta. Ma invece di cambiare l'estensione
puoi anche cambiare l'elenco delle estensioni nel registry:
http://support.microsoft.com/?id=239471
--
HTH
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


title: Cambiare l'estensione di un file

text:
Grazie ad entrambi !
Ciao
Pino


title: Report 3 colonne

author: [MaGri]

text:
Ciao,
scusate se uso il ng per un probl.
che sicuramente e' nella guida in linea...
E' possibile generare un report nel
corpo del quale i dati si dispongono
su tre colonne (sotto la medesima intestazione)
distinte?
grazie Marco


title: Report 3 colonne

author: p. bianchi

text:
"[MaGri]" wrote:
> E' possibile generare un report nel
> corpo del quale i dati si dispongono
> su tre colonne (sotto la medesima intestazione)
> distinte?
Si', il fatto delle tre colonne lo devi settare in file / imposta pagina
/ colonne.
Nel corpo del report, la larghezza totale dei controlli deve essere
inferiore alla larghezza della singola  colonna.
La larghezza di colonna e' la larghezza pagina, meno i magini laterali,
meno lo spazio intercolonne, diviso tre.


title: Report 3 colonne

author: AntoGal

text:
"[MaGri]" <
mag...@tin.it
> ha scritto...
> E' possibile generare un report nel
> corpo del quale i dati si dispongono
> su tre colonne (sotto la medesima intestazione)
> distinte?
Con il report aperto in modalitą design, vai su "File->Imposa Pagina". Ti
permette di specificare il numero di colonne, e la prioritą (orizzontale o
verticale) di riempimento.
--
Ciao, AntoGal
*************************************************
Gestione punti vendita (casse e pos NCR)

www.powerretail.it
-------------------------------------------------------------
per scaricare un gioco di DAMA ITALIANA
http://volftp.mondadori.com/italiani/galletta/
*************************************************


title: larghezza massima maschera raggiunta

author: mario rossi

text:
ho un file di excel con molte colonne, ogni colonna di excel è un campo di access sono arrivato alla larghezza massima della form di access

in che modo posso farci stare tutti i campi che contiene il file originale excel?

Grazie a tutti.


title: larghezza massima maschera raggiunta

author: Simone Calligaris

text:
Il giorno sabato 19 dicembre 2020 alle 13:05:12 UTC+1
tmtu...@gmail.com
 ha scritto:

> ho un file di excel con molte colonne, ogni colonna di excel è un campo di access sono arrivato alla larghezza massima della form di access
>
> in che modo posso farci stare tutti i campi che contiene il file originale excel?

Non è chiaro se il problema sia alla base: ovvero le colonne da importare siano più di 255.

Saluti


title: larghezza massima maschera raggiunta

text:

no non è un problema di numero di campi ma di larghezza della form
in pratica ho messo nella form la barra di scorrimento orizzontale e pensavo di poter gestire i campi non visibili come excel ovvero mi sposto a destra con la barra orizzonale
ma access a un certo punto si ferma in larghezza , non si riesce a posizionare più campi, ho forse questo limite non esiste se visualizzo i record in modalità tabellare?
mi è venuto questo dubbio, ora provo.


title: larghezza massima maschera raggiunta

text:
> no non è un problema di numero di campi ma di larghezza della form
> in pratica ho messo nella form la barra di scorrimento orizzontale e pensavo di poter gestire i campi non visibili come excel ovvero mi sposto a destra con la barra orizzonale
> ma access a un certo punto si ferma in larghezza , non si riesce a posizionare più campi, ho forse questo limite non esiste se visualizzo i record in modalità tabellare?
> mi è venuto questo dubbio, ora provo.

Mah, la verità è che non sei molto chiaro.
Se il tuo problema è simulare con Array di controlli unbound una Form tabellare in stile Excel, incontri il limite dei 55 cm di larghezza massima di una Form.
Ma in genere non si lavora così: ci si base su un'origine dati (max. 255 colonne) su cui è possibile creare SubForms tabellari DataSheets in grado di scrollare orizzontalmente tutti i campi.

Saluti.


title: larghezza massima maschera raggiunta

text:

Per essere più chiaro il file di excel a N colonne e queste N colonne una in parte all'altra in access fisicamente con un font "arial 11" non ci stanno per via del limite dei 55cm di larghezza
e purtroppo i campi devono essere tutti su una stessa riga quindi non so come fare.


title: larghezza massima maschera raggiunta

author: Alex

text:
"Per essere più chiaro il file di excel a N colonne e queste ..."

Ma era un verbo quello prima di N...?

Hai provato ad usare una maschera in vusualizzazione foglio
 dati... non ricordo se il limite rimane... ma per quello che dici
 non ci sono soluzioni... senza usare una list view

--
@Alex

----Android NewsGroup Reader----
https://piaohong.s3-us-west-2.amazonaws.com/usenet/index.html


title: larghezza massima maschera raggiunta

text:
> Per essere più chiaro il file di excel a N colonne e queste N colonne una in parte all'altra in access fisicamente con un font "arial 11" non ci stanno per via del limite dei 55cm di larghezza
> e purtroppo i campi devono essere tutti su una stessa riga quindi non so come fare.

Ma hai letto mio precedente post?
Utilizza una vista DataSheet col font che ti pare.

saluti

P.S:
Per essere più chiaro il file di excel  Ha N colonne ....  (devi mettere le H !)


title: larghezza massima maschera raggiunta

text:

oltre a esperto di informatica sei pure insegnate di lettere e grammatica, si va bene ok hai ragione, nella fretta ho sbagliato, mi hai beccato in fragranza di reato!!!


title: larghezza massima maschera raggiunta

text:

insegnaNte


title: larghezza massima maschera raggiunta

text:

in visualizzazione datashet come gestisco eventi vba su afterupdate dei valori dei vari campi?


title: larghezza massima maschera raggiunta

text:
oltre a esperto di informatica sei pure insegnate di lettere e
 grammatica, si va bene ok hai ragione, nella fretta ho sbagliato,
 mi hai beccato in fragranza di reato!!!

L'italiano corretto e ben articolato non è riservato agli
 insegnanti, mi pare che sia una pratica comune in Italia scrivere
 in italiano corretto...



title: larghezza massima maschera raggiunta

text:
> in visualizzazione datashet come gestisco eventi vba su afterupdate dei valori dei vari campi?

Non cambia nulla rispetto alle altre tipologie di form.

Saluti


title: larghezza massima maschera raggiunta

text:

mamma mia che maestrino "santa pazienza aiutami tu"


title: larghezza massima maschera raggiunta

text:

non sono molto pratico di questa visualizzazione, se voglio mantenere un parte grafica nella parte superiore della form
dovrò mettere questi campi in visualizzazione datasheet in una sottomaschera?


title: larghezza massima maschera raggiunta

text:

il mistero del datashet, ho associato a una sottomaschera una query che contiene un campo di nome commessa incredibilmente
quel campo quando apro la form non appare, sai dirmi cosa non va?

però ho scoperto un vantaggio della visualizzazione datasheet che in alto nel nome campo mostra una freccia verso il basso che offre i filtri uguali a quelli di excel senza doverli creare appositamente come avevo chiesto in un post precedente, il che è molto comodo


title: larghezza massima maschera raggiunta

text:
> il mistero del datashet, ho associato a una sottomaschera una query che contiene un campo di nome commessa incredibilmente
> quel campo quando apro la form non appare, sai dirmi cosa non va?

Nessun mistero: immagino che, semplicemente, tu debba fare pratica con quella vista.

Saluti


title: larghezza massima maschera raggiunta

text:

Hai ragione!


title: soluzione per nascondere un collegamento ad una tabella?

author: Bonavita Ozanam

text:
qualcuno ha provato a creare il collegamento ad una tabella di un secondo db
all'apertura di una maschera e successivamente a cancellare il collegamento
alla chiusura della stessa? Sarebbe una idea valida per nascondere o
proteggere dati.Ne parliamo :-))
--
lo...@tin.it
http://sicilia.cjb.net
http://bonavita.homepage.nu
http://space.tin.it/arte/loobo
http://www.geocities.com/bonavitao


title: Reports - Stampa Sezionne  Unita

author: Marco Antonioli

text:
Buongiorno.
In un reports raggruppo ad esempio per agente e nel dettaglio elenco i
clienti di competenza.
Vorrei avere più agenti sulla stessa pagina, evitando però che i clienti
vengano stampati (fatti salvi limiti "fisici") su due pagine.
Stampa sezione unita riferita alla sezione raggruppamento sembrerebbe la
soluzione, ma non fa quello che spero.
Dove sbaglio ?
Grazie
MArco
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Reports - Stampa Sezionne  Unita

text:
"Marco Antonioli" <
in...@echovr.it
> ha scritto nel messaggio news:5955b1b345670bd39cf...@mygate.mailgate.org...
> Buongiorno.
> In un reports raggruppo ad esempio per agente e nel dettaglio elenco i
> clienti di competenza.
> Vorrei avere piů agenti sulla stessa pagina, evitando perň che i clienti
> vengano stampati (fatti salvi limiti "fisici") su due pagine.
> Stampa sezione unita riferita alla sezione raggruppamento sembrerebbe la
> soluzione, ma non fa quello che spero.
> Dove sbaglio ?
> Grazie
> MArco
Hai per caso impostato il cambio pagina per ogni variazione del gruppo?
Ciao.
--
Sergio MAZZA


title: Reports - Stampa Sezionne  Unita

text:
> Hai per caso impostato il cambio pagina per ogni variazione del gruppo?
>
> Ciao.
No no.
Su una pagina ci stanno normalmente 3/4 gruppi.
L'ultimo viene quasi sempre a cavallo delle pagine.
Ed è questo che vorrei evitare.



title: Reports - Stampa Sezionne  Unita

text:
"Marco Antonioli" <
in...@echovr.it
> ha scritto nel messaggio
news:99f86b6d54db89dd029...@mygate.mailgate.org...
>
> No no.
> Su una pagina ci stanno normalmente 3/4 gruppi.
> L'ultimo viene quasi sempre a cavallo delle pagine.
> Ed è questo che vorrei evitare.
> Grazie
> MArco
La Stampa sezione unita è impostata a "gruppo intero"?
Ciao.
--
Sergio MAZZA


title: Reports - Stampa Sezionne  Unita

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> wrote in message
news:ev4oe6$5e3$
1...@tdi.cu.mi.it

Ovviamente no.
E a dire il vero non avevo mai "notato" che si potesse impostare li dove
tu mi hai suggeriti.
Funziona ! (naturalmente)



title: solo dde e non ole

author: mauri

text:
il programma di origine (pagina televideo) supporta solo il dde, collegando
un casella di testo di una maschera ad una porzione di dati della pagina TV
l'aggiornamento  avviene solo all'apertura della maschera e non quando
cambiano i valori sulla pagina TV (in excel esiste una apposita funzione
'SetLinkOnData' che collega dinamicamente dati e applicazione), e' possibile
realizzare la stessa cosa in access?
ciao ciao grazie


title: solo dde e non ole

author: Silvio Berruti

text:
"mauri" <
ruxx...@tin.it
> ha scritto nel messaggio
news:9ece6e$1e06$1...@stargate1.inet.it...

Prova su timer a mettere un refresh.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


title: funzione findfirst con errore

text:
ciao a tutti
in una maschera in modalità "maschere continue" mi voglio posizionare in una riga e poi, facendo clic su un pulsante, voglio scrivere nei record sottostanti.

Ho utilizzato questo codice:
Dim Posizione
Posizione = Me.IDOrdine

Dim rs2 As DAO.Recordset
Dim dbsDati As Database
Set dbsDati = DBEngine.Workspaces(0).OpenDatabase(PercorsoDati)
Set rs2 = dbsDati.OpenRecordset("Ordini", dbOpenTable)

Dim strCriteria As String
strCriteria = "IDOrdine= '" & Posizione & "'"
rs2.FindFirst strCriteria

rs2.MoveNext
rs2.Edit
rs2("Note") = "xxx"
rs2.Update

rs2.Close
Set rs2 = Nothing

mi compare l'errore "operazione non supportata"
Qualche suggerimento?
grazie a tutti
Maurizio


title: funzione findfirst con errore

text:
Scusa Maurizio ma se la maschera è associata devi usare l'origine già esistente...
Nello specifico quando ci si deve spostare in una maschera si preferisce usare il RecordsetClone che non genera aggiornamenti nell'interfaccia grafica...

IdOrdine poi vado a naso ma è un Numero long e non Testo...

Quindi:
Dim strCriteria As String
strCriteria = "IDOrdine= " & Posizione
With Me.Recordsetclone
   .FindFirst strCriteria
   If .NoMatch then
      Msgbox "non trovato"
   Else
      Msgbox "trovato fai quello che vuoi"
      Me.Bookmark=.Bookmark
   End if
End with

@Alex


title: funzione findfirst con errore

text:

grazie Alex sempre molto preciso.
Buon lavoro
Maurizio


title: Barre strumenti personalizzate

author: Rox

text:
Ho creato un paio di barre di strumenti e vorrei utilizzarle in tutti i miei
programmi.
Come faccio ad importarle? Da importa posso fare le maschere, report... ma
non le barre (che stanno in una tabella di sistema).
Al momento metto visibili gli oggetti di sistema e copio la tabella delle
barre, ma non č che c'č un mezzo piů semplice???
grazie
--
*****************************
** Harry Evans - Bolzano
** Clipper Specialist & Magician
** e-mail:
harry...@tin.it
*****************************
---------------------------------------------------------
->C.N.G.E.I. - Sezione di Bolzano
->
www.edp-progetti.it/cngei.bz
---------------------------------------------------------


title: Barre strumenti personalizzate

author: Ernesto

text:
Strumenti....Opzioni... Visualizzazione....Mostra Oggetti di sistema
checkbox attivato.
Dopo importi la tabella MSysCmdbars
Con Acc97 funziona. Con Acc2K non ho provato.
Ernesto
Rox <
ro...@hotmail.com
> wrote in message 8bdirk$qi9$1...@nslave2.tin.it...



title: Barre strumenti personalizzate

text:
Rox scrisse...
> Ho creato un paio di barre di strumenti e vorrei utilizzarle in tutti i
miei
> programmi.
> Come faccio ad importarle? Da importa posso fare le maschere, report... ma
> non le barre (che stanno in una tabella di sistema).
> Al momento metto visibili gli oggetti di sistema e copio la tabella delle
> barre, ma non è che c'è un mezzo più semplice???
Si, sulla maschera dell'importazione, scegli OPZIONI >> e seleziona "Menu e
barre degli strumenti".
--
Ciao, AntoGal
*************************************************
Home Page (area programmatori di VolFtp)
http://volftp.mondadori.com/italiani/galletta/
per scaricare un gioco di DAMA ITALIANA
*************************************************


title: Aiuto, non riesco a venirne fuori

author: Mauro Bisi

text:
Ciao
Ho realizzato una maschera una maschera principale "Dati" (contenente Nome
cognome ecc.) con inserita una "SottomascheraColazione" collegata tramite i
campi secondari e master con IdRelazione.
In questa maschera ho inserito poi una ulteriore "Sottomaschera Alimenti"
priva di collegamenti a campi secondari o master e con visualizzazione
Maschere continue, che uso per copiare records presenti e accodarli alla
SottomascheraColazione.
Sia la maschera Dati che le sottomaschere sono basate su dati provenienti da
Query.
Il problema che non riesco a risolvere è questo:
vorrei applicare un filtro, tramite una Casella Combinata da usare per la
selezione dei campi su cui impostare il filtro e un Pulsante per togliere il
filtro, per riuscire a selezionare i records per categoria di appartenenza.
Grazie


title: Aiuto, non riesco a venirne fuori

author: Emyr

text:
On Wed, 16 Jan 2002 21:44:00 GMT, "Mauro Bisi" <
maur...@virgilio.it
>
wrote:

vedi evento lostfocus e proprieta filter e filteron
Saluti.
Emanuele.


title: Calcoli con le date

author: Mauro

text:
Ciao a tutti, ho un problema con le date ma non riesco a risolverlo da solo
Ho una maschera Commessa in cui inserisco una data di inizio lavorazione,una
quantità e l'indicazione se il lavoro viene fatto su 2 turni (lun-ven)
oppure su 3 (ciclo continuo), con una query faccio il calcolo del tempo
necessario alla produzione con i dati presenti in una tabella Articoli e lo
aggiungo alla data di inizio per ottenere la data di fine lavoro
(((([Commessa]![Quantità]/[Articoli]![N° impronte])*[Articoli]![Tempo
ciclo])/3600)/(8*[Forms]![Commessa]![N° Turni]))+[Forms]![Commessa]![Data
inizio] AS [Data fine]
a questo punto mi va bene se N° turni è 3, ma come faccio a non far contare
il Sabato e la Domenica se nella maschera inserisco N° turni = 2 ???
Il risultato della query finisce in un report, posso usare il l'evento
format del corpo per fare il calcolo della Data fine in base al n° turni
indicato nella maschera invece di usare una query ???
Ps Non è da molto che uso Access e con le date ho un pò di difficoltà, spero
che qualcuno possa aiutarmi e vi ringrazio fin d'ora.
Mauro


title: Calcoli con le date

author: Roberto

text:
Mauro <
xyzm...@freemail.it
> wrote in message
R1o15.180135$VM3.1...@news.infostrada.it...

Nel caso in cui N°Turni é uguale a 2, con un ciclo For-Next devi sommare 1 a
DataFine per ogni sabato e domenica che ci sono tra DataInizio e DataFine,
che scritto all'intero di un codice VBA sarebbe una cosa del genere:
Dim DataCalc As Date
If Me![N°Turni] = 2 Then
For DataCalc = Me![DataInizio] To Me![DataFine]
    If WeekDay(DataCalc) >= 6 Then
        Me![DataFine] = Me![DataFine] + 1
    End If
Next DataCalc
End If
Roberto


title: Calcoli con le date

text:
Roberto <
r.ma...@libero.it
> wrote in message
BRq15.181288$VM3.1...@news.infostrada.it...
> Nel caso in cui N°Turni é uguale a 2, con un ciclo For-Next devi sommare 1
a
> DataFine per ogni sabato e domenica che ci sono tra DataInizio e DataFine,
> che scritto all'intero di un codice VBA sarebbe una cosa del genere:
> Dim DataCalc As Date
> If Me![N°Turni] = 2 Then
> For DataCalc = Me![DataInizio] To Me![DataFine]
>     If WeekDay(DataCalc) >= 6 Then
>         Me![DataFine] = Me![DataFine] + 1
>     End If
> Next DataCalc
> End If
> Roberto
Ciao Roberto ho provato a inserire il tuo codice su ogni evento del Report,
da Open e Activate fino a Format del Corpo, ma mi dice che è impossibile
assegnare un valore all' oggetto
> Me![Data fine] = Me![Data fine] + 1
forse non ho capito dove devo posizionare il tutto ;-(((
PS  Nella guida dice che il valore restituito da WeekDay per Sabato è 7 e
per Domenica è 1 quindi ho difficoltà a capire
 >     If WeekDay(DataCalc)>= 6 Then
sono "gnucco" (*) io, o così trova tutti i Venerdi e Sabato tra DataInizio e
DataFine e gli aggiunge 1 ???
Dopo aver riletto il tutto, sono sicuro di essere proprio gnucco io, spero
in un tuo chiarimento   ;-)
Ciao e grazie
(*) Gnucco = Dalle mie parti si intende duro di comprendonio !!!!


title: Calcoli con le date

text:
Mauro <
xyzm...@freemail.it
> wrote in message
TWx15.184403$VM3.1...@news.infostrada.it...

Intanto per prima cosa cominciamo a correggere il mio errore, quindi anziché
        If WeekDay(DataCalc)>= 6 Then
va scritto
        If WeekDay(DataCalc) = 1 Or WeekDay(DataCalc) = 7 Then
e scusami per l'errore commesso.
Per l'altro problema io davo per sconteto che nel report  il controllo
relativo alla data di fine lavorazione si chiamasse appunto DataFine.
Roberto


title: Calcoli con le date

text:
Roberto <
r.ma...@libero.it
> wrote in message
rfy15.184641$VM3.1...@news.infostrada.it...
> Intanto per prima cosa cominciamo a correggere il mio errore, quindi
anziché
>         If WeekDay(DataCalc)>= 6 Then
> va scritto
>         If WeekDay(DataCalc) = 1 Or WeekDay(DataCalc) = 7 Then
> e scusami per l'errore commesso.
Meno male che l'hai precisato, io lo avevo già corretto in
If WeekDay(DataCalc) = 1  And WeekDay(DataCalc) = 7 Then
                                               ^^^^^
e suppongo che così, se Data Fine fosse stato Sabato non mi avrebbe aggiunto
il
giorno perchè non venivano soddisfatte entrambe le condizioni !!!!!
>
> Per l'altro problema io davo per sconteto che nel report  il controllo
> relativo alla data di fine lavorazione si chiamasse appunto DataFine.
>
> Roberto
... e così è infatti !!!
 ma l' Origine Controllo di DataFine è il calcolo che faccio nella Query su
cui si basa il Report e non è  calcolato dal Report stesso
Ora ho messo per Origine Controllo di Data Fine
=((([Quantità]/[N° impronte])*[Tempo ciclo])/3600)/(8*[N° Turni])+[Data
inizio]
e tutto funziona ancora nel senso che il calcolo lo esegue, appena metto
sull'evento Open oppure Activate del Report il codice che mi hai scritto,
mi dà ancora errore
"è impossibile assegnare un valore all' oggetto"
......stò perdendoci la testa ed il sonno ( sono le 2 meno 20 e domani si
lavora !!!! )
Grazie ancora e ciao, Mauro


title: Calcoli con le date

text:
Mauro <
xyzm...@freemail.it
> wrote in message
YIz15.185195$VM3.1...@news.infostrada.it...

Scusami er il sonno perso, ma ho commesso un'altra castroneria; mi sono
fatto un esempio e così funziona:
1) dichiarati la proprietà "Visibile" di DataFine a NO
2) inserisci nel corpo del report una casella di testo non associata e
chiamala DataFine2
3) a fronte dell'evento "Su formattazione" del corpo del report genera il
seguente codice VBA:
Dim DataCalc As Date
Me![DataFine2] = Me![DataFine]
If Me![N°Turni] = 2 Then
For DataCalc = Me![DataInizio] To Me![DataFine2]
    If WeekDay(DataCalc) =1 Or WeekDay(DataCalc) = 7 Then
        Me![DataFine2] = Me![DataFine2] + 1
    End If
Next DataCalc
End If
Come vedi dall'ora ho perso un pò di sonno anche io, ma è la giusta
punizione che mi merito.
Aspetto ansioso un tuo OK.
Roberto


title: Calcoli con le date

text:
Roberto <
r.ma...@libero.it
> wrote in message
HYA15.185449$VM3.1...@news.infostrada.it...
> Dim DataCalc As Date
> Me![DataFine2] = Me![DataFine]
> If Me![N°Turni] = 2 Then
> For DataCalc = Me![DataInizio] To Me![DataFine2]
>     If WeekDay(DataCalc) =1 Or WeekDay(DataCalc) = 7 Then
>         Me![DataFine2] = Me![DataFine2] + 1
>     End If
> Next DataCalc
> End If
>
... un passo alla volta arriviamo al risultato finale ;-))))
Vediamo se ho capito il codice: Considera i giorni tra DataInizio e
DataFine, per ogni Domenica (1) e ogni
Sabato che trovi (7) aggiungi un giorno a DataFine, se così ho capito
giusto, il codice ha un limite che ti spiego con un' esempio ---->
Es. Inizio produzione Ven 16/6
       Fine produzione dal calcolo Sab 17/6
       Data fine visualizzata Dom 18/6 invece che Lun 19/6 (aggiunge un solo
giorno a DataFine)
..... tutto perchè c'è solo un Sabato  ;-((((
Ho riscritto così e dovrebbe essere a posto:
Dim DataCalc As Date
     Me![DataFine2] = Me![DataFine]
     If Me![N°Turni] = 2 Then
     For DataCalc = Me![DataInizio] To Me![DataFine2]
     If WeekDay(DataCalc) =7 Then
     Me![DataFine2] = Me![DataFine2] + 2
 End If
    Next DataCalc
End If
Che tradotto da me significa :Se tra DataInizio e DataFine trovi un Sabato
( anche uno solo !!!) aggiungi DUE
giorni a DataFine.....sembra funzionare a dovere.
Se hai qualche altro suggerimento è ben accetto, per ora ti ringrazio
moltissimo.
 Ciao Mauro
PS > Come vedi dall'ora ho perso un pò di sonno anche io, ma è la giusta
> punizione che mi merito.
> Aspetto ansioso un tuo OK.
>
> Roberto
... per un dirigente d'azienda è diverso però  ;-))))))
Riciao Mauro


title: Calcoli con le date

text:
Mauro <
xyzm...@freemail.it
> wrote in message
RPI15.186706$VM3.1...@news.infostrada.it...

Nooooooooooooo!!!!!!!!
Funziona bene così in quanto DataFine2  oltre ad essere il risultato del
calcolo è anche la data finale del ciclo For-Next.
E poiché il ciclo For-Next va in loop sino a quando DataCalc non risulta
maggiore di DataFine2, se DataFine è uguale a 17/06/00  il calcolo si
accorge che è un sabato a aggiunge 1 a DataFine2 (che diventa 18/06/00) e
ritorna in testa al ciclo; alla prossima passata si accorge che DataFine2 è
una domenica e quindi aggiunge ancora 1 (DataFine2 diventa 19/06/00) e
ritorna in testa al ciclo; in questa passata si accorge che DataFine2 non è
né sabato né domenica quindi ritorna in testa al ciclo senza sommare nulla;
è a questo punto che DataCalc risulta maggiore di DataFine2 e quindi si esce
dal ciclo. Puta caso in DataFine2 c'è 19/06/00: e non era quello che
volevi????
Come ti ho già detto il codice VBA l'ho testato (anche se tardi!) e funziona
bene: ora provalo te.
Ho capito che ho perso la tua fiducia per i due errori commessi, ma
insomma......  :-))))
A dopo che hai provato
Roberto


title: Calcoli con le date

text:
Roberto <
r.ma...@libero.it
> wrote in message
y_J15.187170$VM3.1...@news.infostrada.it...
> Come ti ho già detto il codice VBA l'ho testato (anche se tardi!) e
funziona
> bene: ora provalo te.
> Ho capito che ho perso la tua fiducia per i due errori commessi, ma
> insomma......  :-))))
>
> A dopo che hai provato
>
> Roberto
Come vedi non ho perso la fiducia nelle tue risorse......
Cerco di darti le maggiori indicazioni possibili:
In una maschera inserisco
1) Il codice articolo ( per estrarre dalla tab Articoli i dati per i
calcoli )
2)La quantità da produrre
3)La data di inizio produzione
4)Il n° dei turni
Passo il tutto al report nel quale per origine controllo di Data fine c'è la
seguente formula:
=((([Quantità]/[N° impronte])*[Tempo ciclo])/3600)/(8*[N° Turni])+[Data
inizio]
Facciamo un esempio Quantità = 5000, N° impronte = 2, Tempo ciclo (in sec)
per produrre 2 pezzi = 40
n° turni = 2 ; quindi i giorni da sommare a Data Inizio sono 1.736111
Se data inizio è  Venerdì 16/6, in Data fine ottengo 17/6 e in Data fine2
18/6
Non riesco assolutamente a capire dove possa stare l'errore, magari è
sbagliata la formula con cui calcolo i giorni da aggiungere a Data
inizio.Boh sono nelle tue mani ;-)))
PS Nel mio primo post avevo detto che con le date avevo un pò di difficoltà,
ma non pensavo che mi avrebbero fatto sudare le classiche sette camicie
;-))))
Ciao Mauro


title: Calcoli con le date

text:
Mauro <
xyzm...@freemail.it
> wrote in message
rPT15.197101$VM3.1...@news.infostrada.it...
>
> Roberto <
r.ma...@libero.it
> wrote in message
> y_J15.187170$VM3.1...@news.infostrada.it...
>
> > Come ti ho già detto il codice VBA l'ho testato (anche se tardi!) e
> funziona
> > bene: ora provalo te.
> > Ho capito che ho perso la tua fiducia per i due errori commessi, ma
> > insomma......  :-))))
> >
> > A dopo che hai provato
> >
> > Roberto
>
> Come vedi non ho perso la fiducia nelle tue risorse......
[CUT]
Non so se riuscirai a non odiarmi, ma la soluzione giusta è quella che tu
hai indicato con il messaggio del 14/06/00 delle ore 12:07 ovvero:
Dim DataCalc As Date
     Me![DataFine2] = Me![DataFine]
     If Me![N°Turni] = 2 Then
     For DataCalc = Me![DataInizio] To Me![DataFine2]
     If WeekDay(DataCalc) =7 Then
     Me![DataFine2] = Me![DataFine2] + 2
 End If
    Next DataCalc
End If
Non so che cavolo ho provato; fra l'altro ho dimostrato di essere un
presentuoso.
Scusami ancora per il sonno perso.
Roberto
PS
Come vedi a sudare le sette camicie con le data sei in buona compagnia


title: Calcoli con le date

text:
Roberto <
r.ma...@libero.it
> wrote in message
jCV15.197582$VM3.1...@news.infostrada.it...
> Non so se riuscirai a non odiarmi, ma la soluzione giusta è quella che tu
> hai indicato con il messaggio del 14/06/00 delle ore 12:07 ovvero:
> Non so che cavolo ho provato; fra l'altro ho dimostrato di essere un
> presentuoso.
> Scusami ancora per il sonno perso.
>
> Roberto
>
> PS
> Come vedi a sudare le sette camicie con le data sei in buona compagnia
....E io che credevo di aver trovato un consulente SUPERMEGAESPERTO di
Access...Puah !!!  ;-)))))
Scherzo naturalmente, senza il tuo aiuto non sarei riuscito ad arrivare alla
soluzione, per cui i ringraziamenti sono d' obbligo, grazie di cuore
Al prossimo dubbio, Mauro
PS Ho già in mente di ampliare il mio DB, e qualche domanda verrà fuori
sicuramente, magari direttemente in e-mail, se non ti scoccia.
Riciao MAURO


title: Calcoli con le date

text:
Caro Mauro,
mi sto appassionando al tuo problema e visto ormai che il tormentone del
ciclo For_Next sembrerebbe da archiviare (e lo sarebbe per merito tuo), mi
sono soffermato a valutare la formula che hai inserito nell'origine
controllo di DataFine, che ricordo essere:
=((([Quantità]/[N° impronte])*[Tempo ciclo])/3600)/(8*[N° Turni])+[Data
inizio]
Mi vengono da fare alcune considerazioni:
1°) Nel caso in cui ciò che sommi a DataInizio risulti essere un numero
intero (non contenga decimali come invece 1.736111 del tuo esempio),
DataFine risulterebbe avere un giorno in più, e nel caso che DataFine fosse
un sabato e N°Turni fosse uguale a 2, DataFine2 risulterebbe avere tre
giorni in più.
Secondo me si può ovviare a tale inconveniente sostituendo nel codice VBA la
riga:
    Me![DataFine2] = Me![DataFine]
con
    If Me![DataFine] = Int(Me![DataFine]) Then
        Me![DataFine2] = Me![DataFine]-1
    Else
        Me![DataFine2] = Me![DataFine]
    End If
2°) La tua formula non tiene conto in che ora di DataInizio comincia la
lavorazione e questo potrebbe far sì che DataFine risulti in difetto di un
giorno; mi spiego meglio: ipotizzando che una certa lavorazione duri
l'equivalente di 10 ore, il calcolo ti restituisce una DataFine uguale a
DataInizio; ciò è giusto nel caso che la lavorazione inizi la prima ora del
primo turno, ma se iniziasse l'ultima ora dell'ultimo turno la data di fine
lavorazione dovrebbe essere quella successiva a quella di inizio.
Se il N°Turni fosse sempre uguale a 3, la cosa si risolverebbe facilmente:
basterebbe digitare in DataInizio oltre che la data anche l'ora di inizio
lavorazione (ovvero 16/06/00 08:35 anziché solamente 16/06/00); la cosa
funzionerebbe in quanto in questo caso le ore di una giornata lavorativa
coincidono con le ore di un giorno, ovvero sono 24.
Se però il N°Turni è uguale a 2 (giornata lavorativa di 16 ore) ed il
secondo turno non termina alle ore 24:00 (ad esempio i due turni sono
articolati dalle 06:00 alle 14:00 e dalle  14:00 alle 22:00) l'inserimento
dell'orario in DataInizio non è più sufficiente a garantirti sempre un
risultato giusto (vedi il caso di una lavorazione che dura 3 ore ed inizia
alle ore 21:00).
Se non sto prendendo l'ennesima cantonata, il problema si dovrebbe risolvere
facendo in modo che (nel caso in cui N°Turni è uguale a 2 e la durata della
lavorazione è maggiore del tempo che intercorre tra l'ora di inizio
lavorazione e l'ora di fine del secondo turno) la data di fine lavorazione
venga aumentata di un giorno.
Ipotizzando che, se N°Turni è uguale a 2, la giornata lavorativa finisce
alle 22:00, e stabilito che digiti anche l'ora di inizio lavorazione, il
codice VBA dovrebbe diventare:
Dim DataCalc As Date
Dim TempoSecondi As Long
Dim TempoOreMinuti As Date
Dim DurataLav As Long
TempoOreMinuti = #22:00# - (Me![DataInizio] - Int(Me![DataInizio])
TempoSecondi = Hour(TempoOreMinuti)*3600 + Minute(TempoOreMinuti)*60
DurataLav = (Me![Quantita]/Me![N°Impronte]) * Me![TempoCiclo]
      If Me![DataFine] = Int(Me![DataFine]) Then
        Me![DataFine2] = Me![DataFine]-1
     Else
        Me![DataFine2] = Me![DataFine]
     End If
     If Me![N°Turni] = 2 Then
        If DurataLav > TempoSecondi Then
            Me![DataFine2] = Me![DataFine2] + 1
        End If
    End If
     If Me![N°Turni] = 2 Then
     For DataCalc = Me![DataInizio] To Me![DataFine2]
     If WeekDay(DataCalc) =7 Then
     Me![DataFine2] = Me![DataFine2] + 2
 End If
    Next DataCalc
End If
Valuta la validità delle mie ipotesi e provale perché io non l'ho fatto.
Ciao Roberto


title: Filtrare le prime due parole di un testo

text:
Ciao a tutti,
volevo chiedervi se tramite codice era possibile applicare un filtro in base
alle prime due parole di un testo esempio:
ho un record...  COD.         DESCR.
                          001           FILTRO OLIO 256
                          002           FILTRO OLIO 555
vorrei filtrare tutti i record che iniziano per FILTRO OLIO...come posso
fare?
Vorrei (sarebbe ancora meglio) mandare il risultato in una casella di
testo.Quest'ultima al momento assume il valore del campo con la seguente
stringa:
=Form.[Manutenzione Sottomaschera].Form.TipoMan
e fornisce i criteri per il filtro...vorrei che questo valore appunto fosse
(quando mi posiziono nel record) FILTRO OLIO e non FILTRO OLIO 256.
Grazie come sempre a tutti per l'aiuto
Roberto


author: giancarlo

text:
"Roberto" <
aris...@libero.it
> ha scritto nel messaggio
news:CUhxc.429459$rM4.17...@news4.tin.it...

se nella tabella il campo si chiama 'nome' prova con una query di questo
tipo:
SELECT Left([nome],Len([nome])-Len(Mid([nome],InStr([nome],"
")+Len(Left(Mid([nome],InStr([nome]," ")+1),InStr(Mid([nome],InStr([nome],"
")+1)," ")))))) AS primi_due_nomi, tabella.nome
FROM tabella;
dovrebbe funzionare a patto che tu debba estrarre sempre i primi due nomi
presenti nel campo
Giancarlo


title: Modifica Contemporanea di RECORD ....trigger upadate

text:
Ciao a tutti
il problema sussiste con access 2003, progetto ADP
Sul DB sql 2000 ho cretao per una tabella un trigger di add new che
esegue una stored procedure che inserisce un nuovo record sulla base
di alcuni dati della tabella chiamante
Se faccio dei test direttamante in Sql Server non c'è alcun problema,
se invece uso access compare quel fastidioso messaggio "Modifica
Contemporanea di RECORD"
Chi sa come bypassare questo messaggio ?
come mai appare !?
ho letto in alcuni post un riferimento al comando resync, ma non credo
che riguardi il mio problema....
grazie a chiunque mi aiuterà


title: Modifica tabella via codice

author: ElioP

text:
Ciao a tutti.
Devo modificare la struttura di campi in una tabella di un BE.
Con ...CreateField posso aggiungere nuovi campi.
Come posso fare invece a modificare la dimensione
di un campo gia' esistente (di tipo testo) ?
Grazie. ElioP.


title: Modifica tabella via codice

author: Paolo

text:
in SQL c'e l'istruzione ALTER TABLE nometabella ALTER COLUMN nomecampo
tipodata(dimensione), che serve per modificare i campi dei db.
ho provato ma su jet non sono  riuscito a farlo funzionare, mi da un
errore nell'istruzione sql. In effetti l'help di access riporta solo le
clausole DROP e ADD.......
se qualcuno a tempo e voglia di provare, e magari trova la
soluzione..... sarei curioso anch'io....
saluti
tratto da msdn:
Programmatically modifies the structure of a table.
Syntax
ALTER TABLE TableName1
ADD | ALTER [COLUMN] FieldName1
FieldType [(nFieldWidth [, nPrecision])]
[NULL | NOT NULL]
[CHECK lExpression1 [ERROR cMessageText1]]
[DEFAULT eExpression1]
[PRIMARY KEY | UNIQUE]
[REFERENCES TableName2 [TAG TagName1]]
[NOCPTRANS]
[NOVALIDATE]
-or-
ALTER TABLE TableName1
ALTER [COLUMN] FieldName2
[NULL | NOT NULL]
[SET DEFAULT eExpression2]
[SET CHECK lExpression2 [ERROR cMessageText2]]
[DROP DEFAULT]
[DROP CHECK]
[NOVALIDATE]
-or-
ALTER TABLE TableName1
[DROP [COLUMN] FieldName3]
[SET CHECK lExpression3 [ERROR cMessageText3]]
[DROP CHECK]
[ADD PRIMARY KEY eExpression3 TAG TagName2 [FOR lExpression4]]
[DROP PRIMARY KEY]
[ADD UNIQUE eExpression4 [TAG TagName3 [FOR lExpression5]]]
[DROP UNIQUE TAG TagName4]
[ADD FOREIGN KEY [eExpression5] TAG TagName4 [FOR lExpression6]
REFERENCES TableName2 [TAG TagName5]]
[DROP FOREIGN KEY TAG TagName6 [SAVE]]
[RENAME COLUMN FieldName4 TO FieldName5]
[NOVALIDATE]
Arguments
TableName1
Specifies the name of the table whose structure is modified.
ADD [COLUMN] FieldName1
Specifies the name of the field to add. A single table can contain up to
255 fields. If one or more fields allow null values, the limit is
reduced by one to 254 fields.
ALTER [COLUMN] FieldName1
Specifies the name of an existing field to modify.
FieldType [(nFieldWidth [, nPrecision])]
Specifies the field type, field width, and field precision (number of
decimal places) for a new or modified field.
FieldType is a single letter indicating the field's data type. Some
field data types require that you specify nFieldWidth or nPrecision or
both.
The following table lists the values for FieldType and indicates whether
nFieldWidth and nPrecision are required:
FieldType nFieldWidth nPrecision Description
C n – Character field of width n
D – – Date
T – – DateTime
N n d Numeric field of width n with d decimal places
F n d Floating numeric field of width n with d decimal places
I – – Integer
B – d Double
Y – – Currency
L – – Logical
M – – Memo
G – – General
P – – Picture
nFieldWidth and nPrecision are ignored for D, T, I, Y, L, M, G, and P
types. nPrecision defaults to zero (no decimal places) if nPrecision
isn't included for the N, F, or B types.
NULL | NOT NULL



title: Modifica tabella via codice

author: sib

text:
ElioP dice:
> Devo modificare la struttura di campi in una tabella di un BE.
>
> Con ...CreateField posso aggiungere nuovi campi.
>
> Come posso fare invece a modificare la dimensione
> di un campo gia' esistente (di tipo testo) ?
Tutti gli oggetti hanno delle proprieta' (in genere) modificabili.
Una tabella e' un oggetto TableDef e appartiene all'insieme TableDefs.
Accedi via codice alla tabella come oggetto TableDef e modificane le
proprietà che devi modificare (vedi help per maggiori dettagli)
nella fattispecie, la proprietà che dovresti impostare e' la proprieta' size
del campo della tabella, ma questo, da codice, non si può fare con
semplicita' perche' questa proprieta' e' di sola lettura.
Sei sicuro che non ti convenga impostare la proprieta' a mano aprendo la
tabella in visualizzazione struttura?
L'unico artificio per fare questa operazione da codice e' piuttosto
farraginosa: crei un nuovo campo nella tabella con le proprieta' che ti
servono, copi tutti i dati dal campo originale, elimini il vecchio campo e
rinomini il nuovo con il nome del vecchio. Facile no?
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: Archivio Immagini

text:
Sulle faq del sito comune c'e' una spiegazione di come creare un archivio
immagini con un path all'immagine da un campo della tabella....dice cosi:
"Esistono almeno due diverse tecniche per ovviare a tale inconveniente:
1) Utilizzare il database solo come "indice", lasciando le immagini esterne
allo stesso.
E' certamente la soluzione più semplice e quella ottimale nel 99% dei casi;
è sufficiente memorizzare all' interno del database il solo path del file
immagine, path che poi potrà essere utilizzato unitamente al controllo
"Immagine" (standard in Access97) per la visualizzazione sia sulle forms che
sui reports.
Supponendo di aver memorizzato il path del file immagine nel campo
Path_Immagine sarà sufficiente inserire un controllo Immagine nella form o
nel report basati sulla tabella ed un controllo nascosto collegato al campo
in questione.
A questo punto, sull' evento Corrente (per le forms) o SuFormattazione (per
i reports) sarà sufficiente aggiungere la semplice riga di codice seguente
per visualizzare l' immagine:"
Essendo ignorante in materia qualcuno potrebbe spiegarmi che significa
"Evento corrente" visto che nel caso del controllo immagine l'evento e' solo
su una determinata azione, click, doppio click ecc.
Inoltre, che significa "SuFormattazione" per i report, infatti per le
maschere sono riuscito a seguire le istruzioni, anche se devo cliccare per
vedere l'immagine, mentre per i report ho fallito del tutto.
La versione che uso e' access2000, e non access97, e' li' la causa?
Grazie


title: Archivio Immagini

author: Federico Luciani

text:
Paolo wrote:
> Sulle faq del sito comune c'e' una spiegazione di come creare un archivio
> immagini con un path all'immagine da un campo della tabella....dice cosi:
> "Esistono almeno due diverse tecniche per ovviare a tale inconveniente:
> 1) Utilizzare il database solo come "indice", lasciando le immagini esterne
> allo stesso.
> E' certamente la soluzione più semplice e quella ottimale nel 99% dei casi;
> è sufficiente memorizzare all' interno del database il solo path del file
> immagine, path che poi potrà essere utilizzato unitamente al controllo
> "Immagine" (standard in Access97) per la visualizzazione sia sulle forms che
> sui reports.
> Supponendo di aver memorizzato il path del file immagine nel campo
> Path_Immagine sarà sufficiente inserire un controllo Immagine nella form o
> nel report basati sulla tabella ed un controllo nascosto collegato al campo
> in questione.
> A questo punto, sull' evento Corrente (per le forms) o SuFormattazione (per
> i reports) sarà sufficiente aggiungere la semplice riga di codice seguente
> per visualizzare l' immagine:"
> Essendo ignorante in materia qualcuno potrebbe spiegarmi che significa
> "Evento corrente" visto che nel caso del controllo immagine l'evento e' solo
> su una determinata azione, click, doppio click ecc.
L'evento corrente da gestire e' quello della maschera.
Ipotizzando che sulla tua maschera ci siano un controllo casella di testo
(txtPath) legato al campo contenente il path dell'immagine ed un controllo
immagine (imgPrev), allora nell'evento Su corrente della maschera dovrai
scrivere:
Private Sub Form_Current()
 If IsNull(Me.txtPath) Then Exit Sub
 Me.imgPrev.Picture = Me.txtPath
End Sub
in questo modo ogni volta che ti sposti su un record ed il campo path non e'
vuoto, viene visualizzata l'immagine relativa a quel record
> Inoltre, che significa "SuFormattazione" per i report, infatti per le
> maschere sono riuscito a seguire le istruzioni, anche se devo cliccare per
> vedere l'immagine, mentre per i report ho fallito del tutto.
allo stesso modo devi gestire l'evento Su formattazione del corpo del report
Private Sub Corpo_Format(Cancel As Integer, FormatCount As Integer)
 If IsNull(Me.txtPath) Then Exit Sub
 Me.imgPrev.Picture = Me.txtPath
End Sub
Spero di essere stato chiaro.
Se il problema e': cosa sono gli eventi?
Allora ti consiglio di studiarli sul help e poi per di riscrivere per eventuali
chiarimenti.
--
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------


title: Archivio Immagini

text:
Grazie della risposta.
Adesso provo ad applicare il consiglio.
Paolo


title: odbc tra tabelle access ???

author: Jef

text:
Salve NG
Qualcuno mi sa spiegare come posso collegare tabelle di access su un'altro
access usando gli ODBC e non il sistema standard.
Se provo scegliendo:
Nouvo Tabella > Collega > ODBC > microsoft Access,
mi da errore del tipo:
Errore Microsoft Jet 3423
Grazie


title: odbc tra tabelle access ???

author: All Eyez On me

text:
"Jef" <
j...@libero.it
> ha scritto nel messaggio
news:S4U88.42099$nI1.1...@twister1.libero.it...

non credo si possa fare, puoi collegarle normalmente
AEOM


title: stampa etichette in Access

author: Vita

text:
Ciao a tutti
Ho un problema.
Dovrei stampare delle etichette.
il problema consiste nell'impostarle in relazione al numero inserito nel
campo quantità.
Se non riesco a spiegarmi bene chiedete ulteriormante......
Grazie
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: stampa etichette in Access

author: MA

text:
Vita wrote:
> Ciao a tutti
> Ho un problema.
> Dovrei stampare delle etichette.
> il problema consiste nell'impostarle in relazione al numero inserito
> nel campo quantità.
> Se non riesco a spiegarmi bene chiedete ulteriormante......
> Grazie
Ciao e benvenuta,
Guarda su
www.sitocomune.com
 sez. report, c'è già la soluzione per te
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: Gestione eventi tra maschere W98/A97

author: asukuo

text:
Salve a tutto il NG.
Dopo numerosi e vani tentativi, mi rivolgo a Voi per la soluzione del
seguente quesito.
Ho 2 Tabelle con relative Maschere così costituite:
- Tabella Clienti
IdCliente      Contatore
Cliente         Testo
Indirizzo       Testo
etc.
- Tabella Portafogli
IdPort           Contatore
Cliente          Testo
Titolo            Testo
Quote           Numerico
Valore          Numerico
Ogni tabella ha la chiave primaria su Id.... e la relazione tra le 2 tabelle
è 1:1 tramite campo Cliente.
Ordunque il mio quesito.
Apro la Maschera Portafogli e sul controllo Cliente devo inserire le
seguenti condizioni:
se la variabile digitata è già presente nella Tabella Clienti allora
  messaggio in cui ci informa che si è tentato di duplicare il Cliente
  riporta il focus sul medesimo controllo aspettando una nuova variabile
altrimenti
 apro la Maschera Clienti
 ricopio la variabile digitata nella Maschera Portafogli.Cliente, nella
Maschera Clienti.Cliente
 sposto il focus sul controllo Indirizzo
 quando ho terminato di inserire il record (nuovo cliente), chiudo la
maschera Clienti
mi ritrovo nella Maschera Portafogli col controllo Cliente già completato e
ho il focus sul controllo Titolo
completo il record portafogli...
Scusate eventuale poca chiarezza nell'esposizione succitata, nel qual caso
sarà mia premura rimediare.
Ringrazio tutti coloro che parteciperanno alla soluzione del quesito.
Gianni.


title: Gestione eventi tra maschere W98/A97

author: Roberto dal portatile

text:
"asukuo" <
gros...@jumpy.it
> ha scritto nel messaggio
news:8vd27e$rn2$1...@serv1.albacom.net...

E' bene che tu prenda coscienza che usando questa struttura di tabelle hai
ignorato una delle regole fondamentali dei database relazionali: hai messo
lo stesso dato (campi Cliente) in due tabelle diverse.
Quindi ti consiglio di cambiare la struttura della seconda tabella in:
- Tabella Portafogli
IdPort           Contatore
IdCliente       Numerico
Titolo            Testo
Quote           Numerico
Valore          Numerico
Quindi metti in relazione uno-a-molti (e non uno-a-uno) le due tabelle in
base ai campi IdCliente (penso che sia innegabile che un cliente possa avere
più record nella Tabella Portafogli); aggiungi anche l'integrità
referenziale.
Apri la struttura della Tabella Portafogli e per il campo IdCliente adopera
l'Autocomposizione Ricerca... basandola sulla Tabella Clienti.
Così facendo quando apri la Maschera Portafogli il controllo IdCliente lo
vedrai come una casella combinata; per i record Portafogli già esistenti la
combo porterà il nome del cliente, per i record da inserire adopererai la
combo per selezionare il cliente di quel record.
Per risolvere i problema di inserire clienti nuovi mentre inserisci nuovi
record Portafoglio, a fronte dell'evento "Su non in elenco" della combo
IdCliente genera una routine che apre la Maschera Clienti per l'inserimento
di un nuovo record nella Tabella Clienti, poi fa il requery della casella
combinata e sposta il fuoco sul controllo  Titolo , ovvero:
DoCmd.OpenForm "MascheraClienti", , , , acFormAdd, acDialog, "GotoNew"
    Me![IdCliente].Requery
    Me![Titolo].SetFocus
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------


title: Gestione eventi tra maschere W98/A97

text:
Roberto dal portatile <
r.ma...@libero.it
> wrote in message
9FvS5.9118$FV2.2...@news.infostrada.it...
>
> "asukuo" <
gros...@jumpy.it
> ha scritto nel messaggio
> news:8vd27e$rn2$1...@serv1.albacom.net...

> E' bene che tu prenda coscienza che usando questa struttura di tabelle hai
> ignorato una delle regole fondamentali dei database relazionali: hai messo
> lo stesso dato (campi Cliente) in due tabelle diverse.
>
> Quindi ti consiglio di cambiare la struttura della seconda tabella in:
>
> - Tabella Portafogli
>
> IdPort           Contatore
> IdCliente       Numerico
> Titolo            Testo
> Quote           Numerico
> Valore          Numerico
>

Grazie Roberto, per il gentile contributo.
Sei sempre molto esauriente nelle spiegazioni.
Gianni.


title: Database in rete. Quale struttura e protezioni?

author: Alessandro Carli

text:
Un saluto a tutto il NG.
Gradirei sapere come poter strutturare al meglio un DB da far girare in una
rete aziendale composta complessivamente da max. 10 workstation e gestita da
Windows NT.
In particolare, per garantire una sufficiente velocità nei momenti di
contemporaneo utilizzo dell'applicativo da parte degli utenti, mi conviene
dividere il file BE in più file, uno per 'argomento' (es. fatture, clienti,
fornitori, ecc.), oppure mantenerne uno unico?
Nel caso di divisione dei file BE, posso posizionare i file in diverse
directory del server ad accesso limitato, in modo da utilizzare i lock di
windows nt (congiuntamente oppure in alternativa) a quelli di Access?
Ringrazio per la collaborazione.
Alessandro Carli
Risposte anche su:
carl...@tin.it


text:
Alessandro Carli <
carl...@tin.it
> wrote in message
news:8kh7jr$s27$1...@nslave2.tin.it...
> Un saluto a tutto il NG.
>
> Gradirei sapere come poter strutturare al meglio un DB da far girare in
una
> rete aziendale composta complessivamente da max. 10 workstation e gestita
da
> Windows NT
In particolare la rete è realizzata con cavo coassiale. I singoli PC sono
dotati di scheda 3Com di tipo Combo 10/100.


title: Aiuto per query con GROUP BY (cross)

author: Lemorlenny

text:
Scusate il cross ma credo di aver postato in un gruppo errato.
Salute a tutti,
Scusate la mia ignoramza ma sarei grato a chi potesse illuminarmi sul
perche' questa query restituisce valori errati:
Tabella PRODOTTI
	Idprodotto
	Descrizione
Tabella CARICHI
	IdProdotto
	QuantitaCarico
Tabella SCARICHI
	IdProdotto
	QuantitaScarico
Io vorrei estrarre tutti i prodotti di magazzino ognuno con il totale
dei carichi e degli scarichi (eventualmente anche la giacenza per
differenza)
Ho fatto cosi:
SELECT DISTINCT Prodotti.IdProdotto, Sum(Magazzino.Quantita) AS
Carichi, Sum(MagazzinoScarico.Quantita) AS Scarichi
FROM (Prodotti LEFT JOIN Magazzino ON Prodotti.IdProdotto =
Magazzino.IdProdotto) LEFT JOIN MagazzinoScarico ON Prodotti.IdProdotto
= MagazzinoScarico.IdProdotto
GROUP BY Prodotti.IdProdotto
HAVING (((Sum(Magazzino.Quantita))>0) AND
((Sum(MagazzinoScarico.Quantita))>0)) OR (((Sum(Magazzino.Quantita))>0)
AND ((Sum(MagazzinoScarico.Quantita))>0))
ORDER BY Prodotti.IdProdotto;
ma i valori delle sommatorie sono sempre maggiori del valore reale.
Ho provato in vari modi ma la mia scarsa conoscenza di questa clausola
non mi ha permesso di trovare una soluzione.
Eterna gratitudine a chi mi fornira' qualche dritta.
saluti
Paolo
--


title: Aiuto per query con GROUP BY (cross)

author: almorel

text:

Ciao Paolo, nel tentativo di guadagnarmi l'eterna gratitudine  ;-))
ti dico coma farei io:
- una query con totali entrate
- una query con totali uscite
- query finale che lega le due precedenti ai Prodotti.
In questo modo hai sicuramente un solo record per prodotto.
Ti conviene  fare un left join tra Prodotti e le due query altrimenti
(teorico ?) potresti perderti le voci che hanno solo entrate o solo
uscite.
Chiaro ?
Alberto


title: Aiuto per query con GROUP BY (cross)

text:
almorel wrote:

Grazie Alberto, adesso provo come dici tu.
Per l'eterna gratitudine te la mando dopo, se funziona :).
Ciao, grazie
Paolo
--


title: Aiuto per query con GROUP BY (cross)

author: Paolo opg

text:
"Lemorlenny" <
lemor...@gmail.com
> wrote in news:4bf4323f$0$6823$5fc30a8
@
news.tiscali.it
:

come mai metti la 'having'?
vuoi estrarre tutti i prodotti, percio' non dovresti filtrare.
anche il distinct lo devi eliminare; stai raggruppando per idProdotto,
quindi le righe del risultato devono comunque essere diverse tra loro.
Magazzino e MagazzinoScarico sono viste sulle due tabelle?
hanno dei filtri o dei raggruppamenti?
se si', potrebbe essere quello che ti fa saltare i conteggi.
> ma i valori delle sommatorie sono sempre maggiori del valore reale.
> Ho provato in vari modi ma la mia scarsa conoscenza di questa clausola
> non mi ha permesso di trovare una soluzione.
>
> Eterna gratitudine a chi mi fornira' qualche dritta.
>
> saluti
>
> Paolo
non ho la soluzione al tuo problema ma mi vien da fare una osservazione.
non sarebbe piu' efficiente avere una sola tabella 'movimenti'?
positivi i carichi, negativi gli scarichi e il risultato lo ottieni
tramite una query su una sola tabella.
--
Paolo opg
BE AWARE that this post uses a fake reply-to address
to contact me write to:
janickg ( at ) hotmail ( dot ) com
--


title: Aiuto per query con GROUP BY (cross)

text:
Lemorlenny wrote:

seguendo i tuoi consigli credo di essermi avvicinato alla soluzione:
SELECT MagazzinoScarico.IdProdotto,0 AS SumOfCarichi,
Sum(MagazzinoScarico.QuantitaScarico) AS SumOfScarichi
FROM MagazzinoScarico
WHERE (((MagazzinoScarico.QuantitaScarico)>0))
GROUP BY MagazzinoScarico.IdProdotto
UNION
SELECT Magazzino.IdProdotto, Sum(Magazzino.Quantita) AS SumOfCarichi,0
AS SumOfScarichi
FROM Magazzino
WHERE (((Magazzino.Quantita)>0))
GROUP BY Magazzino.IdProdotto
ORDER BY 1
L'unico inconveniente � che ho il valore CARICHI e SCARICHI di
ogni prodotto riportato su 2 record.
IdProdotto	SumOfCarichi	SumOfScarichi
	1		0			2
	1		30,51			0
	2		0			8
	2		41,5			0
	3		3			0
Comunque e' un passo avanti.
Ciao
Paolo
--


title: Aiuto per query con GROUP BY (cross)

author: OneEDP

text:

SELECT
     M.IDPRodotto,
     Nz(C.QtaCarichi) As Carichi,
     Nz(S.QtaScarichi) As Scarichi,
     Nz(C.QtaCarichi) - Nz(S.QtaScarichi) As Saldo
FROM
     Magazzino As M
LEFT JOIN
     (SELECT
         X.IDProdotto,
         Sum(nz(X.Qta))
     FROM Carichi As X
     GROUP BY X.IDProdotto) As C ON
     M.IDProdotto = C.IDProdotto
LEFT JOIN
     (SELECT
         Y.IDProdotto,
         Sum(nz(Y.Qta))
     FROM Scarichi As Y
     GROUP BY Y.IDProdotto) As S ON
     M.IDProdotto = S.IDProdotto
WHERE
     Nz(C.QtaCarichi) = 0 AND
     Nz(S.QtaScarichi) = 0
Daniele
SELECT
	MagazzinoScarico.IdProdotto,
	Sc.QtaScarichiMagazzinoScarico
	Sc
