title: dimensione campo ?

text:
"Paolo" <
p_co...@libero.it
> ha scritto nel messaggio
news:t7i76.17885$FF1.1...@twister1.tin.it...
>
[CUT]
>
> e' un concatenamento di 5 campi di tipo testo con limite a 100 caratteri e
> altrettanti con limite a 200.
> Probabilmente la mia non e' la soluzione migliore, ne hai un'altra da
> propormi ?
>
> Paolo
>
Qual'è lo scopo di tale concatenazione? Non ti va bene averli singolarmente?
Comunque, se li devi concatenare per qualche motivo particolare e se ci sono
parecchi spazi in mezzo, prova a vedere la funzione Trim sull'help.
Ciao
LaLo


title: Casella Combinata: problemi "Origine Riga"

author: Cicerone

text:
Ho una casella combinata la cui origine riga viene da una query.
La query "Lista Spettacoli" ha i campi:
Titolo (Testo)
Data (In cifre, tipo 13/01/2006)
ed altri campi...
I dati della riga hanno la seguente istruzione:
SELECT DISTINCT [Lista Spettacoli].Titolo
FROM [Lista Spettacoli];
Vorrei aggiungere la condizione per cui i dati debbano essere visualizzati
se la data è >= a quella odierna, ho dunque provato con:
WHERE ((([Lista Spettacoli].Data)>=#+"Date"+#));
                                                          ^^^^^^^^^^
ma mi dà errore... ho provato anche #Date#, #(Date)#, #"+Date+"#,
str(#"+Date+"#), ed altre cose... ma niente da fare, mi accetta solo una
data per esteso, tipo #03/06/2009#....
Come faccio a mettere nella condizione il confronto con la data odierna?
(non siamo in VBA, ma in SQL...).
Grazie!


author: Alessandro Baraldi

text:
"Cicerone" <{balbuzio}{@}{
tiscali.it
}> wrote in message
news:dq87s7$3j0$
1...@area.cu.mi.it
> Ho una casella combinata la cui origine riga viene da una query.
> La query "Lista Spettacoli" ha i campi:
> Titolo (Testo)
> Data (In cifre, tipo 13/01/2006)
> ed altri campi...
>
> I dati della riga hanno la seguente istruzione:
>
> SELECT DISTINCT [Lista Spettacoli].Titolo
> FROM [Lista Spettacoli];
Non mi torna questa Query con il numero di campi
che dici, quì di Campi ne hai solo uno...!!!!
La data dove sarebbe...?
> Vorrei aggiungere la condizione per cui i dati debbano essere visualizzati
> se la data è >= a quella odierna, ho dunque provato con:
>
> WHERE ((([Lista Spettacoli].Data)>=#+"Date"+#));
>
[CUT]
> Grazie!
WHERE ((([Lista Spettacoli].Data)>=Fix(Now()));
Saluti
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:
"Alessandro Baraldi"
> "Cicerone" wrote in message:
>> I dati della riga hanno la seguente istruzione:
>>
>> SELECT DISTINCT [Lista Spettacoli].Titolo
>> FROM [Lista Spettacoli];
>
> Non mi torna questa Query con il numero di campi
> che dici, quì di Campi ne hai solo uno...!!!!
> La data dove sarebbe...?
...non ho capito.... :-|
>> Vorrei aggiungere la condizione per cui i dati debbano essere
>> visualizzati
>> se la data è >= a quella odierna, ho dunque provato con:
>> WHERE ((([Lista Spettacoli].Data)>=#+"Date"+#));
>
> [CUT]
> WHERE ((([Lista Spettacoli].Data)>=Fix(Now()));
Alla fine ci sono riuscito ugualmente utilizzando questa istruzione:
SELECT DISTINCT [Lista Spettacoli].Titolo
FROM [Lista Spettacoli]
WHERE ((([Lista Spettacoli].Data)>=Date()));
Grazie.
--
Cicerone
*********************
Il primo Newsgroup sulla Balbuzie
http://www.newsland.it/nr/browse/it-alt.salute.balbuzie/
**********************
C.I.B. Comunità Italiana Balbuzienti
www.balbuzienti.altervista.org/md-pro/index.php
**********************


title: Query di eliminazione

author: Luciano

text:
Un Saluto al newsgroup,
avrei bisogno di creare una query per eliminare alcuni record da una
tabella.
facendo un giro sui vari siti su internet e dando un'occhiata alle mail del
newsgroup mi sembrava piuttosto semplice:
Private Sub Comando2_Click()
Dim SQL As String
SQL = "DELETE INTERVENTI.N°Fattura FROM INTERVENTI WHERE
((INTERVENTI.N°Fattura) Is Null)"
End Sub
Purtroppo questo codice, associato ad un comando, non produce assolutamente
nulla.
Dove sbaglio?
Grazie.


title: Query di eliminazione

author: Sergio MAZZA

text:
"Luciano" <
lux...@libero.it
> ha scritto nel messaggio
news:5uy8l.147638$Ca.2...@twister2.libero.it...

Il tuo esempio non fa altro che creare/dichiarare l'utilizzo di una
variabile di tipo String(a):
Dim SQL As String
e assegnare a questa variabile il suo valore(stringa):
SQL = "DELETE INTERVENTI.N°Fattura FROM INTERVENTI WHERE
((INTERVENTI.N°Fattura) Is Null)"
punto.
Ora; che nella stringa di testo ci siano dei caratteri che indicano una
istruzione SQL per eliminare dei dati, lo sai solo tu, o meglio, gli dai tu
quel significato. Access tratta la stringa di testo come sequenza di
caratteri; punto. Quello che manca è l'istruzione che, presa quella stringa
di testo, esegua l'istruzione SQL in esso contenuta; per esempio il metodo
Execute(vedi help):
> Private Sub Comando2_Click()
> Dim SQL As String
> SQL = "DELETE INTERVENTI.N°Fattura FROM INTERVENTI WHERE
> ((INTERVENTI.N°Fattura) Is Null)"
CurrentDB.Execute SQL
> End Sub
Ciao.
--
Sergio MAZZA


title: Query di eliminazione

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:49632256$0$727$5fc...@news.tiscali.it...

Perdona la banalità della domanda, ma come avrai capito sono un principiante
che va avanti spulciando qua e la su internet...
ho fatto le modifiche che mi avevi sggerito e sono riuscito ad eliminare i
record che volevo.
Provando a lanciare la Query da un'altro db ho usato questo codice:
Dim db As Database
Dim SQL As String
Dim rs As Recordset
Set db = OpenDatabase("C:\& path &\db.mdb", False, False)
Set rs = db.OpenRecordset("TABELLA")
SQL = "DELETE TABELLA.Campo1 FROM TABELLA WHERE ((TABELLA.Campo1) Is Null)"
db.Execute SQL
db.Close
e sembrava funzionasse.
grazie.
Luciano.


title: Query di eliminazione

text:
On 7 Gen, 00:51, "Luciano" <
luxd...@libero.it
> wrote:
> "Sergio MAZZA" <
sergioma...@tiscali.it
> ha scritto nel messaggionews:49632256$0$727$5fc...@news.tiscali.it...
>
>
>
> > "Luciano" <
luxd...@libero.it
> ha scritto nel messaggio

> Luciano.- Nascondi testo citato
>
> - Mostra testo citato -
Io la scriverei così:
DELETE * FROM TABELLA WHERE [Campo1] IS Null
@Alex


title: Controllo partita Iva

author: Mimmo

text:
Ho provato ad inserire la routine del controllo della partita iva in un
modulo generale, e poi a richiamare quel modulo dall'evento su Invio del
campo denominato Piva della maschera;
il controllo sperato però non viene effettuato, poichè inserendo numeri a
caso mi accetta tutto
Grazie per l'aiuto.


title: Controllo partita Iva

author: Lorenzo Coronati

text:
Scrisse "Mimmo" <
dom...@tin.it
>:

l'evento "invio" si verifica quando il ctl riceve il focus
vedi l'help su beforeupdate
--
Lorenzo Coronati
--
ICDA Forever official member
<<...buona la pasta coi ricci>>
---


title: problemi posta elettroica

author: Carlo D.

text:
ho usato i programmi presenti nel sito comune, per realizzare un programmino
per l'invio della posta eletronica, ma con Xp non funziona. avete qualche
soluzione  da adottare ?
Grazie Carlo


title: Database aperto

author: Valerio Valentini

text:
Devo controllare se un certo database è aperto, a parte inserirci una
maschera all'avvio e controllare se quella maschera è caricata, c'è un modo
per sapere se un'applicazione è aperta o caricata?
Ho provato sul sitocomune ma non ho trovato nulla, mi sembra strano, non è
una cosa molto usata?
Ciao Valerio.


title: Database aperto

text:
"Valerio Valentini" <
ijv...@tin.it
> ha scritto nel messaggio
news:BExzc.333286$hc5.14...@news3.tin.it...

Ho trovato indicazioni sul controllo della presenza dell'ldb, ma cosa devo
scrivere nel codice per controllare se esiste l'ldb, il percorso del
database me lo so trovare.
Poi spiegatemi una cosa! Perchè ogni volta che faccio una ricerca con Google
scrivendo:
database aperto group:it.comp.appl.access
non trovo nulla, mentre se accedo con il link:
http://groups.google.it/groups?hl=it&lr=&ie=UTF-8&q=connessione&btnG=Cerca&meta=group%3Dit.comp.appl.access
indicatomi da Sergio Mazza e gli cambio la parola connessione con database
aperto trovo tutto?
ciò che trovo scritto nella casella di ricerca è identico!
Ciao Valerio.


title: Database aperto

author: MA

text:
"Valerio Valentini" <
ijv...@tin.it
> ha scritto nel
messaggio
news:vRxzc.466566$rM4.19...@news4.tin.it...
>
> "Valerio Valentini" <
ijv...@tin.it
> ha scritto
nel messaggio
> news:BExzc.333286$hc5.14...@news3.tin.it...
> > Devo controllare se un certo database è
aperto, a parte inserirci una
> > maschera all'avvio e controllare se quella
maschera è caricata, c'è un
> modo
> > per sapere se un'applicazione è aperta o
caricata?
> > Ho provato sul sitocomune ma non ho trovato
nulla, mi sembra strano, non è
> > una cosa molto usata?
> >
> > Ciao Valerio.
> >
> >
> Ho trovato indicazioni sul controllo della
presenza dell'ldb, ma cosa devo
> scrivere nel codice per controllare se esiste
l'ldb, il percorso del
> database me lo so trovare.
if  dir(tuadir.ldb) <>"" then
>
> Poi spiegatemi una cosa! Perchè ogni volta che
faccio una ricerca con Google
> scrivendo:
>
> database aperto group:it.comp.appl.access
>
> non trovo nulla, mentre se accedo con il link:
>
>
http://groups.google.it/groups?hl=it&lr=&ie=UTF-8&q=connessione&btnG=Cerca&meta=group%3Dit.comp.appl.access
>
> indicatomi da Sergio Mazza e gli cambio la
parola connessione con database
> aperto trovo tutto?
> ciò che trovo scritto nella casella di ricerca è
identico!
>
> Ciao Valerio.
Ah Valè, è che sei raccomandato: siamo in Italia o
no???
MAssimiliano


title: Database aperto

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:YWyzc.5477$%l2....@news.edisontel.com...
>
> if  dir(tuadir.ldb) <>"" then
>
funge persino... :)
>
>
>
>
> Ah Valč, č che sei raccomandato: siamo in Italia o
> no???
> MAssimiliano
forse si, ma soprattutto dopo aver acceso il cervello mi sono accorto che
oltre ad indicargli il gruppo č abbastanza funzionale anche selezionare la
ricerca per gruppi e non quella web.
Ciao e grazie per la funzione.
Valerio


title: da access 2000 a 97

author: Alessandro

text:
Ciao ragazzi,
ho convertito un db da access 2000 a 97  e la grandezza del file č passata
da 16,6 mb a meno di uno.
E' possibile???
Alessandro


title: da access 2000 a 97

author: Luciano (DOC)

text:
"Alessandro" <
abia...@freemail.it
> wrote in message
news:8juK6.8350$9C4.1...@news2.tin.it...
> ho convertito un db da access 2000 a 97  e la grandezza del file č passata
> da 16,6 mb a meno di uno.
> E' possibile???
Forse aveva bisogno di una compattata....
Saluti.
Luciano
(DOC)


title: da access 2000 a 97

text:
"Luciano (DOC)" <
lucia...@sitocomune.com
> ha scritto nel messaggio
news:9ddrvv$hhrm4$3...@ID-86073.news.dfncis.de...
>
> "Alessandro" <
abia...@freemail.it
> wrote in message
> news:8juK6.8350$9C4.1...@news2.tin.it...
>
> > ho convertito un db da access 2000 a 97  e la grandezza del file è
passata
> > da 16,6 mb a meno di uno.
> > E' possibile???
>
> Forse aveva bisogno di una compattata....
> Saluti.
>
> Luciano
> (DOC)
>
>
Si, hai ragione,  aveva bisogno di una compattata, ma devo dire che la copia
per access 97 presenta tanti e tanti problemi con office 97 professional che
mi conviene rifare tutto da capo.
E' proprio così oppure sono io...????


title: da access 2000 a 97

author: Expo

text:
"Alessandro" <
abia...@freemail.it
> ha scritto nel messaggio
news:BrAK6.890$cU2....@news1.tin.it...
> Si, hai ragione,  aveva bisogno di una compattata, ma devo dire che la
copia
> per access 97 presenta tanti e tanti problemi con office 97 professional
che
> mi conviene rifare tutto da capo.
> E' proprio così oppure sono io...????
A me ha fatto il contrario (97 a 2000)
Prova a fare un nuovo db in 97 e ad importare tutti gli oggetti dal db
convertito


title: Tabella a doppia entrata

author: Daniele

text:
Ho cercato prima su Google gruppi e poi sul sito comune, ma
non sono riuscito a trovare la risposta e non mi sembra di aver
visto l'argomento trattato sul ng.
Ho bisogno di creare una tabella a doppia entrata, dove nelle
righe c'e' il conto di contabilita' e nelle colonne i giorni.
Nelle caselle inseriro' giorno per giorno l'importo per ogni conto
che mi interessa.
La complicazione maggiore e' che deve essere registrato anche
l'utente che inserisce quell'importo.
Ho creato una tabella con tutti i conti (codice e descrizione) e
una tabella per gli utenti.
Ho creato poi una tabella chiamata movimenti, con il campo
idmovimento, nr conto, utente, importo, data.
Il campo nr conto e' di ricerca e prende il valore dalla tabella
Conti.
Il problema e' che cosi' facendo la tabella non e' a doppia entrata
ma riga per riga seleziono il conto e inserisco l'importo.
Quello che invece ogni singolo utente deve vedere e' simile
a un foglio excel, con i conti gia' tutti esposti e diverse colonne per
inserire l'importo,
Qualcuno saprebbe darmi un aiuto?
Grazie
°°° Posted from X-Privat Free NNTP server -
www.x-privat.org
 °°°


title: Tabella a doppia entrata

author: Alessandro Cara

text:
Daniele wrote:
>
> Ho cercato prima su Google gruppi e poi sul sito comune, ma
> non sono riuscito a trovare la risposta e non mi sembra di aver
> visto l'argomento trattato sul ng.
>
> Ho bisogno di creare una tabella a doppia entrata, dove nelle
> righe c'e' il conto di contabilita' e nelle colonne i giorni.
ti serve excel. Credo che non hai trovato trattata roba simile poiche' in
access, credo, nessuno si mette a fare una cosa del genere
> Quello che invece ogni singolo utente deve vedere e' simile
> a un foglio excel,
come detto prima, usa excel
--
a.cara
Togli qualcosa dall'email


title: Tabella a doppia entrata

author: namor

text:
Daniele ha scritto:

E' sconsigliabile usare una tabella come quella che vuoi tu perchè per
ogni giorno nuovo dovresti inserire un nuovo campo.
La tabella che hai già, con idmovimento, nr conto, utente, importo, data è
più corretta e più gestibile.
Per ottenere la visualizzazione che ti serve fai una query a campi
incrociati basata su quella tabella e metti
- nr conto come intestazione riga (raggruppamento)
- data come intestazione colonna (raggruppamento)
- importo come valore (somma)
Se ti serve puoi definire più di una intestazione riga, per esempio puoi
aggiungere anche l'utente.
Namor
--

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


title: Tabella a doppia entrata

text:
> E' sconsigliabile usare una tabella come quella che vuoi tu perchè per
> ogni giorno nuovo dovresti inserire un nuovo campo.
> La tabella che hai già, con idmovimento, nr conto, utente, importo, data è
> più corretta e più gestibile.
Bene, e' quello che volevo sapere, e' l'amministrazione che ha chiesto
questo programma, non avevo idea di come fare, ma prima di rispondere
che non si poteva volevo un conforto (sapete com'e' i capi non vogliono
sentirsi dire che una cosa non si puo' fare, possono non avere idea di cosa
sia Access, ma se si mettono in testa che Access deve fare una cosa, non
accettano scuse).
Adesso mostro i vostri messaggi cosi' sono salvo :-)



title: Tabella a doppia entrata

text:
Daniele ha scritto:


A dirla tutta si può fare anche nell'altro modo, ma è molto più complicato
e ti può dare problemi quando raggiungi il numero massimo di campi
gestibile dalla tabella, oltre che violare tutte le norme di base sulla
progettazione di un buon database.



title: Tabella a doppia entrata

text:
"namor" <
na...@nospm.inwind.it
> ha scritto nel messaggio news:bk6ng7$165$1...@news.newsland.it...
> Daniele ha scritto:
>
> ...
> A dirla tutta si può fare anche nell'altro modo, ma è molto più complicato
> e ti può dare problemi quando raggiungi il numero massimo di campi
> gestibile dalla tabella, oltre che violare tutte le norme di base sulla
> progettazione di un buon database.
> Namor
>
>
Creando un campo per ogni giorno del mese immagino.
Ma non e' l'ideale.
Pensavo magari a un ciclo con indici di riga e colonna e un
pulsante che creasse in automatico la tabella ogni mese
partendo dalla tabella Conti gia' esistente, ma oltre a non
sapere come fare, temo complicherebbe solo le cose.
Grazie.



title: Tabella a doppia entrata

text:
Daniele wrote:
>
> > E' sconsigliabile usare una tabella come quella che vuoi tu perchè per
> > ogni giorno nuovo dovresti inserire un nuovo campo.
> > La tabella che hai già, con idmovimento, nr conto, utente, importo, data è
> > più corretta e più gestibile.
>
> Bene, e' quello che volevo sapere, e' l'amministrazione che ha chiesto
> questo programma, non avevo idea di come fare, ma prima di rispondere
> che non si poteva volevo un conforto (sapete com'e' i capi non vogliono
> sentirsi dire che una cosa non si puo' fare, possono non avere idea di cosa
> sia Access, ma se si mettono in testa che Access deve fare una cosa, non
> accettano scuse).
n.b. la query che ti  ha correttamente segnalato namor non mi risulta sia
aggiornabile. E' di sola visualizzazione



title: Gestione ordini??? help!

author: Claudio De Luca

text:
DEvo realizzare un database per la gestione ordini contenente le seguenti
informazioni:
1)Anagrafica clienti
2)Inserimento ordine
3)Stato di avanzamento degli ordini
Ora ho visto il modello presente in Access Gestione Ordini e va piu che bene
pero nonm ha lo stato di avanzamento, sapete come aggiungerlo? sapete anche
dirmi come eliminare la tabella metodo di spedizione e ricompilare la maschera?
Oppue sapete dove trovare qualche tutorial o cose gia pronte?
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Template per Access

author: Harry Evans

text:
Qualcuno sa se esiste qualche sw o macro per Access 97 che permetta di
inserire un template come dico io in certi moduli, e in altri un altro ecc.
Ad es. se creo una fn che deve aprire una scheda voglio scrivere certe cose,
se deve aprire un report altre, se devo creare un recordset ecc.
--
*****************************
** Harry Evans - Bolzano
** Clipper Specialist & Magician
** e-mail:
harry...@tin.it
*****************************
---------------------------------------------------------
->C.N.G.E.I. - Sezione di Bolzano
->
www.edp-progetti.it/cngei.bz
---------------------------------------------------------


title: Problemi con la somma di ore

author: Lucio

text:
Salve a tutto il NG,
il mio tormento assillante sono la gestione dei tempi...
Veniamo al dunque;
Ho una tabella che mi gestisce i turni ed una campo dove viene inserito
quanto straordinario vine effettuato da quel dipendente in quella giornata.
Il campo che contiene questo valore è in formato data/ora "hh.nn" in una
query vorre sommare le ore di straordinario di ogni dipendente arrontondando
per la mezz'ora, ovvero <30,0 > 30 ,1.
Non riesco a gestir questi valori in modo appropriato.
Dopo di che vorrei esportare il tutto su di un report facendo la somma
totale dello straordinario effettuato.
Grazie.
Lucio


title: Problemi con la somma di ore

author: Roberto da casa

text:
"Lucio" <nap...@NOSPAM.it> ha scritto nel messaggio
news:5cx1a.157358$0v.44...@news1.tin.it...
> Salve a tutto il NG,
> il mio tormento assillante sono la gestione dei tempi...
> Veniamo al dunque;
> Ho una tabella che mi gestisce i turni ed una campo dove viene inserito
> quanto straordinario vine effettuato da quel dipendente in quella
giornata.
> Il campo che contiene questo valore è in formato data/ora "hh.nn" in una
> query vorre sommare le ore di straordinario di ogni dipendente
arrontondando
> per la mezz'ora, ovvero <30,0 > 30 ,1.
Non mi è chiaro come vuoi "arrotondare per la mezz'ora": se per eccesso, per
difetto o secondo quale altro criterio.
> Non riesco a gestir questi valori in modo appropriato.
Anche in questo caso non si capisce cosa intendi per "modo appropriato".
> Dopo di che vorrei esportare il tutto su di un report facendo la somma
> totale dello straordinario effettuato.
Poiché normalmente le ore staordinarie servono per essere moltiplicate per
un costo orario, invece di calcolarle in un campo di tipo Data/ora espresse
in ore e minuti, calcolale in un campo numerico in doppia precisione
espresse in ore e centesimi di ore (insomma 5 ore e mezzo non come 5:30 ma
come 5,50); per ottenere questo è sufficiente moltiplicare il valore che
oggi hai per 24 ed impostando al controllo che visualizza il risultato il
formato a Fisso con due decimali.
Così facendo non avrai alcun problema a visualizzare la somma delle ore
anche se superano le 24 ore, sarà immediato ottenere l'importo dello
straordinario facendo una semplice moltiplicazione ed infine sarà molto più
facile effettuare gli arrotondamenti di cui parli.
Usando poi delle funzioni adeguate potrai sempre ricostruire la
visualizzazione in ore e minuti anche di valori espressi in ore e centesimi
di ore.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
> Grazie.
> Lucio


title: Problemi con la somma di ore

author: computer valley

text:
Il problema che si pone sulla somma del totale dello straordinario di tutti
i dipendenti e che il report fa una somma non tenendo conto degli
arrotondamneti già effettuati ma ricominciando da capo per cui se due
dipendenti avevamo fatto 45 min. di straordinario ed in primo luogo questo
era stato arrotondato a 2 ore, una per ogniuno quando mi fà il totale di
tutti e due i dipendenti questo viene sommato come 45+45 per cui vede 90 e
mi arrotonda a 1!
Aiutooooo!
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:P8K1a.101651$ZE.28...@twister2.libero.it...



title: Problemi con la somma di ore

text:
"computer valley" <
c.va...@tin.it
> ha scritto nel messaggio
news:ADL1a.159754$0v.44...@news1.tin.it...
> Il problema che si pone sulla somma del totale dello straordinario di
tutti
> i dipendenti e che il report fa una somma non tenendo conto degli
> arrotondamneti già effettuati ma ricominciando da capo per cui se due
> dipendenti avevamo fatto 45 min. di straordinario ed in primo luogo questo
> era stato arrotondato a 2 ore, una per ogniuno quando mi fà il totale di
> tutti e due i dipendenti questo viene sommato come 45+45 per cui vede 90 e
> mi arrotonda a 1!
> Aiutooooo!
Creati una query di raggrupamento, raggruppata per dipendente, con la quale
determini il totale degli staordinari arrotondato per ogni dipendente.
Usa tale query come origine record del report e nel report non effettuare
alcun arrotondamento per il totale generale.



title: Problemi recordSource/Origine Record

author: Massimiliano

text:
Buongiorno a tutti.
Oggi mi č capita una cosa molto strana.
Ho una maschera continua in cui ho impostato come origine record una query
che prende tutti i campi di una tabella e li filtra per il campo pagato
(pagato = No).
Ho pensato di lasciar vuota la proprietą origineRecord della maschera e di
scrivere del codice:
Private Sub Form_Open(Cancel As Integer)
    Me.RecordSource = "SELECT
ID_Insoluto,Ragione_Sociale,Comune,Indirizzo,Banca,Scadenza, " & _
                      "Importo,Pagato FROM tbl_INSOLUTI WHERE
(((tbl_INSOLUTI.Pagato)=No))"
End Sub
All'apertura della maschera va tutto bene, ma se chiudo a riapro Access, mi
fa vedere solo un record alla volta.
E' come se la maschera si fosse trasformata in una maschera singola.
Dove ho sbagliato?
Grazie.


title: Problemi recordSource/Origine Record

author: Basetta

text:
On Wed, 23 Jan 2002 13:02:13 GMT, "Massimiliano"
<
massimo...@operamail.com
> wrote:
>Buongiorno a tutti.
>Oggi mi è capita una cosa molto strana.
>
>Ho una maschera continua in cui ho impostato come origine record una query
>che prende tutti i campi di una tabella e li filtra per il campo pagato
>(pagato = No).
>
>Ho pensato di lasciar vuota la proprietà origineRecord della maschera e di
>scrivere del codice:
>
>Private Sub Form_Open(Cancel As Integer)
>    Me.RecordSource = "SELECT
>ID_Insoluto,Ragione_Sociale,Comune,Indirizzo,Banca,Scadenza, " & _
>                      "Importo,Pagato FROM tbl_INSOLUTI WHERE
>(((tbl_INSOLUTI.Pagato)=No))"
>End Sub
>
>All'apertura della maschera va tutto bene, ma se chiudo a riapro Access, mi
>fa vedere solo un record alla volta.
>E' come se la maschera si fosse trasformata in una maschera singola.
>
>Dove ho sbagliato?
>
>Grazie.
>
Io ci aggiungerei un me.refresh dopo che hai assegnato alla proprietà
la query.


title: backup

author: TONY

text:
Buongiorno a tutti..ho delle applicazioni che girano con MSDE e avrei la
necessità di improntare un piano di backup...per comodità ho installato (da
portoghese ;-) ) EM sui client , ma adesso lo dovrò disinstallare..il
problema è questo.Con la versione MSDE non ho la disponibilità di alcuni
parametri di impostazione , relativi ad es. al periodo trascorso il quale va
eliminito il log,il report etc...ma il fatto grave è che anche via codice
usando OSQL il problema persiste...avete qualche dritta da darmi?Grazie
.....


title: MSDE

author: Fumok

text:
Mi sto avvicinando a MSDE, ho ancora tanta confusione e perciň vi chiedo se
il mio modus operndi č corretto (almeno concettualmnte).
Ho 1,5 Gb di tabelle DBF su un file server.
Devo fare query abbastanza complesse.
Jet ci mette anche 60 secondi per ottenere i risultati a video.
Penso di risolvere cosě ...
Sul server dove ci sono i dbf installo MSDE.
Su un qualsiasi client creo un ADP.
Nell'ADP attravero MSDE collego le tabelle che mi servono.
Non traferendo piů tutta la tabella attraverso la LAN ma solo quei pochi
record che mi servono ottengo ottime prestazioni.
Sono nel giusto?
Grazie
--
Fumok
[Toglimi le MUTANDE se vuoi rispondermi]


title: MSDE

author: SunRex

text:
"Fumok" <gabriele....@MUTANDEadriacom.it> ha scritto nel messaggio
news:Xns93C6AA2...@194.247.160.50...

Devi migrare il db in MSDE cosě che le elaborazioni le fai fare a lui
e sul tuo FE ricevi solo i risultati.
Direi che sei sulla strada buona.
SunRex


title: MSDE

text:
"SunRex" <
sunrexs...@hotmail.com
> ha scritto in news:iJaVa.35240
$
Za4.1...@news2.tin.it
:
> Devi migrare il db in MSDE cosě che le elaborazioni le fai fare a lui
Se intendi che devo trasformare i dbf non posso. Venegono usati da un altro
gestionale. Se intendi invece che devo fare l'upsize del mio mdb allora ci
siamo. Tra le altre cose pensavo di crearlo ex novo, o fare prima almeno
die test sulle query piů critiche partendo da zero.
> e sul tuo FE ricevi solo i risultati.
Il mio Fe in questo caso sarebbe il progetto ADP vero? Mentre il BE č il
server MSDE?
> Direi che sei sulla strada buona.
Non ci contare troppo, come vedi mi basta un nulla per confodermi.
Comunque grazie.



title: MSDE

text:
"Fumok" <gabriele....@MUTANDEadriacom.it> ha scritto nel messaggio
news:Xns93C6ABB...@194.247.160.50...
> "SunRex" <
sunrexs...@hotmail.com
> ha scritto in news:iJaVa.35240
> $
Za4.1...@news2.tin.it
:
>
> > Devi migrare il db in MSDE cosě che le elaborazioni le fai fare a lui
>
> Se intendi che devo trasformare i dbf non posso. Venegono usati da un
altro
> gestionale. Se intendi invece che devo fare l'upsize del mio mdb allora ci
> siamo. Tra le altre cose pensavo di crearlo ex novo, o fare prima almeno
> die test sulle query piů critiche partendo da zero.
Per migrazione si intende normalmente l'upsize.
> > e sul tuo FE ricevi solo i risultati.
>
> Il mio Fe in questo caso sarebbe il progetto ADP vero? Mentre il BE č il
> server MSDE?
Perfetto.
> > Direi che sei sulla strada buona.
>
> Non ci contare troppo, come vedi mi basta un nulla per confodermi.
> Comunque grazie.
Non mi sembri molto confuso.Cmq guardati qualche libro sull'upsize da access
a MSDE o SQL Server 2000
perchč non č cosě immediato come mamma M$ fa credere.Sul web trovi le
recensioni di diversi libri e sul sito
http://www.visual-basic.it
 alla sezione articoli tecnici vatti a leggere
quello intitolato "MSDE Istruzioni per l'uso "
Buon lavoro
SunRex


title: Avviso di scadenza...si può fare ??

author: GM

text:
ciao a tutti... vorrei gentilmente chiedere se una cosa si pùo fare in
quanto ora lo faccio a manina ed il problema, visto la dimensione del db
comincia a diventare preoccupante....oltre 3500 record di clienti !!
ho un Db anagrafico in cui inserisco i dati di un cliente ed una
sottomaschera (quindi 1>molti) a cui distribuisco alcuni tipi di
giornali e periodici...nella sottomaschera ho 2 campi Prodotto e
Quantità
e quando stampo mi da la data di stampa giornaliera...mi chiedevo se è
possibile costruire qualche routine/codice che mi avvertisse della
scadenza ossia dopo 30 - 60 oppure 90 giorni dalla data di stampa...
grazie per l'aiuto...


title: Avviso di scadenza...si può fare ??

author: Pablitomf [Acces]

text:
"GM" <
to...@toglilibero.it
> ha scritto nel messaggio
news:DOs9i.30008$U01.3...@twister1.libero.it...

Premettendo che "tutto", o "quasi", si può fare,
basta che ad apertura DB fai partire una form basata su una bella query che
abbia un bel campo calcolato con il datediff (vedi nell'help) in giorni
sulla data stampa, con criterio messo a >29 o a >59 o a >89 o tutti e 3 se
vuoi vedere tutte e 3 le scadenze...
;-|
Fammi sapere.
--
--
Ciao
Pablitomf (Maurizio Facciuti)
-----------------------------------------------------------------
Access: 97, 2000, XP e 2003
ASP
-----------------------------------------------------------------
http://www.accessgroup.it/
-----------------------------------------------------------------
Il mio motto :
""Non mi fido molto delle statistiche, perchè un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media."


title: Avviso di scadenza...si può fare ??

text:
"Pablitomf [Acces]" <
keiko...@libero.it
> ha scritto nel messaggio
news:f45m4m$423$1...@tdi.cu.mi.it...
> "GM" <
to...@toglilibero.it
> ha scritto nel messaggio
>> ho un Db anagrafico in cui inserisco i dati di un cliente ed una
>> sottomaschera (quindi 1>molti) a cui distribuisco alcuni tipi di
>> giornali e periodici...nella sottomaschera ho 2 campi Prodotto e
>> Quantità
>> e quando stampo mi da la data di stampa giornaliera...mi chiedevo se
>> è possibile costruire qualche routine/codice che mi avvertisse della
>> scadenza ossia dopo 30 - 60 oppure 90 giorni dalla data di stampa...
>
> Premettendo che "tutto", o "quasi", si può fare,
> basta che ad apertura DB fai partire una form basata su una bella
> query che abbia un bel campo calcolato con il datediff (vedi
> nell'help) in giorni sulla data stampa, con criterio messo a >29 o a
>  >59 o a >89 o tutti e 3 se vuoi vedere tutte e 3 le scadenze...
> Fammi sapere.
------------------------------------->
Ciao e grazie per avermi risposto...premetto
anzitutto che non sono praticissimo di Access, il Db che uso non l'ho
fatto io
e non ne sarei stato capace...anche se qualche piccola modifica l'ho
effettutata.
per caso hai qualche db di prova o esempio nella quale possa "copiare" o
"importare"
la tua soluzione ???
infine, come funzionerebbe ?? nel senso che aprendo il db come verrei
avvisato delle scadenze in atto ???
Grazie


title: Avviso di scadenza...si può fare ??

text:
"GM" <
to...@toglilibero.it
> ha scritto nel messaggio
news:7SN9i.31187$%k.13...@twister2.libero.it...

Bhè i metodi di avviso possono davvero essere tanti, per cui, dipende solo
da come, quando e cosa vuoi che il sistema ti dia come informazione di
avviso...
db di esempio non ne ho a riguardo, ma la cosa è molto ma molto più semplice
di quello che pensi:
immagino tu abbia qualcosa del ganere (tu adatta alle tue esigenze) :
TABELLA_Anagrafica
- CampoID
- Campo1_RagioneSociale
TABELLA_Prodotti
- CampoID
- CampoID_Anagrafiche
- Campo_Prodotto
- Campo_Quantità
- Campo_ScadenzaGiornaliera
Messe in relazione con TABELLA_Anagrafiche.CampoID e
TABELLA_Prodotti.CampoID_Anagrafiche
Potrei fare una query del genere :
SELECT Tabella_Prodotti.CampoID_Anagrafiche,
Tabella_Prodotti.Campo_Prodotto,
Max(Tabella_Prodotti.Campo_StampaGiornaliera) AS Stampa,
Min(DateDiff("d",[Campo_StampaGiornaliera],Date())) AS Scaduto
FROM Tabella_Prodotti
GROUP BY Tabella_Prodotti.CampoID_Anagrafiche,
Tabella_Prodotti.Campo_Prodotto;
che ti darà le scadenze ultime per raggruppamento di prodotti. ;-)
Spero di esser stato chiaro, altrim. fai un fischio.
Pablitomf


title: Avviso di scadenza...si può fare ??

text:
"Pablitomf [Acces]" <
keiko...@libero.it
> ha scritto nel messaggio
news:f48c0v$nhc$1...@tdi.cu.mi.it...
[[  CUT ]]
>>> Premettendo che "tutto", o "quasi", si può fare,
>>> basta che ad apertura DB fai partire una form basata su una bella
>>> query che abbia un bel campo calcolato con il datediff (vedi
>>> nell'help) in giorni sulla data stampa, con criterio messo a >29 o a
>>>  >59 o a >89 o tutti e 3 se vuoi vedere tutte e 3 le scadenze...
>>> Fammi sapere.
>> ------------------------------------->

..............
Ciao Pablitomf... tra ieri ed oggi ho commesso, (non mi metto mai le
mani a posto :-((
un casino in quanto mi sono messo a smanettare nel Db e invece di fare
un passo avanti ne ho fatto 2 indietro... nel senso che ho cancellato
che quando stampo il report mi da la data di stampa..ora non la vedo.
saresti così gentile, sempre che tu lo voglia, se te lo spedisco nella
tua mail privata (è piccolino sono 330 Kb) di attivare la data di stampa
e magari la query come sopra ??
il db è grossomodo come hai indicato tu sopra.. solo che ha il calcolo
del CF in automatico ed altre cosette
interessanti...ed è destinato ad uno scopo diverso di quello che ho
scritto in origine...(x privacy).
fammi sapere
Ciao Giuseppe


title: Avviso di scadenza...si può fare ??

text:
> Ciao Pablitomf... tra ieri ed oggi ho commesso, (non mi metto mai le mani
> a posto :-((
> un casino in quanto mi sono messo a smanettare nel Db e invece di fare un
> passo avanti ne ho fatto 2 indietro... nel senso che ho cancellato che
> quando stampo il report mi da la data di stampa..ora non la vedo.
> saresti così gentile, sempre che tu lo voglia, se te lo spedisco nella tua
> mail privata (è piccolino sono 330 Kb) di attivare la data di stampa e
> magari la query come sopra ??
> il db è grossomodo come hai indicato tu sopra.. solo che ha il calcolo del
> CF in automatico ed altre cosette
> interessanti...ed è destinato ad uno scopo diverso di quello che ho
> scritto in origine...(x privacy).
> fammi sapere
> Ciao Giuseppe
>
Mmmmmm!!!!!!
Questo non si fa!
Dammelo và... pablitomf ( at ) virgilio ( punto ) it



title: Su EXIT

text:
Ciao a Tutti

questa routine sotto mi permette di inserire nelle varie caselle combinate
alcuni valori se nella casella di testo " NDocumentoSpedizione" c'è un valore .

Private Sub NDocumentoSpedizione_Exit(Cancel As Integer)

    If Me.NDocumentoSpedizione.Value = True Then

    Else
        Me.TSP = "FI"
            Me.Corriere = "Express Mail Service CRONO"
                Me.TipoSpedizione = "EXPRESS - CRONO"
                    Me.ZonaSpedizione = "Europa + Extra Unione"
                         Me.TipoOrdine = "Ebay"
                            Me.Pagamento = "Paypal"

                            End If
------------------------------------------------------------------------------------------------------
Ora però dovrei far fare la stessa operazione ma cambiando alcuni dati :
Me.TSP = "CO"
            Me.Corriere = "Express Mail Service CRONO"
                Me.TipoSpedizione = "EXPRESS - CRONO"
                    Me.ZonaSpedizione = "Europa"
                         Me.TipoOrdine = "Ebay"
                            Me.Pagamento = "Paypal"
se  il valore della casella testo " NDocumentoSpedizione"  inizia con CB  (CB1248763514)
------------------------------------------------------------------------------------------------------
e fare un operazione simile  :
Me.TSP = "FI"
            Me.Corriere = "Express Mail Service CRONO"
                Me.TipoSpedizione = "EXPRESS - CRONO"
                    Me.ZonaSpedizione = "Extra Unione"
                         Me.TipoOrdine = "Ebay"
                            Me.Pagamento = "Paypal"

se la casella testo  " NDocumentoSpedizione"  inizia con EB   (EB5478934445)

spero di essere stato chiaro

Grazie comunque
Giuseppe


title: Su EXIT

author: Roberto Fabbri

text: Io non farei mai un codice del genere. Ad ogni nuovo caso devi riscriverlo. Ti serve una tabella in più.


title: Su EXIT

text:
A parte quella insensata indentazione drl codice... e ripeto insensata... quello che fai mi lascia estremamente perplesso in termini di strutturare database.
Come sia possibile avere in una maschera le descrizioni di campi che invece dovrebbero essere chiavi esterne... quindi impossibili da editare... francamente non me lo spiego.
Secondo me di tabelle ne mancano molte altro che 1... oppure questo non è un db relazionale ma un tabellone stile Excel.

Con le premesse e senza una chiara presentazione della struttura telazionale concordo sull'ipotesi che sia da ristrutturare/rifare completamente.

@Alex


title: Su EXIT

author: BFS

text:

se ho ben capito
se c'è il numero spedizione hai tre casi: se inizia per Cb hai un caso
se inizia per Eb un altro
tutto il tresto il terzo caso

quindi

if not is null Me.NDocumentoSpedizione then
		select case left(me.NDocumentoSpedizione,2)

			case "CB"
				Me.TSP = "CO"
				Me.Corriere = "Express Mail Service "
				Me.TipoSpedizione = "EXPRESS - CRONO"
				'...etc etc

			case "EB"
				 Me.TSP = "FI"
		                 Me.Corriere = "Express Mail "
				 Me.TipoSpedizione = "EXPRESS - CRONO"
				Me.ZonaSpedizione = "Extra Unione"
				'...etc etc

			case else
				 Me.TSP = "FI"
		                 Me.Corriere = "Express Mail "
				 Me.TipoSpedizione = "EXPRESS - CRONO"
			     Me.ZonaSpedizione = "Europa + Extra Unione"
				'...etc etc

			end select
end if


title: Su EXIT

text:
>
> if not is null Me.NDocumentoSpedizione then
> 		select case left(me.NDocumentoSpedizione,2)
>
> 			case "CB"
> 				Me.TSP = "CO"
> 				Me.Corriere = "Express Mail Service "
> 				Me.TipoSpedizione = "EXPRESS - CRONO"
> 				'...etc etc
>
> 			case "EB"
> 				 Me.TSP = "FI"
> 		                 Me.Corriere = "Express Mail "
> 				 Me.TipoSpedizione = "EXPRESS - CRONO"
> 				Me.ZonaSpedizione = "Extra Unione"
> 				'...etc etc
>
> 			case else
> 				 Me.TSP = "FI"
> 		                 Me.Corriere = "Express Mail "
> 				 Me.TipoSpedizione = "EXPRESS - CRONO"
> 			     Me.ZonaSpedizione = "Europa + Extra Unione"
> 				'...etc etc
>
> 			end select
> end if

GRAZIE BFS

Fuzione perfettamente ed era quello che volevo  :

If Not IsNull(Me.NDocumentoSpedizione) Then
                Select Case Left(Me.NDocumentoSpedizione, 2)

                        Case "CB"
                                Me.TSP = "CO"
                                Me.Corriere = "Express Mail Service CRONO"
                                Me.TipoSpedizione = "EXPRESS - CRONO"
                                Me.ZonaSpedizione = "Europa Unione"
                                Me.TipoOrdine = "Ebay"
                                Me.Pagamento = "Paypal"

                        Case "EB"
                                 Me.TSP = "FI"
                                 Me.Corriere = "EMS - CRONO"
                                 Me.TipoSpedizione = "EXPRESS - CRONO"
                                 Me.ZonaSpedizione = "Europa Extra Unione"
                                 Me.TipoOrdine = "Ebay"
                                 Me.Pagamento = "Paypal"

                        Case Else
                                 Me.TSP = "RA"
                                 Me.Corriere = "Poste Italiane 1"
                                 Me.TipoSpedizione = "Raccomandata"
                                 Me.ZonaSpedizione = "Europa + Extra Unione"
                                 Me.TipoOrdine = "Ebay"
                                 Me.Pagamento = "Paypal"
                        End Select
Grazie ancora .

Volevo solo capire perché sono stato così malamente "maltrattato" da chi è intervenuto , il Database funziona perfettamente ha 24 tabelle tutte relazionate tra loro , svolge lo scopo per cui l'avevo pensato egregiamente.
Lo scopo per cui l'ho fatto è la possibilità di inserire in una form automaticamente con l'importazione di un file CSV i dati di spedizione giornaliere , Importo il file che riempie i campi ( 28) , poi io inserisco solo il peso e il numero DDT in base a queste varianti automaticamente viene inserito il prezzo della spedizione , con l'istruzione sopra in base alle lettere iniziali dei numeri spedizione CB EB RA vengono cambiati i valori di
                                 TSP
                                 Me.Corriere
                                 Me.TipoSpedizione
                                 Me.ZonaSpedizione
                                 Me.TipoOrdine =
                                 Me.Pagamento =
questi valori sono presenti su rispettive tabelle e sono tutte relazionate
con la tabella principale dove vengono registrati tutti dati di una spedizione .

Sicuramente non sarà scritto a regola d'arte ma in fatto di risultato per me è eccellente
Davvero non capisco

Giuseppe


title: Su EXIT

text:
....
> Volevo solo capire perché sono stato così malamente "maltrattato" da chi è intervenuto , il Database funziona perfettamente ha 24 tabelle tutte relazionate tra loro , svolge lo scopo per cui l'avevo pensato egregiamente.
> Lo scopo per cui l'ho fatto è la possibilità di inserire in una form automaticamente con l'importazione di un file CSV i dati di spedizione giornaliere , Importo il file che riempie i campi ( 28) , poi io inserisco solo il peso e il numero DDT in base a queste varianti automaticamente viene inserito il prezzo della spedizione , con l'istruzione sopra in base alle lettere iniziali dei numeri spedizione CB EB RA vengono cambiati i valori di
>                                  TSP
>                                  Me.Corriere
>                                  Me.TipoSpedizione
>                                  Me.ZonaSpedizione
>                                  Me.TipoOrdine =
>                                  Me.Pagamento =
> questi valori sono presenti su rispettive tabelle e sono tutte relazionate
> con la tabella principale dove vengono registrati tutti dati di una spedizione .
>
> Sicuramente non sarà scritto a regola d'arte ma in fatto di risultato per me è eccellente
> Davvero non capisco
>
> Giuseppe

Giuseppe, siamo maggiorenni tutti, non sei stato trattato male, ti sono state fatte notare in modo chiaro degli ERRORI tecnici, che nonostante "FUNZIONI" tutto sono evidenti...
Il NG serve per indicare a chi ha poche basi come si opera, se invece vuoi ricevere la soluzione che soddisfa il tuo modo "ERRATO", devi anche accettare che qualcuno ti faccia notare gli errori e magari invece di fare CALIMERO, fatti qualche domanda... può essere che qualche cosa di migliorativo tu lo veda.

Per il resto... porterai molta pazienza...

@Alex


title: Su EXIT

text:

ovvio che vedere robe tipo:

   If Me.NDocumentoSpedizione.Value = True Then

     Else
         Me.TSP = "FI"

fa rabbrividire :-)

avevo cmq intuito che la tua fonte dati è un tabulato che probabilmente
scarichi da ebay o amazon

io ti ho dato la soluzione ma concordo con gli altri che in base al
codice che hai postato il db non è correttamente normalizzato.

ciao
BFS


title: Su EXIT

text:

Aggiungo in modo da essere TECNICAMENTE chiaro:
L'indentazione del CODICE è una REGOLA che gli sviluppatori si danno per dare un senso gerarchico al codice quando lo si legge, ha un fine di CHIAREZZA INTERPRETATIVA a livello VISIVO.
Tutti i programmatori sanno che l'indentazione si interpreta in un determinato modo, l'inica variabile è il VALORE di INDENTAZIONE che le buone norme non scritte indicano in 4 spazi per ogni LIVELLO di rientro.
Quindi questa è una TECNICA di scrittura del codice, non è un metodo personale per ABBELLIRLO come l'albero di Natale, e come REGOLA se ti vuoi esporre in un NG e pubblicare un tuo codice forse se ti uniformassi allo standard sarebbe meglio, ma di certo se complica la lettura ti viene fatto notare l'insensatezza del lato grafico che toglie senso a quello tecnico.

La strutturazione di un Database è ancora più rigido, e si basa su RELAZIONI(chiavi ed Indici), quello che tu hai chiesto per come lo hai realizzato, ByPassa l'idea di RELAZIONE, ed anche la tua affermazione di avere 24 Tabelle, la puoi fare al BAR... in un ambito TECNICO non solo non significa nulla, ma dimostra che non cogli il FOCUS del discorso che ti è stato fatto notare.
Ne sono prova le assegnazioni dei VALORI Descrittivi a TextBox, la dove invece servirebbe un Riferimento di INDICE RELAZIONALE, e per LookUp(naturale nelle Query o Forzato con estrazioni da codice) si ricavano i Descrittivi degli indici.

Il tuo lavoro è fortemente affetto da errori concettuali gravi, ed il fatto che possa funzionare non è affatto indice che sia fatto correttamente(ANZI).
Nel NG le info date a te servono anche ad altri che leggono e di norma è bene ricevere indicazioni per migliorare, poi da li in avanti se tu non sei tecnicamente in grado di cogliere quanto suggerito è un problema diverso...
L'imnportante è tutelare chi legge e che non ha basi solide dal pensare sia un approccio corretto, anzi meglio sappia distinguere il giusto dallo sbagliato.

Dopo il pippone di mezza estate che mi diverte sempre..., in attesa dei soliti sospetti... saluto tutti anche i calimeri.

@Alex


title: Su EXIT

text:
>
> Dopo il pippone di mezza estate che mi diverte sempre..., in attesa dei soliti sospetti... saluto tutti anche i calimeri.
>
> @Alex

Grazie Alex del super pippone , ma non ti "preoccupare" io non sono ne un programmatore ne uno sviluppatore e tanto meno lo vorrei essere sono troppo vecchio e il mio cervello ha raggiunto il limite massimo di capienza , è come un Hard disk solo che non lo posso sostituire, so che il mio database non è professionale ha tante storture,però ha una cosa molto importante che tu svaluti moltissimo,mi funziona, fa lo scopo prefissato in modo egregio .

Sono contento che BFS abbia capito il mio problema e mi abbia indicato come procedere senza tante pippe, perchè era quello che avevo rispettosamente chiesto.
Però è questo che mi piace, e anche se so che BFS era rabbrividito nel
vedere quella specie di codice ( ma non doveva farlo notare ) .

Dimenticavo,
puoi dire tutto meno che sono calimero perché non lo sono mai stato anzi
sono l'opposto

Ciao Giuseppe


title: Su EXIT

text:

non ti ho fatto il pippone perchè speravo in uno sconto sui ricambi
della moto ahahahaha


title: Su EXIT

text:
> >
>
>
> non ti ho fatto il pippone perchè speravo in uno sconto sui ricambi
> della moto ahahahaha

Bene , quando vuoi , basta chiedere , sempre disponibile
ciao


title: Su EXIT

text:
....
> Grazie Alex del super pippone ....,però ha una cosa molto importante che tu svaluti moltissimo,mi funziona, fa lo scopo prefissato in modo egregio .

Beh allora meglio di così... che te lo dico a fare.

> Ciao Giuseppe

Saluti
@Alex


title: controllo

author: vincenzo barletta

text:
esiste un controllo calendario che oltre ad avere le classiche caselle di
controllo del mese e dell'anno, abbia al posto dei gioni una casella di
controllo modificabile totalmente (assegnare valori, ecc...)
in visual
basic esiste.
grazie
--------------------------------
Inviato via
http://usenet.iol.it


title: Filtro da casella di riepilogo

author: Aleardi Michele

text:
Salve  tutti,
premetto che sono un neofita di Access.
Ho il seguente problema:
In una maschera devo filtrare una tabella tramite una casella di riepilogo.
Non riesco ad utilizzare il valore della casella di riepilogo come filtro.
Spero che qualcuno sia in grado di aiutarmi.
Grazie


title: Filtro da casella di riepilogo

author: Roberto

text:
Aleardi Michele <
ale...@iname.com
> wrote in message
8g180u$9al$1...@nslave1.tin.it...

Non è che sei stato proprio chiaro nell'esporre il tuo caso, pertanto farò
prima un'ipotesi in base a quello che ho capito.
La tua tabella potrebbe contenere tutti i dati anagrafici dei tuoi clienti
ed ha fra l'altro il controllo IDCliente ed il controllo RagioneSociale; tu
vuoi fare una maschera che ti faccia vedere tutti i dati anagrafici dei
clienti, ma non di tutti i clienti ma solamente del cliente la cui ragione
sociale scegli da un elenco contenuto in una casella di riepilogo???
Se questo è il problema puoi fare così:
1) Dichiarati una query partendo dalla tua tabella e che contiene solamente
(e nell'ordine) i campi IDCliente e RagioneSociale; ordina la query su
quest'ultimo campo in maniera crescente; salva la query dandogli come nome
ElencoClienti.
2) Dichiarati una prima maschera,che chiamerai Maschera1,  che abbia come
"Origine record" la tua tabella e che contenga tutti i controlli relativi ai
campi che vuoi visionare e comunque il controllo IDCliente.
3) Dichiarati una seconda maschera, che chiamerai Maschera2 e che non sia
associata a nessuna tabella e a nessuna query; inseriscici una casella di
riepilogo non associata (ovvero nella proprietà "Origine controllo" non deve
esserci scritto nulla) alla quale darai il nome
Elenco; come "Tipo origine riga" della casella di riepilogo scegli
"Tabella/query"; come "Origine riga" della casella di riepilogo metti il
nome della query di cui al punto 1), in questo caso ElencoClienti; verifica
che nella proprietà "Numero colonne" della casella di riepilogo ci sia il
valore 2 e che nella proprietà "Larghezza colonne" la dimensione della prima
colonna sia uguale a 0cm.
4) Dichiarati in Maschera2 una casella di testo non associata che chiamerai
IDCliente; imposta la proprietà "Visibile" di questa casella di testo a NO.
5) Scrivi una routine evento relativa a "Su clic" della casella di riepilogo
che contenga il seguente codice:
        Me!IDCliente = Me!Elenco.Column (0)
6) Iserisci in Maschera2 una sottomaschera che abbia come "Oggetto origine"
Maschera1, e come "Collega campi secondari" e "Collega campi master" la
dicitura IDCliente.
A questo punto, aprendo Maschera2, dovresti vedere nella casella di
riepilogo l'elenco di tutti i clienti e la zona della sottomaschera vuota;
cliccando su una Ragione Sociale della casella di riepilogo, nella
sottomaschera ti dovrebbero comparire tutti i dati anagrafici del cliente
selezionato. Almeno spero :-))
Mi auguro che era quello che ti serviva; ciao
Roberto
3) Nell'Intestazione Maschera (non nel Corpo) della maschera di cui al punto
2) dichiarati una casella di riepilogo non associata (ovvero nella proprietà
"Origine controllo" non deve esserci scritto nulla) alla quale darai il nome
Elenco; come "Tipo origine riga" della casella di riepilogo scegli
"Tabella/query"; come "Origine riga" della casella di riepilogo metti il
nome della query di cui al punto 1), in questo caso ElencoClienti; verifica
che nella proprietà "Numero colonne" della casella di riepilogo ci sia il
valore 2 e che nella proprietà "Larghezza colonne" la dimensione della prima
colonna sia uguale a 0cm.
5) Scrivi una routine evento relativa a "Su clic" della casella di riepilogo
che contenga il seguente codice:
        DoCmd.ApplyFilter , "IDCliente = Elenco.Column (0)"


