title: Macro + codice

author: MA

text:

Sostituisci la macro con una funzione
Function fctTuaFiunzione()
docmd.movesize 0,0
If DCount("*", "Query_001") = 0 Then
     MsgBox "Non ci sono dati da valutare"
     Cancel = True
End If
end function
--
--
Massimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


title: Importazione dati.

author: Nico

text:
Ringrazio colui che vorrà darmi una mano.
Da un po' di giorni non ho più la possibilità di importare in access file
.xls / txt. Gli unici proposti sono database odbc / access / paradox.
Ho già disinstallato e reinstallato sia Excel che Access, ma nulla di fatto.
Come posso risolvere?
--------------------------------
Inviato via
http://usenet.libero.it


title: Importazione dati.

author: yQy

text:
On Wed, 09 Jul 2003 13:12:31 GMT,
dtr...@inwind.it
 (Nico) wrote:
>Ringrazio colui che vorrà darmi una mano.
>Da un po' di giorni non ho più la possibilità di importare in access file
>.xls / txt. Gli unici proposti sono database odbc / access / paradox.
>Ho già disinstallato e reinstallato sia Excel che Access, ma nulla di fatto.
>Come posso risolvere?
Che versioen hai di office (access,excel)?
Hai installato i Service Pack del tuo office?
Office 97 ha 3 Service Pack
Office(merd)2000 ha 2 Service Pack
Office XP ha 1 Service Pack...
cercali (sul sito microsoft?...)
ed installali!


title: Numerazione report in base a gruppo

author: max

text:
Tanati auguri di fine anno e di un buon inizio a tutti....
Ho la necesit� in un report di access 2003 di cambiare il numero di pagina
in base al valore di un gruppo..... faccio un esempio...
Query 1
IDcliente            numerico
N.Fattura               "
DataFattura        data
Ecc.
Ecc.
Gestisco la fatturazione differita delle bolle emesse, pertanto a fine mese
stampo le fatture di tutti i clienti relative alle bolle..
Vorrei che il numero di pagina e delle pagine totali cambiasse in base al
numero di fattura...
Esempio
fattura n. 10
pagina 1 di 3
fattura 11
pagina 1 di 1
ecc. ecc
Auguri a tutti


title: Numerazione report in base a gruppo

author: CIDI

text:
"max" <
mas...@inwind.it
> ha scritto nel messaggio
news:hhhvnb$41a$1...@speranza.aioe.org...

vedi:
http://support.microsoft.com/kb/131937/it
> Auguri a tutti
auguri anche a te
ciao
Daniele


title: Somma campi calcolati di una maschera

author: Teamnetwork

text:
ho 2 campi calcolati di una maschera
vorrei utilizzare il risultato di questi 2 campi e sommarli
Sono 2 caselle di testo denominate Testo15 e Testo19
ma con =SOMMA([Testo15]+[Testo19]) non va ... mi riporta l'errore
#NOME?


title: Somma campi calcolati di una maschera

author: Neo

text:
"Teamnetwork" <
teamn...@tin.it
> ha scritto nel messaggio
news:2c5lnv0gdktcjf0oj...@4ax.com...

me.testosomma = me.testo15 + me.testo19


title: Somma campi calcolati di una maschera

text:
"Teamnetwork" <
teamn...@tin.it
> ha scritto nel messaggio
news:2c5lnv0gdktcjf0oj...@4ax.com...

prova a togliere "somma"
MAssimiliano


title: Somma campi calcolati di una maschera

text:
On Wed, 1 Oct 2003 11:03:50 +0200, "MA" <
keiko...@libero.it
> wrote:
>prova a togliere "somma"
>MAssimiliano
>
ho provato un po' di tutto e non funziona
qualche altra idea ?


title: Somma campi calcolati di una maschera

text:
On Wed, 01 Oct 2003 09:00:58 GMT, "Neo" <
neo...@genie.it
> wrote:
>
>me.testosomma = me.testo15 + me.testo19
>
non funziona


title: Somma campi calcolati di una maschera

text:
"Teamnetwork" <
teamn...@tin.it
> ha scritto nel messaggio
news:087lnv0s51pukrfbi...@4ax.com...
> On Wed, 01 Oct 2003 09:00:58 GMT, "Neo" <
neo...@genie.it
> wrote:
>
> >
> >me.testosomma = me.testo15 + me.testo19
> >
>
>
> non funziona
inserisci quello che ti ho scritto io in un evento della maschera (currento,
oopure afterupdate dei campi, ecc)


title: Somma campi calcolati di una maschera

text:
On Wed, 01 Oct 2003 09:29:54 GMT, "Neo" <
neo...@genie.it
> wrote:
>inserisci quello che ti ho scritto io in un evento della maschera (currento,
>oopure afterupdate dei campi, ecc)
mi da' un errore relativo ad un nome inesistente di una macro.
Forse mi sono spiegato male
ho 2 campi calcolati con questa formula (Testo15 e Testo19)
=DLookUp("WELCOME_inserite + WELCOME_presenti";"movimenti";"id=" &
DMax("id";"movimenti";"Distributore=""Piazza Domenicani"" AND ID<" &
DMax("id";"movimenti";"Distributore=""Piazza
Domenicani""")))-DLookUp("WELCOME_presenti";"movimenti";"id=" &
DMax("id";"movimenti";"Distributore=""Piazza Domenicani"""))
ovviamente mi restituisce un valore , un numero
avendo 2 o + campi volevo sommare il nome della casella dove c'e' la
formula
e quindi volevo , se possibile creare una casella di testo e usare un
=SOMMA o qualcosa del genere


title: Somma campi calcolati di una maschera

text:
"Teamnetwork" <
teamn...@tin.it
> ha scritto nel messaggio
news:qp7lnv8to5akj4lum...@4ax.com...

la somma è certamente possibile:
crei una casella non associata che chiami Sommatot (ad esempio)
e un pulsante che onclick inserisci:
sommatot = testo15 + testo19
dovrebbe funzionare!
ps i campi devono essere nella stessa maschera se sono in sottomaschere o
altro allora bisogna dargli il percorso completo...
se non va che da dati sbagliati inserisci
sommatot = testo15.value + testo19.value
oppure
sommatot = test15.text + test19.text
facci sapere..


title: Somma campi calcolati di una maschera

text:
On Wed, 01 Oct 2003 09:52:52 GMT, "Neo" <
neo...@genie.it
> wrote:
>dovrebbe funzionare!
>ps i campi devono essere nella stessa maschera se sono in sottomaschere o
>altro allora bisogna dargli il percorso completo...
>se non va che da dati sbagliati inserisci
>
>
>sommatot = testo15.value + testo19.value
>
>oppure
>
>sommatot = test15.text + test19.text
>
>facci sapere..
nulla da fare , mi da' un errore relativo ad una macro non esistente
e ho provato un bel po' di combinazioni
ma come mai non e' possibile fare un [testoX]+[testoY]
..


title: Somma campi calcolati di una maschera

author: giesse

text:
Il Wed, 01 Oct 2003 10:52:59 +0200, Teamnetwork ha scritto:
> ho 2 campi calcolati di una maschera
fossi in te io non utilizzerei campi calcolati in una maschera. Li
calcolerei in una query. Idem per il terzo campo.
Lo faccio perché se c'è una formula un po' complessa ne risulta un
ritardo nella visualizzazione del valore calcolato rispetto a quello dei
campi associati. Inoltre se il valore ti dovesse servire in un altra
maschera o in un report non c'è bisogno di reimpostare la l'origine del
controllo.
--
Saluti
gs - il vicino di homer è ned.flanders
Mai dire: "Non so come farlo".
Meglio dire: "Non ci ho mai provato".
		-- Proverbio giapponese


title: Somma campi calcolati di una maschera

text:
"Teamnetwork" <
mal...@unseen.org
> ha scritto nel messaggio
news:mbdlnvoemv7aprcfg...@4ax.com...

non capisco perchè ti da errore di macro se macro non ne usiamo...


title: Somma campi calcolati di una maschera

text:
On Wed, 01 Oct 2003 13:32:16 +0200, "giesse"
<
il.vicino...@inwind.it
> wrote:
>Il Wed, 01 Oct 2003 10:52:59 +0200, Teamnetwork ha scritto:
>
>> ho 2 campi calcolati di una maschera
>
>fossi in te io non utilizzerei campi calcolati in una maschera. Li
>calcolerei in una query. Idem per il terzo campo.
>
>Lo faccio perché se c'è una formula un po' complessa ne risulta un
>ritardo nella visualizzazione del valore calcolato rispetto a quello dei
>campi associati. Inoltre se il valore ti dovesse servire in un altra
>maschera o in un report non c'è bisogno di reimpostare la l'origine del
>controllo.
ho proprio necessita' di farlo sulla maschera


title: Somma campi calcolati di una maschera

text:
Il Wed, 01 Oct 2003 11:37:14 +0000, Neo ha scritto:
> non capisco perchè ti da errore di macro se macro non ne usiamo...
perché ha scritto sommatot = testo15.value + testo19.value nell'evento...
selezionare la casella
finestra proprietà -> origine controllo
= [testo15]+[testo19]
Le parentesi quadre sono un'optional.
PS. Per fare espressioni giuste usa l'apposito generatore...
--
Saluti
gs - il vicino di homer è ned.flanders
"Scusate lo sfogo", come disse il brufolo.
		-- Da it.hobby.umorismo


title: Somma campi calcolati di una maschera

text:
On Wed, 01 Oct 2003 13:59:38 +0200, "giesse"
<
il.vicino...@inwind.it
> wrote:
>
>selezionare la casella
>
>finestra proprietà -> origine controllo
>
>= [testo15]+[testo19]
>
funziona eggreggiamente
che tu ci creda , ho provato almeno mille volte la generazione
dell'evento selezionando la casella poi il segno + e poi l'altra
casella ma chissa come mai non andava ed era cosi "semplice"
grazie


title: riallegare tabelle da codice

author: Michele Giordano

text:
Lavoro con due database collegati (FrontEnd + Dati allegati al
FrontEnd).
Il FrontEnd, perň, č uno, mentre i Dati sono molti, e devo potermi
collegare a piacere ora a questi ora a quelli.
Sono riuscito a collegare e scollegare le tabelle dei Dati con VBA, ma
devo inserire in una casella di testo il nome del database di Dati
prescelto.
Ho cercato il modo per aprire da VBA la finestra di navigazione di
Windows per selezionare in maniera piů semplice del database di Dati a
cui collegarmi, ma non ci sono riuscito.
Mi mi sembra impossibile che non si possa fare, ma io non ci sono
riuscito.
Qualcusa mi puň aiutare?
Grazie comunque per l'attenzione.
Michele Giordano


title: riallegare tabelle da codice

author: Roberto dal portatile

text:
"Michele Giordano" <
michele....@fastwebnet.it
> ha scritto nel messaggio
news:3C0DEE88...@fastwebnet.it...

Se non sbaglio, sul Sito Comune (link qui sotto) ci sono un paio di FAQ che
fanno al caso tuo.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Report: ordinamento in base alla seconda colonna di una casella combinata

author: Giuseppe

text:
in un report ho una campo ID che viene decodificato tramite una casella
combinata e viene correttamente visualizzata la Descrizione.
Ora io vorrei utilizzare questo campo, o meglio la relativa decodifica:
Descrizione come criterio di ordinamento.
Senza toccare la query origine dati del report, s'è modo di ottenere lo
scopo?
--
----------------
saluti
Giuseppe


author: Roberto da casa

text:
"Giuseppe" <
gcondoLev...@libero.it
> ha scritto nel messaggio
news:c43k2j$2f8rok$1...@ID-213020.news.uni-berlin.de...

Se la tabella che contiene i dati si chiama Tabella1 ed ha una struttura
simile a questa:
ID                  Contatore e chiave primaria
Descrizione    Testo
Apri la struttura del report, dal menu Visualizza seleziona il comando
Ordinamento e ragguppamento; nella finestra di dialogo che si apre, nella
colonna chiamata Campo o espressione di una riga vuota digita;
=DLookUp("Descrizione";"Tabella1";"ID= " & [ID])
e nella colonna accanto seleziona il criterio di ordinamento.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:k8e9c.92686$Kc3.3...@twister2.libero.it...
>
> "Giuseppe" <
gcondoLev...@libero.it
> ha scritto nel messaggio
> news:c43k2j$2f8rok$1...@ID-213020.news.uni-berlin.de...
> > in un report ho una campo ID che viene decodificato tramite una casella
> > combinata e viene correttamente visualizzata la Descrizione.
> > Ora io vorrei utilizzare questo campo, o meglio la relativa decodifica:
> > Descrizione come criterio di ordinamento.
> > Senza toccare la query origine dati del report, s'č modo di ottenere lo
> > scopo?
> >
> > --
> > ----------------
> > saluti
> > Giuseppe
>
> Se la tabella che contiene i dati si chiama Tabella1 ed ha una struttura
> simile a questa:
>
> ID                  Contatore e chiave primaria
> Descrizione    Testo
>
> Apri la struttura del report, dal menu Visualizza seleziona il comando
> Ordinamento e ragguppamento; nella finestra di dialogo che si apre, nella
> colonna chiamata Campo o espressione di una riga vuota digita;
>
> =DLookUp("Descrizione";"Tabella1";"ID= " & [ID])
>
> e nella colonna accanto seleziona il criterio di ordinamento.
>
Magico Roberto ...
... mitico Access !
;-)
Funziona ... anche se a scapito di un gran lavorio di CPU !
é chiaro che *normalmente* conviene avere nella query di origine dati tutti
i campi che servono per non ricorrere a tale elegante ma costosa soluzione.
Questo anche a scapito di utilizzare anche piů query in cascata per
risolvere situazioni aggrovigliate del tipo "Il campo bla bla č presente in
piů di una tabella...join ambiguo...si consiglia di semplificare con piů
query ... " ecc
grazie ancora per le cose che mi fai imparare di Access.
--
----------------
saluti
Giuseppe


text:
"Giuseppe" <
gcondoLev...@libero.it
> ha scritto nel messaggio
news:c4458u$2bb4q8$1...@ID-213020.news.uni-berlin.de...

