title: Imposta pagina -- per MA

author: Michele

text:
Il seguente codice potrebbe anche funzionare, ma io sono un novellino e non
riesco a farlo funzionare. Credo che dovrei fare una maschera aggiuntiva per
inserire i margini, o sbaglio?
Se per te non è un problema potresti indicarmi una applicazione dove già è
presente questo codice. Per me è più semplice.
Grazie Mille
Michele
Your Message:
Modulo Imposta pagina
Type str_DEVMODE
    RGB As String * 94
End Type
Type type_DEVMODE
    strNomeDispositivo As String * 16
    intVersioneSpec As Integer
    intVersioneDriver As Integer
    intDimensione As Integer
    intDriverExtra As Integer
    lngCampi As Long
    intOrientamento As Integer
    intDimensFoglio As Integer
    intLunghezzaFoglio As Integer
    intLarghezzaFoglio As Integer
    intScala As Integer
    intCopie As Integer
    intOriginePredef As Integer
    intQualitàStampa As Integer
    intColore As Integer
    intDuplex As Integer
    intRisoluzione As Integer
    intOpzioneTT As Integer
    intFascicola As Integer
    strNomeMaschera As String * 16
    lngTitolo As Long
    lngBit As Long
    lngPW As Long
    lngPH As Long
    lngDFI As Long
    lngDFr As Long
End Type
Sub ImpostaPagina(rptNome As String)
    Dim StringaPer As str_DEVMODE
    Dim DM As type_DEVMODE
    Dim strModalitàExtraPer As String
    Dim rpt As report
    Dim Lungh As Integer
    Dim Largh As Integer
    Dim ori As String
    DoCmd.OpenReport rptNome, acDesign
    Set rpt = Reports(rptNome)
    Lungh = Forms!dimensioniFoglio!Lunghezza
    Largh = Forms!dimensioniFoglio!larghezza
    ori = Forms!dimensioniFoglio!Orientamento
           strModalitàExtraPer = rpt.PrtDevMode
           StringaPer.RGB = strModalitàExtraPer
           LSet DM = StringaPer
            DM.lngCampi = DM.lngCampi Or DM.intDimensFoglio Or
DM.intLunghezzaFoglio _
                Or DM.intLarghezzaFoglio
            DM.intDimensFoglio = 256
            DM.intOrientamento = ori
            DM.intLunghezzaFoglio = Lungh * 256
            DM.intLarghezzaFoglio = Largh * 256
            LSet StringaPer = DM
            Mid(strModalitàExtraPer, 1, 94) = StringaPer.RGB
            rpt.PrtDevMode = strModalitàExtraPer
End Sub
Dalla maschera
Private Sub VerificaFoglio_Click()
On Error GoTo Err_VerificaFoglio_Click
    Dim stDocName As String
    ImpostaPagina ("Foglio")
    stDocName = "Foglio"
    DoCmd.OpenReport stDocName, acPreview
Exit_VerificaFoglio_Click:
    Exit Sub
Err_VerificaFoglio_Click:
    MsgBox err.Description
    Resume Exit_VerificaFoglio_Click
End Sub


title: Imposta pagina -- per MA

author: MA

text:
"Michele" <
miste...@libero.it
> ha scritto nel messaggio
news:WBUrb.108779$e6.39...@twister2.libero.it...
> Il seguente codice potrebbe anche funzionare, ma io sono un novellino e
non
> riesco a farlo funzionare. Credo che dovrei fare una maschera aggiuntiva
per
> inserire i margini, o sbaglio?
> Se per te non è un problema potresti indicarmi una applicazione dove già è
> presente questo codice. Per me è più semplice.
> Grazie Mille
[CUT]
Sì qui non è contemplata la considerazion dei margini.
Non conosco esempi.
Mi dispiace.
Ma l'help dovrebbe aiutarti molto "PrintMip"
MAssimiliano


title: Verificare presenza di un file

author: Alfio

text:
Ciao a tutti,
è possibile verificare la presenza di un file all'interno di una cartella indipendentemente dalla sua estensione poiché essa potrebbe essere di svariati formati grafici? In pratica il percorso del file è dato dal path del programma, il nome del file viene composto automaticamente essendo formato da cod articolo e dal suo Id, l'unica incognita è l'estensione. Come posso procedere?

Grazie

Alfio


title: Verificare presenza di un file

author: BFS

text:

scritto al volo...
la seguente routine ti dice se esiste un file con nome pippo in c:

adatta il tuo nome file e il tuo percorso di ricerca

Sub test()

MyPath = "c:\"   'cartella dove cercare
myname = Dir(MyPath)
Dim trovato As Boolean
Dim fileDaTrovare As String
fileDaTrovare = "pippo"   'scrivilo senza estensione

trovato = False

Do While myname <> ""

     myname = Dir
     If Len(myname) > 3 Then
         If Left(myname, Len(myname) - 4) = fileDaTrovare Then
             trovato = True

         End If
     End If

Loop
MsgBox trovato
End Sub

ciao
BFS


title: Verificare presenza di un file

author: Karl Donaubauer

text:
Alfio ha scritto:
> è possibile verificare la presenza di un file all'interno di una cartella indipendentemente dalla sua estensione poiché essa potrebbe essere di svariati formati grafici? In pratica il percorso del file è dato dal path del programma, il nome del file viene composto automaticamente essendo formato da cod articolo e dal suo Id, l'unica incognita è l'estensione. Come posso procedere?

In principio:

If Dir("PercorsoENomeDelFileSenzaEstensione.*") > "" Then
     Msgbox "File è presente."
End If

Con il percorso del db e CodArt + Id del record corrente sarebbe p.e.

If Dir(Currentproject.Path & "\" & Me!CodArt & Me!Id & ".*") > "" Then
...

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

Access Lobby:
http://www.AccessDevelopers.org


title: Verificare presenza di un file

text:
Il 27/11/2014 11:38, Karl Donaubauer ha scritto:
> If Dir("PercorsoENomeDelFileSenzaEstensione.*") > "" Then
>      Msgbox "File è presente."
> End If

ciao Karl...
il tuo codice non mi convince...se per assurdo in c:\ ho un file chiamato:

pippo.jjj.txt

il tuo codice

If Dir("c:\pippo.*") > "" Then
     MsgBox "File è presente."
End If

da che il file è presente...che non è vero

mentre il mio codice giustamente dice che non è presente

che ne dici?
ciao
BFS


title: Verificare presenza di un file

text:
Salve,

Bfs ha scritto:
> Karl Donaubauer ha scritto:
>> If Dir("PercorsoENomeDelFileSenzaEstensione.*") > "" Then
>>      Msgbox "File è presente."
>> End If
>
> il tuo codice non mi convince...se per assurdo in c:\ ho un file chiamato:
>
> pippo.jjj.txt
> ...
> da che il file è presente...che non è vero
>
> mentre il mio codice giustamente dice che non è presente
>
> che ne dici?

pippo.jpeg
pippo.tiff

--
:-)



title: Verificare presenza di un file

text:
Il 28/11/2014 16:23, Karl Donaubauer ha scritto:
> Salve,
>
> Bfs ha scritto:
>> Karl Donaubauer ha scritto:
>>> If Dir("PercorsoENomeDelFileSenzaEstensione.*") > "" Then
>>>      Msgbox "File è presente."
>>> End If
>>
>> il tuo codice non mi convince...se per assurdo in c:\ ho un file
>> chiamato:
>>
>> pippo.jjj.txt
>> ...
>> da che il file è presente...che non è vero
>>
>> mentre il mio codice giustamente dice che non è presente
>>
>> che ne dici?
>
> pippo.jpeg
> pippo.tiff
>

vero...facilmente risolvibile con un instr sull'ultimo "."

la tua soluzione cmq non funziona nel mio esempio
ciao


title: Verificare presenza di un file

text:
> Ciao
> Karl
> *********

Grazie ad entrambi e, personalmente, preferisco la riga suggerita da Karl, semplice ed efficace poiché, nel mio caso, il file da cercare ha una sequenza costante, non avrebbe mai un "." in mezzo, ma solo quello che separa l'estensione dal nome del file.

Grazie, in particolar modo a Karl, sempre presente e disponibile, da anni...

Alfio


title: Verificare presenza di un file

text:
Il 29/11/2014 15:24, Alfio ha scritto:
>
>> Ciao
>> Karl
>> *********
>
> Grazie ad entrambi e, personalmente, preferisco la riga suggerita da Karl,
se escludi che il codice articolo possa contenere un punto sei salvo
altrimenti hai un bug nel software
vedi tu

ciao
BFS


author: molcaleviATyahoogroupsDOTcom

text:
[b]
KO mafia CFR ILLUMINATI ! Global Democracy TRIVOLUZIONE ARTSENU
 COLD FUSION W post OPEC !
B '' H _
KO mafia ! Global Democracy ARTSENU & Fusione
Fredda = TRIVOLUZIONE
W post OPEC ! ! !
e' SAUDITA - Bin Laden la cosi' detta '' mafia ebraica CFR
globalmafia ILLUMINATI '' .
Pensioniamola con TRIVOLUZIONE ARTSENU + FUSIONE FREDDA .
grassssie per le TUE CENE a ARTSENU !
evviva l' era post OPEC : basta ricatto dai petrolieri !
a :
radical.party
@
radicalparty . org
info
@
associazionecoscioni . org
prenotazione .cg @
radicalparty. org
info
@
democrazialinguistica
.
it
...
da molcalevi
@
yahoogroups
.
com
Lettera aperta alla Presidente Maria Antonietta Farina Coscioni ;
a tutte le DONNE DELLA PRESIDENTE ; a : Marco Pannella ; Maurizio
Turco ; Marco Beltrandi ; Marco Cappato ... & Ciurma .
da molcalevi
@ yahoogroups .
com
Beri'th Ivri'th INTER ith LEGA EBRAICA INTER ista
Carissime / i , la Maritsi' , Maria Teresa Levi Dal Monte Meha'r ,
 e io , riceviamo , anche cartaceo , l' invito a prenotare ,
 in vista del Consiglio Generale Straordinario del PRTT ,
 Partito NONVIOLENTO RaSDIcale Transnazionale Transpartito .
INTER venire non possiamo causa salute. Speriamo arrivare a
 Congresso prossimo PRTT Partito RaSDIcale Transnazionale