title: Filtro da casella di riepilogo

text:
Aleardi Michele <
ale...@iname.com
> wrote in message
8g180u$9al$1...@nslave1.tin.it...
> Salve  tutti,
> premetto che sono un neofita di Access.
> Ho il seguente problema:
> In una maschera devo filtrare una tabella tramite una casella di
riepilogo.
> Non riesco ad utilizzare il valore della casella di riepilogo come filtro.
>
> Spero che qualcuno sia in grado di aiutarmi.
>
> Grazie
>
>
*****************************************
SCUSAMI MA NELLA RISPOSTA PRECEDENTE CE N'ERA UN PEZZO DI TROPPO
******************************************



title: uso dell'help per trovare i codici di errore

author: Giuseppe

text:
ciao a tutti
nell'esecuzione di un report che non contiene dati ottengo l'errore 2501.
lo sapete che non riesco a trovarlo sull'help per venire a capo della
situazione?
Io ho un cattivo rapporto con l'help, ma non dispero di impararne l'uso.
Voi del resto ne decantate tanto la completezza.
Come faccio a trovare notizie sui codici di errore?
--
----------------
saluti
Giuseppe


author: Sergio MAZZA

text:
"Giuseppe" <
gcondoLev...@libero.it
> ha scritto nel messaggio
news:c2fgaj$1sjtso$1...@ID-213020.news.uni-berlin.de...

