text:
"Michele (Giò)" <
joyl...@alice.it
> ha scritto nel messaggio
news:4555c3e1$0$19231$4faf...@reader4.news.tin.it...

> Ciao per curiosità quali sono i dettami del NG, che significa?
Beh per il problema dei codici mancanti mi era venuta questa idea, un pò
manuale ma semplice.
Io individuo i buchi manualmente ordinando il campo CODICE. (quindi so che
posso usare es. da 50 a 100).
Uso la prima funzione che mi incrementava di uno partendo da dal valore
massimo presente nel campo.
Imposto la variabile max a 50
Poi faccio un ciclo da 50 a 100
e incremento la variabile max di 1 ad ogni giro
Con il secondo gruppo di codici non usati (es. da 400 a 500)
non faccio altro che cambiare manualmente nel codice il valore iniziale di
max e l'intervallo di ciclo
Ho un solo problema: non sono capace di impostare il ciclo da 50 a 100
> Function RiempiNull()
>
> Dim db As DAO.Database
> Dim rcd As DAO.Recordset
> Dim Max As Long
>
> Set db = CurrentDb
> Set rcd = db.OpenRecordset("SELECT * FROM [Listino Alimenti] WHERE
(IsNull([Listino
> Alimenti].Codice));", dbOpenDynaset)
>
> Max = DMax("Codice", "Listino Alimenti")
>
> Do While Not rcd.EOF
>     Max = Max + 1
>     rcd.Edit
>     rcd.Fields![Codice].Value = Max
>     rcd.Update
>     rcd.MoveNext
> Loop
questo potresti aggiungerlo no?  grazie  Vito
>
>


title: COMPLETARE UN CAMPO NUMERICO NEI VALORI NULL

author: Michele (Giò)

text:
"FANCIULLO" <
vito...@libero.it
> ha scritto nel messaggio
news:9DC5h.39554$Fk1....@twister2.libero.it...
> Ho un solo problema: non sono capace di impostare il ciclo da 50 a 100
-------------
 Max = DMax("Codice", "Listino Alimenti")
 Do While Not rcd.EOF
    Max = Max + 1
    rcd.Edit
    rcd.Fields![Codice].Value = Max
    rcd.Update
     rcd.MoveNext
 Loop
-------------
> questo potresti aggiungerlo no?  grazie  Vito
Basta cha al posto delle righe scritte qui sopra tu metta:
----------------------
For Max = 50 to 100
    rcd.Edit
    rcd.Fields![Codice].Value = Max
    rcd.Update
     rcd.MoveNext
Next Max
--------------------
Se vuoi fare una cosa più pratica, se invece di
Function RiempiNull ()
Scrivi
Function RiempiNull (ByVal Inf as Long, byVal Sup as Long)
Richiamando la funzione puoi inserire i due argomenti inf e sup, basta che tu li metta al posto di
50 e 100
----------------------
For Max = Inf to Sup
    rcd.Edit
    rcd.Fields![Codice].Value = Max
    rcd.Update
     rcd.MoveNext
Next Max
--------------------
Occhio però a non violare la chiave primaria con doppioni, devi essere sicuro di quel che passi,
altrimenti la funzione si pianta, non è fatta per gestire questo tipo di errore.
Michele


author: FANCIULLO

text:
"Michele (Giò)" <
joyl...@alice.it
> ha scritto nel messaggio
news:4557066a$0$7637$4faf...@reader1.news.tin.it...

> Grazie Michele argomento completato...ho imparato molto


text:
"FANCIULLO" <
vito...@libero.it
> ha scritto nel messaggio
news:i8N5h.40336$Fk1....@twister2.libero.it...
>> Grazie Michele argomento completato...ho imparato molto
Molto... e anche tutto spero...
Si beh poi ci sono altre trecentomila sfaccettature diverse da applicare..... Quando hai imparato
bene un metodo che ti consente di mettere le mani dappertutto, ti conviene farne tesoro.
Michele


title: arrotondamento decimali

author: massimo

text:
un saluto a tutto il ns ...............
nel creare un database gestionale per la mia attività mi sono accorto di
aver tralasciato il problema relativo all'arrotondamento dei decimali per i
campi calcolati che adesso nel mio db sono abbondanti..........
Ho letto tanti esempi sul ns e sul sito comune ma senza nessun
risultato..........
I vari campi mi rimangono sempre con un numero eccessivo di decimali che mi
producono un errore di somma nei vari calcoli....
es:
totale imponibile      125,32
totale iva                    25,22
totale fattura             150,54    e non 150,55
Chi sarebbe così gentile di aiutarmi a risolvere il problema?
I miei clienti mi pressano nell'emettere le fatture con il giusto
totale.....
Ringrazio tutto il ns per l'aiuto........


title: arrotondamento decimali

author: Roberto da casa

text:
"massimo" <
mas...@inwind.it
> ha scritto nel messaggio
news:GfRE9.26690$2B1.7...@twister2.libero.it...
> un saluto a tutto il ns ...............
>
> nel creare un database gestionale per la mia attività mi sono accorto di
> aver tralasciato il problema relativo all'arrotondamento dei decimali per
i
> campi calcolati che adesso nel mio db sono abbondanti..........
> Ho letto tanti esempi sul ns e sul sito comune ma senza nessun
> risultato..........
Visto che sei andato sul Sito Comune, nella Sezione General hai letto la FAQ
di Karl Donaubauer intitolata "Arrotondare un numero alla cifra decimale
specificata (uso commerciale)"? Se non l'hai letta fallo, che sicuramente
risolve il tuo problema. Se invece l'hai letta cosa è che non va di quella
funzione? Fra l'altro effettua l'arrotondamento di tipo commerciale, quindi
l'ideale per te che devi fare una fattura.
[CUT]
>
> Ringrazio tutto il ns per l'aiuto........
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: arrotondamento decimali

text:
"massimo" <
mas...@inwind.it
> ha scritto nel messaggio
news:GfRE9.26690$2B1.7...@twister2.libero.it...
> un saluto a tutto il ns ...............
>
> nel creare un database gestionale per la mia attività mi sono accorto di
> aver tralasciato il problema relativo all'arrotondamento dei decimali per
i
> campi calcolati che adesso nel mio db sono abbondanti..........
> Ho letto tanti esempi sul ns e sul sito comune ma senza nessun
> risultato..........
Visto che sei andato sul Sito Comune, nella Sezione General hai letto la FAQ
di Karl Donaubauer intitolata "Arrotondare un numero alla cifra decimale
specificata (uso commerciale)"? Se non l'hai letta fallo, che sicuramente
risolve il tuo problema. Se invece l'hai letta cosa è che non va di quella
funzione? Fra l'altro effettua l'arrotondamento di tipo commerciale, quindi
l'ideale per te che devi fare una fattura.
[CUT]
>
> Ringrazio tutto il ns per l'aiuto........
--
Roberto
Ho letto la FAQ di Karl ma la cosa che non riesco a capire è dove inserire
il modulo......
I calcoli dei miei campi vengono dalla query che uso per i dettagli della
fattura.....
ho provato ad inserire la funzione di Karl dopo l'aggiornamento dell'importo
ma niente il valore la somma dei valori sbilancia sempre.
Roberto fammi qualche esempio dove fare eseguire la funzione
saluti Massimo


title: arrotondamento decimali


title: arrotondamento decimali

text:
"massimo" <
mas...@inwind.it
> ha scritto nel messaggio
news:1Y2F9.29172$2B1.7...@twister2.libero.it...

L'arrotondamento al secondo decimale non devi farlo quando calcoli il totale
della fattura, in quanto una somma ha tanti decimali quanti ne hanno i vari
addendi; devi effettuare l'arotondamento del risultato delle
moltiplicazioni, per le quali il prodotto ha un numero di decimali pari alla
somma dei decimali del moltiplicando e moltiplicatore; devi anche
arrotondare i risultati delle divisioni.
Quanto al modo di calcolare ed arrotondare il valore dell'IVA esiste
addirittura un decreto ministeriale: se ti interessa conoscerne il contenuto
cercalo e leggitelo o chiedi lumi al tuo commercialista.
Tornando al tuo problema, come prima cosa devi memorizzare la funzione
fctRound che hai trovato sul Sito Comune in un modulo del tuo database; stai
attento a non chiamare tale modulo con lo stesso nome della funzione.
Se in una query hai un campo chiamato Quantità di tipo Numerico con un
decimele ed una lunghezza Doppia precisione.
Se poi hai un campo chiamato Prezzo di tipo Valuta con due decimeli.
Se hai creato un campo calcolato Importo in questa maniera:
Importo: [Quantità] * [Prezzo]
il campo calcolato Importo avrà 3 decimali (1 della Quantità + 2 del
Prezzo).
Poichè devi fare la somma di tutti i campi Importo e vuoi che la somma sia
arrotondata al secondo decimale, occorre che tu arrotondi al secondo
decimale il campo calcolato Importo; a tale scopo creerai il campo calcolato
in questa maniera:
Importo: fctRound([Quantità] * [Prezzo])
Alla stessa maniera, userai la funzione fctRound per arrotondare il valore
dell'IVA.
Vedrai che a questo punto il totale fattura risulterà fedelmete uguale alla
somma dei singoli importi (arrotondati) indicati in fattura, e risulterà
anche lui arrotondato al secondo decimale.
Spero di essere stato chiaro.
>
> saluti Massimo



title: arrotondamento decimali

text:
Ciao Roberto per prima cosa ti ringrazio per avermi risolto il
problema.....funziona divinamente, pero vorrei visualizzare ugualmente i due
decimali a zero...cosa che non mi si visualizza .....mi spiego
esempio se calcolo con la query una quantità di 10 x un prezzo di  1000 =
10000 io vorrei farlo visualizzare in questo modo 10.000,00.....
Cmq il sistema di arrotondamento lo conosco bene anche perchè amministro la
mia azienda anche sotto l'aspetto contabile...... pultroppo non riuscivo
bene a capire dove inserire la funzione.....
Cmq grazie ancora.....


title: arrotondamento decimali

text:
"massimo" <
mas...@inwind.it
> ha scritto nel messaggio
news:upvF9.35400$2B1.9...@twister2.libero.it...
> Ciao Roberto per prima cosa ti ringrazio per avermi risolto il
> problema.....funziona divinamente, pero vorrei visualizzare ugualmente i
due
> decimali a zero...cosa che non mi si visualizza .....mi spiego
>
> esempio se calcolo con la query una quantità di 10 x un prezzo di  1000 =
> 10000 io vorrei farlo visualizzare in questo modo 10.000,00.....
Imposta come formato del controllo:
#.##0,00
>
>
> Cmq il sistema di arrotondamento lo conosco bene anche perchè amministro
la
> mia azienda anche sotto l'aspetto contabile...... pultroppo non riuscivo
> bene a capire dove inserire la funzione.....
>
> Cmq grazie ancora.....
--



title: Dlookup ancora.. e errore di sintassi ...

author: Odo

text:
Ciao Ragazzi,
Buon Carnevale a tutti..
dilemma.. da niubbo..
in un controllo non riesco a far funzionare dlookup
premetto che il campo CodiceBarre è un campo testo
allora.. se scrivo in questo modo:
=DLookUp("IDArticolo";"Barcode";"[CodiceBarre]=Val (7200700000086)")
tutto funziona a dovere.
ma chiaramente il mio valore del codicebarre lo ricavo da un campo testuale
allora trasformo il tutto in questo modo:
=DLookUp("IDArticolo";"Barcode";"[CodiceBarre]=" &
Val([Maschere]![Banco]![TxtTransitoBarcode]))
 e chiaramente non funza...
lo stesso dicesi se tolgo il Val()
forse sara' una cosa niubbissima.. ma Vi assicuro che ho provato di tutto..
:(
Thx


author: Karl Donaubauer

text:
Odo wrote:
> in un controllo non riesco a far funzionare dlookup
> premetto che il campo CodiceBarre č un campo testo
> ...
> =DLookUp("IDArticolo";"Barcode";"[CodiceBarre]=" &
> Val([Maschere]![Banco]![TxtTransitoBarcode]))
> e chiaramente non funza...
>
> lo stesso dicesi se tolgo il Val()
Manca i ' prima e dopo il testo:
=DLookUp("IDArticolo";"Barcode";"[CodiceBarre]='" &
 [Maschere]![Banco]![TxtTransitoBarcode]) & "'"
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it
+info sulla prima Conferenza Italiana per Sviluppatori di Access (CISA1)


text:
Odo wrote:
> in un controllo non riesco a far funzionare dlookup
> premetto che il campo CodiceBarre č un campo testo
> ...
> =DLookUp("IDArticolo";"Barcode";"[CodiceBarre]=" &
> Val([Maschere]![Banco]![TxtTransitoBarcode]))
> e chiaramente non funza...
>
> lo stesso dicesi se tolgo il Val()
Manca un ' prima e un ' dopo:
=DLookUp("IDArticolo";"Barcode";"[CodiceBarre]='" &



author: Riccardo M.

text:
"Odo" <
zktintoTo...@homail.com
> ha scritto nel messaggio
news:cuatl8$eb0$1...@carabinieri.cs.interbusiness.it...

____________________-
prova così:
=DLookUp("IDArticolo";"Barcode";"[CodiceBarre] Like " &
[Forms]![Banco]![TxtTransitoBarcode])
ciao
Riccardo


author: Carlo Costarella

text:
"Odo" <
zktintoTo...@homail.com
> ha scritto nel messaggio
news:cuatl8$eb0$1...@carabinieri.cs.interbusiness.it...

Premesso che nelle query e nei controlli si usano i punti e virgola e nel
codice le virgole.
Trasformerei così in un controllo:
=DLookUp("IDArticolo";"Barcode";"[CodiceBarre]=" &
 "'" & [Forms]![Banco]![TxtTransitoBarcode] & "'")
Se il controllo TxtTransitoBarcode si trova sulla stessa maschera:
=DLookUp("IDArticolo";"Barcode";"[CodiceBarre]=" &
 "'" & [TxtTransitoBarcode] & "'")
Oppure su corrente della maschera:
Me.MioControllo = DLookUp("IDArticolo","Barcode","[CodiceBarre]=" &
 "'" & Me.[TxtTransitoBarcode] & "'")
Ciao, Carlo


text:
Grazie :)
chiaramente ho risolto grazie a voi.. :)
alla prossima e speriamo sia io a rispondere..


title: Problema lampeggio durante refresh.

author: Gra

text:
Salve a tutti, ho fatto una form che "spara" a video dei dati che
legge da una
tabella collegata tramite odbc all'as400.
Ho usato la "Formattazione Condizionale nelle maschere continue" (3.26
www.sitocomune.com
),
per dare una colorazione diversa ai record in base a certi valori,
funziona perfettamente.
Ho un solo inconviente, ho messo una routine evento sul timer e ogni
10 secondi faccio il refresh della videata, per mostrare eventuali
modifiche che altre postazioni
potrebbero aver fatto sulla tabella. Il refresh crea un lampeggio tra
le righe colorate.
Esiste un metodo per evitare questo lampeggio?
Grato per il Vostro aiuto, vi saluto.


title: Problema lampeggio durante refresh.

author: Roberto da Parma

text:
"Gra" <
gra...@studiogamma-ct.it
> ha scritto nel messaggio
news:6890be37-16c7-4470...@j22g2000hsf.googlegroups.com...

Prova ad utilizzare prima del refresh il metodo Echo
Ciao
--
Roberto da Parma


title: Problema lampeggio durante refresh.

author: MA

text:

Che versione usi?
La 2003? Tutto a posto con i Service Pack?

--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


title: Problema lampeggio durante refresh.

text:

Grazie ad entrambi per l'interessamento.
Rispondo prima a MAssimiliano: La versione è la 2003, se non sono
usciti altri aggiornamenti, dovrei essere ok con i service pack.
Adesso Roberto, ho seguito il tuo consiglio ed ho modificato
l'appicazione inserendo l'ECHO in questo modo:
  Application.Echo False
  Me.Requery
  Me.Refresh
  Application.Echo True
ma non ho ottenuto il risultato voluto, continuo il lampeggio!
Altri  suggerimenti ???
Grazie a tutti


title: Problema lampeggio durante refresh.

text:
Gra ha scritto:
>On 6 Giu, 09:04, "MA" <
mas...@massimilianoamendola.it
> wrote:
>> Gra wrote:
>> > Salve a tutti, ho fatto una form che "spara" a video dei dati che
>> > legge da una
>> > tabella collegata tramite odbc all'as400.
>> > Ho usato la "Formattazione Condizionale nelle maschere continue" (3.26
>> >
www.sitocomune.com
),
>> > per dare una colorazione diversa ai record in base a certi valori,
>> > funziona perfettamente.
>> > Ho un solo inconviente, ho messo una routine evento sul timer e ogni
>> > 10 secondi faccio il refresh della videata, per mostrare eventuali
>> > modifiche che altre postazioni
>> > potrebbero aver fatto sulla tabella. Il refresh crea un lampeggio tra
>> > le righe colorate.
>> > Esiste un metodo per evitare questo lampeggio?
>> > Grato per il Vostro aiuto, vi saluto.
>>
>> Che versione usi?
>> La 2003? Tutto a posto con i Service Pack?
>>
>> --
>> --
>> MAssimiliano
Amendolawww.accessgroup.it
>> Cisa - Conferenza Italiana Sviluppatori Access
>
>Grazie ad entrambi per l'interessamento.
>Rispondo prima a MAssimiliano: La versione =E8 la 2003, se non sono
>usciti altri aggiornamenti, dovrei essere ok con i service pack.
>Adesso Roberto, ho seguito il tuo consiglio ed ho modificato
>l'appicazione inserendo l'ECHO in questo modo:
>  Application.Echo False
>  Me.Requery
>  Me.Refresh
>  Application.Echo True
>ma non ho ottenuto il risultato voluto, continuo il lampeggio!
>Altri  suggerimenti ???
>Grazie a tutti
Verosimilmente il lampeggio non lo puoi eliminare neanche usando ECHO, xchè, appena lo poni TRUE, lo schermo deve aggiornate tutti i cambiamenti. Puoi provare a 'limitare' il fenomeno non usando il refresh sulla form, ma aggiornando solo i campi che probabilmente possono essere cambiati (magari usando requery sul controlsource). Non ho mai provato (cerco di tenere sempre le maschere 'non sincronizzate') ma a naso potrebbe funzionare..
Ciao
--
Questo articolo e` stato inviato dal sito web
http://www.nonsolonews.it


title: posso sostituire una query con il suo SQL

text:
posso da una maschera, anziche richiamare una query, abbinare
all'evento click di un pulsante il codice SQL della stessa ?
p.s. ho provato ma mi da errore, è forse questione di parentesi ?
Scusate l'inesperienza.
grazie a tutti.


author: ALESSANDRO Baraldi

text:
"ignazio.pilone" <
ignazio...@gmail.com
> ha scritto nel messaggio
news:1170074531....@h3g2000cwc.googlegroups.com...

La prossima volta spiega meglio cosa hai fatto, almeno ci metti in
condizione
di non fare ulteriori supposizioni....
CurrentDb.Execute "UPDATE T1 SET Field1=Valore WHERE Condizione"
Questo è valido per tutte le query ACTION ma non per le SELECT.
Tu che devi fare..?
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------


text:
grazie innanzitutto dell'aiuto.
Forse ho fatto un pò di passaggi "tortuosi" ma il mio procedimento è
stato questo.
ho una maschera "database" che scorre i vari record. Al clic su un
pulsante avvio una query di creazione tabella:
SELECT database.protocollo, database.Nick, database.Proto,
database.data, database.UL, database.CodiceImmobile,
strutture.DENOMINAZIONE, FILIALI.FILIALE, strutture.CENTRO,
database.Operazione, database.Descrizione, database.COSTINVE, database.
[Costi / Investimenti], database.CONSUPRE, database.[Consuntivo /
Preventivo], database.tipologia, database.dataODAcartaceo,
database.dataBRP, database.Annotazioni, database.Variazioni,
database.PCG, database.dataInizio, database.dataFine,
database.dataCreazione, database.dataUltimaModifica, database.DITTA,
database.GRUPPOMERCE, database.[Prezzo Totale], database.verifica, *
INTO QRYPROTOCOLLO
FROM ([database] INNER JOIN strutture ON database.UL = strutture.UL)
INNER JOIN FILIALI ON strutture.CENTRO = FILIALI.CENTRO
WHERE (((database.protocollo)=[Forms]![database_aggiornamento]!
[protocollo]))
WITH OWNERACCESS OPTION;
la tabella alimentata dalla query contiene perciò i vari campi del
record selezionato.
Un altro foglio di excel aperto dallo stesso pulsante è collegato  ai
dati dalla tabella e mi consente la stampa dei diversi moduli dei
quali ho bisogno.
Io ho copiato pedestremente tutta l'istruzione di cui sopra
nell'evento click del pulsante. So di non aver fatto una gran bella
cosa ma pensavo così facendo di poter "snellire" il database.
-------
Tra l'altro il passaggio successivo, oggetto di un altro mio post di
ieri, riguarda la possibilità di poter selezionare più record da
inviare a excel, mi piacerebbe rifarmi al tuo esempio dove selezioni
più record in base al valore di un campo comune, io li dovrei
selezionare in base alla scelta dell'utente, ma non ne ho le capacità
Ti ringrazio di vero cuore dell'aiuto non voglio approfittarne oltre.
Ti voglio solo dire che ho letto quasi tutti i tuoi esempi e non perdo
occasione per accrescere ogni giorno la mia (scarsa) conoscenza
sull'argomento. Grazie per quello che fai.
un abbraccio
On 29 Gen, 13:43, "ALESSANDRO Baraldi" <
ik2...@libero.it
> wrote:
> "ignazio.pilone" <
ignazio.pil...@gmail.com
> ha scritto nel messaggionews:1170074531....@h3g2000cwc.googlegroups.com...



text:
"ignazio.pilone" <
ignazio...@gmail.com
> ha scritto nel messaggio
news:1170145723.7...@a34g2000cwb.googlegroups.com...




un abbraccio
----------------------------------------------
[Risposta]
----------------------------------------------
Per la Query che hai esposto essendo una Query Salvata credo sia più
opportuno usare il
comando OpenQuery membro di Docmd.
L'help lo commenta abbondantemente.
Ciao



title: Verifica variazione dati in sottomaschera

author: Michele

text:
Ho una maschera Mas_Anagrafica, e al suo interno c'e una struttura a
schede di due pagine, la prima Pag. contiene una Mas_Clienti, la
seconda Pag. contiene la Mas_Fornitori.
E' possibile che quando chiudo la maschera Anagrafica verifichi se ci
sono state variazioni sui dati delle Mas_Clienti - Mas_Fornitori e mi
chieda se voglio salvare le modifiche apportate?
Grazie
Michele


author: OneEDP

text:
"Michele" <
mike...@tiscali.it
> ha scritto nel messaggio
news:803dba50.03061...@posting.google.com...

Non č una soluzione risolvibile in poche battute. Ci vuole buona dose di
programmazione.
Dovresti usare gli ADO...
prova a cercare su
www.sitocomune.com
 sulle varie tab, ricordo qualcosa
Ciao
Daniele


title: formato ora con al millesimo

author: Marcello Gabrielli

text:
Salve a tutti
Scusate se vi stresso ancora.
Come si fa a gestire il formato ora al millesimo, del tipo
hh:mm:ss.dcm
e fare tutti i relativi conti (somma, sottrazione, media, ordinamenti)?
NB: deve essere anche possibile fare conti del tipo 01:01:24.30 -
12:59:28.45
E' impossibile che nessuno non abbia mai pensato a questa cosa.
Grazie in anticipo per l'aiuto
--
 Ing. Marcello Gabrielli
 Responsabile di prodotto
 tel.  : 0347 7699271
 e-mail:
m.gab...@enginsoft.it
---------------------------------------------------------------------
 Engin Soft Trading S.r.l. - Ufficio di Trento
 I-38100 Trento (Italy), Via Malfatti 21
 tel.: +39 461 915391  -  fax: +39 461 915926
 e-mail:
in...@enginsoft.it
---------------------------------------------------------------------
--
Posted from
mta03-acc.tin.it
 [212.216.176.34]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: formato ora con al millesimo

author: Nicola Ardito

text:
Marcello Gabrielli ha scritto nel messaggio <
397FFED4...@engin.it
>...
>Salve a tutti
>
>Scusate se vi stresso ancora.
>Come si fa a gestire il formato ora al millesimo, del tipo
>
>hh:mm:ss.dcm
>
>e fare tutti i relativi conti (somma, sottrazione, media, ordinamenti)?
>
>NB: deve essere anche possibile fare conti del tipo 01:01:24.30 -
>12:59:28.45
Senza aver provato penso che dovresti aggiungere a mano 12 ore (o 24)
Ciao Nicola


title: Applicazioni Access 97 dev. edition

text:
Per favore vorrei che qualcuno che lo ha provato, mi dicesse cosa succede a
far girare un'applicazione, scritta con Access 97 e compilata con developer
edition, su un PC con Access 2003.
Grazie


title: Applicazioni Access 97 dev. edition

author: Simone Calligaris

text:
";)"

Access Runtime 2003 non esegue applicazioni .Mde in formato 97.
Ciao, Simone


title: Applicazioni Access 97 dev. edition

text:
Grazie per la risposta, ma intendevo proprio questo: l'applicazione dovrebbe
girare autonomamente. Oppure si aprirà lo stesso Access 2003 e produrrà
errore ?
"Simone Calligaris" <
simo...@libero.it
> ha scritto nel messaggio
news:446f4a54$0$18284$4faf...@reader1.news.tin.it...



title: Applicazioni Access 97 dev. edition

text:
";)" <
> Grazie per la risposta, ma intendevo proprio questo: l'applicazione
dovrebbe
> girare autonomamente. Oppure si aprirà lo stesso Access 2003 e produrrà
> errore ?
Ti ho frainteso: leggendo bene si evince che l'applicazione utilizza
(correttamente) la versione DEV 97.
Ora, l'applicazione funzionerà correttamente se le stringhe d'avvio dei FE
sono corrette: vale a dire puntano alla corretta versione di MSACCESS.EXE.
Ciao, Simone


title: Applicazioni Access 97 dev. edition

text:
";)" <
gu...@mail.net
> ha scritto nel messaggio
news:M0Dbg.5360$cX1....@twister2.libero.it...

Sě puň funzionare ma ci sono delle correzioni da fare al file "setup.STF"
dopo aver creato il pacchetto.
Alla riga 65 sostituire ...Common\Access,OfficeBin... con
Common\AccessRoot,OfficeBin.
Cosě alla riga 85: ...8.0\Common\Access... con    8.0\Common\AccessRoot.
Alla riga 320: InstallShared "Access Runtime
Files,msaccess_exe,MSACCESS80,Office,1560 "
con:
InstallShared "Access Runtime Files,msaccess_exe,MSACCESS80RT,Office,1560 "
in pratica si aggiunge RT a MSACCESS80.
Salva e distribuisci il pacchetto.
Ciao, Carlo


title: Analizzatore Prestazione

text:
Salve.
Utilizzando l' Analizzatore di Prestazione mi da' il seguente consiglio
Tabella XXX Aggiungere un indice al Campo C0
Ma il problema che nella tabella XXX ho il Campo C e non il Campo C0
Come posso risolvere questo problema.


title: Report di n righe

author: Raffi

text:
Facendo seguito ai due post precedenti,
devo realizzare un report che abbia una sezione corpo delimitata in un
numero predefinito di righe.
Ho provato a seguire le spiegazioni di sitocomune alla faq 4.6 della sezione
report...
ma non riesco a farlo funzionare!!
qualcuno conosce un'altra strada??
Grazie, Raffi


title: Report di n righe

author: cidi

text:
"Raffi" <
rac...@tin.it
> ha scritto nel messaggio
news:ymGke.936626$b5.40...@news3.tin.it...

Ciao Raffi
devi sforzarti di capire, prova a ricontrollare tutto perchè la routine
funziona.
ma se proprio non ci riesci e se vuoi, mandami un piccolo esempio zippato
che provo a vedere cosa non funziona. togli nospam dall'indirizzo.
---
Daniele


title: OverFlow

text:
Mi succede  questo errore:
Errore di Run-Time '6'
OverFlow
L'istruzione a cui si ferma il Debug
NPasti = Nz(Forms![Msc-SchedaPasto]!NrPasti)
Non so proprio che pesci pigliare.
Avete un suggerimento ? una strada da seguire ?
Grazie
Nicola
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: OverFlow

author: Silver

text:
Nicola47 ha scritto:
> L'istruzione a cui si ferma il Debug
> NPasti = Nz(Forms![Msc-SchedaPasto]!NrPasti)
Npasti che tipo di dato č? String, Byte, Integer?
e Nz(Forms![Msc-SchedaPasto]!NrPasti) che valore ha in quel momento?


title: OverFlow

text:
Silver ha scritto:


NrPasti ha valore 0 e sulla tabella č Intero Lungo. NPasti č un campo di
comodo integer (non sarą questo l'errore?) e l'istruzione viene eseguita
in fase di Current della maschera.
Ciao e grazie



title: OverFlow

text:
> Silver ha scritto:
>
>> Nicola47 ha scritto:
>> > L'istruzione a cui si ferma il Debug
>> > NPasti = Nz(Forms![Msc-SchedaPasto]!NrPasti)
>
>> Npasti che tipo di dato è? String, Byte, Integer?
>> e Nz(Forms![Msc-SchedaPasto]!NrPasti) che valore ha in quel momento?
>
> NrPasti ha valore 0 e sulla tabella è Intero Lungo. NPasti è un campo di
> comodo integer (non sarà questo l'errore?) e l'istruzione viene eseguita
> in fase di Current della maschera.
> Ciao e grazie
> Nicola
>
> --
>
> questo articolo e` stato inviato via web dal servizio gratuito
>
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it
>
>
Non so se l'errore dipenda dal differente tipo di dati numerico, ma cosa ti
costa porre NrPasti a long?
Inoltre,  Nz (v. help) richiede quale valore alternativo immettere nel caso
incontri un valore nullo. Ti consiglierei quindi di aggiornare la tua
Nz(Forms![Msc-SchedaPasto]!NrPasti) con
Nz(Forms![Msc-SchedaPasto]!NrPasti;0).
Ciao
NatPP


title: OverFlow

text:
Nat.P.P ha scritto:

> Ciao
> NatPP
Chiaro. Grazie



title: OverFlow

text:
Nicola47 ha scritto:
> NrPasti ha valore 0 e sulla tabella è Intero Lungo. NPasti è un campo di
> comodo integer (non sarà questo l'errore?) e l'istruzione viene eseguita
> in fase di Current della maschera.
> Ciao e grazie
> Nicola
l'overflow si verifica quando metti troppi dati per il tipo di campo
(esempio 2555 su un byte).
Puoi dichiarare npasti come long oppure in tabella cambi Nrpasti a integer.
Scusa se te lo chiedo ma Npasti è "Numero dei pasti"? Se si anche un
campo byte va più che bene e risparmi spazio sul disco.


title: campo ID contatore 01, 02, 03,.......0152, 0153,....ecc..

text:
Salve vorrei chiedere; (database access 2003) è possibile avere in un campo ID contatore la numerazione progressiva con davanti lo 0 zero?
Grazie


text:
Il giorno venerdì 18 gennaio 2013 12:42:43 UTC+1,
silvino...@fastwebnet.it
 ha scritto:
> Salve vorrei chiedere; (database access 2003) è possibile avere in un campo ID contatore la numerazione progressiva con davanti lo 0 zero?
>
> Grazie

in struttura della tabella in Formato metti tanti zeri per quante cifre vuoi sia composto il campo, p.e. se vuoi il campo contatore così: 001 - metti tre zeri, se no 00 per 01 o 0000 per 0001, salva la tabella e in anteprima vedrai il cambiamento


text:

Grazie infinite!!!!!


author: Paolo opg

text:
silvino...@fastwebnet.it
 wrote in
news:8ff5839d-8b77-4c7b...@googlegroups.com
:

> Il giorno venerd� 18 gennaio 2013 12:50:15 UTC+1,
amoa...@gmail.com
 ha
> scritto:
>> Il giorno venerd� 18 gennaio 2013 12:42:43 UTC+1,
>> silvino...@fastwebnet
> .it ha scritto:
>>
>> > Salve vorrei chiedere; (database access 2003) � possibile avere in
>> > un
>  campo ID contatore la numerazione progressiva con davanti lo 0 zero?
>>
>> >
>>
>> > Grazie
>>
>>
>>
>> in struttura della tabella in Formato metti tanti zeri per quante
>> cifre v
> uoi sia composto il campo, p.e. se vuoi il campo contatore cos�: 001 -
> metti tre zeri, se no 00 per 01 o 0000 per 0001, salva la tabella e in
> anteprima vedrai il cambiamento
>
> Grazie infinite!!!!!

premesso che 'contatore' e' la traduzione estremamente infelice di
'autonumber', pensaci bene e non usare il campo di tipo contatore.

se vuoi un formato specifico per l'id, mi vien da dire che da qualche
parte quell'id lo visualizzi all'utente.
se ti serve una presentazione grafica specifica, viene il dubbio che la
prossima richiesta sara' quella di avere la sequenza ordinata e senza
buchi e con l'autonumber non lo puoi garantire by design.

--
Paolo opg

BE AWARE that this post uses a fake reply-to address
to contact me write to:
janickg ( at ) hotmail ( dot ) com
--


author: Pablitomf

text:
silvino...@fastwebnet.it
 <
silvino...@fastwebnet.it
> ha scritto:

> Salve vorrei chiedere; (database access 2003) ï¿œ possibile avere in un
campo ID contatore la numerazione progressiva con davanti lo 0 zero?
> Grazie

lascia stare lo "0" davanti in tabella (potresti riscontrare problemi
dopo)... piuttosto se proprio ti serve presentarlo in maniera grafica con
lo zero, in formato campo della maschera o del report ci metti tanti zeri
quanti vuoi che ne compaiano all'utente... es. id=57... se vuoi che sia
rappresentato come id=00057 (ovvero 5 cifre), nel formato del campo della
maschera ci metti 00000

--
------------
Pablitomf
Napoli sempre nel "Q"uore!
"mammasantissima" si nasce, non si diventa.

TheSpaceCowboy :
Britos deve recuperare per arrivare in forma al prossimo
infortunio - 24/10/12


title: Scrivere un file sequenziale

author: yosef

text:
vi posto un problema che ancora non sono riuscito a risolvere
in pratica dovrei scrivere un file txt sequenziale, creare n righe in
base al tipo record, faccio un esempio per spiegarmi:
Ho una tabella1 che contiene questi campi/dati:
CODICE         RAGIONE SOCIALE
100                ROSSI MARIO
200                PINK FLOYD
300                SOCIETA
Poi tabella di dettaglio dove per ogni codice della tabella1
corrispondono 1 o più righe della tabella2:
CODICE        CODICETAB2       NOTEVARIE
100                1                         prima riga riferita
codice 100
100                2                         seconda riga codice100
...
...
200                10                       prima riga codice 200
200                 11                      seconda riga codice 200
...
...
e così a segurie
ho creato le specirfiche di esportazione
però non posso esportare in blocco tutti i record della tabella1 e
accodare quelli della tabella2, ma bensì accodare il record della
tabella 1, poi vedere se esistono record nella tabella2 (e questo non
è un problema) e accodare tutti i record collegati, e poi passare al
successivo record della tabella1.
Chiaramente le tabelle hanno specifiche di esportazione diverse c'è un
campo che è il itpo record che le identifica.
In finale il rsultato dovrebbe essere:
A100                ROSSI MARIO
B100                1                         prima riga riferita
codice 100
B100                2                         seconda riga codice100
B...
B...
A200                PINK FLOYD
B200                10                       prima riga codice 200
B200                 11                      seconda riga codice 200
B...
A300                SOCIETA
dove la lettera iniziale indica il tipo record.
Con il comando Print# mi sembra non si possa mettere l'istruzione
docmd.transfertext e quinid indicando la specifica di esportazione.
Qualcuno sa come posso risolverlo?
Grazie


title: Scrivere un file sequenziale

text:
yosef <
yos...@gmail.com
> wrote in news:ed759ad9-da7a-4daf-a944-
ef83b2...@a7g2000yqo.googlegroups.com
:
> vi posto un problema che ancora non sono riuscito a risolvere
>
> in pratica dovrei scrivere un file txt sequenziale, creare n righe in
> base al tipo record, faccio un esempio per spiegarmi:
>
[cut]
> Con il comando Print# mi sembra non si possa mettere l'istruzione
> docmd.transfertext e quinid indicando la specifica di esportazione.
> Qualcuno sa come posso risolverlo?
> Grazie
>
>
visto che ti sei creato le specifiche di esportazione... qualcosa di piu'
semplice no, vero?
per cosa ti serve tutto 'sto giro?
se devi creare un backup dei tuoi dati, ti conviene usare un formato
standard.
se devi copiare/trasportare i dati, vedi sopra: usa un formato standard.
se devi dialogare con 'qualcosa' (programma o pezzo di hw fa lo stesso), ti
conviene dire di cosa si tratta: probabilmente qualcuno ci ha gia' avuto a
che fare.
al solito, spiegare il problema e' la via migliore per ottenere aiuto,
piuttosto che chiedere info su come implementare la soluzione che hai
pensato ^^
--
Paolo opg
BE AWARE that this post uses a fake reply-to address
to contact me write to:
janickg ( at ) hotmail ( dot ) com
--


title: Scrivere un file sequenziale

text:

Se si tratta di stampa, mi interessa.
Se si tratta di tracciati telematici... ... pure
;.)
Ciao
Daniele


title: Scrivere un file sequenziale

text:
On 14 Ott, 16:31, "OneEDP" <OneEDP@antispam> wrote:
> Paolo opg wrote:
> > yosef <
yose...@gmail.com
> wrote in news:ed759ad9-da7a-4daf-a944-
> >
ef83b2291...@a7g2000yqo.googlegroups.com
:

> Daniele- Nascondi testo citato
>
> - Mostra testo citato -
si tratta di esportare dati su tracciati ministeriali, quindi è
obbligatorio aggiungere spazi se mancano o 0 per i campi numerici
o cmq come esportare sempre tramite specifiche su un campo in una
maschera che poi lo esporto o meglio lo accodo ad un file txt
Ad esempio dichiarazioni, versamenti e ruoli
di questo si tratta
grazie


title: Scrivere un file sequenziale

text:

> si tratta di esportare dati su tracciati ministeriali, quindi �
> obbligatorio aggiungere spazi se mancano o 0 per i campi numerici
> o cmq come esportare sempre tramite specifiche su un campo in una
> maschera che poi lo esporto o meglio lo accodo ad un file txt
> Ad esempio dichiarazioni, versamenti e ruoli
> di questo si tratta
> grazie
La print# non ti mette le virgolatte all'inizio e alla fine del file, ma
ogni invocazione da un carriage return
Per una campo fisso venti caratteri:
prova per i numeri
Right(string(20, "0") & str(numero), 20)
per le string
Left(strMiaStringa & Space(20), 20)
Ciao


title: Scrivere un file sequenziale

text:

> > si tratta di esportare dati su tracciati ministeriali, quindi è
> > obbligatorio aggiungere spazi se mancano o 0 per i campi numerici
> > o cmq come esportare sempre tramite specifiche su un campo in una
> > maschera che poi lo esporto o meglio lo accodo ad un file txt
> > Ad esempio dichiarazioni, versamenti e ruoli
> > di questo si tratta
> > grazie
>
> La print# non ti mette le virgolatte all'inizio e alla fine del file, ma
> ogni invocazione da un carriage return
>
> Per una campo fisso venti caratteri:
> prova per i numeri
> Right(string(20, "0") & str(numero), 20)
> per le string
> Left(strMiaStringa & Space(20), 20)
>
> Ciao- Nascondi testo citato
>
> - Mostra testo citato -
Questo l'avevo preventivato, dovrei fare campo per campo il conteggio
del numero dei caratteri ed aggiungere o spazi o 0, ma un lavoraccio,
ma se non c'è rimedio pazienza, pensavo ci fosse qualcosa di più
rapido.


title: Scrivere un file sequenziale

text:

>>> si tratta di esportare dati su tracciati ministeriali, quindi �
>>> obbligatorio aggiungere spazi se mancano o 0 per i campi numerici
>>> o cmq come esportare sempre tramite specifiche su un campo in una
>>> maschera che poi lo esporto o meglio lo accodo ad un file txt
>>> Ad esempio dichiarazioni, versamenti e ruoli
>>> di questo si tratta
>>> grazie
>>
>> La print# non ti mette le virgolatte all'inizio e alla fine del
>> file, ma ogni invocazione da un carriage return
>>
>> Per una campo fisso venti caratteri:
>> prova per i numeri
>> Right(string(20, "0") & str(numero), 20)
>> per le string
>> Left(strMiaStringa & Space(20), 20)
>>
>> Ciao- Nascondi testo citato
>>
>> - Mostra testo citato -
>
> Questo l'avevo preventivato, dovrei fare campo per campo il conteggio
> del numero dei caratteri ed aggiungere o spazi o 0, ma un lavoraccio,
> ma se non c'� rimedio pazienza, pensavo ci fosse qualcosa di pi�
> rapido.
Tanto le pubbliche amministrazione ti cambiano i tracciati quasi ogni mese
Buon divertimento
Ho rinunciato, sai


title: Scrivere un file sequenziale

author: Alessandro Cara

text:
yosef ha scritto:
[cut]
> Questo l'avevo preventivato, dovrei fare campo per campo il conteggio
> del numero dei caratteri ed aggiungere o spazi o 0, ma un lavoraccio,
> ma se non c'� rimedio pazienza, pensavo ci fosse qualcosa di pi�
> rapido.
E perche' mai?
usando right per i numeri e left per le stringhe non e' necessario
sapere quanti caratteri sono occupati. Quanto deve essere lungo il campo
  e se per i numeri devi estendere con zeri o spazi a sx quello lo devi
sapere.
Quelli non sono tracciati "ministeriali" sono semplicemente dei
tracciati sequenziali di tipo "fixed".
--
ac


title: Scrivere un file sequenziale

text:
yosef <
yos...@gmail.com
> wrote in news:4657de27-2d53-4e35-bae6-
49ac4c...@a21g2000yqc.googlegroups.com
:
[cut]
>
> si tratta di esportare dati su tracciati ministeriali, quindi �
> obbligatorio aggiungere spazi se mancano o 0 per i campi numerici
> o cmq come esportare sempre tramite specifiche su un campo in una
> maschera che poi lo esporto o meglio lo accodo ad un file txt
> Ad esempio dichiarazioni, versamenti e ruoli
> di questo si tratta
> grazie
>
dai che sei sulla buona strada...
in italia abbiamo solo settordicimila ministeri, ognuno con il suo ced che
sforna novita' a getto continuo.
se ci dai un altro indizio, proviamo a indovinare con quale hai a che fare.
agenzia entrate, suppongo.
ho indovinato?
si vincessero almeno i pupazzetti, con questi quiz...
:-/
--
Paolo opg
BE AWARE that this post uses a fake reply-to address
to contact me write to:
janickg ( at ) hotmail ( dot ) com
--


title: Scrivere un file sequenziale

text:
On 14 Ott, 17:16, Paolo opg <
spamcatc...@tiscali.it
> wrote:
> yosef <
yose...@gmail.com
> wrote in news:4657de27-2d53-4e35-bae6-
>
49ac4c024...@a21g2000yqc.googlegroups.com
:
>
> [cut]
>
>
>
> > si tratta di esportare dati su tracciati ministeriali, quindi è
> > obbligatorio aggiungere spazi se mancano o 0 per i campi numerici
> > o cmq come esportare sempre tramite specifiche su un campo in una
> > maschera che poi lo esporto o meglio lo accodo ad un file txt
> > Ad esempio dichiarazioni, versamenti e ruoli
> > di questo si tratta
> > grazie
>
> dai che sei sulla buona strada...
>
> in italia abbiamo solo settordicimila ministeri, ognuno con il suo ced che
> sforna novita' a getto continuo.
>
> se ci dai un altro indizio, proviamo a indovinare con quale hai a che fare.
>
> agenzia entrate, suppongo.
> ho indovinato?
>
> si vincessero almeno i pupazzetti, con questi quiz...
> :-/
>
> --
> Paolo opg
>
> BE AWARE that this post uses a fake reply-to address
> to contact me write to:
> janickg ( at ) hotmail ( dot ) com
> --
e già
cmq ho capito non ci sono rimedi, devo provvedere come ho pensato


title: Scrivere un file sequenziale

text:

grazie cmq OneEdp e Alessandro
con right e left penso di riuscirci


title: Scrivere un file sequenziale

author: Bruno Campanini

text:
"yosef" <
yos...@gmail.com
> wrote in message
news:ed759ad9-da7a-4daf...@a7g2000yqo.googlegroups.com...
> vi posto un problema che ancora non sono riuscito a risolvere
> in pratica dovrei scrivere un file txt sequenziale, creare n righe in
> base al tipo record, faccio un esempio per spiegarmi:
>
> Ho una tabella1 che contiene questi campi/dati:
> CODICE         RAGIONE SOCIALE
> 100                ROSSI MARIO
> 200                PINK FLOYD
> 300                SOCIETA
>
> Poi tabella di dettaglio dove per ogni codice della tabella1
> corrispondono 1 o pi� righe della tabella2:
> CODICE        CODICETAB2       NOTEVARIE
> 100                1                         prima riga riferita
> codice 100
> 100                2                         seconda riga codice100
> ...
> ...
> 200                10                       prima riga codice 200
> 200                 11                      seconda riga codice 200
> ...
> ...
> e cos� a segurie
>
> ho creato le specirfiche di esportazione
> per� non posso esportare in blocco tutti i record della tabella1 e
> accodare quelli della tabella2, ma bens� accodare il record della
> tabella 1, poi vedere se esistono record nella tabella2 (e questo non
> � un problema) e accodare tutti i record collegati, e poi passare al
> successivo record della tabella1.
> Chiaramente le tabelle hanno specifiche di esportazione diverse c'� un
> campo che � il itpo record che le identifica.
> In finale il rsultato dovrebbe essere:
> A100                ROSSI MARIO
> B100                1                         prima riga riferita
> codice 100
> B100                2                         seconda riga codice100
> B...
> B...
> A200                PINK FLOYD
> B200                10                       prima riga codice 200
> B200                 11                      seconda riga codice 200
> B...
> A300                SOCIETA
> dove la lettera iniziale indica il tipo record.
> Con il comando Print# mi sembra non si possa mettere l'istruzione
> docmd.transfertext e quinid indicando la specifica di esportazione.
> Qualcuno sa come posso risolverlo?
> Grazie
Non puoi inviare un file con maggior quantit� di dati
nelle rispettive tabelle?
Bruno


title: Apertura file

author: Luigi

text:
Salve a tutto il ng,
volevo chiedere, vista la mia inesperienza con VBA, quale codice è
necessario scrivere a fronte dell'evento su clic di un pulsante di comando
per aprire un file di word. In particolare si tratta di un modello di
documento (.dot)...ed è possibile fare in modo che appaia nel file un dato
contenuto nella maschera o devo ricorrere alla stampa unione?
So che la cosa è banale...ma c'è qualcuno che mi dà una mano??
Ciao e grazie fin da ora...
Luigi


title: Apertura file

author: Alberto S.

text:
"Luigi" <
luigia...@tiscali.it
> ha scritto nel messaggio
news:AvyB8.17210$US3.4...@twister1.libero.it...

Ciao,
la routine dovrebbe essere più o meno così:
(Ricordati di spuntare Word nei riferimenti di VBA)
Private Sub cmdApriWord_Click
Dim appWord As Word.Application
    FileCopy "C:\CartellaModelli\Modello.dot", _
        "C:\CartellaLettere\" & Me.txtProtocollo & ".doc"
            'copio il modello dalla cartella dei
            'modelli in quella delle lettere
            'assegnandogli come nome il protocollo
    Set appWord = CreateObject("Word.Application")
    With appWord
        .Documents.Open "C:\CartellaLettere\" _
            & Me.txtProtocollo & ".doc"
                'creo una istanza di Word e vi apro il
                'nuovo documento appena copiato
        .Documents(1).Bookmarks("DataLettera").Select
        .Selection.TypeText Text:=Me.txtData
            'nel modello avevo inserito un segnalibro
            'chiamato DataLettera: lo trovo e vi
            'scrivo la data che risulta sulla mia maschera
        .Documents(1).Bookmarks("Protocollo").Select
        .Selection.TypeText Text:=Me.txtProtocollo
            'stessa cosa per il protocollo
        .Visible = True
            'rendo visibile il documento
    End With
End Sub
... spero di non aver messo troppi errori
A questo punto l'operatore dovrebbe poter completare la lettera
accertandosi, quando chiude il documento, di rispondere sì alla richiesta di
salvare. Io userei il protocollo come nome del documento Word così si potrà
gestire da Access anche tutta la corrispondenza creata (ricerca per
data/argomento/destinatario) e sempre da Access (modificando la routine di
cui sopra) visualizzare le varie lettere.
Fammi sapere come va...
Ciao
--
Alberto


title: Apertura file

text:
[CUT]

[CUT]
>
> Ciao
> --
> Alberto
Ho fatto come indicao nella routine, cioè creato le cartelle, messo i
segnalibri nel modello e poi ho modificato, sempre andando a tentativi e
sbirciando di qua e di là in altre funzioni perchè non conosco una virgola
di VBA, la tua routine in questo modo.
Private Sub Comando16_Click()
 Dim oApp As Object
     FileCopy "C:\CartellaModelli\Modello.dot", "C:\CartellaLettere\ &
Me.txtProtocollo & .doc"
            'copio il modello dalla cartella dei
            'modelli in quella delle lettere
            'assegnandogli come nome il protocollo
    Set appWord = CreateObject("Word.Application")
    With appWord
        .Documents.Open "C:\CartellaLettere\ & Me.txtProtocollo & .doc"
                'creo una istanza di Word e vi apro il
                'nuovo documento appena copiato
        .Documents(1).Bookmarks("DataLettera").Select
        .Selection.Typetext Text:=Me.txtData
            'nel modello avevo inserito un segnalibro
            'chiamato DataLettera: lo trovo e vi
            'scrivo la data che risulta sulla mia maschera
        .Documents(1).Bookmarks("Protocollo").Select
        .Selection.Typetext Text:=Me.txtProtocollo
            'stessa cosa per il protocollo
        .Visible = True
            'rendo visibile il documento
    End With
End Sub
Word parte perchè se faccio ctrl+alt+canc lo ritrovo nei programmi aperti,
ma al momento di mostrarmi il file mi da la finestra di errore con il debug
dicendo "tipo non corrispondente" in prossimità delle linee:
 .Selection.Typetext Text:=Me.txtData
e
  .Selection.Typetext Text:=Me.txtProtocollo
 e qui non sono riuscito a trovare la soluzione...
Ti ringrazio infinitamente per la cortesia e la gentilezza che mi stai
usando...
Ciao,
Luigi


title: Apertura file

text:
[CUT]
>
> Word parte perchè se faccio ctrl+alt+canc lo ritrovo nei programmi aperti,
> ma al momento di mostrarmi il file mi da la finestra di errore con il
debug
> dicendo "tipo non corrispondente" in prossimità delle linee:
>
>  .Selection.Typetext Text:=Me.txtData
> e
>   .Selection.Typetext Text:=Me.txtProtocollo
>
[CUT]
> Ciao,
> Luigi
Ho appena fatto una prova
Premesse:
Ho creato la cartella C:\CartellaModelli con dentro il file Modello.dot che
contiene i due segnalibri (Protocollo e DataLettera)
Ho creato la cartella C:\CartellaLettere, vuota
Ho creato un database nuovo, con una sola maschera, con due caselle di testo
(txtData e txtProtocollo) e un pulsante (Comando16)
A fronte dell'evento su click del pulsante ho scritto il seguente codice
(attenzione che ci sono alcune differenze rispetto al tuo - eventualmente
fai un copia/incolla)
Private Sub Comando16_Click()
Dim appWord As Word.Application
    FileCopy "C:\CartellaModelli\Modello.dot", _
        "C:\CartellaLettere\" & Me.txtProtocollo & ".doc"
    Set appWord = CreateObject("Word.Application")
    With appWord
        .Documents.Open "C:\CartellaLettere\" & _
            Me.txtProtocollo & ".doc"
        .Documents(1).Bookmarks("DataLettera").Select
        .Selection.Typetext Text:=Me.txtData
        .Documents(1).Bookmarks("Protocollo").Select
        .Selection.Typetext Text:=Me.txtProtocollo
        .Visible = True
    End With
End Sub
Prima di uscire dall'editor di Visual Basic, da Strumenti->Riferimenti, ho
messo il segno di spunta accanto al riferimento 'Microsoft Word...'
Ho aperto la maschera in visualizzazione maschera, ho scritto qualcosa nelle
due caselle di testo, ho cliccato sul pulsante e mi ha funzionato tutto come
voluto.
Prova in questo modo, fammi sapere.
Ciao
--
Alberto


title: Apertura file

text:
[CUT]

Ti faranno santo per la pazienza e la bravura che hai nell'usare questi
cavoli di programmi.
Ora funziona tutto bene e alla perfezione anche a me, volevo solo chiederti
due ultime cose e poi prometto che ti lascio in pace.
All'inizio avevo scelto il formato dei numeri di protocollo in questo modo
2002/001 ma lo slash mi da problemi al salvataggio del file perchè non è
permesso usare questo carattere nei nomi dei file, tu come hai risolto?? Io
per il momento l'ho sostituito con 2002-001 ma non è che mi piaccia tanto!
Altra cosa, ho creato una maschera di "riepilogo" in cui sono contenute
tutte le lettere con i numeri di protocollo, destinatario, data...
all'evento doppio clic del numero di protocollo ho associato questo
Private Sub Protocollo_DblClick(Cancel As Integer)
Dim appWord As Word.Application
    Set appWord = CreateObject("Word.Application")
    With appWord
        .Documents.Open "C:\CartellaLettere\" & Me.Protocollo & " .doc"
        .Visible = True
    End With
End Sub
che  dovrebbe permettermi di aprire il file associato ma non succede
assolutamente nulla! Come mai???
Ti saluto e ti ringrazio ancora infinitamente, davvero sei stato
gentilissimo,
ciao,
Luigi


title: Apertura file

text:
> Ti faranno santo per la pazienza e la bravura che hai nell'usare questi
> cavoli di programmi.
... dovresti parlare con il mio collega con il quale ho (quasi) litigato
oggi ... inoltre non parlerei di bravura ma di (vergognoso) scopiazzamento
di precedenti suggerimenti altrui...
> Ora funziona tutto bene e alla perfezione anche a me, volevo solo
chiederti
> due ultime cose e poi prometto che ti lascio in pace.
>
> All'inizio avevo scelto il formato dei numeri di protocollo in questo modo
> 2002/001 ma lo slash mi da problemi al salvataggio del file perchè non è
> permesso usare questo carattere nei nomi dei file, tu come hai risolto??
Io
> per il momento l'ho sostituito con 2002-001 ma non è che mi piaccia tanto!
Ci stavo pensando giusto ieri fin che provavo il codice...
Puoi usare la funzione 'Replace' (solo per le operazioni di lettura e
scrittura su disco)
    .Documents.Open "C:\CartellaLettere\" _
        & Replace(Me.Protocollo, "/", "-") & ".doc"
e continuare ad usare il protocollo con lo slash
> Altra cosa, ho creato una maschera di "riepilogo" in cui sono contenute
> tutte le lettere con i numeri di protocollo, destinatario, data...
>
> all'evento doppio clic del numero di protocollo ho associato questo
>
> Private Sub Protocollo_DblClick(Cancel As Integer)
> Dim appWord As Word.Application
>     Set appWord = CreateObject("Word.Application")
>     With appWord
>         .Documents.Open "C:\CartellaLettere\" & Me.Protocollo & " .doc"
>         .Visible = True
>     End With
> End Sub
>
> che  dovrebbe permettermi di aprire il file associato ma non succede
> assolutamente nulla! Come mai???
[CUT]
Questa l'ho appena provata: una maschera a 'maschere continue' con una sola
casella di testo, che ho chiamato 'Protocollo' e nella quale viene
visualizzato il protocollo (in pratica un elenco dei file nella
'CartellaLettere' però senza l'estensione '.doc'). Ho incollato il tuo
codice - attenzione che hai lasciato uno spazio in più:
non    .Documents.Open "C:\CartellaLettere\" & Me.Protocollo & " .doc"
ma    .Documents.Open "C:\CartellaLettere\" & Me.Protocollo & ".doc"
Una volta modificato mi funziona - però prima mi dava l'errore 'impossibile
trovare il file ...', mentre tu dici che non ti succedeva niente. Che so,
prova ad aggiungere un
    MsgBox Me.Protocollo
ad inizio routine, giusto per vedere quale dato viene prelevato.
Poi vorrei aggiungere che lavorando in questo modo (anche quando saranno
stati risolti tutti questi problemi) resterà la questione delle varie
istanze di Word attive (prova a controllare ogni tanto con
control+alt+canc). Prova un po' a vedere se ce ne vai in fondo (funzioni
GetObject e CreateObject)
>
> ciao,
> Luigi
Ciao
--
Alberto


title: Apertura file

text:
> [CUT]
Ciao Alberto,
anche questi problemi sono risolti, per aprire i file dall'elenco ho
incollato questo:
Private Sub Protocollo_DblClick(Cancel As Integer)
Dim appWord As Word.Application
       MsgBox Me.Protocollo
        Set appWord = CreateObject("Word.Application")
    With appWord
    .Documents.Open "C:\CartellaLettere\" & Replace(Me.Protocollo, "/", "-")
& ".doc"
    .Visible = True
    End With
End Sub
ma vista la mia pignoleria non mi sono accontentato e volevo andare
oltre...ma non ci sono riuscito!
La cosa banale, ma utile, che volevo fare era quella di mettere nel msgbox
in cui appare il file da aprire i tasti si e no in modo da dare la
possibilità di annullare l'apertura per scegliere magari un altro file! Ho
provato a cambiare un pò il codice, ma una volta un problema e una volta un
altro ho rinunciato...
Come posso risolvere??
Ciao e ancora 10.000 grazie per il tuo indispensabile aiuto!
Ciao,
Luigi


title: Apertura file

text:
[CUT]
>
> Ciao Alberto,
> anche questi problemi sono risolti, per aprire i file dall'elenco ho
> incollato questo:
>
> Private Sub Protocollo_DblClick(Cancel As Integer)
> Dim appWord As Word.Application
>        MsgBox Me.Protocollo
>         Set appWord = CreateObject("Word.Application")
>     With appWord
>     .Documents.Open "C:\CartellaLettere\" & Replace(Me.Protocollo, "/",
"-")
> & ".doc"
>     .Visible = True
>     End With
> End Sub
[CUT]
> La cosa banale, ma utile, che volevo fare era quella di mettere nel msgbox
> in cui appare il file da aprire i tasti si e no in modo da dare la
> possibilità di annullare l'apertura per scegliere magari un altro file! Ho
> provato a cambiare un pò il codice, ma una volta un problema e una volta
un
> altro ho rinunciato...
[CUT]
> Ciao,
> Luigi
Beh, intanto mi pare che sta venendo fuori qualcosa di funzionale e questa è
una bella cosa.
Veramente il msgbox ti avevo suggerito di metterlo solo per controllo nel
caso il codice continuasse a non funzionare... e invece tu hai già trovato
il modo per metterlo a frutto (complimenti!)
Allora, al posto di
    MsgBox Me.Protocollo
