title: CR & LF nel codice sql delle query

author: Odino Saur

text:
ciao
come molti di voi spesso lavoro sulle query digitandone direttamente il
codice sql.
A volte questo codice è davvero "lungo" e difficile da leggere così che
tendo a usare le indentazioni e gli "a capo" per poterlo leggere più
agevolmente..
appena però salvo la query i caratteri di indentazione, spazi, tabs, cr etc
vanno persi così da rendere vano il mio lavoro...
conoscete qualche stratagemma per risolvere la faccenda?
Access xp  (io uso il 2k) ovvia a questo inconveniente?
ciao e un grazie a tutti


title: CR & LF nel codice sql delle query

author: Antonio Biso

text:
"Odino Saur" <
no...@rispondo.org
> ha scritto nel messaggio
news:b7gtqq$qq7$1...@fata.cs.interbusiness.it...
> ciao
>
> come molti di voi spesso lavoro sulle query digitandone direttamente il
> codice sql.
Mah...
Io raramente lo faccio.
Mi appoggio al Qbe anche quando devo scrivere l'sql nel codice,
incollandocelo dentro e sostituendo magari le costanti con le variabili del
programma
> A volte questo codice è davvero "lungo" e difficile da leggere così che
> tendo a usare le indentazioni e gli "a capo" per poterlo leggere più
> agevolmente..
>
> appena però salvo la query i caratteri di indentazione, spazi, tabs, cr
etc
> vanno persi così da rendere vano il mio lavoro...
>
> conoscete qualche stratagemma per risolvere la faccenda?
Salvati l'sql in file di testo con lo stesso nome della query e che andrai a
recuperare quando ti servono
>
> Access xp  (io uso il 2k) ovvia a questo inconveniente?
Non credo proprio...
Antonio


title: problema legato all'utilizzo di FC

author: Piero

text:
ciao a tutti
Ho un problema legato all'utilizzo di FC.
La condizione è legata ad una casella di controllo 0/-1
con origine da
=IIf(IsNull(DLookUp("nCol";"Q_Carichi";"IdCarico=" &
[IdCarico]));0;DLookUp("nCol";"Q_Carichi";"IdCarico=" & [IdCarico]))
Con questa espressione la casella di controllo è instabile (cioè traballa)e
di conseguenza i controlli si colorano in fasi successive.

Come possso risolvere?


title: problema legato all'utilizzo di FC

author: Karl Donaubauer

text:
Ciao Piero,

Piero wrote:
> Ho un problema legato all'utilizzo di FC.
> La condizione � legata ad una casella di controllo 0/-1
> con origine da
> =IIf(IsNull(DLookUp("nCol";"Q_Carichi";"IdCarico=" &
> [IdCarico]));0;DLookUp("nCol";"Q_Carichi";"IdCarico=" & [IdCarico]))
> Con questa espressione la casella di controllo � instabile (cio�
> traballa)e di conseguenza i controlli si colorano in fasi successive.
>
> Come possso risolvere?

Invece di usare quest'espressione come origine controllo sarebbe
meglio per la prestazione di includere Q_Carichi nella query che fa
l'origine record della maschera (magari con un Left/Right Join).

Se veramente non sia possibile almeno non fa il DLookUp due
volte ma usa:

=nz(DLookUp("nCol";"Q_Carichi";"IdCarico=" & [IdCarico]);0)

Se non altro forse traballi pi� veloce. ;-)

--
Ciao
Karl
*********
Access FAQ:
http://www.donkarl.com/it


title: problema legato all'utilizzo di FC

text:
cut
>>
>> Come possso risolvere?
>
> Invece di usare quest'espressione come origine controllo sarebbe
> meglio per la prestazione di includere Q_Carichi nella query che fa
> l'origine record della maschera (magari con un Left/Right Join).
>
> Se veramente non sia possibile almeno non fa il DLookUp due
> volte ma usa:
>
> =nz(DLookUp("nCol";"Q_Carichi";"IdCarico=" & [IdCarico]);0)
>
> Se non altro forse traballi più veloce. ;-)
>
griazie Karl
Ho provato ad includere la query ma per quanto ho provato, la sottomaschera
non mi mostra piu' il record contatore cioè non mi fa piu' aggiundere
nuovi record


title: problema legato all'utilizzo di FC

text:
Piero wrote:
>>
>> Invece di usare quest'espressione come origine controllo sarebbe
>> meglio per la prestazione di includere Q_Carichi nella query che fa
>> l'origine record della maschera (magari con un Left/Right Join).
>>
>> Se veramente non sia possibile almeno non fa il DLookUp due
>> volte ma usa:
>>
>> =nz(DLookUp("nCol";"Q_Carichi";"IdCarico=" & [IdCarico]);0)
>>
>> Se non altro forse traballi pi� veloce. ;-)
>>
> Ho provato ad includere la query ma per quanto ho provato, la
> sottomaschera non mi mostra piu' il record contatore cio� non mi fa
> piu' aggiundere nuovi record

Senza conoscere l'SQL della query e gli indici e relazioni delle tabelle
non si puo dire molto. Controlla se la query � aggiornabile.



title: problema legato all'utilizzo di FC

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:b8e7q9...@mid.individual.net...
> Piero wrote:
>>>
>>> Invece di usare quest'espressione come origine controllo sarebbe
>>> meglio per la prestazione di includere Q_Carichi nella query che fa
>>> l'origine record della maschera (magari con un Left/Right Join).
>>>
>>> Se veramente non sia possibile almeno non fa il DLookUp due
>>> volte ma usa:
>>>
>>> =nz(DLookUp("nCol";"Q_Carichi";"IdCarico=" & [IdCarico]);0)
>>>
>>> Se non altro forse traballi più veloce. ;-)
>>>
>> Ho provato ad includere la query ma per quanto ho provato, la
>> sottomaschera non mi mostra piu' il record contatore cioè non mi fa
>> piu' aggiundere nuovi record
>
> Senza conoscere l'SQL della query e gli indici e relazioni delle tabelle
> non si puo dire molto. Controlla se la query è aggiornabile.

come la verifico se è aggiornabile?

ciao Karl
queste sono le 2 query:
QryCarichi_Fo:
SELECT TbCarichi.IDCarico, TbCarichi.IDOrdine, TbCarichi.IdFornitore,
TbCarichi.IdTrasportatori, TbCarichi.DataCarico, TbCarichi.DataChiusura,
TbCarichi.ConfermaC
FROM TbCarichi
ORDER BY TbCarichi.IDCarico;

Q_Carichi
SELECT TbCarichi.IDCarico, Max(IIf(IsNull([DataCarico]) Or  [N° Colli]=0) Or
IsNull([IdProdotto]),0,-1)) AS nCol
FROM TbCarichi LEFT JOIN [Dettagli] ON TbCarichi.IDCarico =
[Dettagli].IDCarico
GROUP BY TbCarichi.IDCarico;


title: problema legato all'utilizzo di FC

text:
Ciao Piero,

Piero wrote:
> "Karl Donaubauer ha scritto:
>>>> ...
>>>> Invece di usare quest'espressione come origine controllo sarebbe
>>>> meglio per la prestazione di includere Q_Carichi nella query che fa
>>>> l'origine record della maschera (magari con un Left/Right Join).
>>>>
>>>> Se veramente non sia possibile almeno non fa il DLookUp due
>>>> volte ma usa:
>>>>
>>>> =nz(DLookUp("nCol";"Q_Carichi";"IdCarico=" & [IdCarico]);0)
>>>>
>>>> Se non altro forse traballi pi� veloce. ;-)
>>>>
>>> Ho provato ad includere la query ma per quanto ho provato, la
>>> sottomaschera non mi mostra piu' il record contatore cio� non mi fa
>>> piu' aggiundere nuovi record
>>
>> Senza conoscere l'SQL della query e gli indici e relazioni delle
>> tabelle non si puo dire molto. Controlla se la query � aggiornabile.
> ...
> queste sono le 2 query:
> QryCarichi_Fo:
> SELECT TbCarichi.IDCarico, TbCarichi.IDOrdine, TbCarichi.IdFornitore,
> TbCarichi.IdTrasportatori, TbCarichi.DataCarico,
> TbCarichi.DataChiusura, TbCarichi.ConfermaC
> FROM TbCarichi
> ORDER BY TbCarichi.IDCarico;
>
> Q_Carichi
> SELECT TbCarichi.IDCarico, Max(IIf(IsNull([DataCarico]) Or  [N�
> Colli]=0) Or IsNull([IdProdotto]),0,-1)) AS nCol
> FROM TbCarichi LEFT JOIN [Dettagli] ON TbCarichi.IDCarico =
> [Dettagli].IDCarico
> GROUP BY TbCarichi.IDCarico;

Una query di raggruppamento non � mai aggiornabile e rende
anche non aggiornabile delle query dove fa parte.

Se capisco bene cosa fai nella seconda query e perch�,
sarebbe un po' complesso di combinare le due query.

Hai gi� provato l'espressione con nz() e una sola volta DLookUp
per traballare pi� veloce?

--
:-)



title: problema legato all'utilizzo di FC

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:b8eo66...@mid.individual.net...

Ciao Karl
con la seconda query spunto o meno una casella di controllo
in base alle varie condizioni.

Max(IIf(IsNull([DataCarico]) Or  [N�Colli]=0) Or IsNull([IdProdotto]),0,-1))

ho provato l'espressione con nz() una sola volta
ma non va bene


title: problema legato all'utilizzo di FC

text:
Piero wrote:
> Karl Donaubauer ha scritto
>>>>>> ...
>>>>> Ho provato ad includere la query ma per quanto ho provato, la
>>>>> sottomaschera non mi mostra piu' il record contatore cioï¿œ non
>>>>> mi fa piu' aggiundere nuovi record
>>> ...
>>> queste sono le 2 query:
>>> QryCarichi_Fo:
>>> SELECT TbCarichi.IDCarico, TbCarichi.IDOrdine,
>>> TbCarichi.IdFornitore, TbCarichi.IdTrasportatori,
>>> TbCarichi.DataCarico, TbCarichi.DataChiusura, TbCarichi.ConfermaC
>>> FROM TbCarichi
>>> ORDER BY TbCarichi.IDCarico;
>>>
>>> Q_Carichi
>>> SELECT TbCarichi.IDCarico, Max(IIf(IsNull([DataCarico]) Or  [Nï¿œ
>>> Colli]=0) Or IsNull([IdProdotto]),0,-1)) AS nCol
>>> FROM TbCarichi LEFT JOIN [Dettagli] ON TbCarichi.IDCarico =
>>> [Dettagli].IDCarico
>>> GROUP BY TbCarichi.IDCarico;
>>
> con la seconda query spunto o meno una casella di controllo
> in base alle varie condizioni.
>
> Max(IIf(IsNull([DataCarico]) Or  [Nï¿œColli]=0) Or
> IsNull([IdProdotto]),0,-1)) ...

Certo, il problema ï¿œ il raggruppamento/Max().
Tutti e tre campi sono dalla tabella Dettagli?

--
Ciao



title: problema legato all'utilizzo di FC

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:b8geo4...@mid.individual.net...
> Piero wrote:
>> Karl Donaubauer ha scritto
>>>>>>> ...
>>>>>> Ho provato ad includere la query ma per quanto ho provato, la
>>>>>> sottomaschera non mi mostra piu' il record contatore cioè non
>>>>>> mi fa piu' aggiundere nuovi record
>>>> ...
>>>> queste sono le 2 query:
>>>> QryCarichi_Fo:
>>>> SELECT TbCarichi.IDCarico, TbCarichi.IDOrdine,
>>>> TbCarichi.IdFornitore, TbCarichi.IdTrasportatori,
>>>> TbCarichi.DataCarico, TbCarichi.DataChiusura, TbCarichi.ConfermaC
>>>> FROM TbCarichi
>>>> ORDER BY TbCarichi.IDCarico;
>>>>
>>>> Q_Carichi
>>>> SELECT TbCarichi.IDCarico, Max(IIf(IsNull([DataCarico]) Or  [N°
>>>> Colli]=0) Or IsNull([IdProdotto]),0,-1)) AS nCol
>>>> FROM TbCarichi LEFT JOIN [Dettagli] ON TbCarichi.IDCarico =
>>>> [Dettagli].IDCarico
>>>> GROUP BY TbCarichi.IDCarico;
>>>
>> con la seconda query spunto o meno una casella di controllo
>> in base alle varie condizioni.
>>
>> Max(IIf(IsNull([DataCarico]) Or  [N°Colli]=0) Or
>> IsNull([IdProdotto]),0,-1)) ...
>
> Certo, il problema è il raggruppamento/Max().
> Tutti e tre campi sono dalla tabella Dettagli?
>
> --
ciao Karl
no! per DataCarico ho TbCarichi il resto è nella
tabella Dettagli


title: problema legato all'utilizzo di FC

text:
Ciao Piero,

Piero wrote:
>>>> ...
>>> con la seconda query spunto o meno una casella di controllo
>>> in base alle varie condizioni.
>>>
>>> Max(IIf(IsNull([DataCarico]) Or  [Nï¿œColli]=0) Or
>>> IsNull([IdProdotto]),0,-1)) ...
>> ...

Come mai ci sono 4 parentesi che si apertano e 5 che
si chiudono? Cosï¿œ non puo funzionare.
Non hai incollato la stringa dalla vis. SQL?



title: problema legato all'utilizzo di FC

text:
Ciao Piero,

