author: Karl Donaubauer

text:
tranky wrote:
> Ho un forum di discussione che man mano che le discussioni aumentano
> diventa sempre più lento, perchè all'apertura di una pagina, esso
> carica tutti i record presenti nel database access.
> Vorrei io fare la seguente, parametrizzare la lettura da database.
> Cioè, quando si apre la prima pagina, vorrei poter leggere soltanto i
> primi 10 record dal database, ordinati per data. E questo è facile, anzi
> facilissimo. Il problema diventa concreto quando passo alla pagina
> maggiore di 1, infatti se mi trovo alla pagina 2, io dovrei leggere dal
> database 10 record, eccetto i primi 10*1. Se mi trovo nella seconda
> pagina, io dovrei leggere dal database 10 records, escludendo i primi
> 10*2, ecc...,ecc...
> ...
http://groups.google.com/group/it.comp.appl.access/browse_frm/thread/3ab70f10d9135df/71470635f54408c3
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: Selezionare 10 record, eccetto i primi 10....come fare?

author: giorgio rancati

text:
"tranky" <NOS...@GRAZIE.it> ha scritto nel messaggio
news:44c1f01a$0$30136$4faf...@reader4.news.tin.it...

il campo ID serve nel caso ci siano date uguali.
----
SELECT TOP 10 *
FROM TABELLA
WHERE ID NOT IN( SELECT TOP 10 ID
                 FROM TABELLA
                 ORDER BY DATA,ID)
ORDER BY DATA,ID
----
Ciao
--
Giorgio Rancati
[Office Access MVP]


author: tranky

text:
>
http://groups.google.com/group/it.comp.appl.access/browse_frm/thread/3ab70f10d9135df/71470635f54408c3

>
>
vedo se funzia!
grazie!!


author: Sergio MAZZA

text:
"tranky" <NOS...@GRAZIE.it> ha scritto nel messaggio news:44c1f01a$0$30136$4faf...@reader4.news.tin.it...

Oltre alle risposte già date; se stai utilizzando ASP (ma sicuramente la tecnica esiste anche in altri linguaggi di programmazione)
per crearti il recordset, hai a disposizione la paginazione dei dati tramite le Proprietà AbsolutePage, PageCount e PageSize...
Ciao.
--
Sergio MAZZA


title: APD: un passo avanti ... due indietro.

author: Cristiano Zorzi

text:
Tempo fa postai:
>ADP formato 'XP
>SQL Server 7.0 installato sul Server.
>Da un client accedo attraverso maschera continua a 10.000 records di una
>tabella sul Server.
>L'origine dati della maschera suddetta č una tabella, non una vista o SP.
>Ora, se imposto attraverso i menů di scelta rapida di Access un criterio
>d'ordinamento su un qualunque campo a video (anche indicizzato) le
>prestazioni decadono drasticamente.
>A parte l'operazione di riordino piuttosto lenta, le performances di
>gestione della form diventano inaccettabili al termine del processo.
>In una situazione analoga si comportano benissimo delle banali tabelle ODBC
>collegate al Server.
>Cosa sbaglio o mi sfugge?
Mi sfuggiva che Access č prodotto da Microsoft.
Nelle stesse condizioni un .ADP eseguito da Access '2000 funziona
egregiamente.
Ma a cosa cazzo servono le nuove realeses se funzionano male?
Bah!


title: APD: un passo avanti ... due indietro.

author: Alessandro Cara

text:
Cristiano Zorzi wrote:
[cut]
> Ma a cosa cazzo servono le nuove realeses se funzionano male?
a farti diventare meno "Cristiano" ?  ;<)
--
a.cara
Togli qualcosa dall'email


title: Un aiuto per piacere (stampa report)

author: Dandy

text:
Il problema è sulla stampa di un report:
Il report contiene una serie di pagine divise per clienti (oltre 1000)
ogni cliente può avere una, due, tre, fino a 10 pagine.
La necessità che ho è quella di dare un imput di stampa fronte e retro (e
questo non è il problema visto che ho una stampante che supporta tale
stampa).
Il problema è quello di non stampare il fronte di un cliente sul retro del
cliente precedente che ha pagine dispari.
Stavo cercando di risolvere il problema con due soluzioni:
1) dare imput di stampa per ogni cliente
2) ove esista un cliente con un numero di pagine dispari fare in modo di
creargli una pagina vuota.
PS, ho visionato il consiglio del sito, ma non fa al caso mio
un vero ringraziamento per l'aiuto


title: Un aiuto per piacere (stampa report)

author: Andrea

text:
"Dandy" <
don...@sanchirico.it
> ha scritto nel messaggio
news:ak7jh5$nch$1...@nntp.weblinea.it...

Ciao
Credo di aver trovato la soluzione che fa per te.
La mia proposta, ed ho visto che funziona, è quella di inserire
un'interruzione di pagina prima della sezione che ti interessa vada a pagina
, ad esempio dispari, e di impostare a true o a false nell'evento
formattazione della sezione , la proprietà visible dell'interruzione a
seconda che ti trovi in una pagina dispari o pari.
Naturalmente nel piè di pagina della sezione avrai una interruzione fissa
che ti impone di andare ad una pagina nuova.
Insomma, devi far così:
Metti una interruzione dal nome " Interruzione_ intestazione" proprio prima
della casella che ti stampa il nome del cliente, e una interruzione in fondo
al piè di pagina della sezione del cliente.
Con quest'ultima operazione obblighi access a stampare su una nuova pagina i
clienti.
Sull'evento apertura del report scrivi questo codice:
"   me.interruzione_intestazione.visible=false "
e sull'evento formattazione della sezione del cliente fai un controllo della
pagina per vedere se è pari o dispari.
Il codice è il seguente:
If Me.Page Mod 2 = 0 Then
Me.interruzione_intestazione.Visible = True
Else
Me.interruzione_intestazione.Visible = False
End If
Io l'ho provato e funzia.
Ora sta a te.
Se hai bisogno sono qua.


title: [OT] Pizzata a Napoli... Invito

author: Pablitomf

text:
Come da oggetto.
Che ne dite? Il freddo (Se possiamo chiamarlo tale... per quelli del Nord
č primavera) da queste parti č quasi andato del tutto... vogliamo
organizzare sta cosa? Pizza, Mozzarella, Caprese, Pastiera, Sfogliatelle,
Caffč... Allora?
Si accettano proposte. (Ma solo per il periodo... il posto lo scegliamo
NOI di queste parti "democraticamente" :-D )
--
Ciao
Pablitomf (Maurizio Facciuti)
------------------------------
http://www.sitocomune.com/
http://www.accessgroup.it/
------------------------------
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: [OT] Pizzata a Napoli... Invito

author: MA

text:
"Pablitomf" <
maurizio...@accessgroup.it
> ha scritto nel messaggio
news:cs8693$5vq$1...@news.newsland.it...
> Come da oggetto.
>
> Che ne dite? Il freddo (Se possiamo chiamarlo tale... per quelli del Nord
> č primavera) da queste parti č quasi andato del tutto... vogliamo
> organizzare sta cosa? Pizza, Mozzarella, Caprese, Pastiera, Sfogliatelle,
> Caffč... Allora?
>
> Si accettano proposte. (Ma solo per il periodo... il posto lo scegliamo
> NOI di queste parti "democraticamente" :-D )
Anche se scontato
Io + signora
MAssimiliano


title: [OT] Pizzata a Napoli... Invito

text:
[cut]
Da Bergamo è dura per me partecipare, Vi chiedo quindi di gustarvi per me
una bella Napoli con mozzarella di bufala filante, mmmmmmmmmmmh, solo al
pensiero ho l'acquolina in bocca ... sarà perchè ci si avvicina ll'ora di
pranzo?
Private Declare Function GetANapoliForMe "conbufala.dll" _
            Alias "GetANapoliForMe" (pANapoliForMe As ANapoliForMe) As Buona
Private Type ANapoliForMe
   pastadipane As Buona
   pummarola As Buona
   mozzarella As Filante
   alice As Fresca
End Type
Saluti,
--
strano...mavero
mail: mauro . chiarello @ gmail . com
ICQ: 292-118-822
Web: Under Construction
"Un'idea che non sia pericolosa non merita affatto di essere chiamata idea"
Oscar Wilde


title: [OT] Pizzata a Napoli... Invito

author: access il top

text:
"strano...mavero" <
mauro.c...@gmail.com
> ha scritto nel messaggio
news:41e79ef1$0$8210$5fc...@news.tiscali.it...

anche io da bergamo mi risulta difficile
if 1 + 1 = 3 then goto napoli
grazie dell'invito


title: [OT] Pizzata a Napoli... Invito

text:
strano...mavero ha scritto:
> [cut]
> Private Declare Function GetANapoliForMe "conbufala.dll" _
>             Alias "GetANapoliForMe" (pANapoliForMe As ANapoliForMe) As Buona
> Private Type ANapoliForMe
>    pastadipane As Buona
>    pummarola As Buona
>    mozzarella As Filante
>    alice As Fresca
> End Type
If me.[strano...mavero].[Comune_Residenza] = "Bergamo" Then
   msgbox "Sarà difficile che venga"
   if me.vogliadivenire > me.kilometridilontananza Or me.vogliadivenire >
me.VarieEdEventuali Then
   Msgbox "Prepara il biglietto e ingegna lo stomaco"
   Else
   Msgbox "Che c...o però"
   End If
Else
   Msgbox "A che ora ci si vede?"
End If



title: [OT] Pizzata a Napoli... Invito

author: Nick

text:
"access il top" <
negrinel...@yahoo.it
> ha scritto nel messaggio
news:41e79fbe$0$8203$5fc...@news.tiscali.it...

siamo in 3 di BG e chissà quanti di MI e dintorni.. facciamo un
pulmino?? :D:D
ciao
Nick


title: [OT] Pizzata a Napoli... Invito

text:
Pablitomf wrote:
> Come da oggetto.
>
> Che ne dite? Il freddo (Se possiamo chiamarlo tale... per quelli del Nord
> č primavera) da queste parti č quasi andato del tutto... vogliamo
> organizzare sta cosa? Pizza, Mozzarella, Caprese, Pastiera, Sfogliatelle,
> Caffč... Allora?
Cucini tutto tu???
> Si accettano proposte. (Ma solo per il periodo... il posto lo scegliamo
> NOI di queste parti "democraticamente" :-D )
Io e (se gli va) consorte; quindi ně...
Ciao.
--
Sergio MAZZA


title: [OT] Pizzata a Napoli... Invito

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:cs8dg6$7i9$1...@canarie.caspur.it...
> Pablitomf wrote:
>> Come da oggetto.
>>
>> Che ne dite? Il freddo (Se possiamo chiamarlo tale... per quelli del Nord
>> č primavera) da queste parti č quasi andato del tutto... vogliamo
>> organizzare sta cosa? Pizza, Mozzarella, Caprese, Pastiera, Sfogliatelle,
>> Caffč... Allora?
>
> Cucini tutto tu???
Se cucina lui allora non vengo.
>
>> Si accettano proposte. (Ma solo per il periodo... il posto lo scegliamo
>> NOI di queste parti "democraticamente" :-D )
>
> Io e (se gli va) consorte; quindi ně...
>
Pablě, la senti una voce da Civitavecchia che gli urla SOLA!!!
stai attento...
MAssimiliano


title: [OT] Pizzata a Napoli... Invito

text:
Sergio MAZZA ha scritto:
> Pablitomf wrote:
> > Come da oggetto.
> >
> > Che ne dite? Il freddo (Se possiamo chiamarlo tale... per quelli del Nord
> > č primavera) da queste parti č quasi andato del tutto... vogliamo
> > organizzare sta cosa? Pizza, Mozzarella, Caprese, Pastiera, Sfogliatelle,
> > Caffč... Allora?
> Cucini tutto tu???
Vuoi tornare a casa con i mal di pancia? E poi magari mi formatti pure il
PC? Noooo... cucina la pizzeria!
> Io e (se gli va) consorte; quindi ně...
Macchč Ně!!!! Si, e la chiudiamo quě! ;-)
> Ciao.



title: [OT] Pizzata a Napoli... Invito

text:
MA ha scritto:
> > Cucini tutto tu???
> Se cucina lui allora non vengo.
Azz... ě che amicone che ho! A pane e acqua finisce con te. E' pň VERIMM'!
> >> Si accettano proposte. (Ma solo per il periodo... il posto lo scegliamo
> >> NOI di queste parti "democraticamente" :-D )
> >
> > Io e (se gli va) consorte; quindi ně...
> >
> Pablě, la senti una voce da Civitavecchia che gli urla SOLA!!!
> stai attento...
Bhč, su questo Sergio, proprio non posso dire nulla, "io c'ero" e le mie
orecchie hanno "ODUTO" invece che "UDITO"... il "Sola" c'era e si č
sentito...č rimbombato spesso di fronte all'astice e alla torta ricotta e
pera... No comment... "A te la difesa"!  :-D



title: [OT] Pizzata a Napoli... Invito

text:
Pablitomf wrote:
> MA ha scritto:
>
>>> Cucini tutto tu???
>> Se cucina lui allora non vengo.
>
> Azz... ě che amicone che ho! A pane e acqua finisce con te. E' pň VERIMM'!
>
>>>> Si accettano proposte. (Ma solo per il periodo... il posto lo scegliamo
>>>> NOI di queste parti "democraticamente" :-D )
>>>
>>> Io e (se gli va) consorte; quindi ně...
>>>
>
>> Pablě, la senti una voce da Civitavecchia che gli urla SOLA!!!
>> stai attento...
>
> Bhč, su questo Sergio, proprio non posso dire nulla, "io c'ero" e le mie
> orecchie hanno "ODUTO" invece che "UDITO"... il "Sola" c'era e si č
> sentito...č rimbombato spesso di fronte all'astice e alla torta ricotta e
> pera... No comment... "A te la difesa"!  :-D
Non avete proprio cuore.. Ma non ci pensate ai vostri bei banchi di ram?
Nuovi, nuovi?
Ciao.
--
Sergio MAZZA


title: [OT] Pizzata a Napoli... Invito

