title: query bellina.... (HELP)

author: Enrico Virginio

text:
Mi sto incasinado con sta query occhio:
ho una tabella:
NSped    Anomalia    Esito
200      No          Null
200      Sě          3
200      No          1
Mi serve (assolutamente...)una query che mi ritorni da quella tabella un solo
record con i seguenti criteri:
- deve essere raggruppato per NSped (quindi mi deve tornare un solo NSped se ve
ne sono di uguali es.200)
- dove Anomalia č stato almeno una volta Sě
- dove Esito č <> da 1 e Null
quindi io vorrň vedere:
NSped     Anomalia     Esito
200       Sě           3
Grazie mille
ciaooo.
--
Posted from
ppp-52-64.25-151.libero.it
 [151.25.64.52]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: query bellina.... (HELP)

author: Roberto dal portatile

text:
"Enrico Virginio" <
nor...@libero.it
> ha scritto nel messaggio
news:59ed94ba9f26db66b9...@mygate.mailgate.org...
> Mi sto incasinado con sta query occhio:
>
> ho una tabella:
> NSped    Anomalia    Esito
> 200      No          Null
> 200      Sě          3
> 200      No          1
>
>
> Mi serve (assolutamente...)una query che mi ritorni da quella tabella un
solo
> record con i seguenti criteri:
> - deve essere raggruppato per NSped (quindi mi deve tornare un solo NSped
se ve
> ne sono di uguali es.200)
> - dove Anomalia č stato almeno una volta Sě
> - dove Esito č <> da 1 e Null
>
> quindi io vorrň vedere:
> NSped     Anomalia     Esito
> 200       Sě           3
>
>
>
> Grazie mille
> ciaooo.
E se nella tua tabella, per un certo numero di spedizione, di record con
Anomalia a Si ce ne hai 3 che hanno rispettivamente 6, 7 e 8 come esito, tu
cosa vuoi visualizzare?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: ricerca multicampo

author: mino

text:
Ho un database con una tabella a tre campi : Cognome , Nome , Città.
Ho costruito una maschera non associata con tre caselle di testo
appunto Cognome ,Nome ,Città e un pulsante che esegue la query che
illustro qui di seguito; Ho costruito questa query con i soliti tre
campi e nella riga criteri ho messo Like "*" & [Forms]![FrmCerca]!
[Cognome] & "*" ;  "*" & [Forms]![FrmCerca]![Nome] & "*";
 "*" & [Forms]![FrmCerca]![Città] & "*". La maschera non associata
funziona perfettamente e posso combinare tutte le ricerche di cui ho
bisogno (naturalmente il database è più complesso , ho semplificato
per farmi capire meglio).
Il problema che non riesco a risolvere è che il risultato delle
ricerche compare su un foglio anonimo tipo excel ma io vorrei che
comparisse su un report per poterlo poi stampare e distribuire.

Un grazie anticipato a chi avrà voglia di rispondermi.    Mino


title: ricerca multicampo

author: Popi - TheBadHabits

text:
Ciao!

Nel pulsante metterai l'apertura del tuo report in luogo della openquery, ed il report avrà come origine dati la tua query.

HTH
Popi


title: ricerca multicampo

text:

Grazie per il suggerimento. era così facile mah
Comunque ti ringrazio per avermi risposto
ciao


title: Rotella Mouse in casella di testo

author: Sandrobi

text:
All'interno di una casella di testo con barra di scorrimento verticale,
muovendo la rotella del mouse scorre tra i record anziché scorere
all'interno della casella. E' possibile farla funzionare diversamente?
Se non è possibile creado che è meglio disabilitarla: il PgUp/PgDn funziona
meglio.
--
Ciao, Sandrobi
-----------------
Se la tua email è fasulla, ti invito a leggere
http://wiki.news.nic.it/AntiSpam


title: Rotella Mouse in casella di testo

author: Alessandro Baraldi

text:
Sandrobi ha scritto:
> All'interno di una casella di testo con barra di scorrimento verticale,
> muovendo la rotella del mouse scorre tra i record anziché scorere
> all'interno della casella. E' possibile farla funzionare diversamente?
> Se non è possibile creado che è meglio disabilitarla: il PgUp/PgDn funziona
> meglio.
>
> --
> Ciao, Sandrobi
Per disabilitare la Rotella del Mouse devi sfruttare il SubClassing.
Nel mio sito trovi un Demo sviluppato qualche tempo fà con Giorgio
Rancati.
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=1
Però ti consiglio di usare la DLL di Lebans che è assolutamente più
performante, poi non deve nemmeno essere registrata.
Vai nel sito di Lebans
www.lebans.com
@Alex


title: Rotella Mouse in casella di testo

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:1161442000.6...@e3g2000cwe.googlegroups.com...
Sandrobi ha scritto:



http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=1


@Alex
---------------------------
Quindi mi confermi che è meglio disabilitarla?
Sandrobi


title: Rotella Mouse in casella di testo

text:
Sandrobi ha scritto:
[CUT]
> Quindi mi confermi che è meglio disabilitarla?
Dipende dalle tue esigenze...!
Io non ne ho quasi mai bisogno perchè difficilmente ho Maschere con
Più di 1 Record
ed il problema è solo nelle Form, nelle SubForm direi che è
relativo...!
Dipende molto da come uno è abituato, o cosa deve realizzare.
> Sandrobi
@Alex


title: Aprire un database..

author: Alby

text:
Buongiorno..all'interno di una cartella ho diversi programmi in
access,con dei ruoli precisi..Quello che vorrei fare è creare,in un
database nuovo, una maschera di menù per guidare l'utente e facilitare
l'uso degli altri programmi..Come faccio a lanciare gli altri programmi
da questo già in esecuzione?Con una macro o da codice,ed eventualmente
come?..Grazie molte!
Inviato da
www.mynewsgate.net


title: Aprire un database..

text:
"Alby" <
6175i...@mynewsgate.net
> ha scritto nel messaggio
news:200407200...@mynewsgate.net...

Prova così:
dall'evento click di un pulsante:
Dim stAppName As String
stAppName = "C:\Programmi\Microsoft Office\Office\MSACCESS.EXE
C:\Tua_Cartella\Tuo_DataBase"
Call Shell(stAppName, 1)
Ciao e fammi sapere.


title: Aprire un database..

text:
Giovanni_A <
artig...@deejaymail.it
> ha scritto:

>SI FUNZIONA!Ti ringrazio..
Inviato da
www.mynewsgate.net


title: Aprire un database..

text:
Giovanni_A <
artig...@deejaymail.it
> ha scritto:

>Funziona,
> Ma lanciare il programma senza dover specificare il file eseguibile
>di
>Microsoft Access è Possibile??
Inviato da
www.mynewsgate.net


title: Aprire un database..

text:

devi sempre specificare il percorso dell'applicazione con cui vuoi aprire il
file...


title: Aprire un database..

author: Sergio MAZZA

text:
"Alby" <
6175i...@mynewsgate.net
> ha scritto nel messaggio
news:200407200...@mynewsgate.net...
> Ma lanciare il programma senza dover specificare il file eseguibile
> >di
> >Microsoft Access è Possibile??
>
Lo fai con gli script WSH e il metodo Run:
es.
Dim wshShell
Set wshShell = CreateObject("WScript.Shell")
wshShell.Run "C:\Documenti\nomeFile.mdb"
Set wshShell = Nothing
Ciao.
--
Sergio MAZZA


title: Usare Echo con funzione DLookUp()

author: Bruno - S95

text:
A97.
Nel pannello comandi principale ho tre caselle di testo, dove in ognuna è
presente il comando
=DLookUp("[Campo]";"Tabella") relativo all'intestazione basata su tre righe.
Tutto funziona correttamente, ma quando uso i pulsanti per acedere agli
altri pannelli di comando, schede o report, mi ritrovo un refresh dei tre
controlli.
Vorrei evitare questo refresh usando in qualche modo il metodo Echo
unitamente al =DLookUp("[Campo]";"Tabella").
Ho letto l'help e provato, ma non sono riuscito a cavarne nulla.
Qualquno può aiutarmi a risolvere il problema.
Grazie... Bruno


title: Usare Echo con funzione DLookUp()

author: ALESSANDRO Baraldi

text:
"Bruno - S95" <
bruno...@tin.it
> ha scritto nel messaggio
news:tiWCb.90804$AX1.3...@news1.tin.it...
> A97.
>
> Nel pannello comandi principale ho tre caselle di testo, dove in ognuna č
> presente il comando
> =DLookUp("[Campo]";"Tabella") relativo all'intestazione basata su tre
righe.
>
> Tutto funziona correttamente, ma quando uso i pulsanti per acedere agli
> altri pannelli di comando, schede o report, mi ritrovo un refresh dei tre
> controlli.
>
> Vorrei evitare questo refresh usando in qualche modo il metodo Echo
> unitamente al =DLookUp("[Campo]";"Tabella").
>
> Ho letto l'help e provato, ma non sono riuscito a cavarne nulla.
>
> Qualquno puň aiutarmi a risolvere il problema.
>
> Grazie... Bruno
Posta il tuo codice che vediamo di capire cosa non quadra, detta cosě č
troppo
generica.!
@Alex.


title: Usare Echo con funzione DLookUp()

author: namor

text:
"Bruno - S95" <
bruno...@tin.it
> ha scritto nel messaggio
news:tiWCb.90804$AX1.3...@news1.tin.it...

Usa tre caselle non associate (origine controllo vuota) e assegnagli il
testo sull'evento apertura della maschera con
Me.Casella1=Dlookup(...)
Me.Casella2=Dlookup(...)
Me.Casella3=Dlookup(...)
Namor


title: Usare Echo con funzione DLookUp()

text:
"namor" <
na...@DontSpamMe.inwind.it
> ha scritto nel messaggio
news:3S1Db.184871$vO5.7...@twister1.libero.it...

-------
Semplice ed efficace "Me.Casella1=Dlookup(...)"
Mille grazie Namor e anche ad Allessandro
Bruno


title: Usare Echo con funzione DLookUp()

author: fidirico

text:
"Bruno - S95" <
bruno...@tin.it
> ha scritto nel messaggio
news:tiWCb.90804$AX1.3...@news1.tin.it...

Credo la strada più semplice sia un'altra: non scrivere nulla nella proprietà
"Origine controllo"  ed assegnare da codice ai controlli il valore che ti interessa;
ad es.
Private Sub Form_Load()
    TuaCasella = DLookUp("Campo","Tabella")
End Sub
Il testo non cambierà più finchè non sarai tu a farlo sempre allo stesso modo. Se
quei controlli di testo ti servono solo per visualizzare un'intestazione, ti
consiglio di utilizzare al loro posto delle etichette impostandone opportunamente la
proprietà "Caption".
Ciao
Galliano.


title: Sottrazione tra due tabelle

author: Dax

text:
Avrei la necessità di fare una sottrazione tra due tabelle di
determinati record.
La struttura delle due tabelle è la seguente:
T1) ID | Nome | Crediti totali
T2) ID | Nome | Crediti dovuti
La T1 ha diverse persona con crediti totali, la T2 ha una serie di dati
con persone diverse con i record di quanti crediti hanno dato.
Voglio effettuare la sottrazione tra i valori della persona x della T1
con tutti i crediti che sono segnati nella T2.
Grazie a chi mi aiuta,
Dax


title: Sottrazione tra due tabelle

author: Gabriele Bertolucci

text:

Dunque, io utilizzerei due variabili dove vado a mettere i due membri della
sottrazione.
  Dim curT1 As Currency
  Dim curT2 As Currency
  curT1 = DLookup("[Crediti totali]", "T1", "Nome = '" & Me.controllochecontieneilnome
& "'")
  curT2 = DSum("[Crediti dovuti]", "T2", "Nome = '" & Me.controllochecontieneilnome
& "'")
HTH.
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it


title: Combo: condizione su dopo aggiornam.

author: GaRom

text:
Un cordiale saluto a tutti.
Sottopongo alla Vostra attenzione la seguente situazione che non rieco a
risolvere.
W98  A97
In una combo con la proprietà solo in elenco impostata a No vorrei immettere
una condizione sul dopo aggiornamento:
Se il valore selezionato è presente nell'elenco della combo => copiare il
valore di colonna 2 nel controllo IDver (dello stesso record);
Se il valore è nuovo => impostare nel controllo IDver un valore fisso
(esempio 100)
Scusate la non proprietà di linguaggio, ringrazio in anticipo chiunque vorrà
aiutarmi
Gabriele


title: Combo: condizione su dopo aggiornam.

text:
GaRom ha scritto:

Usa una query salvata come base per la combo. Poi sull'evento dopo
aggiornamento fai una ricerca con dlookup() per vedere se il valore
inserito c'è o no nella query.
Namor
--
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Combo: condizione su dopo aggiornam.

author: Antonio Biso

text:
"GaRom" <
garo...@virgilio.it
> ha scritto nel messaggio
news:m1KUc.118700$OR2.6...@news3.tin.it...
> Un cordiale saluto a tutti.
> Sottopongo alla Vostra attenzione la seguente situazione che non rieco a
> risolvere.
> W98  A97
> In una combo con la proprietą solo in elenco impostata a No vorrei
immettere
> una condizione sul dopo aggiornamento:
> Se il valore selezionato č presente nell'elenco della combo => copiare il
> valore di colonna 2 nel controllo IDver (dello stesso record);
> Se il valore č nuovo => impostare nel controllo IDver un valore fisso
> (esempio 100)
A parte che non hai detto che ne vuoi fare del valore inserito nella combo,
su dopo aggiornamento sciverai
If IsNull(combo.Column(2)) Then
        idver = 100
    Else
        idver = combo.column(2)
End If
Antonio


title: Combo: condizione su dopo aggiornam.