Transpartito - GLOBAL ROSA NEL PUGNO . Qui VI MANDIAMO LE PROPOSTE :
ARTSENU , TRIVOLUZIONE ... ;
auspichiamo Voi le rilanciate durante e dopo BRUXELLES .
Questo testo esce sul nostro gruppo
molcalevi @
yahoogroups
. com
molcalevi
@
yahoogroups
. com
Nella speranza di avervi tutte e tutti fra i nostri concittadini
MOLCALANDIANI . Nella speranza i MOLCALANDIANI partecipino .
Entrate nel gruppo Grassssie !
in calce seguono le nostre NON PROTESTE MA ULTERIORI SPERANZE :
TOGLIETECI SEGATURE ! Liberiamoci dalla GLOBAL MAFIA CFR .
In MOLCALEVI
@
yahoogroups
.
com
TRIVOLUZIONE ARTSENU FUSIONE FREDDA GLOBAL DEMOCRAZIA
W POST OPEC ! LIBERA UMANITA'
( A ) Rivoluzione PALAZZO di VETRO GLOBAL DEMOCRAZIA : ARTSENU
( B ) RIVOLUZIONE ENERGIA : FF Fusione Fredda .
ARTSENU + FUSIONE FREDDA : ANTIMAFIA GLOBALE UMANITA' LIBERA !
A + B = TRIVOLUZIONE W POST OPEC ( C ) .
vedi anche DOCUMENTI - file : click alto SX pagina iniziale gruppo
MOLCALEVI
@
yahoogroups
. com
A) capovolgi Nazioni UNTE vunciune con ARTSENU GLOBAL PANNELLA
MOLCA ARTSENU .
Ecco il nostro manifesto :
GLOBALDEMOCRATIZZA le Nazioni UNTE VUNCIUNE ,
basta ONANISMO evviva NOBILE UNUNISMO ONUNISMO !
nostro manifesto MOLCA ARTSENU GLOBALDEMOCRATIZZA Nazioni UNTE
VUNCIUNE basta ONANISMO ! GLOBALDEMOCRATIZZA le Nazioni UNTE con
ARTSENU ! Grazie x Tue cene ! STOP ONANISM CFR MAFIA .
GLOBALDEMOCRATIZZA Nazioni UNTE VUNCIUNE con ARTSENU Grazie x Tue
cene . STOP ONANISM CFR MAFIA con molcalevi MOLCA movimento
lotta contro antisemitismo . Franco JAL Joseph Arturo Levi MOLCA .
molcalevi
@
yahoogroups. com
GLOBALDEMOCRATIZZA Nazioni UNTE VUNCIUNE con ARTSENU ! Grazie x Tue
cene basta ONANISMO! STOP CFR GLOBALMAFIA FARAONI .
[[[ vedi anche : ShiRACmon PERES assassino' RABIN 3 KENNEDY 3
'' Chi ha ucciso Yitzha'k Rabi'n ''
in I TAL YAno libro di Barry Chamish
giornalista Israeliano ENA Editrice Nuovi Autori MILAN NO
ISBN 88 - 7230 - 992 - 1
cerca CHAMISH su :
www .
internetbookshop
.
it ;
www .
libreriauniversitaria
.
it
pse contact
chamish
@
netvision
.
net
.
il
-_-
pse see
www
.
barrychamish
.
com
-_-_
CURNO d' AFRICA mazzia GLOBO FO SUdario nazi MauMauIsti Giallo
ALLAHrme SloboTITO BOBOTTINO CURNO d' AFRICA mazzia GLOBO .
Nazi Mau
Mau isti Giallo ALLAHrme Slobo TITO Qhadhafito Castradorito Infidel
Castrador Chavez .
FUSIONE FREDDA = MAFIA FRITTA .
SOMALIA: grazie alla SOMARIA - CFR vittoriosi ''Tribunali Islamici ''
scatenano LEVI tabile FINI MONDO guerra con ETIOPIA etc .
More solito van di mezzo le popolazioni . Sopra tutti di
Eritrea , Sudan , Uganda ... EKISSENE ? E in Asia Tibet , Laos ,
Vietnam ... EKISSENE ? ]]]] .
-_
ECCO il MANIFESTO ARTSENU - MOLCA
( mafia oppure lotta con
ARTSENU )
GRATI A CHI CI AJUTA TRADUCENDO IL TUTTO IN BERGAMASCO DI SOTTO IN
ESPERANTO E IN OGNI ALTRA LINGUA DEL PIANETA !!!
ARTSENU Associazione RasSDIcaltzionistica Transnazionale pro
Sufficienza Economica delle NU nazioni UNTE VUNCIUNE .
- GLOBALDEMOCRACY ARTSENU TRIVOLUZIONE : our Zionist plot to
overturn Globalmafia CFR ONANism : w ARTSENU ! GLOBAL
DEMOCRAZIA Cene Artsenu . capovolgi ONANISMO W ONUNISMO
API e FORMICHE
Cene ARTSENU e capovolgi NAZIONI UNTE VUNCIUNE w ONUNISMO
m ONANismo !
Da www
.
lucacoscioni
.
it ;
raccomandazione
'' Congresso Associazione Luca Coscioni ERGIFEPOLI '' .
MOLCA Mondo Ottenga Luca Coscioni Atleta .
Nuova BRECCIA in PALAZZO DI VELENO KOFI ONAN .
Capovolgiamo la PIRLAMIDE con le cene " ARTSENU " .
Basta onanismo W vero nobile ONUNISMO per MONDOSENATO e
MONDOGOVERNO basta CONIGLIO d' INSICU REZZA , basta assemblea dei
generali !
Grassssie sta girando !
Sia per pane sia per brioche FARINA
del nostro sacco Maria Antonietta !
Nuova BRECCIA in PALAZZO DI VELENO KOFI ONAN !
Capovolgiamo la PIRLAMIDE con le cene ARTSENU .
Sberla alle NU Nazioni UNTE VUNCIUNE
-M onanismo W No'bile UNUNISMO !
-HALTER nativ al NOM - NWO , Nuovo Ordine Mondiale della MAFIA
come dire HALTER NATIV alle NAZIONI UNTE VUNCIUNE .
Basta ina'ne onanismo W nobile nuovo ONUNISMO UNUNISMO .
- Grazie a chi ha mandate e continua a mandare ogni anno 12 cene
d ' oro a : ERA ORA - ARTSENU -PRTT
Ccp 60397007 Via di Torre Argentina 76
I 00186 ROMA
a " Esperanto Radika Asocio " ROMA . " ERA ORA " !
c/o ERA ORA PRTT Partito RaSDIcale Transnazionale Transpartito
ARTSENU
- Global democratizzazione: ARTSENU - °_ ° - autore: ARETS
Associazione RaSDIcale Enzo Tortora SIONISTI , Maritsi' & Franco
JAL
Joseph Arturo LEVI MOLCA :
" Se ci crediamo non restera' un sogno " .
Mandiamo ogni anno 12 cene x Sberla alle Nazioni U N T E
vunciune ! Basta onanismo W vero ONUNISMO ! Per Globalizzare
antimafia - -A cura del traduttore in I TAL YAno di opere del
giornalista Israeliano Barry Chamish , Franco JAL Joseph Arturo
LEVImolca .
-In Ivri'th , in lingua Ebra'ica , I TAL YA voddi' : ISOLA DELLA
RUGIADA DIVINA . -O MOLCHITI, Oppure " ILLUMINATI " MAFIOSI =
SABBatei .
__HALTERnativ al Nuovo Ordine Mondiale della mafia NOM-NWO :
- I " MOLCA "
- Movimento lotta contro antisemitismo
- Mondo ottenga Luca Coscioni Atleta
-Muo'viti, o Levi colpira' ancora
-Movimento X legalizzare Civile Atomico
-Movimento lotta alle ceneri ambientali
-Movimento lavoratori costretti all' automobile
-Mu'chela, o Levi colpira' ancora
-Meglio oggi leggere Chamish altrimenti ...
- Mafia oppure Lotta Con ARTSENU
-Mondiale Ordine Libere Cene Alternative ...
di cuore ringraziano quanti han mandate , e continuano a mandar
dozzine di cene annue a : ERA ORA -PRTT -ARTSENU , dall'I TAL
YA , e dal resto del Globo . A Tirana il Congresso boccio' la
mozione , a mangio ranza . Ma nei precedenti decennj la mangioranza
fu assai piu' grassa . Se lo crediamo , non restera' un sogno . Ai
prossimi congressi l' onanismo diverra' minoranza , e la mozione
passera' . Grazie per le cene .
Si possono inviare ( 12 cene annue , in media Mondiale 12 EURO
cada pancia l' anno , 1 il mese ) a : ERA ORA x ARTSENU - PRTT
- Conto Corrente Postale 60397007 via di Torre Argentina 76
I 00186 ROMA di Sopra .
ARTSENU SBERLA RaSDIcalTZIONISTICA alle NU nazioni unte VUNCIUNE
c/o ERA ORA - ARTSENU - PRTT v Di Torre Argentina 76
I 00186 ROMA di Sopra I TAL YA - Pianeta Terra .
a : ERA ORA : Esperanta Radika Asocio ( pronuncia Asozi'o ) Ora
( d' Oro ) x Artsenu Associazione RaSDIcal - Tzionistica Trans
nazionale pro Sufficienza Economica delle Nazioni Unite : ARTSENU
- W la CENTESIMA INTERNAZIONALE ! ( il 100°compleanno della vera
INTER ! ) .
Il Congresso si felicita coi nuovi VESPERMANGXSENDEMULOJ ,
quanti amano mandare le cene ; commilitoni di quanti , in Albania ,
han versate a ARTSENU 12 cene ( 120 Euro ), 10 Euro mensili cada
pancia , per la rivoluzione globale democratica delle Nazioni Unte
vunciune ( impropriamente dette ONU ) nelle mani dei Khaveri'm
Raffaele Fortino , Danilo Quinto , Benedetto Della Vedova , e
Giorgio Paga No' .
- c/o ERA ORA , Esperanto Radika Asocio ( pronuncia Asozi'o )
d' ORO ERA ORA - ARTSENU -PRTT - Ccp 60397007
Via di Torre Argentina 76 I 00186 ROMA . ERA ORA !
-- Saltiamo una cena al mese , e versiamo ogni anno il
corrispettivo in granassa alle NAZIONI UNITE usando - qual
esattoria - ARTSENU , presso Era Ora . Primo scopo : arrivare al
prossimo Congresso col
corrispettivo di 12 cene da almeno 120 attivisti
( VESPERMANGXSENDEMULOJ ) ,
onde consentir agli IMPANNELLATI di consegnare a
Kofi Anan ONAN che tutti inGHANA & successori il corrispettivo ;
cosi' non potra'n piu' inGHANAre l' Umanita' !
In vista della rottamazione , e del riciclaggio , sia del
CONIGLIO d' INSicurezza ; sia dell ' Assemblea dei Generali ,
rispettivamente nel MondoGoverno , e nel MondoSenato . No
representation without taxation . E viceserva , no taxation without
representation .
Invece dei di pelo matici di NOMina Ra'gia, gli Stati avranno alle
NU MondoSenatori : uno / a eletta / o , e una / o sorteggiata / to ,
a caso ,
nel modo piu' CASUALE POSSIBILE fra i Cittadini / e , ogni 6
milioni di Cittadini / e , o frazione .
La maggioranza dei Mondo Senatori ( sostituto dell' AG -Assemblea
dei GENERALI ) eleggera' il MondoGoverno ( sostituto del CONIGLIO
d ' inSicurezza - CdS ) . Globalizzare la libera inform azzzione ,
e democratiche votazioni ai livelli Globale , continentale ,
nazionale , regionale , provinciale , comunale , rionale ) avverra'
sotto il controllo dei KaskiBle' , e / o di Polizia Transnazionale
( INTERISTA ) da essi delegata . Gli Stati sanza democratiche
informazione e elezioni resteranno sanza rappresentanza alle NU .
Circa 2400 MondoSenatori , per circa 7 Miliardi di Terrestri .
Ogni Cittadino del Globo e' esortato a mandare a ARTSENU una cena
il mese . Chi un Cent di Euro il mese , o di meno ; chi 100 Euro ,
o piu' , x cena .
In media 1 EURO il mese cadapancia , 12 EURO l'anno , circa Sei
Miliardi di Euro il mese .
Le NU non avranno piu' la scusa : " Siamo sanza soldi , qualche
Governo Paga No' '' , onde praticare l' inane onanismo anziche' IL
NOBILE ONUNISMO UNUNISMO .
Come aggio, PRTT - ERA - ARTSENU si tratterra' lo zerovirgola
cinque pecciento : circa Un Milione Di EURO / di' quando Sei Miliardi
di Terrestri verseranno una cena in media d' un EURO il mese . Meno
lo
0,5 % di detto , pari allo zero virgolazero venticinque pecciento ,
0,025 % , che andra' quale royalty all' ideatore di ARTSENU , lo
Tzionista Franco JAL , Joseph Arturo Levi di GRATO SOGLIO di Sotto
MILAN NO - GERUSALEMME , il quale incassera' circa cinquemila EURO
al giorno quel BENEDETTO giorno .
Il PRTT ricevera' e amministrera' con ERA ORA , con LA ROSA NEL
PUGNO , con l' ASSOCIAZIONE LUCA COSCIONI , con PAOLO BRECCIA e con
la Suocera Sua Maritsi' Levi Dal Monte MeHar , e con gli altri
CAPONI di TORRE D' ARGENTO & D' ORO , circa un EUROMILIONE al
giorno .
Scopo reale dell' iniziativa : arricchire lo Tzionista Franco
JAL MOLCA .
Come l' Esperanto , anche ARTSENU e' congiura Tzionistica . In
Ivri'th ( lingua Ebra'ica ) ARTSENU significa TERRA NOSTRA . Col
piu' cordiale Shalo'm Ciaolo'm Miaolo'm , Baulo'm . Salumi e
caci .
Tra i primi firmatarj : Marco Biotti ; Prof. Cesare Romano di
Jew York ; Maria Teresa Dal Monte MeHar ( di Cagliari - IMOLCA -
Vienna - Gratosoglio Di SOTTO - Gerusalemme Di Sotto & Di
Sopra ) ...
Da: Levi MOLCA Franco JAL Joseph Arturo LEVI
MOLCALEVI
@
yahoogroups
. com
l e v i . f r a n c o
@ t i s c a l i . i t
m o l c a l e v i
@
y a h o o . i t
Sono i dittatori , il CFR , i duciboss , la GLOBALMAFIA ENRON
BECHTEL SINCLA IOR CALTAGIRUIJNA a creare profughi Palestinesi
Sudanesi etc ... e a versar incendj sul petrolio . Sono i
dittatori , il CFR, la GLOBALMAFIA ENRON BECHTEL SINCLA IOR FARAONI
a creare profughi Palestinesi Sudanesi etc... e a versar incendj sul
petrolio . Gli stessi che assassinarono il nostro compagno Giacomo
Matteotti : aveva scoperto : la SINCLA IOR coi fondi neri del
petrolio finanziava i riarmi ovunque , nella Unione Sovietica e nella
Germania gia' nazista , nella I TAL YA gia' fascista . Cosi' fu
soffocato lo scandolo del petrolio 1924 .
-REFLUOPETROLIO, idrocarburi dai rifiuti Dott. Andrea Rossi
fisolofo & industriale ( o suo inviato - per corrispondere con
Andrea Rossi : eon333 @ libero . it oppure : c/ o
Prof. Avv. Andrea Ambi'veri , C.So di Porta Vittoria 54
I 20122 MILAN  NO ,
ph
+39 025461895
 fx
+39 02 55194804
 ,
specializzato nei casi di
" TORTORAtura " .
Cerca CHAMISH come AUTORE su :
www .
libreriauniversitaria
.
it
;
www .
internetbookshop
.
it
;
Collegamenti utili di Yahoo! Gruppi homepage:
 molcalevi
yahoo
.
com/
group
 /MOLCALEVI/
www. barrychamish
 .com
www
.
naziufos
.
com ;
www .
molcalevi
@
yahoogroups
.com
HOFJUDEN PERESITES BAAL MOLOCH BEELZEBUB
topsyturvy TALMUD .
TALMUD CAPOVOLTO .
MORGAN RODIKSON Adam Weishaupt Frank :
CFR GLOBALMAFIA ILLUMINATI .
anche per SRI LANKA ACCORDI di OSLO
( CFR ) scatenano LEVI tabile FINI MONDO : Tigri Tamil etc ...
GIAPPONE Corea del Nord Korea del SID ai ferri corti , EKISSENE ?
- tutto il Mondo CORNUTO CURNUTO E MAZZIATO dal CFR GLOBALMAFIA
'' Council on Foreign Relations '' Carnegie Ford Rockefeller
COMUNISTI FASCISTI RAZZISTI COMUSCISTI
CAMERAGNI SabbATEI , l ' Ebraismo CAPOVOLTO .
B ) FUSIONE FREDDA MAFIA FRITTA
da Universita' CANIANA Bergamo di Sotto - scrivi al prof .
Emilio Kato Speedykovsky
emilio . spedicato
@
unibg .
it
SABA evviva la Regina Antonella SABA BRIVIDO Ponte Pietro Bergamo
di S 8 mejo del Q 8 ! LEVI tazione Magnetica MAGLEV mejo de TAV !
Fusione Fredda Superconduttivita' Calda e LEVI malocchio a
todos !
vlario
@
yahoo. it
www .
centrostudimonetari
.
org
FUSIONE FREDDA MAFIA FRITTA scrivi a
emilio
. spedicato
@
unibg
.
it
-_-_
W POSTOPEC !
FUSIONE FREDDA MAFIA FRITTA . FRASCATI STAPPI GENIO dal
FIASCO !
v anche DOCUMENTI file click alto Sx pag iniziale gruppo
molcalevi
AT
yahoogroups
.
com
FUSIONE FREDDA MAFIA FRITTA
MOLCA telefoni +39 0289301262 3492218113 fakkes 0289306182
v anche molcalevi
AT
yahoogroups
. com
Emilio Spedicato emilio . spedicato
@
unibg . it
Emilio Kato Speedy Kovsky , nonno di Immanuel Velikovsky .
SCHIAVISTI FARAONI GLACIALI PIU' CHE FREDDI PRODI TORJ vogliono
IPPOLITO INFELICE & MINIMO
HALTER NATIV AMARA VERITA' AMARO RIENTRO ERA FARAONICA OPPURE
FUSIONE FREDDA RIENTRO DOLCISSIMO PASSIONE CALDISSIMA
da '' HABITAT fondazione LIBERAL '' 28 2005 di Emilio Spedicato
Kato Speedykovsky . Ecco il suo editoriale :
Elimina anche scorie da fissione paleonucleare IDROGENO ?
IL FUTURO  E' NELLA FUSIONE FREDDA
Notorio , quel referendum blocco' la costruzione di nuove centrali
ma non impediva sfruttar le gia' esistenti , o in costruzione .
L' I TAL YA coppo' le poche nostre centrali nucleari ; spreco'
decine di miliardi di Euro . Per sopperire alla poca corrente
prodotta qui mediante altre centrali ( idroelettriche , termiche a
metano o gasolio o carbone o eoliche ... ) importiamo ENEL gia dai
cari vicini specie dalla Francia , ove e' prodotta sovra tutto da
centrali nucleari .
Mai han dati significativi problemi di sicurezza .
La dipendenza dell' I TAL YA dai combustibili fossili succhia
granassa col petrolio sempre piu' a ricattarci .
E immette nell' aria gas . Favorisce l' effetto serra oltre a
tutto il resto : poveri esseri viventi , umani e non .
La produzione va a nuove fonti quali in linea di principio :
- Eoliche . Qualcuno le ritiene insufficienti perche' c' e' del
marcio . La Danimarca si da' arie d' averne a basta lei e stop .
- PALEONUCLEARE . Fissione gia' usa processi meno deficienti .
Dobbiamo importare dall' India gli specialisti fatti fuggire .
- Fusione nucleare . Stadio preliminare dopo secoli di studj .
Il plasma a temperature altissime ha comportamento cosi'
complesso e non lineare , da sfuggire a ogni tecnica di
contenimento . Fusi fisici e ingegneri due generazioni almeno .
Meglio evitare aggettivi , come su due generazioni di fisici
teorici bruciate nel vano tentativo di unificare la teoria della
gravitazione secondo Relativita' Generale di Einstein con la teoria
delle altre forze naturali ...
- Fonti basate sull' utilizzo dell' idrogeno , secondo linee discusse
in noti libri da Rifkin , consulente di Prodi per conto dell' UE ,
per le quali tuttavia esistono numerosi problemi . Fondamentale :
produrre idrogeno esige sempre tanta elettricita' .
Arriviamo cosi' alla CONFUSION come qualcuno chiama la FF
'' F . F . '' Fusione Fredda : COLD FUSION . Potrebbe diventare
presto il metodo standard per produrre energia in modi puliti non
limitabili . Non ci fosse la pratica dei SUPERPREPOTENTI .
Qui parlo sulla base di corrispondenze con Robert Bass , fra i piu'
straordinarj studiosi Americani . Nato nel 1931 si laureo' in FISICA
come Rhodes Scholar , INTER agendo nei giovani anni con
Misner e con Einstein . Scopre Rudolf Kalman , l' inventore dei cosi'
detti FILTRI KALMAN , uno dei piu' importanti strumenti della Matta
Mattica applicata .
   Lavora presso Universita' e Centri Ricerche Americani ,
su temi quali la fusione calda , la meccanica celeste .
 Da' la prima rigorosa dimostrazione della Legge di Titus -
  Brode , grazie a  una nuova tecnica per lo studio del
 problema degli n corpi .
   Da' poderosi contributi alla Fisica Quantistica . Segue
attento la fusione fredda . Brass INTER agi' anche con Velikovsky ,
l' amico di Einstein , le cui idee su un' evoluzione radicale del
sistema solare nel periodo antecedente all' anno 700 A C suscitano
sempre piu' scandolo nei Mondi Scientifici .
Nel 1989 due chimici d ' una ''piccola'' universita' dello Utah ,
Fleischmann e Pons , annunciano un esperimento . Energia elettrica
fluisce in una pila dai terminali di palladio . La pila libera
calore in quantita' superiore all ' energia introdotta . Il processo
di F&P e' spiegabile con l' INTER azione di due nuclei di
 Deuterio entro il reticolo del metallo palladio . Generano sia
 una particella Alpha , ovvero un nucleo di Elio
isotopo 4 , sia energia pari a 23 , 8 Mev .
Fusione fredda e' chiamato il processo , in quanto realizza ,
 a temperatura ambiente , il fenomeno considerato
 esclusivo di ambienti a temperature altissime ,
come l' interno delle stelle ; e i piccoli volumi di plasma
generati in esperimenti di fusione calda .
Il processo utilizza il Deuterio .
    L' acqua oceanica ne contiene una parte su 6 mila ,
 quindi un volume totale di 100 mila km cubici .
   Acqua pesante sufficiente a ricoprire per circa 300 metri tutta
l' I   TAL YA . Il materiale di partenza e' disponibile sanza
limiti dunque .
   Prodotto finale , un gas inerte . Energia pulita e quasi gratis .
Confermata . Estendibile a grande scala . E' la piu' grande scoperta
tecnologica dell' Umanita' dopo il fuoco , sottolinea il famoso
astrofisico Rees . Dopo l' annuncio di Fleischmann e Pons ,
di certo fatto in modo prematuro attraverso una conferenza stampa ,
 si ebbero i seguenti sviluppi :
-- Varj gruppi cercarono di ripetere l' esperimento ma incapaci
 non ritrovano i risultati dei due chimici .
-- Peebles , noto Fisico di Princeton , scrisse un articolo
per ''dimostrare '' l' impossibilita' della reazione di fusione
dei due nuclei di deuterio all' interno del palladio .
-- Pons & Fleischmann persero il posto di lavoro alla Universita'
dello Utah . TIME li defini' " Cranks of the century '' :
le Vanne Marchi del Secolo .
E come vogliono i superprepotenti padroni di TIME etc
( il CFR , essi sono le vere Vanne Marchi dei MILLENNJ )
ogni significativo finanziamento alla linea di ricerca legata al
loro esperimento venne bloccato .
Tuttavia 15 anni dopo la frettolosa decisione di chiamare fasullo
il lavoro di P&F , il Department of Energy degli Stati Uniti ,
DOE , su INTER 20 di Spencer Abraham , segretario all' Energia ,
 fe' essenzial marcia indietro , salvo chiamare la zuppa
'' pan bagnato '' : non piu' FF FUSIONE FREDDA , bensi'
'' CONDENSED MATTER NUCLEAR SCIENCE '' .
   Ora riprende il flusso di qualche dollaro frigido in quei reattori
nucleari che , per essere bottiglie di liquore ( la prima aveva
contenuto BOURBON ) , agl ' incauti P&F avevano fruttato pure il
titolo di cicchettoni ; eppertanto si parlo' di delirio da etilismo .
Doccia fredda acqua leggera . Quella Universita' dello UTAH si fa
piccola piccola per non farsi piu' guardare . Il dietro front del
DOE e' legato a varj fatti fra li quali :
-Almeno TREMILA LAVORI ormai ( per parlar soltanto di quelli
teorici ) dimostrano : contariamente a Peebles e alla sua teoria
sugli astemj , il processo della fusione fredda e' compatibile con
 le leggi della fisica quantistica .
      I finanziamenti spesso bloccano gli esperimenti ma
 meno  spesso bloccano i lavori teorici , che si contentano e
appagano
di scienza  e creativita' scientifica .
    Fra i lavori teorici piu' importanti dobbiamo citare quelli
 di varj studiosi I TAL YAni .
 Fra i MASSIMI , il grande Fisico di MILAN NO Giuliano
 Preparata , morto  alcuni anni fa  prematuramente .
   Errore sovrano di Peebles : considero' soltanto localmente la
equazione di Schroedinger , e cosi' trascuro' i globali effetti
speciali dovuti alla periodicita' del reticolo .
 In altri termini , ei ignoro' il fondamentale teorema di Bloch
 della Fisica dello stato solido .
- Esistono centinaja di lavori sperimentali svolti in laboratorj di
tutto il Mondo , specie in Giappone . A varj livelli , alcuni quasi
artigianali . Specie uno compiuto a Frascati ( ahi il vino ! i
fiaschi ! ) alla ENEA a cura di Francesco Celani . Il processo P&F e'
stato ripetuto e variato in diverse
configurazioni di materiali , e voltaggi applicati .
Cio' ha confermato : il BOURBON nelle giuste dosi e' buono ; e ,
 come il problema dell' etilismo , il processo P&F e' e' complesso .
   Ottimo , dipende da tutta una serie di condizioni che vanno
attentamente studiate e classificate .
-Oltre alla produzione di energia , e ' stata verificata , in certe
condizioni , la trasmutazione di sostanze piu ' complesse del
deuterio . Per esempio del torio radioattivo : in altre sostanze
quali rame e magnesio dalla composizione isotopica diversa da quella
naturale , e quindi prima non presenti in loco . Cio' suggerisce : la
fusione fredda puo' esser pure la strada migliore per eliminare le
scorie radioattive , grave problema della fissione nucleare ancora
spacciato per irrisolvibile .
A sto punto riaffiorano problemi ancora spacciati per non superabili
come l ' eliminazione della mafia e delle sue scorie .  Bloccare la
ricerca magari sulla fusione fredda e' roba da altissime
temperature , oltre i TRENTANOVE GRADI °C .
FARAONI E IMPERATORI ROMANI E CINESI E MAYA E COLLEGHI , davanti alle
scoperte proposte da inventori , la cui realizzazione avrebbe creati
problemi sociali come l' inutilita' degli schiavi , generarono una
nota REAZIONE . Noto e' dai geroglifici e dai testi classici : molti
inventori caddero , vittime di incidenti ferroviarj ,
automobilistici , aerei .
Una fonte pulita e praticamente illimitata di energia e ' nell '
INTER esse della UMANITA' . Contro il diavolo , i milanisti , i
satanisti , le sette le settone e le settucole di petrolieri emiri
sceicchi fachiri e crumiri . A parte la limitata disponibilita' di
fossili combustibili ; e il problema insuperato dello smaltimento
dei politicanti fossili e delle lor scorie ; le generazioni fresche
gia' giudicano criminoso l' abuso fatto di metano petrolio carbone
e affini . Risorse preziose , andrebbono usate per fini piu' nobili
come produrre proteine , plastica , tessuti e farmaci .
Sinora invece han dato ben poco oltre a vaselina e naftalina .
I rincari astronomici ( e per qualcuno gastronomici ) del petrolio
non sono per nulla giustificati dai costi estrazione e produzione .
Poco li giustificano i contingenti e spesso all' uopo predisposti
tragici misfatti in Vicino Oriente come in Russia e in Venezuela ,
in Nigeria e in Indonesia .
    CARPE DIEM , la cricca del petrolio e' in fregola :
'' ajutttooo arriva la F. F. fusione fredda eppertanto
massimizzar debbonsi li cresti sul petrolio finche' dura la
cuccagna '' .
   Il DOE cambia rotta , anche piccoli Paesi vanno a realizzare la F.
F. ; meglio fare buon giuoco a cattivo viso . The hand you
can ' t  bite kiss it . If you can' t fight them join them .
L' augurio nostro: presto la F. F. diventi realta' . E ' nell ' INTER
esse della Umanita ' e contro la DISUMANITA ' . Qualche assaggino :
--Nelle case i riscaldamenti saranno tutti elettrici .
 Tagli ai massimi fattori d' inquinamento .
-- Mezzi di trasporto tutti elettrici: pazzi stradali sostituiti
 da SKY CAR e velivoli e veicoli e natanti anche individuali
 e gestiti da computer via satelliti .
 Mezzi  guidati dai robot ,  mentre i '' piloti ''
 studiano i cruciverba .
-- FERROVIE A LEVI TAZIONE MAGNETICA . MAGLEV .
IN GALLERIE A VUOTO possono arrivare anche a 6 mila KM / ora .
Aeroplano riservato ai matti ''sportivi '' .
--Le strade esistenti , buona meta' della cementificazione GLOBAL ,
saran restituite a campi e foreste; o usate come base di strutture
per la coltivazione idroponica delle piante.
-- Acqua dolce per tutti sia per costi abbattuti di dissalazione
con tecniche tradizionali, sia grazie a costruzione di enormi
chiatte ,  in grado di trasportare ICEBERG ovunque .
------- LAST BUT NOT LEAST . Gli esperimenti di fusione fredda
hanno alcune caratteristiche . Fan pensare agli esperimenti degli
alchimisti ( cui dedico' gran parte del suo tempo l' immenso
Newton) . Forsecche'qualcuno gia' noto' il fenomeno in tempi
antichi ?
EMILIO SPEDICATO - EMILIO KATO SPEEDY KOVSKY
emilio
. spedicato
AT
unibg .
it
--__--
L'utilizzo da parte tua di Yahoo! Gruppi e' soggetto alle
Condizioni Generali di Utilizzo del vizio .
******
non proteste , ma ulteriori speranze
Cara MARIA ANTONIETTA COSCIONI FARINA DEL NOSTRO SACCO ,
per favore toglieteci segatura impostaci dai PERESITI . Date deh
pure a noi MOLCA LEVI , nonni della nostra adorata Nipo TANINA De
Marco ; Calabresa di Garbagnate , la possibilita' partecipare FORUM
et elezioni et ...
Verremo se D - O vuole al Congresso del PRTT , per festeggiare con
tutte e tutti la GLOBAL rivoluzione delle staminali delle Nazioni :
Unite e non piu' UNTE VUNCIUNE .
Essenziale urgente e ' qui . Grasssie per le TUE Cene a ARTSENU !
Grasssie , Ciaolo'm !
molcalevi
AT
yahoogroups
. com
Maritsi' et Franco JAL Joseph Arturo LEVI iscritti da secoli a
tutto , anche quest ' anno 590 Euro cadapancia , piu ' ARETS e
tutto il resto .
molcalevi
@
yahoogroups
.com
NOTA MOLCA_ ](|)=- e' il logo dei RAEL-IANI CFR
nazicosmomafia,madre spirituale dei LAROUCHIANI SABBatei PERESITI
HOFJUDEN LUCIFERINI "ILLUMINATI" come l' alchimista GVITALI !!!
CALTAGIRUIJNA
B"H_ - NOTA MOLCA _ ](|)=-
e' il logo dei RAEL-IANI , la nazicosmomafia , CFR , madre spirituale
dei LAROUCHIANI SABBatei PERESITI HOFJUDEN LUCIFERINI una delle
tante branche - filiali degli
" ILLUMINATI " come l ' alchimista GVITALI !!!
" Ebrei di corte " sono CORTIGIANI , NON sono EBREI : sono
 HOFJUDEN    ( PERESITES )
" Come detto ordianzi , alcuni vorrebbono dividere il Mondo
 fra  Giudi' e Gentili , lasciando fuori tutte le altre religioni .
   I pennivendoli non sono educatori . Eppertanto contan su , ma mica
ci spiegano la storia e le storielle delle teste di legno e d' altra
roba detti " Hofjuden " , gli  " Ebrei " muse appigionate
 ( dai re dai signorotti , dai duciboss ) .
    Sempre a corte , e corteggiati da tutt' i mafiosi .
 Avevano e hanno soprannomi Ebra'ici ( LEVI , o VITALI ;
o VITALE o CO-H-EN magari o SACERDOTI ) ,
 ma Ebrei  NON  sono , proprio no .
