mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Left Join annidate

Non riesco a fare una query, ecco le tabelle
Articoli.codice
tab_car.codice   ( tabella caratteristiche )
ds_art.codart     ( tabella che collega la caratteristica all'articolo)
ds_art.codcar
Ora mi servirebbero tutte le caratteristiche comuni ad un dato insieme di 
articoli ( es.:  articoli.gruppo = 2 )
Select  distinct tab_car.codice, count(*) as num  from
left join che collega articoli ad ds_art e poi ad tab_car.codice ??
where articoli.gruppo = 2  group by tab_car.codice
ora il filtro stando su una tabella (Articoli)  che passa per ds_art  non 
riesco a capire come si fa il Join
ne ho provate diverse ma non ho proprio idea , mi date un aiutino per favore 
?
Grazie

Eccola !
SELECT DISTINCT DS_TAB_CAR.CODICE , Count(*) as NUM  FROM
DS_TAB_CAR INNER JOIN (ARTICOLI INNER JOIN DS_ART ON ARTICOLI.CODICE = 
DS_ART.CODART) ON DS_TAB_CAR.CODICE = DS_ART.CODCAR WHERE ARTICOLI.MARKED=-1 
GROUP BY DS_TAB_CAR.CODICE
"Antonio" <ant...@microsoft.virus> ha scritto nel messaggio 
news:4d050608$0$6543$4faf...@reader4.news.tin.it...


Newsgroup: it.comp.appl.access
Titolo: Macro eseguita automaticamente in chiusura

Qualcuno sa dirmi che nome bisogna dare ad una macro di Access per fare
eseguire un comando alla chiusura del database (in questo caso una copia
di backup della tabella principale)? Oppure come si puo' fare?
Grazie infinite a chi puņ aiutarmi.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:c29480748b3f8e476f2...@mygate.mailgate.org...

Puoi usare l' evento su chiusura della maschera principale o comunque dell'
ultima maschera che normalmente chiude il Db.
Poi utilizzi docmd.runmacro
ciao
Mak


All'apertura del database, ad esempio con una macro Autoexec, apri una
maschera non visibile.
Richiama la tua macro a fronte dell'evento "Su chiusura" di detta maschera.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Un grazie particolare a Roberto da casa: sei grande. Mi hai risolto un
grosso problema.


Newsgroup: it.comp.appl.access
Titolo: Maschere continue

Ciao a tutti,
premetto che non sono molto esperto di Access.
Con Access 97 devo creare una maschera continua con all'interno dei campi
non associati.
Questi campi dovrebbero prendere i valori da una tabella su cui eseguo una
select e ottengo un certo numero di risultati esempio 10 risultati.
La maschera da me create deve associare per ogni record dei risultati
determinati valori ai controlli della maschera.
Es: primo record, imposto i risultati nella maschera.
secondo record come faccio a spostarmi sul secondo record e sulla nuova
mascera?
Grazie 1000
Stefano

 Stefano
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: percentuale

Salve
Come fare per far si che una msgbox legga correttamente la %
Alcuni frammenti del codice:
Dim valoreiva As Currency
valoreiva = Me.iva
AVVISO = "ATTENZIONE" & vbCrLf & " si vuole aggiungere l'iva al " & " " & 
valoreiva & " del prodotto" & vbCrLf & prodo
Supponendo che l'Iva sia del 22,00% l'msgbox mi da 0,22%
Perché
Grazie
Gigi

 ha scritto nel messaggio
news:6RJXh.17779$uJ5.3...@twister2.libero.it...

Ma 0,22 č il 22%, se vuoi leggerlo in Percentuale devi moltiplicare 100...!
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: Tabelle di sistema

E' normale che nella finestra delle relazioni venga visualizzata
la relazione tra la tabella di sistema 'MSysAccessStorage'  e se stessa?
---
leo_duca


No!!!
Antonio.

 ha scritto nel messaggio
news:arbbrh$gs141$1...@ID-162989.news.dfncis.de...

:)) diciamo che lo supponevo anch'io, visto che da due anni a
questa parte non le avevo mai viste!!
Mi sai dire nulla di piu'... (tipo cosa mi e' successo o come farle
sparire???)
In rete non c'e' un bel niente! :|
---
leo_duca

 leo_duca
Crea un nuovo DB e poi importa tutti gli oggetti (tabelle, maschere, query,
ecc.)
tranne quelli di sistema.
Antonio.

 Antonio.
????
credo di non esermi spiegato bene:
la relazione e' presente in TUTTI i db,
anche in uno vuoto, nuovo nuovo, appena creato.
Quindi anche facendo come tu mi consigli non
risolvo il problema perche' al momento della
creazione del db ho gia' la relazione esistente.
Grazie cmq
---
leo_duca


Prova a disinstallare Access e reinstallarlo.
Antonio.

> Prova a disinstallare Access e reinstallarlo.
Fatto: nulla di fatto!
---
leo_duca

Newsgroup: it.comp.appl.access
Titolo: Conteggio giorni

Ciao a tutti
ho un campo data_inizio, vorrei ottenere in un report un campo con il 
conteggio dei giorni da data_inizio a oggi.
Come si puo' fare??
Grazie

 Grazie
prego
-- 
Ciao
Geppo 

 Come si puo' fare??
Origine controllo di una casella di testo:
=DateDiff("g";[data_inizio];Date())
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
Newsgroup: it.comp.appl.access
Titolo: Tabella collegata con parametro giornaliero

Ho un programma, che mi genera un file txt a fine giornata,  questo file si
chiama dati.txt e si trova in una cartella anch'essa generata dallo stesso
programma; la cartella generata viene nominata dal programma 190602 oggi,
domani 200602 e così via, mentre il file interno rimane sempre dati.txt.
Ora come posso fare per impostare la relazione della tabella collegata
variabile di giorno in giorno sapendo che la cartella creata porterà il
giorno macchina?
Mi spiego, se oggi la relazione della tabella sarà collegata a :
C:\190602\dati.txt
domani in automatico dovrebbe cambiare l'impostazione in:
C:\200602\dati.txt
E' possibile realizzare una cosa del genere?
Grazie anticipatamente Marco