text:
"Antonio Biso" <ch...@NOSPAMetruria.net> ha scritto nel messaggio
news:oGLUc.44272$1V3.1...@twister2.libero.it...

Grazie comunque per l'interessamento e la risposta.
Ti chiedo ancora se con la soluzione da te proposta ( If
IsNull(combo.Column(2) ecc. ) posso digitare un nuovo valore nella combo ?
Grazie ancora
Saluti
  Gabriele


title: Combo: condizione su dopo aggiornam.

text:
"Antonio Biso" <ch...@NOSPAMetruria.net> ha scritto nel messaggio
news:oGLUc.44272$1V3.1...@twister2.libero.it...

 Scusate forse mi sono espresso male con il messaggio precedente.
Vorrei che quando digito un nuovo valore nella combo (quindi non presente in
elenco) mi impostasse nel controllo IDver il valore 100 altrimenti,
selezionando un valore in elenco, copiasse sempre nel controllo IDver il
valore di combo.column(2)
Grazie ancora
Saluti
  Gabriele


title: Combo: condizione su dopo aggiornam.

text:
Antonio Biso ha scritto:
> "GaRom" <
garo...@virgilio.it
> ha scritto nel messaggio
> news:m1KUc.118700$OR2.6...@news3.tin.it...
> > Un cordiale saluto a tutti.
> > Sottopongo alla Vostra attenzione la seguente situazione che non rieco a
> > risolvere.
> > W98  A97
> > In una combo con la proprietà solo in elenco impostata a No vorrei
> immettere
> > una condizione sul dopo aggiornamento:
> > Se il valore selezionato è presente nell'elenco della combo => copiare il
> > valore di colonna 2 nel controllo IDver (dello stesso record);
> > Se il valore è nuovo => impostare nel controllo IDver un valore fisso
> > (esempio 100)
> A parte che non hai detto che ne vuoi fare del valore inserito nella combo,
> su dopo aggiornamento sciverai
> If IsNull(combo.Column(2)) Then
>         idver = 100
>     Else
>         idver = combo.column(2)
> End If
> Antonio
L'avevo provato questo, ma non mi funzionava bene: finchè seleziono valori
dall'elenco tutto ok, la prima volta che uso un valore non in elenco la
proprietà column(1) mi restituisce ancora il valore column(1) dell'item
precedente. Solo la seconda volta (consecutiva) che uso un valore non in
elenco, column(1) è null. Verifica se lo fa anche a te please.



title: Combo: condizione su dopo aggiornam.

text:
"namor" <
do...@spam.me
> ha scritto nel messaggio
news:cg1hhc$699$1...@news.newsland.it...
> Antonio Biso ha scritto:
> > "GaRom" <
garo...@virgilio.it
> ha scritto nel messaggio
> > news:m1KUc.118700$OR2.6...@news3.tin.it...
>
> > If IsNull(combo.Column(2)) Then
> >         idver = 100
> >     Else
> >         idver = combo.column(2)
> > End If
> > Antonio
>
> L'avevo provato questo, ma non mi funzionava bene: finchè seleziono valori
> dall'elenco tutto ok, la prima volta che uso un valore non in elenco la
> proprietà column(1) mi restituisce ancora il valore column(1) dell'item
> precedente. Solo la seconda volta (consecutiva) che uso un valore non in
> elenco, column(1) è null. Verifica se lo fa anche a te please.
> Namor
A me non lo fa...
io ho messo due sole colonne e testo il valore della 1, cioè della seconda
Antonio


title: Combo: condizione su dopo aggiornam.

text:
"GaRom" <
garo...@virgilio.it
> ha scritto nel messaggio
news:MdNUc.154169$5D1.7...@news4.tin.it...
>
> "Antonio Biso" <ch...@NOSPAMetruria.net> ha scritto nel messaggio
> news:oGLUc.44272$1V3.1...@twister2.libero.it...
> > "GaRom" <
garo...@virgilio.it
> ha scritto nel messaggio
> > news:m1KUc.118700$OR2.6...@news3.tin.it...
> > > Un cordiale saluto a tutti.
> > > Sottopongo alla Vostra attenzione la seguente situazione che non rieco
a
> > > risolvere.
> > > W98  A97
> > > In una combo con la proprietà solo in elenco impostata a No vorrei
> > immettere
> > > una condizione sul dopo aggiornamento:
> > > Se il valore selezionato è presente nell'elenco della combo => copiare
> il
> > > valore di colonna 2 nel controllo IDver (dello stesso record);
> > > Se il valore è nuovo => impostare nel controllo IDver un valore fisso
> > > (esempio 100)
> >
> > A parte che non hai detto che ne vuoi fare del valore inserito nella
> combo,
> > su dopo aggiornamento sciverai
> > If IsNull(combo.Column(2)) Then
> >         idver = 100
> >     Else
> >         idver = combo.column(2)
> > End If
> >
> > Antonio
> >
>
>  Scusate forse mi sono espresso male con il messaggio precedente.
>
> Vorrei che quando digito un nuovo valore nella combo (quindi non presente
in
> elenco) mi impostasse nel controllo IDver il valore 100 altrimenti,
> selezionando un valore in elenco, copiasse sempre nel controllo IDver il
> valore di combo.column(2)
Non capisco: quello che ti ho scritto fa quello che dici
Antonio


title: Combo: condizione su dopo aggiornam.

text:
Antonio Biso ha scritto:
> > L'avevo provato questo, ma non mi funzionava bene: finchè seleziono valori
> > dall'elenco tutto ok, la prima volta che uso un valore non in elenco la
> > proprietà column(1) mi restituisce ancora il valore column(1) dell'item
> > precedente. Solo la seconda volta (consecutiva) che uso un valore non in
> > elenco, column(1) è null. Verifica se lo fa anche a te please.
> > Namor
> A me non lo fa...
> io ho messo due sole colonne e testo il valore della 1, cioè della seconda
> Antonio
Che strano, ho rifatto un'altra combo su un'altra maschera e lo rifà.
Access 2000 SP3 (9.0.6926)
Combo:
Numero colonne 2 (testo: cognome, nome). Colonna associata 1. Solo in
elenco No. Origine dati stringa SQL:
  SELECT anagrafica.COGNOME, anagrafica.NOME
  FROM anagrafica ORDER BY anagrafica.COGNOME;
Private Sub CasellaCombinata4_AfterUpdate()
    If IsNull(Me.CasellaCombinata4.Column(1)) Then
        MsgBox "MANCA"
    Else
        MsgBox Me.CasellaCombinata4.Column(1)
    End If
End Sub
Steps:
1. Apro la maschera
2. seleziono un elemento (cognome), mi msgboxxa il nome corrispondente
3. seleziono un altro elemento, mi msgboxxa il nome corrispondente
4. inserisco una voce non in elenco e mi dà il nome di cui alla 3.
5. inserisco un'altra voce non in elenco e mi dà "MANCA"
6. seleziono un elemento e mi dà il nome corrispondente
Qualcun altro riesce a riprodurlo?



title: Combo: condizione su dopo aggiornam.

text:
"namor" <
do...@spam.me
> ha scritto nel messaggio
news:cg1qtp$atn$1...@news.newsland.it...

E' identico a quello che faccio io, pure i msgbox
L'unica differenza è che ho usato A97.
Mo' provo col 2000
Antonio


title: DA ACCESS A WEB

author: Fabrizio

text:
Ciao ragazzi mi chiamo Fabrizio e volevo porvi una domanda. Ho sentito dire
che si possono trasformare le applicazioni create in Access in applicazioni
web. Sapete qualcosa a proposito? Premetto che non mi ricordo se si parlava
di Access 2000 o XP.
Ciao e grazie a tutti


title: DA ACCESS A WEB

author: Bonaldi Stefano

text:
"Fabrizio" <
fabr...@email.it
> wrote in message
news:9f4ui2$s3n$2...@fe2.cs.interbusiness.it...

Penso si trattasse di XP
Ciao Stefano


title: campo logico

text:
Ho una tabella (tab1) con "nome", "cognome", "data" e un campo logico
"log" si/no.
Di default tutti i record sono a no.
Ho una query (query1) che interroga la tab1 estraendo tutti i record <=
alla data ora del momento in cui viene eseguita.
Vorrei che ad ogni esecuzione della query, il campo "log" cambiasse da
no a si.
Come posso fare?
Grazie a tutti.
Sigar.


title: campo logico

author: Luciano (DOC)

text:
si...@soulnet.it
 ha scritto nel messaggio <
3ADDA30C...@soulnet.it
>...
>Vorrei che ad ogni esecuzione della query, il campo "log" cambiasse da
>no a si.
>
>Come posso fare?
Con una query di aggiornamento?
Saluti.
Luciano
(DOC)


title: campo logico

text:
"Luciano (DOC)" wrote:

Ok, ci avevo pensato anch'io, pero' il mio problema sta nel fatto che la query,
non la eseguo manualmente ma bensi' aprendo una maschera o collegandomi da una
pagina asp e mi pare di ave capito (provando) che non si possono creare
maschere su query di aggiornamento.
Saluti.
Silvy.


title: campo logico

text:
<
si...@soulnet.it
> wrote in message news:3ADEB057...@soulnet.it...
> Ok, ci avevo pensato anch'io, pero' il mio problema sta nel fatto che la
query,
> non la eseguo manualmente ma bensi' aprendo una maschera o collegandomi da
una
> pagina asp e mi pare di ave capito (provando) che non si possono creare
> maschere su query di aggiornamento.
docmd.openquery ("tuaquerydiaggiornamento")
Saluti.
Luciano
(DOC)


title: Problema con i filtri

author: black

text:
Salve a tutti,
chiedo cortesemente il vostro aiuto.
Il mio problema:
ho creato un filtro in una maschera
 Private Sub filra()
 Me.Filter = "ore = 2000 "
 Me.FilterOn = True
 End Sub
tutto funziona perfettamente.
Creo una casella di testo orex per poter inserire il valore da ricercare.
Sostituisco il codice:
 Private Sub filra()
 Me.Filter = "ore = '" & orex & "'"
 Me.FilterOn = True
 End Sub
il risultato è il messaggio di errore "operazione precedente annullata"
ho anche provato
 Me.Filter = "ore = " & Chr$(34) & orex & Chr$(34)
ma il risultato è sempre il medesimo antipatico errore.
dove sbaglio?
Grazie e buona giornata.


title: Problema con i filtri

text:

Sbagli ad indicare la condizione;
hai scritto:
Me.Filter = "ore = 2000 "
Me.FilterOn = True
e dici che funziona;
poi:
Me.Filter = "ore = '" & orex & "'"
Me.FilterOn = True
e ancora:
Me.Filter = "ore = " & Chr$(34) & orex & Chr$(34)
e non funziona.
Se funziona la prima vuol dire che il campo "ore" è di tipo numerico e quindi devi indicare i valori, nella condizione, come
numerici:
es.
Me.Filter = "ore = " & orex
Me.FilterOn = True
Cioè senza apostrofi o doppie virgolette...
Ciao.
--
Sergio MAZZA


title: Problema con i filtri

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:cjdpmk$8d5$1...@canarie.caspur.it...

Problema risolto, ti ringrazio.


title: Si può usare un progr su un PC senza Access?

author: Edison

text:
Esiste un qualche programma che mi consente di usare un piccolo programma
fatto da me con Access su un PC che non ha access istallato?
Magari anche una versione Trial o ShareWere?
O sono costretto a comprare interamente Access anche li?
Grazie.


author: Sib

text:
"Edison" scrive

Sito comune, Faqqone
Sib


author: MikyArt

text:
Esistono dei viewer scaricabili gratuitamente dal sito della Microsoft. Essi
sono identici agli originali ma molto più leggeri e di piccole dimensione
avendo solo la funzionalità di visualizzatori.
Sul sito comune troverai altri dettagli.
Ciao, MikyArt.
Edison <
ne...@flashamail.com
> wrote in message
8jnvbb$jui$1...@lacerta.tiscalinet.it...
> Esiste un qualche programma che mi consente di usare un piccolo programma
> fatto da me con Access su un PC che non ha access istallato?
> Magari anche una versione Trial o ShareWere?
> O sono costretto a comprare interamente Access anche li?
>
> Grazie.
>
>


author: lbo dal portatile

text:
>Esiste un qualche programma che mi consente di usare un piccolo programma
>fatto da me con Access su un PC che non ha access istallato?
esisteva ma l'hanno tolto dal commercio per i troppi bug.
altre info sul faqqone del sito comune.
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/


text:
Esistono dei viewer scaricabili gratuitamente dal sito della Microsoft. Essi
sono identici agli originali ma molto più leggeri e di piccole dimensione
avendo solo la funzionalità di visualizzatori.
Sul sito comune troverai altri dettagli.
Ciao, MikyArt.
Edison <
ne...@flashamail.com
> wrote in message
8jnvbb$jui$1...@lacerta.tiscalinet.it...
> Esiste un qualche programma che mi consente di usare un piccolo programma
> fatto da me con Access su un PC che non ha access istallato?



text:
>Esistono dei viewer scaricabili gratuitamente dal sito della Microsoft. Essi
>sono identici agli originali ma molto più leggeri e di piccole dimensione
>avendo solo la funzionalità di visualizzatori.
sei sicuro che esistano per access?  io credo di no... :-)



author: ElioP

text:
Arrivato caldo caldo stamattina: e' disponibile la
-- MICROSOFT OFFICE 2000 SERVICE RELEASE 1
<
http://www.microsoft.com/italy/office/details/sr1.htm
>
Microsoft Office 2000 Service Release 1 (SR-1) in lingua italiana è
ora disponibile con i più recenti aggiornamenti del prodotto Office
2000.
L'aggiornamento è scaricabile dal sito e dal 10 luglio potrà essere
ordinato anche su CD.
Per quanto riguarda la versione Developer:
http://msdn.microsoft.com/officedev/sr/sr1/default.asp
Office 2000 Developer Service Release 1
Developer Tools SR-1
This provides the latest updates to Microsoft Office 2000 Developer
components including VBA Tools and the Workflow Designer for SQL
Server (formerly known as Access Workflow Designer for SQL Server).
Access Run Time SR-1
This new version of the Access Run Time is compliant with the latest
version of Office 2000 Developer.