Scrivi
    If MsgBox("Apertura del documento " & _
        Me.Protocollo & vbCrLf & "Confermi?", _
        vbYesNo) = vbNo Then
            Exit Sub
    End If
Dovrebbe andare...
Ciao
--
Alberto


title: Apertura file

text:
"Alberto S." <
sartor...@tin.it
> ha scritto nel messaggio
news:abhdgd$ib47a$2...@ID-134626.news.dfncis.de...

E anche questa volta è andata! Si, è proprio come dici tu, è venuto fuori un
lavoretto niente male, non credevo si potesse fare niente di simile e
pensare che per mesi mi sono scervellato alla ricerca di programmi su
internet che facessero questo!
Man mano che userò il programma vedrò se ci sono cose da migliorare,
cambiare o eliminare, caso mai ti faccio sapere e mi aiuti, ok??? ;-)))
Bhè, allora per l'ennesima volta grazie mille e ciao!
Luigi


title: Apertura file

text:
> E anche questa volta è andata! Si, è proprio come dici tu, è venuto fuori
un
> lavoretto niente male, non credevo si potesse fare niente di simile e
> pensare che per mesi mi sono scervellato alla ricerca di programmi su
> internet che facessero questo!
Anch'io penso che - quando è possibile - l'applicazione migliore è quella
che ti fai tu.
> Man mano che userò il programma vedrò se ci sono cose da migliorare,
> cambiare o eliminare, caso mai ti faccio sapere e mi aiuti, ok??? ;-)))
Senz'altro (se non sarò io magari sarà qualcun altro che ne sa di più di
me).
> Bhè, allora per l'ennesima volta grazie mille e ciao!
, buon lavoro!
> Luigi
Ciao
--
Alberto