E' possibile realizzare una cosa del genere?
Certo
Ti posto uno stralcio di codice che non fa proprio quello
che cerchi ma non dovresti avere problemi a modificarlo:
Io creo directory con l'anno, poi col mese, e salvo file con
numeri progressivi
es: \2002\06\0002564.doc
Me.FileDoc = Format(Me.IDDoc, "0000000") & ".doc"
d = DirBaseDoc
If Not EsisteDir(d, True) Then MsgBox "Impossibile creare la
directory", vbCritical + vbOKOnly, "Errore": Exit Sub
d = d & Year(Me.DDoc) & "\"
If Not EsisteDir(d, True) Then MsgBox "Impossibile creare la
directory", vbCritical + vbOKOnly, "Errore": Exit Sub
d = d & Format(Month(Me.DDoc), "00") & "\"
If Not EsisteDir(d, True) Then MsgBox "Impossibile creare la
directory", vbCritical + vbOKOnly, "Errore": Exit Sub
d = d & Me.FileDoc
dove esistedir sarebbe:
Public Function EsisteDir(nomedir As String, Optional crea
As Boolean) As Boolean
'UR: 14/05/2002 LC
'testa se esiste la directory, eventualmente la crea
'non funziona se occorre creare piu' di un livello
On Error GoTo annulla
If Dir(nomedir, vbDirectory) = "" Then
   If crea Then
      MkDir nomedir
      EsisteDir = True
   Else
      EsisteDir = False
   End If
Else
   EsisteDir = True
End If
Exit Function
annulla:
EsisteDir = False
End Function
Se non e' chiaro, riposta
-- 
Lorenzo Coronati
---
Quesito a risposta binaria SI/NO:
"Risponderai no a questa domanda?"
---
Newsgroup: it.comp.appl.access
Titolo: somma di un campo numerico per ilcalcolo dello straordinario

Ragazzi non riesco a risolvere il mio problema.
Sono riuscita a calcolare le ore e i minuti con:
interval = #12:00:00 AM#
    While Not rs.EOF
       interval = interval + rs![TotaleBO]
       rs.MoveNext
    Wend
 totalhours = Int(CSng(interval * 24))
 totalminutes = Int(CSng(interval * 1440))
 hours = totalhours Mod 24
 minutes = totalminutes Mod 60
Ma il problema sorge quando ci devo sommare un campo che è definito numerico 
(in quanto contiene le ore di straordinario accantonate l'anno precedente) e 
che può contenere qualsiasi numero es 147,30 cioè 147 ore e 30 minuti.
non riesco a sommarlo a lo straordinario fatto nell'anno
sapete darmi una dritta.
Grazie 

 ha scritto:

Separa la parte intera del numero ore straordinarie da quella
decimale; quest'ultima moltiplicala per 100 e quindi sommale
rispettivamente al totale ore ed al totale minuti.
OreStaord=Int(OreStraordAnnoPrec)
MinStraord=100*(OreStraordAnnoPrec-OreStraord)

 ha scritto nel messaggio 
news:1633o291mcaoctu7i...@4ax.com...

grazie, ma funziona in parte, perchè quando le ore che avevo prima sono ad 
esempio 53,30 se ci sommo (nel modo suggerito da te) 25,30
mi restituisce 78,60 che in realtà sarebbe 79 perchè 60 minuti sono un ora 

 wrote:
 (...) 

E allora ?
Qui Access c'entra poco: è un problema di algoritmo ...
Per esempio, potresti sommare come hai fatto finora quindi elaborare
il totale ottenuto riportando l'eventuale parte decimale eccedente i
59 minuti sulla parte intera del risultato.
Insomma: se tot è la variabile risultante dalla somma
tot = int(tot)+ ((100 *(tot - int(tot))) \ 60)+ ((100 * (tot -
int(tot))) 
ATTENZIONE: la formula è stata testata in maniera molto sommaria !!!!!

"VT @ Work" <V...@Work.it> ha scritto nel messaggio 
news:458272cb...@firewall.regione.toscana.it...

Grazie di cuore, ho trovato una soluzione più breve testando il risultato.
Newsgroup: it.comp.appl.access
Titolo: Eliminazione record

Scusate se vi stresso per una bischerata così, ma non riesco a capire cosa
non va. Ho un maschera basata su due tabelle collegate fra loro. Voglio
eliminare il record corrente attraverso una stringa SQL del tipo
"DELETE Anag_clienti.*, Anag_clienti.ID_clienti FROM Anag_clienti WHERE
(Anag_clienti.ID_clienti)=" & Me!ID_clienti
dove naturalmente a ID_clienti corrisponde un id unico. Quando eseguo
l'istruzione con il comando docmd.runsql, mi risponde che la tabella
Anag_clienti è già aperta con accesso esclusivo..... bla... bla...
L'accesso esclusivo deriva soltanto dall'aver basato la maschera sulla
tabella??? Dal fatto che è basata su due tabelle (collegate con una
relazione)???
In sostanza, come devo fare per cancellare il record corrente???
grazie
ste

 Anag_clienti è già aperta con accesso esclusivo..... bla... bla...
Non e' che per caso lanci la query mentre il record e' in fase di modifica
(e quindi bloccato)?
Comunque perche' vuoi farlo tramite sql quando hai la maschera davanti e
basta premere canc dopo aver selezionato il record?
Sib

 DoCmd.RunCommand acCmdDeleteRecord
Ferrari Rino


Non so se il recordo è bloccato, ma se faccio un me.refresh prima di
lanciare l'operazione, lo dovrei sbloccare, vero?
Il fatto è che devo farlo via codice perchè l'interfaccia è rganizzata
tramite pulsanti...
ciao e grazie


Ho provato ma adesso mi dice che la tabella che ho collegato alla principale
nell'origine della maschera, è aperta con accesso esclusivo...
maledizione! Come posso fare?
Grazie
Stefano

Newsgroup: it.comp.appl.access
Titolo: 1/2 OT  ACCESS su PALMARE

ho un palmare ipaq 1040 HP , mi domando se esiste anche un ACCESS per
questi palmari , o qualche programma che ci somiglia molto ,o ancora, che
possa importare tabelle access , query ecc.
ne sapete niente?
luigi
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 luigi
Tabelle sicuramente solo con estensione cdb.
Access esiste solo sullo journada 720 e sua serie.
esistono però programmi come "data on the run" che
fanno pochino ma qulacosa fanno.
Altriementi devi cambiare linguaggio.
Net Framework
MAssimiliano
Newsgroup: it.comp.appl.access
Titolo: Lavorare con Access

Volevo chiedervi , ma esiste qualcuno che usa veramente access per lavoro?
Vi chiedo questo perche' lo sto testando per una azienda che attualmente
usa Lotus 123 e mi sembra poco affidabile,
per esempio ho fatto un semplice report e solo spostandomi nell'anteprima
tramite il tasto pag successiva a volte riesco a scorrerlo tutto,(10
pagine) a volte da errore e si blocca tutto il programma e esce...
 
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 usa Lotus 123 e mi sembra poco affidabile,
ARIROTFL!!!
Lotus 123 è un foglio di calcolo, Excel per intenderci, NON E' UN
DATABASE!!!
Quanta ignoranza e preconcetti ci sono in giro...
Antonio

 Antonio
se ci dai  il nome dell'azienda ... ci facciamo un discorsetto ...

 se ci dai  il nome dell'azienda ... ci facciamo un discorsetto ...
Comunque non c'è bisogno di prendere questa in particolare.
Sono veramente tante le aziende medio-piccole in cui l'informatica ancora
viene considerata un optional con conseguente perdita secca per procedure
non automatizzate o sistemi informativi inadeguati!!!
Antonio

 pagine) a volte da errore e si blocca tutto il programma e esce...
Anche in modalità provvisoria?
Ciao.

 non automatizzate o sistemi informativi inadeguati!!!
 
Il programma fatto in lotus prevede delle maschere di inserimento dati
che in seguito vengono stampati,
non vedo che problema ci sia a voler 'tradurre ' questa procedura in 
Access, dato che questo foglio di calcolo arriva a contenere 50.000 record
in teoria Access dovrebbe gestire meglio questi dati
ps chi ha mai detto che lotus e' un DB?  facevo solo notare questo strano
errore di  Access, tutto qui 


 errore di  Access, tutto qui
Probabilmente devi aggiornare i drivers della stampante o della scheda
video.
Per questo ti ho chiesto se in mod. provvisoria funziona.
Ciao.

 Per questo ti ho chiesto se in mod. provvisoria funziona.
Credo di aver risolto, probabilmente dipendeva da alcuni caratteri 'strani'
che venivano generati nel passaggio da lotus a Access 
e' possibile dipendesse da questo?
grazie comunque
ciao
ps. jet 3.6 - access2000  


 ps. jet 3.6 - access2000
Non ti seguo: esiste la possibilità di convertire file di Lotus in Access?

Newsgroup: it.comp.appl.access
Titolo: Query Riassuntiva

Buongiorno a tutti.Ecco la mia domanda: Se ho tre query A,B,C ognuna delle
quali a tre campi (A1,A2,A3,B1,B2..), Vorrei creare una query anch'essa di
tre campi che raccoglie i valori delle altre tre, disposti uno sotto l'altro
(es A1,B1,C1 nello stesso campo, A2,B2,C2 idem e cosě via per gli altri).E'
possibile, quindi, farlo senza utilizzare necessariamente una query di
accoramento?
Grazie
Ciao
Benedetto

 ha scritto nel messaggio
news:Vrl7a.160559$ZE.47...@twister2.libero.it...

UN NUOVO TIPO DI QUERY:  LA .....QUERY DI ACCORAMENTO!!!!!!!

 ha scritto nel messaggio
news:Vrl7a.160559$ZE.47...@twister2.libero.it...

Vedi parola chiave SQL UNION
Antonio
Newsgroup: it.comp.appl.access
Titolo: Piccolo Problemino!!

Salve, ho un problema che non riesco a capire :
1) ho creato una tabella con un campo si/no che ho definito come casella
combinata alla quale ho associato una tabella con un unico campo (casella di
testo) nella quale ho succesivamente inserito i due valori (SI /NO)
2)Durante l'inserimento dei dati il valore SI viene inserito normalmente
mentre se inserisco il valore NO Access si blocca e grazie a Dr.Watson ho
scoperto che <<L'applicazione ha causato un overflow del proprio stack.
Questo può essere causato da una ricorsione non limitata o da un'eccezione
interna al gestore delle eccezioni.>>
Cos'è successo? è un problema che posso risolvere? se si come?