Alternative Version of the Access Run Time SR-1
The alternative version of the Access Run Time reduces the disk space
required to 70MB, compared with 150MB for the complete Access Run Time
files. Note: You must be a licensed user of Office 2000 Developer and
your end users must have Internet Explorer  version 3.01 or later
already installed to use this version of the Access Run Time.
Office Developer 2000 SR-1 is available free of charge to all licensed
users of registered Microsoft Office 2000 Developer product,
Che sia finalmente la volta buona che funziona ?
Ciao. ElioP.


title: Barra degli strumenti personalizzata

author: IVAN

text:
Ciao! In un progetto in Access ho creato una barra degli strumenti
personalizzata. Con l'andare del tempo, a forza di compilare il progetto,
ogni volta che vado a lanciare il programma mi ci impiega una vita ad
aprirsi ... o meglio ... l'ultima cosa che appare dopo un po' č proprio la
mia barra degli strumenti, ma finchč non appare non posso fare nulla.
Si puň fare qualcosa per velocizzare l'apertura del programma?
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Barra degli strumenti personalizzata

author: Alessandro Baraldi

text:
IVAN ha scritto:
> Ciao! In un progetto in Access ho creato una barra degli strumenti
> personalizzata. Con l'andare del tempo, a forza di compilare il progetto,
> ogni volta che vado a lanciare il programma mi ci impiega una vita ad
> aprirsi ... o meglio ... l'ultima cosa che appare dopo un po' è proprio la
> mia barra degli strumenti, ma finchè non appare non posso fare nulla.
>
> Si può fare qualcosa per velocizzare l'apertura del programma?
Prova a reimportare tutto in un Applicativo nuovo, fai attenzione a
selezionare anche
le barre strumenti.
@Alex


title: problemi apertura report utilizzando filtro maschera

author: Nicolas

text:
ho una maschera e con un menu contestuale che compare con tasto destro del
mouse visualizzo
un menu in cui posso applicare un filtro in base a selezione e poi apro un
report con tale filtro
docmd.openreport "nomereport",,,,me.filter
il fatto č che se rimuovo il filtro in me.filter rimane comunque l'ultimo
filtro impostato e quindi
non mi visualizza tutti i record ma nuovamente quelli filtrati
qualcuno sa perchč?


author: Sergio MAZZA

text:
"Nicolas" <
nico...@libero.it
> ha scritto nel messaggio news:43050d9c$0$8484$5fc...@news.tiscali.it...

Prima di rimuoverlo imposti a stringa nulla il filtro:
es.
Me.Filter = ""
Me.FilterOn = false
Ciao.
--
Sergio MAZZA


text:
"Sergio MAZZA" <
sergi...@tiscali.it
> wrote in message
news:de425c$3tf$
1...@area.cu.mi.it
[CUT]
> Prima di rimuoverlo imposti a stringa nulla il filtro:
> es.
> Me.Filter = ""
> Me.FilterOn = false
>
> Ciao.
Al contrario altrimenti non funziona.
Prima setti FilterOn=False, poi Filter=vbNullstring
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio news:d4e3beb04b1820c92b...@mygate.mailgate.org...
>
>
> Al contrario altrimenti non funziona.
> Prima setti FilterOn=False, poi Filter=vbNullstring
>
> Ciao
> @Alex
>
Mhmm...
Ho creato una form, ci ho associato una tabella e con un interruttore ho fatto questa prova:
MsgBox "prima: " & Me.Filter
Select Case Me!Interruttore2
    Case -1
        Me.Filter = "testo='sergio'"
        Me.FilterOn = True
    Case 0
        Me.Filter = ""
        Me.FilterOn = False
    Case Else
End Select
MsgBox "dopo: " & Me.Filter
E sembra funzionare; ho fatto come dici tu e funziona lo stesso... E' il classico caso dell'inversione dell'ordine dei fattori... il
campo sempre arato è?
Ciao.
--
Sergio MAZZA


text:
"Sergio MAZZA" <
sergi...@tiscali.it
> wrote in message
news:de45t3$72q$
1...@area.cu.mi.it
[CUT]
> E sembra funzionare; ho fatto come dici tu e funziona lo stesso... E' il classico caso dell'inversione dell'ordine dei fattori... il
> campo sempre arato è?
>
> Ciao.
Ciao Sergio.
La mia osservazione deriva da diversi test e problemi rilevati.
Per esperienza ho notato che la rimozione del filtro con A97
mi ha sempre dato problemi se non effettuata nell'ordine
che suggerivo.
A livello logico concordo con te che non c'è motivo,
e benvenga il tuo test, ma ho avuto troppe noie per
non evidenziarvi la cosa.



text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio news:05dfdde60647fa580c...@mygate.mailgate.org...
>
> Ciao Sergio.
> La mia osservazione deriva da diversi test e problemi rilevati.
> Per esperienza ho notato che la rimozione del filtro con A97
> mi ha sempre dato problemi se non effettuata nell'ordine
> che suggerivo.
> A livello logico concordo con te che non c'è motivo,
> e benvenga il tuo test, ma ho avuto troppe noie per
> non evidenziarvi la cosa.
>
> Ciao
> @Alex
Sì, anch'io ho trovato "stranezze" e avevo notato che spostando l'annullamento del filter, prima o dopo non ricordo, si risolveva.
In effetti la prova che ho fatto è con XP non col '97 che di solito uso; ora ci butto l'occhio e riferisco...
Ciao.
--
Sergio MAZZA


text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio news:05dfdde60647fa580c...@mygate.mailgate.org...
>
> Ciao Sergio.
> La mia osservazione deriva da diversi test e problemi rilevati.
> Per esperienza ho notato che la rimozione del filtro con A97
> mi ha sempre dato problemi se non effettuata nell'ordine
> che suggerivo.
Ho fatto la prova anche sul '97 e la sequenza (per azzerarlo):
Me.Filter = ""
Me.FilterOn = false
non lascia traccia nel Me.Filter.
> A livello logico concordo con te che non c'č motivo,
> e benvenga il tuo test, ma ho avuto troppe noie per
> non evidenziarvi la cosa.
Evidenzia! Evidenzia pure! Piů teste ci sono č meglio eh, no?
> Ciao
> @Alex
Probabilmente ho imbroccato la via giusta; una volta tanto...
Ciao.
--
Sergio MAZZA


text:
> Ho fatto la prova anche sul '97 e la sequenza (per azzerarlo):
> Me.Filter = ""
> Me.FilterOn = false
>
> non lascia traccia nel Me.Filter.
>
>> A livello logico concordo con te che non c'è motivo,
>> e benvenga il tuo test, ma ho avuto troppe noie per
>> non evidenziarvi la cosa.
>
> Evidenzia! Evidenzia pure! Più teste ci sono è meglio eh, no?
>
>> Ciao
>> @Alex
>
c'è un fatto che io rimuovo il filtro su clik "rimuovi filtro selezione" dal
menu contenstuale che compare con tasto destro del mouse come eseguo il
codice
Me.Filter = ""
Me.FilterOn = false
su click di tale voce?


text:
"Nicolas" <
nico...@libero.it
> ha scritto nel messaggio news:4305aae2$0$8483$5fc...@news.tiscali.it...
>
> c'č un fatto che io rimuovo il filtro su clik "rimuovi filtro selezione" dal menu contenstuale che compare con tasto destro del
> mouse come eseguo il codice
> Me.Filter = ""
> Me.FilterOn = false
>
> su click di tale voce?
Alzo bandiera bianca; non utilizzo menů contestuali.
Comunque sono due i casi (almeno spero), o sei sull'oggetto (come focus) e quindi puoi fare direttamente riferimento allo stesso
cosě:
Me.Filter...
Oppure devi indicare il "percorso" per arrivarci:
Forms!nomeForms.Form.Filter=...
Ciao.
--
Sergio MAZZA


text:
> Alzo bandiera bianca; non utilizzo menù contestuali.
> Comunque sono due i casi (almeno spero), o sei sull'oggetto (come focus) e
> quindi puoi fare direttamente riferimento allo stesso così:
> Me.Filter...
>
> Oppure devi indicare il "percorso" per arrivarci:
> Forms!nomeForms.Form.Filter=...
>
> Ciao.
>
> --
> Sergio MAZZA
ok però credo ci sia un modo per catturare l'evento click di un menu
contenstuale, almeno spero indagherò
grazie lo stesso.


text:
"Nicolas" <
nico...@libero.it
> ha scritto nel messaggio news:4305b419$0$8480$5fc...@news.tiscali.it...
>
> ok però credo ci sia un modo per catturare l'evento click di un menu contenstuale, almeno spero indagherò
> grazie lo stesso.
Non mi pare sia ok; quando tu scrivi: "...c'è un fatto che io rimuovo il filtro su clik "rimuovi filtro selezione"...", io capisco
che già sai come gestire l'evento "su click"...
Ciao.
--
Sergio MAZZA


text:
"Nicolas" <
nico...@libero.it
> wrote in message
news:4305b419$0$8480$
5fc...@news.tiscali.it
[CUT]
> ok però credo ci sia un modo per catturare l'evento click di un menu
> contenstuale, almeno spero indagherò
> grazie lo stesso.
Sicuramente ci sarà, se lo trovi scriviamo alla MS.
Lascia perdere i Menù standard, creati una Barra Menù
personalizzata dalla quale puoi gestirti tutto.



title: creare backup da codice

author: Davide Scilabra

text:
Mi chiedevo se fosse possibile creare SEMPLICEMENTE un backup con un
pulsante (senza che l'operatore sia costretto a fare File-->Backup
database PERCHE' NON LO FARA' MAI, ma con la stessa semplicità)
Private Sub Backup1_Click()
    CommandBars("Menu Bar"). _
    Controls("File"). _
    Controls("Backup Database..."). _
     accDoDefalutAction
End Sub
scopiazzata da
mvps.org
 incrociando le dita per le modifiche
http://www.mvps.org/access/general/gen0041.htm
Errore metodo non supportato dall'oggetto
Qual è la sintassi corretta?


title: creare backup da codice

text:
La sintassi è corretta, solo che se non inserisci i riferimenti alle
librerie di Office l'Oggetto CommandBar non è gestito.
Ciao
@Alex


title: Testo che lampeggia

author: Mario Lotti

text:
Avrei la necessità di far lampeggiare il testo PagatoTxt in questa routine
potreste aiutarmi?
Private Sub Form_Current()
 If Me![ControlloPagato] < 1 Then
         Me!PagatoTxt.Visible = True
    Else
        Me!PagatoTxt.Visible = False
    End If
End Sub
Grazie


title: Testo che lampeggia

author: Gianluca

text:
Cosě, a occhio, non potresti mettere l'if anche nell'evento timer ed
alternare due etichette con la stessa scritta in due colori diversi,
rendendo alternativamente invisibile quella in primo piano?
Ma poi, alla fine, non basta solo che la scritta sia evidente, anche se non
lampeggia?


title: Testo che lampeggia

author: Carlo Costarella

text:
"Mario Lotti" <
fars...@tin.it
> ha scritto nel messaggio
news:AqqM8.20140$5i1.7...@news2.tin.it...

Anziche su form current, su form Timer e impostando a 500 o meno il timer
interval.
Private Sub Form_Timer()
    If Me![ControlloPagato] < 1 Then
        If Me.PagatoTxt.BackColor = 255 Then
        Me.PagatoTxt.BackColor = 0
        Else
        Me.PagatoTxt.BackColor = 255
        End If
    End If
End Sub
Ovviamente puoi sbizzarrirti con i colori
Ciao, Carlo


title: help su runtime di XP developer

author: alessio

text:
Ciao a tutti,
se faccio il pacchetto di installazione usando office xp dev tutto funziona
e quando apro il db messo sul pacchetto non ci sono problemi.
Se poi però provo ad aprire un altro db (ad esempio in versione acc200)
perchè sul pc ho installato office 2000, mi succede che li si apre usando il
runtime di xp.... c'è modo di dire a quel faccione di runtime di non aprire
tutti i db ma solo quello che ho distribuito?
Ciao e grazie,
Alessio


title: help su runtime di XP developer

author: Roberto da casa

text:
"alessio" <
axe...@libero.it
> ha scritto nel messaggio
news:b3vssj$71i$1...@newsfeed.cineca.it...

Non vorrei sbagliare ma ormai dovrai prima aprire Access 2000 e poi aprire
da esso il file mdb o mde.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: help su runtime di XP developer

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:AhL8a.173662$ZE.51...@twister2.libero.it...
>
> "alessio" <
axe...@libero.it
> ha scritto nel messaggio
> news:b3vssj$71i$1...@newsfeed.cineca.it...
> > Ciao a tutti,
> >
> > se faccio il pacchetto di installazione usando office xp dev tutto
> funziona
> > e quando apro il db messo sul pacchetto non ci sono problemi.
> > Se poi però provo ad aprire un altro db (ad esempio in versione acc200)
> > perchè sul pc ho installato office 2000, mi succede che li si apre
usando
> il
> > runtime di xp.... c'è modo di dire a quel faccione di runtime di non
> aprire
> > tutti i db ma solo quello che ho distribuito?
> >
> > Ciao e grazie,
> > Alessio
>
> Non vorrei sbagliare ma ormai dovrai prima aprire Access 2000 e poi aprire
> da esso il file mdb o mde.
>
> --
> Roberto
>
E si! Mi capita proprio questo... Speravo si potesse evitare...
Visto che lo devo distribuire a circa 300 persone con cultura informatica da
buona a nulla.... potrebbe essere un problema ....
Ciao e grazie,
Ale