text:
Pablitomf wrote:
> Sergio MAZZA ha scritto:
>
>> Pablitomf wrote:
>>> Come da oggetto.
>>>
>>> Che ne dite? Il freddo (Se possiamo chiamarlo tale... per quelli del
>>> Nord
>>> č primavera) da queste parti č quasi andato del tutto... vogliamo
>>> organizzare sta cosa? Pizza, Mozzarella, Caprese, Pastiera,
>>> Sfogliatelle,
>>> Caffč... Allora?
>
>> Cucini tutto tu???
>
> Vuoi tornare a casa con i mal di pancia? E poi magari mi formatti pure il
> PC? Noooo... cucina la pizzeria!
>
>> Io e (se gli va) consorte; quindi ně...
>
> Macchč Ně!!!! Si, e la chiudiamo quě! ;-)
>
>> Ciao.
Chi? La consorte?
Ciao.
--
Sergio MAZZA


title: [OT] Pizzata a Napoli... Invito

text:
Sergio MAZZA ha scritto:
> Non avete proprio cuore.. Ma non ci pensate ai vostri bei banchi di ram?
> Nuovi, nuovi?
Azz... allora ho fatto bene! Ti ho detto che i miei sono all'aglio e
muniti di sistematici "CORNICIELLI" (corni) e "SCARTELLATI" (gobbi)...
sono zippati, ma ci sono! :-D



title: [OT] Pizzata a Napoli... Invito

text:
[cut]
che...non sarà che la pizza ora è più buona al nord???
non vedo adesioni in quel di napoli ... solo tentativi di requery ;o)



title: [OT] Pizzata a Napoli... Invito

text:
strano...mavero ha scritto:
> [cut]
> che...non sarà che la pizza ora è più buona al nord???
Non vorrai mica giocarti i suggerimenti eventuali per i prossimi due mesi
per oggettiva "eretica dichiarazione"?
> non vedo adesioni in quel di napoli ... solo tentativi di requery ;o)
Aspetta, aspetta... che poi arriveranno... e se proprio non sarà così,
peggio per chi non vi sarà... saremo in pochi e metteremo di nuovo su un
rivoluzione del sitocomune e una nuova avanzata di Accessgroup. :-D



title: [OT] Pizzata a Napoli... Invito

text:
> > [cut]
> > che...non sarà che la pizza ora è più buona al nord???
>
> Non vorrai mica giocarti i suggerimenti eventuali per i prossimi due mesi
> per oggettiva "eretica dichiarazione"?
>
...e se giocassi il jolly?
> > non vedo adesioni in quel di napoli ... solo tentativi di requery ;o)
>
> Aspetta, aspetta... che poi arriveranno... e se proprio non sarà così,
> peggio per chi non vi sarà... saremo in pochi e metteremo di nuovo su un
> rivoluzione del sitocomune e una nuova avanzata di Accessgroup. :-D
>
> --
beh, con le gambe sotto il tavolo si sono vinte grandi battaglie ;o)
A proposito, accessgroup come procede, dietro la facciato vi state muovendo
o siete arenati per altre cose extra web?
> Ciao
> Pablitomf (Maurizio Facciuti)
Ciao!



title: [OT] Pizzata a Napoli... Invito

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:cs8gnv$8bh$1...@canarie.caspur.it...

ROTFL
MAssimiliano


title: [OT] Pizzata a Napoli... Invito

text:
"strano...mavero" <
mauro.c...@gmail.com
> ha scritto nel messaggio
news:41e7d631$0$8202$5fc...@news.tiscali.it...
>> > [cut]
>> > che...non sarà che la pizza ora è più buona al nord???
>>
>> Non vorrai mica giocarti i suggerimenti eventuali per i prossimi due mesi
>> per oggettiva "eretica dichiarazione"?
>>
>
> ...e se giocassi il jolly?
>
>> > non vedo adesioni in quel di napoli ... solo tentativi di requery ;o)
>>
>> Aspetta, aspetta... che poi arriveranno... e se proprio non sarà così,
>> peggio per chi non vi sarà... saremo in pochi e metteremo di nuovo su un
>> rivoluzione del sitocomune e una nuova avanzata di Accessgroup. :-D
>>
>> --
>
> beh, con le gambe sotto il tavolo si sono vinte grandi battaglie ;o)
>
> A proposito, accessgroup come procede, dietro la facciato vi state
> muovendo
> o siete arenati per altre cose extra web?
Fermi anche se (se Sv mi autorizza) ho una ghiotta novità.
MAssimiliano


title: [OT] Pizzata a Napoli... Invito

author: Rick - Pipino

text:
"Pablitomf" <
maurizio...@accessgroup.it
> ha scritto nel messaggio
news:cs8693$5vq$1...@news.newsland.it...
> Come da oggetto.
>
> Che ne dite? Il freddo (Se possiamo chiamarlo tale... per quelli del Nord
> č primavera) da queste parti č quasi andato del tutto... vogliamo
> organizzare sta cosa? Pizza, Mozzarella, Caprese, Pastiera, Sfogliatelle,
> Caffč... Allora?
>
> Si accettano proposte. (Ma solo per il periodo... il posto lo scegliamo
> NOI di queste parti "democraticamente" :-D )
Se ci sono altri 3 pazzi disposti a partire dal centro nord io ci sono.
Io sono in zona Arezzo, circa 500 km da Napoli, venghino siori venghino ...
R.


title: [OT] Pizzata a Napoli... Invito

text:
MA ha scritto:
> Fermi anche se (se Sv mi autorizza) ho una ghiotta novità.
Azz... mi tieni nascoste le cose?!!!! :-| grrrrr.... ;-P



title: [OT] Pizzata a Napoli... Invito

text:
"Rick - Pipino" <
sp...@spam.it
> ha scritto nel messaggio
news:34q398F...@individual.net...
> "Pablitomf" <
maurizio...@accessgroup.it
> ha scritto nel messaggio
> news:cs8693$5vq$1...@news.newsland.it...
>> Come da oggetto.
>>
>> Che ne dite? Il freddo (Se possiamo chiamarlo tale... per quelli del
>> Nord
>> è primavera) da queste parti è quasi andato del tutto... vogliamo
>> organizzare sta cosa? Pizza, Mozzarella, Caprese, Pastiera,
>> Sfogliatelle,
>> Caffè... Allora?
>>
>> Si accettano proposte. (Ma solo per il periodo... il posto lo
>> scegliamo
>> NOI di queste parti "democraticamente" :-D )
>
> Se ci sono altri 3 pazzi disposti a partire dal centro nord io ci
> sono.
> Io sono in zona Arezzo, circa 500 km da Napoli, venghino siori
> venghino ...
>
> R.
>
devo controllare il calendario (che ora non ho qui) perchè ho un corso
che mi parte sabato prox e dura fino a fine marzo tutti i sabati... e
questo non riesco perchè devo studiare e sciare (se trovo neve) :D:D
però non sto scherzando.. il pulmino (o aereo o quel che vogliamo..
dipende da quanti €€ abbiamo) lo si fa..
è dall'anno scorso che con ciroteo ne parliamo.. e lo facciamo.. nonso
quando ma si fa.. abbiate fede...
ciao
Nick


title: [OT] Pizzata a Napoli... Invito

text:
scritto nel messaggio
>> news:cs8693$5vq$1...@news.newsland.it...
>>> Come da oggetto.
>>>
>>> Che ne dite? Il freddo (Se possiamo chiamarlo tale... per quelli del
>>> Nord
>>> è primavera) da queste parti è quasi andato del tutto... vogliamo
>>> organizzare sta cosa? Pizza, Mozzarella, Caprese, Pastiera,
>>> Sfogliatelle,
>>> Caffè... Allora?
>>>
>>> Si accettano proposte. (Ma solo per il periodo... il posto lo scegliamo
>>> NOI di queste parti "democraticamente" :-D )
>>
>> Se ci sono altri 3 pazzi disposti a partire dal centro nord io ci sono.
>> Io sono in zona Arezzo, circa 500 km da Napoli, venghino siori venghino
>> ...
>>
>> R.
>>
>
> devo controllare il calendario (che ora non ho qui) perchè ho un corso che
> mi parte sabato prox e dura fino a fine marzo tutti i sabati... e questo
> non riesco perchè devo studiare e sciare (se trovo neve) :D:D
>
> però non sto scherzando.. il pulmino (o aereo o quel che vogliamo..
> dipende da quanti ?? abbiamo) lo si fa..
> è dall'anno scorso che con ciroteo ne parliamo.. e lo facciamo.. nonso
> quando ma si fa.. abbiate fede...
Se si fa vi facciamo risparmiare un 200km, veniamo verso Roma, ma lontani da
Ostia!!!
MAssimiliano


title: [OT] Pizzata a Napoli... Invito

text:
"Pablitomf" <
maurizio...@accessgroup.it
> ha scritto nel messaggio
news:cs8lnr$aag$1...@news.newsland.it...
> MA ha scritto:
>
>> Fermi anche se (se Sv mi autorizza) ho una ghiotta novità.
>
> Azz... mi tieni nascoste le cose?!!!! :-| grrrrr.... ;-P
>
No, te l'ho detto all'epoca.
MAssimiliano


title: [OT] Pizzata a Napoli... Invito

text:
MA ha scritto:
[Cut]
> Se si fa vi facciamo risparmiare un 200km, veniamo verso Roma, ma lontani da
> Ostia!!!
> MAssimiliano
Sei fuori Oggetto... "Pizzata a Napoli"... :-D



title: [OT] Pizzata a Napoli... Invito

text:
MA ha scritto:
> > Azz... mi tieni nascoste le cose?!!!! :-| grrrrr.... ;-P
> No, te l'ho detto all'epoca.
Scherzavo. ;-P



title: [OT] Pizzata a Napoli... Invito

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:nfRFd.4346$fq5....@news.edisontel.com...

non no a Napoli e che è :D...
senza nulla togliere alle altre città che spero prima o poidi
visistare.. ma si dice che a  Napoli "o ci vai con chi la conosce o non
ci vai".. pertanto si sfrutta l'occasione :D
ciao
Nick


title: [OT] Pizzata a Napoli... Invito

text:

Ok allora, scegli solo come la vuoi vedere
Veduta storica
Veduta "chiattilla"   (sarebbe zona figli di papà - zone "IN")
Veduta mangierccia
Veduta movida
Veduta paesaggistica
ma qui in più c'è Sorrento, Capri, Positano...
Nick affidati e non preoccuparti
MAssimiliano


title: [OT] Pizzata a Napoli... Invito

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:5yRFd.4355$fq5....@news.edisontel.com...

ma ci basta un WE?
o devo prendere ferie :D
..potrei sfruttare il mega ponte del 25 aprile.. ben 1 giorno!!!
ciao
Nick


title: [OT] Pizzata a Napoli... Invito

author: cidi

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:cHQFd.4343$fq5...@news.edisontel.com...

ed io una bella "agghiotta alla missinisa" di piscistoccu :-)
slurpata a mezzogiorno ;-)
per quanto riguarda la tua "novità" a dir la verità il buon SV mi
chiedeva, proprio ieri, tue notizie. e visto che stavo per rispondere
potrei dare tue info, se vuoi.
ciao bello
> MAssimiliano
---
Daniele


title: [OT] Pizzata a Napoli... Invito

text:
MA ha scritto:
[CUT]
> Ok allora, scegli solo come la vuoi vedere
Vediamo di vagliarlo come cicerone questo MA:
> Veduta storica
E fin quì va bene Lui.
> Veduta "chiattilla"   (sarebbe zona figli di papà - zone "IN")
.. la conosce (forse non tutta), ma non è un figlio di papà - nel senso
che non è un atteggiato - ( e menomale! )
> Veduta mangierccia
Bhè... diffida dalle imitazioni :-) (ma con me pari merito, anche se a
differenza a me il cibo non "infierisce" :-D)
> Veduta movida
..lascia perdere (non è cosa sua)... questa è roba mia! (Dai, dì di no!?)
> Veduta paesaggistica
Può andar bene... ma come lui circa 3.000.000 di Napoletani (troppo
facile) :-D
> ma qui in più c'è Sorrento, Capri, Positano...
Bhè per quello ci vuole solo un pò di tempo a disposizione e voglia di
rifarsi gli occhi.
> Nick affidati e non preoccuparti
Questo è sicuro.
Nick siamo DOC... che fa pure rima...
> MAssimiliano



title: [OT] Pizzata a Napoli... Invito

text:
"cidi" <
dadonz...@tin.it
> ha scritto nel messaggio
news:65SFd.692010$35.27...@news4.tin.it...

Proprio stamane gli ho scritto.
MAssimiliano


title: [OT] Pizzata a Napoli... Invito

author: TANNHAUSER

text:
[]
E' uno dei 3D OT più lunghi che io abbia letto negli ultimi mesi su questo
NG! Perchè non crearne uno ad hoc?
Beh, siete scusati,: è venerdi per tutti!
Peccato che non tutti possano essere della partita; magari inun altro
tempo ed in un altro luogo, ovviamente con un altro OT subject.
Ciao e buon week-end a tutti,
TANNHAUSER



title: [OT] Pizzata a Napoli... Invito

text:
[cut]
beh, la pizza è sempre la pizza!



title: [OT] Pizzata a Napoli... Invito