Non ho ben capito il tutto, tant'č che forse ti risponderň in modo errato.
Il campo SI/NO non č campo testo, ma Boolean che restituisce True/False, va
da se che puň essere attribuito ad un Flag.
Se vuoi eseguire quello che hai detto va inserito un po di codice che legga
il TextBox.Text e traduca:
If Textbox.Text="SI" then campo=True
If Textbox.Text="NO" then campo=False
Prendi con gli opportuni cambiamenti le due righe di codice che ti ho
inserito, č solo una spiegazione.
Ritengo piů semplice in ogni caso non impostare il campo SI/NO, a questo
punto, ma direttamente Testo (2 caratteri) e poi nell'EVENTO Click della
Combo valuti come dirottare il tutto.
Alex.
P.S. Scusa se ho mal interpretato.
-- 
Posted from [212.141.54.103] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Ritengo più semplice in ogni caso non impostare il campo SI/NO, a questo


Ciao Plink, il problema č semplice da risolvere, devi eseguire un Requery
sull'evento che modifica i parametri della Query.
Prova a verificare con l'help, ma se utilizzi come ricordo una ComboBox,
sull'evento AfterUpdate devi inserire il Requery.
Es. se tu avessi una SubForm all'interno della Form Principale con i dati
filtrati dalla Qry in oggetto, su Evento:
TuaSubForm.Requery
Automaticamente si riaggiorna l'origine dei dati della Sottomaschera, con un
REPORT in Anteprima č leggermente differente, devi chiudere il Report e
Riaprirlo, non ho mai fatto, magari ci sono sistemi migliori, per evitare di
vedere ir report che si chiude e riapre, utilizza le proprieta Docmd Echo
False e/o True per congelare il monitor prima di scaricare il Report e
riattivalo dopo averlo ricaricato.
Per eseguire il conteggio c'č un sistema molto piů semplice, la Funzione
Conteggio(Campo).
Metti nella TextBox Origine Controllo la seguente Formula:
=Conteggio([TuoCampo]), e ti ritorna un numero corretto che conta il numero
dei Record, senza condizioni True/False, perchč il conteggio č effettuato
sul numero reale dei Records passati dalla Query.
Spero di averti risolto parte dei problemi, se hai bisogno ancora non
preoccuparti.
Alex.

Newsgroup: it.comp.appl.access
Titolo: Evento su non in elenco messaggio errore

E' possibile impostare da codice VBA o nelle opzioni di Access
una volta per tutte che la variabile 'Response' intrinseca nell'evento 'su 
non in elenco'
sia sempre settata a AcDataErrContinue in modo che non compaia il msgbox di 
errore.
So che puň essere settata da codice all'interno della routine evento, ma 
preferisco non operare cosě.
E' possibile?
Grazie. 

 ha scritto nel messaggio
news:cANId.442316$b5.21...@news3.tin.it...