(Acc'97) Nella finestra di debug:
? AccessError(2501)
L'azione | è stata annullata.@È stato utilizzato un metodo dell'oggetto
DoCmd per eseguire un'azione in Visual Basic ma poi è stato scelto Annulla
in una finestra di dialogo.
È stato utilizzato, ad esempio, il metodo Close per chiudere una maschera
modificata, quindi è stato scelto Annulla nella finestra di dialogo in cui
viene richiesto se si desidera salvare le modifiche apportate alla
maschera.@@1@@1
Ciao.
--
Sergio MAZZA


text:
"Giuseppe" <
gcondoLev...@libero.it
> ha scritto nel messaggio
news:c2fgaj$1sjtso$1...@ID-213020.news.uni-berlin.de...
> ciao a tutti
> nell'esecuzione di un report che non contiene dati ottengo l'errore 2501.
>
> lo sapete che non riesco a trovarlo sull'help per venire a capo della
> situazione?
>
Tranne alcuni errori particolari che non è possibile autoducumentare,  per i
quali c'è un riferimento dell'help, per la stragrande maggioranza Access
spiega l'errore al momento che viene segnalato, quindi non vengono spiegati
anche nell'help.
Penso infatti che Access non ti abbia segnalato solo 2501, che è il codice
di errore, ma anche la descrizione dell'errore.
> Io ho un cattivo rapporto con l'help, ma non dispero di impararne l'uso.
> Voi del resto ne decantate tanto la completezza.
Mi sembri abbastanza polemico: penso che nessuno ti abbia mai detto che
nell'help ci sia tutto lo scibile di Access ma sicuramente contiene quasi
tutto quello che serve mentre programmi, sempre che tu lo sappia usare;
comunque nell'help non ci troverai le cose superflue, come le descrizioni
degli errori, visto che Access te le spiattella sotto il naso al momento che
ti segnala l'errore.
Comunque il problema di avere un cattivo repporto con l'help è un problema
tuo e non certo di chi lo adopera con soddisfazione e lo ritiene pertanto
uno strumento indispensabile.
>
> Come faccio a trovare notizie sui codici di errore?
Se per te è vitale avere un elenco di tutti gli errori di Access registra in
un modulo di un tuo database le seguenti tre funzioni:
Function IsNothing(varToTest As Variant) As Integer
    IsNothing = True
    Select Case VarType(varToTest)
        Case vbEmpty
            Exit Function
        Case vbNull
            Exit Function
        Case vbBoolean
            If varToTest Then IsNothing = False
        Case vbByte, vbInteger, vbLong, vbSingle, _
            vbDouble, vbCurrency
            If varToTest <> 0 Then IsNothing = False
        Case vbDate
            IsNothing = False
        Case vbString
            If (Len(varToTest) <> 0 And varToTest <> " ") _
            Then IsNothing = False
    End Select
End Function
Private Sub SetFieldProperty(MyField As Field, _
PropertyName As String, PropertyType As Integer, _
PropertyValue As Variant)
  Const ERR_PROPERTY_NONEXISTENT = 3265
  Const ERR_PROPERTY_NOTFOUND = 3270
  Dim MyProperty As Property
  On Error Resume Next
  MyField.Properties(PropertyName) = PropertyValue
  If Err <> 0 Then
    If Err <> ERR_PROPERTY_NONEXISTENT _
        And Err <> ERR_PROPERTY_NOTFOUND Then
      On Error GoTo 0
      MsgBox "Couldn't set property '" & PropertyName _
      & "' on field '" & MyField.Name & "'", _
      vbExclamation, "SetFieldProperty"
    Else
      On Error GoTo 0
      Set MyProperty = _
      MyField.CreateProperty(PropertyName, _
      PropertyType, PropertyValue)
      MyField.Properties.Append MyProperty
    End If
  End If
End Sub
Function CreaTabellaErr()
Dim dbMyDatabase As DAO.Database, tblTabellaErr _
    As DAO.TableDef, fldMyField As DAO.Field
Dim rcdErrRecSet As DAO.Recordset, lngErrCode As Long, _
    intMsgRtn As Integer
Dim varReturnVal As Variant, varErrString As _
    Variant, ws As DAO.Workspace
Set dbMyDatabase = CurrentDb()
Set ws = DBEngine.Workspaces(0)
On Error Resume Next
Set rcdErrRecSet = _
    dbMyDatabase.OpenRecordset("TabellaErr")
Select Case Err
Case 0
    On Error GoTo 0
    intMsgRtn = MsgBox("La TabellaErr esiste già. " & _
        "Proseguo per cancellare e ricostruire " & _
        "tutte le righe?", 52)
    If intMsgRtn = 6 Then
        DoCmd.SetWarnings False
        DoCmd.RunSQL "DELETE * FROM TabellaErr;"
        DoCmd.SetWarnings True
    Else
        rcdErrRecSet.Close
        Exit Function
    End If
Case 3011, 3078
    On Error GoTo 0
    Set tblTabellaErr = _
        dbMyDatabase.CreateTableDef("TabellaErr")
    Set fldMyField = _
        tblTabellaErr.CreateField("CodiceErrore", dbLong)
    tblTabellaErr.Fields.Append fldMyField
    Set fldMyField = _
        tblTabellaErr.CreateField("StringaErrore", dbText)
    tblTabellaErr.Fields.Append fldMyField
    dbMyDatabase.TableDefs.Append tblTabellaErr
    SetFieldProperty tblTabellaErr![StringaErrore], _
        "ColumnWidth", dbInteger, 7200
    Set rcdErrRecSet = _
        dbMyDatabase.OpenRecordset("TabellaErr")
Case Else
    MsgBox "Errore sconosciuto in CeeaTabellaErr " _
        & Err & ", " & Error$(Err), 16
    Exit Function
End Select
varReturnVal = SysCmd(acSysCmdInitMeter, _
    "popolo la Tabella Errori", 32767)
DoCmd.Hourglass True
ws.BeginTrans
For lngErrCode = 1 To 32767
    varErrString = AccessError(lngErrCode)
    If Not IsNothing(varErrString) Then
        If varErrString <> "Errore definito dall'applicazione " & _
            "o dall'oggetto" Then
            rcdErrRecSet.AddNew
            rcdErrRecSet("codiceErrore") = lngErrCode
            rcdErrRecSet("StringaErrore") = _
                Left$(varErrString, 255)
            rcdErrRecSet.Update
        End If
    End If
    varReturnVal = SysCmd(acSysCmdUpdateMeter, _
        lngErrCode)
Next lngErrCode
ws.CommitTrans
rcdErrRecSet.Close
DoCmd.Hourglass False
varReturnVal = SysCmd(acSysCmdClearStatus)
DoCmd.SelectObject acTable, "TabellaErr", True
MsgBox "La Tabella Errori è stata creata."
End Function
Quindi esegui il seguente codice VBA:
Call CreaTabellaErr
Se nel database già esiste una tabella TabellaErr la funzione CreaTabellaErr
la svuota e la ripopola con il codice e la descrizione di tutti gli errori
che Access è in grado di segnalare.
Se invece tale tabella non esiste nel database, allora la funzione prima la
crea e poi la popola con i codici e le descrizioni degli errori di Access.
Durante la creazione della tabella TabellaErr l'evolversi dell'elaborazione
viene evidenziata con la clessidra e con la barra di progressione della
barra di stato di Access.
Alla fine dell'elaborazione la tabella di cui sopra conterrà tutti i codici
di errore di Access comprensivi della loro descrizione.
Le funzioni di cui sopra fanno riferimento alla libreria Microsoft DAO
quindi, se usi una versione di Access successiva ad Access 97, devi
aggiungere al tuo database i riferimenti a tale libreria.
>
> --
> ----------------
> saluti
> Giuseppe
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
>
> (Acc'97) Nella finestra di debug:
> ? AccessError(2501)
>
> L'azione | è stata annullata.@È stato utilizzato un metodo dell'oggetto
> DoCmd per eseguire un'azione in Visual Basic ma poi è stato scelto Annulla
> in una finestra di dialogo.
> È stato utilizzato, ad esempio, il metodo Close per chiudere una maschera
> modificata, quindi è stato scelto Annulla nella finestra di dialogo in cui
> viene richiesto se si desidera salvare le modifiche apportate alla
> maschera.@@1@@1
>
> Ciao.
>
> --
> Sergio MAZZA
>
>
Grazie Sergio,
mi hai dato un suggerimento prezioso.
;-)


text:
> Mi sembri abbastanza polemico: penso che nessuno ti abbia mai detto che
> nell'help ci sia tutto lo scibile di Access ma sicuramente contiene quasi
> tutto quello che serve mentre programmi,
Sì, è vero, alle volte affiora il germe della polemica.
Questo dipende dalle attese che avevo riposto in Access che è e rimane un
bel prodotto ma che, come al solito per le belle cose, è, secondo me, anche
pieno di "difetti" che si trascinano dalle prime versioni.
Per questo alle volte mi fa arrabbiare.
Cmq ti ringrazio per la tua risposta, preziosa e competente come sempre.
Mi sono già costruito la tabella degli errori che trovo davvero molto utile.
--
----------------
saluti
Giuseppe


text:
"Giuseppe" <
gcondoLev...@libero.it
> ha scritto nel messaggio
news:c2ht0d$1tf23o$1...@ID-213020.news.uni-berlin.de...

Era implicito, nel suggerimento, anche la ricerca nell'help; altrimenti il
mio suggerimento non esisteva...
Ciao.
--
Sergio MAZZA


title: inserimento nome e cognome

author: Lucio Lovato

text:
come posso fare per inserire in una tabella
nome e cognome dei miei clienti evitando il rischio di ripetere due volte
lo stesso nominativo

grazie


title: inserimento nome e cognome

author: Luciano

text:
Lucio Lovato ha scritto nel messaggio <8582ho$2gj$
1...@geronimo.keycomm.it
>...
> come posso fare per inserire in una tabella nome e cognome dei miei
clienti
> evitando il rischio di ripetere due volte lo stesso nominativo
Creando un indice univoco in tabella!
Saluti.
Luciano
PS Comunque, quella e' la soluzione tecnica ma non logica....come ti metti
se hai due clienti che sia chiamano entrambi Mario Rossi?


title: Dopo il filtro " Show All"

author: Marco M.

text:
Dopo aver filtrato in una maschera un record esempio il record n.100, vorrei
che nell' eliminazione del  filtro "acCmdSaveRecord", non si ripartisse dal
primo record ma rimanesse al n.100 con la possibilità di poter tornare
indietro al 99, 98, 97 ecc o avanti al 101, 102, 103..ecc...
Come mi consigliate di agire?
Grazie Marco M.


title: Dopo il filtro " Show All"

author: Sib

text:
"Marco M." <
teat...@tin.it
> ha scritto nel messaggio
> Dopo aver filtrato in una maschera un record esempio il record n.100,
vorrei
> che nell' eliminazione del  filtro "acCmdSaveRecord", non si ripartisse
dal
> primo record ma rimanesse al n.100 con la possibilità di poter tornare
> indietro al 99, 98, 97 ecc o avanti al 101, 102, 103..ecc...
Vuoi rimanere sul centesimo nel senso cardinale o ordinale?
Sib
--
qualita.assicurazione su
www.cerrinet.it
Il newsgroup sulla Qualita'


title: Dopo il filtro " Show All"

text:
"Sib" ha scritto nel messaggio
> Vuoi rimanere sul centesimo nel senso cardinale o ordinale?
Non so se interpreto correttamente la tua domanda, ma non ho impostato il
campo di ricerca della tabella del DB in numero cardinale primo, secondo,
terzo, ma 98, 99, 100, 101, 102 ecc..quindi  numero ordinale...pensi di
avere qualche idea?
Grazie Marco M.


title: Dopo il filtro " Show All"

text:
"Marco M." <
teat...@tin.it
> ha scritto nel messaggio

Intendevo in senso matematico.
Se tu hai 5 record fatti cosi':
2 pippo
4 franco
7 marco
9 luca
11 vincenzo
luca e' il quarto in senso ordinale, ma il numero 9 come cardinale.
Sib


title: Dopo il filtro " Show All"

text:
"Sib" ha scritto nel messaggio
> Intendevo in senso matematico.
> Se tu hai 5 record fatti cosi':
> 2 pippo
> 4 franco
> 7 marco
> 9 luca
> 11 vincenzo
>
> luca e' il quarto in senso ordinale, ma il numero 9 come cardinale.
>
Si ci siamo, in effetti non sono proprio consecutivi i reord, qualcuno mi è
saltato di tanto in tanto, per cui dobbiamo considerarlo ordinale.
Attendo tua risposta.
Grazie ancora Marco M.


title: Dopo il filtro " Show All"

author: Emyr

text:


potresti memorizzare il valore di un campo in una variabile e poi con
un find riposizionartici
oppure usare i bookmark
Saluti.
Emanuele.


title: Dopo il filtro " Show All"

text:
"Emyr" <
fan...@lavoro.com
> ha scritto nel messaggio
cut
> potresti memorizzare il valore di un campo in una variabile e poi con
> un find riposizionartici
> oppure usare i bookmark
Si', e' la soluzione anche secondo me.
Solo che se, come ho capito, e' la centesima posizione che interessa, puo'
fare un salto diretto con un docmd.gotorecord , , acGoTo, 100
Sib


title: Dopo il filtro " Show All"

text:
"Sib"  ha scritto nel messaggio
> "Emyr"  ha scritto nel messaggio

No Sib, non devo necessariamente andare al centesimo, era solo un esempio,
praticamente immaginiamo di fare una ricerca es: dott Rossi, e questo ha
come numero di codcliente il numero 55, ora mettiamo il caso che io debba
fare determinate modifiche ad alcuni record vicini, non devo necessariamente
chiudere la maschera filtrata, e fare una nuova ricerca, ma se desidero
continuare in alcune modifice vicine posso proseguire utilizzando PagUp o
PagDown. Ora ho provato ad impostare Show All, ma il risultato è che mi
riporta al primo record, e non è quello che voglio.
Ho provato a cercare come mi ha suggerito Emyr nell'help, ma non ho trovato
nulla che potesse sciogliere il dilemma.
Grazie Marco M.


title: Dopo il filtro " Show All"

text:
"Marco M." <
teat...@tin.it
> ha scritto nel messaggio

Non dovevi cercare sull'help, dovevi applicare quanto ti diceva, ossia:
dim vID
vID=Me.ID
DoCmd.ShowAllRecords
me.recordsetclone.findfirst "ID="& vID
me.bookmark=me.recordsetclone.bookmark
Quello che trovo sbagliato e' applicare un filtro per trovare un cliente.
perche' non lo cerchi invece?



title: Dopo il filtro " Show All"

text:
"Sib"  ha scritto nel messaggio
>
> Non dovevi cercare sull'help, dovevi applicare quanto ti diceva, ossia:
>
> dim vID
> vID=Me.ID
> DoCmd.ShowAllRecords
> me.recordsetclone.findfirst "ID="& vID
> me.bookmark=me.recordsetclone.bookmark
>
> Quello che trovo sbagliato e' applicare un filtro per trovare un cliente.
> perche' non lo cerchi invece?
>
No mi sono probabilmente espresso male, è ovvio che cerco il cliente,
Comunque grazie per il tempo dedicatomi è andato tutto per il verso giusto.
Ciao Marco M.


title: Dopo il filtro " Show All"

text:
"Marco M." <
teat...@tin.it
> ha scritto nel messaggio
> "Sib"  ha scritto nel messaggio
cut
> > Quello che trovo sbagliato e' applicare un filtro per trovare un
cliente.
> > perche' non lo cerchi invece?
> >
>
> No mi sono probabilmente espresso male, è ovvio che cerco il cliente,
Forse mi sono espresso male io.
Tu hai detto di avere "cercato" un cliente applicando un filtro, ergo in
realta' non hai -cercato- un cliente ma lo hai -filtrato-.
> Comunque grazie per il tempo dedicatomi è andato tutto per il verso
giusto.
Prego
Sib


title: chiudere un processo di access in windows già aperto

text:
siccome a volte access non si chiude questo pezzo di codice sembra che
scorra i processi di windows alla ricerca di access e se aperto utilizza
quel processo anzichč aprirne un altro.
solo che a volte non mi funziona apre comunque piu processi senza terminrli
correttamente
qualcuno di voi saprebbe modificare questo codice per far terminare un
eventuale processo di access ancora aperto in windows prima di aprire
nuovamente access? Grazie.
--- CODE -------
Public Function winCheckMultipleInstances(Optional fConfirm As Boolean =
True) As Boolean
Dim fSwitch As Boolean, sMyCaption As String
Dim hWndApp As Long, hWndDb As Long
On Error GoTo ProcErr
  sMyCaption = winGetTitle(winGetHWndDB())
  hWndApp = apiGetWindow(apiGetDesktopWindow(), GW_CHILD)
  Do Until hWndApp = 0
    If hWndApp <> Application.hWndAccessApp Then
      hWndDb = winGetHWndDB(hWndApp)
      If hWndDb <> 0 Then
        If sMyCaption = winGetTitle(hWndDb) Then Exit Do
      End If
    End If
    hWndApp = apiGetWindow(hWndApp, GW_HWNDNEXT)
  Loop
  If hWndApp = 0 Then Exit Function
  If fConfirm Then
    If MsgBox(sMyCaption & " is already open@" _
      & "Do you want to open a second instance of this database?@", _
      vbYesNo Or vbQuestion Or vbDefaultButton2) = vbYes Then Exit Function
  End If
  apiSetActiveWindow hWndApp
  If apiIsIconic(hWndApp) Then
    apiShowWindowAsync hWndApp, SW_RESTORE
  Else
    apiShowWindowAsync hWndApp, SW_SHOW
  End If
  Application.Quit
ProcEnd:
  Exit Function
ProcErr:
  MsgBox Err.Description
  Resume ProcEnd
End Function


author: Alessandro Baraldi

text:
"Simba883" <
simb...@libero.it
> wrote in message
news:ckmjln$m45$
1...@lacerta.tiscalinet.it
> siccome a volte access non si chiude questo pezzo di codice sembra che
> scorra i processi di windows alla ricerca di access e se aperto utilizza
> quel processo anzichč aprirne un altro.
>
> solo che a volte non mi funziona apre comunque piu processi senza terminrli
> correttamente
> qualcuno di voi saprebbe modificare questo codice per far terminare un
> eventuale processo di access ancora aperto in windows prima di aprire
> nuovamente access? Grazie.
>
Non sň cos'č quella sbrodolata di Codice.....!!
'Killare un processo
Private Sub Form_Load()
    Dim obj As Object
    For Each obj In GetObject("winmgmts:").ExecQuery("SELECT * FROM
Win32_Process WHERE Name='calc.exe'")
        If obj.Name ="MSACCESS.EXE" Then obj.Terminate
    Next
End Sub
Io userei uno SCRIPT.
Ciao
@ALex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:
> Non sò cos'è quella sbrodolata di Codice.....!!
>
> 'Killare un processo
> Private Sub Form_Load()
>    Dim obj As Object
>    For Each obj In GetObject("winmgmts:").ExecQuery("SELECT * FROM
> Win32_Process WHERE Name='calc.exe'")
>        If obj.Name ="MSACCESS.EXE" Then obj.Terminate
>    Next
> End Sub
>
>
> Io userei uno SCRIPT.
>
> Ciao
> @ALex.
>
il codice funziona lo messo in apertura db però mi chiude tutto anche il
processo che sto aprendo, posso evitare di selezionare quello in corso fra i
processi e far chiudere solo gli altri msaccess.exe?
ho modificato calc.exe che credo fosse un esempio
se metto questo codice prima di uscire dal db il processo rimane aperto
    Dim obj As Object
    For Each obj In GetObject("winmgmts:").ExecQuery("SELECT * FROM
Win32_Process WHERE Name='MSACCESS.EXE'")
        If obj.Name = "MSACCESS.EXE" Then obj.Terminate
    Next
Grazie.


author: ALESSANDRO Baraldi

text:
> praticamente mi accade questo, se metto tale codice in apertura db mi
chiude
> anche il processo in questione
> se eseguo il codice qui sopra su click di un pulsante mi chiude
> correttamente tutti i processi compreso quello in questione ed infatti
esce
> dal db e torna a windows (però almeno li chiude tutti effettivamente) se
> invece eseguo questo codice appena prima del quit acsaveall lui chiude
tutto
> effettivamente uscendo prima del quit ma non chiude nessun processo
>
> tu capisci il motivo?
>
> Grazie in anticipo
E' ovvio.
Premetto che secondo me hai qualche cosa da rivedere nel codice, in quanto
non è posibile che ti rimanga aperta una sessione di Access, vedi anche
i consigli che ti hanno dato nel Post precedente........!
Ti ho consigliato di usare uno SCRIPT apposta per evitare il problema.
Nello script esegui la Routine che ti ho indicato, quindi apri il tuo
Applicativo con la Shell.
Se devi usare un Collegamento sul DESKTOP usa quello allo SCRIPT.....!!
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


text:
Perchè ti complichi la vita.....??
Non devi far eseguire un EXE, devi far eseguire un file.vbs
Nel file .VBS(o script) inserisci il Codice che ti ho passato
opportunamente formattato per i File Script in VBS che
KILLA Access nel caso sia Attivo, poi Esegue il tuo Applicativo:
Esempio :
1)Copia questo codice in un File di Testo, quindi rinomina l'Estensione in
VBS
    For Each obj In GetObject("winmgmts:").ExecQuery("SELECT * FROM
Win32_Process WHERE Name='MSACCESS.EXE'")
        obj.Terminate
    Next
2)Apri Access
3)Fai DOPPIO CLICK sul file.VBS
Come per magia ACCESS si è chiuso.
Ora inserisci all'interno del File.VBS la chiamata alla shell per aprire
l'applicativo.
Quando lo SCRIPT è finito lancialo......!



text:
>
> Ora inserisci all'interno del File.VBS la chiamata alla shell per aprire
> l'applicativo.
>
> Quando lo SCRIPT è finito lancialo......!
>
> Ciao
> --
> @Alex (Alessandro Baraldi)
ok grazie mille.


author: Simone Calligaris

text:
"Simba883"
> siccome a volte access non si chiude questo pezzo di codice sembra che
> scorra i processi di windows alla ricerca di access e se aperto utilizza
> quel processo anzichč aprirne un altro.
Facci capire come riprodurre il problema (magari con northwind.mdb).
In alternativa mandami in e-mail un tuo .mdb Demo afflitto da questa
anomalia.
A me queste cose non succedono, perň mi hai incuriosito.
Saluti.


text:
>
> A me queste cose non succedono, però mi hai incuriosito.
>
> Saluti.
>
>
questo è un bug famoso per access a me succede ma non in tutti i miei db
in questo si ma non ho fatto nulla di papparentemente diverso dagli altri.
booo!


text:
"Simba883" <
> questo è un bug famoso per access a me succede ma non in tutti i miei db
> in questo si ma non ho fatto nulla di papparentemente diverso dagli altri.
E' un bug famoso, ma altrettanto famose sono le buone norme per prevenirlo!
;-)
Forse per questo non c'ho mai sbattuto il muso contro.
Ti capita anche dopo aver creato l'MDE?
Saluti.


text:
> E' un bug famoso, ma altrettanto famose sono le buone norme per
> prevenirlo!
> ;-)
>
> Forse per questo non c'ho mai sbattuto il muso contro.
> Ti capita anche dopo aver creato l'MDE?
>
> Saluti.
>
Si mi capita, il mio db è abbastanza vasto sono sincero ma di recorset
aperti
non so dove andare a trovarlo