title: Somma campi nei Report

author: Roma

text:
Sapete come si fa ad ottenere un subtotale in ogni pagina del report e un
grantotale nell'ultima?


title: Somma campi nei Report

author: Antonio Biso

text:
"Roma" <
romau...@libero.it
> ha scritto nel messaggio
news:EYmd9.150030$n04.3...@twister2.libero.it...
> Sapete come si fa ad ottenere un subtotale in ogni pagina del report e un
> grantotale nell'ultima?
Mettendo un controllo calcolato con scritto
=somma(nomecampodasommare)
nelle sezioni da te descritte
Anche se forse quello sul piè di pagina non so se funziona
Antonio


title: Somma campi nei Report

author: Fabio

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:7fnd9.148056$lu5.3...@twister1.libero.it...

Potrebbe funzionare "giocando" sulla proprietà SommaParziale
Fabio


title: Somma campi nei Report

author: SimonenomiS

text:
"Antonio Biso" <
ch...@etruria.net
> wrote in
news:7fnd9.148056$
lu5.3...@twister1.libero.it
:

  Copio e incollo da
http://www.mvps.org/access/reports/rpt0004.htm
Reports: Show totals at bottom of report
-------------------------------------------------------------------------
(Q)    I want to show a total at the bottom of each page, but I keep
seeing #error instead, whats wrong?
(A)    Your problem is that access does not allow the Sum() function in
the page footer. So to get around the problem, create a control in
another section of your report that performs the calculation, and set its
visible property to false. Then create another unbound text box in the
page footer. Enter the name of the control containing the calculation as
the text boxes controlSource property setting.