Ti ho dato quella soluzione, che per certi aspetti anche io non ritengo la
migliore, ma tu hai messo per pregiudiziale che non volevi modificare la
query che č origine record del report.
Non capisco perché non vuoi farlo; comunque non dovresti aggiungere un'altra
query in cascata, basterebbe aggiungere a quella quella esistente il join
con Tabella1, prelevare da essa Descrizione ed ordinare per tale campo.



text:
> > Funziona ... anche se a scapito di un gran lavorio di CPU !
> > é chiaro che *normalmente* conviene avere nella query di origine dati
> tutti
> > i campi che servono per non ricorrere a tale elegante ma costosa
> soluzione.
> > Questo anche a scapito di utilizzare anche più query in cascata per
> > risolvere situazioni aggrovigliate del tipo "Il campo bla bla è presente
> in
> > più di una tabella...join ambiguo...si consiglia di semplificare con più
> > query ... " ecc
> >
> > grazie ancora per le cose che mi fai imparare di Access.
> > --
> > ----------------
> > saluti
> > Giuseppe
>
> Ti ho dato quella soluzione, che per certi aspetti anche io non ritengo la
> migliore, ma tu hai messo per pregiudiziale che non volevi modificare la
> query che è origine record del report.
> Non capisco perché non vuoi farlo; comunque non dovresti aggiungere
un'altra
> query in cascata, basterebbe aggiungere a quella quella esistente il join
> con Tabella1, prelevare da essa Descrizione ed ordinare per tale campo.
>
> --
> Roberto
L'ho già fatto.
In prima battuta mi ero scontrato con un errore di access per un join
ambiguo, poi sono riuscito a "sbrogliarlo" ed adesso va che è una
meraviglia.
Comunque rimane invariato tutto il mio apprezzamento per la tua soluzione
brillante.
;-)


title: proposta

author: prov

text:
Ciao, mi chiamo Davide
Quello che vi sto per raccontare è veramente eccezionale:
NON E' UNA TRUFFA : ESISTE LA POSSIBILITA' DI ARRICHIRTI CON UN
SEMPLICISSIMO SCAMBIO DI MESSAGGI VIA RETE !!!
Un metodo divertente e onesto per fare un sacco di soldi...
RASMUS LINO è un ragazzo danese che ha incassato in 5 mesi la bella cifra
di £ 64.700.000.000 !!!!!!!!!!!!!!!!!!!
Una notizia del genere non passa inosservata !!!!!! ....... se vuoi sapere
come ha fatto questo simpatico giovanotto ad
arricchirsi così in fretta eccoti la spiegazione , ma prima di tutto
sappi :  NON mi iteressa stare a convincerti sulla bontà o
meno di questo metodo. IO APPENA L ' HO APPRESO HO DECISO DI PROVARCI !!!
Questa catena si differenzia dalle altre per la sua potenzialità di
guadagno con un ingresso pari al costo di DIECI CAFFE' !
STAMPA SUBITO QUESTO MESSAGGIO : Ti servirà in futuro .
Tutto ciò che ti serve sono :
- 6 banconote da  2.000 lire
- 6 francobolli per lettera
CHE COSA HAI DA PERDERE ???  Te lo dico io N-I-E-N-T-E .  Sarebbe stupido
non provarci !!!
ED ORA ECCO  COME  PARTECIPARE :
1° PASSO prendi 6 fogli di carta separati e scrivi ciò che segue:
HO PARTECIPATO ANCH'IO.HO ALLEGATO 2.000 lire. BEVI UN  CAFFE' ALLA MIA
SALUTE.
Ora prendile banconote da 2.000 lire e mettine una in ognuno  dei fogli
di carta che hai preparato prima ,opportunamente
piegati da non rendere visibile la banconota dall' esterno  (   per
evitare furti accidentali ).
2° PASSO
Inserisci il foglio con la banconota da 2.000 lire in una busta e chiudila
( fai lo stesso con gli altri 5 fogli ) .
>Se non lo farai le tue possibilità di guadagno si ridurrebbero moltissimo
Ciò che stai facendo è  OFFRIRE 6 CAFFE' :
PER QUESTO E' ASSOLUTAMENTE LEGALE  !!!!!!!!!!!!!!!!!!!!!!!!!
3° PASSO
Spedisci le 6 buste ai seguenti indirizzi :
#1       LODIA MICHELE
              Via Appia, 61/a
            71042 CERIGNOLA (FG)
# 2       LOSINI MASSIMILIANO
              Via Verona 20
               43100 Parma (PR)
#3        SANTORO PAOLO
              Via Vincenzo Boscarino, 13/a
               96100 Siracusa (SR)
#4        ILEANO CERRONI
            Circ.ne Appia 37
            00179 ROMA   (RM)
#5      DELLERMA ANDREA
             Via Cesare Arzelà 14
              00146 Roma  (RM)
#6      PROVINCIANI DAVIDE
             Via del Leone 76
              57122 Livorno
