mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: OFFERTA LAVORO PER APPLICATIVO WEB

Questo messaggio è riservato esclusivamente a Società o liberi
professionisti.
Siamo un'azienda di trasporti,  ed abbiamo la necessità di gestire la
movimentazione colli, sia riguardo la visione delle spedizioni da parte dei
nostri clienti, aziende medio-grandi, sia riguardo i nostri affiliati, o
corrispondenti. Quindi  se interessati per l'applicativo che dovrebbe essere
residente sul Web ed essere parte integrante di un sito che stiamo già
sviluppato nella nostra sede, richiediamo preventivo per:
- Costruzione dell'applicativo, comprensivo di installazione ed eventuali
modifiche nelle nostre filiali;
- Acquisto di spazio Web per la gestione dello stesso e del sito che lo
ospiterà;
- Acquisto e gestione di nome di dominio di 2°livello (.it);
- Eventuale acquisto di licenze software e di postazioni PC per la gestione
intelligente dello stesso.
Inoltre è cosa gradita avere VS suggerimenti per cercare di trovare
soluzioni che siano efficienti ed economicamente vantaggiose.
Si prega far pervenire conferma di disponibilità, o ulteriori informazioni,
c/o i NS uffici entro Venerdi 15 c.m.tramite e-mail all'indirizzo:
mailto:
info....@libero.it
all'attenzione del sig. Liano Amato.
La zona di lavoro è Napoli, ma vista la particolare esigenza, ricerchiamo in
tutta Italia.
Nell'attesa di un Vs riscontro, porgiamo distinti saluti.

Visiti il sito 
www.dimmas.com
sviluppano siti web e software personalizzato.
Newsgroup: it.comp.appl.access
Titolo: e dopo le macro

Salve a tutti
dopo aver risolto il problema delle 40 query e aver capito come creare delle
macro si presenta un altro problema
Per importare i Access un file da Excel , con le macro ho visto che questo e
possibile ma per rendere automatica la procedura sapete come creare una
finestra dove poter scegliere il file da importare ( tipo quella che appare
quando usi importa file di access.
silvio
grazie Pivo  e Lenny

beh qui ovviamente le macro non bastano più, vai sul sito comune che trovi
il codice VBA che ti serve.
Ciao
www.sitocomune.com

Newsgroup: it.comp.appl.access
Titolo: Si può azzerare un campo contatore?

Ho una maschera per gli OrdiniClienti e una maschera per le Fatture, basate
su query. Tutte e due hanno un campo contatore per il numero ordine e il
numero fattura.
Volevo sapere, se alla fine dell'anno, posso azzerare questi campi, per
partire con la nuova numerazione del 2002 continuando a lavorare sempre
nello stesso database e come posso salvare i dati dell'anno 2001.
Grazie,
Anna Maria

 ha scritto nel messaggio
news:HBIm7.13902$ul3.5...@news.infostrada.it...

 Per il tipo di operazioni che usi te, il campo contatore non va bene, ad
esempio perchč se cominci a creare una fattura e poi non completi il suo
aggiornaento, il numero contatore temporaneamente assegnatole viene perso, e
quindi hai un buco nella numerazione.
Puoi usare, ad esempio, un campo numerico e crearti l'algoritmo per la
generazione del numero progressivo.
Ciao!
Paolo

 ha scritto nel messaggio
news:HBIm7.13902$ul3.5...@news.infostrada.it...

(I) per salvare i dati del 2001 esporta le tabelle in un altro file .mdb:
 DoCmd.CopyObject "C:\percorso file origine", "C:\percorso file
destinazione", acTable, "nometabella"
(II) poi le query di definizione dati (servono per intervenire sulla
struttura delle tabelle) fanno al caso tuo.
Per eliminare il campo contatore:
  DoCmd.RunSQL "ALTER TABLE nometabella DROP contatore;"
Per ricreare il contatore (cosě rinizierŕ la numerazione):
  DoCmd.RunSQL "ALTER TABLE nometabella ADD contatore COUNTER;"
Spero di esserti stato di aiuto
Alex

 ha scritto nel messaggio
news:HBIm7.13902$ul3.5...@news.infostrada.it...

Vai sul Sito Comune, sezione General, faq "Numerazione crescente per fatture
ed altro" di Davide La Mantia (Sib).
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com
Newsgroup: it.comp.appl.access
Titolo: blocco cursore su campo

in form...in casella di ripilogo....
come faccio a bloccare il cursore (quindi impossibilita' di passare al campo
sucessivo) se questo e' "is null" cioe' non ha caratteri alfanumerici
all'interno!!!
Grazie per l'aiuto
luigi

 all'interno!!!
Nell'evento "Su disattivato"
If isnull(Me.Tuocontrollo) then me.tuocontrollo.setfocus
Sib

 wrote in message
985akh$397$1...@lacerta.tiscalinet.it...


 wrote in message
iTpp6.13715$GR5.2...@news2.tin.it...


 wrote in message
iTpp6.13715$GR5.2...@news2.tin.it...


 Come mai!!!!
Posta la funzione che hai fatto.
Sib

 wrote in message
985q7b$9uv$1...@lacerta.tiscalinet.it...


 wrote in message
985q7b$9uv$1...@lacerta.tiscalinet.it...


 If IsNull(Me.Codice_Articolo) then me.Codice_Articolo.setfocus
Scrivi dopo il quoting.
Ma Codice_Articolo e' il nome del controllo della maschera, vero?
Posta tutta la funzione evento, compresa la dichiarazione di funzione.
Sib

 wrote in message
987vga$40j$5...@lacerta.tiscalinet.it...


 funzione!!!!!
Scrivi dopo il quoting significa: scrivi dopo  il testo preesistente quando
rispondi.
Nel senso di fare il copia incolla anche di:
Private Function pippo()
...
End Function
Sib

 wrote in message
9883dc$6es$1...@pegasus.tiscalinet.it...


 Luigi
Per la terza volta:
SCRIVI DOPO IL QUOTING.
La tua funzione non puo' in alcun modo funzionare.
Avevo detto di inserire l'istruzione nell'evento SuDisattivato, vale a dire
nella Sub:
Private Sub Codice_Articolo_LostFocus()
    If is null (ME.Codice_Articolo) then me.Codice_Articolo.setfocus
End Sub
Apri la maschera, seleziona il controllo, apri le proprieta', scegli la
scheda eventi, seleziona l'evento "Su disattivato", premi i tre puntini,
scegli codice nella finestra che compare, inserisci l'istruzione If nella
Sub che ti viene proposta, salva la maschera.
Sib

 wrote in message
988eds$b31$3...@pegasus.tiscalinet.it...


 non so piu' cosa dirti!!!!!
Tutto tranne scrivere DOPO IL QUOTING.
Sib
--
il sito comune di it.comp.database.access:
http://www.sitocomune.com
------------------------------------------------------
La mia home
http://digilander.iol.it/syb
------------------------------------------------------
"Non sempre cio' che viene dopo e' progresso"
Alessandro Manzoni
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente

 Sib
gnafai ;-))
-- 
Federico
----------------------------------
Rimuovi paperino. per e-mail
----------------------------------
Tutte le richieste che arrivano
in privato, vengono cestinate.
----------------------------------
Sito Comune di it.comp.appl.access
http://www.sitocomune.com
mailto:
webm...@sitocomune.com
----------------------------------

 ha scritto nel