title: opzioni apertura maschera

author: fabià

text:
è possibile impostare una maschera di inserimento dati  in modo che
una volta aperta si posizioni sul nuovo record?
mi viene in mente una macro, è la strada migliore?
una domanda forse OT:
visto che è in questo ng che si parla parecchio di etichette, qualcuno
può consigliarmi una stampante con nastri con una etichetta per riga?
grazie
PS esiste una legge fermentaNG  tipo: <se fai una domanda, dai una
risposta? Ci deve essere un argomento che conosci!>


title: opzioni apertura maschera

author: Emyr

text:
On Wed, 30 Jan 2002 18:34:16 GMT, fabi...@SPAMyahoo.com (fabià)
wrote:
>è possibile impostare una maschera di inserimento dati  in modo che
>una volta aperta si posizioni sul nuovo record?
proprietà immissionedati=true
>
>mi viene in mente una macro, è la strada migliore?
>
>una domanda forse OT:
>visto che è in questo ng che si parla parecchio di etichette, qualcuno
>può consigliarmi una stampante con nastri con una etichetta per riga?
>
>grazie
>
>PS esiste una legge fermentaNG  tipo: <se fai una domanda, dai una
>risposta? Ci deve essere un argomento che conosci!>
Saluti.
Emanuele.


title: opzioni apertura maschera