Non sono sicuro di aver capito bene....!
In ogni caso potresti eseguirlo a livello di Controllo, ma se nella
Form avessi piů di una Combo dovresti gestirli singolarmente.
Io per ovviare inutili sprechi di codice faccio una cosa del Genere:
Private Sub Form_Error(DataErr As Integer, Response As Integer)
  If DataErr = 2237 Then
        Response = acDataErrContinue
        Screen.ActiveControl.Undo
  Else
        Response = acDataErrDisplay
  End If
End Sub
Ciao
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: cronologia

Cia mi chiamo Dennis ed è la prima volta che scrivo in questo newsgroup.
Spero mi possiate essere di aiuto. Gestisco un archivio di documenti con
Access 97. Ogni qual volta un documento viene prelevato registro il nome
della persona, la data di uscita del documento e la successiva data di
rientro. Per far questo utlizzo una finestra a maschere continue in cui ogni
record equivale ad un documento diverso. Il mio problema è questo: vorrei
avere una cronologia di ogni documento. Mi spiego: ogni qual volta un
documento rientra, tramite un pulsante di comando, volevo inserire la
suddetta registrazione in una tabella secondaria, diversa per ogni
documento, in modo da avere una cronologia.
Spero di essermi spiegato abbastanza bene. Ringrazio anticipatamente per
ogni eventuale aiuto.

ogni eventuale aiuto.
ciao, secondo me hai impostato male la cosa.
creati una maschera con i documenti e nella sottomaschera inserisci uscita
soggetto rientro eccetera. cosě hai la corno che cerchi
ciao MAssimiliano
--------------------------------
Inviato via 
http://usenet.iol.it

Newsgroup: it.comp.appl.access
Titolo: DAO e ODBC....HEEELP