4  ° PASSO
Ora cancella il nominativo #1 dalla lista che vedi sopra ,e sposta in alto
gli altri nominativi  ( il #6 diventa #5 ,  il #5 diventa
#4  ecc..............) e aggiungi il tuo nominativo come  #6  nella lista.
5° PASSO
Spedisci questo messaggio, ricordando di inserire il tuo nome  al #6 posto
ad almeno 200 newsgroup ( ce ne sono circa
50.000  !!!!!!! ) .  Te ne bastano 200 , e perchè no , invia anche ad
amici che hai in chat , ma ricorda più mail spedisci e
più ti arrivano soldi !!!!!!!
ORA IL DISCORSO SI FA INTERESSANTE.
Di 200 contatti con diversi newsgroup , ipotizziamo pessimisticamente che
tu riceva solo 5 adesioni.
Quindi con iltuo nome al #6 posto su ogni messaggio, riceverai in tutto
10.000 lire.
Ogni persona che ti ha spedito 2.000 lire , spedisce anche lei 200
messaggi ad altrettanti newsgroup, ciascuna con il tuo
nome al #5 posto ; supponendo che anche loro ricevano 5 adesioni, questa
fase porta altre 50.000 lire a te.
Queste 25 persone fanno almeno 200 messaggi con il tuo nome al #4 posto e
nelle medesime sfortunate se solo 5 persone
aderiscono questo ti porta altre 250.000 lire.
Ora queste 125 persone continuano la medesima procedura ( il tuo
nominativo è al #3 posto ) ancora solo 5 adesioni ciò
porta altre 625 persone e quindi 1.250.000 lire a te !!!!!!!!!!!
ORA ARRIVA LA PARTE PIU' INTERESSANTE :
Queste 625 persone spediscono 200 messaggi con il tuo nominativo al #2
posto e questo ti porta 6.250.000 lire !!!!!!!!
Infine queste 3125 persone scrivono 200 messaggi con iltuo nome al #1 posto
e riceverai come prima 5 adesioni e questo
ti porta 31.250.000 lire !!!!!!!!!!!!!!!!!
Tutto con un investimento iniziale di solo £ 12.000 e tutto ciò
ipotizzando SOLO 5 ADESIONI  che è davvero un numero
molto basso !!!!!  Di solito sono circa 20-30 ; ora eccoti una media con
15 adesioni
#6 posto       £ 30.000
#5 posto       £  450.000
#4 posto       £   6.750.000
#3 posto       £  101.250.000
#2 posto       £  1.518.750.000
#1 posto       £     22.781.750.000
TOTALE :   £     23.008.480.000  LIRE  .      INCREDIBILE !!!!!!!!
Senza sperare in tanta grazia perchè non provate a vedere se funziona ???
Questa catena conviene a me a te e a tutti quelli che leggono ; in pratica
tutti ci arricchiremo con sole £ 12.000,  6 francobolli
E SENZA RECARE DANNO A NESSUNO.
ORA STA A TE DECIDERE !!!!!!!!!!!!!!!!!!!!!!!! ( ma credo tu l' abbia già
fatto !!! )
Il meccanismo è chiaro, i ragionamenti sopra riportati sono ineccepibili
!!!
Che cosa sono poi £ 12.000  ???? Sicuramente ti divertirai e avrai di
sicuro molta possibilità di fare soldi rispetto agli
sconvenientissimi giochi statali.  Non serve fortuna , è un gioco puramente
STATISTICO .
Ma ricorda: se vuoi che tutto funzioni devi essere ONESTO  ( anche perchè
ce n' è per tutti  !!!! )
Cambiare le modalità porterebbe danno ate e agli altri .
Seguono due lettere per raccontarti di persone che hanno provato :
......... un giorno navigando leggo questo messaggio e provo e dopo 4
settimane non mi ricordavo più del gioco fin quando
arrivarono le prime buste  e man mano le altre. Era incredibile , posso
dire di aver guadagnato circa £  60.000.000.
Adesso possiedo una macchina nuova e quest' estate ho fatto un viaggio in
AUSTRALIA  !!!!!!!!!
Sono un ragazzo di 24 anni e 2 mesi fa ero un pò a corto di soldi e essendo
un appassionato di computer mi imbattei in questa lettera che diceva  "
vuoi vincere tanti soldi ?????? "       ....... perchè non provare
........... adesso ho un computer nuovissimo
e mi avanzano ancora altri soldi.
PROVA E VEDRAI COME IL TUO PORTAFOGLIO SI GONFIERA'


title: proposta

author: Luciano

text:
ho sentito dire che il "ragazzo danese" è stato arrestato perchè rapinava
benzinai notturni, è vero ?
prov <
ne...@katamail.com
> wrote in message 8v5nan$6q0$1...@nslave2.tin.it...



title: spostamento del cursore nel recordset

author: Franco dellavalle

text:
ciao a tutti

è possibile visualizzare
lo spostamento tra i record
con movefirst, movenext ecc ?
come?

grazie


title: spostamento del cursore nel recordset

text:

Si aggiorna il Bookmark della Form allineandolo al Bookmark del Recordset...
Me.Bookmark=OggettoRecordset.Bookmark

@Alex


title: spostamento del cursore nel recordset

text:

ciao Alex

in una funzione,
ho un problema molto strano;
dove il Bookmark, posizionato in un punto
mi va bene per il numero
mentre nell'altro per la data...

With frm!SM_NumDocFornitori
 If rsCheck.BOF Then
  Campo1 = 0
 Else
  rsCheck.FindFirst "IsNull(" & "NumeroDocFo" & ")"
  Campo1 = IIf(rsCheck.NoMatch, 1, 0)

.Form.Bookmark = rsCheck.Bookmark ' segnalibro  <-- qui va bene se manca il numero

  rsCheck.FindFirst "IsNull(" & "DataDocFo" & ")"
  Campo2 = IIf(rsCheck.NoMatch, 1, 0)

'.Form.Bookmark = rsCheck.Bookmark ' segnalibro  <--qui va bene se manca la data


title: spostamento del cursore nel recordset

text:
Per usare il Bookmark i 2 Recordset devono essere sostanzialmente confrontabili... ho paura nel tuo caso non lo siano... ma non c'è modo di capire se quel rsCheck sia la medesima origine della Form o meno... in tal caso si dvrebbe usare il RecordsetClone...!

In tutti i modi, se devi sincronizzarli, usa la PK nel tuo caso, non il Bookmark.

.Form.RecordsetClone.FindFirst "TuoCampo=" & rsCheck.Fields(TuoCampo).Value
If .Form.RecordsetClone.NoMatch=False then
   .Form.Bookmark=.Form.RecordsetClone.Bookmark
End If

Ciao
@Alex


title: spostamento del cursore nel recordset

text:

grazie Alex

non mi spiego perchè mi da l'errore qui:
.Form.RecordsetClone.FindFirst "(Y) =" & rsCheck.Fields(" & Y & ").Value
elemento non trovato in quest'insieme

questo e' l'intero codice:
Public Function fctTesta_DocFo( _
  ByRef frm As Form) As Boolean

  Dim rsCheck As DAO.Recordset
  Dim strsCheckQL As String
  Dim Campo1 As Byte, Campo2 As Byte
  Dim TipoDocumento As String, X As String, Y As String

  strsCheckQL = "SELECT * FROM TbNumDocFornitori" _
    & " Where IdFatturaFo =" & frm!IdFatturaFo
  Set rsCheck = CurrentDb.OpenRecordset(strsCheckQL)

  TipoDocumento = IIf(frm!CboTipoDocumento = 1, "Fattura", "Nota Credito")

  With frm!SM_NumDocFornitori
    If rsCheck.BOF Then
      Campo1 = 0
    Else
      rsCheck.FindFirst "IsNull(" & "NumeroDocFo" & ")"
      Campo1 = IIf(rsCheck.NoMatch, 1, 0)

      rsCheck.FindFirst "IsNull(" & "DataDocFo" & ")"
      Campo2 = IIf(rsCheck.NoMatch, 1, 0)

      If rsCheck!DataDocFo < Forms("frmMenuPrincipale")!dal Then
        MsgBox "La 'data " & TipoDocumento & "' deve essere superiore al " _
          & Format(Forms("frmMenuPrincipale")!dal, "dd/mm/yy") & ".", _
          vbExclamation, "Attenzione!"
          fctTesta_DocFo = False

      End If

      If rsCheck!DataDocFo > Forms("frmMenuPrincipale")!al Then
        MsgBox "La 'data " & TipoDocumento & "' deve essere inferiore al " _
          & Format(Forms("frmMenuPrincipale")!al, "dd/mm/yy") & ".", _
          vbExclamation, "Attenzione!"
          fctTesta_DocFo = False

      End If

    End If

    X = IIf(Campo1 = 0, "e n° ", "") _
      & IIf(Campo2 = 0, "e data ", "")

    If (X) <> "" Then
      MsgBox "Attenzione manca: " & Mid(X, 2) & TipoDocumento & ".", vbExclamation, "Attenzione!"
    Else
      fctTesta_DocFo = True

    End If

    Y = IIf(Campo1 = 0, "NumeroDocFo", "DataDocFo")

    If (Y) <> "" Then
      If Not rsCheck.BOF Then
        .Form.RecordsetClone.FindFirst "(Y) =" & rsCheck.Fields(" & Y & ").Value
        If .Form.RecordsetClone.NoMatch = False Then
          .Form.Bookmark = .Form.RecordsetClone.Bookmark

        End If

      End If

      .SetFocus
      .Form(Y).SetFocus

    End If

  End With

  Set rsCheck = Nothing

End Function


title: spostamento del cursore nel recordset

text:
ma cosa sono le parentesi tonde sul campo Y...?
Hai inventato una nuova sintassi...?

Franco....

@Alex


title: spostamento del cursore nel recordset

text:

grazie Alex
ho corretto
.Form.RecordsetClone.FindFirst "Y =" & rsCheck.Fields(" & Y & ").Value
ma l'errore rimane lo stesso


title: spostamento del cursore nel recordset

text:
e le virgolette dopo a cosa servono... in quel modo...???????? nemmeno un Compila per rilevare gli errori fai..?
Sinceramente non capisco, commetti errori talmente BANALI che fatico a capire come tu possa scrivere codice... quindi se é questione di disattenzione sarebbe ora ti dessi una sveglia e facessi debug seriamente purché così non si fa 1mm.
Se invece sono basi che mancano... beh... posso suggerirti di studiare ma poi devi farlo...
@Alex


title: spostamento del cursore nel recordset

text:

ciao Alex

cosi sembra funzionare...
Public Function fctTesta_DocFo( _
  ByRef frm As Form) As Boolean

  Dim rsCheck As DAO.Recordset
  Dim TipoDocumento As String, X As String
  Dim CheckArray(1 To 2) As String, J As Byte

  With frm!SM_NumDocFornitori
    Set rsCheck = .Form.RecordsetClone

    TipoDocumento = "Fattura"
    CheckArray(2) = "NumeroDocFo"
    CheckArray(1) = "DataDocFo"

    For J = 1 To 2
    rsCheck.FindFirst "IsNull(" & CheckArray(J) & ")"

    If Not rsCheck.NoMatch Then
      TipoDocumento = IIf(rsCheck.Fields("IdTipoDocumento").Value = 1, _
        "Fattura", "Nota Credito")
      X = IIf(CheckArray(J) = "NumeroDocFo", "n° ", "") _
      & IIf(CheckArray(J) = "DataDocFo", "data ", "")

      .Form.Bookmark = .Form.RecordsetClone.Bookmark
      .SetFocus
      .Form(CheckArray(J)).SetFocus

    End If
    Next

    If .Form.RecordsetClone.BOF Or .Form.NewRecord Then
      X = "n° e data "
    Else
      If rsCheck!DataDocFo < Forms("frmMenuPrincipale")!dal Then
        MsgBox "La 'data " & TipoDocumento & "' deve essere superiore al " _
          & Format(Forms("frmMenuPrincipale")!dal, "dd/mm/yy") & ".", _
          vbExclamation, "Attenzione!"
          fctTesta_DocFo = False

      End If

      If rsCheck!DataDocFo > Forms("frmMenuPrincipale")!al Then
        MsgBox "La 'data " & TipoDocumento & "' deve essere inferiore al " _
          & Format(Forms("frmMenuPrincipale")!al, "dd/mm/yy") & ".", _
          vbExclamation, "Attenzione!"
          fctTesta_DocFo = False

      End If

    End If

  End With

  If (X) <> "" Then
    MsgBox "Attenzione manca: " & X & TipoDocumento & ".", vbExclamation, "Attenzione!"
  Else
    fctTesta_DocFo = True

  End If




title: Smanettoni di Word.....UNITEVI!!!

author: MarkRed

text:
Salve a tutti,
vorrei conoscere, possibilmente, una valida routine che, in Access, tramite
un pulsante di comando, mi apra un documento esistente o crearlo,
possibilmente, col nome, magari, di una casella di testo oppure tramite il
numero di ID e salvare il documento col numero di ID della tabella in uso.
Ho provato con l'autocomposizione ma non so come "smanettare" nel codice per
aprire un file specifico di Word.
Grazie anticipatamente.
Marco.


title: Smanettoni di Word.....UNITEVI!!!

author: Emyr

text:


sistema questa
Private Sub periziatrentin_Click()
If IsNull(Me.posizione) Or Me.posizione = "" Then
    Me.posizione.SetFocus
    MsgBox ("Specifica il percorso dove registrare la Perizia")
    Exit Sub
End If
Dim trovato, NomeFile
trovato = ""
NomeFile = Me.posizione & Me.numero.Value & Me.compagnia.[Column](1) &
".doc"
trovato = Dir(NomeFile)
If trovato = "" Then
If IsNull(Me!numero) Or Me.numero = "" Then
    Exit Sub
End If
Dim acapp As Word.Application
Dim doc As Word.Document
Set acapp = New Word.Application
Set doc = acapp.Documents.Add
Dim db As Database
Set db = CurrentDb()
Dim rs As Recordset
Set rs = db.OpenRecordset("SELECT sinistro.*,
compagnia.descrizionecompagnia FROM sinistro LEFT JOIN compagnia ON
sinistro.compagnia = compagnia.compagnia where numero = " & Me.numero)
If rs.EOF Then
    rs.Close
    Set db = Nothing
    Exit Sub
End If
With acapp.Selection.Font
    acapp.Selection.Delete
    .Bold = True
    .Name = "Arial Black"
    .Size = 28
    acapp.Selection.ParagraphFormat.Alignment = wdAlignParagraphLeft
    Dim a
    For a = 1 To 17
        acapp.Selection.ParagraphFormat.TabStops.Add Position:=a *
28.35
    Next
    'intestazione pagina
    acapp.Selection.TypeText ("T")
    .Size = 20
    acapp.Selection.TypeText ("rentin")
    .Size = 18
    acapp.Selection.TypeText (vbCrLf)
    acapp.Selection.TypeText ("  ")
    .Size = 28
    acapp.Selection.TypeText ("C")
    .Size = 22
    acapp.Selection.TypeText ("onsulting")
    .Size = 10
    acapp.Selection.TypeText ("  ")
    .Underline = wdUnderlineSingle
    acapp.Selection.TypeText ("  srl
")
    .Name = "Baskerville Old Face"
    .Bold = False
    acapp.Selection.TypeText ("Perizie - Consulenza e Tecnica
Assicurativa" & vbCrLf)
    .Underline = wdUnderlineNone
    .Name = "Times New Roman"
    .Size = 8
    acapp.Selection.TypeText ("Associato ")
    .Bold = True
    acapp.Selection.TypeText ("A.N.P.A.I.R.D. - UNINDUSTRIA ")
    .Bold = False
    acapp.Selection.TypeText ("- Unione degli industriali di Padova -
Corrispondente")
    .Bold = True
    acapp.Selection.TypeText (" GREESA GATEX ")
    .Bold = False
    acapp.Selection.TypeText ("- MARSEILLE  (Francia)" & vbCrLf)
    doc.Content.Select
    acapp.Selection.Copy
    doc.Sections(1).Headers(wdHeaderFooterPrimary).Range.Paste
    acapp.Selection.Delete
    doc.Sections(1).PageSetup.HeaderDistance = 14.3
    'pie pagina
    .Name = "Arial Black"
    .Size = 8
    acapp.Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
    acapp.Selection.TypeText ("C.F. P.IVA: 02640970287           ")
    .Italic = True
    acapp.Selection.TypeText ("home page: ")
    .Name = "Times New Roman"
    .Size = 12
    .Underline = wdUnderlineSingle
    .Italic = False
    acapp.Selection.TypeText ("
http://www.trentin.com
")
    .Underline = wdUnderlineNone
    .Name = "Arial Black"
    .Size = 8
    .Italic = True
    acapp.Selection.TypeText (" e -mail: ")
    .Italic = False
    .Name = "Times New Roman"
    .Size = 12
    .Underline = wdUnderlineSingle
    acapp.Selection.TypeText ("
in...@trentin.com
" & vbCrLf)
    .Underline = wdUnderlineNone
    .Name = "Arial Black"
    .Size = 8
    acapp.Selection.TypeText ("Sede Legale: 35043 MONSELICE (PD) - Via
Zanellato, 29 - Tel. 0429 784240/1 - Fax 0429 784248" & vbCrLf)
    acapp.Selection.TypeText ("Studi collegati:" & vbCrLf)
    acapp.Selection.TypeText ("35123 PADOVA - V.Marsilio da PD n. 22 -
Tel 049/8761999 - Fax 049/663207" & vbCrLf)
    acapp.Selection.TypeText ("Milano - Ferrara - Piacenza - Treviso -
Verona" & vbCrLf)
    doc.Content.Select
    acapp.Selection.Copy
    doc.Sections(1).Footers(wdHeaderFooterPrimary).Range.Paste
    acapp.Selection.Delete
    ' corpo pagina
    .Name = "Times New Roman"
    .Size = 12
    acapp.Selection.ParagraphFormat.Alignment = wdAlignParagraphLeft
    acapp.Selection.TypeText ("Alla Spett.le ")
    .Bold = True
    acapp.Selection.TypeText ("G.G.L." & vbCrLf)
    .Bold = False
    acapp.Selection.TypeText ("V.le Codalunga n 4 H" & vbCrLf)
    acapp.Selection.TypeText ("35123 - PADOVA" & vbCrLf & vbCrLf)
    .Bold = True
    acapp.Selection.ParagraphFormat.Alignment = wdAlignParagraphCenter
    acapp.Selection.TypeText ("RELAZIONE DI PERIZIA DANNI" & vbCrLf)
    acapp.Selection.ParagraphFormat.Alignment = wdAlignParagraphLeft
    .Bold = False
    acapp.Selection.TypeText (vbCrLf & "Compagnia" & vbTab & vbTab)
    .Bold = True
    acapp.Selection.TypeText (rs![descrizionecompagnia] & vbTab &
vbTab & vbTab & vbTab & "Agenzia " & rs![agenzia] & vbCrLf)
    .Bold = False
    acapp.Selection.TypeText ("Sin. n." & vbTab & vbTab & vbTab &
rs![sinistroagenzia] & vbTab & vbTab & vbTab & vbTab & "del" & vbCrLf)
    acapp.Selection.TypeText ("Polizza n." & vbTab & vbTab &
rs![Polizza] & vbTab & vbTab & vbTab & "Mod. Polizza" & vbCrLf)
    acapp.Selection.TypeText ("Premio pagato il " & vbTab & vbTab &
vbTab & vbTab & vbTab & "Denuciato " & vbTab & "€" & vbCrLf & vbCrLf)
    acapp.Selection.TypeText ("Liquidato Euro " & vbTab &
Format(Nz(Me.liquidato), "##,##0.00") & vbCrLf & vbCrLf & vbCrLf)
    .Bold = True
    acapp.Selection.TypeText ("Assicurato " & Format(rs![assicurato],
"##,##0.00") & vbCrLf & vbCrLf)
    .Bold = False
    acapp.Selection.TypeText ("Padova, " & Format(Date, "dd mmmm
yyyy") & vbCrLf)
    acapp.Selection.ParagraphFormat.Alignment = wdAlignParagraphRight
    acapp.Selection.TypeText ("p. TRENTIN CONSULTING SRL" & vbCrLf)
    acapp.Selection.TypeText ("p.i. CARLOT " & vbCrLf)
    acapp.Selection.InsertBreak (wdSectionBreakNextPage)
    acapp.Selection.ParagraphFormat.Alignment = wdAlignParagraphLeft
    .Bold = True
    acapp.Selection.TypeText (vbCrLf & vbCrLf & vbCrLf & vbCrLf &
"All'Agenzia di" & vbTab & Me.agenzia & vbCrLf)
    .Bold = False
    acapp.Selection.TypeText (vbCrLf & "Polizza N.°:" & vbTab &
Me.Polizza & vbCrLf)
    acapp.Selection.TypeText (vbCrLf & "Sinistro N.°:" & vbTab &
Me.sinistroagenzia & vbTab)
    .Bold = True
    acapp.Selection.TypeText ("Es. " & Me.annoriferimento & vbCrLf)
    .Bold = False
    acapp.Selection.TypeText (vbCrLf & "DITTA ASSICURATA" & vbTab &
Me.assicurato & vbCrLf)
    acapp.Selection.TypeText (vbCrLf & "In relazione al Vs. incarico
del " & Me.dataincarico & ", si allega copia dell'atto di liquidazione
sottoscritto per" & vbCrLf)
    acapp.Selection.TypeText (vbCrLf & "                   €
" & Format(Nz(Me.liquidato), "##,##0.00") & " (" &
UCase(EuroLettere(Nz(Me.liquidato))) & ")" & vbCrLf)
    acapp.Selection.TypeText (vbCrLf & "autorizzandoVene il
pagamento." & vbCrLf & vbCrLf)
    acapp.Selection.TypeText ("Padova, " & Format(Date, "dd mmmm
yyyy") & vbCrLf & vbCrLf)
    acapp.Selection.ParagraphFormat.Alignment = wdAlignParagraphRight
    acapp.Selection.TypeText ("p. TRENTIN CONSULTING SRL" & vbCrLf)
    acapp.Selection.TypeText ("p.i. CARLOT " & vbCrLf)
End With
doc.SaveAs NomeFile
rs.Close
Set db = Nothing
doc.Close
Set doc = Nothing
acapp.Quit
Set acapp = Nothing
End If
Set acapp = New Word.Application
Set doc = acapp.Documents.Open(NomeFile)
acapp.Visible = True
End Sub
Saluti.
Emanuele.


title: Problema ordinamento dei campi in query a campi incrociati

author: Riddick

text:
Salve a tutti, il mio problema è dato dall'ordinamento dei campi visualizzati in una query a campi incrociati.

Vi faccio un esempio esplicativo...ho una tabella in cui ho, oltre ad altri campi...

prezzo   periodo   data
10.00    gen       01/01/2012
12.00    gen       02/01/2012
11.00    febb      01/02/2012
18.00    febb      02/02/2012
15.00    apr       01/04/2012
10.00    apr       02/04/2012
30.00    sett      01/09/2012
28.00    sett      02/09/2012

questi campi sono ordinati per data!!
Quando faccio la query a campi incrociati il risultato è questo:

apr     febb     gen     sett
15.00   11.00    10.00   30.00
10.00   18.00    12.00   28.00

purtroppo il campo "data" non è un campo che posso portarmi, per la natura di questo tipo di query, ma io ho bisogno che la query mantenga l'ordine che ho impostato nella nella tabella di partenza!! Perchè perdo l'ordinamento? Come potrei fare per risolvere il problema?

Grazie.


author: Riccardo Baldinotti

text:
Riddick ha scritto:

> Salve a tutti, il mio problema � dato dall'ordinamento dei campi
visualizzati in una query a campi incrociati. Non sono sicuro che questa sia
la sezione giusta per questo post, se � cosi vi faccio anticipatamente la mie
scuse.

> Database,              MS Access;
> Tecnologia utilizzata, ADO;
> IDE,                   Delphi 6;

> Vi faccio un esempio esplicativo...ho una tabella in cui ho, oltre ad altri
campi...

> prezzo   periodo   data
> 10.00    gen       01/01/2012
> 12.00    gen       02/01/2012
> 11.00    febb      01/02/2012
> 18.00    febb      02/02/2012
> 15.00    apr       01/04/2012
> 10.00    apr       02/04/2012
> 30.00    sett      01/09/2012
> 28.00    sett      02/09/2012

> questi campi sono ordinati per data!!
> Quando faccio la query a campi incrociati il risultato � questo:

> apr     febb     gen     sett
> 15.00   11.00    10.00   30.00
> 10.00   18.00    12.00   28.00

> purtroppo il campo "data" non � un campo che posso portarmi, per la natura
di questo tipo di query, ma io ho bisogno che la query mantenga l'ordine che
ho impostato nella nella tabella di partenza!! Perch� perdo l'ordinamento?
Come potrei fare per risolvere il problema?

Mi metti la query che usi?
RB

--

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


text:
Il giorno martedì 15 gennaio 2013 11:46:27 UTC+1, Riccardo Baldinotti ha scritto:
> Riddick ha scritto:
>
>
>
> > Salve a tutti, il mio problema è dato dall'ordinamento dei campi
>
> visualizzati in una query a campi incrociati. Non sono sicuro che questa sia
>
> la sezione giusta per questo post, se è cosi vi faccio anticipatamente la mie
>
> scuse.
>
>
>
> > Database,              MS Access;
>
> > Tecnologia utilizzata, ADO;
>
> > IDE,                   Delphi 6;
>
>
>
> > Vi faccio un esempio esplicativo...ho una tabella in cui ho, oltre ad altri
>
> campi...
>
>
>
> > prezzo   periodo   data
>
> > 10.00    gen       01/01/2012
>
> > 12.00    gen       02/01/2012
>
> > 11.00    febb      01/02/2012
>
> > 18.00    febb      02/02/2012
>
> > 15.00    apr       01/04/2012
>
> > 10.00    apr       02/04/2012
>
> > 30.00    sett      01/09/2012
>
> > 28.00    sett      02/09/2012
>
>
>
> > questi campi sono ordinati per data!!
>
> > Quando faccio la query a campi incrociati il risultato è questo:
>
>
>
> > apr     febb     gen     sett
>
> > 15.00   11.00    10.00   30.00
>
> > 10.00   18.00    12.00   28.00
>
>
>
> > purtroppo il campo "data" non è un campo che posso portarmi, per la natura
>
> di questo tipo di query, ma io ho bisogno che la query mantenga l'ordine che
>
> ho impostato nella nella tabella di partenza!! Perchè perdo l'ordinamento?
>
> Come potrei fare per risolvere il problema?
>
>
>
>
>
> Mi metti la query che usi?
>
> RB

Questa è la query...l'ordinamento che devo fare è per "DataScadenza". Le date DataScadenza sono associate ad ogni quota NomeQuota, e siccome NomeQuota è il mio campo Pivot nn posso portarmi il campo DataScadenza...

TRANSFORM Sum(Quote.Importo) AS Importo');

SELECT Quote.idLocale, locali.Nome, locali.IdCondominio, IIf((Len([Anagrafe.Nome])=0) Or (IsNull([Anagrafe.Nome])),[Anagrafe.Cognome],[Anagrafe.Cognome] & " " & [Anagrafe.Nome]) AS Proprietario, IIf((Len([Anagrafe_1.Nome])=0) Or (IsNull([Anagrafe_1.Nome])),[Anagrafe_1.Cognome],[Anagrafe_1.Cognome] & " " & [Anagrafe_1.Nome]) AS Inquilino

FROM (((Quote INNER JOIN locali ON Quote.idLocale = locali.Id) INNER JOIN Anagrafe ON locali.idProprietario = Anagrafe.Id) INNER JOIN Anagrafe AS Anagrafe_1 ON locali.idInquilino = Anagrafe_1.Id) INNER JOIN QueryAC ON (locali.IdCondominio = QueryAC.idCondominio) AND (Quote.AA = QueryAC.nome)

WHERE locali.IdCondominio="Mio Condominio"

GROUP BY Quote.idLocale, locali.Nome, locali.IdCondominio, IIf((Len([Anagrafe.Nome])=0) Or (IsNull([Anagrafe.Nome])),[Anagrafe.Cognome],[Anagrafe.Cognome] & " " & [Anagrafe.Nome]), IIf((Len([Anagrafe_1.Nome])=0) Or (IsNull([Anagrafe_1.Nome])),[Anagrafe_1.Cognome],[Anagrafe_1.Cognome] & " " & [Anagrafe_1.Nome])

PIVOT Quote.NomeQuote;


author: Karl Donaubauer

text:
Riddick wrote:
> ...
> Database,              MS Access;
> Tecnologia utilizzata, ADO;
> IDE,                   Delphi 6;
>
> Vi faccio un esempio esplicativo...ho una tabella in cui ho, oltre ad
> altri campi...
>
> prezzo   periodo   data
> 10.00    gen       01/01/2012
> 12.00    gen       02/01/2012
> 11.00    febb      01/02/2012
> 18.00    febb      02/02/2012
> 15.00    apr       01/04/2012
> 10.00    apr       02/04/2012
> 30.00    sett      01/09/2012
> 28.00    sett      02/09/2012
>
> questi campi sono ordinati per data!!
> Quando faccio la query a campi incrociati il risultato � questo:
>
> apr     febb     gen     sett
> 15.00   11.00    10.00   30.00
> 10.00   18.00    12.00   28.00
>
> purtroppo il campo "data" non � un campo che posso portarmi, per la
> natura di questo tipo di query, ma io ho bisogno che la query
> mantenga l'ordine che ho impostato nella nella tabella di partenza!!
> Perch� perdo l'ordinamento? Come potrei fare per risolvere il
> problema?

Invece di
...PIVOT tabella.periodo

usa
...PIVOT tabella.periodo In ("gen","febb","apr","sett")

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


text:
Il giorno martedì 15 gennaio 2013 21:59:10 UTC+1, Karl Donaubauer ha scritto:
> Riddick wrote:
>
> > ...
>
> > Database,              MS Access;
>
> > Tecnologia utilizzata, ADO;
>
> > IDE,                   Delphi 6;
>
> >
>
> > Vi faccio un esempio esplicativo...ho una tabella in cui ho, oltre ad
>
> > altri campi...
>
> >
>
> > prezzo   periodo   data
>
> > 10.00    gen       01/01/2012
>
> > 12.00    gen       02/01/2012
>
> > 11.00    febb      01/02/2012
>
> > 18.00    febb      02/02/2012
>
> > 15.00    apr       01/04/2012
>
> > 10.00    apr       02/04/2012
>
> > 30.00    sett      01/09/2012
>
> > 28.00    sett      02/09/2012
>
> >
>
> > questi campi sono ordinati per data!!
>
> > Quando faccio la query a campi incrociati il risultato è questo:
>
> >
>
> > apr     febb     gen     sett
>
> > 15.00   11.00    10.00   30.00
>
> > 10.00   18.00    12.00   28.00
>
> >
>
> > purtroppo il campo "data" non è un campo che posso portarmi, per la
>
> > natura di questo tipo di query, ma io ho bisogno che la query
>
> > mantenga l'ordine che ho impostato nella nella tabella di partenza!!
>
> > Perchè perdo l'ordinamento? Come potrei fare per risolvere il
>
> > problema?
>
>
>
> Invece di
>
> ...PIVOT tabella.periodo
>
>
>
> usa
>
> ...PIVOT tabella.periodo In ("gen","febb","apr","sett")
>
>
>
> --
>
> Ciao
>
> Karl
>
> *********
>
> Access FAQ:
www.donkarl.com/it

Grazie Karl, appena possibile proverò il tuo suggerimento e ti farò sapere!!

A presto, Simone


text:

Niente da fare, non va...ma per un semplice motivo! Valore di "NomeQuote" è una stringa che inserisco io nella tabella! Può essere "gen-feb", "gennaio-febbraio", "primo bimestre" ecc. quindi non è un valore fisso che posso usare nella query in PIVOT. l'ordinamento deve essere fatto per forza su "DataScadenza", ossia deve essere mantenuto l'ordinamento impostato per la tabella Quote! Come posso fare?

Grazie, Simone.


text:

Proprio nessuna soluzione???


title: esportazione report

author: Danbow

text:
Quando esporto un report in Word, in formato rtf, mi sparisce tutta la
formattazione che mi ero creato in quel report; righe di divisione,
rettangoli, colori diversi, ecc.
E' normale?
Grazie


title: esportazione report

author: Livio Massa

text:
"Danbow" <
thed...@yahoo.it
> ha scritto nel messaggio
news:MPG.16106fee8...@news.tin.it...

Che mi risulti e' cosi' e non ci sono soluzioni. E' successo anche a me , ma
non sono riuscito a risolvere la cosa. Io ho creato dei file PDF, ma non
sono piu' modificabili quindi ....
Ciao    Livio


title: report trasformazione pdf con numero progressivo (id)

author: Jack

text:
Buongiorno,
ho un piccolo programma in access e volevo stampare i vari report
salvandoli con dopdf in formato pdf e fin qui tutto bene.
Mi piacerebbe impostare in automatico il salvataggio del file con il
nome del file che corrisponda al numero progressivo (contatore) senza
scriverlo ogni volta, si può fare?
Grazie


author: almorel

text:

Ciao, credo che dipenda dal programma di stampa PDF.
Quando ho avuto la stessa esigenza ho stampato col nome PDF standard
e poi o rinominato il file (Name \percorso\aaa.pdf To \percorso
\bbb.pdf
Non sarà elegante ... ma funziona.
Ciao
Alberto


author: pablitomf

text:
On 19 Nov, 10:51, Jack <
jack...@hotmail.it
> wrote:

Qual'e il codice vba che usi x stampare in PDF?


title: nuova periferica

author: Cristina Padoan

text:
Ciao al NG;
come faccio ad intercettare una nuova periferica (es. lerrore smart card) e
gestirla da un form?
Grazie
cris


title: nuova periferica

author: MA

text:
"Cristina Padoan" <
cris....@libero.it
> ha scritto nel messaggio
news:B7Ohb.197710$hE5.6...@news1.tin.it...

Punta al file che ti interssa
if dir(tuopath)<>"" then
MAssimiliano


title: Da query Sql > codice VB.......

author: Mark

text:
Salve a tutti.
Vorrei, geltimente sapere, come sia possibile inserire l'istruzione Sql di
una query nel codice VB. Esiste qualche programma o è più semplice di quanto
possa immaginare?
Grazie anticipatamente.
Marco.


title: Da query Sql > codice VB.......

author: Brown

text:
Mark ha scritto:

Se intendi eseguire una query via codice:
CurrentDb.QueryDefs("NOME_QUERY").Execute


title: Da query Sql > codice VB.......

text:
Vedi   la recente " Convertire una query salvata in espressione  SQL
via codice ......."
ti dovrebbe aiutare


title: Da query Sql > codice VB.......

author: Alessandro Baraldi

text:
"Mark" <
NO_SPAM_N...@libero.it
> wrote in message
news:43673c88$0$29557$
4faf...@reader1.news.tin.it
> Salve a tutti.
>
> Vorrei, geltimente sapere, come sia possibile inserire l'istruzione Sql di
> una query nel codice VB. Esiste qualche programma o č piů semplice di quanto
> possa immaginare?
>
> Grazie anticipatamente.
> Marco.
Spiega cosa intendi fare, detta cosě non si capisce e potresti
avere risposte non complete.
Se vuoi eseguire una Query da VBA, in questo caso si tratta di
Queries Action(INSERT, UPDATE, DELETE..) puoi usare il metodo EXECUTE
dell'oggetto CurrentDb:
CurrentDb.Execute("Predicato SQL")
oppure
Docmd.RunSQL "PRedicato SQL"
In caso diverso non si capisce cosa vuoi ottenere.
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Da query Sql > codice VB.......

text:
<
carlo....@gmail.com
> ha scritto nel messaggio
news:1130840336....@f14g2000cwb.googlegroups.com...
> Vedi   la recente " Convertire una query salvata in espressione  SQL
> via codice ......."
>
> ti dovrebbe aiutare
>
Grazie dell'attenzione...... però volevo dire, se prendo l'istruzione Sql da
una query, come questo appresso
INSERT INTO servizio ( dipendente, servizio, idservizi )
SELECT dipendenti.iddipendente, servizio.servizio,
[forms]![servizi]![idservizi] AS Espr1
FROM servizi INNER JOIN (dipendenti INNER JOIN servizio ON
dipendenti.iddipendente = servizio.dipendente) ON servizi.idservizi =
servizio.idservizi
WHERE (((dipendenti.presente)=Yes) AND
((servizi.data)=[forms]![servizi]![data]-1));
come devo inserirlo se voglio farlo con un pulsante all'evento di clic
"routine evento" e chiamare tutto il codice in argomento e non la query?
Spero sia stato abbastanza chiaro.
Marco.


title: [OT Ma non troppo] Che fine hanno fatto

author: OneEDP

text:
In google gruppi sono scomparsi tutti i messaggi pi� vecchi di un mese.
E possibile?
Ciao
Daniele


title: [OT Ma non troppo] Che fine hanno fatto

author: miciomao

text:
On 10 Set, 10:46, "OneEDP" <OneEDP@antispam> wrote:
> In google gruppi sono scomparsi tutti i messaggi più vecchi di un mese.
> E possibile?
> Ciao
> Daniele
è da agosto che ho notato la stessa cosa
bhà


title: [OT Ma non troppo] Che fine hanno fatto

author: Pablitomf

text:
miciomao ha scritto:
> On 10 Set, 10:46, "OneEDP" <OneEDP@antispam> wrote:
> > In google gruppi sono scomparsi tutti i messaggi pi� vecchi di un mese.
> > E possibile?
> > Ciao
> > Daniele
> � da agosto che ho notato la stessa cosa
> bh�
saranno ancora in ferie! :D
--
Ciao
Pablitomf
-----------------------------------
Propongo 4-4-2 con il Rombo a centrocampo :
De Sanctis
Zuniga-Campagnaro-Contini-Aronica
Maggio-Cigarini-Gargano-Hamsik
Lavezzi-Quagliarella
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: [OT Ma non troppo] Che fine hanno fatto

author: Bruno Campanini

text:
"OneEDP" <OneEDP@antispam> wrote in message
news:4aa8bcf5$0$1098$4faf...@reader3.news.tin.it...
> In google gruppi sono scomparsi tutti i messaggi pi� vecchi di un mese.
> E possibile?
� auspicabile!
Bruno


title: [OT Ma non troppo] Che fine hanno fatto

text:

Fino a poco tempo fa era una risorsa
Adesso non pi�?
Io credo che sia una disability nella ricerca
Se invece estendo il mio nickname in google generico trovo i messaggi dal
2003


title: [OT Ma non troppo] Che fine hanno fatto


title: dividere un campo ogni 5 caratteri

author: gian

text:
Ciao a tutti. In Access XP ho una query con un campo calcolato "campoX" che
visualizza la concatenzazione di altri campi:
campoX: campo1 & campo2 & campo3
campo1, campo2, campo3 sono sempre di 5 caratteri.
esempio:
campoX:
aaaaabbbbbccccc
aaaaaccccc
bbbbbccccc
......
Devo dividere il campoX nei suoi campi di "origine", per poi utilizzare i
valori "aaaaa", "bbbbb" ecc. in un ciclo.
Come posso fare?
E' possibile utilizzare la finzione split?
Grazie a tutti.
Giancarlo.


title: dividere un campo ogni 5 caratteri

author: Pablitomf [Access]

text:

Ma il campo X quanti caratteri a 5 ha? sono definiti o no?
se si, basta calcolarteli in una qry cone le funzioni left, right, Mid...
altrimenti dammi info
--
--
Ciao
Pablitomf (Maurizio Facciuti)
-----------------------------------------------------------------
Access: 97, 2000, XP e 2003
ASP
-----------------------------------------------------------------
http://www.accessgroup.it/
-----------------------------------------------------------------
Il mio motto :
""Non mi fido molto delle statistiche, perchč un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media."
"gian" <
thi...@tin.it
> ha scritto nel messaggio
news:faedu0$8s6$1...@aioe.org...


title: dividere un campo ogni 5 caratteri

text:
"Pablitomf [Access]" <
keiko...@libero.it
> ha scritto nel messaggio
news:faeebf$j3n$1...@tdi.cu.mi.it...
>> Ciao a tutti. In Access XP ho una query con un campo calcolato "campoX"
>> che visualizza la concatenzazione di altri campi:
>> campoX: campo1 & campo2 & campo3
>> campo1, campo2, campo3 sono sempre di 5 caratteri.
>>
>> esempio:
>> campoX:
>> aaaaabbbbbccccc
>> aaaaaccccc
>> bbbbbccccc
>> ......
>>
>> Devo dividere il campoX nei suoi campi di "origine", per poi utilizzare i
>> valori "aaaaa", "bbbbb" ecc. in un ciclo.
>> Come posso fare?
>> E' possibile utilizzare la finzione split?
>>
>> Grazie a tutti.
>> Giancarlo.
> Ma il campo X quanti caratteri a 5 ha? sono definiti o no?
> se si, basta calcolarteli in una qry cone le funzioni left, right, Mid...
in effetti con mid ho ottenuto qualcosa. Ho scritto questa funzione:
Public Function dividi(testo As String)
Dim divisore
Dim risultato As String
Dim n
divisore = Len(testo) / 5
inizio = 1
For n = 0 To divisore
risultato = Mid(testo, inizio, 5)
inizio = inizio + 5
Next n
End Function
Inserendola in un ciclo che scorre la query, ottengo (sulla base
dell'esempio di sopra):
aaaaa
bbbbb
ccccc
aaaaa
ccccc
bbbbb
ccccc
..e mi sembra già qualcosa...:-)
però adesso non so come fare per inserire il risultato ottenuto "aaaaa",
"bbbbb", ecc. in una variabile che dovrà essere utilizzata per un filtro su
un'altra query.
Puoi aiutarmi?
>
> altrimenti dammi info
>
> --
> --
> Ciao
>
> Pablitomf (Maurizio Facciuti)
> -----------------------------------------------------------------
> Access: 97, 2000, XP e 2003
> ASP
> -----------------------------------------------------------------
>
http://www.accessgroup.it/
> -----------------------------------------------------------------
> Il mio motto :
> ""Non mi fido molto delle statistiche, perchè un uomo con la testa nel



title: dividere un campo ogni 5 caratteri

author: Giancarlo Francesconi

text:
Ho risolto. Grazie!
Giancarlo
"gian" <
thi...@tin.it
> ha scritto nel messaggio
news:faeg71$fo9$1...@aioe.org...



title: dividere un campo ogni 5 caratteri

author: Access

text:
ciao Giancarlo Francesconi,
"Giancarlo Francesconi" <
thinice...@tin.it
> ha scritto nel messaggio
news:46cb2a94$0$10619$4faf...@reader2.news.tin.it...
> Ho risolto. Grazie!
> Giancarlo
perchè non ci dici come?
--
Ciao
Access


title: terminal server

author: David

text:
buongiorno a tutti
forse non č il posto giusto, ma non sņ dove reperire informazioni (oltre che
le solite del  sito microsoft), qualcuno mi puņ illuminare sul terminal
server?
si puņ usare con access? posso tenere la mia applicazione su di un server e
colegare il client con terminal server?
grazie a tutti voi


title: terminal server

text:
"David" <
davi...@aopn.fvg.it
> ha scritto nel messaggio
news:bvl9iu$e3n$1...@grillo.cs.interbusiness.it...
> buongiorno a tutti
> forse non è il posto giusto, ma non sò dove reperire informazioni (oltre
che
> le solite del  sito microsoft), qualcuno mi può illuminare sul terminal
> server?
> si può usare con access? posso tenere la mia applicazione su di un server
e
> colegare il client con terminal server?
> grazie a tutti voi
Sì tranquillamente. Creati una cartella per ogni utente.
Occhio però alla gestione delle stampanti locali e remote.
MAssimiliano


title: terminal server

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:FFqTb.2526$HO2...@news.edisontel.com...

grazie x la risposta. ultima cosa, dove posso reperire informazioni +'
dettagliate?


title: terminal server

text:
> > > buongiorno a tutti
> > > forse non è il posto giusto, ma non sò dove reperire informazioni
(oltre
> > che
> > > le solite del  sito microsoft), qualcuno mi può illuminare sul
terminal
> > > server?
> > > si può usare con access? posso tenere la mia applicazione su di un
> server
> > e
> > > colegare il client con terminal server?
> > > grazie a tutti voi
> >
> > Sì tranquillamente. Creati una cartella per ogni utente.
> > Occhio però alla gestione delle stampanti locali e remote.
> > MAssimiliano
> >
> >
> grazie x la risposta. ultima cosa, dove posso reperire informazioni +'
> dettagliate?
>
In questo non posso aiutarti, ma credo su un NG di W200# Server
MAssimiliano


title: terminal server

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:w6rTb.2536$HO2...@news.edisontel.com...

molto gentile grazie
David


title: richiesta valore di un campo su maschere continue

author: Fabrizio Quercia

text:
Ciao a tutti :)
Ho un prob di questo tipo:
i nomi sono di esempio
-tbl_Eventi (ID_Evento, NumeroEvento...)
-tbl_DaFaturare (come sopra, con l'ID testo o numerico, le ho provate
entrambe)
-qry_CreaDaFatturare (ID_Evento, NumeroEvento...) query di accodamento
...accoda i dati da tabella_eventi a tabella_dafatturare
-frm_Eventi (Dal, Al)
-frm_ElencoEventi (maschere continue) - Origine record Query_Eventi
(filtrato con le date)
la subform elenca i record della query secondo il criterio Sospeso
(true/false) della sua relativa query e fin qui tutto bene...
ho messo un pulsante sulla subform "Autorizza" che mette il flag Sospeso a
False, Fatturare a True e fa un requery della subform affinche' possa
visualizzare i resto dei record sospesi facendomi non visualizzare + quello
autorizzato..quindi man mano i record diminuscono...(solo a livello visivo,
fa scena :-)))
Il pulsante "Autorizza" esegue la query di accodamento, e mi deve accodare
il record corrente, cioe' quello dove clicco, nella tabella:dafatturare, e
lo fa solo ke mi chiede ogni volta l'ID_Evento....forse per il fatto che sia
in visualizzazione maschere continue...
Quando clicco sul pulsante Autorizza di ogni singola riga della subform mi
chiede (malgrado ci sia) il valore ID_Evento da "accodare" quando invece
dovrebbe prendere il relativo ID_EVento che si trova nella sua riga...come
posso risolvere?
Query di accodamento:
-----------------------------------------------------------------------
INSERT INTO tbl_DaFatturare ( ID_Servizio, NumeroServizio, DescServizio,
ImportoServizio )
SELECT tbl_Eventi.ID_Servizio, tbl_Eventi.NumeroServizio,
tbl_Eventi.TipoEvento, tbl_Eventi.ImportoServizio
FROM tbl_Eventi
WHERE (((tbl_Eventi.ID_Servizio)=[Forms]![frm_ElencoEventi]![ID_Servizio]));
------------------------------------------------------------------------
solo ke quando la esegue mi chiede ID_Evento...
Il problema è in maschere continue?
se eseguo la subform frm_ElencoEventi (maschere continue) separatamente lo
chiede lo stesso...
Azz sto facendo? ;(
Help me plz.
Ciao :))
Fabrizio


text:
"Fabrizio Quercia" <
fabrizi...@tin.it
> ha scritto nel messaggio
news:Tp2D9.35320$744.1...@news1.tin.it...
rettifico:
-----------------------
l' ID_Evento me lo chiede solo quando la SubForm è inserita come
sottomaschera a form...
se eseguo la subform singolarmente funziona benissimo!!
come risolvo?
Non la posso eseguire singolarmente per motivi di utilizzo .:) cioe' mi
serve messa come subform nella form...solo ke in questo caso la query mi
chiede l'id
Ciao :)


text:
"Fabrizio Quercia" <
fabrizi...@tin.it
> ha scritto nel messaggio
news:Tp2D9.35320$744.1...@news1.tin.it...
HO RISOLTO :)))
Grazie a tutti !!!....
cmq...io continuo ad essere del'idea che Access 97 RULEZZA di brutto! + di
XP.
Passato il db su access 97 da XP e funziona...bah!
Che abbia scoperto un bug?
Ciao a tutti :)


author: FABIO

text:
Fabrizio Quercia wrote:

> rettifico:
> -----------------------


> come risolvo?

Hai fatto un casino che non capisco nulla, cmq se devi prendere il valore
da una subform usa la sintassi:
[Form]![Nomemaschera]![Nomecontrollosubmaschera].[ID_Evento]
> Ciao :)
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:
"FABIO" <
blue...@libero.it
> ha scritto nel messaggio
news:arilfu$qm9$1...@news.newsland.it...
> Hai fatto un casino che non capisco nulla, cmq se devi prendere il valore
> da una subform usa la sintassi:
io lo chiamo: "caciara" o "burdello" :)))
> [Form]![Nomemaschera]![Nomecontrollosubmaschera].[ID_Evento]
si si, avevo scritto male la stringa, infatti cosi' ho fatto, ma l'errore
c'era lo stesso
> > Ciao :)
Ciao :)


title: Consiglio su programma per farmacia

author: Francesco

text:
Buonasera a tutti,
Un cliente (una farmacia) mi ha chiesto un programma che sia in grado
di acquisire delle ricette mediche mediante scanner, e che consenta di
inviarle in formato xml.
Il programma deve soltanto gestire l'acquisizione e l'invio, non la
contabilità ne tanto meno il magazzino.
Ho delle difficoltà per quanto riguarda la gestione dello scanner...
Ho provato a gestire uno scanner marca HP che includeva un software
ocr readris con relativa libreria gestibile da vba, ma l'ho trovato
ostico non avendo a disposizione una guida per tale classe...
Chiedo a tutti coloro che lavorano nel settore se esiste uno scanner
verticale in commercio che consenta la gestione (Mediante apposita
libreria) in vba (con manuale annesso), o anche un ocr a basso costo
che consenta tali operazioni.
Se la cosa è complicata, sarei altrettanto grato se qualcuno ha dei
suggerimenti in merito.....
Grazie in anticipo a tutto il NG!!


title: Consiglio su programma per farmacia

author: RobertoA

text:

-----------------------------------------
Ma stai parlando di 'riconoscimento caratteri' o di semplice scansione
documento ?
Ricette scritte a mano o a pc ?
So per certo che gli scanner Fujitsu ti producono il pdf ed hanno anche un
ocr integrato, da lanciare a mano sul documento acquisito
Poi certi prodotti tipo Finereader dispongono anche dell'equivalente sdk che
ti permette di avviare il riconoscimento completamente via codice
Se il testo e' scritto a macchina magari c'e' speranza di tirare su qualcosa
di comprensibile
Ciao
RobertoA


title: Consiglio su programma per farmacia

text:

Grazie Roberto
Le ricette sono stampate al computer.
Mi interessa salvare l'immagine ed estrapolare i dati che mi
interessano.
Chiaramente si tratta di fare l'ocr in determinate parti
dell'immagine, corrispondenti a determinati valori, da inserire in una
tabella.
Adesso spulcio qualche informazione sugli scanner Fujitsu e do
un'occhiata a finereader vediamo se riesco a tirar fuori qualcosa...
anche se haimè la vedo dura!
Sono bene accetti altri suggerimenti, grazie!


title: Consiglio su programma per farmacia

author: Sergio MAZZA

text:
"Francesco" <
f.in...@gmail.com
> ha scritto nel messaggio
news:1b24b9c7-4fd7-4e21...@t1g2000pra.googlegroups.com...
Grazie Roberto
Le ricette sono stampate al computer.
Mi interessa salvare l'immagine ed estrapolare i dati che mi
interessano.
Chiaramente si tratta di fare l'ocr in determinate parti
dell'immagine, corrispondenti a determinati valori, da inserire in una
tabella.
Adesso spulcio qualche informazione sugli scanner Fujitsu e do
un'occhiata a finereader vediamo se riesco a tirar fuori qualcosa...
anche se haimè la vedo dura!
Sono bene accetti altri suggerimenti, grazie!
[risposta]
www.sitocomune.com
 Sezione General
6.214 Usare uno scanner con VBA
Poi se cerchi (in questo NG) nei vecchi messaggi di Carlo COSTARELLA + OCR +
WIA, se non ricordo male, ha messo a disposizione un esempio per l'utilizzo
delle librerie MS Office Document Imaging/Scanning...
Ciao.
--
Sergio MAZZA


title: Consiglio su programma per farmacia

author: Carlo Costarella

text:
"Francesco" <
f.in...@gmail.com
> ha scritto nel messaggio
news:693375ec-006a-4e57...@c4g2000hsg.googlegroups.com...


-----------------------------
Sì, come ti ha suggerito Sergio, si è parlato di OCR con le librerie di
Office a partire dalla versione XP.
C'è anche la possibilità di usare le librerie WIA per l'acquisizione delle
immagini. Si tratta di librerie "gratuite" le seconde e insieme ad Office le
prime.
Quanto al riconoscimento ocr di particolari porzioni dell'immagine questo è
possibile specie se le scritte sono in stampatello.
So per certo che le farmacie sono dotate di un software (di Telecom) che,
unito ad uno scanner particolare, riesce a "tradurre" anche lo scritto
manuale e a scannerizzare varie centinaia di ricette in automatico.
Aggiungo che ho appena consegnato un lavoro che prevedeva proprio il
riconoscimento automatico di particolari zone di un foglio A4 passato allo
scanner e utilizzando le librerie di Office Document Imaging.
Se ci sono riuscito io non vedo perchè non dovresti farlo tu.
Ciao, Carlo


title: Maledetto Access 2000 !!! :-)

author: Red

text:
Ciao a tutti....
Quel porcone di Access 2000 ha deciso, di punto in bianco, di non farmi più
aggiungere record a una tabella.....anzi, qualche record me ne fa
aggiungere.....ma poi esce fuori il messaggio "Argomento non
valido"....errore che non è neanche documentato.
Che cosa gli è successo?
Red.


title: Maledetto Access 2000 !!! :-)

author: SimonenomiS

text:
Red <
Ciu...@hotmail.com
> wrote in message
8a087k$n3p$1...@pegasus.tiscalinet.it...

  Hai gia' provato a compattare e ripristinare il DB?


title: Come visualizzare immagini su maschere continue ?

author: Marino Nicoli

text:
E' la prima volta che accedo a questo newsgroup e vorrei chiedere un aiuto
per un problema che ho su una mia applicazione.
Ho una tabella contenente un campo di tipo testo in cui memorizzo il nome di
un file di tipo immagine (bmp o jpg).
Costruendo una maschera singola su questa tabella riesco a visualizzare
l'immagine utilizzando la proprieta Picture sull'evento "su corrente" della
maschera e sull'evento "dopo aggiornamento" del controllo associato al campo
del nome file.
Ora vorrei costruire una maschera continua (da aprire in anteprima di
stampa) o un report che mostri le immagini 'puntate' dai record estratti.
Purtroppo riesco a visualizzare su tutti i record solo l'immagine del primo
o di quello attivo.
Grazie, Marino


author: Roberto da casa

text:
"Marino Nicoli" <
mni...@tiscalinet.it
> ha scritto nel messaggio
news:a5jmo8$poo$1...@pegasus.tiscalinet.it...

Penso che in una maschera continua non è possibile fare in maniera che
all'interno di un controllo immagine si visualizzino immagini diverse a
seconda del record: anche se vengono visualizzati contemporaneamente più
record il controllo immagine è uno solo qd una sola è la sua proprietà
Picture, quindi si dovrebbe visualizzare solo una immagine alla volta.
In un mio database ho risolto inserendo un pulsante di comando nella
maschera continua: a fronte dell'evento su clic del pulsante apro una
maschera popup contenente solo un controllo immagine nella cui proprietà
Picture memorizzo l'indirizzo del file immagine memorizzato nel record
corrente della maschera continua.
Volendo puoi aprire la maschera popup contestualmente alla maschera continua
ed aggiornare la proprietà Picture del controllo immagine della maschera
popup a fronte dell'evento "Su corrente" della maschera continua e a fronte
dell'evento "Dopo aggiornamento" del controllo associato al campo del nome
file.
Quanto al report, non ho provato, ma non credo che dovresti avere problemi
operando a fronte dell'evento "Su formattazione".
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
Roberto, ti ringrazio per due motivi :
1) grazie per il suggerimento dell'evento "su formattazione" di un report :
visto che poi il mio obiettivo e' quello di avere una anteprima di stampa e
poi di poter anche stampare le immagini penso che un report sia una
soluzione migliore rispetto alla maschera.
Ti faro' sapere sul NG se ci sono riuscito.
2)  grazie alla tua risposta ho visto il link a
www.sitocomune.com
 e ci sono