text:
> E' un bug famoso, ma altrettanto famose sono le buone norme per
> prevenirlo!
> ;-)
>
> Forse per questo non c'ho mai sbattuto il muso contro.
> Ti capita anche dopo aver creato l'MDE?
>
> Saluti.
>
a chi fosse interessato gli mando una piccola parte del mio db che comunque
presenta il problema lo stesso
se siete interessati fatemelo sapere.


text:
"Simba883" <
> a chi fosse interessato gli mando una piccola parte del mio db che
comunque
> presenta il problema lo stesso
> se siete interessati fatemelo sapere.
Perfetto: sono interessato.
Saluti.


title: se record uguale crea colonne a dx

author: Fab

text:
Help
mi ritrovo con una tabella di questo tipo
codice - campo2 - campo3 - campo 4
  935        ....................................
  935        ....................................
  935
  936
Devo fare in modo che se il campo codice è uguale
i record dei campi con codice duplicato non vadano
a capo ma a destra
del tipo
codice - campo2 - campo3 - campo 4 - codice - campo 2 - campo 3 - ....
  935        ....................................            935
........         ........
  936        ....................................
Come posso costruire il tutto?
Tnks


title: se record uguale crea colonne a dx

author: Antonio Biso

text:
"Fab" <
f...@fab.net
> ha scritto nel messaggio
news:dvSEh.182$T23...@news.it.colt.net...