Come cavolo ci si connette ad una fonte dati ODBC con DAO ?
(nell' help non ho trovato nulla)
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 (nell' help non ho trovato nulla)
Chi cerca trova...
Saluti: Antonio
Newsgroup: it.comp.appl.access
Titolo: RICHIESTA DI AIUTO maschere nidificate

Ciao a tutti, sono una biologa, non sono un granché
come informatica, sto cercando di costruire un DB per una
banca di tessuto ma ho un problema, il mio Db è costituito da più tabelle,
ognuna collegata alla successiva con una relazione uno a molti. Ogni
paziente, presente nella prima tabella, ha molte sezioni (seconda tab.),
ogni sezione ha molti tasselli (nella terza), ogni tassello molte
colorazioni. Fin qui tutto bene, ho costruito le tabelle, stabilito le
relazioni.... il problema è stato creare un unico form con tante
sottomaschere nidificate una nell'altra, sono riuscita ad inserire solo fino
alla "sottomaschera della sottomaschera" (perdonate il lessico ignorante)
dopodichè access mi da un messaggio di errore, è un problema mio
dettato dalla mia abominevole incapacità, un difetto di acces, o cosa? Come
posso risolverlo? In che  modo posso riuscire ad inserire tutti i dati nelle
diverse tabelle con un unico form?
Spero di essermi spiegata abbastanza, grazie per l'aiuto.       Francesca
france...@iol.it

 wrote in message
rAZI6.20545$UW4.1...@news.infostrada.it...

potresti creare delle maschere collegate al posto delle sottomaschere
ma...quanti campi?
ciao

 
france...@iol.it
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

In che  modo posso riuscire ad inserire tutti i dati nelle diverse tabelle
con un unico form?
3. Complessità bassa. Attivare la maschera delle Colorazioni con un
pulsante, filtrando in apertura.
HTH
Michele Amato
--
{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}
Sulla mia pagina personale
http://utenti.worldonline.it/micheleamato
è possibile trovare del materiale relativo ad Access
scritto da me, sia freeware che shareware
{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}

 ha scritto nel messaggio
news:rAZI6.20545$UW4.1...@news.infostrada.it...

Non sarà facile spiegarti lo strataggemma.
Costruisci una maschera per ogni tabella in relazione. Solo la prima è
"Libera", quella dei pazienti.
Tutte le altre hanno un legame con la precedente.
Fatto questo realizza una maschera che si alimenta dalla prima tabella
(Pazienti). Inserisci nella maschera una struttura a schede con tante schede
quante sono le maschere che ti servono. In ognuna di queste schede inserisci
le varie maschere. Facile no.
Moltissime volte mi sono trovato in queste condizioni.
Dimenticavo: visto che ciascuna maschera la facevi derivare dalla precedente
(magari con una query), quando inserisci le maschere nella struttura a
schede evita di mettere campi Master e campi secondari.
Ciao, Carlo
Newsgroup: it.comp.appl.access
Titolo: Analisi db diete speciali.

BGiorno a tutto il NG.
Mi è stato chiesto di codificare una quarantina di diete assegnate a
singoli utenti del servizio mensa.
Cioè:
Pippo non può mangiare il pomodoro
Pluto non può mangiare il pomodoro e il formaggio
Paperino non può mangiare pomodori, formaggi e zucchine
Ciccio non può mangiare pomodori e zucchine ...
e via di questo passo, per ogni alimento possibile ed immaginabile, con
qualsiasi combinazione possibile ed immaginabile.
Avevo pensato ad una relazione uno (utente) a molti (alimenti), o anche
uno (dieta) a molti (alimenti), ma essendo questi ultimi "illimitati"
(o per lo meno sono limitati dal menu), mi chiedo:
1. vale la pena imbarcarsi in una cosa del genere?
2. oppure basta il doc word già predisposto dall'ufficio?
3. o, ancora, ci sono strade differenti che si possono percorrere?
Un grazie in anticipo per le dritte che dovessero arrivarmi.
Buona giornata e buon lavoro a tutti.
chippo

 2. oppure basta il doc word già predisposto dall'ufficio?
se sono solo 40 diete imho non ha molto senso...
se sono destinate a crescere all'ora il senso ce l'ha eccome.

Silver ha scritto:

Forse la cosa potrebbe essere un pò più complessa, nel senso che
ogni piatto ha una ricetta, e di conseguenza degli ingredienti.
Non è tanto l'ingrediente singolo a fornire il divieto ma la ricetta
che contiene l'ingrediente....!
tbl utenti ---> tblCibiProibiti
tbl Ricette---->tblIngredienti
Per poi approfondire servirebbe sapere se la cucina come attenzione al
singolo
può omettere l'ingrediente o se deve preparare una Ricetta
alternativa..., penso ai Celiaci
che spesso sono tra i pazienti più critici da gestire...!
Ecc....!
Secondo me sarebbe buona cosa che l'autore del 3D valutasse bene la
cosa prima
di buttarcisi.
L'ingegnerizzazione del processo richiede ottime conoscenze, ma è pur
vero che
rappresenta sempre una buona scuola.
@ALex

Alessandro Baraldi ha scritto:

Innanzi tutto grazie per l'attenzione.
Brevemente vi dico che:
1. la gestione di questo db non è destinata a crescere. In realtà si
tratterebbe solo di una migrazione verso una nuova procedura che
dovrebbe gestire queste diete, e che ora, invece, non lo sono: si
tratterebbe, insomma, di popolare un pezzo di un db
2. ogni dieta speciale è un pasto "ad hoc" per ogni singolo utente
interessato: dovrebbe esserci un cuoco addetto a preparare questi
diversi 40 pasti
3. detto ciò e recependo i vostri consigli e le vostre osservazioni,
credo proprio che non mi ci butterò, ma vedrò di ottimizzare in
qualche maniera i doc di word che contengono le informazioni
4. non mi ci butterò ma proverò per i fatti miei a seguire il
consiglio di @Alex rispetto alla buona scuola di ingegnerizzazione del
processo.
Grazie ancora e buona giornata.
chippo
Newsgroup: it.comp.appl.access
Titolo: Stampa variabili su report

Vorrei sapere se è possibile stampare il valore di una variabile su un
report senza usare un parametro in una query. Se si come si fa?
Ho provato con un report denominato ddt, e l'origine del Report una query
con un parametro Intestazione.
All'evento clic di un pulsante  è associata l'apertura del report, di
conseguenza mi viene chiesto il valore del campo Intestazione, inserendolo a
mano tutto ok.
Ma io questo valore c'è lo ho memorizzato in una variabile, come faccio a
passarci il valore?
Grazie.


Su caricamento del report:
Me!Intestazione=Variabile
dove Intestazione e' un controllo non associato
Ciao. ElioP.

Newsgroup: it.comp.appl.access
Titolo: avviare una function prendendo il nome da tabella

ho una tabella aggiornamenti dove tra i vari campi ho un campo nel quale scrivo il nome di una
function da eseguire.
è possibile fare che premendo un pulsante venga eseguita questa function contenuta nel campo?
mi serve questo tipo di gestione perchè non voglio creare una maschera con tanti pulsanti per ogni
aggiornamento, visto che con questo metodo (almeno in teoria) restano attivi solo i record che non
sono stati ancora eseguiti.
spero di essere stato chiaro.
grazie
Ciao
Nick

"Nick" <senz...@chiedetesul.NG> wrote in message
news:SOcdc.117820$
FJ6.4...@twister1.libero.it

Usa EVAL("NomeFunzione()")
Ciao.
@Alex.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.appl.access
Titolo: Gestione Errori

Salve a tutti. Volevo sapere se è possibile usare una routine generica per
la gestione degli errori senza dover specificare in ogni routine di ogni
modulo "On Error goto Gestione_Errore ecc, ecc..." visto che per la
maggiorparte di queste uso un semplice "On Error Resume Next"?
Spero di essermi spiegato
Grazie

 ha scritto nel messaggio
news:uDtN7.202723$sq5.9...@news.infostrada.it...

Secondo l'help: "Gestione degli errori di run-time"
'-------------
Quando si verifica un errore in una routine nidificata per la quale non è
stato abilitato un gestore degli errori, invece di interrompere
l'esecuzione, Visual Basic ricerca nell'elenco delle chiamate precedenti per
verificare se in un'altra routine è presente un gestore degli errori
abilitato. In questo modo, il codice ha la possibilità di correggere
l'errore all'interno di un'altra routine. Si supponga, ad esempio, che la
Routine A chiami la Routine B e che questa a sua volta chiami la Routine C.
Se si verifica un errore nella Routine C e non è presente alcun gestore
degli errori abilitato, Visual Basic ricerca un gestore degli errori
abilitato prima nella Routine A e poi nella Routine B. Se il risultato della
ricerca è positivo, l'esecuzione passa al gestore degli errori trovato,
altrimenti l'esecuzione si interrompe e viene visualizzato un messaggio di
errore.
'-------------
Alla luce di tutto ciò, potresti scrivere una sola routine con On Error Goto
e li verificare gli errori restituiti. Quindi devi togliere in tutte le
altre sub o function gli On Error Resume.
Altrimenti potresti scriverti una funzione che analizza l'errore ricevuto ma
in ogni routine dovresti includere l'On Error Goto:
Es.
'----------
Sub boh!()
On Error Goto boh!_err
codice
codice
codice
boh!_exit:
    Exit Sub
boh!_err:
    valoreBooleano = controllaErrore(Err.Number)
End Sub
Function controllaErrore(numeroErrore As Integer) as Boolean
    Select Case numeroErrore
        Case 1
        Case 2
        etc.
        etc.
        Case Else
    End Select
    controllaErrore = True
End Function
'----------
Non ho mai provato nessuna delle soluzioni che ti ho proposto, anche perché
preferisco i messaggi d'errore di access e il blocco della routine nel punto
di errore così da poter intervenire meglio.
Ciao.
--
- - - - - - - - - - - - - - -
Sergio MAZZA
- - - - - - - - - - - - - - -
Newsgroup: it.comp.appl.access
Titolo: Conteggio in sottomaschera

In una maschera l'utente inserisce il numero massimo di record raggiungibili e nella sottomaschera inserisce N nominativi. Nel piè di pagina della sottomaschera calcolo il conteggio di nome.
 
Sull'evento PrimaDiAggiornare della sottomaschera.NOME faccio controllare che non ne vengano inseriti in più ... altrimenti messaggino e Undo.
 
Essendo prima di aggiornare il confronto tra il numero inserito nella maschera e il conteggio devo farlo con -1 cioè:
 
if conteggio > NumeroMax -1 ... messaggino
 
e funziona! 
... ma mi sono accorto che il messaggino mi parte anche quando provo solo a modificare un nominativo ed i record corrispondono già al NumeroMax.
 
Dove sbaglio?

Zut ha scritto:

Prima controlla se ti trovi in un nuovo record:
 
If Me.NewRecord Then
    if conteggio > NumeroMax -1 ... messaggino
 
-- 
Ciao
Karl
*********
http://www.AccessDevCon.com
 
Access FAQ: 
http://www.donkarl.com/it
Newsgroup: it.comp.appl.access
Titolo: ComboBox

Salve a tutti,
Ho 3 combobox in una msk, che hanno come origine riga una query.
Premetto che il tutto funziona correttamente, il problema
e che nella lista, le combo  visualizzano tutti i valori della colonna
assocciata quindi anche lo stesso valore più volte.
Vorrei che mi visualizzare i valori in modo univoco.
Nella select ho aggiunto DISTINCT ma non va lo stesso.
Allego l'sql della query:
SELECT Proprieta.IDProprieta, Proprieta.CodiceDitta,
Proprieta.ComuneCensuario, Proprieta.Foglio, Proprieta.Allegato,
Proprieta.Mappale, Proprieta.Subal
FROM Proprieta
WHERE (((Proprieta.ComuneCensuario) Like
nz([forms]![cercafoglio]![casellacombinata0],"*")) AND ((Proprieta.Foglio)
Like nz([forms]![cercafoglio]![casellacombinata2],"*")) AND
((Proprieta.Mappale) Like
nz([forms]![cercafoglio]![casellacombinata4],"*")))
ORDER BY Proprieta.ComuneCensuario, Proprieta.Foglio, Proprieta.Mappale;
Come posso ovviare a questo inconveniente?
--
Debora
P.S. Vi sono mancata? Credo proprio di no! ;-PPP

 P.S. Vi sono mancata? Credo proprio di no! ;-PPP
____________________
Vediamo se ho capito bene:
hai 3 caselle combinate (0, 2 e 4) e dopo che hai selezionato dei valori
vuoi che la maschera ti faccia visualizzare solo
i record filtrati?
Se č cosě, dopo che selezioni i valori nelle caselle combinate, devi fare
una Requery del Form.
ciao Riccardo

 ha scritto nel messaggio
news:ambt88$3lq$1...@localhost.localdomain...

Ciao Riccardo
no, quello č ok, quando vado a selezionare un valore
dalle combo, mi propone una lista di valori,
questa lista vorrei che fosse formata da valori univoci
non ripetuti. Ad esempio.
Adesso mi propone una lista di questo tipo:
Milano
Milano
Milano
Roma
Roma
Vorrei che la lista invece fosse:
Milano
Roma.
Capito?
Grazie in anticipo
--
Debora
Milano

 P.S. Vi sono mancata? Credo proprio di no! ;-PPP
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 Milano
Rifacendomi alla mia risposta delle ore 9:30 prova con questa query:
SELECT DISTINCT Proprieta.ComuneCensuario
FROM Proprieta
WHERE (((Proprieta.ComuneCensuario) Like
nz([forms]![cercafoglio]![casellacombinata0],"*")) AND ((Proprieta.Foglio)
Like nz([forms]![cercafoglio]![casellacombinata2],"*")) AND
((Proprieta.Mappale) Like
nz([forms]![cercafoglio]![casellacombinata4],"*")))
ORDER BY Proprieta.ComuneCensuario;
Naturalmente se usi questa query la combo deve avere una sola colonna.


 Roberto
Ho risolto facendo 3 questi,una per ogni combo
perchč in base alla selezione la prima combo mi filtra i
dati per la seconda, e cosě per la terza.
Non č una soluzione molto elegante, perň...in mancanza di altro.
Grazie cmq.
--
Debora
Newsgroup: it.comp.appl.access
Titolo: password base dati

Salve a tutti, ho un database diviso in due parti:
1 con tutte le tabelle
1 con maschere e query
ho inserito una password nella base dati, tramite il men� imposta password 
di access, ma non so come fare per aprire le maschere...mi viene chiesta la 
password e non so dove inserirla via codice.
Vorrei infine trasformare il database con le maschere in mde...
grazie
 

lory22 ha scritto:



Riallega le tabelle..
Vedi SitoComune sezione Tabelle, la FAQ 1.16
--
sv
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 -- 
ho gi� un codice che riallega le tabelle: dovrei aggiungere la pass ma non 
so come fare: cos� non mi viene riconosciuta
Set db = CurrentDb()
strDaten = Left(
db.name
, Len(
db.name
) - Len(Dir(
db.name
))) & "\" & "DATI" & 
"\" & "LogosGesti&ParoleDATI.mdb;lory309"
For i = 0 To db.TableDefs.Count - 1
  If db.TableDefs(i).Connect <> "" Then
    If Mid(db.TableDefs(i).Connect, 11) <> strDaten Then
      db.TableDefs(i).Connect = "; database=" & strDaten
      db.TableDefs(i).RefreshLink 

lory22 ha scritto:



Aggiungi
.
.
  db.TableDefs(i).Connect = "; database=" & strDaten & ";PWD=TUAPASSWORD"
.
.

Newsgroup: it.comp.appl.access
Titolo: cambiare nome dei campi in tabella collegata

Salve a tutti,
vorrei "sfruttare" se possibile, ancora le vostre conoscenze....
per necessit�, mi capita di dover aggiungere/cambiare dei campi in file txt 
collegato al mio data base...
siccome � un file con campi a larghezza fissa, ogni volta devo, con la 
procedura di collega tabelle, definire e rinominare i vari campi....
tentando di entrare in "struttura tabella" mi viene risposto "impossibile 
modificare le propriet� della tabella collegata"
Vi chiedo:  esiste un modo per farlo?
Grazie anticipatamente.
GS 

 modificare le propriet della tabella collegata"
Ciao!
Una cosa di questo tipo?
dim dbEsterno as DAO.Database
dim tbDaModificare as Tabledef
set dbesterno = opendatabase(NomeDelDbDaCuiColleghiLaTabella)
set tbdamodificare=dbesterno.tabledefs(NomeTabellaDaModificare)
tbdamodificare.fields(Vecchionome).name=NuovoNome
ecc. ecc.
Popi

 ha scritto nel messaggio 
news:0c4d0944-7b97-4c89...@o28g2000yqh.googlegroups.com...

Ciao Popi e grazie per la risposta....
un chiarimento...
il file che collego nel mio DB (DB_FATTURE.MDB) non � una tabella di una 
altro DB ma un files txt a larghezza fissa (fatture.txt) ...
mi chiariresti  la sisntassi?
grazie 1000
GS
 

 ha scritto nel messaggio 
news:0c4d0944-7b97-4c89...@o28g2000yqh.googlegroups.com...

ri ciao Popi....
approfondendo  sono riuscito ad eseguire quello che mi hai detto...
ma all'esecuzione della riga 
"tbdamodificare.fields(Vecchionome).name=NuovoNome" mi esce questo errore:
errore di run-time 3057 : operazione non supportata su tabelle collegate"
grazie cmq
Ciao
GS
 

 ha scritto nel messaggionews:0c4d0944-7b97-4c89...@o28g2000yqh.googlegroups.com...

Alt!
Se hai collegato il file txt spuntando "Nomi campi nella prima riga",
allora dovrai editare il file txt stesso (a tabella chiusa!) e, alla
prima apertura successiva della tabella vedrai i nomi cambiati.
HTH
Popi

 ha scritto nel messaggio 
news:69911a4c-99f4-4d35...@f34g2000yqc.googlegroups.com...

Ciao Popi,
purtroppo il file TXT non ha campi di testa....
i campi sono creati al momento del collegamento tabella.
grazie cmq.
Ciao
GS
Newsgroup: it.comp.appl.access
Titolo: Come ottenere nel codice l'effetto mostra in struttura query

Salve sono Fanciullo,
access97
Nella griglia costruzione delle query si può
attraverso la casellina mostra  nascondere un campo e
viceversa.
Ma ho notato che il codice SQL non cambia perché
credo che sia una peculiarità di access nascondere o visualizzare
le colonne di una query.
Si può ottenere lo stesso effetto nel codice???
Case Is = 9
            Dim qdf9 As QueryDef
            Set qdf9 = CurrentDb().QueryDefs("qryDINAMICA")
            qdf9.SQL = "SELECT idalunno, Cognome, Nome,  NOMECLASSE,
            bocciato FROM qryISCRIZIONI
             WHERE nomeclasse Like ""5*"" and bocciato is null order by 
nomeclasse ;"
            DoCmd.OpenQuery "qryDINAMICA"
io non vorrei vedere visualizzate il campo bocciato ma mi serve
per filtrare.
E' possibile?
grazie 

 ha scritto nel messaggio 
news:49057733$0$1076$4faf...@reader2.news.tin.it...

Non hai bisogno di nascondere la colonna, è sufficiente non dichiararla 
nella select:
qdf9.SQL = "SELECT idalunno, Cognome, Nome,  NOMECLASSE FROM qryISCRIZIONI
WHERE nomeclasse Like ""5*"" and bocciato is null order by
 nomeclasse ;"
Ciao, Carlo


Questo è ancora un altro problema, diverso dal primo.
Per il primo quesito usa le istruzioni che ti ho postato per non mostrare il 
campo che ti interessa.
Per questo problema devi prima di tutto vedere se ci sono parametri che non 
hai passato, poi controlla se usi nomi che sono parole riservate per Acces 
come Nome che è meglio racchiudere tra parentesi quadre ([]) o dargli un 
alias.
Se la qryISCRIZIONI ha un parametro lo puoi sapere solo tu. In genere è 
preferibile passare il parametro usando una funzione pubblica che 
restituisce lo stesso tipo di dati.
Così se la query richiede l'ID Alunno che si trova nella maschera 
FormAlunni, nel parametro potresti scrivere Like DimmiAlunno()
dove DimmiAlunno() è una funzione pubblica che recita più o meno così:
Public Function DimmiAlunno()as Long ' se ha bisogno di un numero
DimmiAlunno = Forms!FormAlunni!IDAlunno
End Function
Ciao, Carlo
Newsgroup: it.comp.appl.access
Titolo: due funzioni simili, ma la prima non funziona, perchè?

ciao a tutti
 
non riesco a capire perchè la prima funzione non funziona
sebbene simile alla seconda
 
grazie.
 
Public Function fctImpPredTrasp1(CboFornitoreV As Variant, _
                                CboTrasportatoreV As Variant)
 
' da richiamare con: Call fctImpPredTrasp(Percorso)
 
  Dim Rst As DAO.Recordset
  Dim strSql As String
 
  strSql = "SELECT * FROM TbImpostazioni" _
    & " WHERE IdCliente1 =" & cliCriterio() _
    & " And IdFornitore =" & CboFornitoreV
  Set Rst = CurrentDb().OpenRecordset(strSql)
 
  If Not Rst.EOF Then
    CboTrasportatoreV = Rst!IdTrasportatore
 
  End If
 
  Set Rst = Nothing
 
End Function
_____________________________
 
Public Function fctImpPredTrasp2(myForm)
 
' da richiamare con: Call fctImpPredTrasp2(Me) oppure fctImpPredTrasp2(Percorso Forms)
 
  Dim Rst As DAO.Recordset
  Dim strSql As String
 
  strSql = "SELECT * FROM TbImpostazioni" _
    & " WHERE IdCliente1 =" & cliCriterio() _
    & " And IdFornitore =" & myForm!CboFornitore.Value
  Set Rst = CurrentDb().OpenRecordset(strSql)
 
  If Not Rst.EOF Then
    myForm!CboTrasportatore.Value = Rst!IdTrasportatore
 
  End If
 
  Set Rst = Nothing
 
End Function

Così come sono non hanno senso siano Function ma SUB.
 
Come le chiami..? Mostra la sintassi.
 
@ALEX


ciao Alex
 
dovtrbbero essere function perche' devono restituire un valore
 
le richiamo cosi
in dopo aggiornamento della casella combinata CboFornitore,
mi deve restituire il valore (Id) nella CboTrasportatore
 
1-Call fctImpPredTrasp1(CboFornitore.Value, CboTrasportatore.Value)
non ho errore ma non restituisce l IdTrasportatore
 
2-Call fctImpPredTrasp2(Me) oppure fctImpPredTrasp2(Percorso Forms)
mentre questa funziona
 
Ora vorrei capire perchè la prima non funziona sebbene sia simile
alla seconda
 
grazie


funziona modificandola cosi
Public Function fctImpPredTrasp1(CboFornitoreV As Variant)
 
percorso!CboTrasportatore.Value = Rst!IdTrasportatore
 
 


Ciao Franco, quello che Alex ti vuole dire è che travisi l'utilizzo della Function
 
Public Function fctImpPredTrasp1(CboFornitoreV As Variant) as Variant
 
ora si che Pippo restituisce un valore, per la precisione un Variant. 
Tu la usi per impostare un valore nella form. Non restituisce nulla. Imposta. Quindi è una sub


grazie Fair87
 
allora anche
Public Function fctImpPredTrasp2(myForm) 
è una sub


Infatti non hai minimamente idea di quando si usa Function o Sub, e tu usi MALISSIMO le Function passando una serie inutile di Parametri al fine di valorizzarli quando usandole come Function(che restituiscono Valori) potresti scriverle in modo meno vincolato ad oggetti... che già è un motivo per non usare Funzioni Public se poi hanno riferimenti a Form!Control fissi..!!!
 
Franco ormai ti ho detto queste cose troppe volte... vedi un po tu, sei sempre libero di fare come credi...
 
@Alex


grazie Alex
Newsgroup: it.comp.appl.access
Titolo: [AIUTO!!] Ricerca per data

Ho creato una maschera dove inserisco nome utente, data inserimento e
altri parametri vorrei mettere una finestra pop up che mi indichi quali
inserimenti sono stati fatti a quella data. Ho fatto una query per
estrapolare i dati, ma quando invio la data non mi tira fuori i dati
corretti sulla tabella i recordo sono registrati con data e ora mentre
il parametro inviato ha solo data. Non so:
1) come registrare nella tabella solo la data
2) il parametro inviato deve avere questo formato #DD/MM/YYYY#
Grazie per l'aiuto