Eppure i sempliciotti continuano a cantarla a contarla e a pallarla :
" Gia' , ecco , quelli sono giudei " .
Questi HOFJUDEN sono furbacchioni , veri cortigiani , ambiziosi
che peggio non si puo' . Sanno di essere gli spaventapasseri , i
leccaculi e le spie capratorie nonche' i capri espiatorj . Se il
re'gime , la Corona , l' Autorita' Centrale , si ritrova nei guai ,
l' '' Ebreo '' di Corte se ne accorge precocemente ; continua la
tresca e gli affari con l' Establishment maligno e poi , prima che la
distruzione cominci addosso ai veeeeri Ebrei , se la svigna col
Bobottino sanguinario e insanguinato verso un altro Paese " .
Sherman Skolnick " As we said earlier , some would divide the
World between Jews and Gentiles , leaving out all the other
religions . The pressfakers are not educators . So we are not told
the history of " hofjuden " , royal court types with Jewish surnames
not actually Jews . Simple folks persist in hollaring , regardless
" But they ARE Jews ! " Hofjuden are clever types , ambitious in the
extreme who know that they are stooges and scapegoats . If the
regime , the Crown , the Central Authority , is in trouble , the
hofjuden find out and continue a business relationship with the evil
Establishment and then , before the destruction begins of actual
Jews , escape with their bloody fortune to another country ."
Sherman Skolnick
ricerca e scoperta di Sherman Skolnick
per la segnalazione , grazie a Marco Saba Brivio di Ponte Pietro
Firenze Olbia Bergamo di Sotto TRIESTE GERUSALEMME
vlario
AT
yahoo
.
it
-_-_
www
.
centrostudimonetari
.
org
da :
molcalevi AT
yahoogroups
.com
molcalevi
@
yahoogroups
. com
[/b]