messaggio news:3AA88F0C...@paperino.sitocomune.com...


:-)))


 :-)))
MAI!
Antonio
Newsgroup: it.comp.appl.access
Titolo: Arrotondamento con due numeri decimali

Ciao a tutti
In una query devo arrotondare il risultato di un'espressione a due numeri
decimali non importa se per eccesso o per difetto
10,13333333333
a
10,13
oppure a
10,14
Qualcuno a la soluzione?
Grazie
Marco

Qualcuno a la soluzione?
vediamo un po'... funzioncina scritta al volo al volo...
public function arrotonda(d, ncifre as integer) 
dim appo as double
appo=d*(10^ncifre)
appo=int(appo)
appo=appo/(10^ncifre)
arrotonda=appo
end function
d e' il numero da arrotondare, ncifre sono il numero di decimali
richiesti.
--------------------------------------------------
ATTENZIONE!
it.comp.database.access diventera' it.comp.appl.access!
cercalo tra i nuovi ng e linkalo!
-----------------------------------
rimuovere NOSPAM. per mandare email
-----------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access


http://www.penguinpowered.com/~ecesena
La coscienza e' la voce interiore che ci avverte che qualcuno sta guardando.
		-- H. L. Mencken

Newsgroup: it.comp.appl.access
Titolo: Date in access

La mia richiesta č questa:
como posso estrapolare da una data l'anno??
Per esempio: se digito la data, in un altro campo deve uscire l'anno:
quindi se digito 12/04/2004 deve uscire 2004, se digito 12/5/1999 deve
uscire 1999.
Ciao e grazie

 La mia richiesta è questa:

con la funzione year (Tuadata)

Newsgroup: it.comp.appl.access
Titolo: Access 2000 e Outlook Express

Ciao a tutti
qualcuno di voi ha qualche routine che permetta in modo automatico che un
allegato di outlook express vada in una directory fissa???
Ho trovato qualcosa con Outlook, ma non funziona con l' Express!!!!
Il mittente del messaggio e' sempre lo stesso, mentre l' oggetto del mess.
e'.costituito da una parte fissa e una variabile.
Ciao Ciao

"Porello" <

Maledetto OE: io sto cercando del codice per generare contatti nella sua
Rubrica ... hai idea?   ;-)
Ciao, Max
Newsgroup: it.comp.appl.access
Titolo: Popup

Ho una maschera in cui ho attivato la proprietà "Popup". Da qui  visualizzo
l'anteprima di un report (con pulsante dedicato), ma quest'ultimo appare
nascosto dalla maschera medesima.
Qualcuno può dirmi come attivare la funzione "Popup" sul report oppure
suggerirmi una soluzione alternativa?
Grazie
Angelo

 Qualcuno puņ dirmi come attivare la funzione "Popup" sul report oppure


 ha scritto nel messaggio
news:qTO9a.21377$zo2.6...@news2.tin.it...

A fronte dell'evento "Su clic" del pulsante di comando, prima di aprire il
report, rendi la maschera non visibile; a fronte dell'evento "Su chiusura"
del report rendi nuovamente visibile la maschera.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:qTO9a.21377$zo2.6...@news2.tin.it...

Ciao Angelo purtroppo le maschere Popup hanno questa propietä
che rimangono sempre in primo piano,il "Report"purtroppo
per oi non ha la propità Popup,quindi
 io ho "Aggirato "l'ostacolo in questo modo...
sull'"Eventoapertura report" scrivi :
Docmd.Close "Nome tua maschera",acForm
sull'"Evento chiusura dello stesso report:
Docmd.OpenForm "NomeTua maschera",acNormal
a me funziona bene .
Spero di esserti stato di aiuto.
--
Gianni B.

 Gianni B.
Ti ringrazio Gianni .....  funziona
Angelo

 Gianni B.
Invece di chiudere e riaprire la maschera č meglio che la rendi non visibile
(Eventoapertura report) e poi rivisualizzarla (Evento chiusura dello stesso
report).
O sbaglio?


 ha scritto nel messaggio
news:liZ9a.184272$YG2.5...@twister1.libero.it...

Grazie per la tua collaborazione Roberto.
Potresti suggerirmi la riga di codice da utilizzare visto che ho delle
lacune in tal senso?
Ciao
Angelo


Per rendere una maschera non visibile scrivi:
Forms!NomeMaschera.Visible = False
e per enderla visibile scrivi:
Forms!NomeMaschera.Visible = True
Per maggiori dettagli vai sull'hep e consulta la Proprietą Visible.

Newsgroup: it.comp.appl.access
Titolo: Inserire/modificare o cercare

Salve a tutti,
conto sulla vs. esperienza per consigliarmi su come risolvere un 
problema. Ho una semplice maschera per consentire l'inserimento di 
alcuni dati anagrafici dei clienti. La maschera è associata ad una 
tabella con la seguente struttura:
CodCliente, RagioneSociale, Indirizzo, PIva.
Quando apro la maschera, vorrei far sì che se digito nella casella 
CodCliente un codice di un cliente già esistente, che la maschera 
visualizzasse i dati del cliente relativi al codice appena digitato, 
altrimenti che considerasse il codice, come un nuovo inserimento.
Come posso fare per ottenere ciò?
Grazie. Kaal

 ha scritto nel messaggio 
news:201003141...@mynewsgate.net...

sarebbe meglio avere una combo con i nomi clienti e dopo aggiornamento
popolare i controlli della maschera es. :
me.idcliente = me.combo.column(0)
me.nomecliente = me.combo.column(1)     ecc. ecc.
per nuovo inserimento puoi sfruttrare l'evento Non In Elenco della combo
e puoi vedere come da: 
www.donkarl.com/it?FAQ4.13
se ti interessano ci sono alcuni esempi di fatturazione su:
www.accessgroup.it
 ...archivio argomenti ...approfondimenti ed anche
il database di esempio Northwind che hai nel tuo Access.
ciao
Daniele


Ciao,
prova questo:
Private Sub Codice_AfterUpdate()
If DCount("*", "clienti", "codice='" & Me!Codice & "'") = 0 Then
Codice.ControlSource = "Codice"
DoCmd.GoToRecord , , acNewRec
Else
Me.RecordSource = "select * from clienti where codice ='" & Me!Codice
& "'"
End If
End Sub
La casella Codice nella maschera non è collegata.
Ciao.
Alberto

 ha scritto:
Grazie a CIDI e almorel per i suggerimenti che cercerò di provare quanto 
prima.
Volevo aggiungere che i clienti sono circa 7.000. In questo caso la 
soluzione COMBO BOX è ugualmente adeguata?

 ha scritto:

Ciao,
7000 voci non mi sembra un numero sconvolgente,
e, comunque, volevo dirti che sono d'accordo con CIDI.
Ho cercato la soluzione alla tua richiesta più per sfida (ovviamente
con me stesso)
che per reale convinzione. Comunque prova tutto ....
Ciao
Alberto

 soluzione COMBO BOX � ugualmente adeguata?
Si
ciao
Daniele 


puoi anche usare una textbox non associata ed il metodo findfirst in questo 
modo:
private sub NomeTextBoxNonAssociata_BeforeUpdate(Cancel as Integer)
me.recordsetclone.findfirst "[CodCliente]="& Me!NomeTextBoxNonAssociata.text
me.bookmark = me.bookmark.recordsetclone
if me.recordsetclone.nomatch then
  docmd.gotorecord,,acnewrecord
end if
end sub

Ho optato per la textbox non associata ed il metodo findfirst che meglio
si adattava alle mie esigenze.
Un grazie di cuore a tutti voi.
Kaal
Newsgroup: it.comp.appl.access
Titolo: Stampa report da pagina a pagina

Ciao a tutti!
dalla schermata di "anteprima stampa report" vorrei creare un'icona
che mi apri la schermata di stampa di access con la possibilità di
scegliere la stampante e quali pagine stampare. Ho letto il post del
marzo 2004  "stampa da pagina a pgnia", ma mi perdo nella creazione
della routine function e nel suo richiamo da una macro: mi date una
mano? Nel caso decida di usare una barra del menù vuota, detta
procedura funzionerà lo stesso?
Grazie e ri-ciao!


Mi rispondo da solo: ce l'ho fatta, grazie lo stesso, ciao!


Bravo. Qual'è la soluzione? :-)
-- 
Ciao
Geppo

Newsgroup: it.comp.appl.access
Titolo: Convertire i file .dat

Salve sono Roberto,
Vorrei sapere come è possibile, se è possibile, leggere e/o conertire un
file .dat, che per certo contiene delle informazioni (sono dei quiz), in
un file txt o addirittura excel, da poter importare poi in ACCESS.
Grazie 
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Grazie 
Come disse il santone "Quelo".... :"La risposta è dentro di te... ma è
sbagliata!!!!!"
Rinomina l'estensione da dat a txt e collega il file ad access... non ti
piace?
-- 
Pablitomf
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)


 piace?
Ovviamente, deve essere scritto in linguaggio comprensibile ad Access e
non criptato (ovvero "in chiaro" con la divisione con ";" tra i campi)...
altrimenti non ci serve a nulla ne il file dat ne l'averlo rinominato.

Newsgroup: it.comp.appl.access
Titolo: aiuto. gestione ordini (funzione ME)

mi sono stancato!! E' davvero complicato realizzare db.
Ho una maschera ORDINE con sottomaschera DETTORDINE (righe articoli).
nella DETTORDINE ho i campi NUMERO_COLLO, ARTICOLO, PESO, TARA, NETTO
Nel campo IDART ho inserito su dopo aggiornamento :
Me!Articolo = DLookup("[articolo]", "produzione", "Numero_Collo=" &
Numero_Collo)
Me!Peso= DLookup("[lordo]", "produzione", "Numero_Collo=" & Numero_Collo)
Me!Tara = DLookup("[tara]", "produzione", "Numero_Collo=" & Numero_Collo)
Me!Netto = DLookup("[pnetto]", "produzione", "Numero_Collo=" & Numero_Collo)
La sottomaschera e in visualizzazione foglio dati e quando inserisco nel
campo NUMERO_COLLO il codice in effetti va bene. Ma i guai iniziano quando
vado al record sucessivo della sottomaschera e inserisco il nuovo numero
collo. Mi riporta gli stessi dati del precedente (articolo, peso. ...) e
così per quelli successivi. in pratica la riga corretta è solo la prima.
mi potete aiutare?

 ha scritto nel messaggio
news:RBrT6.10317$Cq3.1...@news2.tin.it...

Se i controlli:
- Articolo;
- Peso;
- Tara;
- Netto;
non devono essere modificati ma visualizzare i dati letti dalla tabella,
dovresti inserire nella proprietà "origine dati" di ogni controllo un iif():
Es. casella Articolo
'------------------
iif(isnull(me!idart;null;DLookup("[articolo]", "produzione", "Numero_Collo="
& Numero_Collo))
'------------------
E così via per gli altri...
Ciao.

Non sono molto esperto ma credo di aver risoto un problema del genere
realizzando una query per ottenere la sottomaschera.
Credo che i campi che ti vengono resi sempre uguali siano giusti perche' non
sono altro che copie!
P.S. se risolvi diversamente fammi sapere
Ciao
Michele b.
Newsgroup: it.comp.appl.access
Titolo: campi LAMPEGGIANTI !!??!

Dopo l'Ultima follia di Mel Brooks ecco l'ultima follia del Max :
è
possibile impostare un campo in modo che LAMPEGGI sullo schermo ! per es.
ho un cliente che notoriamente non paga, mi piacerebbe che all'apertura
della sua anagrafica un campo mi lampeggiasse dicendo : attenzione il
malandrino non paga. (o simile)
In alternativa pensavo ad un campo
TRASPARENTE se null se invece not null allora mi compare la scritta, però
dovrebbe essere abbastanza grande da coprire quasi tutta la maschera.
Chiedo troppo e lo so, ma forse nelle immense risorse delle vostre
menti........
Grazie
MAX
--------------------------------
Inviato via 
http://usenet.iol.it

 menti........
E' molto piu' semplice....
Usa l'evento su timer della maschera con intervallo impostato alla frequenza
di lampeggio che vuoi e nascondi e scopri alternativamente il controllo con
la scritta.
Saluti.
Luciano
(DOC)

Luciano (DOC) ha scritto nel messaggio ...

Interessa anche a me, ma non ho capito bene come fare:
come si fa a nascondere e scoprire il controllo alternativamente?

 wrote in message
zQi76.188595$IP1.6...@news1.giganews.com...

Anch'io non ho capito come nascondere e scoprire il controllo.
In un programma ho impostato una macro su evento timer che fa questo, ma è
piuttosto complicata e forse rudimentale.

 come si fa a nascondere e scoprire il controllo alternativamente?
Setti un valore in millisecondi alla proprietą timer della maschera.
Poi nell'evento su timer farai
controllo.visible = not controllo.visible
Se devi fare questo cambiamento solo se il valore di controllo verifica
certe condizioni farai
if controllo ??? then
  controllo.visible = not controllo.visible
end if
Antonio

piuttosto complicata e forse rudimentale.
Lassa perde le macro....
E' piu semplice da codice metendo sull'evento su timer delal maschera:
miocontrollo.visible = not miocontrollo.visible
e metti un intervallo timer che ti piace!
Saluti.
Luciano
(DOC)

 - rimuovi XXX  x  rispondere  ICQ	#8814554
 
"Tu mi dai fastidio perche' ti credi tanto un Dio!"
"Beh,  dovro'  pur  prendere  un   modello   a	 cui   ispirarmi,   no?"
		-- Woody Allen

 - rimuovi XXX  x  rispondere  ICQ	#8814554
 
Se l'appetito vie' magnando, nu te dico a digiuna'...
		-- Rodolfo Lagana'
Newsgroup: it.comp.appl.access
Titolo: Come far funzionare applicazione Access 2003 su Win 98 ???

Procedura sviluppata su Access 2003, formato file Access 2000
Il run-time non si installa su Windows 98
C'e' verso di farlo andare o no ?
Ciao e grazie
RobertoA

 ha scritto nel messaggio 
news:49652d5a$1...@newsgate.x-privat.org...


 C'e' verso di farlo andare o no ?
Manca l'informazione più importante: Quale versione del runtime?
il runtime di A00 e di tutte versioni fino a AX: Sì
il runtime di A03 e A07: No
vedi anche:
http://support.microsoft.com/kb/822129/it
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

 vedi anche:
http://support.microsoft.com/kb/822129/it
Parlo del run-time di Access 2003
Mi pare di capire che non ci sia verso di installarlo su un Windows 98
Allora il ripiego e':
- e' possibile far funzionare una procedura scritta su Access 2003 (in 
formato mde), usando il run-time di Access 2000 ?
Ciao e grazie
RobertoA

 formato mde), usando il run-time di Access 2000 ?