text:
TANNHAUSER ha scritto:
> []
> E' uno dei 3D OT più lunghi che io abbia letto negli ultimi mesi su questo
> NG! Perchè non crearne uno ad hoc?
Ma no, è bello anche questo di tanto in tanto... l'importante è poi
rientrare nei ranghi, quando c'è da fare cose serie... ma poi non ho
capito, avresti da ridire sulla serietà della "Pizza"? ;-)
> Beh, siete scusati,: è venerdi per tutti!
E noi ti siamo grati... tutti.
> Peccato che non tutti possano essere della partita;
Partita? Chi ha parlato di partita... noi una pizza vogliamo fare! :-D
Quì c'è gente che non ce la fa più (MA)... quindi ti prego non infierire
con queste proposte di attività da Giovinotti :-D
> magari inun altro
> tempo ed in un altro luogo, ovviamente con un altro OT subject.
E sarebbe? Vorrai mica fare concorrenza ai più illustri colleghi che
trattano "Cuore", organizzando : "La PARTITA dello stomaco" ?
> Ciao e buon week-end a tutti,
Ciao :-D
> TANNHAUSER
--
Ciao
Pablitomf (Maurizio Facciuti)
------------------------------
http://www.sitocomune.com/
http://www.accessgroup.it/
------------------------------
questo articolo e` stato inviato via web dal servizio gratuito



title: [OT] Pizzata a Napoli... Invito

text:
> Ma no, è bello anche questo di tanto in tanto... l'importante è poi
> rientrare nei ranghi, quando c'è da fare cose serie... ma poi non ho
> capito, avresti da ridire sulla serietà della "Pizza"? ;-)
Sulla serietà, e soprattutto sulla bontà della specialità non ho niente da
dire, se non tesserne le lodi e raccomandarne l'uso, anzi l'abuso!!
> E noi ti siamo grati... tutti.
Valeva anche per me, ovviamente...
> Partita? Chi ha parlato di partita... noi una pizza vogliamo fare! :-D
> Quì c'è gente che non ce la fa più (MA)... quindi ti prego non infierire
> con queste proposte di attività da Giovinotti :-D
Beh, io rimango dell'idea che un match (nel senso di incontro sportivo e
non corrispondenza di valori) di possa anche prevedere, con altre
temperature, certamente e,..., in campo neutro: sai, noi gobbi temiamo un
po' le trasferte (non sappiamo dove portare a cena l'arbitro!)
TANNHAUSER



title: [OT] Pizzata a Napoli... Invito

author: ciroteo

text:
"TANNHAUSER" <
tannau...@virgilio.it
> ha scritto nel messaggio
news:cs92j3$1aj$1...@news.newsland.it...

ehehe!!!


title: [OT] Pizzata a Napoli... Invito

text:
> visistare.. ma si dice che a  Napoli "o ci vai con chi la conosce o non
> ci vai".. pertanto si sfrutta l'occasione :D
>
> ciao
> Nick
ma ti fidi davvero Nick?
Comunque dopo il 28 aprile io ci sono di sicuro, comunque e dovunque.
Nel frattempo possiamo cmq organizzare qualcosa nelle nostre zone, replicare
il raduno è sempre cosa gradita.
Anzi potremmo chiedere di pubblicare le foto del ns raduno sul sitocomune e
chiedere a pablito di pubblicare la sua con BaccoBisio!!!


title: [OT] Pizzata a Napoli... Invito

text:
"Nick" ha scritto
> non no a Napoli e che è :D...
> senza nulla togliere alle altre città che spero prima o poidi visistare..
> ma si dice che a  Napoli "o ci vai con chi la conosce o non ci vai"..
> pertanto si sfrutta l'occasione :D
Ci ho messo un po' a capire però sono d'accordo con te ... se ci si muove
200 km in più o in meno non dicono nulla ! :-)
E in effetti a Napoli ci sono stato solo una volta e di sfuggita, quindi
l'occasione va colta.
O Napoli o morte !!! (cit.)
Rick


title: [OT] Pizzata a Napoli... Invito

text:
"Pablitomf" <
maurizio...@accessgroup.it
> ha scritto nel messaggio
news:cs8nvj$llc$1...@news.newsland.it...
> MA ha scritto:
>
> [Cut]
>> Se si fa vi facciamo risparmiare un 200km, veniamo verso Roma, ma lontani
>> da
>> Ostia!!!
>> MAssimiliano
>
> Sei fuori Oggetto... "Pizzata a Napoli"... :-D
>
>
> --
> Ciao
> Pablitomf (Maurizio Facciuti)
>
> ------------------------------
>
http://www.sitocomune.com/
>
http://www.accessgroup.it/
> ------------------------------
Sarà... Ma ad Ostia c'è una pizzeria che si chiama "L'Oro di Napoli"; Mo'
come la mettiamo??
Ciao.
--
Sergio MAZZA


title: [OT] Pizzata a Napoli... Invito

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:csfs47$7fi$1...@canarie.caspur.it...

Appunto LORO non noi!!!
MAssimiliano


title: [OT] Pizzata a Napoli... Invito

text:
Sergio MAZZA ha scritto:
> Sarà... Ma ad Ostia c'è una pizzeria che si chiama "L'Oro di Napoli"; Mo'
> come la mettiamo??
Se è per questo ce n'è uno anche a Fano...a Milano, a Brescia, nella
Brianza...
Bhè...si passa alla denuncia dei "mistificatori"... non c'è Oro che tenga
al di fuori delle cinta di mura di Castel Capuano :-D
> Ciao.
--
Ciao
Pablitomf (Maurizio Facciuti)
------------------------------
http://www.sitocomune.com/
http://www.accessgroup.it/
------------------------------
questo articolo e` stato inviato via web dal servizio gratuito



title: [OT] Pizzata a Napoli... Invito

author: TheMax

text:
"Rick - Pipino" <
sp...@spam.it
> ha scritto nel messaggio
news:34qp7pF...@individual.net...

Non per fare il puntiglioso, ma non era o Roma o morte?
Io ragazzi ci verrei volentieri, ma praticamente tutti i sabati sono ad
arbitrare, per cui posso solo dire due cose, se fissate una data (magari il
26 febbraio che ci sono poche partite) e io sono libero, mi unisco
volentieri al pullmino.
Napoli secondo me va benissssimo, ci fui stato ma avevo circa 10 anni.
>
> Rick
>
Ciao,
Massimo


title: [OT] Pizzata a Napoli... Invito

text:
>> "Nick" ha scritto
>> > non no a Napoli e che è :D...
>> > senza nulla togliere alle altre città che spero prima o poidi
> visistare..
>> > ma si dice che a  Napoli "o ci vai con chi la conosce o non ci vai"..
>> > pertanto si sfrutta l'occasione :D
>>
>> Ci ho messo un po' a capire però sono d'accordo con te ... se ci si muove
>> 200 km in più o in meno non dicono nulla ! :-)
>> E in effetti a Napoli ci sono stato solo una volta e di sfuggita, quindi
>> l'occasione va colta.
>>
>> O Napoli o morte !!! (cit.)
>
> Non per fare il puntiglioso, ma non era o Roma o morte?
>
> Io ragazzi ci verrei volentieri, ma praticamente tutti i sabati sono ad
> arbitrare, ....
e magari sei anche juventino...
ci sto quasi ripensando.
MAssimiliano


title: [OT] Pizzata a Napoli... Invito

text:
"TheMax" ha scritto
> Non per fare il puntiglioso, ma non era o Roma o morte?
E se fosse stata una citazione volutamente distorta ? :-)
Rick


title: [OT] Pizzata a Napoli... Invito

text:
"TheMax" <
massimo_...@accessgroup.it
> ha scritto nel messaggio
news:csgdkn$g29$1...@carabinieri.cs.interbusiness.it...

tranquillo TheMax... per ora non riusciamo a breve.. noi del nord
pulminati stiamo organizzando per aprile/maggio.. perchè prima abbiamo
parecchi WE impegnati e non possiamo in giornata andare e tornare per
napoli :D
cmq ti terremo aggiornato!!!!
appena definiamo la data postiamo sul NG!!
ciao
Nick


title: [OT] Pizzata a Napoli... Invito

author: Antonio Biso

text:
"Pablitomf" <
maurizio...@accessgroup.it
> ha scritto nel messaggio
news:cs8693$5vq$1...@news.newsland.it...
> Come da oggetto.
>
> Che ne dite? Il freddo (Se possiamo chiamarlo tale... per quelli del Nord
> č primavera) da queste parti č quasi andato del tutto... vogliamo
> organizzare sta cosa? Pizza, Mozzarella, Caprese, Pastiera, Sfogliatelle,
> Caffč... Allora?
>
> Si accettano proposte. (Ma solo per il periodo... il posto lo scegliamo
> NOI di queste parti "democraticamente" :-D )
SGRUNT!
Antonio


title: Fattura elettronica inviata come TD01 al posto TD24

author: RobertoA

text:
Scusate il mezzo OT ma credo che dentro questo gruppo ci siano molte
competenze relative alla fatturazione elettronica, e qundi per favore
portate pazienza
Fatture differite, derivanti da ddt, inviate per sbaglio col codice TD01
al posto del nuovo TD24, che dite possa succedere?
E' il caso di stornarle e re-inviarle col codice corretto?
Che fareste voi?
Il consulente fiscale, gia' interpellato, non sa dirci niente
Ho visto anche su Forum Italia, ma anche li non trovo indicazioni


author: BFS

text:

mi pare di aver letto che per il 2021 sia opzionale indicare TD24

BFS


author: Simone Calligaris

text:
> Scusate il mezzo OT ma credo che dentro questo gruppo ci siano molte
> competenze relative alla fatturazione elettronica, e qundi per favore
> portate pazienza
> Fatture differite, derivanti da ddt, inviate per sbaglio col codice TD01
> al posto del nuovo TD24, che dite possa succedere?

Non succede nulla.

Saluti


title: risoluzione

author: gestserv

text:
Mi sono trovato a far girare un mdb su un vecchio PC portatile COMPAQ
contura aero 4/33 con risoluzione 480X600 e video molto piccolo. Capita che
l'mdb mi visualizza le maschere ma devo scorrerle con le barre laterali. Si
può fare in modo che l'mdb si adatti al video e mi renda tutto visibile lo
stesso senza scorrimento. grazie
Matteo


title: risoluzione

author: Goose

text:
"gestserv" <
gest...@uno.it
> ha scritto nel messaggio
news:955u51$i9i$1...@fe1.cs.interbusiness.it...
[cut]....
Sipuò fare in modo che l'mdb si adatti al video e mi renda tutto visibile lo
stesso senza scorrimento. grazie
> Matteo
>
Guarda sul sito comune. Dovrebbe esserci qualcosa a riguardo.
un saluto
Goose


title: somma record

author: Claudio

text:
E' possibile creare un record avente come valore la somma di un campo di
tutti i record
mi spiego meglio??
un campo "SALDO TOTALE" contenente la somma di tutti i record del campo
"SALDO"
Claudio


title: somma record

text:
"Claudio" <
cre...@tiscali.it
> ha scritto nel messaggio
news:4H1Ia.202038$g92.4...@news2.tin.it...

Non devi creare un Record, ma bensì sfruttare l'origine di un Controllo
in una Form o Report.
Con il generatore di Espressioni fai eseguire la Somma([Campo])
@Alex.


title: copia di salvataggio

author: Matteo

text:
Si può associare ad un pulsante la possibilità di effettuare una copia di
salvataggio sul floppy A: con qualche messaggio, magari utilizzando Winzip?
E un tasto per scompattare il contenuto del floppy in una directory da
scegliere?


title: copia di salvataggio

author: RoDAgo

text:
Matteo scrisse...

Sul Sito Comune del NG troverai una routine per il tuo problema.
http://members.xoom.it/it_db_access/
Ti consiglio di utilizzare Winrar, di solito si ottengono file meno pesanti!
Cià
RoDAgo


title: copia di salvataggio

author: ema

text:
Mio cuggino mi ha detto che Matteo <
gest...@uno.it
> scrisse:
> Si può associare ad un pulsante la possibilità di effettuare una copia di
> salvataggio sul floppy A: con qualche messaggio, magari utilizzando Winzip?
> E un tasto per scompattare il contenuto del floppy in una directory da
> scegliere?
>
shell

bye!
--
Emanuele Cesena
http://www.penguinpowered.com/~ecesena
<
ece...@penguinpowered.com
> - rimuovi XXX x rispondere    ICQ #8814554


title: access 2003

author: Lenny

text:
qualcuno ha già messo le mani sul futuro access?
impressioni?
Lenny


title: access 2003

author: MA

text:

Sì lavora in A2k e non c'è nulla di che in + se non una maggiore attenzione
agli Xml.
M$ non ci crede molto.
ciao MAssimiliano
--------------------------------
Inviato via
http://usenet.libero.it


title: access 2003

author: Sib

text:
"MA" <
massimilia...@kksrl.com
> ha scritto nel messaggio
> Il 18 Giu 2003, 10:53, "Lenny" <
nonl...@nonsonoscemo.it
> ha scritto:
> > qualcuno ha già messo le mani sul futuro access?
> > impressioni?
> >
> > Lenny
>
> Sì lavora in A2k e non c'è nulla di che in + se non una maggiore
attenzione
> agli Xml.
> M$ non ci crede molto.
Non crede molto ad access o agli xml?
ti riferivi proprio ad A2003 o avevi capito A2002?
Sib


title: access 2003

text:

A2003, io ce l'ho in versione beta2 con Win 2003 server SharePointServices
etc., all'indomani della prsentazione ho creato un post. Parole chiave "Road
Show"
Cmq mi riferivo ad access. Al contrario sta spingendo moltissimo gli xml.
Considera Add-on di Outlook è una rubrica "Intelligente" che ti permette di
gestire il materiale scambiato col cliente: email, attached, e poco altro.
Insomma presentano come merabilia ciò che Access fa al suo 2%.
Alle mie obiezioni hanno ribadito che sono ordini dalla casa madre.
Considera inoltre hanno superato per questo tipo di file il limite dei 2Gb e
per Access no.
 Ciao MAssimiliano



title: access 2003

text:
"MA" <
massimilia...@kksrl.com
> ha scritto nel messaggio
cut
> A2003, io ce l'ho in versione beta2 con Win 2003 server SharePointServices
> etc., all'indomani della prsentazione ho creato un post. Parole chiave
"Road
> Show"
> Cmq mi riferivo ad access. Al contrario sta spingendo moltissimo gli xml.
> Considera Add-on di Outlook è una rubrica "Intelligente" che ti permette
di
> gestire il materiale scambiato col cliente: email, attached, e poco altro.
> Insomma presentano come merabilia ciò che Access fa al suo 2%.
> Alle mie obiezioni hanno ribadito che sono ordini dalla casa madre.
> Considera inoltre hanno superato per questo tipo di file il limite dei 2Gb
e
> per Access no.
>  Ciao MAssimiliano
Capisco che evidentemente e' una questione commerciale.
Chissa' perche' gli piacciono tanto gli xml di cui, a tutt'oggi, non ho
ancora compreso l'utilita'.
Il problema dei 2Gb superati per il nuovo formato ma non per access conferma
che si tratta di una questione commerciale, chissa' perche' visto che access
funziona benissimo.
Sib