Questa è la TUA soluzione ad un problema più ampio.
Esponi il problema non la tua soluzione
Antonio


title: se record uguale crea colonne a dx

text:
"Antonio Biso" <ch...@NOSPAMetruria.net> ha scritto nel messaggio
news:nCTEh.8125$J11.1...@twister1.libero.it...
> Questa č la TUA soluzione ad un problema piů ampio.
> Esponi il problema non la tua soluzione
>
> Antonio
>
Il problema č che mi serve una riga - un codice


title: se record uguale crea colonne a dx

text:
"Fab" <
f...@fab.net
> ha scritto nel messaggio
news:z6UEh.183$T23...@news.it.colt.net...

Il problema č che devi illustrare la tua struttura dati, il tuo applicativo,
il contesto in cui operi e quello che vuoi ottenere.
Insomma, c'č da perderci un po' di tempo
Antonio


title: se record uguale crea colonne a dx

text:
"Antonio Biso" <ch...@NOSPAMetruria.net> ha scritto nel messaggio
news:8bUEh.8162$J11.1...@twister1.libero.it...
> Il problema č che devi illustrare la tua struttura dati, il tuo
> applicativo,
> il contesto in cui operi e quello che vuoi ottenere.
> Insomma, c'č da perderci un po' di tempo
>
> Antonio
>
azz
pensavo (speravo?) che fosse piů semplice...