andato :
e' veramente un sito utile ... è già finito tra i "preferiti" del mio
browser.
Ciao e grazie ancora
Marino
Roberto da casa <
r.ma...@libero.it
> wrote in message
E3nf8.39196$v7.14...@twister1.libero.it...



text:
Usando il comando Picture sull'evento "su formattazione" ....
FUNZIONA !!!
Grazie Roberto !
Ciao
Roberto da casa <
r.ma...@libero.it
> wrote in message
E3nf8.39196$v7.14...@twister1.libero.it...
>



title: report con dati 'temporanei'

author: Giancarlo Francesconi dall'ufficio

text:
Salve a tutti.
In A2000 ho un report [anagrafica], che si appoggia su una query parametrica
[query1], in cui visualizzo tra le altre cose:
[nome], [cognome], [indirizzo], .......
Per qualche record del DB vorrei però avere la possibilità di aggiungere
delle informazioni 'temporanee', nel senso che vorrei poter inserire
relativamente ad un record altre info aggiuntive (numeri, testo) solo quando
si tratta di stampare tale record.
E' possibile immettere questi dati solo a livello di report?
Grazie a tutti anticipatamente.
Giancarlo


title: report con dati 'temporanei'

author: MA

text:
Il 26 Mag 2003, 15:12, "Giancarlo Francesconi dall'ufficio" <
thi...@tin.it
>
ha scritto:

creati della caselle di testo non associate sulla maschera e richiamale sul
report.
Così facendo non le salvi ma se sono valorizzate vengono inserite nel
report.
ciao MAssimiliano
--------------------------------
Inviato via
http://usenet.libero.it


title: Problema con funzione "Val"

text:
Ciao a tutti!
Ho un piccolo problema che mi sta facendo impazzire:
Ho Tabella1 che contiene 3 campi:
- Codice Cliente (CODCL)
- Data (DATA)
- Numero Documento (NUM)
Essendo NUM un dato di tipo testo e potendo contenere anche delle
lettere ho creato Query1 su Tabella1 che mi aggiunge un campo
calcolato che mi restituisce il Valore Numerico di NUM, NUMASS. Fin
qui tutto bene: i dolori cominciano quando voglio utilizzare NUMASS ad
esempio per una query parametrica che mi ricerca un valore numerico in
NUMASS. Mi viene continuamente restituito l'errore di dati non
compatibili! Dove sbaglio? NUMASS non è utilizzabile?
Ciao e grazie!


title: Problema con funzione "Val"

author: Karl Donaubauer

text:

Spesso il problema è che Val() dà un errore se il campo è vuoto.
Prova con:
iif(Not IsNull([NUM]),Val([NUM]))
Se non aiuta guarda nel risultato della query se vedi #errore in alcuni
record e controlla quali sono i valori del campo NUM in questi record.
Se non trovi la causa presenta esempi dei tuoi dati, espressioni e criteri.
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: valore minimo e massimo