Piero wrote:
> "Karl Donaubauer ha scritto:
>>>>>>>> ...
>>>>>>> Ho provato ad includere la query ma per quanto ho provato, la
>>>>>>> sottomaschera non mi mostra piu' il record contatore cioï¿œ non
>>>>>>> mi fa piu' aggiundere nuovi record
>>>>> ...
>>>>> queste sono le 2 query:
>>>>> QryCarichi_Fo:
>>>>> SELECT TbCarichi.IDCarico, TbCarichi.IDOrdine,
>>>>> TbCarichi.IdFornitore, TbCarichi.IdTrasportatori,
>>>>> TbCarichi.DataCarico, TbCarichi.DataChiusura,
>>>>> TbCarichi.ConfermaC FROM TbCarichi
>>>>> ORDER BY TbCarichi.IDCarico;
>>>>>
>>>>> Q_Carichi
>>>>> SELECT TbCarichi.IDCarico, Max(IIf(IsNull([DataCarico]) Or  [Nï¿œ
>>>>> Colli]=0) Or IsNull([IdProdotto]),0,-1)) AS nCol
>>>>> FROM TbCarichi LEFT JOIN [Dettagli] ON TbCarichi.IDCarico =
>>>>> [Dettagli].IDCarico
>>>>> GROUP BY TbCarichi.IDCarico;
>>>>
>>> con la seconda query spunto o meno una casella di controllo
>>> in base alle varie condizioni.
>>>
>>> Max(IIf(IsNull([DataCarico]) Or  [Nï¿œColli]=0) Or
>>> IsNull([IdProdotto]),0,-1)) ...
>>
>> Certo, il problema ï¿œ il raggruppamento/Max().
>> Tutti e tre campi sono dalla tabella Dettagli?
>>
> ...
> no! per DataCarico ho TbCarichi il resto ï¿œ nella
> tabella Dettagli

Prova di aggiungere un nuovo campo alla QryCarichi_Fo
(tutto in 1 riga):

iif(DLookUp("IdCarico";"Dettagli";"([Nï¿œ Colli]=0 OR
 IdProdotto Is Null) And IDCarico =" & [IdCarico]);0;-1)
And Not IsNull([DataCarico])

Controlla se ti dï¿œ i risulti desiderati per la casella di controllo
e come peggiora la prestazione della query.
Se va bene, usa il campo come origine di controllo della casella.



title: problema legato all'utilizzo di FC

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:b8gjvi...@mid.individual.net...
> Ciao Piero,
>
> Piero wrote:
>>>>> ...
>>>> con la seconda query spunto o meno una casella di controllo
>>>> in base alle varie condizioni.
>>>>
>>>> Max(IIf(IsNull([DataCarico]) Or  [N°Colli]=0) Or
>>>> IsNull([IdProdotto]),0,-1)) ...
>>> ...
>
> Come mai ci sono 4 parentesi che si apertano e 5 che
> si chiudono? Così non puo funzionare.
> Non hai incollato la stringa dalla vis. SQL?
>
hai ragione qui ho pasticciato


title: problema legato all'utilizzo di FC

text:
cut
>>>
>> ...
>> no! per DataCarico ho TbCarichi il resto è nella
>> tabella Dettagli
>
> Prova di aggiungere un nuovo campo alla QryCarichi_Fo
> (tutto in 1 riga):
>
> iif(DLookUp("IdCarico";"Dettagli";"([N° Colli]=0 OR
> IdProdotto Is Null) And IDCarico =" & [IdCarico]);0;-1)
> And Not IsNull([DataCarico])
>
> Controlla se ti dà i risulti desiderati per la casella di controllo
> e come peggiora la prestazione della query.
> Se va bene, usa il campo come origine di controllo della casella.
>
non c'è alcuna possiilità di includerla alla query dell'origine record?


title: problema legato all'utilizzo di FC

text:
Piero wrote:
>> ...
>> Prova di aggiungere un nuovo campo alla QryCarichi_Fo
>> (tutto in 1 riga):
>>
>> iif(DLookUp("IdCarico";"Dettagli";"([Nï¿œ Colli]=0 OR
>> IdProdotto Is Null) And IDCarico =" & [IdCarico]);0;-1)
>> And Not IsNull([DataCarico])
>>
>> Controlla se ti dï¿œ i risulti desiderati per la casella di controllo
>> e come peggiora la prestazione della query.
>> Se va bene, usa il campo come origine di controllo della casella.
>>

Perchï¿œ non scrivi niente sul risultato della proposta?

> non c'ï¿œ alcuna possiilitï¿œ di includerla alla query dell'origine
> record?

Non direttamente perchï¿œ vuoi una query aggiornabile.
Restano i modi indiretti come delle sottoquery (di solito lente)
o dei DLookUp in un campo calcolato come descritto.



title: problema legato all'utilizzo di FC

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:b8hmaf...@mid.individual.net...
> Piero wrote:
>>> ...
>>> Prova di aggiungere un nuovo campo alla QryCarichi_Fo
>>> (tutto in 1 riga):
>>>
>>> iif(DLookUp("IdCarico";"Dettagli";"([N° Colli]=0 OR
>>> IdProdotto Is Null) And IDCarico =" & [IdCarico]);0;-1)
>>> And Not IsNull([DataCarico])
>>>
>>> Controlla se ti dà i risulti desiderati per la casella di controllo
>>> e come peggiora la prestazione della query.
>>> Se va bene, usa il campo come origine di controllo della casella.
>>>
>
> Perché non scrivi niente sul risultato della proposta?
ciao Karl
traballa
;-)


title: problema legato all'utilizzo di FC

text:
Ciao Piero,

Piero wrote:
>>>> ...
>>>> Prova di aggiungere un nuovo campo alla QryCarichi_Fo
>>>> (tutto in 1 riga):
>>>>
>>>> iif(DLookUp("IdCarico";"Dettagli";"([Nï¿œ Colli]=0 OR
>>>> IdProdotto Is Null) And IDCarico =" & [IdCarico]);0;-1)
>>>> And Not IsNull([DataCarico])
>>>>
>>>> Controlla se ti dï¿œ i risulti desiderati per la casella di
>>>> controllo e come peggiora la prestazione della query.
>>>> Se va bene, usa il campo come origine di controllo della casella.
>>>>
> traballa

Se questa funzionalitï¿œ ï¿œ importante sarebbe un candidato
per la violazione consapevole delle regole, cioï¿œ di salvare un
valore calcolato a causa di prestazione.

Forse c'ï¿œ una maschera che controlla ogni carico e dove con
un po' di codice puoi riempire un campo Sï¿œ/No nel TbCarichi.
Un'altra via sarebbe di riempirlo su apertura della maschera
dove hai bisogno del valore. Tutto dipende dalle circostanze,
numero di record ecc., e dal design dell'applicazione.



title: problema legato all'utilizzo di FC

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:b8j5aa...@mid.individual.net...
> Ciao Piero,
>
> Piero wrote:
>>>>> ...
>>>>> Prova di aggiungere un nuovo campo alla QryCarichi_Fo
>>>>> (tutto in 1 riga):
>>>>>
>>>>> iif(DLookUp("IdCarico";"Dettagli";"([N° Colli]=0 OR
>>>>> IdProdotto Is Null) And IDCarico =" & [IdCarico]);0;-1)
>>>>> And Not IsNull([DataCarico])
>>>>>
>>>>> Controlla se ti dà i risulti desiderati per la casella di
>>>>> controllo e come peggiora la prestazione della query.
>>>>> Se va bene, usa il campo come origine di controllo della casella.
>>>>>
>> traballa
>
> Se questa funzionalità è importante sarebbe un candidato
> per la violazione consapevole delle regole, cioè di salvare un
> valore calcolato a causa di prestazione.
>
> Forse c'è una maschera che controlla ogni carico e dove con
> un po' di codice puoi riempire un campo Sì/No nel TbCarichi.
> Un'altra via sarebbe di riempirlo su apertura della maschera
> dove hai bisogno del valore. Tutto dipende dalle circostanze,
> numero di record ecc., e dal design dell'applicazione.
>
Grazie Karl
bella idea


title: sendObject, ma il messaggio rimane in "posta in uscita"

author: Giancarlo

text:
Salve a tutti.
Ho provato ad utilizzare il metodo sendobject.
Compare la finestra:
"un programma sta tentando di inviare la posta elettronica, ecc.."
faccio click su OK ed il messaggio sembra essere regolarmente spedito.
Se entro in Outlook vedo però che il messaggio è rimasto nella cartella
"posta in uscita". Solo dopo essere entrato in Outlook il messaggio parte.
Stesso problema se utilizzo SendMailMapi di Carlo Costarella "Inviare e-mail
con MSAccess utilizzando la libreria mapi32.dll".
E' dovuto a qualche particolare impostazione di Outlook?
Utilizzo Outlook 2003 collegato ad un Server di posta su Exchange
Grazie a tutti.
Giancarlo


author: Nina

text:
"Giancarlo" <
gi...@fran.it
> ha scritto nel messaggio
news:dfh9kc$8cq$1...@balena.cs.interbusiness.it...

Ciao, dovresti controllare l'impostazione Strumenti - > Opzioni - > Scheda
Invio -> Invia messaggi immediatamanete
Se quest'opzione non è attivata potrebbe essere la causa del mancato
immediato invio
se vuoi evitare il messaggio di avviso "un programma sta tentando di inviare
la posta elettronica, ecc", devi invece deselezionare l'opzione "Avvisa se
altre applicazioni tentano l'invio di posta con l'account in uso " sempre
dal menù Strumenti - > Opzioni - > Scheda Protezione.
Ciao
Nina


author: Gaspare Calia

text:
[CUT]
A parte quanto già suggerito puoi pianificare l'invio e ricezione di email
ogni x minuti etc...: prova a smanettare in "opzioni" del menu "strumenti"!
;-)
Buona giornata :-)


text:
"Nina" <
paninotElim...@yahoo.it
> ha scritto nel messaggio
news:RIWSe.20555$4g5.1...@news4.tin.it...

Ho Outlook 2003 e non Outlook express.
La spunta su invia i messaggi immediatamente era comunque presente, mentre
NON trovo nella scheda protezione "Avvisa se altre applicazioni..."
Non so cosa sia necessario settare su Outlook 2003
> Ciao
> Nina
Ciao.
Giancarlo


text:
"Gaspare Calia" <
ma...@mail.it
> ha scritto nel messaggio
news:DQWSe.20612$4g5.1...@news4.tin.it...
> [CUT]
>
> A parte quanto già suggerito puoi pianificare l'invio e ricezione di email
> ogni x minuti etc...: prova a smanettare in "opzioni" del menu
> "strumenti"!
...ma è necessario che Outook sia aperto, allora.
> ;-)
>
> Buona giornata :-)
>
Grazie.
Giancarlo


text:
"Giancarlo" <
gi...@fran.it
> ha scritto nel messaggio
news:dfhdva$e6o$1...@balena.cs.interbusiness.it...
>
> "Nina" <
paninotElim...@yahoo.it
> ha scritto nel messaggio
> news:RIWSe.20555$4g5.1...@news4.tin.it...
>>
>> "Giancarlo" <
gi...@fran.it
> ha scritto nel messaggio
>> news:dfh9kc$8cq$1...@balena.cs.interbusiness.it...
>>> Salve a tutti.
>>> Ho provato ad utilizzare il metodo sendobject.
>>> Compare la finestra:
>>> "un programma sta tentando di inviare la posta elettronica, ecc.."
>>> faccio click su OK ed il messaggio sembra essere regolarmente spedito.
>>> Se entro in Outlook vedo però che il messaggio è rimasto nella cartella
>>> "posta in uscita". Solo dopo essere entrato in Outlook il messaggio
>>> parte.
>>> Stesso problema se utilizzo SendMailMapi di Carlo Costarella "Inviare
>>> e-mail con MSAccess utilizzando la libreria mapi32.dll".
>>> E' dovuto a qualche particolare impostazione di Outlook?
>>> Utilizzo Outlook 2003 collegato ad un Server di posta su Exchange
>>> Grazie a tutti.
>>> Giancarlo
>>>
CUT
>>
>
> Ho Outlook 2003 e non Outlook express.
> La spunta su invia i messaggi immediatamente era comunque presente, mentre
> NON trovo nella scheda protezione "Avvisa se altre applicazioni..."
> Non so cosa sia necessario settare su Outlook 2003
 Mi spiace, mi riferivo solo a Outlook Express e non so darti notizie sulle
corrispondenti opzioni su Outlook 2003.
Buon lavoro
Ciao Nina
>> Ciao
>> Nina
>
> Ciao.
> Giancarlo
>


text:
"Nina" <
paninotElim...@yahoo.it
> ha scritto nel messaggio
news:leXSe.17308$O6.10...@news3.tin.it...

Grazie lo stesso, ma per curiosità: per far funzionare il SendObject tieni
OExpress aperto?



text:
[CUT]
L'applicativo dev'essere aperto altrimenti come si porta in memoria le
opzioni x applicarle ! ;-)


text:
[CUT]
Avvialo ad icona -> che ti costa...puoi arlo anche da codice!


text:
"Giancarlo" <
gi...@fran.it
> ha scritto nel messaggio
news:dfhfbu$dvu$1...@fata.cs.interbusiness.it...
>
> "Nina" <
paninotElim...@yahoo.it
> ha scritto nel messaggio
> news:leXSe.17308$O6.10...@news3.tin.it...
>>
>> "Giancarlo" <
gi...@fran.it
> ha scritto nel messaggio
>> news:dfhdva$e6o$1...@balena.cs.interbusiness.it...
>>>
>>> "Nina" <
paninotElim...@yahoo.it
> ha scritto nel messaggio
>>> news:RIWSe.20555$4g5.1...@news4.tin.it...
>>>>
>>>> "Giancarlo" <
gi...@fran.it
> ha scritto nel messaggio
>>>> news:dfh9kc$8cq$1...@balena.cs.interbusiness.it...
CUT
CUT
>>>>
>>>
>>> Ho Outlook 2003 e non Outlook express.
>>> La spunta su invia i messaggi immediatamente era comunque presente,
>>> mentre NON trovo nella scheda protezione "Avvisa se altre
>>> applicazioni..."
>>> Non so cosa sia necessario settare su Outlook 2003
>> Mi spiace, mi riferivo solo a Outlook Express e non so darti notizie
>> sulle corrispondenti opzioni su Outlook 2003.
>
> Grazie lo stesso, ma per curiosità: per far funzionare il SendObject tieni
> OExpress aperto?
No, non è necessario.
Ciao Nina