title: access 2003

author: George

text:
"Sib" <si...@SPAMiol.it> ha scritto nel messaggio
news:c_ZHa.107424$pR3.2...@news1.tin.it...

Perchè così possono fare la pubblicità "5 centesimi risparmiati per ogni
transazione... facciamo 20 milioni di transazioni al mese..."
Mah...


title: access 2003

author: Antonello Ferraris

text:
"MA"
> Sì lavora in A2k e non c'è nulla di che in + se non una maggiore
attenzione
> agli Xml.
Qualche novità interessante (le poche ormai che si possono aggiungere a un
prodotto già completo) c'è: vedi gli smart-tags.
> M$ non ci crede molto.
M$ ci crede come ci ha sempre creduto: un prodotto non destinato alle suite
Office di fascia bassa e quindi meno pubblicizzato.
Ciao.


title: access 2003

author: Liones

text:

premetto che non ho visto la nuova versione ma
se Bill "doveva" rilasciare una nuova versione di access doveva inserire:
ado.net
vba.net
....


title: access 2003

text:
"Liones" <
> premetto che non ho visto la nuova versione ma
> se Bill "doveva" rilasciare una nuova versione di access doveva inserire:
>
ado.net
>
vba.net
Pazienza, pazienza ... quando i CLR saranno installati di default su tutti i
PC Win, avrà senso inserire .NET in Office.
Ciao.


title: access 2003

text:
"George" <
giorgio.ben...@libero.it
> ha scritto nel messaggio
> "Sib" <si...@SPAMiol.it> ha scritto nel messaggio
cut
> > Il problema dei 2Gb superati per il nuovo formato ma non per access
conferma
> > che si tratta di una questione commerciale, chissa' perche' visto che
access
> > funziona benissimo.
> >
> > Sib
> >
>
> Perchè così possono fare la pubblicità "5 centesimi risparmiati per ogni
> transazione... facciamo 20 milioni di transazioni al mese..."
> Mah...
L'ho vista anch'io (ovviamente) ma non ho capito come si fa a risparmiare *5
centesimi* a transazione, perche', quanto puo' costare una transazione? e
soprattutto, la transazione ha un costo?
Boh
Sib


title: access 2003

text:
"Antonello Ferraris" <
antonospa...@libero.it
> ha scritto nel messaggio

Non vorrei apparire ignorante o presuntuoso, ma sono estremamente diffidente
rispetto alle "grandi novita'"
Un programma e' un programma, il linguaggio che viene usato e' scarsamente
determinante rispetto al risultato che si deve e si puo' ottenere.
Non vedo come linguaggi diversi da quelli che gia' usiamo potrebbero
presentare vantaggi. Semmai rappresentano un problema con i tempi di
apprendimento.
L'unica cosa che potrebbe essere vantaggiosa sono nuove funzioni facili da
usare.
per questo penso che non ci sia tutto questo vantaggio nell'uso di .net.
Sib


title: access 2003

text:
"Sib" <
> > Pazienza, pazienza ... quando i CLR saranno installati di default su
tutti
> i
> > PC Win, avrà senso inserire .NET in Office.
>
> Non vorrei apparire ignorante o presuntuoso, ma sono estremamente
diffidente
> rispetto alle "grandi novita'"
> Un programma e' un programma, il linguaggio che viene usato e' scarsamente
> determinante rispetto al risultato che si deve e si puo' ottenere.
> Non vedo come linguaggi diversi da quelli che gia' usiamo potrebbero
> presentare vantaggi. Semmai rappresentano un problema con i tempi di
> apprendimento.
> L'unica cosa che potrebbe essere vantaggiosa sono nuove funzioni facili da
> usare.
> per questo penso che non ci sia tutto questo vantaggio nell'uso di .net.
Sono d'accordo con te, almeno in rapporto al gestionale aziendale.
I vantaggi di .NET riguardano soprattutto chi sviluppa applicazioni web: è
vero che il futuro del gestionale aziendale potrebbe essere spostato su
Internet ... ma non a breve e non con le rozzezze e limitazioni attuali.
Preferisco Cytrix.
Ciao.


title: access 2003

text:
"Antonello Ferraris" <
antonospa...@libero.it
> ha scritto nel messaggio
> "Sib" <
cut
> > L'unica cosa che potrebbe essere vantaggiosa sono nuove funzioni facili
da
> > usare.
> > per questo penso che non ci sia tutto questo vantaggio nell'uso di .net.
>
> Sono d'accordo con te, almeno in rapporto al gestionale aziendale.
> I vantaggi di .NET riguardano soprattutto chi sviluppa applicazioni web: è
> vero che il futuro del gestionale aziendale potrebbe essere spostato su
> Internet ... ma non a breve e non con le rozzezze e limitazioni attuali.
da questo punto di vista, non credo neanche io nella cosa.
tra l'altro non credo nel commercio via web, anzi penso che dopo il boom
(avvenuto comunque fuori dall'Italia) ci sara' un calo deciso.
> Preferisco Cytrix.
What's?
Sib


title: access 2003

text:
"Sib" <> >
> > Preferisco Cytrix.
>
> What's?
In pratica, con questo metasistema è possibile utilizzare applicazioni
comunissime (quindi anche applicazioni Access o VB) attraverso web browser.
Ottimo per aziende con varie filiali che non vogliano impazzire con le
repliche.
Ciao.


title: access 2003

text:
"Antonello Ferraris" <
antonospa...@libero.it
> ha scritto nel messaggio

e' una sorta di terminal, di pcanywere o cos'altro?
Sib


title: access 2003

text:
"Sib" <
> > Ottimo per aziende con varie filiali che non vogliano impazzire con le
> > repliche.
> e' una sorta di terminal, di pcanywere o cos'altro?
Concettualmente sě, ma molto piů versatile e performante di MS Terminal
Server.
Naturalmente il sistema di licenze costicchia, ma per aziende che hanno
esigenze č davvero buono.
Ciao.


title: Bottoni di opzione

author: Giorgio A.

text:
Per cortesia un aiuto
Ho una tabella con un campo per inserimento Si/No
e sulla maschera due Opzioni bottoni per inserimento Opzione Si/No nel
campo.
Il problema e che dopo averli rinominati come Option1 e Option2, cliccandoci
sopra mi si abilitano o disabilitano entrambi. Invece mi servirebbe che uno
annulli l'altro.
Nella proprietŕ origine dati devo dare il campo tabella per entrambi oppure
a uno solo?
Necessiterei che nel campo della Tabella venga spuntata la casellina solo
con il tasto premuto Si.
Gentilmente potete indicarmi la procedura oppure un codicino in V.Basic per
fare ciň?
Grazie 1000
Giorgio


title: Bottoni di opzione

text:
> Il problema e che dopo averli rinominati come Option1 e Option2,
cliccandoci
> sopra mi si abilitano o disabilitano entrambi. Invece mi servirebbe che
uno
> annulli l'altro.
> Nella proprietà origine dati devo dare il campo tabella per entrambi
oppure
> a uno solo?
> Necessiterei che nel campo della Tabella venga spuntata la casellina solo
> con il tasto premuto Si.
> Gentilmente potete indicarmi la procedura oppure un codicino in V.Basic
per
> fare ciò?
>
> Grazie 1000
> Giorgio
>
in teoria questi controlli option devono essere collegati a campi diversi di
tipo Si/No
se vuoi che uno annulli l'altro metti su evento click  di ognuno questo
codice
option1
if me.value=-1 then
    option2.value=0
end if
option2
if me.value=-1 then
    option1.value=0
end if


title: Bottoni di opzione

text:
"tosto73" <
tos...@libero.it
> ha scritto nel messaggio
news:bpdro0$5hs$2...@lacerta.tiscalinet.it...
> > Il problema e che dopo averli rinominati come Option1 e Option2,
> cliccandoci
> > sopra mi si abilitano o disabilitano entrambi. Invece mi servirebbe che
> uno
> > annulli l'altro.
> > Nella proprietŕ origine dati devo dare il campo tabella per entrambi
> oppure
> > a uno solo?
> > Necessiterei che nel campo della Tabella venga spuntata la casellina
solo
> > con il tasto premuto Si.
> > Gentilmente potete indicarmi la procedura oppure un codicino in V.Basic
> per
> > fare ciň?
> >
> > Grazie 1000
> > Giorgio
> >
>
> in teoria questi controlli option devono essere collegati a campi diversi
di
> tipo Si/No
> se vuoi che uno annulli l'altro metti su evento click  di ognuno questo
> codice
>
> option1
> if me.value=-1 then
>     option2.value=0
> end if
>
> option2
> if me.value=-1 then
>     option1.value=0
> end if
>
> Grazie tosto73
Buona serata
>
>


title: Filtri e ricerche

author: alexb

text:
Ciao a tutto l'Ng. ormai sono alla conclusione di questo db (finalmente!).
Vorrei chiedervi come fare ad effetturare ricerche nei campi di una tabella
impostando nel seguente modo:
Apro una maschera FILTROCLIENTI (per es.) nella quale ci sono delle caselle
non associate: cliente, indirizzo, città,
collego una maschera CLIENTI2 nella quale mi vengano filtrati i dati
impostati nella FITROCLIENTI.
In realtà ho già effettuato questa operazione ma con scarsi risultati.
Perchè devo inserire tutto il campo della ragione soc. e/o indirizzo ecc per
poter ottenere record validi. io,invece,vorrei poter inserire solo una parte
del campo (es. solo RO invece di ROSSI), come si fa con la ricerca.
N.b. so che si possono utilizzare i caratteri * ma il cliente finale non lo
sa.
grazie ancora


title: Filtri e ricerche

author: Roberto dal portatile

text:
"alexb" <
a...@tin.it
> ha scritto nel messaggio
news:3c5U6.2673$Vk3....@news2.tin.it...

E tu non glielo dire. :-)
Non ho ben capito se la selezione dei dati contenuti nella tabella la
effettui creandoti una query (che è poi origine record della maschera
CLIENTI2) o filtrando direttamente CLIENTI" al momento dell'apertura.
Se lo hai fatto tramite una query di selezione parametrica, dove per i
parametri fai riferimento ai controlli della maschera FILTROCLIENTI,
presuppongo che nei criteri relativi al campo che contiene la ragione
sociale hai scritto:
[Forms]![FILTROCLIENTI]![cliente]
Se la selezione vuoi farla digitando solo la prima parte della ragione
sociale ricercata, nei criteri scrivi:
Like [Forms]![FILTROCLIENTI]![cliente] & "*"
La stessa tecnica adoperala anche per scrivere i criteri degli altri campi
su cui basi la ricerca.
A questo punto non dire all'utente finale che esiste il carattere jolly *,
però digli che se digita RO, oltre a ROSSI selezionerà anche ROSSINI,
ROSSETTI, ROBERTI e tutte la ragioni sociali che iniziano per RO. ;-)
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Filtri e ricerche

author: Luigi Pappano

text:
Crei una maschera non associata, chiamata Ricerca Clienti
nella sezione corpo aggiungi una sotto maschera chiamata
SottoMascheraRicercaclienti basata sulla query della tabella di origine.
Ad esempio:
Tabella Clienti
CodCliente
RagioneSociale
Indirizzo
Cap
Città
Contatto
ecc...
Nella query di selezione che chiameremo qClienti, aggiungi i campi su cui
devi eseguire i filtri, tipo RagioneSociale, Indirizzo, Contatto ecc... li
puoi mettere anche tutti, poi sei tu che decidi su quali campi eseguire il
filtro.
Crei nell'intestazione della maschera tante caselle di testo non associate
quanti sono i campi della query su cui devi filtrare i dati.
Ad esempio:
caselle di testo          campo query
txtCercaRagioneSociale -> RagioneSociale
txtCercaIndirizzo      -> Indirizzo
txtcercaContatto       -> Contatto
ecc...
A questo punto devi creare una Sub privata chiamata Aggiungi, nella sezione
generale del modulo di classe della maschera:
questo è il codice commentato da scrivere:
Private Sub Aggiungi(ValoreCampo As Variant, NomeCampo As String, _
Criteri As String, NumArgomenti As Integer)
    ' Crea i criteri per la clausola WHERE.
    If ValoreCampo <> "" Then
    ' Aggiunge "and" se esiste un altro criterio.
        If NumArgomenti > 0 Then
            Criteri = Criteri & " and "
        End If
        ' Accoda il criterio  ai criteri esistenti.
        ' Aggiunge ValoreCampo e l'asterisco tra virgolette.
        Criteri = (Criteri & NomeCampo & "Like " & Chr(39) & ValoreCampo & _
        Chr(42) & Chr(39))
        'Aumenta il numero degli argomenti.
        NumArgomenti = NumArgomenti + 1
    End If
End Sub
Crea un'altra Sub privata chiamata DisattivaControllo, questo è il codice:
Private Sub DisattivaControllo()
    ' Se attivato, disattiva il controllo nella sezione Corpo dopo
    ' la modifica del criterio di ricerca.
    If Me!SottoMascheraRicercaClienti.Enabled Then
        AttivaControl Me, acDetail, False
    End If
End Sub
Aggiungi due pulsanti di comandi nell'intestazione della maschera chiamati
Visualizza e Cancella.
Nell'evento Click() del pulsante Visualizza, scrivi questo codice:
Private Sub Visualizza_Click()
    ' Crea una clausola WHERE utilizzando i criteri di ricerca immessi
dall'utente
    ' e imposta la proprietà "RecordSource" ("Origine record") della
    ' SottoMascheraRicercaClienti.
    Dim MioSQL As String, Criteri As String, MiaOrigineRecord As String
    Dim NumArg As Integer
    ' Inizializza il conteggio degli argomenti.
    NumArg = 0
    ' Inizializza l'istruzione SELECT.
    MioSQL = "SELECT * FROM [qClienti] WHERE "
    Criteri = ""
    ' Utilizza i valori immessi nelle caselle di testo dell'intestazione