title: help su runtime di XP developer

author: Massimiliano

text:
"alessio"
> E si! Mi capita proprio questo... Speravo si potesse evitare...
>
> Visto che lo devo distribuire a circa 300 persone con cultura informatica
da
> buona a nulla.... potrebbe essere un problema ....
Io e i miei soci ci siamo posti gli stessi problemi tre anni fa col 2000.
Tuttavia all'atto pratico capita molto di rado Access venga utilizzato
dall'utenza aziendale, quindi il problema non si pone.
Diversamente puoi creare sul Desk una stringa di connessione che punta
all'eseguibile di Access desiderato per evitare che debbano preventivamente
aprire il programma:
"C:\Programmi\Office\msaccess.exe" <Percorso .mdb>
Ciao.


title: Trasferimento Dati

author: Paolo Agagiů

text:
Ciao a tutti,
ho creato un db contente anagrafica di molti clienti (circa 12.000) questa
anagrafica deve essere, una volta l'anno esportata come file di testo e
consegnata presso un ufficio centrale, qui il problema:
come faccio a dirgli che quando il dischetto da 1.4 Mb č pieno deve
richederne un altro e continuare a esportare sul secondo .. e cosě via fino
alla fine ?
(Non sono masochista ma devo esportare necessariamente su dischetti e non
posso usare zip)
Grazie in anticipo.
Paolo


title: Trasferimento Dati

author: Lorenzo Coronati

text:
Scrisse "Paolo Agagiů" <
aga...@tiscalinet.it
>:
>ho creato un db contente anagrafica di molti clienti (circa 12.000) questa
>anagrafica deve essere, una volta l'anno esportata come file di testo e
>consegnata presso un ufficio centrale, qui il problema:
>come faccio a dirgli che quando il dischetto da 1.4 Mb č pieno deve
>richederne un altro e continuare a esportare sul secondo .. e cosě via fino
>alla fine ?
Se il file esportato e' a larghezza fissa dovresti poter
sapere quanti record ci stanno in 1.4M.
A codice ti gestisci la generazione di n file che poi copi
uno alla volta sui floppy.
Bai
--
Lorenzo Coronati
--
<<Nessuno sa che questa affermazione e' vera>>
(John D. Barrow)
--


title: Trasferimento Dati

text:
Lorenzo Coronati <
lore...@tin.ton.tan.it
> wrote in message
3923b0d1...@news.libero.it...

Il file č a larghezza fissa ma non ho idea di come potergli dire quanti
inviarne per volta.


title: Trasferimento Dati

author: Gustavo Bartolini

text:
Paolo Agagiů <
aga...@tiscalinet.it
> wrote in message 8g1eh7> > Se il file
esportato e' a larghezza fissa dovresti poter
> > sapere quanti record ci stanno in 1.4M.
> > A codice ti gestisci la generazione di n file che poi copi
> > uno alla volta sui floppy.
> > Bai
> >
> > --
> > Lorenzo Coronati
> > --
> > <<Nessuno sa che questa affermazione e' vera>>
> > (John D. Barrow)
> > --
> Il file č a larghezza fissa ma non ho idea di come potergli dire quanti
> inviarne per volta.
>
Ma come lo crei il file ?


title: Trasferimento Dati

text:
Scrisse "Paolo Agagiů" <
aga...@tiscalinet.it
>:
>Il file č a larghezza fissa ma non ho idea di come potergli dire quanti
>inviarne per volta.
Beh, ci sono <> modi
Uno potrebbe essere, senza codice:
1) crei una tab temporanea
2) select top n ... into t
3) esporti t
4) delete * from tab inner join t on
tab.id
 =
t.id
riprendi da 2 finche' ci sono record



title: Esegui applicazione

author: Maurizio VOLPE

text:
Un caro saluto a Voi tutti e grazie a chi ha creato e mantiene questo
"newsgroup" è la prima volta che richiedo un aiuto anche se più volte ho
letto e trovato soluzioni ai miei problemi. Per questo ultimo problema che
mi si è presentato ho trovato una soluzione parziale da parte di Carlo ma
oltre a non riuscire a farla funzionare correttamente non credo che sia la
soluzione che sto cercando. Utilizzo Access97 su piattaforma Win98
ver.4.10.2222 A, il mio problema mi sembra molto banale sul piano della
logica ma non sono riuscito a trovare la soluzione ed è questo:
ho applicazioni diverse da me realizzate, ognuna svolge un proprio ruolo e
di esse è stata creata la copia MDE, il mio nuovo obiettivo è quello di
creare un nuova applicazione fatta di una sola maskera menù che attraverso
tasti, lanci le varie applicazioni. A scanso di equivoci preciso che non
voglio creare una mega applicazione che li contenga tutte. Ma vorrei
continuare ad avere applicazioni separate, con maskere proprie e tabelle
proprie, semplicemente lanciate da un Menù generale, unico punto d'ingresso
a tutte le applicazioni.
In questo momento ho fatto due prove:
a) ho creato una macro collegata ad un pulsante che contiene l'istruzione
"Esegui applicazione", risultato: "Impossibile richiamare l'applicazione
utilizzando l'Azione "Esegui applicazione" (credo che sia perché non è un
*.exe infatti se al percorso sostituisco "Calc.exe" funziona benissimo)
b) seguendo le istruzioni di Carlo (e della guida in linea) ho inserito una
delle mie applicazioni nei riferimenti, risultato: non sono riuscito a
vedere le maskere dell'applicazione (forse ho commesso qualche errore) ma mi
sembra che la logica di base è di lanciare la maskera "non compilata" cioè
non in formato MDE, come dicevo prima l'ottica mi sembra di una unica grande
applicazione.
Qualcuno ha già affrontato questo problema e può darmi qualche utile
consiglio?
p.s. nell'attesa farò una prova con l'istruzione "doppio Click" sbirciando
su VB.
Grazie in anticipo a chi mi leggerà.
per contatti
____________________________________________________________________________
________________________
Maurizio VOLPE
tel. casa 011 / 38 57 631
tel. mobile 338 / 21 03 184
E-Mail
vol.ma...@tiscali.it


title: Esegui applicazione

author: MA

text:
"Maurizio VOLPE" <
vol.ma...@tiscali.it
> ha
scritto nel messaggio
news:c491s9$diu$1...@lacerta.tiscalinet.it...

HyperlInkAddress
MAssimiliano


title: modificare una query per access

author: kat

text:
ciao a tutti, vi ringrazio anticipatamente per la pazienza. Purtroppo
le mie conoscenze di access sono molto.... tristi e mi trovo a portare
questa query che gira su sql su access ma non riesco potete aiutarmi
    SELECT     tbFullPrevMovForID.MachineID,
tbFullPrevMovForID.DateMov, tbFullPrevMovForID.WarehouseIn,
        tbFullPrevMovForID.WarehouseOn,
                      tbFullPrevMovForID.CodCustomer,
tbFullNextMovForID.DateMov AS DateMov1,
       tbFullNextMovForID.WarehouseIn AS WarehouseIn1,
                      tbFullNextMovForID.WarehouseOn AS WarehouseOn1,
       tbFullNextMovForID.CodCustomer AS CodCustomer1,
tbMachineID.SerialNumber,
                      tbMachineID.CodModel, tbModel.ModelDescription,
tbFullNextMovForID.DDTNumber,
       tbContract.DateInit, tbWarehouse_1.WareHouseDesc AS ENTRA,
                      tbWarehouse.WareHouseDesc AS Origine,
tbCustomers.CustomerName, tbContract.Contract
       FROM         tbMovForID tbFullNextMovForID INNER JOIN
                      tbWarehouse tbWarehouse_1 ON
tbFullNextMovForID.CodCompany = tbWarehouse_1.CodCompany AND
                      tbFullNextMovForID.WarehouseIn =
tbWarehouse_1.CodWarehouse RIGHT OUTER JOIN
                          (SELECT     tbMovForID.CodCompany,
tbMovForID.MachineID, MIN(tbMovForID.DateMov) AS DateNextMov
                            FROM          tbMovForID
                            WHERE      (tbMovForID.DateMov <=
'05/30/2006')
                            GROUP BY tbMovForID.CodCompany,
tbMovForID.MachineID) tbNextMovForID ON
                      tbFullNextMovForID.DateMov =
tbNextMovForID.DateNextMov AND tbFullNextMovForID.MachineID =
tbNextMovForID.MachineID AND
                      tbFullNextMovForID.CodCompany =
tbNextMovForID.CodCompany RIGHT OUTER JOIN
                          (SELECT     tbMovForID.CodCompany,
tbMovForID.MachineID, MAX(tbMovForID.DateMov) AS DatePrevMov
                            FROM          tbMovForID
                            WHERE      (tbMovForID.DateMov >=
'05/30/2006')
                            GROUP BY tbMovForID.CodCompany,
tbMovForID.MachineID) tbPrevMovForID INNER JOIN
                      tbMovForID tbFullPrevMovForID ON
tbPrevMovForID.CodCompany = tbFullPrevMovForID.CodCompany AND
                      tbPrevMovForID.MachineID =
tbFullPrevMovForID.MachineID AND tbPrevMovForID.DatePrevMov =
tbFullPrevMovForID.DateMov INNER JOIN
                      tbMachineID ON tbFullPrevMovForID.CodCompany =
tbMachineID.CodCompany AND
                      tbFullPrevMovForID.MachineID =
tbMachineID.MachineID INNER JOIN
                      tbModel ON tbMachineID.CodCompany =
tbModel.CodCompany AND tbMachineID.CodModel = tbModel.CodModel INNER
JOIN
                      tbWarehouse ON tbMachineID.CodCompany =
tbWarehouse.CodCompany AND tbMachineID.CodWarehouse =
tbWarehouse.CodWarehouse ON
                      tbNextMovForID.CodCompany =
tbPrevMovForID.CodCompany AND tbNextMovForID.MachineID =
tbPrevMovForID.MachineID AND
                      tbFullNextMovForID.CodCompany =
tbFullPrevMovForID.CodCompany AND
                      tbFullNextMovForID.MachineID =
tbFullPrevMovForID.MachineID LEFT OUTER JOIN
                      tbCustomers INNER JOIN
                      tbContract ON tbCustomers.CodCompany =
tbContract.CodCompany AND tbCustomers.CodCustomer =
tbContract.CodCustomers ON
                      tbFullPrevMovForID.CodCompany =
tbContract.CodCompany AND tbFullPrevMovForID.Reference =
tbContract.Contract
            ORDER BY tbFullPrevMovForID.MachineID
ciao, kat


title: Feedback prestazioni Access 2007

author: Oscar Manfredini

text:
http://blogs.msdn.com/access/archive/2009/01/09/feedback-about-access-2007-performance.aspx
Chi ha segnalazioni da fare, le faccia  ;-)
Ciao a tutti...


title: Da maschera ricerca codice in tabella

author: lucio

text:
Sto cercando di creare un programma in access che mi tenga il controllo i
movimenti di tutti gli articoli situati in un magazzino,ho creato la tabella
dove verranno inseriti i dati delle varie transazioni (carichi e scarichi),
pero adesso da una maschera vorrei che in un punto si possa inserire il codice
dell'articolo e tramite query,access mi faccia vedere tutti i movimenti che
questo ha fatto.
I campi della tabella sono i seguenti:
    DATA TRANSAZIONE
    ORA TRANSAZIONE
    ITEM_ID  CODICE ARTICOLO
    QUANTITA  QUANTITA SCARICO/CARICO
    UBICAZIONE  NUMERO SCAFALE DOVE L'ARTICOLO E' UBICATO
So che per voi dovrebbe essere una stupidata a risolvere il problema,ma vi
posso assicurare che per un principiante come me e' gia tanto avere creato
la tabella e una maschera.
Un'ultima cosa,vorrei fare i complimenti a Roberto dal portatile, sempre pronto
ad aiutare quasi tutti.
Ciao.
--
Posted from
host66-158.lan-ls.imaginet.fr
 [195.68.66.158]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Da maschera ricerca codice in tabella


title: Da maschera ricerca codice in tabella

author: Roberto dal portatile

text:
"lucio" <
aer...@tin.it
> ha scritto nel messaggio
news:53b679448ffed8fa688...@mygate.mailgate.org...
> Sto cercando di creare un programma in access che mi tenga il controllo i
> movimenti di tutti gli articoli situati in un magazzino,ho creato la
tabella
> dove verranno inseriti i dati delle varie transazioni (carichi e
scarichi),
> pero adesso da una maschera vorrei che in un punto si possa inserire il
codice
> dell'articolo e tramite query,access mi faccia vedere tutti i movimenti
che
> questo ha fatto.
>
> I campi della tabella sono i seguenti:
>
>     DATA TRANSAZIONE
>     ORA TRANSAZIONE
>     ITEM_ID  CODICE ARTICOLO
>     QUANTITA  QUANTITA SCARICO/CARICO
>     UBICAZIONE  NUMERO SCAFALE DOVE L'ARTICOLO E' UBICATO
>
> So che per voi dovrebbe essere una stupidata a risolvere il problema,ma vi
> posso assicurare che per un principiante come me e' gia tanto avere creato
> la tabella e una maschera.
[CUT]
>
>
> Ciao.
>
Ci sono diversw soluzioni al tuo problema.
Fossi in te comincerei a leggere sull'help ricercando Query di selezione e
quanto serve ad impostare i criteri di una query di selezione.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Ragazzi tra i 17 e i 24! Futuro nel web!

author: Panda

text:
    Ciao!