title: campo somma in maschera modalità folgio dati

author: iperworld

text:
Ciao a tutti
ci riprovo dopo aver postato
qualche tempo fa senza
aver ricevuto risposta
(probabilmente il post era lungo
o il titolo non significativo):
in una maschera (fattura)
voglio far vedere la somma
dei relativi ordini che rendo
anche visibili in una sottomaschera.
calcolo il totale in questo modo
nella sottomaschera
totale1 =Somma([importo ordini]
e prendo il valore così nella maschera
principale
totale2 = sms_ordini.Form!totale
il problema è che con la maschera principale
in modalità foglio dati il campo totale2
restituisce sempre lo stesso valore (quello della
prima fattura) e si aggiorna solo
se apro il foglio dati secondario
grazie se vorrete considerare la cosa


author: antonio

text:
"iperworld" <
poal...@tiscali.it
> ha scritto nel messaggio
news:R8kDh.218$Mh1...@nntpserver.swip.net...

Innanzitutto vorrei suggerirti di impostare la lunghezza della riga ad un
valore maggiore di quello che hai, perchè mi sembra che vada a capo troppo
prima del margine destro della pagina, forse anche se hai uno schermo a 640
x 480.
Se usi Outlook Express come me, trovi questa opzione fra: Menu strumenti -
Opzioni - Cartella Invio - Formato invio posta - Imposta testo normale. Il
valore che ho io è 76.
Per la domanda in particolare... potresti provare ad inviare una requery
della sottomaschera.
Ciao
Antonio


text:
"antonio" <
antone...@tiscali.it
> ha scritto nel messaggio
news:45dde160$0$20807$5fc...@news.tiscali.it...

Grazie ad Antonio per i preziosissimi consigli (sia su outlook che access)
mi è rimasta na sola domanda: "c'è qualcun altro che può aiutarmi?"
grazie ancora comunque


text:
"iperworld" <
poal...@tiscali.it
> ha scritto nel messaggio
news:CDoDh.289$Mh1...@nntpserver.swip.net...

Vado a tentoni perchè io tempo fa ho realizzato un'applicazione analoga, ma
non avevo questo problema: quindi forse per un caso fortuito non ho
sperimentato l'inconveniente. Ho verificato che io il campo Totale1 =
somma([Importo ordini]) l'avevo messo al "piè di pagina pagina" ed il
Totale2 della maschera principale veniva regolarmente aggiornato. Però al
rientro nella maschera principale facevo anche delle requery e quindi
potresti dover applicare entrambi i suggerimenti.
Altro argomento: vedi ora come si legge meglio il tuo messaggio ? Chissà,
forse il formato ad intestino stretto e lungo scoraggiava la lettura e per
questo nessuno avevo risposto al tuo quesito.
Ciao
Antonio


author: Samantha Cicch

text:

Ciao,
ma la tua totale fattura si deve aggiornare in base al record sul
quale ti sei posizionato nella sottomaschera?
Di sicuro devi mettere il requery, da qualche parte. tipo quando
cliccki su un record della sottomaschera, potresti mettere su quel
campo su corrente il comando
Me!totale2.requery
ma essendo un comando della maschera principale, non so se vada meglio
parent!totale2.requery
oppure
forms!mascheraPrincipale!totale2.requery
Buon lavoro
Samantha


text:
"Samantha Cicch" <
samanth...@gmail.com
> ha scritto nel messaggio
news:1172216883.6...@m58g2000cwm.googlegroups.com...



>Buon lavoro
>Samantha
ciao Samantha e grazie, forse non mi sono spiegato,
però penso che tu capirai perchpè proprio qualche post
precedente hai affrontato un problema simile
(recordset e uso della funzione Dsum)
il campo che calcola il totale è (ovviamente) nel pià di pagina
di una sottomaschera, ma io voglio che compaia anche nella maschera
principale [fin qui so come fare anche senza i "preziosi" consigli di
Antonio ;-) ]
il problema è dato dal fatto che anche la maschera principale è
in modalità foglio dati: questa è la ragione per cui i totali compaiono
uguali
per tutti i record.
ma tu come hai fatto nel caso di machere continue e funzione Dsum?
ciao e grazie


text:
On 23 Feb, 15:44, "iperworld" <
poalp...@tiscali.it
> wrote:
> "Samantha Cicch" <
samantha.ci...@gmail.com
> ha scritto nel messaggionews:1172216883.6...@m58g2000cwm.googlegroups.com...