author: francesco

text:
Se imposto una ricerca per date del tipo:
dammi tutti i record nell'intervallo da 01/02/2004 a 03/02/2004
il risultato è la lista di tutti i record dell'1 e del 2/02/2004 ma del 3
nulla.
in genere la query la imposto con:
>=datain and <=datafin
è corretto?
grazie
F
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: valore minimo e massimo

author: Ivan

text:
"francesco" <
fran...@tin.it
> ha scritto nel messaggio
news:82Z49Z81Z191Y1...@usenet.libero.it...
> Se imposto una ricerca per date del tipo:
>
> dammi tutti i record nell'intervallo da 01/02/2004 a 03/02/2004
>
> il risultato č la lista di tutti i record dell'1 e del 2/02/2004 ma del 3
> nulla.
>
> in genere la query la imposto con:
>
> >=datain and <=datafin
>
> č corretto?
>
> grazie
>
> F
>
> --------------------------------
> Inviato via
http://arianna.libero.it/usenet/
io penso che sia piů indicato usare BETWEEN
es :   [mioCampoData] BETWEEN #12/21/2003# AND #01/30/2004#
ricorda che il formato data tra ## deve essere all'americana  #MM/GG/AAAA#
spero di aver centrato il problema
ivan


title: valore minimo e massimo

author: Maicol

text:
"francesco" <
fran...@tin.it
> ha scritto nel messaggio
news:82Z49Z81Z191Y1...@usenet.libero.it...
> Se imposto una ricerca per date del tipo:
>
> dammi tutti i record nell'intervallo da 01/02/2004 a 03/02/2004
>
> il risultato è la lista di tutti i record dell'1 e del 2/02/2004 ma del 3
> nulla.
>
> in genere la query la imposto con:
>
> >=datain and <=datafin
>
> è corretto?
>
> grazie
>
> Pur dipendere dal fatto che nel campo data ci sia anche l'ora


title: Risultato di 3 query in excel.

author: Luca

text:
Ciao a tutti,
avrei bisogno di un vostro consiglio:
Ho creato un db con diverse tabelle con dati differenti (es.
Tabella1,tabella2 e tabella3)
Per ogni tabella ho creato una query che mi estrapola alcuni dati
(query1,query2,query3).
Come faccio a raccogliere i dati di tutte e 3 le query ed esportarne il
contenuto in un unico file excel ?(mi andrebbe bene anche un report)
E' possibile?
Attualmente utilizzo 3 report diversi.
Grazie a tutti
Luca
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Risultato di 3 query in excel.

text:
"Luca" <
gcaire...@tiscali.it
> ha scritto nel messaggio
news:194Z185Z233Z6Y1...@usenet.libero.it...
> Ciao a tutti,
> avrei bisogno di un vostro consiglio:
> Ho creato un db con diverse tabelle con dati differenti (es.
> Tabella1,tabella2 e tabella3)
> Per ogni tabella ho creato una query che mi estrapola alcuni dati
> (query1,query2,query3).
> Come faccio a raccogliere i dati di tutte e 3 le query ed esportarne il
> contenuto in un unico file excel ?(mi andrebbe bene anche un report)
> E' possibile?
> Attualmente utilizzo 3 report diversi.
> Grazie a tutti
>
> Luca
Cosě come la racconti sembrerebbe che sia sufficiente mettere le tre tabelle
in join in una query che imposterai come origine record di un report che poi
esporterai in excel.
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Risultato di 3 query in excel.

text:
Ciao Roberto,
grazie per aver risposto.
scusami ma forse non mi sono spiegato bene.
Io vorrei creare un'unico report contenente il risultato di 3 query
(query1,query2,query3), ognuna delle quali punta su una tabella diversa (con
dati completamenti diversi).
Come posso fare? come faccio a mettere in join le tre tabelle?
Grazie ancora
Luca
 Il 22 Gen 2005, 16:31, "Roberto da casa" <
r.masso...@libero.it
> ha
scritto:




title: Risultato di 3 query in excel.

text:
"Luca" <
gcaire...@tiscali.it
> ha scritto nel messaggio
news:213Z215Z179Z170...@usenet.libero.it...
> Ciao Roberto,
> grazie per aver risposto.
> scusami ma forse non mi sono spiegato bene.
> Io vorrei creare un'unico report contenente il risultato di 3 query
> (query1,query2,query3), ognuna delle quali punta su una tabella diversa
(con
> dati completamenti diversi).
> Come posso fare? come faccio a mettere in join le tre tabelle?
Un report, come di contro una maschera, può avere una sola origine record.
Se le tre queries contengono dati non omogenei penso che una soluzione
potrebbe essere quella di fare un report principale che contiene tre
sottoreport, ognuno dei quali ha come origine record una delle tre queries;
ma probabilmente puoi anche risolvere creando tre differenti report che poi
eseguirai in sequenza.
D'altra parte se i dati delle tre queries sono disomogenei non credo tu
possa creare un'unica query unione o risultante dla join delle altre tre
queries, la quale poi imposteresti come origine record del report.
> Grazie ancora
>
> Luca



title: Togliere Strumenti Menu solo se applicativo .mde

text:
Salve a tutti, ho questo piccolo problema:
Ho una form piuttosto "carica" di informazioni, per la quale mi è necessario
sfruttare tutto lo schermo.
Sicoome in fase di programmazione, usando il mio mdb (A97), ho la necessità
di visualizzare tutti gli strumenti dei menù, non ha importnza se la
schermata intera riesco a vederla scorrendo la barra verticale. L'utente
però, che userà il mio mde, ha non poche diffcoltà a far questo, quindi mi
domandavo:
C'è la possibilità, in fase di avvio, di impostare un controllo in cui, se
l'appl. è .mde, gli strumenti non necessari vengano tolti?
Grazie a tutti per l'aiuto
Marco


author: Oscar Manfredini

text:
"Marco_280167"