.....sto cercando ragazzi tra i 17 e i 24 che come me coltivino la passione
per il www, e sperino semmai in futuro di costruire una fortuna grazie ad
internet!
...se vuoi saperne di +, o ti destreggi con l'html, javascript,
vbscript, cgi ed altro, mandami un'e-mail!...si potrebbe iniziare a
costruire qualcosa!
orsett...@yahoo.com


title: Istruzioni in inglese

author: Claudio Debortoli

text:
Salve.
Ho scritto un'applicazione in cui sono contenuti i seguenti metodi:
Application.SetOption "Conferma query di comando", False
Application.SetOption "Esegui correzione automatica nome", False
Ora, nella mia azienda ci sono versioni di Access in lingue diverse, e i
suddetti metodi funzionano solo con le versioni in italiano.
Mi servirebbe l'esatta grafia in inglese di "Conferma query di comando" e
"Esegui correzione automatica nome", che, a quanto leggo sul manuale,
funzionano indipendentemente dalla lingua.
Sono, tanto per ricordare velocemente, due opzioni che si trovano nella
scheda Modifica/Trova (la prima) e nella scheda Generale (la seconda) del
sottomenu Opzioni del menu Strumenti.
Un grazie a chi mi potrŕ aiutare.
Claudio Debortoli


title: Istruzioni in inglese

author: Karl Donaubauer

text:
Claudio Debortoli ha scritto:
> ...Mi servirebbe l'esatta grafia in inglese di "Conferma query di
> comando" e "Esegui correzione automatica nome"...
"Confirm Action Queries"
"Perform Name AutoCorrect"
--
HTH
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


title: Istruzioni in inglese

text:
"Claudio Debortoli" <
claudio....@tiscali.it
> ha scritto nel messaggio
news:bvma9r$2rf$1...@lacerta.tiscalinet.it...

> Un grazie a chi mi potrą aiutare.
>
> Claudio Debortoli
Penso che, invece di distribuire un database in formato .MDB lo distribuisci
nel formato .MDE, non dovresti avere problemi di ligua, visto che il codice
VBA viene compilato ed il sorgente viene eliminato dal database.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Istruzioni in inglese

author: Debortoli

text:
"Roberto da casa" <
r.ma...@libero.it
> wrote in message news:<mLQTb.10858$
Mt6.4...@twister2.libero.it
>...
>
> Penso che, invece di distribuire un database in formato .MDB lo distribuisci
> nel formato .MDE, non dovresti avere problemi di ligua, visto che il codice
> VBA viene compilato ed il sorgente viene eliminato dal database.
Appunto.
Si tratta di un'applicazione tipo front-end / back-end scritta in VBA,
di cui il back-end (il db coi dati) risiede su un server aziendale, e
il front-end viene copiato sulle singole workstation. Quest'ultimo č
in effetti un file MDE, solo che il codice compilato passa i comandi
ad Access nella lingua in cui sono stati scritti. Per le versioni in
italiano, nessun problema. Errore fatale con le versioni in tedesco.
Soluzione: comandi in inglese, che tutte le versioni internazionali di
Access riconoscono.
Ciň fatto, la cosa sembra funzionare. Il che mi preoccupa ancora di
piů. ;)
Ciao
Claudio


title: Istruzioni in inglese

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> wrote in message news:<bvmfo0$u9kkg$
1...@ID-46617.news.uni-berlin.de
>...
> Claudio Debortoli ha scritto:
> > ...Mi servirebbe l'esatta grafia in inglese di "Conferma query di
> > comando" e "Esegui correzione automatica nome"...
>
> "Confirm Action Queries"
> "Perform Name AutoCorrect"
Herztlichen Dank.
Anscheinend funktioniert es gut.
Grüße
Claudio


title: Numeraz. automatica non funziona con certi PC

author: Francesco

text:
Salve!
ho applicato con soddisfazione l'applicazione di Davide La Mantia per la
numerazione automatica tipo 001/aa, ma in certi PC non funziona.
credevo che dipendesse dalla funzione date() che ho sostituito con now()
però non funziona lo stesso.
Se può dipendere dall'uso di MID o DMAX, quale libreria devo caricare nei
Riferimenti VBA?
Grazie
Francesco


title: "Cambiare il titolo della finestra di MSAccess, usando le API" di Antonio Biso

author: Eugenio

text:
Tempo fa avevo utilizzato l'esempio
"Cambiare il titolo della finestra di MSAccess, usando le API "di Antonio
Biso
Tutto funzionava a meraviglia fino ad oggi che ho trasferito l'applicazione
su un pc Win XP.
Succede che quando viene richiamata la funzione ChangeAccessTitle la
funzione termina in errore richiamando la funzione GetActiveWindow di User32
e mi viene emesso il seguente messaggio:
"Errore di run-time '6': Overflow
Per caso la funzione è impostata in modo diverso in User32.dll di Win XP?
Grazie
Ciao
Eugenio


author: Antonio Biso

text:
"Eugenio" <Ci...@Eugenio.it> ha scritto nel messaggio
news:ca45g1$umq$1...@lacerta.tiscalinet.it...
> Tempo fa avevo utilizzato l'esempio
>
> "Cambiare il titolo della finestra di MSAccess, usando le API "di Antonio
> Biso
>
> Tutto funzionava a meraviglia fino ad oggi che ho trasferito
l'applicazione
> su un pc Win XP.
>
> Succede che quando viene richiamata la funzione ChangeAccessTitle la
> funzione termina in errore richiamando la funzione GetActiveWindow di
User32
> e mi viene emesso il seguente messaggio:
>
> "Errore di run-time '6': Overflow
>
> Per caso la funzione č impostata in modo diverso in User32.dll di Win XP?
Mi sa proprio di sě, ma non so come modificarla...
Antonio
P.S.
XP... Sigh...