author: Sandro

text:
"Giancarlo" <
gi...@fran.it
> ha scritto nel messaggio
news:dfh9kc$8cq$1...@balena.cs.interbusiness.it...

Ciao Giancarlo,
prova a vedere qui se trovi qualche utile info :
http://erredue.altervista.org/faq/omguard.shtml
e prova a installare questo programma per vedere se le cose migliorano :
http://www.contextmagic.com/
Facci sapere se hai risolto. Io con OL ho un pessimo rapporto quindi ci
terrei ad un tuo feed-back.
Ciao, Sandro


text:
"Sandro" <
sandro_...@tin.it
> ha scritto nel messaggio
news:Yw%Se.18361$O6.10...@news3.tin.it...
>
> "Giancarlo" <
gi...@fran.it
> ha scritto nel messaggio
> news:dfh9kc$8cq$1...@balena.cs.interbusiness.it...
>> Salve a tutti.
>> Ho provato ad utilizzare il metodo sendobject.
>> Compare la finestra:
>> "un programma sta tentando di inviare la posta elettronica, ecc.."
>> faccio click su OK ed il messaggio sembra essere regolarmente spedito.
>> Se entro in Outlook vedo perň che il messaggio č rimasto nella cartella
>> "posta in uscita". Solo dopo essere entrato in Outlook il messaggio
>> parte.
>> Stesso problema se utilizzo SendMailMapi di Carlo Costarella "Inviare
> e-mail
>> con MSAccess utilizzando la libreria mapi32.dll".
>> E' dovuto a qualche particolare impostazione di Outlook?
>> Utilizzo Outlook 2003 collegato ad un Server di posta su Exchange
>> Grazie a tutti.
>> Giancarlo
>>
>>
>
> Ciao Giancarlo,
>
> prova a vedere qui se trovi qualche utile info :
>
http://erredue.altervista.org/faq/omguard.shtml
>
> e prova a installare questo programma per vedere se le cose migliorano :
>
>
http://www.contextmagic.com/
>
> Facci sapere se hai risolto. Io con OL ho un pessimo rapporto quindi ci
> terrei ad un tuo feed-back.
Devo dire che il mio, non č un tanto un problema di non voler fare click su
"un programma sta tentando di inviare la posta elettronica, ecc.."
Piů che altro vorrei che una volta fatto ciň, i messaggi non rimanessero on
posta in uscita.
Normalmente, appena creato il messaggio e fatto click su "invia", la mail
parte e non rimane in posta in uscita. Sto verificando da altre parti...
Ti faccio sapere
>
> Ciao, Sandro
>
Ciao. Giancarlo.


title: Un virus in vba/vbs

author: RobertoA

text:
Per caso mi e' capitato un messaggio con il link sotto

http://www.threedprinterland.com/vqakee?gvxcb=4390

Ti fa scaricare uno zip che contiene un vbs ed un jpg
Dentro al vbs c'e' un programma che sembra vba/vbs
Tutto scombinato ed illeggibile ma (credo) funzionante
Non mi sono provato ad avviarlo per vedere che effetto che fa
Sarei pero' curioso di capire cosa fa il codice
Come fareste voi per renderlo leggibile?
(sostituire a mano tutti i nomi sub/funct/variabili non vale)


title: Un virus in vba/vbs

author: Ammammata

text:
Il giorno Thu 02 Aug 2018 08:27:34a, *RobertoA* ha inviato su
it.comp.appl.access il messaggio news:pju7e0$vo8$
1...@gioia.aioe.org
. Vediamo
cosa ha scritto:

> Dentro al vbs c'e' un programma che sembra vba/vbs
> Tutto scombinato ed illeggibile ma (credo) funzionante
>

http://www.ioccc.org/years-spoiler.html

vedi alcuni esempi:

http://www.ioccc.org/2011/blakely/blakely.c

http://www.ioccc.org/1993/ejb.c

http://www.ioccc.org/2001/rosten.c

http://www.ioccc.org/2015/mills1/prog.c

--
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
-=- -=- -=- -=- -=- -=- -=- -=- - -=-
>>>>>
http://www.bb2002.it
 :)  <<<<<
........... [ al lavoro ] ...........


title: in formula fare riverimento a record precedente se esiste

text:
in una maschera in visualizzazione continua è possibile calcolare un campo
in questo modo
descrizione prezzo1 prezzo2    saldo = prezzo1-prezzo2   (se primo record)
descrizione prezzo1 prezzo2    saldo = saldo precedente+prezzo1-prezzo2
(se secondo record in poi)
grazie.


text:
mi spiego meglio se
il primo record nel report deve valere questo
=[iniziale]+nz([carico];0)-nz([scarico];0)
ma dal secondo record in poi l'iniziale non deve tenerne conto
es: iniziale = 14.278,57
                         data                    carico         scarico
saldo
record 1            18/01/2008        0                 950
13.328,57
record 2             19/01/2008       0                 1.450
11.878,57
record 3             20/01/2008       5                 0
11883,57
Qualcuno sa aiutarmi?
Grazie.


text:
ho risolto cosi se a qualcuno dovesse servire
If Me.Data = DMin("data", "gr170") Then
    Me.saldo = [iniziale] + Nz([Carico], 0) - Nz([Scarico], 0)
    Prec = Me.saldo
Else
    Me.saldo = Prec + Nz([Carico], 0) - Nz([Scarico], 0)
    Prec = Me.saldo
End If


text:
"Nicolas73" <
Nico...@email.it
> ha scritto nel messaggio
news:47a86afb$0$36442$4faf...@reader5.news.tin.it...

il modo più semplice di gestire il saldo parziale è quello di utilizzare un
unico campo per carico e scarico, utilizzando valori positivi per il carico
e negativi per lo scarico.
nel report nella colonna carico fai visualizzare solo i valori positivi e
nella colonna scarico quelli negativi. nella terza colonna utilizzi tutti i
valori siano essi negativi che positivi. impostando la proprietà 'somma
parziale' a 'su tutto' otterrai il risultato richiesto.
ti saluto
thomas.az


text:
> il modo più semplice di gestire il saldo parziale è quello di utilizzare
> un
> unico campo per carico e scarico, utilizzando valori positivi per il
> carico e negativi per lo scarico.
> nel report nella colonna carico fai visualizzare solo i valori positivi e
> nella colonna scarico quelli negativi. nella terza colonna utilizzi tutti
> i valori siano essi negativi che positivi. impostando la proprietà 'somma
> parziale' a 'su tutto' otterrai il risultato richiesto.
> ti saluto
>
thomas.az
Grazie mille.


title: Opzioni

author: Nunzio

text:
E' possibile impostare da codici le opzioni di Access?
Esempio devo creare un maschera che in apertura mi disattivi i messaggi di
conferma per le query di comando e in chiusura li riattivi.
Grazie mille


title: Opzioni

author: Nicola Ardito

text:
Guardati l'help su SetOption
Ciao Nicola
PS Per non visualizzare messaggi di conferma puoi anche usare
Docmd.SetWarnings
Nunzio ha scritto nel messaggio <8kbvpt$bnc$
1...@serv1.iunet.it
>...



title: troppi dati?!

author: bep

text:
salve a tutto il ng,
    devo aggiungere molti dati ad una tabella e utilizzo il metodo AddNew di
RecordSet. Il problema è che mi da il messaggio d'errore seguente:
'Impossibile aggiugngere la quantità di dati desiderata.Inserire o incollare
meno dati'.
C'è forse un limite alla quantità di dat che si possono aggiungere?.
Help me please.
ecco la routine che mi da errore:
For i = 1 To numfile
       rst.AddNew
       rst!file = .FoundFiles(i)
       rst.Update
next i
questa routine fa parte di una funzione che legge tutti i file contenuti in
un cd e li mette nalla tabella TFile.
A volte mi da errore quando aggiungo 400 file c.a e altre quando ne aggiungo
solo una ventina.
Grazie a tutti.


title: troppi dati?!

author: OndaMax

text:
bep wrote in message ...
>     devo aggiungere molti dati ad una tabella e utilizzo il metodo AddNew
di
> RecordSet. Il problema è che mi da il messaggio d'errore seguente:
> 'Impossibile aggiugngere la quantità di dati desiderata.Inserire o
incollare
> meno dati'.
> C'è forse un limite alla quantità di dat che si possono aggiungere?.
Non dipende dalla mole di dati ...
Dipende dal fatto che stai cercando di inserire troppi caratteri in un campo
che è settato ad una dimensione minore. Vai sulla tabella ed aumenta il
numero di caratteri specificati in Dimensione Campo. Oppure rivedi la
routine in modo che specci tramite un Left sulla dimensione giusta.
OndaMax


title: troppi dati?!

text:
OndaMax wrote in message ..
> Oppure rivedi la
> routine in modo che specci tramite un Left sulla dimensione giusta.
Più che "specci" sarebbe "spezzi" ...
Scusa ...
OndaMax


title: troppi dati?!

author: Sib

text:
"OndaMax" <
ond...@liberox.it
> ha scritto nel messaggio
> OndaMax wrote in message ..
>
> > Oppure rivedi la
> > routine in modo che specci tramite un Left sulla dimensione giusta.
>
> Più che "specci" sarebbe "spezzi" ...
... e stai a cerca' er pelo nell'uovo...
Sib


title: troppi dati?!

text:
Sib wrote in message ...
> > > Oppure rivedi la
> > > routine in modo che specci tramite un Left sulla dimensione giusta.
> >
> > Più che "specci" sarebbe "spezzi" ...
>
> ... e stai a cerca' er pelo nell'uovo...
No, cerco di dare un senso ai deliri che scrivo ... :-)
Ciao
OndaMax


title: troppi dati?!

text:
"OndaMax" <
ond...@liberox.it
> ha scritto nel messaggio
news:2dxb8.5944$8F6.3...@twister2.libero.it...

mitico!


title: Report con i template

text:
Vorrei salvare i dati di parecchie tabelle in formato Word senza però usare
i report.
Ho pensato di utilizzare dei template in formato word dove gli spazi per i
campi vengono racchiusi con un simbolo (esempio: %nomecampo%), poi usando
VBA faccio un cerca e sostituisci di tutti i campii e di tutti i record.
In pratica dovrei fare questo
With Word.Application
        .Visible = True
        .Selection.PasteAndFormat (wdPasteDefault)
        For i=0 To numerocampi - 1
            Selection.Find.ClearFormatting
            Selection.Find.Replacement.ClearFormatting
            With Selection.Find
                .Text = "%" & nomecampo & "%"
                .Replacement.Text = valorerecampo
                .Forward = True
                .Wrap = wdFindContinue
                .Format = False
                .MatchCase = False
                .MatchWholeWord = False
                .MatchWildcards = False
                .MatchSoundsLike = False
                .MatchAllWordForms = False
            End With
            Selection.Find.Execute Replace:=wdReplaceAll
        Next
        .Selection.InsertBreak Type:=wdPageBreak 'nuovo
    End With
Qualcuno mi può dare una mano su come usarlo in Access usando le tabelle o
le query?


title: Report con i template

author: diego

text:
"C1P8" <
c1...@despammed.com
> ha scritto nel messaggio
news:yVRQb.6020$VS6....@tornado.fastwebnet.it...

Hai provato a esportare i report in formato rtf ?
Ti crei il report come dici tu con Access e poi lo esporti in formato
rtf.... quando lo aprirai con word vedrai che manterra' la formattazione che
gli avevi dato con Access ma senza le linee e i rettangoli.
Prova, magari eviti di impazzire.


title: Report con i template

author: Sergio MAZZA

text:
"C1P8" <
c1...@despammed.com
> ha scritto nel messaggio
news:yVRQb.6020$VS6....@tornado.fastwebnet.it...

Prova l'alternativa (in word) del campo DATABASE...
Ciao.
--
Sergio MAZZA


title: Report con i template

author: Roberto da casa

text:
"C1P8" <
c1...@despammed.com
> ha scritto nel messaggio
news:yVRQb.6020$VS6....@tornado.fastwebnet.it...

Hai provato a vedere se risolvi il tuo problema con il metodo OutputTo (vedi
help) impostando ad acOutputTable l'argomento tipooggetto e ad acFormatRTF o
acFormatTXT l'argomento formatooutput?
Se poi devi usare una struttura particolare del file di testo, forse la cosa
migliore è usare il metodo TransferText (vedi help) per il quale,
nell'argomento nomefilespecifiche, indicherai il nome dell'espressione
stringa che contiene la struttura delle righe del file di testo.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Come 'ripulire' file .mdb da form, variabili, moduli inutilizzati ?

text:
Spesso nella scrittura di codice vengono usate delle variabili che poi,
cambiando il codice non vengono piu' sfruttate.
Stessa cosa per alcune form
Stessa cosa per interi moduli o funzioni all'interno di essi
Conoscete qualcosa che possa automaticamente 'ripulire' da tutta 'sta roba
inutile ?
Ciao e grazie
RobertoA


author: Michele (Giò)

text:
"RobertoA" <
amor...@tiscalinet.it
> ha scritto nel messaggio
news:4698f624$1...@newsgate.x-privat.org...