Direi di sì: anzitutto per capire se il file è in formato MDE dovresti
sfruttare le properties dell'oggetto DataBase (cerca nell'Help "proprietà
MDE").
Per nascondere poi delle barre strumenti, puoi usare:
Application.CommandBars(NomeBarra).Visible=False
Ciao!


text:
"Oscar Manfredini" <
oscar.ma...@libero.it
> ha scritto nel messaggio
news:47dffaed$1$10628$4faf...@reader2.news.tin.it...

Perfetto!
Grazie 1000 Oscar
Saluti
Marco


title: estrarre parole da un controllo

author: antonio v.

text:
Ora che finalmente ho un po' di tempo a disposizione vorrei trovare il modo
per realizzare un unico controllo da cui vengano estratte le parole utili
(eventualmente delimitate da spazi o caratteri) per filtrare dei record in
una tabella.
Per una applicazione recentemente ultimata (e soprattutto grazie all'aiuto
di Roberto) ho efficacemente utilizzato allo scopo un'espressione nei
criteri di una query che però limitava a 2 il numero delle parole da poter
estrarre dal controllo. Nella stessa occasione mi è stata proposta una
funzione realizzata da Claudio che estrae un dato numero di parole da una
stringa. Ora vorrei capire meglio come -praticamente- posso sfruttare questa
funzione. Premetto che sul sito comune ho dato un'occhiata alla FAQ
intitolata "Filtrare
una maschera in base a una o più parole o frasi contenute all'interno di un
suo controllo" ma qui in realtà viene estratta una parola per ogni casella
di controllo, mentre io vorrei che il controllo fosse unico.
Ad ogni buon fine invio la funzione di Claudio e ringrazio
' ************************************************************
  Public Function EstraiParole( _
    ByVal Stringa As String _
  , Optional ByVal DaParola As Long = 1 _
  , Optional ByVal NumeroParole As Long = 1 _
  , Optional ByVal Delimitatori As String = " " _
  , Optional ByVal Separatore As String = " " _
  ) As String
' ------------------------------------------------------------
' Questa funzione serve per estrarre "NumeroParole" parole
' dalla stringa "Stringa", partendo dalla parola "DaParola".
' Per parola si intende tutto ciò che nella stringa
' viene separato facendo uso di un qualunque carattere
' contenuto in "Delimitatori".
' Se si specifica 0 come "NumeroParole" si ottiene l'insieme
' dalle parole dalla parola "NumeroParola" fino alla fine.
' Accetta valori negativi per l'argomento "DaParola", con il
' significato "le ultime n parole".
' Per esempio, DaParola=-3 significa dalla terzultima parola.
' Specificando una stringa in "Separatore", è possibile
' impostare la stringa che dividerà le "parole" nell'output
' finale.
' ------------------------------------------------------------
' Esempi:
' EstraiParole("Questa, *è* una -frase-", 2, 2, " ,*-")
'   --> "è una"
' EstraiParole("Questa, *è* una -frase-",,0," ,*-")
'   --> "Questa è una frase"
' EstraiParole("Questa, *è* una -frase-",,0," ,*-",";")
'   --> "Questa;è;una;frase"
' EstraiParole("Questa, *è* una -frase-",-2,0," ,*-")
'   --> "una frase"
' EstraiParole("Questa, *è* una -frase-",-2,0," ,*")
'   --> "una -frase-"
' ------------------------------------------------------------
' Scritta da Claudio, con preziosi consigli da parte di
' tutto il newsgroup it.comp.appl.access.
' Grazie a Maurizio, Alessandro e Marco.
' Ultimo aggiornamento novembre 2002
' ------------------------------------------------------------
  Dim ParolaArray() As String
  Dim i             As Long
  Dim vbNullChar2   As String
' ------------------------------------------------------------
  For i = 1 To Len(Delimitatori)
    Stringa _
      = Replace( _
            Stringa _
          , Mid$(Delimitatori, i, 1) _
          , vbNullChar)
  Next i
  vbNullChar2 = vbNullChar & vbNullChar
  While InStr(Stringa, vbNullChar2)
    Stringa = Replace(Stringa, vbNullChar2, vbNullChar)
  Wend
  If (Len(Stringa) < 2) Then
    EstraiParole = Stringa
    Exit Function
  End If
  If (Left$(Stringa, 1) = vbNullChar) Then
    Stringa = Mid$(Stringa, 2)
  End If
  If (Right$(Stringa, 1) = vbNullChar) Then
    Stringa = Left$(Stringa, Len(Stringa) - 1)
  End If
  ParolaArray = Split(Stringa, vbNullChar)
  If (DaParola < 0) Then
    DaParola = UBound(ParolaArray) + DaParola + 2
  End If
  If (DaParola <= 0) Then
    DaParola = 1
  End If
  If (DaParola > (UBound(ParolaArray) + 1)) Then
    DaParola = UBound(ParolaArray) + 1
  End If
  If ( _
       (NumeroParole = 0) _
       Or _
       ((DaParola + NumeroParole) > (UBound(ParolaArray) + 2)) _
  ) Then
    NumeroParole = UBound(ParolaArray) - DaParola + 2
  End If
  EstraiParole = ParolaArray(DaParola - 1)
  For i = DaParola To DaParola + NumeroParole - 2
    EstraiParole = EstraiParole & Separatore & ParolaArray(i)
  Next i
End Function


title: Intercettare il valore SQL di una query

author: Xymox

text:
Ho una query Q1 e dovrei fare diventare uguale un'altra query Q2.
Quale metodo mi consigliate di seguire per fare questo attraverso codice ?
Avevo pensato di intercettare, se è possibile, la stringa SQL di Q1 poi la
passo a Q2 attraverso Querydef ... Q2.SQL="stringa di Q1".
Stò sparando una cavolata ?
grazie
marco s.


title: Intercettare il valore SQL di una query

text:
"Xymox" <
marcosanti...@people.it
> ha scritto

fatto :-)
Dim db As Database, Q1 As QueryDef, Q2 As QueryDef
Set db = CurrentDb
Set Q1 = db.QueryDefs("Q_Ric_sql")
Set Q2 = db.QueryDefs("Q_AssDati_sql")
Q2.SQL = Q1.SQL


title: Workgroup, autenticazione sql express 2005, Impossibile stabilire una  connessione

text:
Ciao ho installato sql express 2005 su pc con winxp sp2 autenticazione
windows, il pc "Socrate" fa parte di workgroup con altri due pc (vaio-
xp) sempre con winxp sp2. Sul pc "Socrate" ho fatto un upsize di un
mdb e riesco ad aprire il file mdb e visionare le tabelle collegate a
sql; il problema invece è come faccio da gli altri due pc (vaio-xp) ad
accedere alle tabelle collegate a sql ? Se tento di aprire una delle
tabelle mi viene restituito errore "Impossibile stabilire una
connessione". Premetto che in fase di installazione sql express ho
seguito la guida, quindi attivatto protocolli di rete, ecc. Secondo me
il problema riguarda l'autenticazione (non ho capito veramente niente
nella guida). Come dovrei fare per far accedere gli altri pc alle
tabelle collegate di sql? Sareste così gentili da spiegarmi questa
benedetta autenticazione windows e mista(sa, guest, dbo)?


text:

Spesso è un problema di abilitazione al TCP, di porta 1433, di named istance ed infne di firewall
Nulla di tutto questo ha ache fare con Access
Nella superficie di attacco devi settare l'abilitazione di TCP/IP
Allostesso modo usa la porta 1433 oppure se usi la porta dinamica abilita nel firewall SqlBrowser.exe
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


text:

Ciao Massimiliano, ho fatto la stessa operazione all'interno di un
dominio (win 2003 server), abilitazione windows e tutto funziona
perfettamente; se invece cerco di ricreare la stessa situazione in
workgroup con altri pc non so come farli comunicare con tabelle sql
server, chiaramente ad eccezione del pc (Socrate) dove è installato
sql express. Puoi farmi un esempio di come dovrei configurare
(autenticazioni, ecc) il mio db su sql per farvi accedere anche gli
altri utenti del workgroup? Ti sarei grato è dir poco.


text:

http://groups.google.it/group/microsoft.public.it.sql/search?hl=it&q=express+connettersi&hl=it&
--
--
MAssimiliano Amendola
www.accessgroup.it



text:

>
http://groups.google.it/group/microsoft.public.it.sql/search?hl=it&q=.
..
> --
> --
> MAssimiliano
Amendolawww.accessgroup.it
> Cisa - Conferenza Italiana Sviluppatori Access- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
Non è molto semplice! Che giro della miseria


text:

Prenditela con Sql non con Access
--
--
MAssimiliano Amendola
www.accessgroup.it



text:

Ah certo! Grazie


title: Aprire il Driver TWAIN da access

author: andreaf

text:
Salve.
Ho postato un post tempo prima chiedendo se era possibile scannerizzare da
access.
Ho provato con il controllo ActiveX di Kodak ma non mi è riuscito.
Girando per il web ho letto che è possibile aprire il TWAIN da access ma non
come poterlo fare.
Qualcuno può illuminarmi?
Grazie


title: Aprire il Driver TWAIN da access

text:
"andreaf" <
the...@libero.it
> ha scritto nel messaggio
news:qoOQd.50003$2h5....@tornado.fastwebnet.it...

Vai sul Sito Comune (link qui sotto) e nella Sezione General leggi la mia
FAQ intitolata "Come è possibile scannerizzare, visualizzare, modificare,
stampare e salvare files immagine usando gli ActiveX Kodak?"; leggila tutta
compresa l'anotazione di Carlo Costarella che si troca in calce alla FAQ.
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Pulsante X

author: Sandrobi

text:
Premetto che ho già visto i thread che riguardano il controllo della chiusura di una maschera. Ma c'è un modo per riconoscere che è stato premuto il pulsante X della barra del titolo. Non voglio usare l'api che lo nasconde.
Chissa?
--
Ciao, Sandrobi
"De quo nihil dici potest, id tacendum est" (L. Wittgenstein, "Tractatus logico-philosophicus")


title: Pulsante X

author: Nick

text:
Sandrobi ha detto: in data 29/08/2005 14.14:
> Premetto che ho già visto i thread che riguardano il controllo della chiusura di una maschera. Ma c'è un modo per riconoscere che è stato premuto il pulsante X della barra del titolo. Non voglio usare l'api che lo nasconde.
>
> Chissa?
sul sito comune c'è un esempio di come bloccare la chiusura
dell'applicativo.
Ciao
Nick
ps usa subject più significativi


title: Pulsante X

author: namor

text:
Sandrobi ha scritto:
> Premetto che ho già visto i thread che riguardano il controllo della
chiusura di una maschera. Ma c'è un modo per riconoscere che è stato premuto
il pulsante X della barra del titolo. Non voglio usare l'api che lo nasconde.
> Chissa?
Non serve usare le API per nascondere la X. Nelle proprietà della
maschera, scheda Formato, c'è la proprietà "Pulsante chiusura".
Namor
--
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Variabili e report !!

author: Linux

text:
Buondi',
vorrei stampare su un Report il valore di alcune variabili che pero' vengono
calcolate premendo un bottone, il report viene eseguito premendo un altro,
e' possibile o devo far rieseguire i calcoli all'interno del comando del
report? in che modo?


title: Variabili e report !!

author: Antonio Ganci

text:

Se i calcoli sono memorizzati in una casella di testo di una maschera
puoi all'interno del report fare riferimento al controllo impostando
come origine dati il seguente testo:
Forms![Nome della maschera]![Nome del controllo]
Attenzione: Quando lanci il report la maschera deve essere aperta.


title: Variabili e report !!

author: omnitow

text:
"Linux" <
li...@fol.it
> ha scritto nel messaggio
news:ah8dgo$3np$1...@newsreader.mailgate.org...

all'interno di un modulo generico scrivi una funzione del genere:
Public Function DammiVariabile() as Variant
    DammiVariabile = MiaVariabile
end function
mentre in un controllo del report scrivi:
= DammiVariabile()
in anteprima nel campo ti apparirą il valore della variabile
ciao omnitow


title: Variabili e report !!

author: Giuseppe

text:
non puoi utilizzare delle variabili globali ?
ho capito bene?
ciao
Giuseppe
"Linux" <
li...@fol.it
> ha scritto nel messaggio
news:ah8dgo$3np$1...@newsreader.mailgate.org...



title: Variabili e report !!

text:
Questo lo so', non so' come stampare su di un report il valore di una
variabile.
Finche' si tratta di campi di testo, label, combo etc.. non ci sono
problemi,
quello che cerco di fare e' stampare le variabili.
Se avete idee, comunque grazie.


title: Variabili e report !!

text:
"Linux" <
li...@fol.it
> ha scritto nel messaggio
news:ah9utk$bb2$1...@newsreader.mailgate.org...

scusa ma non riesco a capire..... intendi che access inserisca il valore di
una variabile una sezione di un report senza alcun controllo al suo interno?
se è questo che vuoi fare forse chiedi un po' troppo, altrimenti le
soluzioni possono essere 2:
1- come ti ho già risposto, dimenticavo solo una cosa
nel modulo dove scrivi la Function, a livello di modulo, dichiara come
Public la tua variabile e imposti il valore da dove ti pare
2- all'interno di un'evento del report in questione, per esempio "su stampa"
scrivi:
MioControllo.value= MiaVariabile
saluti omnitow