della
    ' scheda per creare criteri per la clausola WHERE.
    Aggiungi [txtCercaRagioneSociale], "[RagioneSociale]", Criteri, NumArg
    Aggiungi [txtCercaIndirizzo], "[Indirizzo]", Criteri, NumArg
    Aggiungi [txtCercaContatto], "[Contatto]", Criteri, NumArg
    ' Se non è stato specificato alcun criterio, restituisce tutti i record.
    If Criteri = "" Then
        Criteri = "True"
    End If
    ' Crea l'istruzione SELECT.
    MiaOrigineRecord = MioSQL & Criteri
    ' Imposta la proprietà "Origine record" della
SottoMascheraRicercaClienti.
    Me![SottoMascheraRicercaClienti].Form.RecordSource = MiaOrigineRecord
    ' Se nessun record corrisponde ai criteri, visualizza un messaggio.
    ' Seleziona il pulsante Cancella.
    If Me!SottoMascheraRicercaClienti.Form.RecordsetClone.RecordCount = 0
Then
        MsgBox "Nessun record corrisponde ai criteri immessi.", 48, "Nessun
record trovato"
        Me!Cancella.SetFocus
        Else
        'Attiva il controllo nella sezione Corpo.
        AttivaControl Me, acDetail, True
        'Seleziona la SottoMascheraRicercaClienti.
        Me!SottoMascheraRicercaClienti.SetFocus
    End If
End Sub
Nell'evento Click() del pulsante Cancella, scrivi questo codice:
Private Sub Cancella_Click()
    '  Cancella i controlli nella intestazione della scheda e rimuove
    '  i record dalla sottoscheda.
    '
    Dim MioSQL As String
    MioSQL = "SELECT * FROM [qClienti] WHERE TRUE"
    '  Cancella le caselle di testo contenenti i criteri di ricerca.
    Me!txtCercaRagioneSociale = Null
    Me!txtCercaIndirizzo = Null
    Me!txtCercaContatto = Null
    '  Reimposta la proprietà "Origine record" ("RecordSource")
    '  della sotto maschera per rimuovere i record.
    Me![SottoMascheraRicercaClienti].Form.RecordSource = MioSQL
    '  Seleziona la casella di testo "txtCercaRagioneSociale".
    Me![txtCercaRagioneSociale].SetFocus
End Sub
Nell'evento DopoAggiornamento della casella di testo, scrivi questo codice:
Private Sub txtCercaRagioneSociale_AfterUpdate()
  'Disattiva il controllo nella sezione corpo dopo
  'la modifica del criterio di ricerca.
    DisattivaControllo
End Sub
Questo lo ripeti per tutte le caselle di testo dell'intestazione
------------------ Tutto qui. ----------------------
Adesso devi creare un modulo generale e lo salvi col nome Funzioni Utilità.
Scrivi la Funzione AttivaControl:
Function AttivaControl(frm As Form, strSezione As Integer, intStato As
Boolean) As Boolean
    'Attiva o disattiva i controlli in sezione specificata della maschera
    'Utilizza l'oggetto Form, la costante di sezione e specifica gli
argomenti
    'passati all routine AttivaControl
    Dim ctl As Control
    'Imposta intStato per tutti i controlli nella sezione specificata.
    For Each ctl In frm.Controls
        If ctl.Section = strSezione Then
            On Error Resume Next
            ctl.Enabled = intStato
            Err = 0
        End If
    Next ctl
    AttivaControl = True
End Function
Questo è tutto... ciao
"alexb" <
a...@tin.it
> ha scritto nel messaggio
news:3c5U6.2673$Vk3....@news2.tin.it...



title: Procedura ricerca e verifica presenza record e sua modifica

author: max

text:
Vorrei che al momento dell'inserimento nel campo "Cognome", venga
effettuata una ricerca, automtica e silenziosa, che mi avvisa della
presenza di un record con lo stesso valore, ma ciò dovrebbe avvenire
solo se il campo "orafine" del record è vuoto, altrimenti mi permette
di continuare senza nessun avviso.
Ma se nella ricerca avrà un riscontro positivo a video mi apparirà una
finestra che mi avvisa dell'esistenza del record e mi chiede se voglio
modificarlo subito o in seguito, se scelgo subito mi apprirà una
finestra di modifica popup temporizzata.
Che ne dite come posso fare?
Il mio db è strutturato in questo modo:
MscInsGiornaliera
SottoMscInsDati
le due mschere sono collegate tra loro con il campo "Data"
in quanto gestisco i dati inseriti nell'arco delle 24 ore a cavallo di
due giorni dalle 05.00 alle 05.00 del giorno dopo, ma l'orario non è
indicativo.
grazie


author: Sergio MAZZA

text:
"max" <
med...@yahoo.it
> ha scritto nel messaggio news:9eksh2l19f77icvau...@4ax.com...

Nell'evento "su uscita" della casella di testo, oppure nell'evento "prima di aggiornare" della maschera, fai un controllo
dell'esistenza del valore inserito con la funzione DLookup (vedi help attivabile con ALT-F11 poi F1):
es.
if not isnull(DLookup("cognome","nomeTabellaQuery","Cognome=" & chr$(34) & Me!Cognome & chr$(34))) then
    msgbox me!Cognome & " è già stato inserito."
    Cancel = true
    me!Cognome.setfocus
end if
Ciao.
--
Sergio MAZZA


author: francesco

text:

io ho provato la stessa istruzione per cercare un carattere comune
all'interno di un campo, modificando così:
    If Not IsNull(DLookup("[cognome]", "[rubrica]", "[cognome]" Like "*" &
Me.caratterecomune & "*")) Then
         fai una certa cosa.......
    else
        MsgBox Me.caratterecomune & " non trovato nella stringa"
    end if
il problema è che sia inserendo un carattere non comune che inserendone uno
comune mi ritorna il msgbox di errore. Come mai?
ciao
Francesco
>
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


text:


Grazie, il grande problema è effettuare la ricerca solo nell'elenco
dei record del giorno cioè alla data della sottomaschera in relazione
con  la maschere principale.
Inoltre  una volta trovato il record corrispondente devo contrllare il
se il campo "orafine" è vuoto, in quanto:
1) se vuoto, vorrei che apparisse un messaaggio a video che mi avverte
del duplicato e mi permette di scegliere se modificarlo o andare
avanti.
	a) se scelgo di modificarlo si pre una maschera pop up che mi
                 permette di modificare il record trovato.
	b) se scelgo di andare avanti si chiude la finestra.
2) se pieno non compare nessuna finestra e proseguo con l'inserimento.
Non ho idea su come procedere nel risolvere il tutto.
Grzie .


text:
"francesco" <
d...@tin.it
> ha scritto nel messaggio news:151Z38Z187Z12Y1...@usenet.libero.it...
>
> io ho provato la stessa istruzione per cercare un carattere comune
> all'interno di un campo, modificando così:
>
>    If Not IsNull(DLookup("[cognome]", "[rubrica]", "[cognome]" Like "*" &
> Me.caratterecomune & "*")) Then
>         fai una certa cosa.......
>    else
>        MsgBox Me.caratterecomune & " non trovato nella stringa"
>    end if
>
> il problema è che sia inserendo un carattere non comune che inserendone uno
> comune mi ritorna il msgbox di errore. Come mai?
>
> ciao
>
> Francesco
Se l'hai scritta in quel modo è strano che funzioni.
If Not IsNull(DLookup("[cognome]", "[rubrica]", "[cognome] Like '*" & Me.caratterecomune & "*'")) Then
...
I testi devono essere racchiusi o tra apici singoli (') o doppi ("). Ma se stai costruendo una stringa VBA e devi passare un valore
testuale a SQL o lo racchiudi tra apice singolo oppure utilizzi la funzione chr$(34). Oppure raddoppi i doppi apici ma a me è sempre
venuto il mal di testa a contarli.
Prova così e vediamo che succede...
Ciao.
--
Sergio MAZZA


text:
"max" <
med...@yahoo.it
> ha scritto nel messaggio news:2iith2lra7rlgsu1r...@4ax.com...
> Grazie, il grande problema č effettuare la ricerca solo nell'elenco
> dei record del giorno cioč alla data della sottomaschera in relazione
> con  la maschere principale.
Nel parametro CondizioneWhere della funzione DLookup ci inserisci il confronto con la data:
es.
...DLookup(....,....,"cognome='mazza' And dataGiorno=#" & format(me!dataGiorno,"mm/dd/yy") & "#")
> Inoltre  una volta trovato il record corrispondente devo contrllare il
> se il campo "orafine" č vuoto, in quanto:
Oh mamma!
Ma allora la CondizioneWhere della dlookup potrebbe contenere pure il controllo su orafine, noo?
...DLookup(....,....,"cognome='mazza' And dataGiorno=#" & format(me!dataGiorno,"mm/dd/yy") & "# And orafine is null")
> 1) se vuoto, vorrei che apparisse un messaaggio a video che mi avverte
> del duplicato e mi permette di scegliere se modificarlo o andare
> avanti.
Dentro l'If/Endif del dlookup ci inserisci:
If msgbox("Record duplicato, vuoi proseguire?",vbinformation+vbyesno+vbno)=vbno then
--> risposta no
else
--> risposta sě
endif
> a) se scelgo di modificarlo si pre una maschera pop up che mi
>                 permette di modificare il record trovato.
Nel "risposta sě" utilizzi il metodo OpenForm passandogli l'identificativo del record da modificare:
es.
Docmd.openform "nomeForm",,,"id=" & me!id
> b) se scelgo di andare avanti si chiude la finestra.
Docmd.Close acform,
me.name
> 2) se pieno non compare nessuna finestra e proseguo con l'inserimento.
>
>
> Non ho idea su come procedere nel risolvere il tutto.
Ora sě.
> Grzie .
Prgo...
Ciao.
P.S. Per tutte le informazioni sulle istruzioni scritte utilizza l'help in linea attivandolo con ALT-F11, poi F1.
--
Sergio MAZZA


text:
Il 30 Set 2006, 22:37, "Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto:
> "francesco" <
d...@tin.it
> ha scritto nel messaggio
news:151Z38Z187Z12Y1...@usenet.libero.it...
> >
> > io ho provato la stessa istruzione per cercare un carattere comune
> > all'interno di un campo, modificando così:
> >
> > If Not IsNull(DLookup("[cognome]", "[rubrica]", "[cognome]" Like "*" &
> > Me.caratterecomune & "*")) Then
> > fai una certa cosa.......
> > else
> > MsgBox Me.caratterecomune & " non trovato nella stringa"
> > end if
> >
> > il problema è che sia inserendo un carattere non comune che inserendone
uno
> > comune mi ritorna il msgbox di errore. Come mai?
> >
> > ciao
> >
> > Francesco
>
>
> Se l'hai scritta in quel modo è strano che funzioni.
> If Not IsNull(DLookup("[cognome]", "[rubrica]", "[cognome] Like '*" &
Me.caratterecomune & "*'")) Then
> ...
[cut]
l'ho scritta così e funziona:
If DLookup("cognome", "rubrica", "cognome") Like "*" & Me.caratterecomune &
"*" Then
              fai una certa cosa.......
         else
             MsgBox Me.caratterecomune & " non trovato nella stringa"
end if
ciao e grazie
F



text:


Adesso si mi metto all'opera, grazie.


text:

grrrrr.....mi è venuto di provare a inserire una parola e non un singolo
carattere in comune, ma ho notato che non funziona la condizione di DLookup,
cioè:
se inserisco <<$>> come carattere comune, mi soddisfa la condizione
se inserisco <<sample>> come parola comune del campo cognome, manco per
idea.....mi va in condizione di Else ma non è così, è falso
io credo che sia un problema con il Like nella stringa DLookup
ciao



title: Contatori

author: Elsis

text:
Dovendo impostare il campo numero DDt in un file access che mi gestisce i
documenti di trasporto ho notato che settando come contatore il campo ho dei
problemi di vario genere che per essere breve non vi sto a spiegare.
Domando: avendo impostato il campo a numerico come faccio nella maschera
riferita alla tabella ad impostare il controllo in modo che all'aggiunta di
un nuovo record access ricerchi l'ultimo numero di DDt inserito e mi dia il
successivo. Una funzione interessante potrebbe essere una tipo max di excell
ma non riesco ad impostarla. Mi date il codice esatto da scrivere??
Grazie a tutti


title: Contatori

text:
"Elsis" <
el...@tin.it
> ha scritto nel messaggio

Sito comune: numerazione crescente per fatture e altro.
Sib


title: Contatori

text:
Grazie, sono stato uno sciocco.
"Sib" <si...@SPAMiol.it> ha scritto nel messaggio
news:iJZHa.107338$pR3.2...@news1.tin.it...



title: Contatori

author: Antonio Biso

text:
"Elsis" <
el...@tin.it
> ha scritto nel messaggio
news:NXjIa.208252$g92.4...@news2.tin.it...
> Grazie, sono stato uno sciocco.
Già...
Non hai scritto correttamente DOPO il quoting!!!
Antonio


title: Formato esportazione dati da access in excel

text:
Se in un pulsante di comando chiedo l'esportazione dei dati in un file
excel:
    DoCmd.OutputTo acOutputQuery, "Statistiche", acFormatXLS,
"C:\\Statistiche.xls"
il file creato risulta in formato Excel 5.0/95 !
Come mai ?  E' un formato di default di access immodificabile ?
Come faccio ad esportarlo in formato excel 2000 ?
Ne ho bisogno perché a quel file è collegato un altro che
contiene tabelle pivot che leggono il file creato.
Il file delle tabelle è in Excel 2000 e, all'aggiornamento
delle tabelle, mi nega la lettura.
Grazie.
---- --- ---
      Gio


author: Nick

text:
"gio_sgj" <
se...@sese.se
> ha scritto nel messaggio news:2jnRb.9235$VS6....@tornado.fastwebnet.it...

usa il comando DoCmd.TransferSpreadsheet e vedi nell'help, ci sono tutti i formati di excel che
supporta la tua versione di access


title: casella di controllo