title: se record uguale crea colonne a dx

text:
"Fab" <
f...@fab.net
> ha scritto nel messaggio
news:siUEh.184$T23...@news.it.colt.net...

Per farti capire la mia obiezione, stavi chiedendo qualcosa di veramente
astruso dal punto di vista dei database relazionali, quindi probabilmente
c'č una soluzione piů opportuna per quello che tu vuoi fare (che non č
allungare i campi, cosa che forse pensi ti aiuterebbe a farlo)
Antonio


title: se record uguale crea colonne a dx

text:
"Antonio Biso" <ch...@NOSPAMetruria.net> ha scritto nel messaggio
news:BwUEh.8066$zG1.1...@twister2.libero.it...
> Per farti capire la mia obiezione, stavi chiedendo qualcosa di veramente
> astruso dal punto di vista dei database relazionali, quindi probabilmente
> c'è una soluzione più opportuna per quello che tu vuoi fare (che non è
> allungare i campi, cosa che forse pensi ti aiuterebbe a farlo)
>
> Antonio
>
beh ti ringrazio per le risposte
in realtà non ho un nessun db relazionale
devo solo aggiustare una tabella in quel modo
pensavo che in access esistesse una qualche
funzione che facesse quel che mi serviva
vabbè, ci rinuncio


title: Realizazzione report nidificato (anche se forse non dovrei definirlo così)