Ti rispondo a ricordi.
Tempo indietro mi ero creato uno scritto VB che rendeva private (o altrimenti public) tutte le
functions.
Praticamente il giochetto stava nel compilare il codice ogni volta che una function veniva riscritta
come Private Function.
Application ha una proprietà che si chiama IsCompiled: se questa era true dopo la compilazione,
allora la privatizzazione era andata a buon fine, altrimenti la function veniva riscritta come
public function. E si andava avanti.
Guarda, ti riporto il modulino da me utilizzato per questa cosa, tanto è abbastanza corto. Potresti
riadattarlo tentando di cancellare uno alla volta tutti i "Dim" e rimettendoli in caso di errore di
compilazione.
Una volta capito il meccanismo, fai tutto quel che vuoi, cancellando intere funzioni. Ecco per le
funzioni potresti provare a rinominarle con dei nomi diversi e comunque non già utilizzati. In caso
di compilazione a buon fine, potrai cancellare la funzione, altrimenti la lasci così com'è.
Ecco, a tua cura sostituire il percorso con il tuo db e disattivare macro autoexec o maschere di
apertura, altrimenti va in pallone. E prova su una copia. Formula vista e piaciuta.
/////////////////////////////////////////////////////
Option Compare Database
Option Explicit
Dim Appl As New Access.Application
Dim n As Long
Dim OldStr As String
Dim CorrectStr As String
Dim NonCorretto As Boolean
Dim FineModulo As Boolean
'------------------------------------------------------------------------------------------
Function PublicToPrivate()
On Error GoTo errore
Echo False
Dim Appl As New Access.Application
Dim Mdl As Object
Dim AccMdl As Access.Module
Appl.OpenCurrentDatabase "C:\TuoDatabase.mdb"
For Each Mdl In Appl.CurrentProject.AllModules
    NonCorretto = False
    n = 0
    FineModulo = False
Res1:
    If Not Mdl.IsLoaded Then Appl.DoCmd.OpenModule Mdl.Name
    Set AccMdl = Appl.Modules(Mdl.Name)
    ControllaModulo AccMdl, NonCorretto, FineModulo
    Appl.DoCmd.Close acModule, Mdl.Name
    Appl.DoCmd.RunCommand acCmdCompileAllModules
    If Not Appl.IsCompiled Then
        NonCorretto = True
        GoTo Res1
    Else
        NonCorretto = False
        If Not FineModulo Then GoTo Res1
    End If
    Set AccMdl = Nothing
    Appl.DoCmd.Close acModule, Mdl.Name
    Set Mdl = Nothing
Next Mdl
Appl.DoCmd.RunCommand acCmdCompactDatabase
Appl.CloseCurrentDatabase
Appl.Quit
Set Appl = Nothing
Echo True
Exit Function
errore:
Echo True
Err.Raise Err.Number, Err.Source, Err.Description
End Function
'--------------------------------------------------------------------------------------------------------------------------
Function ControllaModulo(ByRef AccMdl As Access.Module, ByRef Correggi As Boolean, ByRef Fine As
Boolean)
If Correggi Then
    AccMdl.ReplaceLine n, CorrectStr
    Fine = False
    Exit Function
End If
Do While Not n = AccMdl.CountOfLines
    n = n + 1
    If Mid(Trim(AccMdl.Lines(n, 1)), 1, 8) = "Function" Then
        OldStr = AccMdl.Lines(n, 1)
        CorrectStr = Replace(OldStr, "Function", "Public Function")
        AccMdl.ReplaceLine n, Replace(OldStr, "Function", "Private Function")
        Exit Function
    End If
    If Mid(Trim(AccMdl.Lines(n, 1)), 1, 15) = "Public Function" Then
        OldStr = AccMdl.Lines(n, 1)
        CorrectStr = AccMdl.Lines(n, 1)
        AccMdl.ReplaceLine n, Replace(OldStr, "Public Function", "Private Function")
        Exit Function
    End If
Loop
If n = AccMdl.CountOfLines Then Fine = True
End Function
/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////


title: Errore riservato

author: Alberto Luzi

text:
Salve!
A volte mi capita che quando seleziono un valore (stringa) da una casella combinata avere errore riservato.
Cosa può essere?
Grazie


title: Errore riservato

text:

Se metti la gestione errori magari hai qualche evidenza in più...

@Alex


title: Errore riservato

text:

grazie Alex
l'ho la gestione errori


title: Errore riservato

text:
...
> > @Alex
> grazie Alex
> l'ho la gestione errori

Se andiamo a telegrammi scriviamo 2gg.
Se hai la gestione errori puoi mostrarla...?
Se l'hai messa sulla Combo probabilmente non serve a nulla, perchè è facile o molto probabile che l'errore sia da intercettare su Form_Error...

Quindi se parti dando per scontato che hai fatto giusto, siamo costretti a fare mille domande...!
Metti sempre in discussione quello che hai fatto ed esponi chiaramente lo stato di fatto.

@Alex


title: Errore riservato

text:

nella form ho questa:
On Error GoTo Err_Form_Error

    Select Case DataErr
      Case 3200
        Response = acDataErrContinue
        MsgBox "Non puoi eliminare record.", vbExclamation, "Attenzione!"
      Case 3316
        Response = acDataErrContinue
        MsgBox "Devi inserire prima un Nome.", vbExclamation, "Attenzione!"
        Me.Undo
    End Select

Exit_Form_Error:
    Exit Sub

Err_Form_Error:
    MsgBox Err.Description
    Resume Exit_Form_Error

poi nella combo ho
On Error GoTo Err_CboFornitore_BeforeUpdate

    Dim iRisposta As Integer

    If Not IsNull(DLookup("IdFornitore", "TbCarico", _
      "IdFornitore = " & Nz(Me!CboFornitore, 0) & _
      " And IdOrd = " & Me!IdOrd)) _
      And Me!CboFornitore <> Nz(Me!CboFornitore.OldValue) Then
        iRisposta = MsgBox("ATTENZIONE: '" & Me!CboFornitore.Column(1) & "' Già esiste, vuoi inserirlo ugualmente?", vbYesNo, "Duplicato!")
    End If

    Select Case iRisposta
      Case vbYes
      Case vbNo
        Call tForn(Me!CboFornitore, 0)
        Me.Undo
      Case Else
    End Select

Exit_CboFornitore_BeforeUpdate:
    Exit Sub

Err_CboFornitore_BeforeUpdate:
    MsgBox Err.Description
    Resume Exit_CboFornitore_BeforeUpdate


title: Errore riservato

author: Alex

text:
Alberto nell'evento Form_Error... non ti pare manchi qualche cosa....?

Il select case di DataErr controlla 2 casi... come pensi di capire
 se jl valore di DataErr non è tra quei 2 quale sia il
 problema...?
Se non metti un Else per includere TUTTI gli altri messaggi... non
 te ne accorgi di certo.
Non confondere la gestione errori di Funzione/Sub dalla
 valutazione del DataErr parametro dell'evento...

@Alex

--
@Alex

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


title: Errore riservato

text:
Il giorno martedì 2 febbraio 2021 alle 19:20:47 UTC+1 @Alex ha scritto:
> Alberto nell'evento Form_Error... non ti pare manchi qualche cosa....?
>
> Il select case di DataErr controlla 2 casi... come pensi di capire
> se jl valore di DataErr non è tra quei 2 quale sia il
> problema...?
> Se non metti un Else per includere TUTTI gli altri messaggi... non
> te ne accorgi di certo.
> Non confondere la gestione errori di Funzione/Sub dalla
> valutazione del DataErr parametro dell'evento...
>

grazie Alex
faccio come hai detto
poi ti dirò che errore ho


title: Errore riservato

text:

ciao Alex,
continuo ad avere errore riservato, nonostante abbia inserito
la gestione errori come mi ha suggerito.
Credo che l'errore possa derivare da questa sub che ho
in un modulo pubblico e che richiamo da su modifica della casella combinata
con: Call TrovaFo(Me!CboFornitore)

Sub TrovaFo(MyCbo As Access.ComboBox)
  Dim actCTL As Access.Control
  Dim strFind As String
  Dim strSql As String

  Set actCTL = Screen.ActiveControl
  With MyCbo
    If actCTL.Name = .Name Then
      If Nz(.Column(1), "0") <> .Text Then
        strFind = "Fornitore Like '" & "*" & Replace(.Text, "'", "''") & "*" & "'"
        strSql = vbNullString
        strSql = strSql & "SELECT F.IdFornitore, F.Fornitore, F.Indirizzo, (F.CAP + '  ') & F.Città AS Città "
        strSql = strSql & "FROM TbFornitori AS F"
        strSql = strSql & "WHERE " & strFind & " "
        strSql = strSql & "ORDER BY F.Fornitore;"
        .RowSource = strSql
        .Dropdown
      End If
    End If
  End With
End Sub


title: formattare data e...

author: Alfonso Carfora

text:
scusate ma per problemi al computer ho perso le risposte
alle domande che avevo fatto l'altra settimana?
1.come posso formattare la data in modo che nel report
compaia soltanto cosě, ad es.:
30/10/2001 19:25   e NON anche i secondi. Grazie!
2.ho un campo testo espandibile e sotto un campo non associato che quando il
primo si espande lo copre: come
posso fare per fare in modo che il secondo si sposti in basso, se serve?
Grazie!
Alfonso


title: formattare data e...

author: Roberto - Syd

text:
"Alfonso Carfora" <
alfonso...@libero.it
> ha scritto nel messaggio
news:0_Jv7.38165$0Y2.3...@news.infostrada.it...
> scusate ma per problemi al computer ho perso le risposte
> alle domande che avevo fatto l'altra settimana?
> 1.come posso formattare la data in modo che nel report
> compaia soltanto così, ad es.:
> 30/10/2001 19:25   e NON anche i secondi. Grazie!
>
> 2.ho un campo testo espandibile e sotto un campo non associato che quando
il
> primo si espande lo copre: come
> posso fare per fare in modo che il secondo si sposti in basso, se serve?
> Grazie!
> Alfonso
>
>
>
La stringa di formattazione dovrebbe essere questa:
gg/mm/aa hh:nn comunque per maggiori informazioni premi F1 quando sei
posizionato sulla proprietà formato.
Ciao Roberto - Syd
Prova così:
sull'evento format del corpo del report scrivi:
me.NomeControlloNonAssociato.Top = Me.ControlloEspandibile.Top +
Me.ControlloEspandibile.Height
dovrebbe funzionare.


title: formattare data e...

text:
"Alfonso Carfora" <
alfonso...@libero.it
> ha scritto nel messaggio
news:0_Jv7.38165$0Y2.3...@news.infostrada.it...
> scusate ma per problemi al computer ho perso le risposte
> alle domande che avevo fatto l'altra settimana?
> 1.come posso formattare la data in modo che nel report
> compaia soltanto così, ad es.:
> 30/10/2001 19:25   e NON anche i secondi. Grazie!
>
> 2.ho un campo testo espandibile e sotto un campo non associato che quando
il
> primo si espande lo copre: come
> posso fare per fare in modo che il secondo si sposti in basso, se serve?
> Grazie!
> Alfonso
>
Secondo me dovresti impostare bene la data nelle Tabelle e nelle Form e
risolvere
il problema alla radice.
Mi spiego meglio, credo tu abbia usato in qualche controllo la finzione
=New()
per inserire la data in automatico, se è esatto il tuo problema è proprio
questo.
Per risolverlo definitivamente puoi innanzitutto fare una Qry di
aggiornamento su tutti
i campi data impostando aggiorna a : Int(TuaData).
Poi sostituisci a Now()---->la funzione( Date ) oppure Int(now()).
In questo modo nessuna data conterrà più hh/mm/ss.
Tutto ciò se i secondi, minuti e ore non ti servono........
@Alex


title: Somme Incrementali

author: Passioni Claudio

text:
Ciao a tutti,
ho un problemino che pero' molti di voi sicuramente mi risolveranno
facilmente.
Ho una tabella fatta cosi':
Campo1 Campo2
xxxxx        10
yyyyy       20
zzzzzz       5
Con una query devo tirare fuori una roba di questo genere:
Campo1 Campo2
xxxxx        10
yyyyy       30
zzzzzz       35
Ringrazio anticipatamente tutti quelli che mi aiuteranno.
Saluti
Claudio


title: Somme Incrementali

author: Massimiliano Amendola  kksrl

text:
> ho un problemino che pero' molti di voi sicuramente mi risolveranno
> facilmente.
> Ho una tabella fatta cosi':
>
> Campo1 Campo2
> xxxxx        10
> yyyyy       20
> zzzzzz       5
>
> Con una query devo tirare fuori una roba di questo genere:
>
> Campo1 Campo2
> xxxxx        10
> yyyyy       30
> zzzzzz       35
>
Il buon Roberto mi ha insegnato
SELECT tabella2.campo1, (select(sum(tabella1.campo2)) from tuatabella as
tabella1 where tabella1.campo1 >=tabella2.campo1) AS comevuoitu FROM
tuatabella AS tabella2
ORDER BY tabella2.campo1 DESC;
in pratica richiama il campo 1 della tua tabella e lo assegna a tabella2 che
si crea x l'occasione, poi chiede di somma del campo2 assegnandogli una
tabella temporanea tabella1 filtrando i record precedenti.
E' più facile farlo che spiegarlo, provaci.
MAssimiliano


title: Somme Incrementali

author: Karl Donaubauer

text:
Passioni Claudio ha scritto:...
> Ho una tabella fatta cosi':
>
> Campo1 Campo2
> xxxxx        10
> yyyyy       20
> zzzzzz       5
>
> Con una query devo tirare fuori una roba di questo genere:
>
> Campo1 Campo2
> xxxxx        10
> yyyyy       30
> zzzzzz       35
p.e.
How to Create Running Totals in a Query
http://support.microsoft.com/default.aspx?scid=kb;en-us;Q290136
--
HTH
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


title: Ordinare le date per mesi in una query

author: Cataldo Formaro