author: VedoTondo

text:
Avrei bisogno di usare un gruppo di caselle di controllo ma
l'autocomposizione guidata di "gruppo opzioni" non fà al caso mio,
in pratica avrei bisogno che ogni casella di controllo mi attivi/disattivi
alcuni oggetti.
Ho provato ad inserire quanto sotto ma non funziona.
------------
Private Sub CasellaControllo157_GotFocus()
MsgBox "attivo"
End Sub
Private Sub CasellaControllo157_LostFocus()
MsgBox "inattivo"
End Sub
---------------------
Che posso fare?
saluti Andrea


title: casella di controllo

text:
"VedoTondo" <
antispam...@alice.it
> ha scritto nel messaggio

Cercare di capire come funzionano gli eventi.
Attivato e disattivato non fanno al caso tuo (e non hanno niente a che
vedere col contenuto e/o valore della casella)
Devi usare after_update e fare un if sul valore del controllo.
Sib
--
http://www.gestionedati.com


title: casella di controllo

text:
"Sib" <sedav...@SPAMtiscali.it> ha scritto nel messaggio
news:440b4a87$0$36940$4faf...@reader3.news.tin.it...
> Cercare di capire come funzionano gli eventi.
> Attivato e disattivato non fanno al caso tuo (e non hanno niente a che
> vedere col contenuto e/o valore della casella)
> Devi usare after_update e fare un if sul valore del controllo.
Si ma il valore dell'oggetto dove lo trovo?
Quando č fleggato ha un valore e quando non č fleggato ha un'altro valore
oppure devono per forza lavorarare in coppia o piů?
Ti spiego il mio problema:
Vorrei che una volta fleggata la casella si attivassero una serie di caselle
di testo e qundo tolgo la fleggatura vengano disattivate, con una coppia di
caselle ci sono riuscito e probabilmente mi accontenterň di farlo cosě, ma
non č quello che volevo fare.
Saluti Andrea


title: casella di controllo

text:
Ho risolto da me, in pratica cambia lo stato da false a true, grazie
comunque.
Saluti Andrea


title: casella di controllo

text:
"VedoTondo" <
antispam...@alice.it
> ha scritto nel messaggio
> Ho risolto da me, in pratica cambia lo stato da false a true, grazie
> comunque.
Visto? ;-)
> Saluti Andrea
Ciao
Sib
--
http://www.gestionedati.com


title: casella di controllo

text:
"Sib" <sedav...@SPAMtiscali.it> ha scritto nel messaggio
news:440c929f$0$36925$4faf...@reader3.news.tin.it...
> Visto? ;-)
:-))))))))))))))
Ci vuol pasiensa ma un pezzettino alla volta ci arrivo ;-)
Saluti Andrea


title: Problema con funzione per la verifica del cofice fiscale: "Funzione non definita"

author: Dino

text:
Ciao a tutti ho questa problematica (forse banale) ma non riesco a
veniren fuori.
Ho recuperato sul nostro NG da un vecchio post una funzione per la
verifica del codice fiscale:
Private Function CalcolaK(pValue) As String
 Dim CalcolaK As String
Dim idx As Long, i As Long, X As Long, Somma As Long, sCF As String
 Dim Dispari As Variant
 sCF = IIf(Len(pValue) > 15, UCase(Left(pValue, 15)), pValue)
Dispari = Array(1, 0, 5, 7, 9, 13, 15, 17, 19, 21, 2, 4, 18, 20, 11,
3, 6, 8, 12, 14, 16, 10, 22, 25, 24, 23)
 For i = 1 To Len(sCF)
'qui aggiungi la Ucase altrimenti se gli passi caratteri minuscoli
ricevi un
errore
      X = Asc(Mid(UCase(pValue), i, 1))
     idx = IIf(X < 65, X - 48, X - 65)
     Somma = Somma + IIf(0 = i Mod 2, idx, Dispari(idx))
 Next
K = Chr(Somma Mod 26 + 65)
 CalcolaK = IIf(K = UCase(Right(pValue, 1)), True, False)
 End Function
 End Sub
Questa funzione l'ho inserita in un modulo che ho chiamato CF.
dopo (sempre da istruzioni del post) sono andato nel campo "Codice
fiscale" e nell'evento "prima di aggiornare" ho inserito queso codice:
Private Sub Codice_fiscale_BeforeUpdate(Cancel As Integer)
Select Case Nz(Len([Codice fiscale]))
                Case 16
                If Not CalcolaK([Codice fiscale]) Then
                MsgBox "Codice Fiscale Errato"
                Cancel = True
           Case 0
           Case Else
           MsgBox "Lunghezza del Codice Fiscale o P. Iva errata",
vbCritical, "Attenzione": Cancel = True
End Select
End Sub
quando vado ad inserire un qualsiasi codice fiscale mi da l'errore
"Funzione non definita".
non riesco a capire perche' la funzione e' in un modulo salvato
correttamente con un altro nome.
Ho inserito anche i rif DAO 3,6 (ma non c'entra niente) ma il ris non
cambia.
Puo' forse centrare il fatto che il camp abia degli spazi???(nel
codice pero' e' inserito nelle parentesi quadre).
Grazie in anticipo
Dino


author: sv

text:
Dino ha scritto:








> End Sub




> Grazie in anticipo
> Dino
La funzione deve essere pubblica per potersi richiamare da qualunque parte
dell'applicazione.
Pertanto:
Public Function CalcolaK(pValue) As String
.
.
.
End Function
Inoltre End Sub dopo End Function non � corretto. Fai un Debug e vedi cosa
accade.
--
sv
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:

> questo articolo e` stato inviato via web dal servizio gratuitohttp://
www.newsland.it/newssegnala
 gli abusi ad ab...@newsland.it- Nascondi testo citato
>
> - Mostra testo citato -
Ciao SV,finalmente sono riuscito ad effettuare qualche prova.In
effetti mettendo plublic mi legge la funzion e.Ho anche tolto "end
sub" che non avevo notato.Adesso ho un'altra problematica;quando
inserisco il codice fiscale mi da "errore di compilazione"...
"Dichiarazione doppia nella area di validita' corrente".Selezionando
la prima riga di codice del modulo.
Se ha iun attimo prova gentilmente la funzione (che ti ho rip sopra)
Grazie in anticipo
Dino


text:
Dino ha scritto:


> Grazie in anticipo
> Dino
La funzione CalcolaK ti restituisce una stringa pertanto
Dim CalcolaK As String è errato, lo devi togliere.
--
sv
--
questo articolo e` stato inviato via web dal servizio gratuito



text:

> gratuitohttp://
www.newsland.it/newssegnalagli
 abusi ad ab...@newsland.it-
> Nascondi testo citato
>
>
>
> > > - Mostra testo citato -
> > Ciao SV,finalmente sono riuscito ad effettuare qualche prova.In
> > effetti mettendo plublic mi legge la funzion e.Ho anche tolto "end
> > sub" che non avevo notato.Adesso ho un'altra problematica;quando
> > inserisco il codice fiscale mi da "errore di compilazione"...
> > "Dichiarazione doppia nella area di validita' corrente".Selezionando
> > la prima riga di codice del modulo.
> > Se ha iun attimo prova gentilmente la funzione (che ti ho rip sopra)
> > Grazie in anticipo
> > Dino
>
> La funzione CalcolaK ti restituisce una stringa pertanto
> Dim CalcolaK As String è errato, lo devi togliere.
>
> --
> sv
>
> --
>
> questo articolo e` stato inviato via web dal servizio gratuitohttp://
www.newsland.it/newssegnala
 gli abusi ad ab...@newsland.it- Nascondi testo citato
>
> - Mostra testo citato -
Il modulo sembra funzionare.Mi da errore l'istruzione Select nel
campo.Devo sistemenrla.
Volevo sapere se secondo te questo codice funziona bene per verificare
i codici fiscali (o e' meglio utilizzare i vari sw in rete).
Ci aggiornaiamo a dopo le prove.
Grazie ancora
Dino


text:
Dino ha scritto:
[cut]
> Il modulo sembra funzionare.Mi da errore l'istruzione Select nel
> campo.Devo sistemenrla.
> Volevo sapere se secondo te questo codice funziona bene per verificare
> i codici fiscali (o e' meglio utilizzare i vari sw in rete).
> Ci aggiornaiamo a dopo le prove.
> Grazie ancora
> Dino
Vedi qui:
http://lnx.accessgroup.it/community/howto/utility-codice-fiscale.html
--
sv
--
questo articolo e` stato inviato via web dal servizio gratuito



text:
On 23 Dic, 16:57,
salv...@accessgroup.it
 (sv) wrote:
> Dino ha scritto:
>
> [cut]
>
> > Il modulo sembra funzionare.Mi da errore l'istruzione Select nel
> > campo.Devo sistemenrla.
> > Volevo sapere se secondo te questo codice funziona bene per verificare
> > i codici fiscali (o e' meglio utilizzare i vari sw in rete).
> > Ci aggiornaiamo a dopo le prove.
> > Grazie ancora
> > Dino
>
> Vedi qui:
>
>
http://lnx.accessgroup.it/community/howto/utility-codice-fiscale.html
>
> --
> sv
>
> --
>
> questo articolo e` stato inviato via web dal servizio gratuitohttp://
www.newsland.it/newssegnala
 gli abusi ad
ab...@newsland.it
Come sempre seo preciso ed esauriente (troppi complimenti sotto Natale
ci vogliono).E' proprio quello che cercavo.anche se come dice l'autore
non c'e' mai la sicurezza estrema della correttezza.Tu come ha
irisolto il problema????ho trovato in rete dei softwere molto semplici
che continuano ad aggiornarsi via Web.
Concludo ringraziandoti ancora per la tua disponibilita' e ti auguro
Buone feste
Dino


text:
Dino ha scritto:
> On 23 Dic, 16:57,
salv...@accessgroup.it
 (sv) wrote:
> > Dino ha scritto:
> >
> > [cut]
> >
> > > Il modulo sembra funzionare.Mi da errore l'istruzione Select nel
> > > campo.Devo sistemenrla.
> > > Volevo sapere se secondo te questo codice funziona bene per verificare
> > > i codici fiscali (o e' meglio utilizzare i vari sw in rete).
> > > Ci aggiornaiamo a dopo le prove.
> > > Grazie ancora
> > > Dino
> >
> > Vedi qui:
> >
> >
http://lnx.accessgroup.it/community/howto/utility-codice-fiscale.html
> >
> > --
> > sv
> >
> > --
> >
> > questo articolo e` stato inviato via web dal servizio
gratuitohttp://
www.newsland.it/newssegnala
 gli abusi ad
ab...@newsland.it
> Come sempre seo preciso ed esauriente (troppi complimenti sotto Natale
> ci vogliono).E' proprio quello che cercavo.anche se come dice l'autore
Beh l'autore vedi che è il sottoscritto..
:-)
> non c'e' mai la sicurezza estrema della correttezza.Tu come ha
> irisolto il problema????ho trovato in rete dei softwere molto semplici
> che continuano ad aggiornarsi via Web.
> Concludo ringraziandoti ancora per la tua disponibilita' e ti auguro
> Buone feste
Auguri a te e famiglia.
> Dino
--
sv
--
questo articolo e` stato inviato via web dal servizio gratuito



title: creare controllo di ricerca

author: gestserv

text:
Ho provato il codice postato da Sib sul sito comune relativo al controllo di
ricerca, me ho dei problemi sull'invio in quanto mi passa al RK successivo
invece di cercarmi l'altra stringa. E' successo a qualcuno?
Inoltre volevo utilizzare la casella testo ricerca per la ricerca di
stringhe di campi diversi. Mi spiego:
ho 3 campi A, B e C e un campo ricerca.
Vorrei creare 3 pulsanti  RicercaA, RicercaB, RicercaC che su click generano
me.ricerca.visible=true
quindi a seconda del tasto premuto la stringa di ricerca viene effettuata su
A su B o su C. Il problemaè che non riesco ad associare il nome del
controllo da ricercare alla routine. In pratica dove Sib mette DITTA vorrei
a seconda del click mettere A, B, C.
Grazie


title: creare controllo di ricerca


title: creare controllo di ricerca

author: Sib

text:
"gestserv" <
gest...@uno.it
> ha scritto nel messaggio
news:95m0k4$7gl$1...@fe1.cs.interbusiness.it...
> Ho provato il codice postato da Sib sul sito comune relativo al controllo
di
> ricerca, me ho dei problemi sull'invio in quanto mi passa al RK successivo
> invece di cercarmi l'altra stringa. E' successo a qualcuno?
La funzione del tasto invio nel mio codice e' appunto quello di trovare il
record successivo, che intendi per "altra stringa"?
> Inoltre volevo utilizzare la casella testo ricerca per la ricerca di
> stringhe di campi diversi. Mi spiego:
> ho 3 campi A, B e C e un campo ricerca.
> Vorrei creare 3 pulsanti  RicercaA, RicercaB, RicercaC che su click
generano
> me.ricerca.visible=true
> quindi a seconda del tasto premuto la stringa di ricerca viene effettuata
su
> A su B o su C. Il problemaè che non riesco ad associare il nome del
> controllo da ricercare alla routine. In pratica dove Sib mette DITTA
vorrei
> a seconda del click mettere A, B, C.
> Grazie
Ti fai una combo dove selezioni il campo da usare e nel codice sostituisci
"DITTA" con Me!ComboCampo
Sib


title: creare controllo di ricerca

text:
> > Ho provato il codice postato da Sib sul sito comune relativo al
controllo
> di
> > ricerca, me ho dei problemi sull'invio in quanto mi passa al RK
successivo
> > invece di cercarmi l'altra stringa. E' successo a qualcuno?
>
> La funzione del tasto invio nel mio codice e' appunto quello di trovare il
> record successivo, che intendi per "altra stringa"?
>
mi sono in effettti spiegato male:
io ponsavo mi posizionasse sul Rk che conteneva la stringa inserita, quindi
battendo invio sul Rk successivo ma che contenesse anch'esso la stessa
stringa (una specie di filtro), invece mi posiziona sul Rk successivo anche
se non contiene quella stringa.
Ciao e complimenti per il codice
MAtteo


title: creare controllo di ricerca

text:
> > Inoltre volevo utilizzare la casella testo ricerca per la ricerca di
> > stringhe di campi diversi. Mi spiego:
> > ho 3 campi A, B e C e un campo ricerca.
> > Vorrei creare 3 pulsanti  RicercaA, RicercaB, RicercaC che su click
> generano
> > me.ricerca.visible=true
> > quindi a seconda del tasto premuto la stringa di ricerca viene
effettuata
> su
> > A su B o su C. Il problemaè che non riesco ad associare il nome del
> > controllo da ricercare alla routine. In pratica dove Sib mette DITTA
> vorrei
> > a seconda del click mettere A, B, C.
> > Grazie
>
> Ti fai una combo dove selezioni il campo da usare e nel codice sostituisci
> "DITTA" con Me!ComboCampo
>
Ho provato ma mi restituisce errore: The Microsoft Jet database engine does
not recognize "Me.RicercaCombo" as a valid field name or expressione.
Chi mi può aiutare?
Grazie


title: creare controllo di ricerca

author: sib

text:
gestserv <
gest...@uno.it
> wrote in message
95mfj5$lat$1...@fe1.cs.interbusiness.it...

Questo perche' hai inserito Me.RicercaCombo dentro la stringa SQL:
"Me.RicercaCombo='" & Me.Ricerca &"'"
Invece lo devi inserire come:
Me.RicercaCombo &"='" & Me.Ricerca & "'"
Sib


title: creare controllo di ricerca

text:
gestserv <
gest...@uno.it
> wrote in message
95mdqi$ge5$1...@fe1.cs.interbusiness.it...
cut
> io ponsavo mi posizionasse sul Rk che conteneva la stringa inserita,
quindi
> battendo invio sul Rk successivo ma che contenesse anch'esso la stessa
> stringa (una specie di filtro), invece mi posiziona sul Rk successivo
anche
> se non contiene quella stringa.
Strano, dovrebbe proprio fare come dici, hai controllato bene il codice?
> Ciao e complimenti per il codice
> MAtteo
Grazie, Ciao
Sib
--
------------------------------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access
------------------------------------------------------
La mia home (ancora non completa)
http://digilander.iol.it/syb
------------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente


title: creare controllo di ricerca

text:
cut
> Matteo, prima di tutto cerca di non mettere troppi invii nei tuoi messaggi
> che questo mi pareva vuoto.
> Facciamo prima se posti il codice che stai usando.
>
Option Compare Database
Dim ChiaveRicerca As String
Option Explicit
Private Sub Ricerca_Change()
   Dim rst As Recordset
   Dim strR As String
   strR = Me.ricerca.Text
   If Not IsNull(Me!ricerca.Text) Then
      Set rst = Me.RecordsetClone
(questi sono tutti i tentativi:)
      'rst.FindFirst Me!RicercaCombo & "=" & ChiaveRicerca & Me!ricerca.Text
& " * """
      'Dim cerca As Field
      'Dim cerca as String
      'cerca = DESC_MOV
      'rst.FindFirst "DITTA like """ & ChiaveRicerca & Me!ricerca.Text &
"*"""
      rst.FindFirst Me.RicercaCombo Like """ & ChiaveRicerca &
Me!Ricerca.Text & " * """"
(tieni presente che RicercaCombo é una casella combinata che mi elenca il
nome dei campi su cui voglio
fare la ricerca quindi DESC_MOV, IMP_MOV... e che ovviamente se sostituisco
il tuo DITTA con il nome
dei miei campi DESC_MOV funziona perfettamente)
      Me.Bookmark = rst.Bookmark
      rst.Close
      Set rst = Nothing
   End If
   Me!ricerca = strR
   Me!ricerca.SelStart = 255 'Len(Me!Ricerca.Text)
End Sub
Private Sub Ricerca_DblClick(Cancel As Integer)
   Select Case Me!ricerca.SpecialEffect
   Case 1
      Me!ricerca.SpecialEffect = 2
      ChiaveRicerca = "*"
      Me!ricerca.ControlTipText = "Ricerca rapida per parte del campo"
   Case 2
      Me!ricerca.SpecialEffect = 1
      ChiaveRicerca = ""
      Me!ricerca.ControlTipText = "Ricerca rapida da inizio campo"
   Case Else
      MsgBox "Viene reimpostato l'aspetto della casella", vbExclamation,
"Errore"
      Me!ricerca.SpecialEffect = 1
      ChiaveRicerca = ""
      Me!ricerca.ControlTipText = "Ricerca rapida da inizio campo"
   End Select
End Sub
Private Sub Ricerca_KeyPress(KeyAscii As Integer)
   Dim rst As Recordset
   Dim str As String
   If KeyAscii = 13 Then
      If Not IsNull(Me!ricerca.Text) Then
         Set rst = Me.RecordsetClone
         rst.FindNext "Me!RicercaCombo like """ & ChiaveRicerca &
Me!ricerca.Text & "*"""
         If rst.NoMatch Then rst.FindFirst "Me!RicercaCombo like """ &
ChiaveRicerca & Me!ricerca.Text & "*"""
         Me.Bookmark = rst.Bookmark
         rst.Close
         Set rst = Nothing
      End If
      Me!ricerca.SetFocus
      Me!ricerca.SelStart = 255
    KeyAscii = 0
   End If
End Sub
(con questa rendo visibile la stringa di ricerca solo se ho scelto qualcosa
da RicercaCombo)
Private Sub RicercaCombo_AfterUpdate()
Me.ricerca.Visible = True
End Sub
Grazie ancora
Matteo


title: creare controllo di ricerca

text:
"gestserv" <
gest...@uno.it
> ha scritto nel messaggio
news:95rrpp$rbi$1...@fe1.cs.interbusiness.it...
> cut
> > Matteo, prima di tutto cerca di non mettere troppi invii nei tuoi
messaggi
> > che questo mi pareva vuoto.
> > Facciamo prima se posti il codice che stai usando.
cut
> (questi sono tutti i tentativi:)
>
>       'rst.FindFirst Me!RicercaCombo & "=" & ChiaveRicerca &
Me!ricerca.Text & " * """
Questa non puo' funzionare perche' usi l'operatore "=" invece di "Like"
>       rst.FindFirst Me.RicercaCombo Like """ & ChiaveRicerca &
Me!Ricerca.Text & " * """"
Questa non puo' funzionare perche' il Like e' fuori dalle virgolette
>          rst.FindNext "Me!RicercaCombo like """ & ChiaveRicerca &
Me!ricerca.Text & "*"""
Questa non puo' funzionare perche' Me!RicercaCombo e' dentro le virgolette,
prova cosi':
rst.FindNext "[" & Me!RicercaCombo & "] Like '" & ChiaveRicerca &
Me!ricerca.Text & "*'"
ciao, Sib


title: creare controllo di ricerca

text:
CUT
> rst.FindNext "[" & Me!RicercaCombo & "] Like '" & ChiaveRicerca &
> Me!ricerca.Text & "*'"
funziona!!! Mi piacerebbe capire anche il perché... ma pazienza. Solo volevo
chiedere che differenza c'é tra usare un apice ' e due " (dopo like e dopo
*)
Grazie molte
Matteo


title: creare controllo di ricerca

text:
"gestserv" <
gest...@uno.it
> ha scritto nel messaggio
news:96118t$2jq$1...@fe1.cs.interbusiness.it...

Teoricamente non c'e' differenza, ma il singolo apice si presta meno a
creare ambiguita' nella stringa in questione.
Capire il discorso non e' difficilissimo, il  metodo FindNext (come tutti i
metodi) lo devi interpretare come una subroutine qualsiasi. in pratica gli
passi un parametro in formato stringa che deve contenere i criteri della
ricerca, es:
rst.FindNext "MioCampo = 'Davide'"
la stringa passata e':
MioCampo = 'Davide'
quindi verra' cercata la stringa Davide all'interno del campo MioCampo.
Se non so a priori in quale campo mi occorrera' eseguire la ricerca (come
nel tuo caso) devo passare il un parametro in formato stringa che contenga
il nome del campo:
rst.FindFirst "[" & VariabileStringa & "] = 'Davide'"
il risultato, immagginando che VariabileStringa sia Campo1, e':
rst.FindFirst "[Campo1] = 'Davide'"
Le parentesi quadre servono a evitare la generazione di errori nel caso in
cui VariabileStringa contenga spazi.
Discorso simile vale per il valore da cercare.
Sib


title: creare controllo di ricerca

text:
cut
> rst.FindFirst "[" & VariabileStringa & "] = 'Davide'"
> il risultato, immagginando che VariabileStringa sia Campo1, e':
> rst.FindFirst "[Campo1] = 'Davide'"
Tutto chiaro ora.
Grazie
Matteo


title: query con concatenamento di record correlati

author: Maurizio C

text:
Salve amici!
Ho un problemino che non riesco a risolvere da solo. C'e' qualcuno che puo'
aiutarmi per favore?
Due tabelle (A e B) correlate da relazione uno a molti.
Ho da creare una query (dynaset) che mostri in un campo la chiave primaria
di A e in un secondo campo, per TUTTI  i record correlati, gli elementi di
un determinato campo (in numerto variabile) concatenati tra di loro. Come si
puo' fare cio' con SQL SENZA ricorrere ad un modulo di VB?
Cioe' in pratica
Tabella B
Chiave    Campo
1            A$
1            B$
1            C$
2            D$
2            E$
Deve riportare
1             A$&B$&C$
2             D$&E$
Scusate le inevitabili improprieta' di linguaggio, ma sono alle prime armi.
grazie a tutti per l'attenzione
Maurizio


title: Formattare (x 000)

author: Raffaella

text:
Ciao ragazzi, avrei bisogno di formattare dei campi numerici in modo che
digitando ad esempio 15 il risultato sia poi 15.000.
Come si fa?
(Vorrei evitare il banale afterupdate me.campo x 1000)  :-)))
Grazie grazie
Raffa


title: Formattare (x 000)

text:
"Raffaella" <
senzaes...@yahoo.it
> ha scritto nel messaggio
news:ditZ9.4987$YL4....@tornado.fastwebnet.it...

Guarda che formattare significa presentare in una certa forma un dato senza
modificarlo.
Per esempio
15 formattato su tre cifre, cioè 015, sempre 15 rimane.
Ma 15 e 15.000 (quindiscimilaaaaa) sono mooolto diversi.
Ergo, tu fai proprio una modifica del dato
Ergo, l'afterupdate me.campo x 1000 tanto banale non è !!!
Antonio


title: Formattare (x 000)

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:3rtZ9.55012$YG2.1...@twister1.libero.it...

Ok ok Antonio ....ho detto una sciocchezza.
Ho usato il termine formattare perche' nei miei pochi neuroni davo per
scontato che "per ME " diventava una formattazione di comodo :-))
Grazie


title: Formattare (x 000)

text:
"Raffaella" <
senzaes...@yahoo.it
> ha scritto nel messaggio
news:HJtZ9.5014$YL4....@tornado.fastwebnet.it...
>
> "Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
> news:3rtZ9.55012$YG2.1...@twister1.libero.it...
> > "Raffaella" <
senzaes...@yahoo.it
> ha scritto nel messaggio
> > news:ditZ9.4987$YL4....@tornado.fastwebnet.it...
> > > Ciao ragazzi, avrei bisogno di formattare dei campi numerici in modo
che
> > > digitando ad esempio 15 il risultato sia poi 15.000.
> > > Come si fa?
> > > (Vorrei evitare il banale afterupdate me.campo x 1000)  :-)))
> >
> > Guarda che formattare significa presentare in una certa forma un dato
> senza
> > modificarlo.
> > Per esempio
> > 15 formattato su tre cifre, cioč 015, sempre 15 rimane.
> > Ma 15 e 15.000 (quindiscimilaaaaa) sono mooolto diversi.
> > Ergo, tu fai proprio una modifica del dato
> > Ergo, l'afterupdate me.campo x 1000 tanto banale non č !!!
> >
> > Antonio
> >
> Ok ok Antonio ....ho detto una sciocchezza.
> Ho usato il termine formattare perche' nei miei pochi neuroni davo per
> scontato che "per ME " diventava una formattazione di comodo :-))
Sě, maaaa..
hai capito che non era solo una questione di terminologia ma soprattutto
della differenza di operazione effettuata?
Antonio


title: Formattare (x 000)

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:IjvZ9.55412$YG2.1...@twister1.libero.it...

Siiiiiii....l'ho capito.
Formattare , cioe' dare un format ad un dato gia' esistente...mentre in
realta' io volevo che il campo facesse una trasformazioine di un dato
parziale.
Capito perfettamente :-)
Ciao e grazie
Raffa


title: Recuperare un certo numero di record

author: Maurizio Coffinardi

text:
E' possibile recuperare tramite query solamente un certo numero di record?
Ad esempio se avessi una tebella con 100 record e volessi fare una query che
mi da solo i  record dall'undicesimo al ventesimo e un'altra che mi recupera
solo quelli dal 21 al 30 e cosi via...
Grazie
Maurizio


title: Recuperare un certo numero di record

author: Nemo

text:
In article <02dp6.104928$
Y93.2...@news.infostrada.it
>,
coffi...@secoges.com
 says...

sii piu' specifico....
e' possibile farlo, ma la tabella e' ordinata sempre allo stesso modo ?
In base a che campo esattamente devi fare la selezione ?


title: Recuperare un certo numero di record

text:
> > E' possibile recuperare tramite query solamente un certo numero di
record?
> > Ad esempio se avessi una tebella con 100 record e volessi fare una query
che
> > mi da solo i  record dall'undicesimo al ventesimo e un'altra che mi
recupera
> > solo quelli dal 21 al 30 e cosi via...
>
> sii piu' specifico....
> e' possibile farlo, ma la tabella e' ordinata sempre allo stesso modo ?
> In base a che campo esattamente devi fare la selezione ?
Per quel che riguarda l'ordinamento non c'è problema perchè sarà sempre lo
stesso ma il problema è che la selezione non deve dipendere da un certo
valore di campo ma proprio dal numero di riga. Inoltre questo lavoro lo stò
svolgendo in Visual Basic e stò creando una DLL che restituisca solo i
record che stanno in una certa posizione (es. dal 10 al 20) in base ad una
query di selezione passata quindi non posso sapere il nome del campo su cui
fare la selezione.
Ad esempio:
Passo alla DLL 3 parametri:
1) "SELECT * FROM Anagrafiche ORDER BY Cognome"
2) 11
3) 20
Questo indica alla DLL di restituire un recordset contenente i record dal 11
al 20 in base alla SELECT passata.
se poi passo questi nuovo parametri
1) "SELECT * FROM Articoli ORDER BY Descrizione"
2) 51
3) 60
Questo indicherà alla DLL di restituire un recordset contenente i record dal
51 al 60 in base alla SELECT passata.
Il lavoro che fa la DLL non è altro che eseguire la query e restituire i
record nel range indicato.
Io vorrei (se possibile) fare in modo che la DLL esegua una query che
restituisca automaticamente il numero di record richiesti.
Grazie mille
Maurizio


title: Recuperare un certo numero di record

author: Nicola Ardito

text:
Maurizio Coffinardi ha scritto nel messaggio ...

Premetto che non conosco VB abbastanza ed in particolare non so se con ADO
queste cose siano realizzabili in modo più semplice.
Ho riflettuto un po' sulla tua problematica ed ho tirato giù  questo codice
Access con DAO.
Function rstIntervallo(strSql, nMin, nMax, bFinale As String) As Recordset
Dim i
Set rstIntervallo = DBEngine(0)(0).OpenRecordset(strSql)
If Not rstIntervallo.EOF Then
    rstIntervallo.MoveLast
    rstIntervallo.AbsolutePosition = nMax
    bFinale = rstIntervallo.Bookmark
    rstIntervallo.AbsolutePosition = nMin
End If
End Function
Sub prova()
Dim rst As Recordset, b As String, b1 As String
Set rst = rstIntervallo("Select * from TABELLA1", 10, 20, b)
Do While Not rst.EOF
        b1 = rst.Bookmark
        If b = b1 Then MsgBox "trovato"
        Debug.Print rst(0)
        rst.MoveNext
Loop
rst.Close
Set rst = Nothing
End Sub
E' chiaro che non risponde alla tua esigenza in modo completo perchè
pressupone di controllare nel codice chiamante il bookmark...
Resta il fatto che un oggetto recordset  rappresenta i record di una tabella
base o i record che risultano dall'esecuzione di una query (almeno così
recita l'help di Access).
IMHO le soluzioni alternative (che non ho sperimentato) sono :
- costruire nella dll una tabella tmp e popolarla dai record che ti servono
(semplice)
- costruire una nuova classe stile Recordset per il quale ridefinire la
proprietà EOF  (questo non so se sia possibile farlo comunque ti  riporto un
vecchio mex di Michele Amato che mi sembra faccia una cosa del genere in
Access)
----------
Inizio mex Michele Amato
Io faccio in questo modo:
definisco una classe per il recordset:
nuovo modulo di classe: (esempio clsRetribuzione)
'Inizio Classe clsRetribuzione
Option Compare Database
Option Explicit
Dim mvDbs As Database
Public Function OpenRecordSet(Optional rsWhere As String = vbNullString) As
RecordSet
Dim lsSql As String
On Local Error Resume Next
  lsSql = "SELECT * from RETRIBUZ"
  If rsWhere <> vbNullString Then
    lsSql = lsSql & " where " & rsWhere
  End If
  Set OpenRecordSet = mvDbs.OpenRecordSet(lsSql)
  If Err.Number <> 0 Then
    On Error GoTo 0
    If Errors.Count > 0 Then
      Err.Raise 12321, "clsRetribuzione.OpenRecordSet", "Errore DAO: " &
Errors(0).Number & vbNewLine & "Descrizione: " & Errors(0).Description &
vbNewLine & "SQL: " & lsSql
    Else
      Err.Raise 12321, "clsRetribuzione.OpenRecordSet", "Errore DAO: " &
Err.Number & vbNewLine & "Descrizione: " & Err.Description & vbNewLine &
"SQL: " & lsSql
    End If
  End If
End Function
Private Sub Class_Initialize()
  Set mvDbs = CurrentDb
End Sub
Private Sub Class_Terminate()
  mvDbs.Close
  Set mvDbs = Nothing
End Sub
'Fine Classe clsRetribuzione
Poi nel modulo di classe associato al report definisco una variabile di
modulo di tipo clsRetribuzione
Dim moRetribuzione As New clsRetribuzione
(a livello modulo)
e nella routine evento Report_Open...
Private Sub Report_Open(Cancel As Integer)
  Me.RecordSource =
moRetribuzione.OpenRecordSet.Name
End Sub
Fine mex Michele Amato
---------------------------------
Non so se l'ho fatta più complicata del necessario... :-)
Ciao Nicola
email: metti inwind al posto  di NOSPAM
Le richieste che arrivano
in privato  vengono cestinate.
Sito Comune
http://www.sitocomune.com
----------------------------------


title: OT: ricerca di un Docente per corsi su applicativi MS Office

author: Guido dal Faro

text:
Scusate l'OT ma magari può interessare a qualcuno di voi.
La nostra società, che opera, a Roma e Milano,  nel settore dei
servizi specialistici di integrazione di sistemi, sviluppo di
applicazioni, fornitura di consulenza e servizi professionali, quali
formazione e help desk, sta cercando per la sede di Roma una persona
in grado di tenere corsi,  presso la nostra sede e/o presso i nostri
clienti, per utenti MS Office sia a livello base sia a livello
avanzato.
Chi fosse interessato può contattarci al seguente indirizzo email:
in...@lan2lan.it
Sarà gradito l'invio di un curriculum vitae.
Saluti.
---------------
Guido
light...@flashnet.it


text:
scusate l'invio multiplo, ma Agent mi segnalava un errore nell'invio.
---------------
Guido
light...@flashnet.it


title: Protezione livello utente Access 2007

text:
Salve a TUTTI,
ho provato a leggere un po' di cose, ma non ho ancora capito come affrontare
la situazione.
Ho letto che Access 2007 non supporta la protezione a livello utente, ho
letto dei consigli come aprire i db senza convertirli, ma non ci riesco.
Descrivo la mia situazione: con Access 2003 tramite la procedura guidata ho
creato dei bd protetti, cambiando le informazioni di default del file mdw.
Per mandare in esecuzione i db usavo due strade:
1° - con un file .bat scritto in questo modo: "C:\Programmi\Microsoft
Office\OFFICE11\MSACCESS.EXE" "E:\Path...\nome_db.mdb" /WRKGRP
"C:\Path...\Personal_Secure.mdw"
Oppure collegavo il mio nuovo file .mdw ad Acces 2003, pagando lo scotto che
anche per aprire i db non protetti mi si presentava la login.
Chiedo: sapete indicarmi un modo per utilizzare questi db esistenti
verisione 2003 con Access versione 2007?
Per quelli nuovi che si creano con la versione 2007 qual'è la strategia da
usare per ottenere i risultati che si ottenevano con la versione 2003?
Grazie a TUTTI
Fabio


title: Protezione livello utente Access 2007

author: Cinzia

text:
"Z.Fabio" <
fabio...@alice.it
> ha scritto nel messaggio
news:48fa3006$0$18157$4faf...@reader3.news.tin.it...

Ciao Fabio,
Access 2007 continua a supportare la protezione a livello utente per
database in formato MDB, per cui la tua soluzione 1 dovrebbe
continuare a funzionare.
Anche la soluzione 2 funziona,  solo che non esiste più da menu il
comando Strumenti/Protezione/Amministratore Gruppi di lavoro, ma puoi
sempre attivarlo seguendo i consigli di questa scheda tecnica
http://support.microsoft.com/kb/918583/it
--
Cinzia [Office Access MVP]
_______________________

www.riolab.org
http://accessdaziacin.live.spaces.com
---------------------------------------->
>
>


title: Protezione livello utente Access 2007

text:
> Ciao Fabio,
> Access 2007 continua a supportare la protezione a livello utente per
> database in formato MDB, per cui la tua soluzione 1 dovrebbe
> continuare a funzionare.
> Anche la soluzione 2 funziona,  solo che non esiste più da menu il
> comando Strumenti/Protezione/Amministratore Gruppi di lavoro, ma puoi
> sempre attivarlo seguendo i consigli di questa scheda tecnica
>
http://support.microsoft.com/kb/918583/it
>
>
> --
> Cinzia [Office Access MVP]
> _______________________
>
www.riolab.org
>
http://accessdaziacin.live.spaces.com
> ---------------------------------------->
Cinzia, Grazie di avere risposto.
Io provato ad usare la mia soluzione 1, ma quello che fa Access 2007 è
aprire il db protetto con RunTime e poi comunque non funzionare. (non
capisco perchè)
Per la seconda soluzione cercherò di capire bene, scusa queste imprecisioni,
ma a casa uso il 2003 al lavoro il 2007, ma con le menti bacate delle
multinazionali, non mi fanno raggiungere il NG: ergo tutto diventa ancora
più difficile.
Grazie ancora,
Fabio


title: Protezione livello utente Access 2007

text:
"Z.Fabio" <
fabio...@alice.it
> ha scritto nel messaggio
news:48fe20b6$0$1092$4faf...@reader1.news.tin.it...
>> Ciao Fabio,
>> Access 2007 continua a supportare la protezione a livello utente
>> per
>> database in formato MDB, per cui la tua soluzione 1 dovrebbe
>> continuare a funzionare.
>> Anche la soluzione 2 funziona,  solo che non esiste più da menu il
>> comando Strumenti/Protezione/Amministratore Gruppi di lavoro, ma
>> puoi
>> sempre attivarlo seguendo i consigli di questa scheda tecnica
>>
http://support.microsoft.com/kb/918583/it
>>
>
> Cinzia, Grazie di avere risposto.
> Io provato ad usare la mia soluzione 1, ma quello che fa Access 2007
> è
> aprire il db protetto con RunTime e poi comunque non funzionare.
> (non
> capisco perchè)
> Per la seconda soluzione cercherò di capire bene, scusa queste
> imprecisioni,
> ma a casa uso il 2003 al lavoro il 2007, ma con le menti bacate
> delle
> multinazionali, non mi fanno raggiungere il NG: ergo tutto diventa
> ancora
> più difficile.
> Grazie ancora,
> Fabio
>
Ciao Fabio,
forse da questo link di google gruppi riesci ad accedere ai ng
nononstante le policy restrittive delle multinazionali,
http://groups.google.it/group/it.comp.appl.access/browse_frm/thread/c65e8c1f16cda28f?hl=it#
La prima soluzione potrebbe non funzionare  per un problema di
sicurezza, hai aggiunto il percorso dove risiede il db ai "percorsi
attendibili" in Centro Sicurezza? e hai abilitato l'esecuzione delle
macro nell'avviso iniziale?



title: Protezione livello utente Access 2007

text:
> Ciao Fabio,
> forse da questo link di google gruppi riesci ad accedere ai ng
> nononstante le policy restrittive delle multinazionali,
>
http://groups.google.it/group/it.comp.appl.access/browse_frm/thread/c65e8c1f
16cda28f?hl=it#
> La prima soluzione potrebbe non funzionare  per un problema di
> sicurezza, hai aggiunto il percorso dove risiede il db ai "percorsi
> attendibili" in Centro Sicurezza? e hai abilitato l'esecuzione delle
> macro nell'avviso iniziale?
>
>
> --
> Cinzia [Office Access MVP]
> _______________________
>
www.riolab.org
>
http://accessdaziacin.live.spaces.com
> ----------------------------------------
Ciao Cinzia,
Rispondo da casa. Sono quasi sicuro di avere fatto le operazioni che mi
suggerisci, domani cmq controllo nuovamente. Proverò a raggiungere il NG dal
link che mi hai passato, ma IT è parecchio tosta da quelle parti.
Grazie ancora, eventualmente, scusandomi con il NG, dopo aver tentato da
solo tutte le strade proverò a ripostare dando tutte le informazioni che nel
frattempo riesco a capire.
Grazie ancora
Fabio


title: [2007] errore in modulo di gestione (?)

author: Ammammata

text:
PC con windows XP sp3
Access, come scritto in oggetto, 2007 aggiornato

Oggi, di punto in bianco, quando provo ad aprire il file MDB, Access si
ferma con questo errore:

Il modulo di gestione di database di Microsoft Office Access ha interrotto
l'elaborazione. Un altro utente sta tentando contemporaneamente di
modificare gli stessi dati.

e torna al "menu" iniziale di access con gli esempi al centro e i file
recenti sulla destra e, ovviamente, nessun db aperto

lo stesso file MDB eseguito su altri pc, con w7 e w10, con access 2010 e
2013, non mi da problemi.

ho provato anche a scollegare il pc dalla rete, non si sa mai, ma niente da
fare.

cosa posso provare?

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


title: [2007] errore in modulo di gestione (?)

text:
Il giorno Thu 10 Nov 2016 04:55:31p, *Ammammata* inviava su
it.comp.appl.access il messaggio
news:XnsA6BCAC2D61211am...@148.251.67.112
. Vediamo cosa
scrisse:

> lo stesso file MDB eseguito su altri pc, con w7 e w10, con access 2010 e
> 2013, non mi da problemi.
>
>

dimenticavo:

la procedura è stand-alone, il db non è condiviso con altri utenti, è un
passaggio intermedio di una serie di calcoli, si limita a prendere tutti i
file excel di una cartella e a convertirli in tabelle access (all'interno
del db stesso)

il pc è monoutente

le altre installazioni (funzionanti su altri pc) prendono gli stessi file
excel (dal server) e li elaborano senza problemi

il programma, dovrebbe fermarsi a una maschera con il pulsante di conferma
dell'operazione, non effettua nessun tipo di operazione sui file/tabelle
prima di cliccare OK

cose che mi vengono in mente:
- sostituire la versione 2007 con il runtime 2010 o 2013
- cancellare tutte le tabelle del file access prima di reimportarle dai
file excel (ma non mi convince)