author: Roberto da casa

text:
"fabià" <fabi...@SPAMyahoo.com> ha scritto nel messaggio
news:3c583ae5...@powernews.inwind.it...
> è possibile impostare una maschera di inserimento dati  in modo che
> una volta aperta si posizioni sul nuovo record?
>
> mi viene in mente una macro, è la strada migliore?
Apri la tua maschera con
DoCmd.OpenForm "NomeMaschera", , , , acFormAdd
[CUT]
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: impossibile trovare SYSTEM.MDW

author: Nicola Di Martino

text:
ciao ho questo problema
ho creato un applicativo per la semplice gestione dei collaboratori di una
palestra.
il titolare ha già un programma fatto in access che si avvia tramite la
consultazione di un file di accesso (tipo il system.mdw, per intendersi...)
quando lancio il mio, (che non ha la protezione come il suo) mi compare
l'errore se il suo è già stato avviato
mentre sa lancio prima il mio e poi il suo nessun errore
come nessun errore appare se il mio applicativo lo faccio aprire dalla
interfaccia di access!
Aiuti?
 creo un collegamento che lancia access e ha come argomento il mio db?
Grazie
Nik


title: impossibile trovare SYSTEM.MDW

author: Sib

text:
"Nicola Di Martino" <
nic.dim...@libero.it
> ha scritto nel messaggio