text:
Ciao a tutti gli amici e partecipanti al NG
ho una query che mi restituisce come risultato, il raggruppamento delle date
per mesi, con i rispettivi importi.
Esempio:
Mese                        Importo
__________________________
Agosto 2002             2300
Gennaio 2002            1000
Novembre 2002        2000
Ottobre 2002            2000
Come fare affinchè i mesi non mi vengano ordinati alfatecicamente ma come
nel calendario e cioè:
Mese                        Importo
__________________________
Gennaio 2002            1000
Agosto 2002             2300
Ottobre 2002            2000
Novembre 2002        2000
Ringrazio anticipatamente quanti mi verranno in aiuto.
Salutoni CF


title: Ordinare le date per mesi in una query

author: Claudio

text:
"Cataldo Formaro" <
formaro...@inwind.it
> ha scritto nel messaggio
news:j2nm9.37119$e31.8...@twister2.libero.it...
> Ciao a tutti gli amici e partecipanti al NG
> ho una query che mi restituisce come risultato, il raggruppamento delle date
> per mesi, con i rispettivi importi.
> Come fare affinchè i mesi non mi vengano ordinati alfatecicamente ma come
> nel calendario e cioè:
Potresti aggiungere alla tua query un campo del tipo
"Format$([TuaTabella].[TuaData];'aaaamm')", senza abilitarne la visione. A
questo punto potresti utilizzare questo campo per fare l'ordinamento che
preferisci...
Soluzioni migliori sono benvenute :-)
Ciao. Claudio.


title: Ordinare le date per mesi in una query

text:
"Cataldo Formaro" <
formaro...@inwind.it
> ha scritto nel messaggio
news:j2nm9.37119$e31.8...@twister2.libero.it...

Nella tua query creati un campo calcolato in questa maniera:
DataInCifre: CDate("1 " & [Mese])
ed ordina in maniera crescente in base a questo campo calcolato
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Ordinare le date per mesi in una query

author: Fabrizio

text:


Ti propongo un modo , come esempio ho preso NorthWind:
SQL:
TRANSFORM Max([Dettagli ordini].PrezzoUnitario) AS MaxDiPrezzoUnitario
SELECT Ordini.IDCliente, Year([DataOrdine]) AS Anno
FROM Ordini INNER JOIN [Dettagli ordini] ON Ordini.IDOrdine =
[Dettagli ordini].IDOrdine
GROUP BY Ordini.IDCliente, Year([DataOrdine])
PIVOT Format([DataOrdine],"mmm") In
("Gen","Feb","Mar","Apr","Mag","Giu","Lug","Ago","Set","Ott","Nov","Dic");
Tale query ( a campi incrociati ) ti costruisce una "tabella",
sinceramente per fare veloce l'ho preparata col QBE, ispirandomi alla
query "Ordini Trimestrali per Prodotto" sempre in NorthWind, come
"trucchetto" in più , per mettere in ordine i mesi , entra nella
proprietà della query (in QBE) e in "Intestazione Colonne" a manella
metti:
"Gen";"Feb";"Mar";"Apr";"Mag";"Giu";"Lug";"Ago";"Set";"Ott";"Nov";"Dic"
( mi raccomando tutto esattamente come è scritto : in questo ordine e
senza errori di ortografia)
E' solo un suggerimento in più: se hai voglia prova.
Ciao. Fabrizio


title: Ordinare le date per mesi in una query

text:
On Wed, 02 Oct 2002 11:04:40 +0200, Fabrizio
<fabrizio...@SPAMtiscalinet.it> wrote:
>cut
> come
>"trucchetto" in più , per mettere in ordine i mesi , entra nella
>proprietà della query (in QBE) e in "Intestazione Colonne" a manella
>metti:
>"Gen";"Feb";"Mar";"Apr";"Mag";"Giu";"Lug";"Ago";"Set";"Ott";"Nov";"Dic"
>( mi raccomando tutto esattamente come è scritto : in questo ordine e
>senza errori di ortografia)
>
>E' solo un suggerimento in più: se hai voglia prova.
>
>Ciao. Fabrizio
Scusa , è ovvio , ma da come ho scritto sembra di no , che la query in
SQL va bene così , mentre se decidi di farla in QBE devi usare il
"trucchetto". Spero di essermi spiegato meglio , se no calci sul culo
datemi.  :-)))
Ciao. Fabrizio


title: Ordinare le date per mesi in una query

text:
[CUT]
Siete stati tutti molto gentili come al solito,
Vi allego l'SQL della query (che ho completato) col problema risolto!!!
GRAZIE ed alla prossima
CF


title: Ordinare le date per mesi in una query

text:
"Cataldo Formaro" <
formaro...@inwind.it
> ha scritto nel messaggio
news:_dCm9.39145$Eu.8...@twister1.libero.it...
> [CUT]
> Siete stati tutti molto gentili come al solito,
> Vi allego l'SQL della query (che ho completato) col problema risolto!!!
Dimenticavo....
SELECT DISTINCTROW Format$(Tb_Dettagli_Fatture.Del,'mmmm yyyy') AS [Del per
mese], Tb_Dettagli_Fatture.ID_Agente, Sum(Tb_Dettagli_Fatture.ImportoNetto)
AS [Somma Di ImportoNetto], Tb_Agenti.Nominativo, Tb_Agenti.Per_Provv,
([Somma Di ImportoNetto]/100)*[Per_Provv] AS Espr1
FROM Tb_Agenti INNER JOIN Tb_Dettagli_Fatture ON
Tb_Agenti.ID_Agente=Tb_Dettagli_Fatture.ID_Agente
GROUP BY Format$(Tb_Dettagli_Fatture.Del,'mmmm yyyy'),
Tb_Dettagli_Fatture.ID_Agente, Tb_Agenti.Nominativo, Tb_Agenti.Per_Provv,
Year(Tb_Dettagli_Fatture.Del)*12+DatePart('m',Tb_Dettagli_Fatture.Del)-1
ORDER BY
Year(Tb_Dettagli_Fatture.Del)*12+DatePart('m',Tb_Dettagli_Fatture.Del)-1;



title: filtro in report di una query a campi incrociati

author: leonardo

text:
Problema su report di una query a campi incrociati
Creato un report per la query a campi incrociati e fino qui nessun problema
ho una maschera con una casellacombinata non associata (Casellacombinata0)
dove riporta semplicemente un valore di scelta di un anno
(2005,2004.......),vorrei riuscire ad aprire il mio report e ottenere i
valori della Casellacombinata0 che ho selezionato .
per fare cio' normalmente applico un filtro nel mio report :
[espr1] = [forms]![nomemaschera]![casellacombinata0]
il problema che mi da errore M.jet non riconosce la 'casellacombinata0' come
nome di campo o espressione valida
premetto che :
[espr1] = year(data ordine)
grazie a tutti come sempre


author: Alessandro Baraldi

text:
"leonardo" <
leonardo...@email.it
> wrote in message
news:%mc%d.10828$
kC3....@tornado.fastwebnet.it

Perchè non componi il Filtro come si fà normalmente
passandolo alla funzione OpenReport attraverso il Criterio
WHERE...????
P.S. Se la Maschera è chiusa ovviamente non và, ma insisto
che è un metodo estremamente non corretto.
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:c1dde1ee6ee9af745c...@mygate.mailgate.org...

Hai ragione anche tu ,purtroppo quando si impara da soli non e' sempre
giusto
il problema piu' grosso e che questo report contiene 6 sottoreport quindi
devo applicare il filtro per ogni sottoreport perche' i campi sono diversi e
devono farmi sempre riferimento alla mia maschera aperta dove ci sono delle
casellecombinate non associate.
grazie ancora
Leo


text:
"leonardo" <
leonardo...@email.it
> ha scritto nel messaggio
news:%mc%d.10828$kC3....@tornado.fastwebnet.it...

Io fossi in te renderei parametrica la query a campi incrociati, facendo
riferimento nei criteri alla casella combinata invece che filtrare il
report; se opti per tale soluzione ti ricordo di inserire la dichiarazione
PARAMETERS prima dell'istruzione SELECT: per maggiori chiarimenti vai sul
Sito Comune e nella Sezione Queries leggi la mia FAQ intitolata "2.12 Query
a campi incrociati parametrica".
Così l'esecuzione della query a campi incrociati risulterà sicuramente più
veloce.
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Dimesionamento del form iniziale in altezza e larghezza

author: DBN

text:
Alla cortese attenzione del Gentilissimo Massimiliano !!!
Innanzitutto grazie per il suggerimento.
Chiedo scusa per non aver posto la domanda correttamente.
E' giusta l'osservazione di indicare l'oggetto adatto.
Mi impegnerò a farlo sempre.
Adesso ripropongo la domanda
Oltre a massimizzare le dimensioni della maschera/form iniziale e possibile
determinarle, inserendo altezza e larghezza del form?
Grazie ancora.


author: MA

text:
"DBN" <
dbo...@dalbosco.com
> ha scritto nel messaggio
news:bebvtv$3esc4$1...@ID-91233.news.dfncis.de...

ottimo così.
Se massimizzi non puoi decidere la grandezza della form, lo fai lui.
Se altrimenti, ti crei le dimensioni che vuoi e cambi nelle proprietà del
form da Dimensionabile a dialogo o nessuno e lui ti lascerà le dimensioni
che hai settato.
ciao MAssimiliano


text:
"DBN" <
dbo...@dalbosco.com
> ha scritto nel messaggio
news:bebvtv$3esc4$1...@ID-91233.news.dfncis.de...

Si, con l'istruzione MoveSize(F1).............!!!
@Alex.


title: IVA Telematica Xml

author: Simone Calligaris

text:
L'elemento <Modulo> è definito nelle specifiche con periodicità 1 ... 5

Non capisco per quale ragione: nel caso di liquidazioni mensili, verranno
generati 3 Righe Modulo.
Mentre per Liquidaz. Trimestrali, un solo Modulo.

Qualcuno ci sta lavorando?  (BFS, se ci sei batti un colpo!)

Saluti.


title: IVA Telematica Xml

author: BFS

text:

Modulo

Per ciascuna liquidazione periodica deve essere compilato un distinto
modulo della presente Comunicazione, compilando
il campo “Mod. N.” posto in alto a destra nel quadro VP. Pertanto, i
contribuenti che effettuano:

• esclusivamente liquidazioni periodiche mensili, devono compilare un
modulo per ciascun mese del trimestre;

• esclusivamente liquidazioni periodiche trimestrali, devono compilare
un unico modulo per il trimestre;

• sia liquidazioni mensili che trimestrali (in caso di contabilità
separate), devono compilare un modulo per ciascun mese e
un modulo per il trimestre (nel particolare caso di anticipazione, ai
fini compensativi dell’imposta, della liquidazione perio-
dica trimestrale in coincidenza con quella relativa al terzo mese di
ogni trimestre solare si rinvia alle istruzioni di cui al pun-
to B) del paragrafo “Contribuenti con contabilità separate”).

leggendo qui io ho capito che in condizioni normali i moduli sono sempre
tre per chi ha inva mensile e uno per chi ha iva trimestrale

si sa niente di come vanno scritte le prime righe dei vari xml? non c'è
ancora alcun file di esempio in giro
ciao


title: IVA Telematica Xml

text:
"BFS" <

(cut)

> Modulo
>
> Per ciascuna liquidazione periodica deve essere compilato un distinto
> modulo della presente Comunicazione, compilando
> il campo "Mod. N." posto in alto a destra nel quadro VP. Pertanto, i
> contribuenti che effettuano:
>
> . esclusivamente liquidazioni periodiche mensili, devono compilare un
> modulo per ciascun mese del trimestre;
>
> . esclusivamente liquidazioni periodiche trimestrali, devono compilare un
> unico modulo per il trimestre;
>
> . sia liquidazioni mensili che trimestrali (in caso di contabilità
> separate), devono compilare un modulo per ciascun mese e
> un modulo per il trimestre (nel particolare caso di anticipazione, ai fini
> compensativi dell'imposta, della liquidazione perio-
> dica trimestrale in coincidenza con quella relativa al terzo mese di ogni
> trimestre solare si rinvia alle istruzioni di cui al pun-
> to B) del paragrafo "Contribuenti con contabilità separate").
>
>
> leggendo qui io ho capito che in condizioni normali i moduli sono sempre
> tre per chi ha inva mensile e uno per chi ha iva trimestrale

Ora si spiega l'inghippo: mai saputo che si potessero mischiare liquidazioni
mensili e trimestrali: bah!

> si sa niente di come vanno scritte le prime righe dei vari xml? non c'è
> ancora alcun file di esempio in giro

Niente di niente: troveremo i primi esempi dopo il 31/05

Saluti da Simone


title: IVA Telematica Xml

text:
>> si sa niente di come vanno scritte le prime righe dei vari xml? non c'è
>> ancora alcun file di esempio in giro

>Niente di niente: troveremo i primi esempi dopo il 31/05

>Saluti da Simone

Ho trovato questo esempio in un forum di programmatori. Posto solo la prima parte.
Risulta anche a voi che debba essere così?

<?xml version="1.0"?>
<iv:Fornitura xmlns:ds="
http://www.w3.org/2000/09/xmldsig#
" xmlns:iv="urn:www.agenziaentrate.gov.it:specificheTecniche:sco:ivp" xmlns:xsi="
http://www.w3.org/2001/XMLSchema-instance
" xsi:schemaLocation="urn:www.agenziaentrate.gov.it:specificheTecniche:sco:ivp FornituraIvp_2017_v1.xsd">
	<Intestazione>
		<CodiceFornitura>IVP17</CodiceFornitura>
	</Intestazione>
[...]


title: IVA Telematica Xml

text:

credo tu l'abbia trrovato qua
https://www.iprogrammatori.it/forum-programmazione/programmatori/file-liquidazione-iva-periodiche-t31087.html

ma non credo sia corretto

BFS


title: MI5 Persecution: my response to the harassment