Ahn
allora tu devi pescare nella query, dove hai i costi che sommati
formano il totale della fattura (oppure totali ordini) (quelli che
sommati nel piè pagina della maschera ti danno il valore che vuoi
richiamare).
nella modalità maschere continue, il DSUM da vba non andava e nemmeno
con il recordset (che cmq alla fine mi è servito ad altro)
A te serve metttere nell'origine campo del controllo in maschera il
codice DSUM, qui sotto ti faccio un copia incolla del mio:
=IIf(IsError(nz(DSum("[cstarticolo]";"[q_smcstflyTOTMATPRI]";"[dist_id]=
" & [DISTINTAID]);0));0;
(nz(DSum("[cstarticolo]";"[q_smcstflyTOTMATPRI]";"[dist_id]= " &
[DISTINTAID]);0)))
Non so quale dimestichezza hai con il codice, quindi:
questo è il codice che serve x recuperare il totale
DSum("[cstarticolo]";"[q_smcstflyTOTMATPRI]";"[dist_id]= " &
[DISTINTAID])
se i campi erano vuoti mi dava errore, per quello ho usato la funzione
Iif ((iserror(dsum);0;(dsum)) che è come la funzione se di excel
Tanto per chiacchierare, io ora sto implementando un recordset, che
prendendo i valori ricalcolati me li risalvi dentro la tabella
prodotti,
questa l'ho fatta stamattina, ma non ho ancora avuto tempo x testarla
Dim dbfly As Database
Dim rstfly As Recordset
Dim qdffly As QueryDef
Set dbfly = CurrentDb
Set qdffly = dbfly.QueryDefs("fissaFLY").sql = "SELECT
TBL_DIST.dist_id, TBL_DIST.cli_id, TBL_DIST.dist_data,
TBL_DIST.dist_fissatodata, TBL_DIST.dist_tot1, TBL_DIST.dist_vendita,
TBL_DIST.dist_totlav, TBL_DIST.dist_totcstvari, TBL_DIST.dist_margf,
TBL_DIST.dist_scartopercf, TBL_DIST.dist_tottrasp,
TBL_DIST.dist_przlistino FROM TBL_DIST WHERE
(((TBL_DIST.cli_id)=[forms]![Msc_generalistinovendita]!
[cbocliente]));"
qdffly.Parameters("[Forms]![MSC_Generalistinovendita]![CBOCLIENTE]") =
Parent![cboCliente]
'Dopo la query devo fare refresh altrimenti mi da un errore di
condivisione 3197
Qdffly.Refresh
Set rstfly = qdffly.OpenRecordset()
Set rst = Me.RecordsetClone
If rst.RecordCount <> 0 Then
Me.Refresh
    'rst.MoveLast
    'tot = rst.RecordCount
    rst.MoveFirst
   Do Until rst.EOF
     rst.Edit
     rst.Fields("dist_przlistino") =  Me!dist_przlistino
     rst.Fields("dist_fissatodata") = Me!dist_datafly
     rst.Fields("dist_tot1") = Me!fly1
     rst.Fields("dist_totlav") = Me!fly4
     rst.Fields("dist_totcstvari") = Me!fly5
     rst.Fields("dist_margf") = Me!fly9
     rst.Fields("dist_scartopercf") = Me!fly6
     rst.Fields("dist_tottrasp") = Me!fly7
     rst.Fields
     rst.Update
     'Me!fly1 = totmp
     rst.MoveNext
  Loop
  rst.Close
  rstMio.Close
Poi la provo e ti farò sapere come va,
fammi sapere se funzia il codice di cui sopra
Ciao
Samantha


text:
[cut selvaggio]
> fammi sapere se funzia
adesso ho capito (questa volta non č ironico)
grazie


text:
On 23 Feb, 16:49, "iperworld" <
poalp...@tiscali.it
> wrote:
? Dunque funziona


text:
On 23 Feb, 16:49, "iperworld" <
poalp...@tiscali.it
> wrote:
> [cut selvaggio]
>
> > fammi sapere se funzia
>
> adesso ho capito (questa volta non è ironico)
>
> grazie
Ma mi verrebbe da supporre che i miei post siano
incasinati!?!     ;)    ;)
Si la parte sotto non c'entrava con quello che mi avevi chiesto... ma
dopo tanto lavoro perchè non condividerlo e avere una opinione?
Vabbè,
finisco sta offerta sofferta e poi testo quel codice,
Ciao,
Samantha


title: Domandone di carattere Access Filosofico

author: Mad® Milox

text:
Per gestire l'aggiornamento dei dati tra tabelle ,
Es. Tabella Numeratori a fine anno cliccando il pulsante cambio anno deve
essere accodata nella Tabella Numeratori Storico.
Qui mi e' sorto un dubbio, e' meglio usare le varie query di aggiornamento ,
inserimento , etc .. oppure gestire la cosa  da codice con i recordset ?
Questo mi ha fatto pensare che alcune tabelle mi si aggiornano con i
recordset (vedi la tabella scadenze al momento dell'emissione delle fatture)
, altre si aggiornamno con i campi della form direttamente collegati alla
tabella (modalita' classica di access) , altri si aggirnano con delle query
di aggiornamentoed inserimento (vedi sopra). Non e' che ho fatto un po' di
casino ed e' meglio usare un unica metodologia ?
Scusate per queste farneticazioni filosoficoesikstenziali,
Con questo dilemmone vi saluto e ringrazio per l'attenzione.
--
                Lorenzo

http://www.arsdata.it


author: Roberto dal portatile

text:
"Mad® Milox" <
madm...@tin.it
> ha scritto nel messaggio
news:994qt2$jn$3...@pegasus.tiscalinet.it...

A mio modesto parere, al momento che accodi una tabella in un'altra tabella
storica non ha alcun significato quale procedimento hai usato per aggiornare
la tua tabella.
Quello a cui devi stare attento potrebbe essere un'altra cosa: se la tua
tabella ha come chiave primaria un contatore e si trova sul lato uno di una
relazione uno-a-molti con altre tabelle, devi trovare un marchingegno che ti
mantenga l'integrità referenziale con le altre tabelle, visto che ritengo
che vorrai accodare anche loro in qualche modo in altre tabelle storiche.
E' qui che nasce, secondo me, il vero dilemma "Access Filosofico": è giusto
usare una chiave primaria di tipo contatore se poi debbo accodare le mie
tabelle in tabelle storiche. Io penso proprio di no.
Dei vantaggi e svantaggi su vari tipi di campo delle chiavi primarie se ne
parla anche nel Sito Comune (link qui sotto) nella Sezione Tables, in una
FAQ di Emanuele Cesena titolata "Cos'è un ID? Contatori, numeri, e altro."
> --
>                 Lorenzo
>
http://www.arsdata.it
>
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: MDE e A2K2

author: Fabio DALLA VILLA

text:
Access 2002 non permette di creare un file MDE in versione 2000, ma solo in
v.2002, che però non funziona su altri computer con A2K.
Devo per forza reinstallare Access 2000 per distribuire MDE in v.A2K? Come?
Posso mantenere A2K2?
Grazie.
--
Fabio Dalla Villa


title: MDE e A2K2

author: warp

text:
Fabio DALLA VILLA ha scritto nel
>Access 2002 non permette di creare un file MDE in versione 2000, ma solo in
>v.2002, che però non funziona su altri computer con A2K.
>Devo per forza reinstallare Access 2000 per distribuire MDE in v.A2K? Come?
>Posso mantenere A2K2?
Sì, d'altro canto viste le moltissime implementazioni, pretendere che gli .MDE di A 'XP funzioni a
ritroso sarebbe troppo.
Personalmente trovo già molto interessante il fatto che un p-compilato di A '2000 venga eseguito
perfettamente dalla versione XP.
Ciao, warp


title: Quando utilizzare i metodi AddNew, Update...?

author: Giulio Severini

text:
Poichè basta inserire i dati e questi vengono automaticamente memorizzati
nelle tabelle origine record delle maschere, quando devono essere
utilizzati i metodi nel subject e quelli correlati?
In quali scenari?
Grazie!
--
Insostenibile è il peso della conoscenza, se questa toglie poesia all'
Essere Umano.
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:
Purtroppo non posso editare il msg precedente.
Ad.es. io ho un pulsante 'Aggiungi utente'. Quando ci clicco sopra mi si
pare una maschera con 20 campi, io ci metto i dati dentro poi clicco su un
pulsante del tipo 'Torna a...' e quei dati sono memorizzati.
Perchè avrei dovuto utilizzare, invece, il seg. codice:
Dim dbMioDatabase As DAO.Database
Dim tblUtenti As DAO.RecordSet
Set dbMioDatabase as CurrentDb
Set tblUtenti As dbMioDatabase.OpenRecordset("tblUtenti")
tblUtenti.AddNew
tblUtenti![Nome]=txtNomeUtente.text
...
...
tblUtenti.Update
come evento su un Click di un pulsante di comando 'Aggiungi Utente'?
Dove sta la differenza e/o la praticitià dell'una o dell'altra cosa?
Grazie e scusate tutte ste domande ma è il momento topico questo :D
Bacioni!!!!



text:
Giulio Severini wrote:
> Purtroppo non posso editare il msg precedente.
>
> Ad.es. io ho un pulsante 'Aggiungi utente'. Quando ci clicco sopra mi
> si pare una maschera con 20 campi, io ci metto i dati dentro poi
> clicco su un pulsante del tipo 'Torna a...' e quei dati sono
> memorizzati.
>
> Perchè avrei dovuto utilizzare, invece, il seg. codice:
>
> Dim dbMioDatabase As DAO.Database
> Dim tblUtenti As DAO.RecordSet
> Set dbMioDatabase as CurrentDb
> Set tblUtenti As dbMioDatabase.OpenRecordset("tblUtenti")
> tblUtenti.AddNew
> tblUtenti![Nome]=txtNomeUtente.text
> ...
> ...
> tblUtenti.Update
>
> come evento su un Click di un pulsante di comando 'Aggiungi Utente'?
>
> Dove sta la differenza e/o la praticitià dell'una o dell'altra cosa?
>
> Grazie e scusate tutte ste domande ma è il momento topico questo :D
Se hai una maschera associata non hai bisogno di usare questi metodi,
se invece non è associata o ti apri un recordset (per esempio i dati che
stai immettendo in una tabella devono essere immessi anche in un'altra) usi
il metodo addnew
>
> Bacioni!!!!
Ah ma allora sei de coccio... avevi cominciato a parlare così bene di
lasagne...
e ricordati che non siamo volpi... non dispregiamo l'uva e derivati...
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa1 - I° Conferenza Italiana per Sviluppatori Access Arezzo 4+5
Giugno 2005 Sono aperte le iscrizioni  Info:
www.donkarl.com/it


author: ALESSANDRO Baraldi

text:
"Giulio Severini" <
giulio....@ministero.difesa.it
> ha scritto nel
messaggio news:d6i8v8$qpc$1...@news.newsland.it...
> Purtroppo non posso editare il msg precedente.
>
> Ad.es. io ho un pulsante 'Aggiungi utente'. Quando ci clicco sopra mi si
> pare una maschera con 20 campi, io ci metto i dati dentro poi clicco su un
> pulsante del tipo 'Torna a...' e quei dati sono memorizzati.
>
> Perchè avrei dovuto utilizzare, invece, il seg. codice:
>
> Dim dbMioDatabase As DAO.Database
> Dim tblUtenti As DAO.RecordSet
> Set dbMioDatabase as CurrentDb
> Set tblUtenti As dbMioDatabase.OpenRecordset("tblUtenti")
> tblUtenti.AddNew
> tblUtenti![Nome]=txtNomeUtente.text
> ...
> ...
> tblUtenti.Update
>
> come evento su un Click di un pulsante di comando 'Aggiungi Utente'?
>
> Dove sta la differenza e/o la praticitià dell'una o dell'altra cosa?
>
> Grazie e scusate tutte ste domande ma è il momento topico questo :D
>
> Bacioni!!!!
Attento che se insisti con i baci poi ti rispondesolo MA...!
La gestione dei Recordset non è una cosa che si spiega in 2 parole.
Diciamo che i 2 metodi possono essere equivalenti come risultato.
L'uso del 2° (questo che hai indicato) può essere fatto su una Tabella
che non è aperta dalla Maschera in uso ad esempio, oppure tecnica
più complessa, per la gestione di maschere non associate a Tabelle.
Le Maschere non associate hanno vantaggi(discutibili) ma sono spesso
utili ed importanti, meno immediate come gestione, e si preferisce usarle
maggiormente in quei casi in cui l'inserimento dati deve essere controllato
o vincolato.
Saluti
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


author: ciroteo

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:d6i9vi$sab$1...@domitilla.aioe.org...
> "Giulio Severini" <
giulio....@ministero.difesa.it
> ha scritto nel
> messaggio news:d6i8v8$qpc$1...@news.newsland.it...
> > Purtroppo non posso editare il msg precedente.
> >
> > Ad.es. io ho un pulsante 'Aggiungi utente'. Quando ci clicco sopra mi si
> > pare una maschera con 20 campi, io ci metto i dati dentro poi clicco su
un
> > pulsante del tipo 'Torna a...' e quei dati sono memorizzati.
> >
> > Perchè avrei dovuto utilizzare, invece, il seg. codice:
> >
> > Dim dbMioDatabase As DAO.Database
> > Dim tblUtenti As DAO.RecordSet
> > Set dbMioDatabase as CurrentDb
> > Set tblUtenti As dbMioDatabase.OpenRecordset("tblUtenti")
> > tblUtenti.AddNew
> > tblUtenti![Nome]=txtNomeUtente.text
> > ...
> > ...
> > tblUtenti.Update
> >
> > come evento su un Click di un pulsante di comando 'Aggiungi Utente'?
> >
> > Dove sta la differenza e/o la praticitià dell'una o dell'altra cosa?
> >
> > Grazie e scusate tutte ste domande ma è il momento topico questo :D
> >
> > Bacioni!!!!
>
>
> Attento che se insisti con i baci poi ti rispondesolo MA...!
>
te pareva sto a casa un giorno e subito mi tradisce quello li ...



text:
ciroteo wrote:
>>> Bacioni!!!!
>>
>>
>> Attento che se insisti con i baci poi ti rispondesolo MA...!
>>
>
> te pareva sto a casa un giorno e subito mi tradisce quello li ...
la fedeltà è qualcosa che si conquista.
Vedremo ad Arezzo che saprai fare...



text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:2hgje.11163$TR5....@news.edisontel.com...
> ciroteo wrote:
> >>> Bacioni!!!!
> >>
> >>
> >> Attento che se insisti con i baci poi ti rispondesolo MA...!
> >>
> >
> > te pareva sto a casa un giorno e subito mi tradisce quello li ...
>
> la fedeltà è qualcosa che si conquista.
> Vedremo ad Arezzo che saprai fare...
> --
> _ _
>
beh ... con questo giulio è un po'  di giorni che te la spassi ...sono
necessariamente portato a pensar male ...
;-)


title: Numero di caratteri in un campo

author: Giancarlo Francesconi

text:
Ciao a tutti.
Ho un DB con una tabella così strutturata:
Partita_IVA  (chiave primaria)
Cognome
Nome
Il campo Partita_IVA è obbligatoriamente di 11 caratteri.
Devo incrociare  tramite una query questi dati con un DB simile, in cui il
n°. di caratteri nel campo Partita_IVA è però stato erroneamente messo
uguale a 10 caratteri.
In teoria, per i miei scopi dovrei essere in grado di 'agganciare' il
Cognome anche con una partita iva con solo i primi dieci numeri.
Il problema è che però non so come fare a confrontare in una query un campo
di 11 caratteri con uno da 10.
Mi potete aiutare?
Grazie.
Giancarlo.


title: Numero di caratteri in un campo

author: Sergio MAZZA (Ufficio Stampa)

text:
"Giancarlo Francesconi" <
thi...@tin.it
> ha scritto nel messaggio
news:6GzD6.465$ba7....@news1.tin.it...

Leggi nell'help la funzione Len()...
Ciao.


title: Numero di caratteri in un campo

text:
Sergio MAZZA (Ufficio Stampa) <
sergi...@tiscalinet.it
> wrote in message
9bmi83$eu9$1...@canarie.caspur.it...
>
> "Giancarlo Francesconi" <
thi...@tin.it
> ha scritto nel messaggio
> news:6GzD6.465$ba7....@news1.tin.it...
> > Ciao a tutti.
> > Ho un DB con una tabella cosě strutturata:
> > Partita_IVA  (chiave primaria)
> > Cognome
> > Nome
> > Il campo Partita_IVA č obbligatoriamente di 11 caratteri.
> > Devo incrociare  tramite una query questi dati con un DB simile, in cui
il
> > n°. di caratteri nel campo Partita_IVA č perň stato erroneamente messo
> > uguale a 10 caratteri.
> > In teoria, per i miei scopi dovrei essere in grado di 'agganciare' il
> > Cognome anche con una partita iva con solo i primi dieci numeri.
> > Il problema č che perň non so come fare a confrontare in una query un
> campo
> > di 11 caratteri con uno da 10.
> > Mi potete aiutare?
> > Grazie.
> > Giancarlo.
> >
>
> Leggi nell'help la funzione Len()...
>
> Ciao.
>
>
Sinceramente non č che ci abbia capito molto. Non potresti essere dami
quelche info. in piů?
Grazie.


title: Numero di caratteri in un campo

text:
"Giancarlo Francesconi" <
thi...@tin.it
> ha scritto nel messaggio
news:RWED6.1975$ba7....@news1.tin.it...

se il campo di 10 caratteri corrisponde ai primi dieci caratteri della
partita iva, prova ad aggiungere un campo nella tabella dove piva č di 11.
al quale imposti formato testo lunghezza 10.
pi con una semplice query di aggiornamento aggiorni il nuovo campo a piva,
che in pratica viene troncato.
cosě nella tabella dove piva č da 11 ne hai anche una ver da 10 e puoi
confrontare questo dato con l'altro.
č un po' artificioso ma funziona assicurato
ciao
Antonio


title: Numero di caratteri in un campo

text:
<
ari...@libero.it
> wrote in message
IMJD6.57565$s93.5...@news.infostrada.it...
>
> "Giancarlo Francesconi" <
thi...@tin.it
> ha scritto nel messaggio
> news:RWED6.1975$ba7....@news1.tin.it...
> >
> > Sergio MAZZA (Ufficio Stampa) <
sergi...@tiscalinet.it
> wrote in
message
> > 9bmi83$eu9$1...@canarie.caspur.it...
> > >
> > > "Giancarlo Francesconi" <
thi...@tin.it
> ha scritto nel messaggio
> > > news:6GzD6.465$ba7....@news1.tin.it...
> > > > Ciao a tutti.
> > > > Ho un DB con una tabella così strutturata:
> > > > Partita_IVA  (chiave primaria)
> > > > Cognome
> > > > Nome
> > > > Il campo Partita_IVA è obbligatoriamente di 11 caratteri.
> > > > Devo incrociare  tramite una query questi dati con un DB simile, in
> cui
> > il
> > > > n°. di caratteri nel campo Partita_IVA è però stato erroneamente
messo
> > > > uguale a 10 caratteri.
> > > > In teoria, per i miei scopi dovrei essere in grado di 'agganciare'
il
> > > > Cognome anche con una partita iva con solo i primi dieci numeri.
> > > > Il problema è che però non so come fare a confrontare in una query
un
> > > campo
> > > > di 11 caratteri con uno da 10.
> > > > Mi potete aiutare?
> > > > Grazie.
> > > > Giancarlo.
[...cut...]
> se il campo di 10 caratteri corrisponde ai primi dieci caratteri della
> partita iva, prova ad aggiungere un campo nella tabella dove piva è di 11.
> al quale imposti formato testo lunghezza 10.
> pi con una semplice query di aggiornamento aggiorni il nuovo campo a piva,
> che in pratica viene troncato.
> così nella tabella dove piva è da 11 ne hai anche una ver da 10 e puoi
> confrontare questo dato con l'altro.
> è un po' artificioso ma funziona assicurato
> ciao
> Antonio
>
....bella idea!!!
Grazie tante.
Ciao. Giancarlo.


title: Numero di caratteri in un campo

author: Sergio MAZZA

text:
"Giancarlo Francesconi" <
thi...@tin.it
> ha scritto nel messaggio
news:RWED6.1975$ba7....@news1.tin.it...
>
> Sinceramente non č che ci abbia capito molto. Non potresti essere dami
> quelche info. in piů?
> Grazie.
Scusa pensavo volessi solo confrontare i campi; allora il suggerimento di
ari...@libero.it
 č quello da seguire.
Fai una query di aggiornamento che aggiunge davanti uno spazio al campo
partitaiva da 10 caratteri, sempre che possa bastare questo stratagemma.
Es.
'------------
UPDATE nomeTabellaConPIVAda10 SET PivaDa10 = " " & PivaDa10;
'------------
Ciao.


title: Help! Centri di costo strutturato su più livelli

author: Stefy

text:
Ciao a tutti.
Scusate della mia domanda ma sono alle prime armi con access ed ho un
problema con le maschere.
Dovrei creare una maschera di inserimento movimenti prima nota che mi
richiami un "codice centro di costo" suddiviso su 3 livelli:
- il 1° livello identifica il raggruppamento centro di costo (ad esempio:
settore stabilimento "X")
- il 2° livello identifica un sottoraggruppamento (ad esempio: spese del
personale relative allo stabilimento "X")
- il 3° livello identifica in dettaglio la spesa (ad esempio: stipendi
relativi al personale dello stabilimento "X")
A tal scopo ho creato tre tabelle:
- la prima (che ho chiamato "tbl_CDC_liv_1") che contiene tutti i
raggruppamenti dei centri di costo ed è così strutturata:
               - cdc1      (chiave primaria)
               - descrizione
               - tipo
- la seconda (che ho chiamato "tbl_CDC_liv_2") che contiene i
sottoraggruppamenti ed è così strutturata:
               - cdc1               | (chiave primaria)
               - cdc2               | (chiave primaria)
               - descrizione
 - la terza (che ho chiamato "tbl_CDC_liv_3") contiene i costi in dettaglio
ed è così strutturata:
               - cdc1               | (chiave primaria)
               - cdc2               | (chiave primaria)
               - cdc3               | (chiave primaria)
               - descrizione
Le tabelle sono correlate in questo modo :
- "tbl_CDC_liv_1" relazione uno a molti con "tbl_CDC_liv_2" per il campo
"cdc1"
- "tbl_CDC_liv_2" relazione uno a molti con "tbl_CDC_liv_3" per i campi
"cdc1" e "cdc2"
Ora, ritornando alla mia maschera di inserimento movimenti che ho sopra
menzionato, dovrei dare all'utente la possibilità di selezionare il 1°
livello di centro di costo (con una casella combinata che abbia come origine
controllo la tabella "tbl_CDC_liv_1").
Sulla base della prima selezione l'utente dovrebbe poi scegliere il 2°
livello del centro di costo (bisognerebbe mettere una seconda casella
combinata che abbia come origine controllo la tabella "tbl_CDC_liv_2"
filtrata per il "cdc1" scelto dall'utente al 1° livello);
la stessa cosa si dovrebbe prevedere per il 3° livello: ci vorrebbe una
terza casella combinata che dia la possibilità all'utente di scegliere tra i
record della "tbl_CDC_liv_3" filtrata per i "cdc1" e "cdc2" precedentemente
selezionati.
Io, nonostante diversi tentativi, non sono riuscita a fare in modo che
selezionando il
primo livello di piano dei costi, il valore scelto possa essere utilizzato
come parametro per
il filtro per del secondo livello ..e così via.
Chi di voi saprebbe darmi un aiuto ed indicarmi il modo più semplice per
raggiungere il mio obiettivo? E' corretta la procedura che ho adottato di
creare 3
distinte tabelle di centro di costo (una per ciascun livello)?
Ringrazio in anticipo coloro che vorranno darmi dei suggerimenti in merito.
P.S. mi scuso se non sono riuscita ad essere stata abbastanza chiara
nell'esposizione del mio quesito.


text:
Stefy ha scritto nel messaggio
(Cut)
>Chi di voi saprebbe darmi un aiuto ed indicarmi il modo più semplice per
>raggiungere il mio obiettivo? E' corretta la procedura che ho adottato di
>creare 3
>distinte tabelle di centro di costo (una per ciascun livello)?
>
>Ringrazio in anticipo coloro che vorranno darmi dei suggerimenti in merito.
>
>P.S. mi scuso se non sono riuscita ad essere stata abbastanza chiara
>nell'esposizione del mio quesito.
Sei stata chiarissima: la tua è un'esigenza classica.
Però al posto tuo inizierei a normalizzare in maniera differente le tabelle: la tua scelta
d'utilizzo di chiavi alfanumeriche multicampo è correttissima dal punto di vista logico,
svantaggiosa all'atto pratico (soprattutto dal punto di vista prestazionale).
Prendi in considerazione l'utilizzo di Contatori e ID Long come chiavi di Link.
Ad ogni modo se sei sicura di voler utilizzare una strategia basata su combo di filtro, scarica da
www.sitocomune.com
  il Sample sull'utilizzo di Forms: tra i tanti ottimi contributi, si espone anche
il tuo problemino di sincronizzazione combo.
Tuttavia anche in questo caso al posto tuo prenderei in considerazione un'altra strada: l'utilizzo
di sottomaschere unite gerarchicamente attraverso i campi Master/Secondari.
Dai un'occhiata al Sample Northwind.mdb, troverai un buon esempio d'utilizzo di questa tecnica.
Ciao, warp


title: più dati in un unica casella di testo

author: marco veronesi

text:
Ciao a tutti, vorrei chiedere il vostro aiuto circa una casella di
testo di un mio db chiamata "Descrizione" ed in particolare vorrei che
la casella Descrizione si compilasse con il contenuto di più caselle
di testo della stessa maschera. Nel caso concreto nella maschera ho
una casella dove indico pagato o riscosso un altra indica il motivo,
un altra ancora la qualifica, ed un altra ancora il nominativo, etc
Il risultato che cerco è che tutti questi dati compilino la casella
"Descrizione"del tipo
"Pagato al C2 Paolino Paperino straordinario. inoltre vorrei che
quando mi posiziono sulla casella descrizione il cursore si
posizionasse accanto all'ultima parola inserita al fine di poter
consetire l'inserimento libero di altri eventuali dati.
Qualcuno può aiutarmi? Grazie per l'attenzione


title: più dati in un unica casella di testo

author: BFS

text:

per la prima domanda,
date due caselle di testo: testoA e testoB
per scrivere il contenuto della concatenazione delle due caselle su una
terza scrivi nell'evento "dopo aggiornamento" di testoA e testo B
me.descrizione=me.testoA & " " & me.testoB
per la seconda domanda vedi sulla guida in linea "SelStart"
ciao,
BFS


title: più dati in un unica casella di testo

text:

grazie, hai risolto il mio problema :-)


title: più dati in un unica casella di testo

text:

> grazie, hai risolto il mio problema :-)- Nascondi testo citato
>
> - Mostra testo citato -
ho risolto il problema del posizionare il cursore alla fine del testo,
ma vorrei posizionarlo lasciando uno spazio vuoto alla fine del testo
già scritto in maniera da inizia immediatamente la digitazione di
altro testo. attualmente uso questa routine:
Private Sub Descrizione_Enter()
Me!descrizione.SelStart = Len("" & Me!descrizione)
End Sub
 grazie per l'eventuale aiuto


title: più dati in un unica casella di testo

text:
Il 08/04/2010 16:19, marco veronesi ha scritto:
> On 8 Apr, 15:17, marco veronesi<
spazionew...@gmail.com
>  wrote:
>> On 8 Apr, 12:41, BFS<
B...@bdffdfdfs.it
>  wrote:
>>
>>
>>
>>
>>
>>> Il 08/04/2010 12:26, marco veronesi ha scritto:
>>
>>>> Ciao a tutti, vorrei chiedere il vostro aiuto circa una casella di
>>>> testo di un mio db chiamata "Descrizione" ed in particolare vorrei che
>>>> la casella Descrizione si compilasse con il contenuto di pi� caselle
>>>> di testo della stessa maschera. Nel caso concreto nella maschera ho
>>>> una casella dove indico pagato o riscosso un altra indica il motivo,
>>>> un altra ancora la qualifica, ed un altra ancora il nominativo, etc
>>>> Il risultato che cerco � che tutti questi dati compilino la casella
>>>> "Descrizione"del tipo
>>>> "Pagato al C2 Paolino Paperino straordinario. inoltre vorrei che
>>>> quando mi posiziono sulla casella descrizione il cursore si
>>>> posizionasse accanto all'ultima parola inserita al fine di poter
>>>> consetire l'inserimento libero di altri eventuali dati.
>>>> Qualcuno pu� aiutarmi? Grazie per l'attenzione
>>
>>> per la prima domanda,
>>> date due caselle di testo: testoA e testoB
>>
>>> per scrivere il contenuto della concatenazione delle due caselle su una
>>> terza scrivi nell'evento "dopo aggiornamento" di testoA e testo B
>>
>>> me.descrizione=me.testoA&  " "&  me.testoB
>>
>>> per la seconda domanda vedi sulla guida in linea "SelStart"
>>
>>> ciao,
>>> BFS
>>
>> grazie, hai risolto il mio problema :-)- Nascondi testo citato
>>
>> - Mostra testo citato -
>
> ho risolto il problema del posizionare il cursore alla fine del testo,
> ma vorrei posizionarlo lasciando uno spazio vuoto alla fine del testo
> gi� scritto in maniera da inizia immediatamente la digitazione di
> altro testo. attualmente uso questa routine:
> Private Sub Descrizione_Enter()
> Me!descrizione.SelStart = Len(""&  Me!descrizione)
>
> End Sub
>   grazie per l'eventuale aiuto
aggiungi dopo
Me!descrizione.SelStart = Len(""&  Me!descrizione)
questo
SendKeys " "
ciao!
BFS


title: più dati in un unica casella di testo

text:

> BFS- Nascondi testo citato
>
> - Mostra testo citato -
grazie mille risolto :-)


title: Tasti funzionali

author: ALB

text:
Ho costruito un applicazione con tanto di protezione e altro. Mi sono
accorto che alla fine però, se l'utente digita il tasto F1, si apre l'Help
di Access. Come posso fare affinchè cio' non accada.
Premetto che ho deselezionato la casella "Usa Tasti Speciale" nella Maschera
Avvio dal Menu Strumenti.


title: Tasti funzionali

text:
ALB ha scritto:

Puoi creare una macro chiamata Autokeys, aprirla, cliccare menu
visualizza - nomi macro
digitare:
nome macro: {F1}
azione: ArrestaMacro (oppure apri maschera About dove scrivi la
versione del software, il tuo indirizzo email, il tipo licenza, il
copyright ...)


title: ricerca per la determinazione se un record è già stato inserito

author: DESIO

text:
in una maschera di inserimento ho tre controlli che fanno riferimento a tre
campi di una tabella.
come posso fare ad individuare se il record che vado ad inserire è già stato
inserito.
premetto che per record uguale intendo con tutti e tre i campi uguali.
ora sta andando con una funzione che mi ricerca(seek) uno alla volta in
sequenza prima un colonna poi un altra e poi un altra ancora.
miatabella.Index = "colonna1"
miatabella.Seek "=", controllo1
If miatabella.NoMatch = True Then Exit Function
miatabella.Index = "colonna2"
miatabella.Seek "=", controllo2
If miatabella.NoMatch = True Then Exit Function
miatabella.Index = "colonna3"
miatabella.Seek "=", controllo3
If miatabella.NoMatch = True Then Exit Function
MsgBox ("recordGiàInserito")
il problema mi sorge perchè la verifica la posso fare solo alla prima
inserzione e se chi inserisce i dati cambia record, e puo' succedere, prima
dell' inserimento del controllo3 i dati dei controlli 1 e 2 si memorizzano
nella tabella e la verifica puo' risultare falsata.
Spero che qualcuno ci capisca qualcosa in quello che ho scritto
grazie e ciao
desio


author: MA

text:

Creati un controllo campo1 & " " & campo2 & " " & campo3
e salvalo in un campo e non accettare duplicati
ciao MAssimiliano

--------------------------------
Inviato via
http://usenet.libero.it


author: Roberto da casa

text:
"DESIO" <
giscar...@dada.it
> ha scritto nel messaggio
news:3e53c...@news.dada.it...

A fronte dell'evento "Prima di aggiornare" della maschera, con una funzione
DCount (vedi help) verifica se nella tabella già non esista un record con
gli stessi valori nei tre campi; se esiste la funzione ti restituirà un
valore diverso da zero, nel qual caso con Cancel = True annulla l'evento di
registrazione del record dopo avere segnalato con un messaggio il problema.
In alternativa puoi crearti per la tabella un indice composto dall'insieme
di tutti e tre i tuoi campi e impostare a Si la Proprietà indice Univoco,
nel qual caso non devi scrivere codice VBA: Access automaticamente si
rifiuterà di inserire record che risultassero doppi in base ai tre campi e
te ne darà preventivamente un messaggio di avviso.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
"DESIO" <
giscar...@dada.it
> ha scritto nel messaggio
news:3e53c...@news.dada.it...

Grazie a tutte e due
penso che la soluzione di creare un campo con la somma dei tre sia ok(ma
come ho fatto a non pensarci)
ciao desio


title: usare 1 maschera sola priva di Origine Record per scopi simili

text:
ciao a tutti,
come da oggetto, vorrei usare 1 unica maschera per eseguire operazioni
simili su una tabella: questo per evitare di avere n maschere identiche x
svolgere n compiti simili ma non uguali: per fare ciň ho fatto come segue:
1. la tabella in questione ha i segg campi:
ID
ID_dip
ID_az
notif_A_IDbook
notif_B_IDbook
notif_C_IDbook
notif_A_STATUS
notif_B_STATUS
notif_C_STATUS
2. esistono poi 3 queries, ciascune della quali č cosě formata:
ID
ID_dip
ID_az
notif_A_IDbook
notif_A_STATUS
ID
ID_dip
ID_az
notif_A_IDbook
notif_A_STATUS


text:
ops.. mi è scappato il dito! dicevo:
ciao a tutti,
come da oggetto, vorrei usare 1 unica maschera per eseguire operazioni
simili su una tabella: questo per evitare di avere n maschere MOLTO simili x
svolgere n compiti MOLTO simili, ma non uguali. per fare ciò ho fatto come
segue:
1. la tabella in questione ha i segg campi:
ID
ID_dip
ID_az
notif_A_IDbook
notif_B_IDbook
notif_C_IDbook
notif_A_STATUS
notif_B_STATUS
notif_C_STATUS
2. esistono poi 3 queries, ciascune della quali è così formata:
"q_AGENDA_SelA"
ID
ID_dip
ID_az
notif_A_IDbook
notif_A_STATUS
"q_AGENDA_SelB"
ID
ID_dip
ID_az
notif_B_IDbook
notif_B_STATUS
"q_AGENDA_SelC"
ID
ID_dip
ID_az
notif_C_IDbook
notif_C_STATUS
3. infine ho una maschera con 3 sottomaschere, ciascuna delle quali possiede
1 bottone che mi apre la maschera *unica*, ad esempio nel modo seguente:
Private Sub Comando68_Click()
    DoCmd.Requery
    DoCmd.OpenForm "AGENDA_SEL_A", , , , acFormEdit, , "daA"
End Sub
4. all'apertura della maschera ho messo la seguente routine, e qui sta il
problema:
Private Sub Form_Open(Cancel As Integer)
    If Me.OpenArgs = "daA" Then
        Me.RecordSource = "q_AGENDA_SelA"

Me.notif_X_STATUS.Name
 = "notif_A_STATUS"

Me.notif_X_IDbook.Name
 = "notif_A_IDbook"
        Me.Requery
    ElseIf Me.OpenArgs = "daB" Then
        'ecc
        'ecc
    End If
End Sub
Il problema è riuscire ad indicare che i controlli della maschera comune
chiamati notif_X_STATUS e notif_X_IDbook devono "diventare"  notif_A_STATUS
e notif_A_IDbook, oppure notif_B_STATUS  e notif_B_IDbook, ecc.
quale sintassi devo usare?
spero di essermi spiegato.. :-)
grazie
em.an