si, ma che abbia come argomento anche il riferimento al tuo file mdw.
Sib
--
http://www.gestionedati.com


title: impossibile trovare SYSTEM.MDW

author: Roberto da Parma

text:
"Sib" <sedav...@SPAMtiscali.it> ha scritto nel messaggio
news:4446b695$0$29724$4faf...@reader2.news.tin.it...

Controlla però che tipo di autorizzazioni sono state fatte nell' mdw
originale...nel caso copialo e guardaci dentro...
Puoi sempre rinominare il tuo e metterci quello originale
Ciao
Roberto


title: impossibile trovare SYSTEM.MDW

text:
CUT
> >> Aiuti?
> >> creo un collegamento che lancia access e ha come argomento il mio db?
> >
> > si, ma che abbia come argomento anche il riferimento al tuo file mdw.
> >
> > Sib
> >
>
> Controlla però che tipo di autorizzazioni sono state fatte nell' mdw
> originale...nel caso copialo e guardaci dentro...
>
> Puoi sempre rinominare il tuo e metterci quello originale
>
> Ciao
> Roberto
>
Grazie Sib, grazie Roberto
ma se non avessi per la mia applicazione il file mdw...(è veramente stupida
l'applicazione che ho fatto...)
posso evitare di fargli lanciare prima access e poi il mio applicativo?
 Grazie
Nik


title: impossibile trovare SYSTEM.MDW

text:
"Nicola Di Martino" <
nic.dim...@libero.it
> ha scritto nel messaggio
news:vwI1g.89299$PR2.1...@twister2.libero.it...

Il file MDW è sempre presente...
Sta a te togliere dal tuo programma le varie autorizzazioni
Ciao
Roberto


title: impossibile trovare SYSTEM.MDW

text:
> Il file MDW è sempre presente...
>
> Sta a te togliere dal tuo programma le varie autorizzazioni
>
> Ciao
> Roberto
>
Grazie Roberto...
ci provo
Nik


title: impossibile trovare SYSTEM.MDW

author: VedoTondo

text:
"Nicola Di Martino" <
nic.dim...@libero.it
> ha scritto nel messaggio
news:rWP1g.90440$A83.2...@twister1.libero.it...
> Grazie Roberto...
> ci provo
> Nik
Prima o poi bisogna batterci la testa ;-)
Saluti Andrea


title: pulsante su mask in visualizzazione foglio dati.

author: carla

text:
Salve,
ho  una mask in visualizzazione foglio dati e una in visualizzazione tab.
pivot.
Vorrei inserire 1 pulsante "chiudi" che mi chiudesse la mask su cui è
inserito.
Ho provato ad inserirlo in struttura ma quando carico la mask questo non
viene mostrato.
Come devo fare? (la proprietà visible è già su si!)
grazie ancora
Carla


author: Alessandro Baraldi

text:
"carla" <carl...@NOSPAMhotmail.com> wrote in message
news:vDy_e.24282$
kA.34...@news3.tin.it

Non puoi devi usare la visualizzazione Maschere continue e formattarla
graficamente in modo da farla sembrare Foglio Dati.
L'alternativa è inserire le 2 Maschere come Sottomaschere in una
Form non associata, ed il cmdButton lo metti li.
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:8056ab18b61da0433b...@mygate.mailgate.org...

ok ho utilizzato la visualizzazione Maschere continue e formattata
 graficamente in modo da farla sembrare Foglio Dati (la maschera è formata
dal campo codute e data)
Questa maschera si appoggia ad una tabella dove ho un codute precompilato
(uno per ogni utente)
e il campo data vuoto (da compilare).
In fase di caricamento dati tramite la mschera vorrei poter caricare più
date (quindi più record) per codute (e questo già lo fa) ma vorrei che
all'inserimento di ogni data mi scrivesse in tutti i record
il codute che già ho in quello di sospra.


text:
"carla" <carl...@NOSPAMhotmail.com> wrote in message
news:kzz_e.24574$
kA.34...@news3.tin.it
[CUT]
> ok ho utilizzato la visualizzazione Maschere continue e formattata
>  graficamente in modo da farla sembrare Foglio Dati (la maschera è formata
> dal campo codute e data)
> Questa maschera si appoggia ad una tabella dove ho un codute precompilato
> (uno per ogni utente)
> e il campo data vuoto (da compilare).
> In fase di caricamento dati tramite la mschera vorrei poter caricare più
> date (quindi più record) per codute (e questo già lo fa) ma vorrei che
> all'inserimento di ogni data mi scrivesse in tutti i record
> il codute che già ho in quello di sospra.
Io userei l'Eveto AfterUpdate del controllo associato
a codute.
Me!ControlloCodute.DefaultValue="""" & Me!Codute & """"
Ovviamente ho ipotizzato codute come campo testo.



title: Caselle combinate e maschera non associata

author: Damia

text:
          Buongiorno a tutti...