text:
> >
> > Per caso la funzione è impostata in modo diverso in User32.dll di Win
XP?
>
> Mi sa proprio di sì, ma non so come modificarla...
>
> Antonio
>
> P.S.
> XP... Sigh...
>
>
Hai detto bene XP... Sigh...
Sono due giorni che divento matto fra Access e connessioni di rete.
Scegli Microsoft e sarai premiato :-((((
Dovrebbero darmi il titolo MVP della sfiga per la mia capacità di attirare
problemi Microsoft.
Grazie Antonio
Ciao
Eugenio
p.s. :  ho provato la soluzione di Alessandro Baraldi, che ho trovato in un
thread precedente, e in XP funziona.


title: nomi file

author: Mike Dens

text:
ciao a tutti!!! :-)
Dunque ho una query che vorrei esportare all'interno di una directory,
però in modo tale che il nome della su detta query cambi di volta in
volta, vale a dire che se nella prima sessioen di lavoro esporto il file
questo venga salvato con ( ad es. ) domande1 e nella seconda sessione di
lavoro domande 2 e così via...
La query in realtà raccoglie delle domande. Una volta compilata la
maschera associata alla query questa viene esportata. Io desidero che le
varie domande vengano esportate in file con nomi diversi e non
sovrascritto....grazie a tutti
ciao
mike
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: nomi file

author: Alberto S.

text:
[cut]
>Dunque ho una query che vorrei esportare all'interno di una directory,
>però in modo tale che il nome della su detta query cambi di volta in
[cut]
>maschera associata alla query questa viene esportata. Io desidero che le
>varie domande vengano esportate in file con nomi diversi e non
>sovrascritto....grazie a tutti
Un modo semplice:
- crei una stringa con il nome del file (tipo 'domande1')
- con la funzione 'dir' vedi se nella tua directory questo file esiste
- se sì fai diventare la stringa 'domande2'
- and so on ... fino a quando verifichi che il file corrispondente non
esiste
- a questo punto sai con quale nome esportare la query
>ciao
>mike
Ciao
--
Alberto
No alle guerre


title: correlazione tra dati variabili e dati fissi

author: bob

text:
ho un problema che mi affligge da un po' di giorni.
devo creare una tabella avente diversi campi:
idrecord
data
veterinario
glucosio
creatinina
.
.
.
unita di misura
range accettabilità.
I valori variabili sono i primi , mentre unità di misura e range sono sempre
gli stessi.
Come posso creare questa tabella dove a valori variabili  vengano associati
valori fissi.
ANALITA       DATO     UNITA'    RANGE
glucosio            115             mg/dl       70 - 110
.
.
.
ect.
 In definitiva devo avere una tabella in cui inserisco solo il dato e non
devo ogni volta inserire anche l'unità di misura  e il range , che però da
analita ad analita variano.
Grazie della collaborazione .
r.regazzo


author: Silvio Berruti

text:
"bob" <
bob...@tiscali.it
> ha scritto nel messaggio
news:abmvmp$vlr$1...@lacerta.tiscalinet.it...
[CUT]
> I valori variabili sono i primi , mentre unità di misura e range sono
sempre
> gli stessi.
> Come posso creare questa tabella dove a valori variabili  vengano
associati
> valori fissi.
>
> ANALITA       DATO     UNITA'    RANGE
>
> glucosio            115             mg/dl       70 - 110
> .
> .
> .
> ect.
>  In definitiva devo avere una tabella in cui inserisco solo il dato e non
> devo ogni volta inserire anche l'unità di misura  e il range , che però da
> analita ad analita variano.
>
Se quelli che chiami dati fissi sono veramente immutabili nel tempo,
potresti metterli in una tabella a parte e recuperarli quando ti servono con
un DLookUp, oppure metterli in costanti globali x averli sempre a
disposizione quando ti servono.
Se invece sono quasi sempre quelli, ma potrebbero, almeno una volta, essere
differenti, lasciali nella tua tabella e usa il valore predefinito.
Inoltre, quando hai mandato un messaggio, direi che è sufficiente...
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


author: Max De Poli

text:
"bob" <
bob...@tiscali.it
> wrote in message news:<abmvmp$vlr$
1...@lacerta.tiscalinet.it
>...
> I valori variabili sono i primi , mentre unità di misura e range sono sempre
> gli stessi.
> Come posso creare questa tabella dove a valori variabili  vengano associati
> valori fissi.
>
> ANALITA       DATO     UNITA'    RANGE
>
> glucosio            115             mg/dl       70 - 110
> .
> .
> .
> ect.
>  In definitiva devo avere una tabella in cui inserisco solo il dato e non
> devo ogni volta inserire anche l'unità di misura  e il range , che però da
> analita ad analita variano.
Utilizzi due tabelle: nella prima metti tutto tranne range e unita' di
misura, nella seconda metti solo analita (chiave primaria), range e
U.M.
Poi crei una relazione tra le tabelle e basi tutte le tue form e i
report su una query che collega le due tabelle.
Cia'
max


title: MDB STORED PROCEDURE CON PARAMETRI

author: MICHELE

text:
Salve,
in un file mdb il seguente codice funziona correttamente per lanciare
una stored procedure su sql :
Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
Dim strCon As String
strCon = "Provider=Microsoft.Access.OLEDB.10.0" & _
         ";Data Provider=SQLOLEDB" & _
         ";Data Source=NAMESERVER\SQLEXPRESS" & _
         ";Initial Catalog=PIPPO" & _
         ";User Id=sa" & _
         ";Password=password"
cn.Open strCon
cn.Execute "EXEC [dbo].[QUERY_1]"
Avrei bisogno di lanciare una stored procedure di nome QUERY_2  che ha
il parametro ORD
Il risultato di questa query vorrei metterlo in un recordset.
Riesco in un file ADP ma non MDB
In un file ADP sarebbe così:
Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
Dim strCon As String
strCon = "Provider=Microsoft.Access.OLEDB.10.0" & _
         ";Data Provider=SQLOLEDB" & _
         ";Data Source=NAMESERVER\SQLEXPRESS" & _
         ";Initial Catalog=PIPPO" & _
         ";User Id=sa" & _
         ";Password=password"
cn.Open strCon
Set RSADO = New ADODB.Recordset
RSADO.Open "Exec [dbo].[QUERY_2] @ORD = '" & ORD & "'", cn,
adOpenKeyset, adLockOptimistic
Come posso risolvere il problema?
Grazie


title: MDB STORED PROCEDURE CON PARAMETRI

text:

Con un MDB devi usare una Query PassTrought per eseguire una Stored,
ma devi definire la proprietà ReturnRecord
Function ExecuteSPT (sqltext As String, connectstring As String)
' Purpose: Esegue una temporanea query pass-through.
' Accepts: sqltext: Stringa SQL da eseguire.
' connectstring: Connection string, deve seguire il predicato "ODBC;".
' Returns: nothing.
Dim mydb As DAO.Database, myq As DAO.QueryDef
Set mydb = DBEngine.Workspaces(0).Databases(0)
' Create a temporary QueryDef object that is not saved.
Set myq = mydb.CreateQueryDef("")
' Set the ReturnsRecords property to False in order to use the
' Execute method.
myq.returnsrecords = False
myq.connect = connectstring
myq.sql = sqltext
myq.Execute
myq.Close
End Function
Se vuoi che restituisca dei Records imposta la proprietà
ReturnRecords=True ed assegna all'oggetto Function l'oggetto Recordset
derivante...
@Alex


title: MDB STORED PROCEDURE CON PARAMETRI

text:
> Con un MDB devi usare una Query PassTrought per eseguire una Stored,
> ma devi definire la proprietà ReturnRecord
>
> Function ExecuteSPT (sqltext As String, connectstring As String)
>
> ' Purpose: Esegue una temporanea query pass-through.
> ' Accepts: sqltext: Stringa SQL da eseguire.
> ' connectstring: Connection string, deve seguire il predicato "ODBC;".
> ' Returns: nothing.
>
> Dim mydb As DAO.Database, myq As DAO.QueryDef
> Set mydb = DBEngine.Workspaces(0).Databases(0)
>
> ' Create a temporary QueryDef object that is not saved.
> Set myq = mydb.CreateQueryDef("")
>
> ' Set the ReturnsRecords property to False in order to use the
> ' Execute method.
> myq.returnsrecords = False
> myq.connect = connectstring
> myq.sql = sqltext
>
> myq.Execute
> myq.Close
>
> End Function
>
> Se vuoi che restituisca dei Records imposta la proprietà
> ReturnRecords=True ed assegna all'oggetto Function l'oggetto Recordset
> derivante...
>
> @Alex
Ciao Alex,
ho seguito le tue spiegazioni ma non ho capito completamente.
Ho creato  la funzione che hai scritto poi ho chiamato la funzione con
un pulsante nel seguente modo:
Private Sub Comando8_Click()
Dim parametro1 As String
Dim parametro2 As Integer
parametro1 = "MESSO1"
parametro2 = 1
Call executeSPT("EXEC [dbo].[ORD_SPE_POSIZ] " & parametro1 & "," &
parametro2,
"ODBC;DSN=SQL_DL;Description=INDUSTRIALE;UID=sa;PWD=pippo;DATABASE=IND;")
End Sub
Se metto
myq.returnsrecords = true
compare l'errore : impossibile eseguire una query di selezione.
se lo imposto a false il pulsante non dà errore.
Cosa intendi per assegnare all'oggetto function l'oggetto recordset?
Se dichiaro un recordset
dim rs as dao.recordset
Come posso dire che il recorset sarà  uguale alle righe restituite
dalla stored procedure?
Grazie per l'attenzione


title: MDB STORED PROCEDURE CON PARAMETRI

text:

Se vuoi che vengano restituiti Records come ti ho detto oltre a
mettere a TRUE la proprietà ReturnRecords
devi anche aprire la Query per ottenere il Recordset....
Function ExecuteSPT (sqltext As String, connectstring As String)  As
DAO.Recordset
Dim myq As DAO.QueryDef
Set myq =  DBEngine.Workspaces(0).Databases(0).CreateQueryDef("")
myq .Connect = connectstring
myq .ReturnsRecords = True
myq .SQL = sqltext
Set ExecuteSPT = myq .OpenRecordset(dbOpenSnapshot)
Set myq = Nothing
End Function
Chiaramente questa funzione restituisce un Recordset quindi l'oggetto
di assegnazione dovrà essere assegnato con SET...
GESTIONE ERRORI... mancata volutamente ma doverosa...
@Alex


title: MDB STORED PROCEDURE CON PARAMETRI

text:
Grazie Alex!,
più o meno dopo il tuo primo aiuto  dopo un sacco di prove sono
riuscito.
Ora leggendo il tuo ultimo intervento sono riuscito ad utilizzare la
funzione.
Starò attento alla gestione degli errori, in particolare controllo se
il recodset ha record prima di proseguire ..
Non so se aprire un nuovo post.. ma  questo metodo funziona solo con
le stored procedure?
Con le funzioni mi dà errore.
Sbaglio qualche cosa oppure il modo di chiamare una funzione è
differente?
Grazie!


title: MDB STORED PROCEDURE CON PARAMETRI

text:

Non ho mai usato una chiamata a UDF ma ho trovato questo
suggerimento... da provare...!
Devi ovviamente sempre usare una QueryPT in quanto JET non sa
interpretare la UDF...
 Dim strSQL As String
    strSQL = "SELECT dbo.fn_TimeValue('1/1/2008 6:30 am') As MyTime"
    With CurrentDb.CreateQueryDef("~" & Int(Timer), strSQL)
        .Connect = "<valid ODBC connect string>"
        runFunDAO = .OpenRecordset.Fields(0)
    End With
Ho trovato in questo articolo
http://www.access-programmers.co.uk/forums/showthread.php?t=153390
@Alex


title: Access: come restringere i criteri di ricerca su due campi in una query - Help!

author: Ermete

text:
Salve a tutti.
Ho una query access che per la mole di dati non riesce a restituirmi
l'output (essendo
linkata a tabelle Oracle via ODBC mi viene restituito il timeout 01013 user
requested cancel
of....).
L'unica soluzione valida è quella di restringere i criteri di ricerca,
cosicché mi sono reso
conto che la query catturava dalla tabella linkata anche dei record che non
mi servono,
ovvero record che hanno due campi entrambi a valore 0.
Ad esempio ho una tabella simile:
DATA ORA DEVICEID SESSIONIN SESSIONOUT
27/09/08 00:00 RM1 0 0
27/09/08 00:15 RM1 0 1
27/09/08 00:30 RM1 0 0
27/09/08 00:45 RM1 3 0
27/09/08 01:00 RM1 1 2
Ora vorrei gentilmente sapere, da qualcuno di voi più esperto di me, come
potrei eliminare i
record dove entrambi i campi sono a valore 0 (nell'esempio sopra, solo il
record
corrispondente alle 00:00 e quello 00:30)
La query attuale è di questo tipo e cerco di rappresentarla nella classica
struttura di
creazione query di Access (spero si capisca):
Campo --> DATA DEVICEID SumOfSESSIONIN SumofSESSIONOUT
Tabella --> pippo pippo pippo pippo
Formula --> Raggr. Raggr. Somma Somma
Ordinamento -->
Mostra --> x x x x
Criteri --> >=27/09/08 Like "*RM*
Ho già provato ad eliminare il flag sul timeout dell'ODBC come consigliato
per gli errori
01013 ma non mi cambia nulla.
Ho già verificato che si tratta di un problema di mole di dati troppo lunga
(più di 100.000
record da elaborare)... infatti se restringo il criterio del campo DEVICEID
da Like "*RM*" a
Like "*RM1*" la query gira tranquillamente.
Grazie infinite a chi riuscirà ad aiutarmi (sono nel panico + totale)
Ermete
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


author: MA

text:

vai nelle proprietà della query e setta 0 il timeout
così non scade
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


title: quattro query dinamiche

text:
buongiorno a tutti.
Ho quattro query che mi filtrano i dati di aprile, marzo, febbraio e gennaio.
Ciascuna di queste query ha un campo data con filtro pari a : "Like "*/04/2013".(l'esempio si riferisce ovviamente a aprile).

Il mio quesito è questo: vorrei poter aggiornare i dati per il futuro inserendo il filtro mensile solo per il mese più recente (cfr. Maggio) e vorrei che le tre query precedenti si adattassero con dati pari a maggio -1, -2 -3.
In parole povere mensilmente, non devo piu modificare quattro query ma agire solo sulla più recente e le altre adattano il loro filtro.

Qualcuno mi può aiutare ?
grazie infinite.


title: quattro query dinamiche

author: Bruno Campanini

text:
ignazio.pilone explained :

Cioè definito il parametro m per il mese corrente
(1<=m<=12) vorresti che il programma ti eseguisse
nell'ordine pe query per m, m-1, m-2, ... 1.

Inoltre, m lo definisci tu o lo definisce il
programma prendendo il mese della data corrente?

Metti online una delle query...

Bruno

Bruno


title: quattro query dinamiche

text:
Bruno, grazie per l'attenzione.
Allora ti allego il codice in sql della query per i dati di Aprile.

A me serve avere i valori del mese inserito, che non è quello in corso ma quello per cui mi pubblicano i dati, ad esempio maggio e dei tre mesi (-1,-2,-3) precedenti.

SELECT Dati.POD, Dati.DATA, Dati.ORA, Dati.ENATTIVA, Dati.ENREATTIVA, IIf([ENATTIVA]>0,([ENREATTIVA]/[ENATTIVA]),0) AS Incidenza, IIf([Incidenza]>0.5,0.5,[Incidenza]) AS Adeguato, IIf(IsNull([Incidenza]),0,IIf([Incidenza]>0.5,([Incidenza]-[Seconda]-[Adeguato]),0)) AS Prima, IIf([Incidenza]>0.75,[Incidenza]-0.75,0) AS Seconda, Format(IIf(([ENREATTIVA]>([ENATTIVA]*"0,5")),([ENREATTIVA]-([ENATTIVA]*0.5))*0.0151,"0"),"0.###")*"1" AS Penale, Format(IIf(([ENREATTIVA]>([ENATTIVA]*"0,75")),([ENREATTIVA]-([ENATTIVA]*0.75))*0.0038,"0"),"0.###")*"1" AS Ulteriore, Format((CSng(Nz([Penale],0))+CSng(Nz([Ulteriore],0))*1.21),"0.###")*"1" AS Penaliva, IIf([Incidenza]<0.5,1,0) AS flag1, IIf([Incidenza]>0.5 And [Incidenza]<0.75,1,0) AS flag2, IIf([Incidenza]>0.75,1,0) AS flag3
FROM Dati
WHERE (((Dati.DATA) Like "*/04/2013"));

grazie infinite per l'interessamento e per l'aiuto...


title: quattro query dinamiche

text:
on 15-07-13, ignazio.pilone supposed :

Ma questa come fa a funzionarti da programma?

Spiegami bene: da programma devi eseguire le query che il programma
stesso ha creato|modificato o da programma crei|modifichi le query che
poi esegui interattivamente?

Bruno


title: quattro query dinamiche

text:
Bruno, cerco di spiegarmi meglio, scusami se non sono ancora stato abbastanza chiaro.
Il mio access mi consente tramite una trentina di query di alimentare alcune tabelle di excel da cui stampo dei report in pdf.
Nello specifico al momento ho quattro query funzionanti che mi estraggono i dati di cascun mese, così impostate :
"Like "*/04/2013" per Aprile
"Like "*/03/2013" per Marzo
"Like "*/02/2013" per Febbraio
"Like "*/01/2013" per Gennaio

Vorrei modificare tale filtro inserendo nella prima query il valore del mese di maggio ("Like "*/05/2013" o qualcosa di equivalente) e nelle altre tre query tre formule che collegate alla prima, mi valorizzino i mesi n-1,n-2,n-3.

Grazie mille per l'aiuto ti ringrazio di cuore.


title: quattro query dinamiche

text:
ignazio.pilone presented the following explanation :

Quindi tu esegui le query, una dopo l'altra, dalla finestra database e
vorresti fornire solo il parametro della prima query (per esempio 5 per
maggio) e ottenere che i parametri delle altre tre query fossero di
conseguenza modificati per ottenere i dati dei mesi 4, 3, 2.

1 -
Usando un po' di codice VBA ti sarebbe possibile creare la prima query
col parametro m, eseguirla, creare ed eseguire le altre tre query coi
parametri m-1, m-2, m-3.

2 -
Senza VBA potresti costruire le query in modo che il mese ti venisse
richiesto, per ogni query, come parametro.
Allora eseguendo la prima forniresti 5, eseguendo la seconda forniresti
4, etc.

Se ho ben inteso però tu vorresti ottenere l'automatismo del punto 1
con  la modalità del punto 2.
La qual cosa non mi sembra proprio possibile.

Bruno


title: quattro query dinamiche

text:
Quindi tu esegui le query, una dopo l'altra, dalla finestra database e
vorresti fornire solo il parametro della prima query (per esempio 5 per
maggio) e ottenere che i parametri delle altre tre query fossero di
conseguenza modificati per ottenere i dati dei mesi 4, 3, 2.

1 -
Usando un po' di codice VBA ti sarebbe possibile creare la prima query
col parametro m, eseguirla, creare ed eseguire le altre tre query coi
parametri m-1, m-2, m-3.

si Bruno vorrei fare proprio questo ma non ho idea del codice da scrivere nella/e query. Ma se nella prima (maggio) inserissi 5 nella condizione della data, posso nelle altre 3 querry puntare a questo valore per ottenere -1,-2,-3 ?
A me basterebbe anche così....
grazie  mille ciao


title: quattro query dinamiche

author: Marco Pizzamiglio

text:
ignazio.pilone ha scritto:

> A me basterebbe anche cosě....
> grazie  mille ciao

Ma lo devi proprio inserire a mano il parametro o ti basta avere le query
'Mese corrente' e '1 mese precedente', '2 mesi precedenti', .....?
Ciao.
-Marco-

--

questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: quattro query dinamiche

text:
ignazio.pilone submitted this idea :

Non devi scrivere alcun codice nelle query: son le query che debbono
essere scritte nel codice.

Dunque, "programmatically" scriviamo le quattro query passando un solo
parametro (es. 5).
Cosicché queste vengono create nella finestra dababase (q1, q2, q3, q4)
e da qui eseguite interattivamente (DoubleClick su ciascuna
sequenzialmente)? o debbono aggiornare/filtrare qualche tabella/report?

Bruno

PS
Sai come eseguire una routine VBA?


title: quattro query dinamiche

text:
Bruno Campanini ha scritto:

> ignazio.pilone submitted this idea :
> > Quindi tu esegui le query, una dopo l'altra, dalla finestra database e
> > vorresti fornire solo il parametro della prima query (per esempio 5 per
> > maggio) e ottenere che i parametri delle altre tre query fossero di
> > conseguenza modificati per ottenere i dati dei mesi 4, 3, 2.
> >
> > 1 -
> > Usando un po' di codice VBA ti sarebbe possibile creare la prima query
> > col parametro m, eseguirla, creare ed eseguire le altre tre query coi
> > parametri m-1, m-2, m-3.

> > si Bruno vorrei fare proprio questo ma non ho idea del codice da
scrivere
> > nella/e query. Ma se nella prima (maggio) inserissi 5 nella condizione
della
> > data, posso nelle altre 3 querry puntare a questo valore per ottenere
> > -1,-2,-3 ? A me basterebbe anche cosě.... grazie  mille ciao

> Non devi scrivere alcun codice nelle query: son le query che debbono
> essere scritte nel codice.
> Dunque, "programmatically" scriviamo le quattro query passando un solo
> parametro (es. 5).
> Cosicché queste vengono create nella finestra dababase (q1, q2, q3, q4)
> e da qui eseguite interattivamente (DoubleClick su ciascuna
> sequenzialmente)? o debbono aggiornare/filtrare qualche tabella/report?
> Bruno
> PS
> Sai come eseguire una routine VBA?

Direi che non serve sprecarsi a riscrivere le query da VBA, se lui fa una
mascherina con una combo o textbox in cui seleziona il mese basta usare
come
criterio
Forms![Nome maschera]!Mese
Forms![Nome maschera]!Mese - 1
Forms![Nome maschera]!Mese - 2
ecc...
Ovviamente la maschera deve rimanere aperta, magari nascosta, altrimenti
le
query non possono leggere il valore del parametro.



title: quattro query dinamiche

text:
Marco Pizzamiglio presented the following explanation :

> Direi che non serve sprecarsi a riscrivere le query da VBA, se lui fa una
> mascherina con una combo o textbox in cui seleziona il mese basta usare
> come
> criterio
> Forms![Nome maschera]!Mese
> Forms![Nome maschera]!Mese - 1
> Forms![Nome maschera]!Mese - 2
> ecc...
> Ovviamente la maschera deve rimanere aperta, magari nascosta, altrimenti
> le
> query non possono leggere il valore del parametro.

Sì certo, restando nella filosofia di eseguire le query
interattivamente è una soluzione semplice.
Altra, altrettanto semplice, è quella di inserire il mese in ciascuna
query come parametro.
DblClick sulla prima e inserisci 5, DblClick sulla seconda e inserisci
4, etc.
Non è molto complicato e non vi sono tante possibilità di sbagliarsi.

Per altra via, con qualche automatismo in più, premi un pulsante,
fornisci il parametro m, e nella finestra database ti trovi le quattro
query pronte per essere eseguite interattivamente.

Per altra via ancora, con tutti gli automatismi posti in essere, premi
un pulsante fornisci il parametro m, e una procedura crea, esegue ed
applica le quattro query.

De gustibus...

Bruno
Bruno


title: quattro query dinamiche

text:
Bruno Campanini ha scritto:

Già, ci sono svariate possibilità. Gli ho chiesto in un altro post se gli
serve sempre il mese corrente con i 3 precedenti perché pensavo che si può
fare anche senza parametri e senza VBA, usando la data di sistema per
impostare i criteri nelle 4 query.



title: quattro query dinamiche

text:
Bruno Campanini presented the following explanation :

> Non devi scrivere alcun codice nelle query: son le query che debbono essere
> scritte nel codice.
>
> Dunque, "programmatically" scriviamo le quattro query passando un solo
> parametro (es. 5).
> Cosicché queste vengono create nella finestra dababase (q1, q2, q3, q4) e da
> qui eseguite interattivamente (DoubleClick su ciascuna sequenzialmente)? o
> debbono aggiornare/filtrare qualche tabella/report?
>
> Bruno
>
> PS
> Sai come eseguire una routine VBA?

Intanto puoi provare a sostituire la tua clausola WHERE:
WHERE (((Dati.DATA) Like "*/04/2013"));

con questa:
WHERE DatePart("m",[Data])=[Mese];
così puoi utilizzare una sola query.

Bruno


title: quattro query dinamiche

text:
Direi che non serve sprecarsi a riscrivere le query da VBA, se lui fa una
mascherina con una combo o textbox in cui seleziona il mese basta usare
come
criterio
Forms![Nome maschera]!Mese
Forms![Nome maschera]!Mese - 1
Forms![Nome maschera]!Mese - 2
ecc...

Vi ringrazio tutti per il costruttivo aiuto.
Allora ricapitolo cosa ho fatto e cosa non capisco ancora bene.
Preciso che le query mi servono tutte e quattro perchè alimentano quattro grafici diversi (mese in corso e tre mesi precedenti) e quindi la query non si deve riscrivere su se stessa.
Ho inserito nel linguaggio sql il codice suggerito da Bruno
"WHERE DatePart("m",[Data])=[Mese]; "

quindi quando lancio la query Lui mi chiede il mese con una inputbox io gli scrivo 5 e "Lui" mi lancia la query...quindi tutto ok.
Posso nelle altre tre query "puntare a questo valore ?

Solleticato dal vostro consiglio, ho creato una maschera "frm_sceltamese" con una combinata con valori da 1 a 12.
Dopo aggiornamento della combinata con il mese ultimo (maggio) la stessa mi memorizza il valore (ad esempio 5)nella casella di testo "mesescelto" della stessa maschera.
Ora vorrei che la mia query con il codice di bruno puntasse anche a :
[frm_sceltamese]![mesescelto]
ma non riesco a  farlo, cioè a fondere i codici....sono abbastanza impedito.
Avreste ancora la pazienza di farmi capire cosa sbaglio ?


title: quattro query dinamiche

text:
grazie infinite a tutti...
ho finalmente capito....grazie grazie grazie.

ho fatto come suggerito e poi ho cosi modificato la query:

SELECT Dati.POD, Dati.DATA, DatePart("m",[DATA]) AS mese, Dati.ORA, Dati.ENATTIVA, Dati.ENREATTIVA, IIf([ENATTIVA]>0,([ENREATTIVA]/[ENATTIVA]),0) AS Incidenza, IIf([Incidenza]>0.5,0.5,[Incidenza]) AS Adeguato, IIf(IsNull([Incidenza]),0,IIf([Incidenza]>0.5,([Incidenza]-[Seconda]-[Adeguato]),0)) AS Prima, IIf([Incidenza]>0.75,[Incidenza]-0.75,0) AS Seconda, Format(IIf(([ENREATTIVA]>([ENATTIVA]*"0,5")),([ENREATTIVA]-([ENATTIVA]*0.5))*0.0151,"0"),"0.###")*"1" AS Penale, Format(IIf(([ENREATTIVA]>([ENATTIVA]*"0,75")),([ENREATTIVA]-([ENATTIVA]*0.75))*0.0038,"0"),"0.###")*"1" AS Ulteriore, Format((CSng(Nz([Penale],0))+CSng(Nz([Ulteriore],0))*1.21),"0.###")*"1" AS Penaliva, IIf([Incidenza]<0.5,1,0) AS flag1, IIf([Incidenza]>0.5 And [Incidenza]<0.75,1,0) AS flag2, IIf([Incidenza]>0.75,1,0) AS flag3
FROM Dati
WHERE (((DatePart("m",[DATA])) Like [forms]![frm_sceltamese]![mesescelto]));


title: quattro query dinamiche

text:

niente like

WHERE (((DatePart("m",[DATA])) = [forms]![frm_sceltamese]![mesescelto]));


title: posizione sottoreport

author: Akery

text:
buongiorno  a tutti,
sto creando una etichetta nel cui corpo c'è un sottoreport, il problema è
che il sottoreport mi sposta parte dei campi allungando l'altezza
dell'etichetta.
Suggerimenti su come si possa procedere?

Grazie
Akery

---
Questa e-mail è stata controllata per individuare virus con Avast antivirus.
https://www.avast.com/antivirus


title: posizione sottoreport

text:
Il giorno giovedì 2 luglio 2015 20:19:45 UTC+2, Akery ha scritto:
> buongiorno  a tutti,
> sto creando una etichetta nel cui corpo c'è un sottoreport, il problema è
> che il sottoreport mi sposta parte dei campi allungando l'altezza
> dell'etichetta.
> Suggerimenti su come si possa procedere?
>
> Grazie
> Akery

Tra le proprietà del sottoreport nella scheda Formato c'è 'Espandibile', impostala a 'No'.
Nei casi in cui i dati sono tanti (quando ti spostava in giù i campi) potresti perderne una parte perchè non stanno nel sottoreport e quindi non vengono stampati.
Ciao.
-Marco-


title: Sottomaschera : Assegnare Valore ad un controllo.

author: Mar&mar

text:
Salve a tutti.
Ho cercato invano di assegnare un valore ad un controllo di una
sottomaschera dalla maschera principale,
il metodo setfocus ancora non mi e' chiaro.
Come si assegna un valore ad un controllo in una sottomaschera in funzione
di un
altro valore inserito nella maschera Principale?
faccio un esempio:
Nella maschera principale ho il controllo [data inizio] e il controllo [data
fine];
nella sottomaschera che si chiama "DiffMesi" ho il controllo [Gen] che deve
essere aggiornato
quando inserisco la [data fine] alla differenza tra quest'ultimo e la [data
inizio] ;
ci provo sull' evento dopo aggiornamento del controllo [data fine] ma ahime
va in debug.
Spero di essere stato chiaro.
Grazie in anticipo.
--
-----------------------------------------------------------
Mar&mar
-----------------------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
-----------------------------------------------------------


text:
Il 10 Mar 2003, 19:15, "Mar&mar" <
rm.creat...@tiscali.it
> ha scritto:
> Salve a tutti.
>
> Ho cercato invano di assegnare un valore ad un controllo di una
> sottomaschera dalla maschera principale,
> il metodo setfocus ancora non mi e' chiaro.
>
> Come si assegna un valore ad un controllo in una sottomaschera in funzione
> di un
> altro valore inserito nella maschera Principale?
>
> faccio un esempio:
>
> Nella maschera principale ho il controllo [data inizio] e il controllo
[data
> fine];
> nella sottomaschera che si chiama "DiffMesi" ho il controllo [Gen] che
deve
> essere aggiornato
> quando inserisco la [data fine] alla differenza tra quest'ultimo e la
[data
> inizio] ;
> ci provo sull' evento dopo aggiornamento del controllo [data fine] ma
ahime
> va in debug.
>
> Spero di essere stato chiaro.
>
> Grazie in anticipo.
Se da un controllo di una maschera vuoi puntare uno di una sottomaschera
riferisciti cosě
tuaform!tuasottomaschera.setfocus
tuaform!tuasottomaschera!tuocontrollo.setfocus
tuaform!tuasottomaschera!tuocontrollo = tuovalore
ciao MAssimiliano
--------------------------------
Inviato via
http://usenet.libero.it


text:
"MA" <
massimilia...@kksrl.com
> ha scritto nel messaggio
news:151Z26Z64Z209Y1...@usenet.libero.it...
..............
>
> Se da un controllo di una maschera vuoi puntare uno di una sottomaschera
> riferisciti cosě
> tuaform!tuasottomaschera.setfocus
> tuaform!tuasottomaschera!tuocontrollo.setfocus
> tuaform!tuasottomaschera!tuocontrollo = tuovalore
> ciao MAssimiliano
>
>
> --------------------------------
> Inviato via
http://usenet.libero.it
Questo č il listato che ho scritto ma adesso ha cambiato messaggio d'errore
:
"errore di run-time necessario oggetto (errore 424)"
segue codice
 Private Sub data_fine_AfterUpdate()
 Anagrafico!data.SetFocus
 Anagrafico!data!gen.SetFocus
 Anagrafico!data!gen = 2
End Sub
AIUTO.


title: [Re}Testare se riga in elenco è selezionata!

author: AA

text:
Ciao!Ho già mandato la domanda alcuni messaggi fa, ma la risposta non è
quella che cercavo! Facendo il controllo "If Me.Elenco2.ItemsSelected.Count
= 0 Then" testo se cè qualche riga selezionata nel mio elenco..Ma essendo il
mio elenco a selezione multipla, posso avere altre righe selezionate come
no, non è il controllo che voglio fare!..Il controllo che ho bisogno di fare
è : "questa riga selezionata è selezionata o deselezionata?", perchè se
selezionata lancio la stampa della riga, se no la lascio deselezionata
perchè all'utente non serve..Capito ora?Grazie molte anticipatamente!


author: Carlo Costarella

text:
"AA" <
NOSPAMa...@sistemics.it
> ha scritto nel messaggio
news:cnn5nf$6i1$1...@carabinieri.cs.interbusiness.it...

Dal codice che ti ho spedito è possibile fare quello che tu vuoi,
aggiungendo
lo spezzone di codice che verifica se vi sono record selezionati:
Dim varItm As Variant
For Each varItm In TuaCasellaRiepilogo.ItemsSelected
'scrivi qui quello che vuoi fare
Next varItm
In pratica con il primo codice che ti ho mandato "conti" i record
selezionati;
è evidente che se non ci sono record selezionati esci dalla funzione.
Con l'integrazione di cui sopra, "scannerizzi" tutti i record selezionati e
per ogni record compi l'azione che ti serve.
Un consiglio è quello di leggerti bene il FONDAMENTALE file della guida,
ricco di spiegazioni, esempi e trucchi.
Ciao, Carlo


author: fidirico (lavoro)

text:
"AA" <
NOSPAMa...@sistemics.it
> ha scritto nel messaggio
news:cnn5nf$6i1$1...@carabinieri.cs.interbusiness.it...

Devi testare la proprietà selected della listbox utilizzando la proprietà
listindex. Ad es:
Private Sub TuaListbox_Click()
    Dim NumRiga As Long
    NumRiga = Me.TuaListbox.ListIndex
    If Me.TuaListbox.Selected(NumRiga) Then
        MsgBox "vuoi stampare?"
    End If
End Sub
Ancora una cosa: è preferibile continuare il thread originario anzichè
aprirne un altro a così breve distanza di tempo.
Ciao
--
Galliano.


title: unire più query

author: Remigio

text:
Buongiorno,
uso A03 ed ho creato due query che estraggono gli stessi campi da più tabelle ma con criteri diversi, per es. estraggono cognome, nome, dta_nascita, numero_ordine.
Per visualizzareil risultato devo aprirli singolarmente, ma se volessi vedere il risultato in un unico foglio dati, visto che sto lavorando sugli stessi campi, potrei in qualche modo unire le due query?
Grazie e saluti.

Remigio


title: unire più query

text:

Mi rispondo da solo:
ho creato delle query di accodamento che versano i dati in una tabella temporanea.
Saluti.

Remigio


title: unire più query

author: Riccardo Baldinotti

text:
Remigio ha scritto:

> Il giorno giovedě 3 maggio 2012 10:00:58 UTC+2, Remigio ha scritto:
> > Buongiorno,
> > uso A03 ed ho creato due query che estraggono gli stessi campi da piů
tabelle ma con criteri diversi, per es. estraggono cognome, nome, dta_nascita,
numero_ordine.
> > Per visualizzareil risultato devo aprirli singolarmente, ma se volessi
vedere il risultato in un unico foglio dati, visto che sto lavorando sugli
stessi campi, potrei in qualche modo unire le due query?
> > Grazie e saluti.
> >
> > Remigio

> Mi rispondo da solo:
> ho creato delle query di accodamento che versano i dati in una tabella
temporanea.

Un'alternativa potrebbe essere scrivere una query di unione:
SELECT ...il testo della prima query...
UNION SELECT ...il testo della seconda query
a patto che le due query abbiano gli stessi campi.
Ciao
Riccardo Baldinotti

--

questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: unire più query

text:
Il giorno giovedì 3 maggio 2012 14:21:31 UTC+2, Riccardo Baldinotti ha scritto:
> Remigio ha scritto:
>
> > Il giorno giovedì 3 maggio 2012 10:00:58 UTC+2, Remigio ha scritto:
> > > Buongiorno,
> > > uso A03 ed ho creato due query che estraggono gli stessi campi da più
> tabelle ma con criteri diversi, per es. estraggono cognome, nome, dta_nascita,
> numero_ordine.
> > > Per visualizzareil risultato devo aprirli singolarmente, ma se volessi
> vedere il risultato in un unico foglio dati, visto che sto lavorando sugli
> stessi campi, potrei in qualche modo unire le due query?
> > > Grazie e saluti.
> > >
> > > Remigio
>
> > Mi rispondo da solo:
> > ho creato delle query di accodamento che versano i dati in una tabella
> temporanea.
>
> Un'alternativa potrebbe essere scrivere una query di unione:
> SELECT ...il testo della prima query...
> UNION SELECT ...il testo della seconda query
> a patto che le due query abbiano gli stessi campi.
> Ciao
> Riccardo Baldinotti
>
> --
>
> questo articolo e` stato inviato via web dal servizio gratuito
>
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it

Ottimo, grazie Riccardo.
Senti un'altra domanda, in VBA dovrei dire ad un controllo che deve averela data sempre impostata a 31/12/annocorrente.
Ho provato a usare miocampo.value = #31-12-year(date)# ma non funziona, sapreste come fare per favore?
Grazie ancora e saluti.

Remigio


title: unire più query

text:
Remigio ha scritto:

> Il giorno giovedě 3 maggio 2012 14:21:31 UTC+2, Riccardo Baldinotti ha
scritto:
> > Remigio ha scritto:
> >
> > > Il giorno giovedě 3 maggio 2012 10:00:58 UTC+2, Remigio ha scritto:
> > > > Buongiorno,
> > > > uso A03 ed ho creato due query che estraggono gli stessi campi da piů

Prova cosě:
    miocampo.value = "#31-12-" & year(date) & "#"
cioč costruendo la stringa. Oppure:
    Dim giorno As Date
    giorno = DateSerial(Year(Date), 12, 31)
    miocampo.Value = giorno
o piů velocemente
    miocampo.Value = DateSerial(Year(Date), 12, 31)
Perň ti consiglio di non usare, come nomi, le parole "date" o "data" e
nemmeno "descrizione" perché Access le interpreta a modo suo.



title: unire più query

text:
Il giorno venerdì 4 maggio 2012 11:33:59 UTC+2, Riccardo Baldinotti ha scritto:
> Remigio ha scritto:
>
> > Il giorno giovedì 3 maggio 2012 14:21:31 UTC+2, Riccardo Baldinotti ha
> scritto:
> > > Remigio ha scritto:
> > >
> > > > Il giorno giovedì 3 maggio 2012 10:00:58 UTC+2, Remigio ha scritto:
> > > > > Buongiorno,
> > > > > uso A03 ed ho creato due query che estraggono gli stessi campi da più

> Prova così:
>     miocampo.value = "#31-12-" & year(date) & "#"
> cioè costruendo la stringa. Oppure:
>     Dim giorno As Date
>     giorno = DateSerial(Year(Date), 12, 31)
>     miocampo.Value = giorno
> o più velocemente
>     miocampo.Value = DateSerial(Year(Date), 12, 31)
> Però ti consiglio di non usare, come nomi, le parole "date" o "data" e
> nemmeno "descrizione" perché Access le interpreta a modo suo.
> Ciao
> Riccardo Baldinotti
>
>
> --
>
> questo articolo e` stato inviato via web dal servizio gratuito
>
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it

Ciao Riccardo,
ho provato con

    miocampo.value = "#31-12-" & year(date) & "#"

ma restituisce un errore e non sono stato capace di capire perchè, mentre

    miocampo.Value = DateSerial(Year(Date), 12, 31)

funziona.
Ti ringrazio molto per l'aiuto.
Un saluto.

Remigio


title: Lunghezza Corpo Report

author: Luigi

text:
Scusate di nuovo ma sono proprio arenato su questo punto e non riesco a
proseguire.
Secondo Voi esiste un modo per far si che il corpo non abbia una lunghezza
massina di 55,83 ?
Mi mancano almeno altri 20 per poter ultimare il mio programma :-((( sigh !!
Grazie e scusate se ho ripostato un msg simile.
Luigi


title: Lunghezza Corpo Report

text:
Scusate nel frattempo ho ricevuto la risposta.
Non si può :-((((( sigh !!!!!
Grazie


title: valore true nelle select count

author: sittinghorse

text:
Chi mi dice come posso utilizzare, nel criterio di una select count, il
valore true?
premesso che il campo su cui si esegue la ricerca è di tipo true/false
Codice generato:
dim rec as recordset
set recordset = currentdb.openrecordset ("select count tabella.campo as
numero where tabella.campo = true")
questa select funziona perfettamente se si testa un campo non di tipo
true/false e nel criterio si utilizza una stringa o un valore numero, come
mai non funziona se applicata su un campo true/false e non vede il criterio
true?
Grazie a tutti


title: valore true nelle select count

author: Roberto dal portatile

text:
"sittinghorse" <
sittin...@libero.it
> ha scritto nel messaggio
news:NjZQ7.273569$sq5.13...@news.infostrada.it...

E se scrivi
("SELECT Count(*) As numero From Tabella where Tabella.campo = True")
cosa succede?
Fra l'altro, per quello che so io, il predicato FROM in una istruzione
SELECT è obbligatorio e non opzionale.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: valore true nelle select count

author: Sergio MAZZA

text:
"sittinghorse" <
sittin...@libero.it
> ha scritto nel messaggio
news:NjZQ7.273569$sq5.13...@news.infostrada.it...

Oltre al suggerimento di Roberto prova anche:
'-------------
"SELECT Count(*) As numero From Tabella where Tabella.campo = -1"
'-------------
Ciao.
--
- - - - - - - - - - - - - - -
Sergio MAZZA
- - - - - - - - - - - - - - -


title: Librerie DAO e ADO

author: CarloCanza

text:
avrei bisogno di aprire un altro database con accesso esclusivo.
Con la libreria DAO c'è il metodo OPENDATABASE con il quale è possibile
aprire in modalità esclusiva.
Nella libreria ADO il metodo OPEN non porta questa opzione. Come fare ?
Non credo che se ne siano diemnticati, ma dov'è ???


title: Librerie DAO e ADO

author: Mak

text:
"CarloCanza" <
carlo...@tiscali.it
> ha scritto nel messaggio
news:athd77$puv$1...@lacerta.tiscalinet.it...

Devi impostarti prima di aprire il recordset la connection string
tipo:
Dim Cnn As ADODB.Connection
 dim Rs as ADOBD.Recordset
 dim Source as String
Set Cnn = New ADODB.Connection
Source = "C:\..... \.mdb"
 Cnn.ConnectionString = _
    "Provider=Microsoft.jet.OLEDB.4.0;" & _
    "Data Source=" & _ source dove source e la directory completa
   Cnn.Open                            dove si trova il mdb.
set rs = new adobd.recordset
rs.open "Tabella", cnn , adOpenStatic, adLockOptimistic
etc.
Saluti
Mak


title: Messaggio Input Mask

text:
Salve a tutti, è possibile gestire il messaggio che genera il
controllo dell' InputMask o no?


title: Messaggio Input Mask

author: miciomao

text:
Ciao
INPUTMASK_VIOLATION = 2279
Intercetta un'input diverso dal formato richiesto
DATAVALUE_VIOLATION = 2113
Intercetta una data errata, numero troppo grande, testo in numero
LIMITTOLIST_VIOLATION = 2237
Intercetta un valore non il lista
VALIDATION_VIOLATION = 2107
Intercatta la validazione del dato (Valido se)
Esempio
   Sub Form_Error (DataErr As Integer, Response As Integer)
      Const INPUTMASK_VIOLATION = 2279
      If DataErr = INPUTMASK_VIOLATION Then
         MsgBox "Hai scritto una boiata! Puoi scrivere solo bla bla
bla o tic ta toe"
         Response = DATA_ERRCONTINUE
      End If
   End Sub
Ciao
Alex


title: Messaggio Input Mask

text:

Perfetto! Grazie Mille!


title: Sottomaschera disattivata finché...

author: Giuseppe

text:
Ciao a tutti,
c'è la possibilità di avere una sottomaschera disattivata (e visibile in
grigio) finchè sulla maschera principale non viene scelto un record su una
casella di riepilogo. quindi si attivi per il data editing.
attualmente devo mettere visibile a no e renderla visibile con l'evento
click sulla casella di riepilogo e la cosa è molto brutta da vedersi.
saluti
Giuseppe


title: Sottomaschera disattivata finché...

text:
"Giuseppe" <
gco...@libero.it
> ha scritto nel messaggio
news:e3lV8.111781$Kt3.2...@twister2.libero.it...

di default imposti la proprietà abilitato della sottomaschera a NO
poi su evento "dopo aggiornamento" della casella di riepilogo metti il
seguente codice
forms![nomemaschera]![nomesottomaschera].enabled=true
ciao


title: Sottomaschera disattivata finché...

author: Silvio Berruti

text:
"@----- Pinco --@-- Pallino -----@" <
tos...@libero.it
> ha scritto nel
messaggio news:LVlV8.112097$Kt3.2...@twister2.libero.it...
>
> "Giuseppe" <
gco...@libero.it
> ha scritto nel messaggio
> news:e3lV8.111781$Kt3.2...@twister2.libero.it...
> > Ciao a tutti,
> >
> > c'è la possibilità di avere una sottomaschera disattivata (e visibile in
> > grigio) finchè sulla maschera principale non viene scelto un record su
una
> > casella di riepilogo. quindi si attivi per il data editing.
> >
> > attualmente devo mettere visibile a no e renderla visibile con l'evento
> > click sulla casella di riepilogo e la cosa è molto brutta da vedersi.
> >
Alle volte dicono, giustamente che sono un pignolo, ma non vorrei che
Giuseppe andasse in errore:
>
> di default imposti la proprietà abilitato della sottomaschera a NO
    di default imposti la proprietà abilitato del controllo sottomaschera a
NO
>
> poi su evento "dopo aggiornamento" della casella di riepilogo metti il
> seguente codice
>
> forms![nomemaschera]![nomesottomaschera].enabled=true
    forms![nomemaschera]![nomecontrollosottomaschera].enabled=true
Scusate la pignoleria.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


title: file corrotto

author: OrsoBruno

text:
Mi si e' danneggiato un database di acces, non esiste una qualche
utility che mi permetta di recuperarlo? Le sue dimensioni sono rimaste
intatte ma non mi riesce piu' di aprirlo.
Ciao e grazie.
--
OrsoBruno


title: file corrotto

author: Claudio

text:
"OrsoBruno" <
antoni...@hotmail.com
> ha scritto nel messaggio
news:f6tfsuklnogc8qv05...@4ax.com...
> Mi si e' danneggiato un database di acces, non esiste una qualche
> utility che mi permetta di recuperarlo? Le sue dimensioni sono rimaste
> intatte ma non mi riesce piu' di aprirlo.
Prova e seguire i consigli di questo documento microsoft (link segnalato da
Roberto in un precedente thread):
http://support.microsoft.com/default.aspx?scid=kb;it;I109953
Però, una piccola ricerca sui messaggi vecchi (diciamo una settimana) potevi
farla... o no?
Ciao. Claudio.


title: file corrotto

author: yQy

text:
"OrsoBruno" <
antoni...@hotmail.com
> ha scritto nel messaggio
news:f6tfsuklnogc8qv05...@4ax.com...
> Mi si e' danneggiato un database di acces, non esiste una qualche

Una prova da fare:
fai un nuovo DB vuoto...
file/importa/carica dati esterni/selezioni il vecchio db danneggiato
e ti apre una finestra a schede...selezioni giu tutto e importi :)
Vedi se funziona
Ciao :)


title: file corrotto

text:
Vi ringrazio tutti, ma purtroppo il recupero non e' riuscito, in acces
riesco a ripristinare il database che da 10,5 mbe diventa 9,7 ma poi
il programmino che ne fa uso non lo riconosce. Ho paura che saro'
costretto a rinserire molti dati, ho un backup ma puiuttosto
vecchiotto.



title: file corrotto

author: Federico Luciani

text:

Avresti dovuto precisare la versione.
cmq dal sito comune (Utility) trovi il link al Jet Compact Utility
dovrebbe funzionare per A97 e A2000
prova
--
Federico
----------------------------------
Rimuovi paperino. per e-mail
----------------------------------
Tutte le richieste che arrivano
in privato, vengono cestinate.
----------------------------------
Sito Comune di it.comp.appl.access
http://www.sitocomune.com
mailto:
webm...@sitocomune.com
----------------------------------