author: Alessandro Baraldi

text:
"em.an" <
zzz....@libero.it
> wrote in message
news:NOKWe.5411$
Jr.8...@twister2.libero.it
[CUT]
> Il problema è riuscire ad indicare che i controlli della maschera comune
> chiamati notif_X_STATUS e notif_X_IDbook devono "diventare"  notif_A_STATUS
> e notif_A_IDbook, oppure notif_B_STATUS  e notif_B_IDbook, ecc.
>
> quale sintassi devo usare?
>
> spero di essermi spiegato.. :-)
>
> grazie
> em.an
Cicla i Controlli o se sono pochi accedi direttamente
cambiando il ControlSource come hai evidenziato.
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


author: Roberto dalla campagna

text:
"em.an" <
zzz....@libero.it
> ha scritto nel messaggio
news:NOKWe.5411$Jr.8...@twister2.libero.it...

Se la maschera non è associata e i suoi controlli hanno dei nomi particolari
(ad esempio Controllo1, Controllo2, Controllo3, ... ControlloN), per gestire
dinamicamente l'origine record e le origini controllo della maschera puoi
anche usare la tecnica illustrata nel Sito Comune (link qui sotto), nella
Sezione Forms, nella mia FAQ intitolata "3.110 Maschera continua dinamica
basata su query a campi incrociati parametrica". E' una tecnica normalmente
usata con query parametrica a campi incrociati, ma nessuno vieta di usarla
con normali query di selezione (come nel tuo caso) e con maschera che
abbiano una visualizzazione diversa da Maschere continue. Insomma
all'apertura della maschera (Sub Form_Open) in base al valore della
proprietà OpenArgs oltre ad impostare l'origine record della maschera
imposterai anche le origini controllo, dopo aver rilevato quali siano i nomi
dei campi dell'oggetto impostato come origine record così come mostrato
nella FAQ di cui sopra. Naturalmente se le query non sono parametriche il
codice VBA per la rilevazione dei noni dei campi della query è meno
complesso; se ne vuoi parlare rifatti vivo.
>
> grazie
Prego
> em.an
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