Allora
Io ho una maschera non associata in cui ci sono varie caselle combinate da
cui scegliere dei dati che poi vado ad aggiungere ad una tabella DATI
Ho la casella combinata Pinco che ha come dati di origine una query che dà:
ID, Descrizione, Importo.
E' associato l'id che poi vado a mettere nella tabella DATI (quindi l'utente
sceglie una descrizione...e nella tabella dati metto l'id)
Ora ho necessità di inserire nella tabella DATI anche l'importo di cui
sopra.....ma non so come fare in modo che recuperi l'importo automaticamente
per l'id selezionato tenendo presente che la maschera non è associata....
Suggerimenti?
Grazie mille da ora
Damia
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


author: Beppe

text:
Nella casella combinata puoi impostare il n° di colonne che vuoi (nel
tuo caso "numero colonne = 3") e giochi sulla larghezza colonne per
nascondere quelle che non vuoi visualizzare (nel tuo caso puoi
impostare larghezza=0;4;0 per avere ID,Descrizione,Importo con visibile
la sola descrizione)
A questo punto ti riferisci ad una qualsiasi colonna con
me.pinco.column(n) dove n è la colonna che vuoi "leggere".
Osservazioni:
n=0 corrisponde alla prima colonna, n=2 alla terza colonna ecc
puoi "spostare" la colonna degli importi ove ti sembra meglio e
modificando a zero la larghezza opportuna nasconderla...
A questo punto sapendo come leggere le colonne della casella combinata
puoi memorizzare oltre all'ID qualsiasi altro dato,
bye


author: Gabriele Bertolucci

text:
> Io ho una maschera non associata in cui ci sono varie caselle combinate da
> cui scegliere dei dati che poi vado ad aggiungere ad una tabella DATI
>
> Ho la casella combinata Pinco che ha come dati di origine una query che
> dà:
> ID, Descrizione, Importo.
>
> E' associato l'id che poi vado a mettere nella tabella DATI (quindi
> l'utente
> sceglie una descrizione...e nella tabella dati metto l'id)
> Ora ho necessità di inserire nella tabella DATI anche l'importo di cui
> sopra.....ma non so come fare in modo che recuperi l'importo
> automaticamente
> per l'id selezionato tenendo presente che la maschera non è associata....
> Suggerimenti?
Se già stai utilizzando del codice per recuperare la colonna associata ed
andare a mettere tale valore nella tabella DATI, devi aggiungere la seguente
riga di codice:
rstDati!Importo = Me!Pinco.Column(2)
Ovviamente il campo importo deve esistere nella tabella DATI.
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it


title: Bitmap Tasti

author: Alessio

text:
Sto' cercando delle immagini da usare per i tasti "Nuovo record" " Annulla"
"Elimina" ecc. che non siano quelle convezionali di Access.
Sapete dove posso trovarle?
Ringrazio anticipatamente


title: Bitmap Tasti


title: A2002 - Dove reperire gli ActiveX Control  ?

text:
Ciao,
    Sapresti indicarmi dove reperire ActiveX Control, per varie funzioni, da
utilizzare con Access 2002.
Mille grazie
        Bruno


author: Sergio MAZZA

text:

www.lebans.com
 ed internet in generale...
Ciao.
--
Sergio MAZZA


author: ALESSANDRO Baraldi

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:cslr2l$qh8$1...@canarie.caspur.it...

Per ACCESS di Free non c'č molta scelta in Internet...., e spesso
non sono compatibili quelli sviluppati in VB(unici FREE) nonchč
obbligano alla distribuzione del RUNTIME di VB.
Io uso DBI-TECH sono decisamente ottimi, molto piů gestibili
di quelli della MS che ottieni con VisualStudio o VB.
Si possono usare in tutti i linguaggi, anche in pagine WEB(non tutti)
C++, DELPHI ecc.....!
http://www.dbi-tech.com/
Hanno un costo non sottovalutabile, ma dipende da chi paga.
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: Icona access

author: TT

text:
Salve,
ho un problemino con l'icona da usare in access (A00,W98).
Premetto che l'icona ed il db staranno nella stessa directory.
Non potendo inserire direttamente un path inesistente in
Strumenti/Avvio.../Icona applicazione, perchè non lo conosco,
mi tocca inserirlo via codice (se erro ditemi) e, grazie a Roberto, ho
provato ad iserire il codice all'apertura del form principale
Private Sub Form_Open(Cancel As Integer)
    Dim PathFoto As String
    DoCmd.RunMacro "AutoKeys"
    PathFoto = Left(CurrentDb.Name, Len(CurrentDb.Name) -
Len(Dir(CurrentDb.Name))) & "icona.ico"
    CurrentDb.Properties("AppIcon").Value = PathFoto
    CurrentDb.Properties("UseAppIconForFrmRpt").Value = True
    CurrentDb.Properties.Refresh
End Sub
E' vero che cambia l'icona ma la prima volta che viene lanciato mi appare
l'icona veccia se era stata setteta in
Strumenti/Avvio.../Icona applicazione e , nel caso non sia stata settata
tale proprietà errore runtime "3270" - proprietà non trovata.
Le domande sono:
E' possibile cambiare o inserire la proprietà in altra maniera?
E' possibile lanciare del codice prima che si avvii il db e dove lo metto
questo codice?


title: Icona access

text:
"TT" <
tere...@libero.it
> ha scritto nel messaggio
news:6jo7c.81418$Kc3.2...@twister2.libero.it...
> Salve,
> ho un problemino con l'icona da usare in access (A00,W98).
> Premetto che l'icona ed il db staranno nella stessa directory.
>
> Non potendo inserire direttamente un path inesistente in
> Strumenti/Avvio.../Icona applicazione, perchè non lo conosco,
> mi tocca inserirlo via codice (se erro ditemi) e, grazie a Roberto, ho
> provato ad iserire il codice all'apertura del form principale
>
> Private Sub Form_Open(Cancel As Integer)
>     Dim PathFoto As String
>     DoCmd.RunMacro "AutoKeys"
>     PathFoto = Left(CurrentDb.Name, Len(CurrentDb.Name) -
> Len(Dir(CurrentDb.Name))) & "icona.ico"
>     CurrentDb.Properties("AppIcon").Value = PathFoto
>     CurrentDb.Properties("UseAppIconForFrmRpt").Value = True
>     CurrentDb.Properties.Refresh
> End Sub
>
> E' vero che cambia l'icona ma la prima volta che viene lanciato mi appare
> l'icona veccia
Ciò che è contenuto  nella proprietà Icona applicazione viene usato solo
all'avvio del database e non durante la sua esecuzione.
>se era stata setteta in
> Strumenti/Avvio.../Icona applicazione e , nel caso non sia stata settata
> tale proprietà errore runtime "3270" - proprietà non trovata.
E' normale in quanto se non inserisci un icona nella finestra di Avvio non
viene neppure inserita la proprietà AppIcon nell'insieme Properties del
database, quindi ti viene segnalato giustamente errore, in quanto non viene
appunto trovata tale proprietà.
Pertanto devi prevedere nella funzione di cui sopra il fatto che, se la
proprietà non esiste, invece di impostarla, la creai.
>
> Le domande sono:
> E' possibile cambiare o inserire la proprietà in altra maniera?
Non credo.
> E' possibile lanciare del codice prima che si avvii il db e dove lo metto
> questo codice?
Penso che la cosa migliore sia modificare la proprietà da un altro database
che fa solo questo e che poi si chiude ed apre i tuo database.
Se il tuo database si chiama Pippo.mdb
Se l'icona si chiama icona.ico ed è inserita nella stessa cartella di
Pippo.mdb
Creati un database anche lui contenuto nella stessa cartelle di Pippo.mdb
In un modulo di tale database memorizza la seguente funzione pubblica:
Public Function ApriPippo()
   Dim PathFoto As String
   Dim Nomedb As String
    PathFoto = Left(CurrentDb.Name, Len(CurrentDb.Name) - _
    Len(Dir(CurrentDb.Name))) & "icona.ico"
    Nomedb = Left(CurrentDb.Name, Len(CurrentDb.Name) - _
    Len(Dir(CurrentDb.Name))) & "Pippo.mdb"
    Dim MioDb As DAO.Database, prp As DAO.Property
    On Error GoTo AggProp_Err
    Set MioDb = OpenDatabase(Nomedb)
    MioDb.Properties("AppIcon") = PathFoto
    Dim MiaVariabile As Variant
    MiaVariabile = Shell("MSACCESS.EXE " & Chr$(34) _
    & Nomedb & Chr$(34), vbMaximizedFocus)
    Application.Quit
Uscita:
    Exit Function
AggProp_Err:
    If Err = 3270 Then
        Set prp = MioDb.CreateProperty("AppIcon", _
        dbText, PathFoto)
        MioDb.Properties.Append prp
        Resume
    Else
        Resume Uscita
    End If
End Function
In questo database inserisci infine una macro chiamata Autoexec che contiene
solo un azione: l'esecuzione della funzione ApriPippo().
Nella funzione di cui sopra si fa 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.
A questo punto invece di lanciare il database Pippo.mdb apri il database di
cui sopra: esso prima imposterà la proprietà AppIcon del database Pippo.mdb
e poi lo aprirà, infine verrà chiuso il databse iniziale e resterà aperto
solo il database Pippo.mdb con la sua icona in ordine.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Icona access

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:2gE7c.86456$FJ6.3...@twister1.libero.it...
>
> "TT" <
tere...@libero.it
> ha scritto nel messaggio
> news:6jo7c.81418$Kc3.2...@twister2.libero.it...
> > Salve, ......
>
> --
> Roberto
>
> ---------------------------------------------
> il Sito Comune di it.comp.appl.access:
>
http://www.sitocomune.com
> ---------------------------------------------
>
>
Oh grazie mille, funziona!!!
Quindi non sembra essere possibile lanciare del codice prima dell'avvio del
db? Hai scritto
> Penso che la cosa migliore sia modificare la proprietà da un altro
database
> che fa solo questo e che poi si chiude ed apre i tuo database.
però sta più tempo.
apri il primo db, setta l'icona, apri il secondo db, chiudi te stesso.
Se fosse possibile inserire codice all'avvio di access ma proma del db,
credo, che sarebbe molto più rapido.
Grazie ancora.
Ciao TT


title: Icona access

text:
"TT" <
tere...@libero.it
> ha scritto nel messaggio
news:6AH7c.83293$Kc3.2...@twister2.libero.it...
>
> "Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
> news:2gE7c.86456$FJ6.3...@twister1.libero.it...
> >
> > "TT" <
tere...@libero.it
> ha scritto nel messaggio
> > news:6jo7c.81418$Kc3.2...@twister2.libero.it...
> > > Salve, ......
> >
> > --
> > Roberto
> >
> >
> Oh grazie mille, funziona!!!
>
> Quindi non sembra essere possibile lanciare del codice prima dell'avvio
del
> db?
La prima cosa, preparata dall'utente, che viene esguita all'apertura del
database è la macro Autoexec, che però viene comunque eseguita dopo e non
prima che vanga visualizzata l'icona del database.
> Hai scritto
>
> > Penso che la cosa migliore sia modificare la proprietà da un altro
> database
> > che fa solo questo e che poi si chiude ed apre i tuo database.
>
> però sta più tempo.
> apri il primo db, setta l'icona, apri il secondo db, chiudi te stesso.
> Se fosse possibile inserire codice all'avvio di access ma proma del db,
> credo, che sarebbe molto più rapido.
Onestamente mi sembra abbastanza intuitivo che un condice contenuto
all'INTERNO di un programma non possa essere eseguito prima che il programma
stesso venga aperto.
Può darsi che esistano soluzioni diverse dalla mia, ma se ci sono non le
conosco.
Infine non capisco cosa tu indenda con "però sta più tempo".
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
>
> Grazie ancora.
> Ciao TT
>
>


title: Icona access

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:nRU7c.84249$Kc3.2...@twister2.libero.it...

Starebbe più tempo che non ad eseguire il solo codice. Comunque il problema
non esiste più visto che non si può fare.
Ciao
TT


title: EXCEL TO ACCESS 2

author: Mondialcarta

text:
La mia situazione è questa:
    Io con un programma in Visual Basic (Excel), acquisisco i dati da un PC
remoto (impianto pesatura), li controllo e li trasferisco su un AS/400.
    Voglio però tenere anche aggiornato un giornale progressivo su access e
vorrei aggiornarlo nel momento di acquisizione dati dal PC remoto, con il
programma di Visual Basic (Excel).
    Però non riesco a impostare i dati in formato access ho provato anche a
farlo con il registratore macro ma
niente......................................


title: EXCEL TO ACCESS 2

author: Giovanni Albertone

text:
On Wed, 15 Mar 2000 18:05:35 +0100, "Mondialcarta"
<
in...@mondialcarta.com
> wrote:
>    Voglio però tenere anche aggiornato un giornale progressivo su access e
>vorrei aggiornarlo nel momento di acquisizione dati dal PC remoto, con il
>programma di Visual Basic (Excel).
Per farmi perdonare per la risposta di prima (non e' un buonismo alla
falso-Biso, sono proprio io :-), ti mando un paio di link dove puoi
trovare un bel po' di spunti per come usare DAO da Excel per
leggere/scrivere su un database Access:
http://support.microsoft.com/support/excel/dao.asp
http://support.microsoft.com/support/kb/articles/Q148/3/61.asp
--
Ciao,
Giovanni


title: Problemi con JET

author: alessandra buttiron

text:
Riprovo a riproporvi un quesito:
ho un DB che gira in una rete NT (tabelle su server, maschere Query, ecc su
Computer locali) succede che ogni tanto quando un utente regista dei dati
attraverso un maschera, la tabella (su server) va in blocco; l'errore che
esce se si tenda di aprirla direttamente è il seguente,"L'OGGETTO RICHIEDE
UNA VERSIONE AGGIORNATA DEL MODULO DI GESTIONE DI DATABASE JET".
Premetto che la tabella che va in blocco è semple la stessa, pure il
computer dal quale si accede per la registrazione dei dati.
Cosa mi consigliate di fare? è un problema di tabella? devo ricrerla ExNovo?
forse ci sono problemi di rete dal server al computer che genera l'errore?
Ho provato a ricercare la soluzione nel sito Comune ma non ho trovato nulla
di interessante.
Vorrei capire inanzitutto perche si genera tale errore e se possibile come
posso evitarlo
Vi sarei grato se qualcuno mi dasse una mano.
Ringrazio anticipatamente Sandra


title: Problemi con JET

author: warp

text:
"alessandra buttiron" <
> Riprovo a riproporvi un quesito:
> ho un DB che gira in una rete NT (tabelle su server, maschere Query, ecc
su
> Computer locali) succede che ogni tanto quando un utente regista dei dati
> attraverso un maschera, la tabella (su server) va in blocco; l'errore che
> esce se si tenda di aprirla direttamente è il seguente,"L'OGGETTO RICHIEDE
> UNA VERSIONE AGGIORNATA DEL MODULO DI GESTIONE DI DATABASE JET".
Mai capitato.
Che versione di M$$,$$ Jet?
Dopo il segnale il DB necessita di un ripristino?
Quanti utenti accedono al DB e che hardware di rete?
Ciao, warp


title: Problemi con JET

text:
"warp" <
war...@libero.it
> ha scritto nel messaggio
news:EieG7.36925$sq5.1...@news.infostrada.it...

l'errore che esce non mi dice la versione del modulo di gestione (ho
riportato tutta la dicitura dell'errore)
Il DB continua a funzionare è solo la tabella in oggetto che non si apre e
per l'appunto quando tento di aprirla ecco che conpare l'errore.
Gli utenti che accedono al DB sono 3; inoltre una volta che succede il
problema, il DB non può essere conpattato e ripristinato con la funzione
presente in access.


title: Problemi con JET

text:
"alessandra buttiron"
> l'errore che esce non mi dice la versione del modulo di gestione
Il DB č in formato 3.5 o 4.0 (Access 2000) ?
(ho
> riportato tutta la dicitura dell'errore)
> Il DB continua a funzionare č solo la tabella in oggetto che non si apre e
> per l'appunto quando tento di aprirla ecco che conpare l'errore.
> Gli utenti che accedono al DB sono 3; inoltre una volta che succede il
> problema, il DB non puň essere conpattato e ripristinato con la funzione
> presente in access.
Perň non sei stata chiarissima...
Voglio dire, dopo la comparsa dell'errore non č piů possibile compattare il
DB (ovviamente con un solo utente collegato)?
In tal caso il database puň considerarsi fisicamente danneggiato.
Di solito questi problemi sono inputabili a fattori hardware per questo ti
ho chiesto come state a schede di rete, cavi, etc.
Ciao, warp


title: Problemi con JET

text:
"warp" <
war...@libero.it
> ha scritto nel messaggio
news:IDhG7.38987$sq5.2...@news.infostrada.it...
>
> "alessandra buttiron"
>
> > l'errore che esce non mi dice la versione del modulo di gestione
>
> Il DB è in formato 3.5 o 4.0 (Access 2000) ?
>
> (ho
> > riportato tutta la dicitura dell'errore)
> > Il DB continua a funzionare è solo la tabella in oggetto che non si apre
e
> > per l'appunto quando tento di aprirla ecco che conpare l'errore.
> > Gli utenti che accedono al DB sono 3; inoltre una volta che succede il
> > problema, il DB non può essere conpattato e ripristinato con la funzione
> > presente in access.
>
> Però non sei stata chiarissima...
> Voglio dire, dopo la comparsa dell'errore non è più possibile compattare
il
> DB (ovviamente con un solo utente collegato)?
> In tal caso il database può considerarsi fisicamente danneggiato.
>
> Di solito questi problemi sono inputabili a fattori hardware per questo ti
> ho chiesto come state a schede di rete, cavi, etc.
>
> Ciao, warp
>
Spero di spiegarmi meglio il DB funziona ancora o meglio è solamente la
cartella danneggiata a non funzionare ed è questa che non permette al DB di
compattarsi.
Parlando di reti (nel caso mi informo) il computer che crea il casino è
l'unico collegato con un cavo coassiale lungo oltre 200 metri dal server
mentre gli altri sono collegati con rete cablata es cavo telefonico(non so
se sto dicendo fesserie).
Comunque  grazie per l'interessamento
         Sandra


title: Problemi con JET

text:
"alessandra buttiron"
> Spero di spiegarmi meglio il DB funziona ancora o meglio è solamente la
> cartella danneggiata a non funzionare ed è questa che non permette al DB
di
> compattarsi.
> Parlando di reti (nel caso mi informo) il computer che crea il casino è
> l'unico collegato con un cavo coassiale lungo oltre 200 metri dal server
Faccenda delicata :-)
Purtroppo la causa del tuo problema è senz'altro inputabile a questa
circostanza, decisamente hardware.
Un paio di aziende che seguo lavorano in condizioni analoghe: non hanno
problemi, ma i cavi (fibra ottica) e gli Hub hanno caratteristiche
decisamente professionali.
Ciao, warp


title: Problemi con JET

text:
"warp" <
war...@libero.it
> ha scritto nel messaggio
news:WWLG7.48948$sq5.2...@news.infostrada.it...

ti ringrazio comunque per l'intessamento
sandra


title: Run-Time Access 2000/2002

author: Roberto Pasqualini

text:
Ciao a tutti, vorrei sapere se qualcuno può dare una risposta a questo mio
dubbio:
Devo compilare un'applicazione Access tramite l' ODE versione 2000 o 2002 e
poi installarla su di un PC sul quale gira Access97 : c'è la possibilità che
ci siano dei conflitti su quanto già installato e il run-time che verrà
installato ? Purtroppo il cliente non può aggiornare la sua versione di
Access poichè ha tutta una serie di applicazione che non vuole upgradare.
Grazie in anticipo a quanti vorranno rispondermi.
Roberto Pasqualini


title: Run-Time Access 2000/2002

text:
> Devo compilare un'applicazione Access tramite l' ODE versione 2000 o 2002
e
> poi installarla su di un PC sul quale gira Access97 : c'è la possibilità
che
> ci siano dei conflitti su quanto già installato e il run-time che verrà
> installato ?
Non credo
> Purtroppo il cliente non può aggiornare la sua versione di
> Access poichè ha tutta una serie di applicazione che non vuole upgradare.
Cmq... se fosse necessario, potresti non upgradare l'Access97, ma installare
le versioni successive in directory diverse


title: Calcolo di progressivo in una query al variare di due variabili

author: Enrico

text:
Ciao,
volevo chiedervi supporto nel risolvere un problema per il quale non
riesco a trovare una soluzione.
Questi sono i mei dati;
- versione di MSAccess®, Access 2000
- file mdb, indicarne la versione Access 2000
La mia necessità é che nella query che vi allego come esempio
(ordinata ripsettivamente per valori  crescenti del campo (1) e (2),
stà nel ricavare due
campi calcolati che diano i subtotali dei campi (3) e (4) al crescere
del campo 2 e che questi si riazzerino al variare del campo (1)
Vi lascio un esempio della query
1	            2	  3	  4
10110071	2004 09	16033	16694
10110071	2004 10	18720	13160
10110071	2004 11	7008	23122
10110071	2004 12	15200	18174
10110071	2005 01	18638	15858
10110071	2005 02	6912	5152
10110071	2005 04	13844	18545
10110071	2005 05	11672	16654
10110071	2005 06	9372	6417
10111065	2004 09	24058	17664
10111065	2004 10	5205	12782
10111065	2004 11	4272	6780
10111065	2005 01	10464	5280
10111065	2005 02	4608	3678
10111065	2005 03	6144	8577
10111065	2005 04	7680	7684
10111065	2005 05	3072	7343
10111065	2005 06	6144	4741
10111072	2004 09	6159	4124
10111072	2004 12	4608	3184
10111072	2005 01	3072	2885
10111072	2005 02	1536	1328
10111072	2005 03	6144	6676
10111072	2005 04	1536	4173
10111072	2005 05	1536	4062
10111072	2005 06	1536	1659
10111073	2004 10	60292	255484
10111073	2004 11	35904	41619
10111073	2004 12	40464	45711
10111073	2005 01	41712	36335
10111073	2005 02	29856	12720
10111073	2005 03	27552	48444
10111073	2005 04	17664	33404
10111073	2005 05	37824	30067
10111073	2005 06	23232	17140
10112071	2004 09	3645	26120
10112071	2004 10	26352	19032
10112071	2004 11	3072	9238
10112071	2004 12	10272	7850
10112072	2004 09	4608	10931
10112072	2004 11	1536	4485
10112072	2004 12	3936	3768
10112072	2005 01	3072	3148
10112072	2005 02	3840	1233
10112072	2005 03	3072	6796
10112072	2005 04	5376	4278
10112072	2005 05	1536	3893
10112072	2005 06	4608	1365
10112073	2004 09	129803	88094
10112073	2004 10	92520	71743
10112073	2004 11	9792	68784
10112073	2004 12	22752	68957
10112073	2005 01	52560	46709
10112073	2005 02	47184	21620
10112073	2005 03	50976	72730
10112073	2005 04	31968	51389
10112073	2005 05	27360	49428
10112073	2005 06	37728	25983
Ogni supporto sarà il benvenuto!


author: Roberto da casa

text:
"Enrico" <
enrico....@tin.it
> ha scritto nel messaggio
news:80e70be.04041...@posting.google.com...

Vai sul Sito Comune e modifica adeguatamente l'esempio che trovi nella
Sezione Queries allegato alla FAQ intitolata "Come si può ottenere il totale
progressivo di un campo in una query?".
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
"Roberto da casa" <
r.ma...@libero.it
> wrote in message news:<mrMgc.134091$
Kc3.4...@twister2.libero.it
>...

Roberto,
ho letto la FAQ ma non riesco a capire dove modificarla secondo le mie
esigenze (sono un principiante il Visual Basic).
E' possibile avere un suggerimento in più?
Grazie
Enrico


text:

Per prima cosa perché la funzione pubblicata sul Sito Comune funzioni
occorre che la query contenga anche una chiave univoca.
Poi devi modificare la funzione in modo che prenda in considerazione solo i
record che abbiano i campi (1) e (2) uguali a quelli del record corrente.
Non riesco a darti altre indicazioni in quanto dici che nella query hai 4
campi e io ne vedo 5, poi non mi è chiaro quale sia il caampo di cui vuoi il
totale progressivo; non mi è neppure chiaro quali siano i due campi in base
ai quali stabilisci il gruppo.
> Grazie
> Enrico



title: Istruzioni SQL

author: Piero

text:
Ho fatto un UNLOAD di un DB SyBase sul file RELOAD.SQL, ora vorrei
importarne  la struttura in access, come posso fare per eseguire in access
tutte le istruzioni contenute nel file SQL.
Grazie anticipatamente Piero
---------------------------------------------------------------------------
Messaggio inviato attraverso
http://www.trucchiperpc.it
 - sezione newsgroup


title: Istruzioni SQL

author: namor

text:
Piero ha scritto:
> Ho fatto un UNLOAD di un DB SyBase sul file RELOAD.SQL, ora vorrei
> importarne  la struttura in access, come posso fare per eseguire in access
> tutte le istruzioni contenute nel file SQL.
> Grazie anticipatamente Piero
Dovresti scrivere un programmino vba che legga i comandi SQL uno alla
volta dal file e li mandi in esecuzione con Docmd.RunSql o
Currentdb.Execute
Sempre che la sintassi SQL di SyBase sia compatibile 100% con Access,
altrimenti potrebbe darti qualche errore.
Namor
--

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


title: Commit in Access

author: Morfeus

text:
Ciao a tutti,
è possibile fare un commit con Access ...mentre accodo dei dati in tabella
Oracle??
grazie


title: Ritento con aggiungi festivo

author: Singer

text:
Più sotto c'è un posto "Trova il Festivo". Non è che qualcuno gli può dare
un'occhiata
ve ne sarei infinitamente grato!
Grazie
Singer


title: Ritento con aggiungi festivo

text:
"Singer" <
fuscoa...@tin.it
> ha scritto nel messaggio news:4376f573$0$27603$4faf...@reader1.news.tin.it...

Chi sono io il fantasma formaggino?
Ciao.
--
Sergio MAZZA


title: Ritento con aggiungi festivo

author: Michele Fusco

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:dl78hd$5a4$1...@area.cu.mi.it...

Scusa, ma no riuscivo a visualizzare il tuo post.
Ad ogni modo non credo di aver capito.
Quella funzione fa una verifca e cerca il giorno festivo nel periodo di
tempo determinato da due valori: la data iniziale ed il numero di giorni
Immagino che faccia una somma e se nel periodo ricade il giorno festivo,
domeniche compreso, vengono detratti i giorni dalla data finale.
Ora io voglio che faccia questo controllo anche con il Patrono. Se in
quell'arco di tempo viene ricompreso il patrono, quel giorno deve saltare.
Il problema è che il giorno del patrono varia a seconda del comune in cui
lavora il mio dipendente. ed ecco che
dovrebbe essera una cosa così:
Day(D) = 19 And MOnth(D) = 9 Se ID (corrente) lavora nel comune di Firenze,
Day (D) 13 and Month (D) =6 Se ID (corrente) lavora nel comune di Siena etc
Cioè il giorno 19.09 è festivo se ID è nel comunde di ..
Questo, credo, è quello che dovremmo ottenere
Grazie
però non sembra che questo argomento abbia interessato molti!!!
Per me invece è determinante.


title: Ritento con aggiungi festivo

text:
"Michele Fusco" <
mike...@libero.it
> ha scritto nel messaggio
news:43772df7$0$13267$4faf...@reader2.news.tin.it...

Scusate ma il post precedente è mio: Singer
sono su un altro PC


title: Ritento con aggiungi festivo

text:
"Michele Fusco" <
mike...@libero.it
> ha scritto nel messaggio news:43772df7$0$13267$4faf...@reader2.news.tin.it...
>
> Scusa, ma no riuscivo a visualizzare il tuo post.
> Ad ogni modo non credo di aver capito.
> Quella funzione fa una verifca e cerca il giorno festivo nel periodo di tempo determinato da due valori: la data iniziale ed il
> numero di giorni
> Immagino che faccia una somma e se nel periodo ricade il giorno festivo, domeniche compreso, vengono detratti i giorni dalla data
> finale.
> Ora io voglio che faccia questo controllo anche con il Patrono. Se in quell'arco di tempo viene ricompreso il patrono, quel giorno
> deve saltare.
> Il problema è che il giorno del patrono varia a seconda del comune in cui lavora il mio dipendente. ed ecco che
> dovrebbe essera una cosa così:
> Day(D) = 19 And MOnth(D) = 9 Se ID (corrente) lavora nel comune di Firenze,
> Day (D) 13 and Month (D) =6 Se ID (corrente) lavora nel comune di Siena etc
>
> Cioè il giorno 19.09 è festivo se ID è nel comunde di ..
> Questo, credo, è quello che dovremmo ottenere
> Grazie
Secondo te come fa access a capire che quel dato giorno in quel dato comune è festa del santo patrono?
Semplice! Ti crei una tabella e inserisci il comune e la data del santo patrono, poi prima della funzione che verifica se il giorno
è festivo o no, con (per esempio) la funzione dlookup (vedi help) verifichi se ritorna o meno una data. Se ritorna vuol dire che il
giorno è festa del santo patrono e quindi salti la verifica del giorno festivo; altrimenti prosegui.
Es. (dopo la creazione della tabella predetta)
if dlookup("comune","tbSantiComuni","dataSantoPatrono = #" & me!dataInserita & "#") = "" then
    ...verifica giorno festivo...
end if
> però non sembra che questo argomento abbia interessato molti!!!
> Per me invece è determinante.
Il vittimismo non porta a nulla e neanche la fretta; ricorda sempre che l'aiuto (gratis) si presta volentieri ma non è dovuto...
Ciao.
--
Sergio MAZZA


title: Ritento con aggiungi festivo

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:dl7bfn$8om$1...@area.cu.mi.it...

La mia era solo una provocazione!!
Comunque il problema è che non devo confrontare la data inserita con la
tabella
ma devo verificare se nel periodo compreso tra due date (la prima la
inserisco e la seconda è il risultato della prima + il numero di giorni)
c'è il festivo


title: Ritento con aggiungi festivo

text:
"Michele Fusco" <
mike...@libero.it
> ha scritto nel messaggio
news:43773ca6$0$27604$4faf...@reader1.news.tin.it...
>
>> Secondo te come fa access a capire che quel dato giorno in quel dato
>> comune è festa del santo patrono?
>> Semplice! Ti crei una tabella e inserisci il comune e la data del santo
>> patrono, poi prima della funzione che verifica se il giorno è festivo o
>> no, con (per esempio) la funzione dlookup (vedi help) verifichi se
>> ritorna o meno una data. Se ritorna vuol dire che il giorno è festa del
>> santo patrono e quindi salti la verifica del giorno festivo; altrimenti
>> prosegui.
>>
Ma non è cosi. Lo capisce quando glielo dici tu
Day (D) = 7 and Month(D) = 3 il 07 marzo è patrono
il problema è che accanto a questi parametri devi aggiungergli anche il
comune. Ma solo quello che ti interessa
La tabbella di riferimento contiene il nome ed il comune
Quindi 7 marzo And ID corrisponde a comune Firenze
14 luglio And ID corrisponde a comune Siena
etc


title: Ritento con aggiungi festivo

text:
"Michele Fusco" <
mike...@libero.it
> ha scritto nel messaggio news:43774df2$0$27600$4faf...@reader1.news.tin.it...
>
>
> Ma non è cosi. Lo capisce quando glielo dici tu
> Day (D) = 7 and Month(D) = 3 il 07 marzo è patrono
> il problema è che accanto a questi parametri devi aggiungergli anche il comune. Ma solo quello che ti interessa
>
> La tabbella di riferimento contiene il nome ed il comune
> Quindi 7 marzo And ID corrisponde a comune Firenze
> 14 luglio And ID corrisponde a comune Siena
> etc
[marzullo ON]
Cos'é ti fai la domanda e ti rispondi da solo?
[marzullo OFF]
A parte tutto non ho capito se hai afferrato quello che ti ho suggerito; a mio avviso la soluzione non potrebbe essere altrimenti
che una tabella (che potresti chiamare calendario) dove andrai a cercare eventuali ricorrenze di festività oltre a quelle già
calcolata dalla funzione che utilizzi. Solo che le prime saranno prioritarie sulle ultime.
Sto' continuando a ripetermi...
Ciao.
--
Sergio MAZZA


title: Ritento con aggiungi festivo

text:
"Singer" <
fuscoa...@tin.it
> ha scritto nel messaggio
news:4376f573$0$27603$4faf...@reader1.news.tin.it...
> Più sotto c'è un posto "Trova il Festivo". Non è che qualcuno gli può dare
> un'occhiata
> ve ne sarei infinitamente grato!
Memorizza nell'anagrafica di ogni dipendente la data del suo santo patrono
quindi non entrare nella funzione che verifica se la data è festiva nel caso
in cui la data è uguale a quella memorizzata nell'anagrafica.
> Grazie
Prego
> Singer
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Ritento con aggiungi festivo

text:
"Roberto da casa" <
r.masso...@libero.it
> ha scritto nel messaggio
news:diJdf.36433$65.11...@twister1.libero.it...

ok e come faccio a fare riferimento alla tabella


title: Ritento con aggiungi festivo

text:
"Michele Fusco" <
mike...@libero.it
> ha scritto nel messaggio
news:437765ec$0$27602$4faf...@reader1.news.tin.it...

Ad esempio con una DLookup (vedi help).



title: query unione non trovo errore

author: Silver

text:
non capisco come mai una query unione non riesce.
questo è l'sql
SELECT numero, data, ragione_sociale, totale, anno, cod_pagamento
FROM tlb1
UNION SELECT numero, data, ragione_sociale, totale, anno, cod_pagamento
FROM tbl2
UNION SELECT numero, data, ragione_sociale, totale, anno, cod_pagamento
FROM tbl3;
quando a prenderle a gruppi di due riescono tutte (tbl1 union tbl2, tbl2
union tbl3, tbl1 union tbl3)
i campi delle tabelle sono tutti dello stesso tipo, anche se tra tbl2 e
tbl3 c'è una differenza di ordine.
Grazie


title: query unione non trovo errore

text:
mi sono dimenticato di specificare che le tabelle sono tutte collegate
tramite odbc su server mysql e che ho provato a ricreare la query in un
mdb nuovo ricevendo lo stesso errore.
l'errore (chiamata ODBC non riuscita) sparisce se provo a importare le
tabelle nell'mdb e poi eseguo la query.