text:
Ciao a tutti,
devo realizzare un report che mi crea un report basato su una query
con le info dei fornitori e dei relativi tessuti per capirci una cosa
come quella sotto:
fornitore1  tessuto1  - info blah blah blah blah blah
fornitore1  tessuto2  - info blah blah blah blah blah
fornitore1  tessuto3  - info blah blah blah blah blah
fornitore2  tessuto7  - info blah blah blah blah blah
fornitore2  tessuto9  - info blah blah blah blah blah
A me però piacerebbe creare il report con questa nidificazione senza
ogni volta far ripetere il nome del fornitore, come sotto appunto...
fornitore1
       tessuto1  - info blah blah blah blah blah
       tessuto2  - info blah blah blah blah blah
       tessuto3  - info blah blah blah blah blah
fornitore2
       tessuto7  - info blah blah blah blah blah
       tessuto9  - info blah blah blah blah blah
il problema è che se io inserisco il campo Nome_fornitore nel corpo
del report, per ogni riga che la query trova il report mi scrive anche
il nome del fornitore, se lo metto nell'intestazione me lo ripete solo
per la pagina...
Come posso fare?
Grazie mille per l'aiuto!!!
Marco


text:
<
mbic...@yahoo.it
> ha scritto nel messaggio
news:1181651489....@a26g2000pre.googlegroups.com...
Ciao a tutti,
devo realizzare un report che mi crea un report basato su una query
con le info dei fornitori e dei relativi tessuti per capirci una cosa
come quella sotto:
fornitore1  tessuto1  - info blah blah blah blah blah
fornitore1  tessuto2  - info blah blah blah blah blah
fornitore1  tessuto3  - info blah blah blah blah blah
fornitore2  tessuto7  - info blah blah blah blah blah
fornitore2  tessuto9  - info blah blah blah blah blah
A me perň piacerebbe creare il report con questa nidificazione senza
ogni volta far ripetere il nome del fornitore, come sotto appunto...
fornitore1
       tessuto1  - info blah blah blah blah blah
       tessuto2  - info blah blah blah blah blah
       tessuto3  - info blah blah blah blah blah
fornitore2
       tessuto7  - info blah blah blah blah blah
       tessuto9  - info blah blah blah blah blah
il problema č che se io inserisco il campo Nome_fornitore nel corpo
del report, per ogni riga che la query trova il report mi scrive anche
il nome del fornitore, se lo metto nell'intestazione me lo ripete solo
per la pagina...
Come posso fare?
[risposta]
Creare un raggruppamento per Fornitore visualizzando l'intestazione del
gruppo; menů: Visualizza - Raggruppamento Ordinamento...
Grazie mille per l'aiuto!!!
Marco
[risposta]
Ciao.
--
Sergio MAZZA


text:
On 12 Giu, 14:35, "Sergio MAZZA" <
sergioma...@tiscali.it
> wrote:
> <
mbico...@yahoo.it
> ha scritto nel messaggionews:1181651489....@a26g2000pre.googlegroups.com...
> Ciao a tutti,
>
> devo realizzare un report che mi crea un report basato su una query
> con le info dei fornitori e dei relativi tessuti per capirci una cosa
> come quella sotto:
>
> fornitore1  tessuto1  - info blah blah blah blah blah
> fornitore1  tessuto2  - info blah blah blah blah blah
> fornitore1  tessuto3  - info blah blah blah blah blah
> fornitore2  tessuto7  - info blah blah blah blah blah
> fornitore2  tessuto9  - info blah blah blah blah blah
>
> A me però piacerebbe creare il report con questa nidificazione senza
> ogni volta far ripetere il nome del fornitore, come sotto appunto...
>
> fornitore1
>        tessuto1  - info blah blah blah blah blah
>        tessuto2  - info blah blah blah blah blah
>        tessuto3  - info blah blah blah blah blah
>
> fornitore2
>        tessuto7  - info blah blah blah blah blah
>        tessuto9  - info blah blah blah blah blah
>
> il problema è che se io inserisco il campo Nome_fornitore nel corpo
> del report, per ogni riga che la query trova il report mi scrive anche
> il nome del fornitore, se lo metto nell'intestazione me lo ripete solo
> per la pagina...
>
> Come posso fare?
>
> [risposta]
> Creare un raggruppamento per Fornitore visualizzando l'intestazione del
> gruppo; menù: Visualizza - Raggruppamento Ordinamento...
>
> Grazie mille per l'aiuto!!!
>
> Marco
>
> [risposta]
> Ciao.
> --
> Sergio MAZZA
Mitico!!! Nice & easy!! Non immaginavo nemmeno ci fosse una soluzione
del genere!!
Ora che ci sono, faccio un'altra domanda...
Se io volessi fare delle operazioni su ogni singola riga del recordset
come faccio?
Mi spiego meglio...
Tra le info a dx di ogni tessuto c'è anche la quantità ordinata e il
prezzo unitario, per sapere il prezzo complessivo pensavo di fare una
semplice moltiplicazione pescando le info da ogni riga ed inserendo il
valore via codice sulla casella di testo specifica, il problema è che,
mentre per il ciclo per valutare tutte le righe non ho problema, non
so come fare per fare l'assegnamento sulla specifica casella di testo.
SPero di essere stato chiaro...
Grazie per la domanda di prima e per la nuova!!
Marco


text:
<
mbic...@yahoo.it
> ha scritto nel messaggio
news:1181652918.4...@o11g2000prd.googlegroups.com...
Mitico!!! Nice & easy!! Non immaginavo nemmeno ci fosse una soluzione
del genere!!
Ora che ci sono, faccio un'altra domanda...
Se io volessi fare delle operazioni su ogni singola riga del recordset
come faccio?
Mi spiego meglio...
Tra le info a dx di ogni tessuto c'è anche la quantità ordinata e il
prezzo unitario, per sapere il prezzo complessivo pensavo di fare una
semplice moltiplicazione pescando le info da ogni riga ed inserendo il
valore via codice sulla casella di testo specifica, il problema è che,
mentre per il ciclo per valutare tutte le righe non ho problema, non
so come fare per fare l'assegnamento sulla specifica casella di testo.
SPero di essere stato chiaro...
[risposta]
Crei una casella di testo non associata e nell'origine controllo ci scrivi:
=[quantità]*[prezzo unitario]
Grazie per la domanda di prima e per la nuova!!
Marco
[risposta]
Ora mi aspetto la richiesta su totale per Fornitore e Totale Generale...
Ciao.
--
Sergio MAZZA


text:
On 12 Giu, 15:05, "Sergio MAZZA" <
sergioma...@tiscali.it
> wrote:
> <
mbico...@yahoo.it
> ha scritto nel messaggionews:1181652918.4...@o11g2000prd.googlegroups.com...

Se andiamo avanti così è molto probabile... :D
però prima di arrivare a quello di problema, ne ho un altro...
Perchè se totale è una casella di testo ed io uso questa parte di
codice per valorizzarla mi da l'errore "Impossibile assegnare un
valore all'oggetto"?
rs.MoveFirst
Do Until rs.EOF
    Dim totale As Integer
    totale = rs!prezzo * rs!unita
    Me.totale = totale
    rs.MoveNext
Loop
Cosa c'è che non va??


text:
<
mbic...@yahoo.it
> ha scritto nel messaggio
news:1181654936....@g37g2000prf.googlegroups.com...
Se andiamo avanti così è molto probabile... :D
però prima di arrivare a quello di problema, ne ho un altro...
Perchè se totale è una casella di testo ed io uso questa parte di
codice per valorizzarla mi da l'errore "Impossibile assegnare un
valore all'oggetto"?
rs.MoveFirst
Do Until rs.EOF
    Dim totale As Integer
    totale = rs!prezzo * rs!unita
    Me.totale = totale
    rs.MoveNext
Loop
Cosa c'è che non va??
[risposta]
Semplice:
1 - Io ho capito male quello che hai chiesto e ti ho suggerito una cosa per
un'altra.
2 - Tu non hai seguito quello che ti ho suggerito.
Ciao.
--
Sergio MAZZA


text:
On 12 Giu, 15:38, "Sergio MAZZA" <
sergioma...@tiscali.it
> wrote:
> <
mbico...@yahoo.it
> ha scritto nel messaggionews:1181654936....@g37g2000prf.googlegroups.com...

... quindi? Idee?


text:
<
mbic...@yahoo.it
> ha scritto nel messaggio
news:1181656285.1...@o11g2000prd.googlegroups.com...
... quindi? Idee?
[risposta]
L'unica idea è che o segui il mio suggerimento, indicandomi se ho indovinato
o meno dal risultato che vedi; oppure rispieghi quelli che ti serve...
Ciao.
--
Sergio MAZZA


text:
On 12 Giu, 16:05, "Sergio MAZZA" <
sergioma...@tiscali.it
> wrote:
> <
mbico...@yahoo.it
> ha scritto nel messaggionews:1181656285.1...@o11g2000prd.googlegroups.com...
>
> ... quindi? Idee?
>
> [risposta]
> L'unica idea è che o segui il mio suggerimento, indicandomi se ho indovinato
> o meno dal risultato che vedi; oppure rispieghi quelli che ti serve...
>
> Ciao.
> --
> Sergio MAZZA
Sorry ma proprio non avevo capito cosa mi avessi scritto...
La soluzione proposta da te con la formula nell'origine controllo
funziona benissimo!!
Grazie mille!!!
Marco


text:

Ciao!! Il problema di ieri è risolto ma ora... come immaginavi te
subentra quello dei totali...
Capito un po' il funzionamento, sull'esperienza di quanto fatto ieri
ho creato una casella di testo e su "Origine controllo" ho specificato
le caselle di cui volevo la somma e poi ho modifica le impostazioni su
"Somma Parziale", a questo punto nasce il problema... nel senso che se
metto la casella nel "Piè di pagina Fornitori" mi somma solo l'ultimo
valore, se invece metto la casella nel corpo del Report mi somma si
tutti i valori ma mi ripete la casella per ogni riga che trova sul
report...
Come fare?
Grazie mille ancora!!!
Ciao
Marco


text:
<
mbic...@yahoo.it
> ha scritto nel messaggio
news:1181738824....@i38g2000prf.googlegroups.com...
Ciao!! Il problema di ieri è risolto ma ora... come immaginavi te
subentra quello dei totali...
[risposta]
Silvan me fa un baffo!
Capito un po' il funzionamento, sull'esperienza di quanto fatto ieri
ho creato una casella di testo e su "Origine controllo" ho specificato
le caselle di cui volevo la somma e poi ho modifica le impostazioni su
"Somma Parziale", a questo punto nasce il problema... nel senso che se
metto la casella nel "Piè di pagina Fornitori" mi somma solo l'ultimo
valore, se invece metto la casella nel corpo del Report mi somma si
tutti i valori ma mi ripete la casella per ogni riga che trova sul
report...
Come fare?
Grazie mille ancora!!!
Ciao
Marco
[risposta]
I totali generali li fai nel piè di pagina report; basta che copi/incolli la
stessa casella di testo con la somma...
Ciao.
--
Sergio MAZZA


text:
On 13 Giu, 15:19, "Sergio MAZZA" <
sergioma...@tiscali.it
> wrote:
> <
mbico...@yahoo.it
> ha scritto nel messaggionews:1181738824....@i38g2000prf.googlegroups.com...

Ciao Silvan!!! :D
Me sa che sta volta mi sono spiegato male io...
Sto cercando di fare una cosa del tipo:
fornitore1
       tessuto1  - info - prezzo1 - quantità1 - blah blah blah blah
blah
       tessuto2  - info - prezzo2 - quantità2 - blah blah blah blah
blah
       tessuto3  - info - prezzo3 - quantità3 - blah blah blah blah
blah
                               totale_p1 - totale_q1