text:
[CUT]
>
>
> Cicla i Controlli o se sono pochi accedi direttamente
> cambiando il ControlSource come hai evidenziato.
>
> @Alex
>
>
> --
> Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG
ciao Alessandro, anzitutto grazie per la tua risposta di sabato mattina!
non sapendo come procedere per ciclare i controlli (per la cronaca sono 7),
ho usato il tuo secondo consiglio, modificando la sub:
Private Sub Form_Open(Cancel As Integer)
    If Me.OpenArgs = "daA" Then
        Me.RecordSource = "q_AGENDA_SelA"

Me.notif_X_STATUS.Name
 = "notif_A_STATUS"

Me.notif_X_IDbook.Name
 = "notif_A_IDbook"
        Me.Requery
    ElseIf Me.OpenArgs = "daB" Then
'    ecc
'    ecc
    End If
End Sub
con:
Private Sub Form_Open(Cancel As Integer)
    If Me.OpenArgs = "daA" Then
        Me.RecordSource = "q_AGENDA_SelA"
        Me!notif_X_STATUS.ControlSource = "notif_A_STATUS"
        Me!notif_X_IDbook.ControlSource = "notif_A_IDbook"
        Me.Requery
    ElseIf Me.OpenArgs = "daB" Then
'   ecc
'   ecc
    End If
End Sub
il tutto sembrerebbe funzionare a dovere.
grazie ancora per l'imbeccata!
em.an


text:
"em.an" <
zzz....@libero.it
> ha scritto nel messaggio
news:UyBXe.9518$Jr.1...@twister2.libero.it...
> ciao a tutti
> Avendo la mia tabella di partenza così strutturata:
>
> ID                            (contatore)
> ID_dip                     (numerico)
> notif_A_STATUS    (numerico)
> notif_B_STATUS    (numerico)
> notif_C_STATUS    (numerico)
>
> vorrei produrre un report che elenchi in una sola riga un riferimento a
> ciascun dipendente (ID_dip), ed filtri i campi notif_A_STATUS,
> notif_B_STATUS, notif_C_STATUS nel caso assumano valore uguale a 1, nel
modo
> seguente:
>
> ID    ID_dip   notif_A_STATUS   notif_B_ST    notif_C_ST
> ..      1            1                            1                    0
> ..      2            0                            1                    1
>
> il problema è il seguente: se esistono piu campi ID relativi ad uno stesso
> dipendente (cosa necessaria) le righe prodotte saranno più di una:
>
> ID    ID_dip   notif_A_STATUS   notif_B_ST    notif_C_ST
> ..      1            1                            0                    0
> ..      1            0                            1                    0
> ..      2            0                            1                    0
> ..      2            0                            0                    1
>
>
> ho provato con diversi tipi di query, anche concatenandone più di una, ma
> senza successo..
> come posso fare per evitare l'inconveniente in questione?
> grazie
> em.an
Con l'autocomposizione creati una query a campi incrociati (vedi help).



text:
[CUT]
"Roberto dalla campagna" <
r.masso...@libero.it
> ha scritto nel
messaggio news:0sSWe.5725$Jr.9...@twister2.libero.it...

ciao roberto, trovo che la tua soluzione sia molto utile.
forse per il mio caso, in cui conosco con certezza a priori quali saranno le
informazioni che desidero trattare, venga bene usare il metodo precedente.
ps: mi sono scaricato cmq l'esempio in questione, che sicuramente potrò
tornarmi utile..
adesso me lo studio con calma.
ciao e grazie!
em.an


text:
ciao a tutti
Avendo la mia tabella di partenza cosě strutturata:
ID                            (contatore)
ID_dip                     (numerico)
notif_A_STATUS    (numerico)
notif_B_STATUS    (numerico)
notif_C_STATUS    (numerico)
vorrei produrre un report che elenchi in una sola riga un riferimento a
ciascun dipendente (ID_dip), ed filtri i campi notif_A_STATUS,
notif_B_STATUS, notif_C_STATUS nel caso assumano valore uguale a 1, nel modo
seguente:
ID    ID_dip   notif_A_STATUS   notif_B_ST    notif_C_ST
..      1            1                            1                    0
..      2            0                            1                    1
il problema č il seguente: se esistono piu campi ID relativi ad uno stesso
dipendente (cosa necessaria) le righe prodotte saranno piů di una:
ID    ID_dip   notif_A_STATUS   notif_B_ST    notif_C_ST
..      1            1                            0                    0
..      1            0                            1                    0
..      2            0                            1                    0
..      2            0                            0                    1
ho provato con diversi tipi di query, anche concatenandone piů di una, ma



title: Errore Apertura

author: degui

text:
Ho predisposto un Db sul quale possono lavorare, oltre al server,  altri 2
terminali.
Uno di questi operatori ha (presumiblimente) effettuato un salvataggio con
la propria versione di access (precedente alla 2002).
Ora il problema è che non si può più aprire il db e nemmeno recuperare i
record inseriti.
Trattandosi di dati estrememente importanti, avreste la possibilità di
aiutarmi a risolvere questo problema?
Mi basterebbe recuperare anche i soli record, in quanto un salvataggio
completo del db l'avevo fatto, ma purtroppo gli ultimi dati inseriti non li
ho.
Se può servire, il messaggio che viene visualizzato all'apertura è il
seguente:
"Database convertito da una versione precedente di Access utilizzando il
metodo DAO CompactDatabase invece del comando Converti database del
sottomenù Utilità database del menù Strumenti. Il database è stato
convertito parzialmente."
Poi continua, consigliando al limite di creare un nuovo db ed importare i
dati di quello danneggiato, ma purtroppo non funziona.
Grazie, A.


title: Errore Apertura

author: Pablitomf

text:
degui ha scritto:






> Grazie, A.
Quanto è grande stò DB? se non troppo spediscimelo va!
--
Pablitomf (Maurizio Facciuti)
Lentamente muore chi abbandona un progetto prima di iniziarlo, chi non fa
domande sugli argomenti che non conosce, chi non risponde quando gli
chiedono qualcosa che conosce. (P.Neruda)
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Errore Apertura

text:
CUT
"Pablitomf" <
maurizio...@accessgroup.it
> ha scritto nel messaggio
news:ceaqoc$51k$1...@news.newsland.it...
>
> Quanto è grande stò DB? se non troppo spediscimelo va!
>
> --
> Pablitomf (Maurizio Facciuti)
>
> Lentamente muore chi abbandona un progetto prima di iniziarlo, chi non fa
> domande sugli argomenti che non conosce, chi non risponde quando gli
> chiedono qualcosa che conosce. (P.Neruda)
Intanto ti ringrazio per avermi risposto, comunque il file è di 1,88 mb.
Nel frattempo l'ho aperto con excel ed ho salvato la tabella che mi
interessa in formato xls, però a questo punto non so come importare tali
dati nel database (funzionante) che avevo salvato in precedenza.
Per la precisione, sono riuscito ad importare i dati, però devo comunque
avere anche il file xls per far funzionare il tutto, mentre a me servirebbe
avere il db funzionante.
Grazie, A.


title: Errore Apertura