Nella query supponiamo che il tuo campo data si chiama data metti nella voce del campo questo:
Nuovadata: day(data) & "/" & month(data) & "/" & year(data)
Esegui la query e troverai le stesse date ma con questo formato:
 1/1/2006 per il primo gennaio 2006 (invece di 01/01/2006)
Quindi nella tua maschera in un campo testo la data che ti interessa filtrare dovrà avere quel formato.
Sicuramente ci sono altri metodi ma nn li conosco e questo funziona. Ciao.
-- 
alex78red 
------------------------------------------------------------------------
View this thread: 
http://www.itsistemi.net/viewtopic-785447.html
Inviato via 
http://www.itsistemi.net

 ha scritto nel messaggio 
news:1141223655.4...@t39g2000cwt.googlegroups.com...

Innanzitutto evita l'utilizzo di termini tipo: Aiutoo, Heeeelp, Oddio sono 
nei guai! e simili perché non è d'uso in questo NG (vedi 
www.sitocomune.com
 
Sezione ICAA). Si predilige un oggetto descrittivo del problema.
Se non ti serve l'ora modifica il formato del campo, indicando una tipologia 
senza le ore; poi sarebbe interessante capire che significa "...quando invio 
la data non mi..."...
Ciao.
-- 
Sergio MAZZA