OT.Preti Pedofili, ASSASSINI  Dell' ANIMA+altro
Cassazione. Confermata condanna a 6 anni e 8 mesi a don Marco Cerullo, prete
pedofilo.
La settima sezione penale della Cassazione ha confermato la condanna a 6
anni e 8 mesi di reclusione per don Marco Cerullo.
Il viceparroco a Casal di Principe e insegnante di religione a Villa
Literno, fu arrestato in flagranza dai Carabinieri di Casal di Principe il
19 dicembre 2007, in campagna, mentre violentava un suo alunno di 11 anni.
Alla vista dei Carabinieri il prete tentava una precipitosa fuga in auto,
interrotta dall'arresto.
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
Natzi, pu� un FROCIO, fare il PAPA ?+SATAN
Caro Natzingher, secondo te, pu� un FROCIO fare il PAPA ?
Se � il vicario di Cristo, vero uomo, ma non VERO DIO,  non  pu� :
Cristo, per quanto EBREO, aveva le donne, accanto a s� ...
Noi cattolici, come  ce ne possiamo accertare, che il PAPA, non sia un
FROCIO, come tanti che si nascondono nella CHIESA, rifugio di  Pedofili,  di
Ladri di Brevetti, di  Capi della Banda della Magliana, di Assassini, di
SATANA  in  BASILICA A ROMA, A S. Apollinare, ..
s�   SATANA  nella  casa  di  DIO- Abominio  da  FROCI.
Vattene  NATZINGHER,  prima  che  trascini  TUTTI   I  TUOI  BALORDI  NELLA
MERDA !!!
Andateerne  da  Roma,  FROCCCCCCCCCIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII !!!!
xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
Papa, perch� SATANA in Chiesa, a Roma ?
Si, caro Papa, dicci perch� continuate a tenere in chiesa la tomba del
famoso killer RENATINO, nella basilica di Sant'Apollinare.
E' come aver portato SATANA nella casa di Dio, in nome di CRISTO !
Ecco il motivo per cui le Madonnine piangono !
Ma  non  �  ora  di  finirla,  DI  RUBARE  BREVETTI  A ROMA, SICURI  CHE
NESSUNO SE NE ACCORGE,  per  LE MASSONERIE   CATTOLICHE   AMICHE  TUE
????????
ROVINARE FAMIGLIE INTERE PER RUBARE, AMMAZZARE, DISTRUGGERE LE OPERE DI
RICERCATORI   POVERI  DISGRAZIATI !!!!!
Calpestare  tutti i diritti umani, nel nome di CRISTO  ???
MA  NON  TI VERGOGNI, TU  E   I  COMPARI  TUOI   ?
Non vi basta  INCULARVI  i  Ragazzini,  per  SECOLI, da  quello che si pu�
immaginare  ?
E  tutto questo in base ad una Religione tutta piena di menzogne, inventate
di sana pianta da Saulo di Tarso, che doveva fare una  CHIESA  PIENA  DI
SOLDI,  BASATA  SULLA  MENZOGNA,  ED  APPORTATRICE  DI SANGUE  DI  PERSONE
INNOCENTI  !!!!
PER  FARE  CI� SAULO  HA  NASCOSTO IL VANGELO  DI  BARNABA,  che  diceva  la
verit�  : "Ges�  vero uomo e non anche vero DIO !"  -  DIO  �  UNICO E NON
HA FIGLI  -  RATZINGER  DATI UNA REGOLATA, E VATTENE  DA  ROMA,  A  COPRIRE
LE  TUE  VERGOGNE  DA  QUALCHE ALTRA PARTE-   COME  CATTOLICO MI VERGOGNO
DI  ESSERE  VICINO A TE.
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
ZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZZ
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
W. l' AMERICA ! - No ai  Balordi VATICANI - LADRONI E  ASSASSINI
13,8 milioni di Risarcimento a Persona, vittima dei balordi Vaticani !!!
Questo � il rimedio per il PAPA  E  i  SUOI  COMPARI  !!!
===========================================
-----------------------------------------------------------------
Centinaia di testimonianze su abusi compiuti tra il 1965 e il 1985
Pedofilia, Boy Scout Usa nel mirino
L'associazione condannata a versare 13,8 milioni di euro di risarcimento a
un uomo vittima di abusi
Centinaia di testimonianze su abusi compiuti tra il 1965 e il 1985
Pedofilia, Boy Scout Usa nel mirino
L'associazione condannata a versare 13,8 milioni di euro di risarcimento a
un uomo vittima di abusi
PORTLAND - Il fronte della pedofilia si estende anche ai Boys Scouts
americani. Un tribunale dell'Oregon ha condannato l'associazione a versare
18,5 milioni di dollari (pari a 13,8 milioni di euro) di risarcimento a un
uomo vittima di abusi sessuali commessi da un ex capo scout.
CENTINAIA DI TESTIMONIANZE - Gli avvocati di Jerry Lewis, che avevano
chiesto 25 milioni di dollari di risarcimento per punire la condotta
"indegna e vergognosa" dell'imputato, hanno sottolineato che
l'organizzazione
non ha mai presentato le sue scuse alla vittima. Gli avvocati sono riusciti
a raccogliere centinaia di testimonianze di abusi compiuti tra il 1965 e il
1985 in seno ai Boys Scouts americani, dimostrando che l'organizzazione non
poteva essere all'oscuro e provando la negligenza nel prevenire il ripetersi
degli abusi.
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
Nazingher ed i ladri di Brevetti a Roma, o RENATINI ?
Quousque Tandem, Nazi,  Renatinus Vaticanorum  abutere PATIENTIAE  NOSTRAE
?
What  BLAME  have  you in  that  SHAME  ?
Quale � la tua corresponsabilit�  NEL  FURTO  SISTEMATICO  DEI  BREVETTI
ITALIANI,  PASSATI  E SVENDUTI  AL  MOSSAD, IN UN  INTRIGO  CRIMINALE ?
QUALE  �  IL  RUOLO  delle  MASSONER�E  BIANCHE,  CHE  PROLIFERANO  NEL
NOME  DI  CRISTO,  LORDE  DI  CRIM9INI E DI SANGUE   ?
QUALE  �  LA  CORRRRRRRESPONSABILIT�  DELLA  MAFIA  VATICANA  NEGLI  OMICIDI
DI   GALIZIA  GIULIA  GIORGIA,  uccisa  con  farmaci  per  diabetici   E
NELL'EFFERATO  DELITTO DI  NATALE   2009  (Avete Consacrato  la  vittima  di
NATALE ?)  di  Antonio  FERRIGNO  a  L'Aya,  che  ha  fatto cadere  il
governo  Olandese  per  la  sua  vergogna  ?????
Chiarisci  NAZINGHER  E  SPARISCI  DALL'ITALIA  CON  I  TUOI   MAFIOSI
!!!!!
Aki
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
Papa, Pedofili, Pederasti e Sindone. - Perk� ?
Perk�, caro Papa, ci mostri la Sindone, invece di risolvere il problema
secolare, che solo oggi si � svelato grazie ad internet ?
Perk�  usi un argomento  infondato  per  rispondere alle accuse pesantissime
e fondatissime, che avvolgono la Chiesa  Cattolica ?
Tu sai benissimo quello che la gente non sa : Dai manoscritti di QUMRAM
risulta che Ges�  NON  �  MAI  SALITO  SULLA CROCE   !!!!!
Che senso ha la SINDONE  dunque ?
UN'ALTRA IMPOSTURA  che  dai in pasto ad un popolo  ANCORA   DISINFORMATO .
Un reperto del Medioevo, risalente al 700 dopo Cristo, datato al Carbonio 14
!
E' un'altro modo per ASSASSINARE NELL'ANIMA LE VITTIME DEI TUOI PEDOFILI,
PEDERASTI  ED  ASSASSINI  LADRI  DI  BREVETTI  ?
LO so che �  solo  per  scappare  LONTANO  DALLA VERIT�  !!!
Non  hai  il  coraggio  di affrontare la  verit�:  MA  LA  VERIT�  STA
VENENDO  A  GALLA  RAPIDAMENTE !!!
LA MERDA  VI  SOMMERGER�.
Almeno  vi  profuma !
SATANA  RIDE  DAL  SUO  TRONO  CHE  VOI  AVETE  ONORATO  TANTO  BENE.
LE  MADONNE  PIANGONO  PER  LE  VERGOGNE  E  LE  FERITE  DATE  A  CRISTO !
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
Prete MAIALE   incastrato dalle IENE  -  PAPA Ke ne dici del COLLEGA  ?
Ovviamente i cattolici che vedranno queste immagini,   SANNO   G�A  che non
sono vere
ma trasmesse telepaticamente da satana
per fomentare   IL  CHIAKKIERICCIO  SODANICO   (O  SATANICO  ?).
http://tinyurl.com/ycjmzzt
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
PAPA, Cambiare le Coscienze ? Comincia TU ! - Abbamdona la MAFIA !!!
Santit�, abbandona  FORZA  MAFIA al suo destino di MERDA !!!
Allontana SATANA, in elegante abito  di  Pelle di Leopardo (Pdl)
dalla  CHIESA  di  CRISTO  !!!
NON SONO SOLO I PEDOFILI E PEDERASTI  I  TUOI PROBLEMI !
Anche gli assassini ed i ladri di brevetti, devono uscire A  CALCI  DALLA
CHIESA, che non deve essere  POSTRIBOLO  DI  VELINE   e/o TRANS   !!!
ANCHE  I  RENATINI  ED  I  LORO   Padrini  devono  andare  via, a casa di
SATANA,
E  NON  SATANA  ENTRARE  NELLE BASILICHE !!!!
TI VOGLIAMO BENE, ma  SE TE NE VAI � MEGLIO per tutti. .
Aki
___________________________________________________________
 Nazingher ed i ladri di Brevetti a Roma+PEDO
Quousque Tandem, Nazi,  Renatinus Vaticanorum  abutere PATIENTIAE  NOSTRAE
?
What  BLAME  have  you in  that  SHAME  ?
Quale � la tua corresponsabilit�  NEL  FURTO  SISTEMATICO  DEI  BREVETTI
ITALIANI,  PASSATI  E SVENDUTI  AL  MOSSAD, IN UN  INTRIGO  CRIMINALE ?
QUALE  �  IL  RUOLO  delle  MASSONER�E  BIANCHE,  CHE  PROLIFERANO  NEL
NOME  DI  CRISTO,  LORDE  DI  CRIM9INI E DI SANGUE   ?
QUALE  �  LA  CORRRRRRRESPONSABILIT�  DELLA  MAFIA  VATICANA  NEGLI  OMICIDI
DI   GALIZIA  GIULIA  GIORGIA,  uccisa  con  farmaci  per  diabetici   E
NELL'EFFERATO  DELITTO DI  NATALE   2009  (Avete Consacrato  la  vittima  di
NATALE ?)  di  Antonio  FERRIGNO  a  L'Aya,  che  ha  fatto cadere  il
governo  Olandese  per  la  sua  vergogna  ?????
Chiarisci  NAZINGHER  E  SPARISCI  DALL'ITALIA  CON  I  TUOI   MAFIOSI, I
TUOI  PEDOFILI,  ED  I  TUOI  PEDERASTI !!!!!!!!!
Aki
========================================================================
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
La GALLERIA  DELLE  PERLE  DEI  BALORDI  :
Vescovo Cirillo, fatto santo :
Autore dell'assassinio di IPAZIA, illustre scienziata di Alessandria di
Egitto
Saulo, fatto santo : Inventore di tante bugie, sulla natura divina di
Cristo.
Ha provveduto a nascondere il vangelo di Barnaba, apostolo di Ges�, perch�
diceva la verit�,
ossia che Ges� faceva miracoli, ma era un vero uomo.
Sindone :  Oggetto del MEDIOEVO,  aggiustato e propagandato
per abusare della credulit� popolare.
Cardinale Roberto Bellarmino, fatto santo :
Assassino di Giordano Bruno, fatto bruciare sul rogo, per eccesso di
intelligenza.
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
NUOVE  ACCUSE  AL  PAPA   RATZINGER
ROMA - Torna il nome di Papa Ratzinger in un nuovo caso di pedofilia che va
ad aggiungersi a quelli gi� rivelati nelle scorse settimane. Un uomo che
afferma di essere stato vittima di violenze sessuali da parte di un
sacerdote cattolico pedofilo ha accusato il Vaticano e Benedetto XVI di
avere protetto il sacerdote, mantenendolo al suo posto. La denuncia arriva
dai legali della vittima - il cui nome resta coperto dall'anonimato - che
hanno inviato all'agenzia di stampa France Press alcuni documenti: le carte
dimostrerebbero che il nunzio apostolico a Washington, Luigi Raimondi, aveva
chiesto alla Chiesa di Miami, in Florida, di proteggere padre Ernesto Garcia
Rubio, prete di origini cubane, che aveva dovuto lasciare l'isola caraibica
nel 1968 in seguito a problemi di "natura morale".
"Padre Rubio � stato in carica in una parrocchia di Miami per trent'anni e
siamo stato al corrente di decine di vittime dei suoi abusi durante tutto
questo tempo", afferma Jessica Arbour, legale dell'uomo che denuncia di
avere sub�to molestie sessuali quand'era adolescente, negli anni fra il 1985
e il 1987. L'uomo ha denunciato l'arcidiocesi di Miami e ha chiesto un
risarcimento di 20 milioni di dollari.
"E' evidente che ci sia stato uno sforzo concertato, a tutti i livelli, dal
Vaticano all'arcidiocesi di Miami, passando per la diocesi di Cuba, per
proteggere il sacerdote", aggiunge Arbour, che accusa Ratzinger, allora
prefetto della Congregazione per la dottrina della fede (incarico che
l'attuale pontefice ricopr� dal 1981 al 2005), di aver "protetto i pedofili
a spese dei parrocchiani e delle loro famiglie".
L'accusa � la terza, in una settimana, secondo la quale Ratzinger, all'epoca
cardinale, avrebbe chiuso gli occhi su scandali di pedofilia fra i
sacerdoti. Nei giorni scorsi il caso di padre Murphy, sacerdote del
Winscounsin, accusato di aver abusato di duecento bambini sordomuti fra il
1950 e il 1970 e quello, in Germania, che riguarda lo spostamento ad altra
parrocchia  di un sacerdote accusato di pedofilia.
(31 marzo 2010) Tutti gli articoli di Esteri


title: Maschera con tabella a schede si vede bianca

text:
Ciao a tutti ! rinnovo questa richiesta, in quanto non reisco a venirne
a capo. Mi spiego
Ho una maschera con un tabella a schede. La maschera ha uno sfondo
incorporato, ed una tabella a schede, che ho reso trasparente. Il Db in
Access 2003 risiede su un server.
Alcun utenti lamentano che quando si apre questa maschera, la tabella
si vede bianca. Ho provato a dargli il colore di default ma nulla.
Ho provato anche con un altro Db che mi funzionava regolarmente in
Access '97, portato in A 2003 ha lo stesso problema. Ritengo pertanto
che si a un problema di librerie. Vi è mai capitato ??? Come lo posso
risolvere ?