text:
degui ha scritto:
> Intanto ti ringrazio per avermi risposto, comunque il file è di 1,88 mb.
Troppo, anche se compresso e zippato lo ridurresti alla grande...
> Nel frattempo l'ho aperto con excel ed ho salvato la tabella che mi
> interessa in formato xls, però a questo punto non so come importare tali
> dati nel database (funzionante) che avevo salvato in precedenza.
Menomale!
> Per la precisione, sono riuscito ad importare i dati, però devo comunque
> avere anche il file xls per far funzionare il tutto, mentre a me servirebbe
> avere il db funzionante.
Forse fai della parola "Importare" un uso improprio se poi dici di dover
cmq avere il file xls per far funzionare il tutto... forse hai collegato
il file e quindi ora è parte integrante del sistema (nel senso che i dati
cmq risiedono lì e non in tabella)... prova a copiare i dati in una
tabella interna al db funzionante e cancella il collegamento al file
xls... rivedi i percorsi dei dati nelle eventuali query e il tutto
dovrebbe rifunzionare.
Fammi sapere.
> Grazie, A.
--
Pablitomf (Maurizio Facciuti)
Lentamente muore chi abbandona un progetto prima di iniziarlo, chi non fa
domande sugli argomenti che non conosce, chi non risponde quando gli
chiedono qualcosa che conosce. (P.Neruda)
questo articolo e` stato inviato via web dal servizio gratuito



title: Errore Apertura

text:
"Pablitomf" <
maurizio...@accessgroup.it
> ha scritto nel messaggio
news:ced43q$ih7$1...@news.newsland.it...
CUT
> Forse fai della parola "Importare" un uso improprio se poi dici di dover
> cmq avere il file xls per far funzionare il tutto... forse hai collegato
> il file e quindi ora è parte integrante del sistema (nel senso che i dati
> cmq risiedono lì e non in tabella)... prova a copiare i dati in una
> tabella interna al db funzionante e cancella il collegamento al file
> xls... rivedi i percorsi dei dati nelle eventuali query e il tutto
> dovrebbe rifunzionare.
>
> Fammi sapere.
Nel frattempo, avevo già risolto in maniera pressoché simile:
Nell'importare una nuova tabella (cioè il file xls contenente i dati) mi
sono limitato a scegliere di inserire tali dati all'interno della tabella
esistente (quella del database salvato).
Pertanto la differenza sta nel fatto che in precedenza creavo una nuova
tabella, quindi dovevo per forza mantenere il collegamento con il file xls.
Scusa se il linguaggio è un po' contorto, ma spero di essermi spiegato.
Ciao, A.


title: Errore Apertura

text:
OT
Per curiosità:
Se guardate le proprietà dei miei messaggi, ad un certo punto c'è scritto:
 Message-ID: <ced6dq$49j$
1...@carabinieri.cs.interbusiness.it
>
References: <ceaglh$add$
1...@carabinieri.cs.interbusiness.it
>
<ceaqoc$51k$
1...@news.newsland.it
> <cectvr$9bt$
1...@fata.cs.interbusiness.it
>
<ced43q$ih7$
1...@news.newsland.it
>
NNTP-Posting-Host: 81.116.113.69
X-Trace:
carabinieri.cs.interbusiness.it
 1091181818 4403 81.116.113.69 (30
Jul 2004 10:03:38 GMT)
Che significa ? Che i carabinieri controllano uello che scrivo ?
Grazie, A.


title: Errore Apertura

text:
"degui" <
de...@fremail.it
> ha scritto nel messaggio news:cevre8$7g8$1...@carabinieri.cs.interbusiness.it...

Perché non lo sai che siamo costantemente monitorizzati? Prova a scrivere qualche messaggio, e-mail/sms/news poco importa, con
scritto parole chiave tipo: bambini, sesso, berlusconi e altro del genere...
Ciao.
--
Sergio MAZZA


title: Errore Apertura

author: giovanni t

text:

          dottor MAZZA,
non facci lo spiritoso,
noi non stiamo controllando nessuno,
queste sono calunnie pericolose e sovversive,
in ogni qual modo la metto sul chivalà e le consiglio di stare attento al
contesto in cui nomina in nostro Onorevole Presidente del Consiglio.
in fede
Appuntato di turno
reparto mobile e automobile
Carabbinieri di Stato
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Errore Apertura

text:
"giovanni t" <
Giovanni_...@libero.it
> ha scritto nel messaggio news:81Z208Z60Z192Y1...@usenet.libero.it...
> dottor MAZZA,
Non sono dottore e neanche infermiere ne portantino;
> non facci lo spiritoso,
> noi non stiamo controllando nessuno,
> queste sono calunnie pericolose e sovversive,
Hi! Hi!
> in ogni qual modo la metto sul chivalà e le consiglio di stare attento al
> contesto in cui nomina in nostro Onorevole Presidente del Consiglio.
inogniqualché???
> in fede
E nei secoli fedele...
>
> Appuntato di turno
Dove l'hanno ap..puntato?
> reparto mobile e automobile
Ah! Ecco...
> Carabbinieri di Stato
Att..tenti!
--
Sergio MAZZA


title: costrutto if ...then - confronto ignorato

author: Stefano Vanoli

text:
Ciao a tutti.

Ho questa anomalia in Access 2003.

In una maschera, dopo aver inserito un record con 1 solo campo testo e diversi campi numerici, devo valutare se in CampoTesto sono stai immessi dei dati o meno.
Nella tabella sottostante ho impostato il valore predefinito di CampoTesto a "".
La valutazione di CampoTesto è agganciata all'evento di maschera "su corrente".
Nella subroutine ho il costrutto:

1  Dim testo as String
2  testo = Me.CampoTesto
3  If testo <>"" then
4      istruzioni...
5  End if

Nell'esecuzione del programma, apparentemente il confronto non veniva effettuato.
Ho impostato un punto di interruzione in "Private Sub Form_Current()" e ho rieseguito, usando F8 per eseguire passo passo:
riga 1 viene eseguita,
riga 2 viene eseguita
riga 3 viene eseguita
riga 4 non viene eseguita anche se CampoTesto contiene sicuramente del testo.

Come può succedere una cosa simile?

Qualcuno ha dritte?

Grazie
Stefanone


author: Bruno Campanini

text:
It happens that Stefano Vanoli formulated :

Hai salvato il record?

Comunque può bastare:
   If Len([CampoTesto]) Then
       ...
   End If

Bruno


text:
Grazie, ma non può funzionare nulla xché sono un bestione.
Io effettuo il confronto dopo aver lanciato l'inserimento di un nuovo record, ma prima di editare i campi.
Ci credo che mi legge sempre CampoTesto = "" !!!
Adesso ho spostato il confronto prima di inserire il record nuovo e va benone
Ciao
Stefanone


author: pfmarro

text:

grazie per averci aggiornato
per una completezza del thread: in che evento avevi messo il costrutto if? e dopo dove l'hai spostato?

Grazie


text:
Ciao pfmarro.
In sintesi, creo un nuovo record direttamente in tabella con:

Dim rs As Variant                           dichiaro la variabile
Set rs = CurrentDb.OpenRecordset("Tabella") apro il recordset corrente x Tabella
rs.AddNew                                   forzo creazione record vuoto
rs.Update                                   lo memorizzo
Me.Requery


text:
Ciao pfmarro.
Ignora il messaggio smozzicato delle 16:59 dovuto a uno scatto inconsulto per evitare di versare il caffè sulla tastiera!

In sintesi, con l'sevento su click del pulsante "Nuovo record", creo un nuovo record direttamente in tabella con:

Dim rs As Variant                           dichiaro la variabile
Set rs = CurrentDb.OpenRecordset("Tabella") apro il recordset corrente x
                                            Tabella
rs.AddNew                                   forzo creazione nuovo record vuoto
rs.Update                                   lo memorizzo
Me.Requery                                  esco dalla fase di memorizzazione
                                            e salto alla subroutine agganciata
                                            a "su corrente" del form.
Il Requery è indispensabile, perchè così mi viene mostrato il nuovo record vuoto e pronto per essere editato.
Poichè devo valutare il valore di CampoTesto, ho scritto in "su corrente" form:

if CampoTesto<>"" then
   istruzioni varie...
end if

ma senza considerare che in realtà l'editazione di CampoTesto è come se non fosse ancora avvenuta in "su corrente".
Il valore di CampoTesto è ancora "", cioè il valore predefinito impostato in struttura tabella.
Quando mi sono reso conto di questa lampante verità, ho deciso di spostare il confronto if...then in uno qualunque degli eventi di CampoTesto, che si succedono dopo che il CampoTesto vuoto è stato riempito con dati ("dopo modifica", "prima di aggiornare", "dopo aggiornamento", "su disattivazione", "su uscita".
La mia scelta è stata "su uscita", perchè in fondo mi piacciono le situazioni ben definite, o bianco o nero, i grigi mi fanno venire mal di pancia.
Ovviamente "su uscita" di CampoTesto, mi pdermette finalmente di verificare se effettivamente c'è stata editazione in CampoTesto e così ho risolto il problema.
Et voilà!

Ciao
Stefanone


title: Unire due record in uno

author: Giuseppe

text:
Buongiorno.
Ho una tabella dove devo unire il testo dei record pari ai record precedenti dispari, e successivamente eliminare i record pari copiati.
Come posso impostare il ciclo in vba?
Ho iniziato con
Dim rs As DAO.Recordset
    Set rs = CurrentDb.OpenRecordset("SELECT Cap FROM Cap_originale WHERE (Id > 753 and Id <= 1132)")
    Do While Not rs.EOF

adesso non so come andare avanti.

Grazie
Giuseppe


title: Unire due record in uno

text:
Intanto il RECORD da usare a riferimento è il DISPARI e non il Pari secondo me, quindi punti al DISPARI e leggi il SUCCESSIVO pari, detto così sembra la stessa cosa ma non lo è.
Non sapendo cosa per te fosse il concetto di UNIRE... vado per CONCATENARE

Quindi se se i certo che ad ogni Record DISPARI il successivo Pari sia il suo POINTER... allora una cosa simile, ancorchè migliorabile può funzionare:

Dim rs1 As DAO.Recordset
Dim rs2 As DAO.Recordset
Dim fld1 As DAO.Field

Set rs1 = DBEngine(0)(0).OpenRecordset("Select.....")

Do Until rs.EOF
    ' Cerco il Dispari
    If rs1.Fields("CampoNumerico") Mod 2 > 0 Then
        ' Ora cerco il primo Record successivo a questo ma PARI
        Set rs2 = DBEngine(0)(0).OpenRecordset("Select..... WHERE [CampoNumerico] MOD 2)=0 AND [CampoNumerico]>" & rs1!CampoNumerico, dbOpenSnapshot, dbReadOnly)
        If Not rs2.BOF And rs2.EOF Then
            rs.Edit
            For Each fld1 In rs.Fields
                   If fld.Name<>"Campo PK che forse è il nome del CampoNumerico" Then
                        fld1.Value = fld1.Value & " - " & rs.fieds(fld1.Name).Value
                   End If
            Next
            rs.Update
            ' Sposto il Bookmark del Primo sul Record PARI, che sicuramente se siamo quì esiste
            rs.FindFirst "CampoNumerico=" & rs2!CampoNumerico
            rs1.Delete
        End If
    End If
    rs1.MoveNext
Loop

Non l'ho testato... ma il ragionamento dovrebbe andare.

@Alex


title: Unire due record in uno

text:
Qualche errore... di riferimenti vari...

Dim rs1 As DAO.Recordset
Dim rs2 As DAO.Recordset
Dim fld1 As DAO.Field

Set rs1 = DBEngine(0)(0).OpenRecordset("Select.....")

Do Until rs.EOF
' Cerco il Dispari
   If rs1.Fields("CampoNumerico") Mod 2 > 0 Then
      ' Ora cerco il primo Record successivo a questo ma PARI
      Set rs2 = DBEngine(0)(0).OpenRecordset("Select..... WHERE [CampoNumerico] MOD 2)=0 AND [CampoNumerico]>" & rs1!CampoNumerico, dbOpenSnapshot, dbReadOnly)
      If Not rs2.BOF And rs2.EOF Then
         rs1.Edit
         For Each fld1 In rs1.Fields
            If fld.Name <> "Campo PK che forse è il nome del CampoNumerico" Then
               fld1.Value = fld1.Value & " - " & rs2.fieds(fld1.Name).Value
            End If
         Next
         rs1.Update
         ' Sposto il Bookmark del Primo sul Record PARI, che sicuramente se siamo quì esiste
         rs1.FindFirst "CampoNumerico=" & rs2!CampoNumerico
         rs1.Delete
        End If
        rs2.Close
   End If
   rs1.MoveNext
Loop

Invece di aprire e chiudere il 2° RS potresti aprirlo in ReadOnly ed usare il FindFirst "[CampoNumerico] MOD 2)=0 AND [CampoNumerico]>" & rs1!CampoNumerico... magari è più rapido...

@Alex


title: Unire due record in uno

text:

Ciao Alex e grazie.
Mi dava errore su
> fld1.Value = fld1.Value & " - " & rs2.fieds(fld1.Name).Value
che ho modificato con (fieds con fields)
> fld1.Value = fld1.Value & " - " & rs2.fields(fld1.Name).Value
ed ho tolto la parentesi dopo MOD 2 perchè c'era una parentesi tonda in più.
Adesso il codice scorre ma quando arriva a
If Not rs2.BOF And rs2.EOF Then
scende direttamente  a
End If
rs2.Close
End If
rs1.MoveNext
Loop
e poi riparte senza mai entrare in Edit.


title: Unire due record in uno

text:
> Ciao Alex e grazie.
> Mi dava errore su
> > fld1.Value = fld1.Value & " - " & rs2.fieds(fld1.Name).Value
> che ho modificato con (fieds con fields)
> > fld1.Value = fld1.Value & " - " & rs2.fields(fld1.Name).Value
> ed ho tolto la parentesi dopo MOD 2 perchè c'era una parentesi tonda in più.
> Adesso il codice scorre ma quando arriva a
> If Not rs2.BOF And rs2.EOF Then
> scende direttamente a
> End If
> rs2.Close
> End If
> rs1.MoveNext
> Loop
> e poi riparte senza mai entrare in Edit.

Li manca la parentesi che era in più sopra... ;-)
If Not (rs2.BOF And rs2.EOF) Then

Porta pazienza... ma dal telefono a braccio è fatica...

@Alex


title: Ordinare campo calcolato!

author: Noce

text:
Ciao
Come faccio ad ordinare in ordine decrescente una campo calcolato in una
maschera?
la stringa và immessa nelle proprità della maschera in "ordina per" o
bisogna associare un evento?
Il campo da ordinare è questo =([SOTTOSCORTA])/([MEDIA_GIORNO])
Ciao e grazie


title: Ordinare campo calcolato!

author: Roberto dal portatile

text:
"Noce" <
no...@iol.it
> ha scritto nel messaggio
news:GAJQ6.4809$HK.3...@news.infostrada.it...

Non mi risulta (ma potrei sbagliarmi) che si possa ordinare una maschera su
un controllo non associato.
Penso che devi avere come origine record della maschera una query basata
sull'oggetto che è attualmente origine record della tua maschera; sposti
sulla query il tuo calcolo e su quel campo calcolato della query effettui
l'ordinamento che ti serve.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Ordinare campo calcolato!

text:
Il campo calcolato viene eseguito + velocemente dalla maschera o dalla
query?
Ciao e grazie
"Roberto dal portatile" <
r.ma...@libero.it
> ha scritto nel messaggio
news:vGSQ6.8407$HK.4...@news.infostrada.it...



title: Ordinare campo calcolato!

text:
"Noce" <
no...@iol.it
> ha scritto nel messaggio
news:eM3R6.11891$HK.6...@news.infostrada.it...
> Il campo calcolato viene eseguito + velocemente dalla maschera o dalla
> query?
>
> Ciao e grazie
Il calcolo su un record penso che duri lo stesso tempo (nanosecondo a
parte).
Poichè la query lo effettua comunque per tutti i record e la maschera solo
per il record corrente, in teoria impiega meno la maschera; però, visto la
semplicità del tuo calcolo, sicuramente la differenza risulta umanamente
impercettibile (almeno che tu non stia processando qualche centinaia di
migliaia o milioni di record); se comunque ti serve il sort, quella è una
soluzione dignitosa.



title: click+tasto x eseguire subroutine

author: melo

text:
ciao,
sapete dirmi se č possibile lanciare l'esecuzione di una sub mediante la
combinazione di un click di un pulsante unitamente alla pressione di un
tasto da tastiera?
ciao e grazie anticipatamente
melo
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: click+tasto x eseguire subroutine

text:
"melo" <
mel...@tiscalinet.it
> ha scritto nel messaggio
news:cv50q8$ete$1...@news.newsland.it...
> ciao,
> sapete dirmi se č possibile lanciare l'esecuzione di una sub mediante la
> combinazione di un click di un pulsante unitamente alla pressione di un
> tasto da tastiera?
> ciao e grazie anticipatamente
>
> melo
Guardati nella guida le macro autokeys
MAssimiliano


title: click+tasto x eseguire subroutine

text:
MA ha scritto:
> "melo" <
mel...@tiscalinet.it
> ha scritto nel messaggio
> news:cv50q8$ete$1...@news.newsland.it...
> > ciao,
> > sapete dirmi se è possibile lanciare l'esecuzione di una sub mediante la
> > combinazione di un click di un pulsante unitamente alla pressione di un
> > tasto da tastiera?
> > ciao e grazie anticipatamente
> >
> > melo
> Guardati nella guida le macro autokeys
> MAssimiliano
devo ammettere che la funzionalità non mi è chiara: se riuscissi a darmi
un esempio te ne sarei grato. ad ogni modo il mio problema si risolverebbe
non solo con una combinazione di tasti, bensì con questa unitamente ad un
click.
cambia qualcosa?
grazie ancora



title: click+tasto x eseguire subroutine

text:
"melo" <
mel...@tiscalinet.it
> ha scritto nel messaggio
news:cv50q8$ete$1...@news.newsland.it...
> ciao,
> sapete dirmi se č possibile lanciare l'esecuzione di una sub mediante la
> combinazione di un click di un pulsante unitamente alla pressione di un
> tasto da tastiera?
> ciao e grazie anticipatamente
>
> melo
Se il pulsante č quello del mouse, vai al link:
http://www.mantuanet.it/alessandro.baraldi/
e nella Sezione Forms leggi la FAQ 1.29 di Silvio Savoldi intitolata
"Intercettare combinazioni di tasti e Mouse".
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Credevo di averle viste tutte con Access....

author: Luciano (DOC)

text:
Lancio una query, il risultato sono 21 record.
La riordino cliccando sull'intestazione di uno dei campi e come per magia i
record diventano 20.
Se modifico uno dei parametri il balletto ricomincia, di nuovo 21.
Chiuso e riavviato Access, idem.
Mah....
Saluti.
Luciano
(DOC)


author: Sergio MAZZA

text:
"Luciano (DOC)" <
lucia...@sitocomune.com
> ha scritto nel messaggio
news:9gajko$84nai$1...@ID-86073.news.dfncis.de...

Sarebbe il primo caso di arrotondamento dei record!
Ciao.