text:
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
-= my response to the harassment -=
-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
My first reaction in 1990/91 was to assume that if I broke contact then
they would not be able to follow and would lose interest. So I did the
things that have been suggested by other people; I sold my television,
stopped listening to the radio and tried to withdraw away from the sources
of abuse as much as possible. I reasoned that they must have more important
things to deal with and that normal people would simply leave me alone if
it were made difficult for them to continue their harassment.
I reckoned without the sheer vindictiveness of the abusers. They did not
let up but instead "got to" people around me, mainly people at work, to do
their dirty work for them. I went to see my GP, who refused to believe what
he was being told, and refused to direct me on to anyone who could be of
practical assistance. It was not until three years had passed that the GP
admitted the matter was outside his competence and suggested going to the
police.
In the summer of 1994 we called in counter-surveillance experts from a
private detective agency to sweep our house and telephone for bugging
devices. They conducted a thorough search and found nothing; but as noted
above, since the existence of surveillance was being forced in my face by
the harassers, you would expect them to have taken the possibility of a
counter-surveillance sweep into account when planning the type of devices
to be employed.
In Easter 1995 I made a complaint to my local Police station in London, but
the police have not expressed any intention to do anything about the
continuing harassment ("we're not saying it's happening and we're not
saying it isn't happening" were the words used). I think the officer I
spoke to at Easter wasn't aware of it happening, although other members of
the police force obviously do know.
From April 1995 until the present time the matter has been discussed in a
lot of detail on the Usenet (Internet) "uk.misc" newsgroup. That discussion
has given birth to the article which you are now reading. My hopes in
posting to Usenet were that wider publicizing would discourage the security
services from continuing their harassment, and "draw people out" into
concurring with the truth of what was being said. Neither of those have
followed, but the discussion has served a purpose in allowing this
structured report to be created.
2
--
Posted via a free Usenet account from
http://www.teranews.com


title: Altra importazione record da tabelle collegate

text:
Sempre nel database descritto nel mio messaggio "Importazione record da
tabelle collegate" ho una tabella Anagrafiche collegata con la tabelle
Emittente e con la tabella Destinatari.
Precisamente la tabella Anagrafiche contiene tutti i dati anagrafici (Nome,
Cognome, Indirizzo, Codice fiscale, Partita Iva, ecc.), la tabella Emittente
contiene, oltre al campo di collegamento ID anagrafica, altri campi
necessari per la fatturazione, tipo data e numero ultima fattura emessa, e
la tabella Destinatari strutturata come la tabella Emittente.
Tutte le tre tabelle hanno un campo ID contatore impostato come chiave
primaria.
Devo importare i record dall'ufficio B all'ufficio A (stessa esigenza del
mio messaggio precedente), solo che stavolta devo controllare che non siano
già presenti le anagrafiche che voglio importare, nel qual caso devo solo
aggiornare il campo collegato (ID anagrafica) delle tabelle Emittente e
Destinatari; se presenti in A emittenti e/o destinatari di B, devo solo
aggiornare nella tabella Fatture i campi di collegamento ID emittente e/o ID
destinatario.
Come realizzo il tutto?
Ringrazio in anticipo.
GioVe


title: La data dal server!?

author: Fepreto Nirra

text:
Salute,
per una pagina asp ho bisogno di prendere la data direttamente dal server e
non dal pc del client.
La funzione DATE la prende dal CLIENT, c'è una funzione che la tiri fuori
dal server!?
E poi...nel caso in cui io usando la funzione DATE volessi dire "tira fuori
i record in cui la data è quella di oggi, di domani e di dopodomani" quale
sarebbe il WHERE corretto ?
Grazie 1000!


title: La data dal server!?

author: Tecnoricambi Oderzo

text:
Fepreto Nirra <
fer...@inwind.it
> wrote in message
9t8vlg$fbs$1...@nreadb.inwind.it...

oggi = Date()
domani=Date()+1
ieri =date()-1
Claudio


title: Casella on/off in maschera di riepilogo

author: Raffi

text:
Buongiorno a tutti e grazie ancora per l'aiuto che date a tutti noi!
qualche giorno fa avevo il problema di inserire una casella di testo che mi
facesse la somma di alcuni prezzi presi da una query diversa da quella di
origine dati della maschera nella quale era inserita tale casella e, grazie
all'aiuto di Roccia"Max" ho risolto con un origine dati del tipo
=DSum("Prezzo";"Query Dettaglio Clienti";"[Idcl]=" & [Idcl]).
Ora ho il problema inverso...e cioč: data una maschera di riepilogo di tutti
i prodotti (maschera basata su una query di selezione e che non mi permette
di modificare i record visualizzati) vorrei inserire una casella di testo
associata al campo "scelta" della tabella prodotti (campo on/off) per
modificare tale campo. Ho quindi provato ad usare lo stesso concetto della
funzione DSUM, e nell'origine dati della casella di testo ho scritto
="Scelta";"Prodotti";"[Rif]=" & [Rif]     ma quello che ottengo č un
quadratino on/off grigio e che non č possibile modificare! ho anche provato
ad inserire delle parentesi tonde dopo = e alla fine dell'origine, ma il
risultato non cambia!
Come posso ottenere quello che vorrei? cioč cambiare lo stato del campo
Scelta della tabella Prodotti, partendo dalla Maschera in questione?
Grazie e buona giornata, Raffi


title: Formattazione condizionale su ultimo record

author: Uncle John

text:
Ho un report popolato trammite VBA a cui passo il RecordSource.
Il report si presenta graficamente con raggruppamenti.
Avrei bisogno di fare in modo che l'ultimo record del corpo venisse
stampato in grassetto.
Riporto un banale esempio
Categoria A
	Sottocategoria A.1
		Articolo 1
		Articolo 2
		Articolo 3
		Articolo 4 (in grassetto)
	Sottocategoria A.2
		Articolo 5
		Articolo 6 (in grassetto)
Categoria B
	Sottocategoria B.1
		Articolo10 (in grassetto)
...
Qualche suggerimento?
Grazie.
UJ.


title: Import dati da Internet

text:
Ho la necesità di importare dal sito di Yahoo-Finance alcuni dati per
caricare/aggiornare una tabella.
Il sito di Yahoo
(
http://finance.yahoo.com/d/quotes.csv?s=PMII.MI+BMPS.MI&f=nl1vhgd1r1
)
fornisce i dati preformattati in csv (comma separated values) come da
esempio del link riportato.
Come posso fare dall'ambiente Access (form, maschera o altro) a mezzo di un
pulsante aggiornare i dati della tabella o importarne di nuovi?
Qualcuno conosce il codice o dispone di esempi per affrontare la questione?
PS>  Per Excel dispongo di un esempio con codice VBA  funzionante ma per
Access non ho trovato nulla.
Grazie per l'aiuto e buon Anno.
Stemaz


title: Import dati da Internet

author: Sergio MAZZA

text:
"stemaz2000" <
stema...@yahoo.it
> ha scritto nel messaggio
news:NuHHb.18565$_P.8...@news4.tin.it...

Se funziona (in excel) utilizza OLE (da access) per far eseguire ad excel
quel codice e poi importa i dati risultanti...
Ciao.
--
Sergio MAZZA


title: calcolo rata mutuo

author: FrancescoFranz

text:
Sto cercando una procedura che calcoli la rata di un mutuo dando il
capitale, il tasso e il tempo di rimborso.
Grato se qualcuno possa segnalarmi qualcosa.
Grazie.
Franz


title: calcolo rata mutuo

author: massimiliano

text:

Excel
ciao MAssimiliano
--------------------------------
Inviato via
http://usenet.iol.it


title: Pulsanti su barra

author: Happy

text:
Ciao a tutti,
ho una domanda invero poco importante:
tutte le volte che utilizzo il mio applicativo, saltellando di maschera in
maschera, mi ritrovo tanti pulsanti vuoti nella barra in basso (si chiama
tray barr?).
Cliccandoci sopra scompaiono.
Come si fa per non farle spuntare visto che affollano inutilmente la
suddetta barra??
Grazie e buona domenica a tutti
Antonio


title: Funzioni aggregazione domini su Query

author: Francesco Argiolas

text:
Ciao a tutti.
Sono nuovo del ng e sto cercanto la soluzione al problema che mi attanaglia
ma,
nonostante abbia trascorso un bel po' di tempo tra i post,
non mi pare che questo problema non sia stato affrontato da nessuno.
Allora provo a spiegare.
S.O. Windows ME - Applicativo Access2000.
Ho composto una query che prende i propri record da due tabelle, una delle
quali è legata all'altra in rapporto uno a molti secondo lo schema
"prodotti/categorie" di nwind.
La lista dei prodotti è quindi suddivisa in diverse categorie.
Io avrei bisogno di sapere, mediante una indicazione di tale informazione
per ogni riga della query, quale è il prezzo migliore tra i prodotti
appartenenti ad una determinata categoria (il cui valore è riportato
anch'esso nella query).
Insomma, al variare del campo "Categoria", avrei necessità di una funzione
che mi consenta di ricalcolare il campo "Prezzo" della query in modo che
quest'ultimo indichi, una volta raggruppati i diversi valori di "Categoria"
il valore più basso tra tutti i record appartenenti ad una medesima
"Categoria".
Ho provato inutilmente ad utilizzare la funzione DMin: infatti l'unico
risultato che ottengo è quello di fare indicare il valore minimo del
"Prezzo" con riferimento ai valori "Prezzo" presenti sull'intera query,
senza alcun riguardo per la categoria di appartenenza.
Devo precisare che sono riuscito ad ottenere questo risultato con campi
calcolati inseriti in una maschera ma di non essere riuscito a "trasferire"
tale "metodo" sulla query.
Sulla query sto utilizzando la seguente formula che introduce un campo
calcolato e che, verosimilmente è carente nella parte relativa ai Criteri.
MigliorPrezzoCategoria:
DMin("[Prezzo]";"Prodotti";"[Prodotti]![Categoria]=[Categoria]")
Dove si trova l'errore?
Ringrazio di cuore chi mi darà una mano.
Francesco


title: Funzioni aggregazione domini su Query

author: Roberto da casa

text:
"Francesco Argiolas" <
frar...@tiscalinet.it
> ha scritto nel messaggio
news:9mg0qs$rhf$1...@lacerta.tiscalinet.it...

Se il campo categoria è di tipo numerico prova con:
MigliorPrezzoCategoria: DMin("[Prezzo]";"Prodotti";"Categoria=" & Categoria)
Se invece il campo categoria è di tipo testo prova con:
MigliorPrezzoCategoria: DMin("[Prezzo]";"Prodotti";"Categoria=" & Chr$(34) &
Categoria & Chr$(34))
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Funzioni aggregazione domini su Query

text:
Grazie mille, Roberto!
L'espressione lavora a dovere!.
Francesco.
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:vuMi7.24492$%a4.9...@news.infostrada.it...



title: gestire arrivi di una competizione sportiva 2

author: gip

text:
non so se la netiquette approva l'up dei post come in un forum, ma io ci provo...
> > Per darti una dritta bisognerebbe che tu ci dicessi:
> > 1) Quale è la struttura della tabella degli atleti?
> > 2) Come deve essere fatta la maschera con la quale dai l'ordine di arrivo di
> > ogni gara?
> > 3) Una volta determinati i punteggi dove e come li devi memorizzare?
>
> la struttura della tabella e' semplice, ci sono nome e cognome degli ateleti, societa' di appartenenza, categoria e i punti che
> hanno preso nelle 4 competizioni precedenti. questi dati vengono inseriti prima mediante una maschera man mano che arrivano le
> iscrizioni. poi, il giorno della gara, sempre dalla stessa maschera dovro' inserire i numeri dei pettorali che andranno a
popolare
> la stessa tabella.
> per la maschera che devo usare per l'ordine di arrivo non saprei, non avendo ancora previsto come fare.
> io pensavo di dividere tutti gli atleti in tabelle separate, una per ogni categoria; cosi' potrebbe essere piu' semplice
> determinare i primi di ogni categoria secondo il loro arrivo per assegnare i punti. ma sono 18 categorie in tutto e non saprei
> come fare. la gara e' domenica prossima non so se ce la faro'...
--
eliminare il carattere _ dall'email per rispondere in privato.