fornitore2
       tessuto7  - info  - prezzo1 - quantità1 - blah blah blah blah
blah
       tessuto9  - info  - prezzo9 - quantità9 - blah blah blah blah
blah
                               totale_p2 - totale_q2
La soluzione è la stessa?


text:
<
mbic...@yahoo.it
> ha scritto nel messaggio news:1181741786.9...@i13g2000prf.googlegroups.com...
Ciao Silvan!!! :D
Me sa che sta volta mi sono spiegato male io...
Sto cercando di fare una cosa del tipo:
fornitore1
       tessuto1  - info - prezzo1 - quantità1 - blah blah blah blah
blah
       tessuto2  - info - prezzo2 - quantità2 - blah blah blah blah
blah
       tessuto3  - info - prezzo3 - quantità3 - blah blah blah blah
blah
                               totale_p1 - totale_q1
fornitore2
       tessuto7  - info  - prezzo1 - quantità1 - blah blah blah blah
blah
       tessuto9  - info  - prezzo9 - quantità9 - blah blah blah blah
blah
                               totale_p2 - totale_q2
La soluzione è la stessa?
[risposta]
Quella che vedo è una somma per gruppo e la fai nel piè di pagina del gruppo, ma non devi indicare nessuna proprietà; devi inserire
la funzione Sum come origine controllo delal casella di testo (non associata):
es. (totPrezzi)
=Sum([prezzo])
Se prezzo contiene dei valori nulli devi utilizzare la funzione Nz:
=Sum(Nz([prezzo]))
Per visualizzare il piè di pagine gruppo apri il menù Visualizza - Ordinamento e raggruppamento, seleziona la riga del gruppo e in
basso hai le proprietà...
Ciao.
--
Sergio MAZZA


title: Scusatemi ma proprio non ci riesco

author: Emiliano - EmiCAD

text:
Ho creato una tabella con tre campi
Data
Importo
Si/No
Ho quindi creato una maschera contenente una sottomaschera: la sottomaschera
contiene la tabella descritta sopra in formato foglio dati. Mentre la
maschera generata a partire da una query che mi visualizza la somma di
"importo" contiene anche la sottomaschera.
Ora io vorrei avere due campi: uno con la somma di tutti i valori inseriti
su importo e una con la somma dei valori inserti su importo che hanno il
Si/no impostato su Si.
Come si fa?
Ho provato query, formule ecc. ma proprio non ci riesco.
Spero in un vostro aiuto.
Grazie in anticipo.
Ciao da Emiliano


title: Scusatemi ma proprio non ci riesco

text:
"Emiliano - EmiCAD" <
ligh...@tin.it
> ha scritto nel messaggio
news:DC3C8.26040$US3.5...@twister1.libero.it...
A scrivere un subject significativo.... già...
Antonio


title: Scusatemi ma proprio non ci riesco

author: Salvatore

text:
"Emiliano - EmiCAD" <
ligh...@tin.it
> ha scritto nel messaggio
news:DC3C8.26040$US3.5...@twister1.libero.it...

Se la tabella si chiama tabella1 ed il campo di tipo Sě/No si chiama Pagato
nella maschera, usa due caselle di testo con questa origine controllo:
=dsum("importo";"tabella1";"pagato=-1")
=dsum("importo";"tabella1";"pagato=0")
nella prima avrai la somma con pagato=Sě, nell'altra quella con pagato=NO.
Ciao
Salvatore


title: Scusatemi ma proprio non ci riesco

text:
CUT
> >
> >
> Se la tabella si chiama tabella1 ed il campo di tipo Sě/No si chiama
Pagato
> nella maschera, usa due caselle di testo con questa origine controllo:
> =dsum("importo";"tabella1";"pagato=-1")
> =dsum("importo";"tabella1";"pagato=0")
> nella prima avrai la somma con pagato=Sě, nell'altra quella con pagato=NO.
> Ciao
> Salvatore
>
>
Ti ringrazio, funziona!! Spero di imparare presto questo linguaggio. Per
caso si chiama SQL o cosa?
Ciao da Emiliano


title: Scusatemi ma proprio non ci riesco

text:
"Emiliano - EmiCAD" <
ligh...@tin.it
> ha scritto nel messaggio
news:bMeC8.29647$US3.6...@twister1.libero.it...

No, č anche il linguaggio di Access. Guarda sulla guida le funzioni dlookup,
dsum, dmin, dmax ed avrai delle illuminazioni.
Saluti
Salvatore


title: Scusatemi ma proprio non ci riesco

text:
"Emiliano - EmiCAD" <
ligh...@tin.it
> ha scritto nel messaggio
news:bMeC8.29647$US3.6...@twister1.libero.it...

Bene...
Si chiama vba
Antonio


title: Stampare singolo record in un report

author: Dino

text:
Ciao a tutti ho queste due esigenze da porvi(forse per voi banali) .
Esigenza 1:
Da un form vorrei stampare un singolo record (il record dove sono
posizionato con il form) direttamente nel report che ho
preparato.Utilizzando l'autocomposizione "stampa record" invece mi
stampa sì il singolo record ma il form.Come posso fare???
Esigenza 2:
Il report in esame e' stato creato in base ad un doc prestampato,cioe'
il record 1 deve stamparsi nella riga 1 il record 2 nella riga 2
ecc.Quindi se io mi posiziono sul record 2 e inserisco il foglio nella
stampante,tale stampata non solo mi deve stampare il record
selezionato (cioe' il 2) ma anche nella seconda riga;e così via il
terzo ecc.
E' possibile??
Grazie in anticipo
Dino


title: Stampare singolo record in un report

text:
"Dino" <
verreng...@alice.it
> ha scritto nel messaggio
news:29bdb4a7-6113-4c7e...@r29g2000yqj.googlegroups.com...
Ciao a tutti ho queste due esigenze da porvi(forse per voi banali) .
Esigenza 1:
Da un form vorrei stampare un singolo record (il record dove sono
posizionato con il form) direttamente nel report che ho
preparato.Utilizzando l'autocomposizione "stampa record" invece mi
stampa sì il singolo record ma il form.Come posso fare???
quando lanci il report con docmd.openreport usa l'opzione filtriwhere con
l'id del record selezionato
Esigenza 2:
Il report in esame e' stato creato in base ad un doc prestampato,cioe'
il record 1 deve stamparsi nella riga 1 il record 2 nella riga 2
ecc.Quindi se io mi posiziono sul record 2 e inserisco il foglio nella
stampante,tale stampata non solo mi deve stampare il record
selezionato (cioe' il 2) ma anche nella seconda riga;e così via il
terzo ecc.
non sei stato chiaro
Antonio


title: Stampare singolo record in un report

text:
On 22 Nov, 22:34, "Antonio Biso" <
ab...@libero.it
> wrote:
> "Dino" <
verrengia.d...@alice.it
> ha scritto nel messaggionews:29bdb4a7-6113-4c7e...@r29g2000yqj.googlegroups.com...

Ok grazie per la prima risposta.Per la seconda non sei stato molto
esauriente (ehhh battuta!!!!)
Vediamo se riesco ad essere piu' preciso.
Ho un documento gia prestampato,un doc costituito da 10 colonne (e
cioe' i dieci campi che foemano il reocrd) e dieci righe.
Se mi posiziono sul record uno nel form mi deve stampare il record 1
nella riga 1 se invece mi posiziono sul record 2 mi deve stampare sul
record 2.Il doc vedilo come la classica tabella dieci colonne dieci
righe.
L'esigenza e' di abbinare ad ogni record ogni riga.Per essere ancora
piu' precisi.Un campo di di ogni riga e' dedicato alla firma del
cliente.Il cliente Rossi passa per firmare,inserisco il foglio nella
stampante,mi posiziono sul record del sig. Rossi (per esempio il
primo) e la stampa deve essere solo nella prima riga.Dopo puo'
arrivare il sig. Gialli record3 io infilo il foglio nella stampante mi
posiziono sul record 3 e la stampa deve essere solo del record 3 e
nella terza riga.
Cosa dici sono stato piu' "CAPITO" che tradotto vuol dire piu'
chiato???
Grazie
Dino
NB:Ti serve qualcosa sul sito che vende le carabattole????


title: Stampare singolo record in un report

text:
"Dino" <
verreng...@alice.it
> ha scritto nel messaggio
news:bdd43e65-4811-43ff...@j1g2000vbl.googlegroups.com...






___________________________________
un po' di più, anche se trovo assurda questa esigenza e ci vuole un po' per
indovinare proprio le dimensioni
potresti provare a fare un ciclo fino all'ID e inserire dei vbcrlf tanti
quanti ti servono in un controllo calcolato da una funzione apposita
il tutto per spostarti alla riga giusta e poi inserire il record
Altrimenti usi una tabella d'appoggio che svuoti e riempi
ci metti sempre 10 record, stessa struttura dei dati principali, solo che
l'ID lo metti sempre mentre i dati li metti solo nel record scelto, negli
altri lasci il campo vuoto.
A quel punto fai un ordinamento per ID da 1 a 10 del corpo del report che
metterà righe vuote dove non c'è nulla e i dati dove ci sono
_______________________________________
Grazie
Dino
NB:Ti serve qualcosa sul sito che vende le carabattole????
____________________________________
potrebbe...
è on line?
Antonio


title: Stampare singolo record in un report

text:
On 23 Nov, 11:06, "Antonio Biso" <
ab...@libero.it
> wrote:
> "Dino" <
verrengia.d...@alice.it
> ha scritto nel messaggionews:bdd43e65-4811-43ff...@j1g2000vbl.googlegroups.com...

Ottima spiegazione mahh come si dice "DALLA PRATICA ALLA GRAMMATICA"
ne passa.
Hai comunque capito benissimo.Il mio cliente ha questa esigenza, cioe'
di stampare quando serve solo un record alla volta nella stessa
tabella.Cioe' stampa il record 1 attribuito al sig. Rossi e fa firmare
il Sig. Rossi.Dopo qualche giorno arriva il sig. Gialli,quindi si
inserisce nella stampante il foglio (dove c'e' gia' la prima stampa) e
si da l'Ok di stampa.Se il sig. Gialli e' il reecord 2 si stampera'
nella seconda riga se invece e tre alla terza e così via.
Quando hai un attimo di tempo mi dovresti fare un esempio (anche
semplice) di come fare oppure darmi un link utile.
STRAGRAZIE....in anticipo
Dino


title: Stampare singolo record in un report

text:
"Dino" <
verreng...@alice.it
> ha scritto nel messaggio
news:3f11ea76-c604-4212...@fl7g2000vbb.googlegroups.com...
On 23 Nov, 11:06, "Antonio Biso" <
ab...@libero.it
> wrote:
> "Dino" <
verrengia.d...@alice.it
> ha scritto nel
> messaggionews:bdd43e65-4811-43ff...@j1g2000vbl.googlegroups.com...
>
> potresti provare a fare un ciclo fino all'ID e inserire dei vbcrlf tanti
> quanti ti servono in un controllo calcolato da una funzione apposita
> il tutto per spostarti alla riga giusta e poi inserire il record
> Altrimenti usi una tabella d'appoggio che svuoti e riempi
> ci metti sempre 10 record, stessa struttura dei dati principali, solo che
> l'ID lo metti sempre mentre i dati li metti solo nel record scelto, negli
> altri lasci il campo vuoto.
> A quel punto fai un ordinamento per ID da 1 a 10 del corpo del report che
> metterà righe vuote dove non c'è nulla e i dati dove ci sono
Ottima spiegazione mahh come si dice "DALLA PRATICA ALLA GRAMMATICA"
ne passa.
Hai comunque capito benissimo.Il mio cliente ha questa esigenza, cioe'
di stampare quando serve solo un record alla volta nella stessa
tabella.Cioe' stampa il record 1 attribuito al sig. Rossi e fa firmare
il Sig. Rossi.Dopo qualche giorno arriva il sig. Gialli,quindi si
inserisce nella stampante il foglio (dove c'e' gia' la prima stampa) e
si da l'Ok di stampa.Se il sig. Gialli e' il reecord 2 si stampera'
nella seconda riga se invece e tre alla terza e così via.
______________________________
ma porca pupazza, ma perchè stampare tutto insieme e man mano che arrivano i
fenomeni fargli firmare il foglio già pronto no??????
creati una copia della tabella dati, solo la struttura
all'inizio della procedura la svuoti con una query di eliminazione
utilizzo dei recordset
apri il recordset sulla tabella origine dati
apri il recordset sulla tabella d'appoggio nuova
cominci a ciclare sul recordset origine e per ogni record fai un addnew
nella tabella nuova
ci metti sempre l'ID e i dati nei campi solo se è il record selezionato
quindi i recordset e lanci il report che deve basarsi sulla tabella
d'appoggio
Antonio


title: Stampare singolo record in un report

text:
On 23 Nov, 12:40, "Antonio Biso" <
ab...@libero.it
> wrote:
> "Dino" <
verrengia.d...@alice.it
> ha scritto nel messaggionews:3f11ea76-c604-4212...@fl7g2000vbb.googlegroups.com...

Sicuramente la cosa migliore e' "porca pupazza"
Ci provo e poi ti faccio sapere.
NB:Mi "spaventa" il ciclare
Dino


title: Stampare singolo record in un report

text:

> Dino- Nascondi testo citato
>
> - Mostra testo citato -
Antonio e se la risolvessimo con un della "serie" per ogni pagina
stampare non piu' di 10 record???
Dammi un'altra dritta veloce che così archivio la faccenda.
Dino


title: Stampare singolo record in un report

text:
"Dino" <
verreng...@alice.it
> ha scritto nel messaggio
news:c74097ae-b4c1-4996...@i41g2000vbn.googlegroups.com...



Dino
---------------------------------------
Questa richiesta non c'entra nulla con quello che volevi prima
mo' hai cambiato?
Antonio