Newsgroup: it.comp.appl.access
Titolo: Access 2007: campo allegato

Ciao a tutti,
ho inserito un campo allegato in una tabella. Come faccio a visualizzare 
l'intero percorso dove il file viene salvato? Utilizzando .FileName ho il 
nome ma non so come recuperare il percorso ... o meglio lo salva da qualche 
parte?
Grazie mille
Tk 

 ha scritto nel messaggio 
news:fevjrk$6k1$1...@nnrp.ngi.it...

Ciao Tashunka,
l'allegato viene salvato in tabelle di sitema, non viene salvato sul 
filesystem per cui non hai da nessuna parte un percorso.
Puoi trovare un po' di esempi qui: 
http://blogs.msdn.com/access/archive/tags/Multi-Value/default.aspx
-- 
Cinzia [Office Access MVP]
_______________________
 
www.riolab.org
----------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Cancellazione record

Ho un problema di cancellazione di record relativamente ad una Tabella
formata da 2 campi "IDArea" e "Area".
Su una maschera ho il campo relativo all'area da far comparire per modifiche
o l'inserimento del record poi c'è il pulsante per aggiungere i record , un
elenco dove compaiono i record inseriti e dove viene scelto il record da
eliminare o modificare e un pulsante con "elimina record" fatto in
automatico da Access.
Il problema è che una volta selezionato il record da eliminare e compare nel
campo area premo il pulsante "elimina record" questo elimina a casaccio
nonostante che ci sia il campo IDArea con chiave primaria.
Dove è che sbaglio?
Grazie Valter

 ha scritto nel messaggio