Con A03 puoi solo creare un MDE nel formato di A03 che
certo non funziona con A00.



Ho fatto proprio lo stesso tentativo.......se non utilizzi roba prettamente di A2003 (tipo il filedialog con la libreria Office 11.0) ma solo form, queries e cose standard (anche il codce ovviamente) non hai problemi. Puoi convertire anche l'applicazione 2003 in 2000. Vale la regola di prima
-- 
Questo articolo e` stato inviato dal sito web 
http://www.nonsolonews.it

 ha scritto nel messaggio 
news:49652d5a$1...@newsgate.x-privat.org...

Con il runtime di A2003 non puoi.
Ti propongo due alternative:
mi mandi il db, lo converto in A97 e ti creo il runtime;
crei un disco virtuale (per esempio con virtualpc) e ci installi quello che 
vuoi (memoria permettendo).
Ciao, Carlo 

 mi mandi il db, lo converto in A97 e ti creo il runtime;
Ciao Carlo,
seconde me anche dopo 12 anni sarebbe ancora contro l'EULA
(file LICENSE.TXT e/o LICENSE.DOC sul cd della ODE), che contiene:
"...If you redistribute the Run-Time Files, you agree: (a) to distribute the
Run-Time Files in object code only in conjunction with and as a part of a
software product developed by you which adds significant and primary
functionality to the SOFTWARE..."
o in italiano
http://groups.google.com/group/it.comp.appl.access/msg/4d61cb16374b87b7
-- 
cu


 ha scritto nel messaggio 
news:6spgo3F...@mid.individual.net...

Ciao Karl
probabilmente hai ragione, nel senso che stando alla licenza, solo se 
apportassi delle modifiche sostanziali al db di Roberto, potrei poi 
realizzare e distribuire il runtime.
Bisogna vedere se la nuova politica di Microsoft nel dare gratuitamente il 
runtime con A2007 e considerando l'obsolescenza sia di W98 che di A97, non 
possa giustificare una tale distribuzione.
Il discorso merita certamente un approfondimento.
Ciao, Carlo
Newsgroup: it.comp.appl.access
Titolo: Rilevare esecuzione query

Salve a tutti,
ho un problema: usando il docmd setwarning = false per evitare i messaggi di
conferma nelle query di aggiornamento, come posso rilevare comunque via
codice l'effettiva esecuzione della query?
Grazie in anticipo
Ciao
Andrea

codice l'effettiva esecuzione della query?
mah, puoi settare un flag prima e dopo l'esecuzione della query...
che fa sta query?  accoda, crea, cancella?  puoi anche effettuare un
conteggio sulla tabella cui accodi, che crei o dalla quale cancelli
record.
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
Newsgroup: it.comp.appl.access
Titolo: Incremento Progress bar

Dunque..dopo avere cannibalizzato tutii gli esempi di progrbar del web mi
sono concentrato sul piu' carino, cioe' quello di Alex Baraldi.
In un post da lui scritto sembrava che copiando la classe(visto che ha
lavorato su una dll!) e qualche riga di codice(5 sembrava) tutto funzionasse
a meraviglia.
Premessa:
Non metterei mai in discussione cio' che dice Alex perche' senz'altro il
malandrino sono io, ma quali sarebbero le 5 righe di codice?
La form dell'esempio che troviamo sul sito comune e' zeppa di controlli, per
l'eventuale mia form con prbar su quale evento potrei caricare il codice di
@Alex?
Se qualche anima ha fatto questi tentativi e vuole aiutarmi le saro'
eternamente grato.
Grazie in anticipo
Michele
Ps:altrimenti dovro' telefonare al Max Piub

 ha scritto nel messaggio
news:WGJMc.10910$1V3.2...@twister2.libero.it...

Non so bene qual'č l'esempio, ma tutti i miei giochetti sono
fatti apposta per essere incasinati.....!
Scherzi a parte cerco sempr edi inserire diverse cose, ma mi rendo
conto che spesso possono confondere:
Allora :
1)Copia il Modulo di Classe
2)Creati una Form non associata
3)Inserisci nella Form 2 controlli solo:
    -CommandButton chiamalo "cmdStepPB"
    -Controllo Rettangolo chiamalo "cRet"
    Posizionalo dove vuoi , tieni conto che la ProgressBar
    apparirą proprio nel Rettangolo
4)Associa alla Form il seguente codice(TUTTO)
5)Associa al Command Button l'Evento Click
Ora:
CLICK
'*************************************************************
Dim mb As clsSPB
Private Const CGrey = 12632256
Private Const CBlue = 8388608
Private Sub cmdStepPB_Click()
   Dim x As Long
   Dim S As String
   S = Me.cmdStepPB.Caption
   mb.PB_Min = 0
   mb.PB_Max = 200
   'Consigliato n° di Steps=100
   For x = 0 To 200
       mb.PB_Value = x
   Next
   'Me.cmdStepPB.Caption = s
End Sub
Private Sub Form_Load()
   Set mb = New clsSPB
   Set mb.Form = Me
   Me.E_Color.BackColor = CBlue
   Me.EBK_Color.BackColor = CGrey
   mb.PB_Speed = 1
   mb.PB_Position Me.cRet.left, _
                                         Me.cRet.top, _
                                         Me.cRet.Height, _
                                         Me.cRet.Width
End Sub
Ciao.
@Alex.


Cos'è una minaccia????
MAssimiliano
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/


Anch'io l'ho interpretata così tant'è che ho prontamete
risposto....!
@Alex.

 ha scritto nel messaggio
news:ce02u2$etp$1...@lacerta.tiscalinet.it...

Newsgroup: it.comp.appl.access
Titolo: [Maschera] Problema con struttura a schede

Ciao!
Non riesco ad associare un evento ai pulsanti di una struttura a
schede.
La maschera ha una struttura a schede e in ogni scheda ci sono delle
informazioni diverse. Vorrei poter associare alla visualizzazione di
una determinata scheda anche un evento (dal semplice MsgBox a altri
più complessi).
Ora come ora in modalità struttura, selezionata la Struttura a schede,
la singola pagina mi dà su evento la voce "Su modifica", "Su clic "
etc...ma all'atto pratico non succede nulla...
Cosa devo "sbloccare"?
Grazie 1000!
F


Su change e puoi mettere
select case me.tuocontrolloschede
case 0
case 1
case 2
end select
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it

 end select
Grandissimo!
grazie! ora va perfettamente!
F
ps: strano che sembra che ci sia qualla possibilità di associare un
evento sul clic della pagina ed invece non funziona nulla...hai idee?
Newsgroup: it.comp.appl.access
Titolo: trovare il venerdi' piu' vicino

ecco, qui non vengo proprio fuori.
Voglio cliccare su un campo data, e ottenere il venerdi' passato piu'
vicino.
Tipo, se clicco oggi ottengo "9/2/2005"
come fareste?
-- 
Boris: I cattivi, per inciso, sono gli uni e gli altri.

 come fareste?
-- 
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------

 come fareste?
Con la funzione WeekDay estrai di una data
il valore del giorno della settimana Venerdě=6 (se non sbaglio)
Ora partendo dalla data odierna creati un Loop che con DateAdd
somma un giorno finchč WeekDay(NuovaData)=6
Ciao
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 come fareste?
Ciao AP,
puoi crearti una funzione che in base alla data passatagli ti renda la data
del venerdě precedente
----
Function Venerdi_Precedente(ByVal Dt As Date) As Date
   If Weekday(Dt, vbMonday) > 5 Then
      Venerdi_Precedente = Dt - (Weekday(Dt, vbMonday) - 5)
   Else
      Venerdi_Precedente = Dt - (Weekday(Dt, vbMonday) - 5 + 7)
   End If
End Function
----
quindi puoi inserirla come origine controllo di una casella testo o
utilizzarla come meglio credi.
----
=Venerdi_Precedente(Campo1)
----
(Campo1 č il controllo che contiene la data di riferimento)
Ciao Giorgio

     If WeekDay(Conta) = 6 Then
Ecco, questa non la sapevo, ho sprecato tempo con un CASE e sul nome del
giorno (case format ecc.= mon), le date sono veramente ostiche, a
cominciare dal formato e dal fatto di doverle mettere in italiano dentro le
query e in americano nel codice e di non sapere mai se usare gg o dd e cose
del genere.
grazie, la tua soluzione e' elegante e probabilmente funziona pure :-)

 For Conta = CDate(MiaData)
perche' usi cdate qui?
Anche se c'e' gia' una data?


         UltimoVenerdě = Conta
Non ci vuole una DIM anche per Ultimovenerdě?


 Non ci vuole una DIM anche per Ultimovenerdě?
Se Ultimovenerdě č una variabile di tipo Data/ora devi definirla con una
DIM, ma io, a torto o regione, ho presupposto che fosse invece una casella
di testo non associata come pure MiaData.


 Anche se c'e' gia' una data?
Se MiaData č un controllo associato ad un campo di tipo Data/ora la
conversione fatta con la funzione CDate č superflua, ma se MiaData fosse ad
esempio una casella di testo non associata dove digiti una data del tipo
10/9/2005, in essa ci sarebbe una stringa di tipo testo che prima di essere
usata deve essere convertita in una variabile di tipo Data/ora.
Nel dubbio ho comunque fatto la conversione, che comunque non crea problemi.

Newsgroup: it.comp.appl.access
Titolo: Stampe report con + sottoreport

Ciao  a tutti,
avrei bisogno del vostro aiuto.
Ho realizzato una Report che contiene al suo interno delle sottoreport
legate a delle query.
Ho sistemato nel seguente ordine le sottoreport:
______        ____    _____
|     A   |        |  B  |   |      C |
|           |        |___|   |_____|
|           |        ___________
|           |        |        D          |
|           |        |__________|
|_____ |
_____________________
|               E                        |
|_____________________|
Capita del nella visualizzazione la tabella corrispondente alla sottoreport
D si sovrappone alla E.
Da premettere che questo capita quando la quantità delle righe della tabella
A e inferiore alla quantità di B+D.
Come posso risolvere questo inconveniente?

 ha scritto nel messaggio news:3x5Nc.12215$1V3.3...@twister2.libero.it...

Prova ad impostare a tutti i sottoreport la proprietà "riducibile" a no...
Ciao.
-- 
Sergio MAZZA

 ha scritto nel messaggio
news:ce2qpo$t3a$1...@canarie.caspur.it...

La proprietà "riducibile" è già impostata a no.

Newsgroup: it.comp.appl.access
Titolo: Access e la musica

Buongiorno a tutto l'ng, e...grazie di esistere!!!
scherzi a parte, non sapete quanti dubbi mi eliminate....
comunque ecco il mio problema, ed č inutile dire che sarņ immensamente grato
a chi potrą e vorrą aiutarmi:
avendo creato un piccolo database access per catalogare i miei cd audio, mi
chiedo se esista la possibilitą una volta inserito il cd da catalogare nel
pc, che access lo riconosca tramite internet (cosģ come fa ad esempio
winamp) e mi eviti cosģ la scocciatura di digitare tutte le canzoni e
l'autore.
Grazie
Newsgroup: it.comp.appl.access
Titolo: anomalia con campo percentuale 800%

buongiorno a tutti, 
 
ho un problema con i campi di tipo "percentuale"
in pratica se lascio formattazione della casella di testo come numerico viene visualizzato il valore 8 se imposto "percentuale" viene visualizzato 800%
 
è possibile visualizzare 8% come mi sarei aspettato?
 
Grazie a tutti.

mario rossi wrote :

È sufficiente scrivere 0.08 che sono gli 8/100
che si esprimono con 8%
 
Bruno


quindi per non far scrivere 0.08 all'utente su afterupdate eseguo
me.caselladitesto=me.caselladitesto/100
 
dovrebbe funzionare.

mario rossi has brought this to us :

Certo che funziona, anche se si meraviglierà la scheda di quei Me!
Penserà... 'sto individuo non capisce che tutto ciò che scrive
su di me è roba mia!
Sta a vedere che ci scrive anche il mio nome:
Forms("FormName"]![CasellaDiTesto] = Forms("FormName"]![CasellaDiTesto] 
/ 100
 
Bruno


non ho capito l'ironia

mario rossi expressed precisely :

Il Me come Metodo quando ti riferisci alla scheda attiva non vale
assolutamente niente. Lo puoi tranquillamente omettere che tutti
quei Me, Me... fanno solo ridere.
È invece indispensabile come Funzione se ti devi
firerire a più campi richiamati da un loop; ad esempio:
For i=1 To 3
    Me("Campo" & i) etc...
Next
 
Le cose inutili, specie nella programmazione, sono una mia 
idiosincrasia
come Dim i As Variant, etc.
 
Bruno

 Bruno
 
@Alex


qualcuno mi spiega perchè ottengo zero pur digitando il valore 8
tipo campo percentuale decimali zero
 
Private Sub SbfFondoPerduto_AfterUpdate()
    Me.Controls("SbfFondoPerduto") = Me.Controls("SbfFondoPerduto") / 100
End Sub
 
 


risolto errore mio nel tipo di campo nella tabella


E' vero che il  me.caselladitesto non differisce da caselladitesto
Altrettanto vero e' che lo si usa (o almeno io lo uso) per attivare 
l'intellisense e far apparire il nome dell'oggetto, rendendo piu' rapido 
e preciso il processo di scrittura del nome oggetti che stiamo usando


confermo anch'io lo uso per quel motivo.

 e preciso il processo di scrittura del nome oggetti che stiamo usando
 
Proprio così è una questione di "intellisense"... 
 
@Alex


ahahahahaha

 e preciso il processo di scrittura del nome oggetti che stiamo usando
questo è vero, l'importante è ricordarsi di sostituire il "." con il "!"
 
Giusto per essere precisi :-)
 
Vladimiro
Newsgroup: it.comp.appl.access
Titolo: Concatenamento in esportazione (un po' lungo)

Salve a tutti, vi illustro il mio problema:
sto realizzando un programma per la gestione delle ricette mediche dei
pazienti, ho quindi creato la maschera principale che comprende la tabella
principale (Id ricetta, nome paziente, età, data prescrizione, ecc...ecc...)
a cui ho aggiunto una sottomaschera che comprende le varie analisi o
prestazioni che il paziente ha effettuato per ogni sua ricetta (Id codice
prestazione, nome, quantità, costo), con un massimo di 9 prestazioni per
ognuna.
Ora io necessito di esportare ogni singola ricetta in formato di testo
delimitato dove ogni riga del testo comprende tutta la ricetta più le
prestazioni (quindi: nome paziente - età - data - ecc.. - codice prestazione
1 - quantità - codice prestazione 2 - quantità - codice prestazione n -
quantità - ..... fino ad un massimo di 9 codici prestazioni),
il problema nasce dal fatto che la query che realizzo mi fa uscire una riga
per ogni prestazione del paziente, quindi se in una ricetta di un paziente
ci sono 4 prestazioni quando esporto usciranno 4 linee di testo con ognuna
gli stessi dati del paziente più però i 4 diversi codici e quantità delle
prestazioni.
Praticamente vorrei che ogni riga contenesse già tutti i codici prestazioni
effettuati dal paziente per quella ricetta e che quindi la distinzione di
ogni riga sia fatta in base alla ricetta e non alle prestazioni, spero di
essere stato chiaro, credo che ci voglia qualche istruzione sql particolare
ma non sono molto ferrato in questo.
Mi potete aiutare?
Grazie a tutti, ciao.
by Ciro



prova invece che con una query creare l'esportazione via codice con
dao od ado creando tu la riga da scrivere
Saluti.
Emanuele.


scusa ma non mi è
chiaro, cosa ti impedisce di crearti dei report con un livello di
raggruppamento per la ricetta?
ciao
MAssimiliano
--------------------------------
Inviato via 
http://usenet.iol.it
 

 MAssimiliano
Il problema č che devo esportarli in un file txt e non in un report per
stamparlo, almeno che non si possa creare poi questo file di testo dal
report stesso, ma non credo.
Ciao
by Ciro
Newsgroup: it.comp.appl.access
Titolo: Ancora problemi con il filtro su maschera

Ciao a tutti,
in una maschera popup ho questa routine sull'evento click di un
pulsante:
Private Sub Comando7_Click()
On Error GoTo Err_Comando7_Click
    Dim stDocName As String
    Dim stLinkCriteria As String
    'stDocName = "MASCHERA UTENTI PRINCIPALE"
    If Nz(DLookup([ID UTENTE], "tabella utente principale", "[ID
utente]=" & Me![ID UTENTE]), 0) > 0 Then
    'l'utente esiste
    stDocName = "MASCHERA UTENTI PRINCIPALE"
    stLinkCriteria = "[id UTENTE]=" & Me![ID UTENTE]
    DoCmd.OpenForm stDocName, , , stLinkCriteria
    DoCmd.Close acForm, Me.Name
    Else
    stDocName = "MASCHERA UTENTI PRINCIPALE"
    stLinkCriteria = "[id UTENTE]=" & Me![ID UTENTE]
    DoCmd.OpenForm stDocName, , , stLinkCriteria
    End If
Exit_Comando7_Click:
    Exit Sub
Err_Comando7_Click:
    MsgBox Err.Description
    Resume Exit_Comando7_Click
End Sub
Esso mi consente di "filtrare" e quindi aprirmi in base all'id,la
MASCHERA UTENTI PRINCIPALE (è la scheda utente).
Volevo sapere se c'è un altro modo invece di effettuare il filtro, per
"posizionarmi" sul record interessato della MASCHERA UTENTI PRINCIPALE
dalla maschera popup!!
Leggevo qualcosa riguardo la proprietà SetFocus...può fare al caso
mio??
Ho un problema con il metodo di filtraggio che sto usando finora,e
devo trovare un modo alternativo!!
Grazie per l'aiuto

bizio ha scritto:

Qualche suggerimento,please?
Non capisco la causa e non riesco a risolvere

 ha scritto nel messaggio 
news:1182154206....@g4g2000hsf.googlegroups.com...
bizio ha scritto:


[risposta]
Sul sito comune Sezione Forms trovi esempi su maschere che cercano in altre 
maschere...
Ciao.
-- 
Sergio MAZZA

Newsgroup: it.comp.appl.access
Titolo: Creazione di DDL di tabella

Cosa si intende con la frase in oggetto?
Nell'articolo si parla di creare una tabella in A2000 con un vincolo
definito in un'altra tabella ( constraint)  e regole di convalida.
saluti

 ha scritto nel messaggio
news:xNxhd.112504$b5.55...@news3.tin.it...

Beh non ho capito molto in realtà comunque
i comandi SQL si dividono in ddl e dml
I comandi dml (Data Manipulation Language)
sono i comandi tipo insert, select, update e delete
che manipolano i dati.
I comandi che creano la definizione dei dati cioè
i comandi come create table, create index ...
sono detti ddl (data definition language).
                danilo

si era questo, grazie
Newsgroup: it.comp.appl.access
Titolo: VBA - Comando Shell

Ciao a tutti.
Devo lanciare in shell il programma openssl per criptare delle stringhe.
Se lancio il comando da prompt funziona bene, se lo lancio da shell (con
tutta la path giusta) non mi funziona, anche se openssl non ha un gran
debug per far capire se qualcosa è andato bene o male.
Se registro il valore di shell in una variabile di tipo double mi esce
164. Ho provato a vedere su google se corrisponde ad un codice di errore
ma non sono riuscito a trovare nulla.
C'è qualcosa da sapere sull'utilizzo del comando Shell?
Grazie
Bye
Il Bove

 ha scritto nel messaggio
news:euas75$pat$1...@aioe.org...

magari dovresti postare la stringa di comando della shell
Antonio


Ok, ma la stringa funziona se la lancio da prompt, cmq
Shell "c:\programmi\gnuwin32\bin\openssl rsautl -encrypt -in 
chiaro.txt -out criptato.txt -inkey certificato.cer -certin -pkcs"
grazie
Il Bove 

 ha scritto nel messaggio
news:euat52$r32$1...@aioe.org...

Quando dici che non funzona cosa intendi?
Il messaggio di errore di access quale è, se c'è?
Antonio

"Antonio Biso" <ch...@NOSPAMetruria.net> ha scritto nel messaggio 
news:RW6Oh.39544$zG1.3...@twister2.libero.it...

Trovato.
Access non va in errore, ma da shell di access devo "referenziare" i 
file con il loro path completo.
Da start esegui quella stringa fa il suo sporco lavoro, mentre da shell 
devo scrivere
Shell "c:\programmi\gnuwin32\bin\openssl rsautl -encrypt -in 
c:\programmi\gnuwin32\bin\chiaro.txt -out 
c:\programmi\gnuwin32\bin\criptato.txt -inkey 
c:\programmi\gnuwin32\bin\certificato.cer -certin -pkcs"
e tutto funziona benissimo...
mah
Grazie cmq
Il Bove

Newsgroup: it.comp.appl.access
Titolo: Eseguire una  Query attraverso porta RS-232

E' possibile eseguire una query per mezzo di  una stringa di testo ricevuta
attraverso la porta RS 232?
In tal caso potete aiutarmi indicandomi un codice ad hoc?
Grazie

 ha scritto nel messaggio 
news:lR5Lf.4043$A83.1...@twister1.libero.it...

Sì si può.
La tecnica è sempre la solita. I dati ricevuti dalla com vanno analizzati e 
accodati in una tabella. Su questa potrai fare tutte le query che vuoi e in 
tempo reale.
Vedi altri post sulla porta seriale (com), l'evento On com del controllo, 
ecc.
Tutto dipende da cosa arriva alla porta...
Ciao, Carlo

 La tecnica č sempre la solita. I dati ricevuti dalla com vanno analizzati

Newsgroup: it.comp.appl.access
Titolo: Problema con formule Primo e Ultimo nelle query

Salve a tutti,
Il mio problema è il seguente
ho due tabelle
TAB1
ID_archivio   contatore
VarA           numerico
TAB2
ID_visitesucc    contatore
ID_archivio       numerico
Data_visita       data
VarB                numerico
Le tabelle sono in relazione uno a molti tramite ID_archivio
Devo creare una query per poter estrarre la VarB in relazione
alla prima o all'ultima visita effettuata in ordine cronologico stabilito da
data_visita.
Mi spiego meglio se ho 100 pazienti che hanno fatto due visite in epoche
successive voglio vedere selezionare ad esempio i valori di VarB riscontrati
all'ultima visita.
Ho provato a creare una query
SELECT Tabella1.ID_archivio, First(Tabella2.varB) AS PrimoDivarB,
First(Tabella2.data) AS PrimoDidata
FROM Tabella1 INNER JOIN Tabella2 ON Tabella1.ID_archivio =
Tabella2.ID_archivio
GROUP BY Tabella1.ID_archivio;
che tuttavia non funziona in quanto per alcuni pazienti mi dà il valore
corretto (ad esempio quello dell'ultima visita) ma per altri mi da' quello
della prima visita.
Sicuramente sbaglio qualcosa. Potreste aiutarmi
Grazie
Luca T

 ha scritto nel messaggio
news:trsTd.587268$b5.26...@news3.tin.it...

Ciao Luca,
direi che c'è un errore di fondo, la funzione di aggregazione First non
restituisce la prima data in ordine cronologico ma la prima data inserita in
archivio, questa  può non corrispondere alla prima visita per vari motivi :
cancellazione e reinserimento prima visita, ordine di inserimento non
rispettato in fase di popolamento del database con dati storici ecc.
Se vuoi estrare i dati dell'ultima visita dovrai cercare la data più alta
Max(data) non First(Data), inoltre se vuoi sapere il valore di VarB
associato alla data più recente non potrai sottoporlo a funzione di
aggregazione.
Prova a vedere se questa soluzione che estrae la data dell'ultima visita e
il relativo varB può andare bene
--------------------
SELECT Tabella1.ID_archivio, Tabella2.varB,
Tabella2.data
 FROM (Tabella1 INNER JOIN Tabella2 ON Tabella1.ID_archivio =
 Tabella2.ID_archivio)
WHERE Tabella2.Data=(Select Max(Data)
                     From Tabella2 T2
                     WHERE T2.Id_Archivio=Tabella2.Id_Archivio)
--------------------
Ciao Giorgio


Grazie,
le informazioni che mi hai dato sono utili e le query ora sono coerenti
Luca Tedeschi


prego, solo un'ultima cosa....
Se hai problemi di prestazioni usa questa query
-------------------
SELECT Tabella1.ID_archivio, Tabella2.varB,
Tabella2.data
 FROM (Tabella1 INNER JOIN Tabella2 ON Tabella1.ID_archivio =
 Tabella2.ID_archivio)
INNER JOIN [SELECT Max(Data) AS MaxData,
            ID_Archivio
            FROM Tabella2
            GROUP BY Id_Archivio]. AS Tx
ON Tabella2.Data=Tx.MaxData AND Tabella2.ID_Archivio=Tx.Id_Archivio
--------------------
Restituisce lo stesso risultato e in presenza di molte righe può essere
centinaia di volte più veloce di quella precedente.
Ciao Giorgio
Newsgroup: it.comp.appl.access
Titolo: help reports

su una maschera, mediante creazione guidata, ho installato un pulsante per
l'anteprima report. Il report che mi viene mostrato perň non č quello con i
dati presenti nella maschera, ma quello relativo ai dati del primo record
presente nella tabella. Perchč? Dov'č l'errore di sincronizzazione dal
momento che la creazione guidata non permette di associare i campi ID?

 ha scritto nel messaggio
news:9se4al$5kt$1...@pegasus.tiscalinet.it...

Non ricordo precisamente quando effettua questo tipo di collegamento nei
Wizard ma ti basta modificare la Sub in modo appropriato.
Private Sub TuoPulsante_Click()
On Error GoTo Err_TuoPulsante_Click
    Dim stDocName As String
    Me.Refresh
    stDocName = "TuaMaschera"
    DoCmd.OpenReport stDocName, acPreview, , "ID_Record = " & Me.ID_Record
Exit_TuoPulsante_Click:
    Exit Sub
Err_TuoPulsante_Click:
    'MsgBox Err.Description
    Resume Exit_TuoPulsante_Click
End Sub
Newsgroup: it.comp.appl.access
Titolo: Somma variabile in base a dati filtrati nella maschera

Buongiorno a tutti,
chiedo scusa per la mia ignoranza...
Il mio problema oggi è questo:
In una maschera continua ho inserito una casella che si chiama TxtImporto con questa origine:
=IIf(IsNull(DLookUp("[ImponibileBeniBef]";"QImponibileBeniBef";"[IdBef] =" & [Maschere]![BefRicevute]![IdBef]));"0";(DLookUp("[ImponibileBeniBef]";"QImponibileBeniBef";"[IdBef] =" & [Maschere]![BefRicevute]![IdBef])))+IIf(IsNull(DLookUp("[ImponibileBeniBef]";"QImponibileSubBeniBef";"[IdBef] =" & [Maschere]![BefRicevute]![IdBef]));"0";(DLookUp("[ImponibileBeniBef]";"QImponibileSubBeniBef";"[IdBef] =" & [Maschere]![BefRicevute]![IdBef])))
 
in ogni rigo vedo quindi la somma di questi due valori che è giusta.
Ovviamente a piè pagina della maschera non posso fare la somma di DLookUp,
quindi ho provato a scrivere così:
 
=Somma(IIf(IsNull(DLookUp("[ImponibileBeniBef]";"QImponibileBeniBef"));"0";(DLookUp("[ImponibileBeniBef]";"QImponibileBeniBef"))))+Somma(IIf(IsNull(DLookUp("[ImponibileBeniBef]";"QImponibileSubBeniBef"));"0";(DLookUp("[ImponibileBeniBef]";"QImponibileSubBeniBef"))))
 
ma il totale non è corretto! 
 
Le query dei DLookUp sono le seguenti:
QImponibileBeniBef:
SELECT Bef.IdBef, Bef.TotaleImp, Sum([Quantita]*[PrezzoUnitario]) AS ImponibileBeniBef
FROM Bef INNER JOIN BeniBef ON Bef.IdBef = BeniBef.IdBef
GROUP BY Bef.IdBef, Bef.TotaleImp;
 
QImponibileSubBeniBef:
SELECT Bef.IdBef, Bef.TotaleImp, Sum([Quantita]*-[PrezzoUnitario]) AS ImponibileBeniBef
FROM Fornitori RIGHT JOIN (Bef INNER JOIN BeniBef ON Bef.IdBef = BeniBef.IdBef) ON Fornitori.IdFornitore = Bef.IdFornitore
WHERE (((Fornitori.Categoria)="SUB") AND ((BeniBef.RigoOrd)=No))
GROUP BY Bef.IdBef, Bef.TotaleImp;
 
Qualcuno sa dirmi come poter fare?
 
Grazie mille per chi avesse tempo e voglia di farmi capire...
Buon lavoro a tutti


Il problema deriva dalle query di riferimento perchè ho capito che va bene per trovare il DLookUp di ogni rigo.
Se io creo una query di prova
 
SELECT Bef.IdBef
FROM Bef INNER JOIN BeniBef ON Bef.IdBef = BeniBef.IdBef
WHERE (((Bef.IdBef) Like [Forms]![BefRicevute]));
 
dove BefRicevute è la mia maschera continua all'interno della quale ho i campi DLookUp
 
noto che mi fa vedere solo IdBef della prima riga della maschera e non tutti gli IdBef contenuti nella maschera.
Dove sto sbagliando?
Grazie mille a chi riesce a farmi capire...
 
a


Ho risolto...
Al posto di DLookUp ho usato una formula più veloce che mi permette di avere i risultati.
Nella query della maschera continua ho creato dei campi tipo:
ImpoSub: Somma(IIf([Fornitori].[Categoria]="SUB" And [BeniBef].[RigoOrd]=Sì;[BeniBef].[PrezzoUnitario]*[BeniBef].[Quantita];0))
 
Questo fa sì che io possa crearmi i totali corretti a piè maschera.
Chiedo venia per l'inutile disturbo...
Newsgroup: it.comp.appl.access
Titolo: data calendario

Ho scaricato da sitocomune il programma per poter richiamare il calendario
con il doppio click sulla casella (dove va inserita la data).
Non capisco,   mi appare sempre "posizionato" ai tanti di luglio del 2002.
E' possibile stabilire che al richiamo il calendario si apra
automenticamente posizionandosi sulla data odierna? e se e possibile,
qualcumo mi spiega come?
Grazie in anticipo.

 ha scritto nel messaggio
news:bgl921$nbr2r$1...@ID-91233.news.uni-berlin.de...

nomecalendario.Today

 ha scritto nel messaggio
news:8ktXa.25951$cl3.9...@news2.tin.it...

v
Mi spiace non funziona
Ho una maschera denominata calendario.
In un altra maschera ho un campo data 1 dove su doppio click ho inserito
Me.Data1= Date
    DoCmd.OpenForm "CALENDARIO"
Il calendario si apre sempre sbagliato.
Dove inserisco il .Today?

Newsgroup: it.comp.appl.access
Titolo: Formattazione condizionale stile Excel

salve!
ho una maschera continua con una serie di record
e' possibile in base al valore di un campo es. [importo] colorare lo
sfondo dello stesso e/o lo sfondo di altri campi?
ho provato a farlo, ma il criterio viene preso dal record corrente e
non analizzato record per record
Grazie anticipatamente
PFM
--
To reply please remove from e-mail 'xyz'- Per rispondere togliere 'xyz' dall'indirizzo e-mail.

 ha scritto nel messaggio
news:3c03f6f4...@news.interbusiness.it...

Puoi solo discernere tra valori maggiori e minori di 0. Guarda sul sito
comune
www.sitocomune.com
Paolo