text:
"gip" <
gianni...@yahoo.it
> ha scritto nel messaggio
news:J8Ekb.18101$e5.6...@news1.tin.it...
> non so se la netiquette approva l'up dei post come in un forum, ma io ci
provo...
Ripostare un messaggio si può, ma farlo a sole 14 ore dal messaggio
precedente non mi sembra opportuno, specie se c'è già un thread aperto; il
fatto che domenica ci sia la gara non è una scusante valida, anche perché in
informatica la fretta non aiuta mai.
> > > Per darti una dritta bisognerebbe che tu ci dicessi:
> > > 1) Quale è la struttura della tabella degli atleti?
> > > 2) Come deve essere fatta la maschera con la quale dai l'ordine di
arrivo di
> > > ogni gara?
> > > 3) Una volta determinati i punteggi dove e come li devi memorizzare?
> >
> > la struttura della tabella e' semplice, ci sono nome e cognome degli
ateleti, societa' di appartenenza, categoria e i punti che
> > hanno preso nelle 4 competizioni precedenti. questi dati vengono
inseriti prima mediante una maschera man mano che arrivano le
> > iscrizioni. poi, il giorno della gara, sempre dalla stessa maschera
dovro' inserire i numeri dei pettorali che andranno a
> popolare
> > la stessa tabella.
> > per la maschera che devo usare per l'ordine di arrivo non saprei, non
avendo ancora previsto come fare.
> > io pensavo di dividere tutti gli atleti in tabelle separate, una per
ogni categoria; cosi' potrebbe essere piu' semplice
> > determinare i primi di ogni categoria secondo il loro arrivo per
assegnare i punti. ma sono 18 categorie in tutto e non saprei
> > come fare. la gara e' domenica prossima non so se ce la faro'...
Visto che hai deciso di risolvere il tuo problema con Access, per prima cosa
occorre discutere di come organizzare le tabelle del database e come
metterle in relazione fra di loro. Operare con un'unica tabella anagrafica,
come mi sembra voglia fare tu, non è certo la soluzione giusta per un
database relazionale, è più un'organizzazione consona all'uso dei un foglio
elettronico (leggi ad esempio Excel). Inoltre non potresti ricostruire a
posteriori la storia delle gare o la storia degli atleti, oppure non
potresti correggere errori commessi in fase di digitazione (al momento
dell'iscrizione o al momento dell'attribuzione dell'ordine di arrivo) senza
invalidare i punteggi precedentemente acquisiti.
La prima tabella che serve sarà sicuramente una tabella chiamata Atleti
nella quale memorizzerei  SOLAMENTE i dati anagrafici di ogni atleta e non i
punteggi o i numeri di pettorale dell'ultima gara. Insomma adotterei una
struttura del genere:
IdAtleta                Contatore e chiave primaria
Cognome              Testo
Nome                   Testo
Società                 Testo
IdCategoria          Numerico
Ecc. ecc.
Per il campo IdCategoria esegui l'Autocomposizione Ricerca... in base alla
tabella Categorie che avrà la seguente struttura:
IdCategoria        Contatore e chiave primaria
Categoria           Testo
Ci sarà poi una tabella Gare nella quale memorizzerai le notizie di ogni
gara disputata o da disputare e che potrà avere una struttura simile a
questa:
IdGara                Contatore e chiave primaria
Gara                    Testo
DataGara             Data/ora
ecc. ecc.
Naturalmente per ognuna di queste tabelle ti creerai una maschera per
l'aggiornamento dei dati, o se sei in ritardo con i piani di realizzazione
puoi aggiornare queste tre tabelle aprendole direttamente in foglio dati.
A questo punto creerei la tebella fulcro dell'applicazione che chiameremo
EsitiGare che potrebbe avere la seguente struttura:
IdEsito                Contatore e chiave primaria
IdAtleta              Numerico
IdCategoria        Numerico
IdGara                Numerico
DataIscrizione     Data/ora
Pettorale             Numerico
OrdineArrivo      Numerico
Punteggio           Numerico
In questa tabella creati un indice composto dai campi IdGara e Pettorale e
dichiaralo univoco, così che eviterai, per una gara di assegnare più di una
volta lo stesso numero di pettorale. Ti creerai anche un indice composto dai
campi IdAtleta e IdGara e lo dichiarerai univoco, così eviterai che un
atleta venga iscritto due volte alla stessa gara.
Ho aggiunto anche il campo IdCategoria, che può sembrare pleonastico, in
quanto un atleta può cambiare categoria nel corso della sua vita di atleta:
qui registrerai la categoria che l'atleta aveva al momento della gara,
mentre nell'anagrafica ci sarà l'ultima sua categoria.
Questa tabella servirà, fra l'altro a mettere la tabella Atleti e la tabella
Gare in relazione molti-a-molti (una gara disputata da più atleti, un atleta
ha disputato più gare).
Con una maschera che ha come origine record la tabella EsitiGare, ogni volta
che iscriverai un atleta ad una gara creerai un nuovo record in questa
tabella. IdAtleta lo determinerai con una scelta effettuata con una casella
combinata basata sulla tabella Atleti; IdCategoria lo ricaverai dalla
tabella Atleti con una funzione DLookup (vedi help); IdGara lo determinerai
con una scelta effettuata con una casella combinata basata sulla tabella
Gare; DataIscrizione sarà la data odierna; Pettorale lo digiterai tu; i
campi OrdineArrivo e Punteggio li imposterai a zero.
A questo punto già ti potrai creare dei report che ti danno la sensazione di
quanti e quali siano i partecipanti suddivisi per gara e categoria.
Per registrare l'ordine d'arrivo per ogni gara, una soluzione potrebbe
essere quella di crearsi una maschera basata sulla tabella EsitiGare, nel
corpo metterai solo due caselle di testo chiamate Pettorale ed OrdineArrivo
associate ai campi della tabella che hanno gli stessi nomi.
Nell'intestazione della maschera inserirai una casella combinata non
associata con la quale selezionerai la gara per la quale devi registrare gli
arrivi, ed inserirai una casella di testo non associata nella quale
digiterai il numero di pettorale; a fronte dell'evento "Dopo aggiornamento"
di quest'ultima casella di testo, con il metodo FindRecord (vedi help), ti
posizionerai sul record della tabella EsitiGare che abbia IdGara e Pettorale
uguali ai valori contenuti nei due controlli che si trovano
nell'intestazione della maschera: a questo punto digiterai l'ordine di
arrivo nella relariva casella di testo del record in cui ti sei posizionato.
A fronte dell'evento "Prima di aggiornare" della maschera verifica, con una
funzione DCount (vedi help), che non ci siano record cha abbiano, per quella
gara, un ordine di arrivo uguale a quello che hai appena digitato, nel qual
caso annulla l'evento di registrazione ( Cancel = True ).
Ora serve solamente attribuire i punti per il primo, il secondo ed il terzo
di ogni categoria per ogni gara.
A tale scopo, a fronte dell'evento "Su chiusura" della maschera con la quale
hai attribuito gli ordini di arrivo devi:
1) Aprire un recordset sulla tabella EsitiGare.
2) Scorrere tutti i record e per ognuno, tramite una funzione DCount (vedi
help) conterai quanti record sono contenuti nella tabella EsitiGare che
abbiano IdGara uguale all'IdGara del record corrente, IdCategoria uguale
all'IdCategoria del record corrente e l'OrdineArrivo minore o uguale a
quello del record corrente; cosi facendo ti sei ricavato l'ordine d'arrivo
di quell'atleta nell'ambito della sua categoria di appartenenza.
3) In base all'ordine di arrivo al livello di categoria stabilito al punto
2), determinarai il punteggio da attribuire al record corrente (se non
ricordo male 5 punti al primo, 3 punti al secondo, 1 punto al terzo e 0
punti agli altri)
4) Usando i metodi Edit ed Update del recordset (vedi help) aggiornerai il
campo Punteggio del record corrente con quanto determinato al punto 3);
dovrai aggiornare anche i punteggi 0 per correggere gli eventuali errori
commessi precedentemente.
A questo punto dalla tabella EsitiGare potrai costruirti classifiche al
livello di gara, classifiche a livello di gara e categoria, classifiche al
livello di categoria ecc. ecc.
Ti auguro buon lavoro, altrimenti per domenica non ce la fai... ;-)
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto
> Ripostare un messaggio si può, ma farlo a sole 14 ore dal messaggio
> precedente non mi sembra opportuno, specie se c'è già un thread aperto; il
> fatto che domenica ci sia la gara non è una scusante valida, anche perché in
> informatica la fretta non aiuta mai.
va bene, non lo sapevo :p
> Visto che hai deciso di risolvere il tuo problema con Access, per prima cosa
> occorre discutere di come organizzare le tabelle del database e come
> [...]
leggero' attentamente quello che hai scritto, vista l'urgenza della gara di domenica non credo di fare in tempo a fare tutto cio'
che mi suggerisci ma lo potro' aggiornare successivamente. sono un newbye di access avro' bisogno di tempo per fare tutto a regola
d'arte come l'hai descritto.
ti descrivo come ho proceduto fino ad ora.
avevo un foglio di calcolo con i dati di tutti gli atleti che hanno partecipato alle 4 competizioni precedenti, e ho creato una
tabella da questo foglio [tabella_precedenti]
ho creato una maschera che popola un'altra tabella [quella degli iscritti alla nostra gara], in questa maschera io inserisco gli
atleti man mano che pervengono le iscrizioni e se l'atleta ha gia' partecipato alle 4 gare precedenti mi vengono aggiornati i
punteggi e i suoi dati dalla tabella_precedenti.
ho quindi creato una serie di query, una per ogni categoria ed infatti mi ritrovo con tutti gli atleti divisi per categoria. in
coclusione ho una tabella una maschera e 9 query.
ora mi leggo cio' che hai scritto e vediamo se posso continuare con cio' che ho fino ad ora, la parte che mi preoccupa e come
assegnare i punti ai primi 3 di ogni categoria.
grazie


title: aiuto sicurezza ed altro

author: nilaco

text:
Tre domande:
1) Come posso disabilitare i tasti CTRL+TAB per uscire da una
sottomaschera fino a quando non viene immesso un valore nell'unico
campo visibile della sottomashera?
2) La sicurezza a livello utente va inserita sia nel FE che nel BE?
3) Come posso disabilitare alcuni pulsanti della quadro di comandi
principale in funzione dell'utente corrente.
Grazie a chiunque voglia suggerirmi qualcosa.


title: aiuto sicurezza ed altro

author: sib

text:
nilaco <
nil...@iol.it
> wrote in message
pbrmss8hsj416rhdv...@4ax.com...
> Tre domande:
>
> 1) Come posso disabilitare i tasti CTRL+TAB per uscire da una
> sottomaschera fino a quando non viene immesso un valore nell'unico
> campo visibile della sottomashera?
Nell'evento SuUscita del controllo (non campo) metti:
IF Me.MioControllo="" or isnull(Me.MioControllo) then cancel=true
> 2) La sicurezza a livello utente va inserita sia nel FE che nel BE?
Normalmente e' piu' importante nel BE, dato che l'FE non contiene dati, ma
dipende molto dal tipo di protezione che devi avere. Progettala a tavolino
prima, altrimenti viene fuori un casino (esperienza personale ;-)
> 3) Come posso disabilitare alcuni pulsanti della quadro di comandi
> principale in funzione dell'utente corrente.
Credo che sul sito comune ci sia qualcosa al riguardo.
Ciao, Sib


title: Recordset vuoto?

text:
Quando si deve lavorare con i record di una tabella
solitamente la prima cosa da fare e' verificare che
il recordset in questione non si vuoto.
Ho letto qualche vecchio post sulla questione
"Contollare se un recordset e' vuoto".
Le soluzioni generalmente proposte indicano
l'uso di DCount o RecodsetCount
        If DCount("*","tblA") > 0 Then
            Set rst = CurrentDb.OpenRecordset("tblA")
            ....
opp.
        Set rst = CurrentDb.OpenRecordset("tblA")
        'rst.MoveLast
        If rst.RecordCount > 0 Then
            ....
Ma:
    - DCount comporta un accesso in piu' alla tabella
    - RecordCount fa sorgere il quesito:
        "uso MoveLast (rischiando rallentamenti)
        o non uso MoveLast (rischiando errori)?"
La mia domanda e': se l'obbiettivo NON e' conoscere
il numero di record ma solamente verificare
che il recondeset non sia vuoto, non conviene scrivere:
        Set rst = CurrentDb.OpenRecordset("tblA")
        rst.FinFirst
        If Not(NoMatch) Then
            ...
che dite?
---
leo_duca


title: Recordset vuoto?

author: Antonio Biso

text:
leo_duca <
leo_...@libero.it
> wrote in message
zOlo8.81817$1S3.2...@twister1.libero.it...
> Ma:
>     - DCount comporta un accesso in piu' alla tabella
Vero
>     - RecordCount fa sorgere il quesito:
>         "uso MoveLast (rischiando rallentamenti)
>         o non uso MoveLast (rischiando errori)?"
A parte che movelast è richiesto solo perchè IN ALCUNI CASI con tabelle
allegate, il recordcount è 0 anche se ci sono i record se prima non si fa il
movelast. La maggior parte dei casi è pleonastico.
A parte quello puoi anche fare
if rst.eof = rst.bof 'questo significa che non ci sono record
Antonio


title: Recordset vuoto?

author: Roberto - Syd

text:
"leo_duca" <
leo_...@libero.it
> ha scritto nel messaggio
news:zOlo8.81817$1S3.2...@twister1.libero.it...

Non può funzionare perchè nel momento in cui ti sposti sul primo ottieni un
errore se il primo non esiste, quindi devi usare recordCount.
Ciao Roberto - Syd


title: Recordset vuoto?

author: Karl Donaubauer

text:
leo_duca <
leo_...@libero.it
> ha scritto:
> ...
> La mia domanda e': se l'obbiettivo NON e' conoscere
> il numero di record ma solamente verificare
> che il recondeset non sia vuoto, non conviene scrivere:
>
>         Set rst = CurrentDb.OpenRecordset("tblA")
>         rst.FinFirst
>         If Not(NoMatch) Then
>             ...
>
> che dite?
No, con un Recordset vuoto il FindFirst ti da un errore.
Invece basta
If rs.BOF Then ...
come prima azione con il recordset perché BOF è True
in questo momento se non ci sono Record.
--
HTH
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


title: Recordset vuoto?

text:
Antonio Biso <
ch...@etruria.net
> wrote in message
4boo8.80760$%g7.25...@twister2.libero.it...

Qualcuno (a cui chiedo di scrivere comunque sul NG) mi ha fatto GIUSTAMENTE
notare che il mio suggerimento era impreciso (anche se il codice propostomi
era comunque errato).
eof e bof sono proprietà che valgono true rispettivamente se ci si trova
dopo l'ultimo record e prima del primo, false altrimenti.
Se il recordset è vuoto entrambi sono true e quindi è vero che se il
recordset è vuoto le proprietà sono uguali, ma sono uguali anche quando sono
entrambe false cioè quando ci si trova in un record valido del recordset non
vuoto.
Pertanto il test giusto da poter fare è:
if (rst.eof and rst.bof) then ... 'non ci sono record
Antonio


title: Recordset vuoto?

text:
"leo_duca" <
leo_...@libero.it
> ha scritto nel messaggio
news:zOlo8.81817$1S3.2...@twister1.libero.it...