news:EGHed.192339$35.91...@news4.tin.it...

Sicuro che il pulsante elimini il record selezionato nell'elenco e non il
record corrente?
Com'è il codice associato al pulsante? E l'origine dati dell'elenco?
Namor

 ha scritto nel messaggio
news:zOQed.55910$N45.1...@twister2.libero.it...

Questo è il comando sul clic del pulsante:
Private Sub Comando18_Click()
On Error GoTo Err_Comando18_Click
    DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
Exit_Comando18_Click:
    Exit Sub
Err_Comando18_Click:
    MsgBox Err.Description
    Resume Exit_Comando18_Click
End Sub
Questo è il comando della query in "origine riga"
SELECT T_AREA.IDArea, T_AREA.AREA
FROM T_AREA
ORDER BY T_AREA.AREA;
Graie Valter

vf ha scritto:



Quel codice seleziona ed elimina il record corrente, quello su cui c'è il
cursore. Per eliminare il record selezionato nell'elenco puoi usare una
query così:
  currentdb.execute "DELETE FROM T_AREA WHERE IDArea=" & me.elenco
dove 'elenco' è il nome del controllo che contiene l'elenco dei record e
supposto che la colonna associata sia la 1, quella che contiene il codice
IDArea e che elimini un solo record alla volta.
Se vuoi abilitare la selezione multipla per poter eliminare più di un
record devi fare un ciclo che scorra le righe dell'elenco e crei un
criterio del tipo "WHERE IDArea In (4, 9, 16, 124, 345)", da usare nella
query di eliminazione.
Namor
-- 
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
Newsgroup: it.comp.appl.access
Titolo: Oggetto wordpad o anche Word

Ciao a tutti, in un applicazione creata in access, avrei la necessità
di un piccolo riquadro dove inserire alcuni appunti che possano essere
formattati e essere ribaltati tali e quali in un piè di pagina di un
report.
Per far questo avevo pensato ad inserire un oggetto Wordpad o Word per
inserire il testo e formattarlo, ma dopo alcuni tentativi mi sono
dovouto arrendere, non sono riuscito ad agganciargli decentemente
nessuna fonte di dati.
Sapete dirmi come si gestiscono questi oggetti? E se cmq fanno al caso
mio?
Grazie

 ha scritto nel messaggio 
news:6b5cad73-3e54-4149...@j4g2000yqe.googlegroups.com...
Ciao a tutti, in un applicazione creata in access, avrei la necessit�
di un piccolo riquadro dove inserire alcuni appunti che possano essere
formattati e essere ribaltati tali e quali in un pi� di pagina di un
report.
Per far questo avevo pensato ad inserire un oggetto Wordpad o Word per
inserire il testo e formattarlo, ma dopo alcuni tentativi mi sono
dovouto arrendere, non sono riuscito ad agganciargli decentemente
nessuna fonte di dati.
Sapete dirmi come si gestiscono questi oggetti? E se cmq fanno al caso
mio?
Grazie
---------  RISPOSTA  -----------
Se utilizzi Access 2007 credo che ti convenga usare un campo memo, dato che 
in questa release � possibile formattare un controllo textbox e salvarlo in 
un campo di questo tipo. Non ho mai provato, ma suppongo che la 
formattazione venga rispettata anche nel report.
Ciao
Antonio

 Antonio
oppure provare ad utilizzare il controllo richtext di lebans ...
www.lebans.com