Stavolta la tiratina d'orecchi spetta a me :(
Dall'help di "BOF":
"Un metodo OpenRecordset richiama internamente un metodo MoveFirst. Di
conseguenza, un metodo OpenRecordset su un set di record vuoto fa sģ che le
proprietą BOF e EOF siano impostate a True."
Tnks!!
---
leo_duca


title: Recordset vuoto?

text:
leo_duca <
leo_...@libero.it
> ha scritto:
> Stavolta la tiratina d'orecchi spetta a me :(
> Dall'help di "BOF":
> "Un metodo OpenRecordset richiama internamente un metodo MoveFirst. Di
> conseguenza, un metodo OpenRecordset su un set di record vuoto fa sì che
le
> proprietà BOF e EOF siano impostate a True."
Sì, ma la gente spesso crede che si debbe provare tutti e
due proprietà. Invece basta di provare una dopo l'apertura del rs.
Per questo ho scritto di: If rs.BOF Then...
Per la gente che non mi crede ;-) questo punto è detto più
chiaro nel MSDN:
http://msdn.microsoft.com/library/devprods/vs6/vbasic/dao360/damthmovefirst
.
htm



title: Recordset vuoto?

text:
"Karl Donaubauer" <
ad...@donkarl.com
> ha scritto nel messaggio
news:a7un5o$olf5n$1...@ID-46617.news.dfncis.de...

Ti conosco di fama Karl e quindi non ho motivo di dubitare :)
Ciao
---
leo_duca


title: Recordset vuoto?

author: Emyr

text:
On Thu, 28 Mar 2002 11:35:29 +0100, "leo_duca" <
leo_...@libero.it
>
wrote:
>
>Ti conosco di fama Karl e quindi non ho motivo di dubitare :)
>Ciao
>---
>leo_duca
>
saggia decisione
Saluti.
Emanuele.


title: aiutino

author: TAPPETI

text:
ho copiato un d.b. su cd.
Lo ripordo in hard disck e mi dice valido per sola lettura.
Non ditemi che ho buttato 5 anni al vento???????


title: aiutino

text:
"TAPPETI" <
marina.c...@tin.it
> ha scritto nel messaggio
news:8sa5op$7ep$1...@nslave2.tin.it...
> ho copiato un d.b. su cd.
> Lo ripordo in hard disck e mi dice valido per sola lettura.
> Non ditemi che ho buttato 5 anni al vento???????
>
>
Niente paura.
Visualizza il file, ad esempio con Esplora risorse di Window, clicca sulla
sua icona con il tasto destro del mouse; dal menu che ti compare seleziona
Proprietà e nella finestra che ti appare togli lo svirgolino vicino la
dicitura "Sola lettura".
E' normale che un file copiato da un CD risulti di sola lettura.
--
Roberto
---------------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------


title: (OT) ...e che cavolo.

author: Fabrizio

text:
Mi hanno fregato il portatile sul quale stavo lavorando sul mio db(se l'è
preso un mio collega, malato il poverino). C'era la mia vita e tutto il mio
lavoro e soprattutto access 2002. Con questo che ho sotto mano c'è una
versione strana di access 2000 a cui mancano un sacco di cose (per es. la
creazione guidata nelle maschere della casella strumenti, le tabelle e i
grafici pivot che fanno scena,etc...) che di solito ti fanno risparmiare
tempo.(prima che qualcuno me lo dica il cd-rom di installazione è ormai
inservibile, qui le cose , con lo stipendio che passa la ditta, ce le
mangiamo)
Proprio adesso che avevo convinto il capo delle bellezze dei Database
Relazionali( che fa anche figo).
Ops scusa Sib se non ti ho nanche salutato ma sono rimasto impastato.


title: Unione campi e inserimento carattere

author: William

text:
In relazione al mio post precedente
credo di aver risolto, ma ancora da verificare,
unendo i campi che mi interessavano
con una query di aggiornamento e la funzione
UPDATE SET  .
Il problema che ho adesso, è però di ordinamento.
Mi spiego meglio. Ho ottenuto dall'unione
dei campi una cosa del genere:
CR127
CR128
CR129
CR1292
CR130
 le vorrei mettere in ordine numerico giusto
ma poiche i campi uniti sono di testo
avrei pensato è possibile inserire lo 0
nelle posizioni vuote a sx del numero
e ottenere esempio:
CR000127
CR000128
CR000129
CR000130
CR001292
ma non so dove intervenire per fare questo
Consigli ?
Grazie
William


title: Unione campi e inserimento carattere

author: namor

text:
William ha scritto:

Se devi ordinare una query non ti serve aggiungere gli zeri, basta creare
un campo calcolato che estragga dal codice solo il numero con
val(mid([campo],3)) e usarlo per l'ordinamento.
Namor
--
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: cambiare recordsource ad un reports su apertura del reports

text:
ho provato a cambiarlo prima di aprirlo dalla form e anche su apertura del
reports stesso inserendo il seguente codice
If Forms![fatturamom]![eti].Caption = "Aggiungi Fattura" Then
    Me.RecordSource = "fatturepre"
    Me.[Sottoreport Fatturevoci_PRQ].Report.RecordSource = "fatturevocipre"
Else
    Me.RecordSource = "fatturesolo"
    Me.[Sottoreport Fatturevoci_PRQ].Report.RecordSource = "fatturevocisolo"
End If
eppure non apre nulla, sapete cosa sbaglio per assegnare il recordsource?
GRAZIE


text:
"Simba883" <
simb...@libero.it
> ha scritto nel messaggio
news:ccm3tp$90e$1...@lacerta.tiscalinet.it...

C'č la soluzione, maaa....
fai due report diversi e poi apri quello giusto dopo il test
Antonio


text:
>
> C'č la soluzione, maaa....
> fai due report diversi e poi apri quello giusto dopo il test
>
> Antonio
si infatti ho fatto cosi mentre attendevo una risposta ma perņ vuoi mettere
la comoditą di avere un solo reports da modificare in futuro se il cliente
chiede delle modifiche alle stampe?
secondo me non č indifferente la differenza, fammi sapere. ciao.


author: Ruggero

text:
"Simba883"
> ho provato a cambiarlo prima di aprirlo dalla form e anche su apertura del
> reports stesso inserendo il seguente codice
>
> If Forms![fatturamom]![eti].Caption = "Aggiungi Fattura" Then
>     Me.RecordSource = "fatturepre"
>     Me.[Sottoreport Fatturevoci_PRQ].Report.RecordSource =
"fatturevocipre"
> Else
>     Me.RecordSource = "fatturesolo"
>     Me.[Sottoreport Fatturevoci_PRQ].Report.RecordSource =
"fatturevocisolo"
> End If
Prova su evento apertura del sottoreport...


title: Richiesta di conferma in seguito ad una modifica

author: Ale

text:
    Agli esperti di Access...
Sto lavorando in una maschera di inserimento dati, nel momento in cui vado a
modificare un campo già esistente (già stato inserito precedentemente)
vorrei che mi si presentasse una finestra, la quale mi chiedesse se sono
sicuro della modifica che voglio fare, se rispondo di Sì proseguo al campo
sucessivo e accetta la modifica, mentre se dico di No mi ritorna alla
versione precende del record prima dell'aggiornamento.
Ho provato con la funzione sottostante, però non riesco a trovare il sistema
di tornare alla versione precedente del campo prima dell'aggiornamento.
    Dim strconf As String
     strconf = "Sei sicuro del dato modificato?'" & Me![Codice Articolo] &
vbCrLf & "è Ok"
     If MsgBox(strconf, vbYesNo) = vbNo Then
    Cancel = True
     Else
        Exit Sub
    End If
        End Sub
Grazie in anticipo a chi mi darà dei suggerimenti
Alessio


author: Roberto

text:
Ale <
alenic...@goldvi.it
> wrote in message
8i8775$e5d$1...@fe1.cs.interbusiness.it...

Non funziona anche se è praticamente simile all'esempio che c'è sull'Help a
riguardo di Cancel. Forse c'è da settare qualche altra proprietà. boh?
Non vorrei che la procedura preveda che, dopo aver premuto il pulsante NO
del messaggio di avviso, si debba ripristinare manualmente il contenuto del
campo e questa volta selezionare il pulsante SI del messaggio di avviso.
Comunque se ti può servire, nel caso che tu scrivi il tuo codice VBA a
fronte dell'evento "Prima di aggiornare" della maschera anziché a quello del
campo, e sostituisci
    Cancel = True
con
    Me![NomeCampo] = Me![NomeCampo].Oldvalue
hai l'effetto desiderato
Roberto


author: Federico Luciani

text:
Roberto wrote:
> Ale <
alenic...@goldvi.it
> wrote in message
> >     Agli esperti di Access...
> > Sto lavorando in una maschera di inserimento dati, nel momento in cui vado
> a
> > modificare un campo già esistente (già stato inserito precedentemente)
> > vorrei che mi si presentasse una finestra, la quale mi chiedesse se sono
> > sicuro della modifica che voglio fare, se rispondo di Sì proseguo al campo
> > sucessivo e accetta la modifica, mentre se dico di No mi ritorna alla
> > versione precende del record prima dell'aggiornamento.
> [cut]
> Non funziona anche se è praticamente simile all'esempio che c'è sull'Help a
> riguardo di Cancel. Forse c'è da settare qualche altra proprietà. boh?
> Non vorrei che la procedura preveda che, dopo aver premuto il pulsante NO
> del messaggio di avviso, si debba ripristinare manualmente il contenuto del
> campo e questa volta selezionare il pulsante SI del messaggio di avviso.
> Comunque se ti può servire, nel caso che tu scrivi il tuo codice VBA a
> fronte dell'evento "Prima di aggiornare" della maschera anziché a quello del
> campo, e sostituisci
>     Cancel = True
> con
>     Me![NomeCampo] = Me![NomeCampo].Oldvalue
> hai l'effetto desiderato
>
> Roberto
Attenzione!
Cancel = True
serve ad annullare l'evento e non a ripristinare il valore precedente.
Per ripristinare il valore precedente ti basta inserire
me.nomecontrollo.Undo
--
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------


text:
Ale wrote:
>     Agli esperti di Access...
> Sto lavorando in una maschera di inserimento dati, nel momento in cui vado a
> modificare un campo già esistente (già stato inserito precedentemente)
> vorrei che mi si presentasse una finestra, la quale mi chiedesse se sono
> sicuro della modifica che voglio fare, se rispondo di Sì proseguo al campo
> sucessivo e accetta la modifica, mentre se dico di No mi ritorna alla
> versione precende del record prima dell'aggiornamento.
>
> Ho provato con la funzione sottostante, però non riesco a trovare il sistema
> di tornare alla versione precedente del campo prima dell'aggiornamento.
>     Dim strconf As String
>      strconf = "Sei sicuro del dato modificato?'" & Me![Codice Articolo] &
> vbCrLf & "è Ok"
>      If MsgBox(strconf, vbYesNo) = vbNo Then
>     Cancel = True
>      Else
>         Exit Sub
>     End If
>         End Sub
> Grazie in anticipo a chi mi darà dei suggerimenti
> Alessio
nell'evento BeforeUpdate del controllo:
Dim strconf As String
strconf = "Sei sicuro del dato modificato?'" & Me![Codice Articolo] & vbCrLf &
"è Ok"
If MsgBox(strconf, vbYesNo) = vbNo Then
  Cancel = True
  Me![Codice Articolo].Undo
End If
Attenzione: le modifiche vengono realmente salvate solo quando passi ad un
altro record o chiudi la form.



text:
Federico Luciani <
fluc...@paperino.libero.it
> wrote in message
3947C79D...@paperino.libero.it...
[CUT]
>
> nell'evento BeforeUpdate del controllo:
>
> Dim strconf As String
> strconf = "Sei sicuro del dato modificato?'" & Me![Codice Articolo] &
vbCrLf &
> "è Ok"
> If MsgBox(strconf, vbYesNo) = vbNo Then
>   Cancel = True
>   Me![Codice Articolo].Undo
> End If
>
> Attenzione: le modifiche vengono realmente salvate solo quando passi ad un
> altro record o chiudi la form.
>
> --
> Federico
[CUT]
GRANDE!!!!!


text:
Federico Luciani <
fluc...@paperino.libero.it
> wrote in message
3947CD95...@paperino.libero.it...
[CUT]
>
> Attenzione!
> Cancel = True
> serve ad annullare l'evento e non a ripristinare il valore precedente.
> Per ripristinare il valore precedente ti basta inserire
> me.nomecontrollo.Undo
>
> --
> Federico
[CUT]
Troppo giusto!!!
Grazie!
Roberto


text:
Roberto wrote:
> Federico Luciani <
fluc...@paperino.libero.it
> wrote in message
> [CUT]
> > nell'evento BeforeUpdate del controllo:
> > Dim strconf As String
> > strconf = "Sei sicuro del dato modificato?'" & Me![Codice Articolo] &
> vbCrLf &
> > "è Ok"
> > If MsgBox(strconf, vbYesNo) = vbNo Then
> >   Cancel = True
> >   Me![Codice Articolo].Undo
> > End If
> >
> > Attenzione: le modifiche vengono realmente salvate solo quando passi ad un
> > altro record o chiudi la form.
> GRANDE!!!!!
Ci incrociamo :-))
Potresti decidere di inserire una terza opzione:
non salvare, ma non ripristinare il valore originale (Annulla)
retVal = MsgBox(strconf, vbYesNoCancel)
Select Case retVal
 Case vbNo
  'annulla l'evento-ripristina il valore
  Cancel = True
  Me![Codice Articolo].Undo
 Case vbCancel
  'annulla l'evento-non salva-non ripristina
  Cancel = True
 Case vbYes 'non necessario
  'salva
End Select
