title: Passare da maschera a report.

text:
Ti ringrazio della risposta e ho guardato la FAQ che mi hai suggerito, però
lo scopo che mi prefiggo è quello tentare di trasformare (senza mettere mano
al codice) un filtro applicato ad una maschera, utilizzando solo gli
strumenti wizard dell'utente, in un report preparato prima.
Cioè stampare tutti i record risultanti dal filtro applicato sulla maschera.
In una maschera filtrata posso anche utilizzare decine di campi per creare
un filtro, come posso passare la query creata direttamente al report. Mica
posso fare una query parametrica con tutti i campi della tabella ed
associarla al report.
So che mettendo mano al codice in qualche modo si fà, ma io devo utilizzare
soltanto gli strumenti a disposizione dell'utonto finale.
Ciao
Paolo
"cidi" <
dadonz...@tin.it
> ha scritto nel messaggio
news:451065e2$0$47965$4faf...@reader3.news.tin.it...



title: Passare da maschera a report.

author: Peek

text:
Allora mi rispondo da solo :) visto che non trovato niente neppure in rete.
Bisogna fare un pulsante per aprire il report.
Dopo aver richiamato 'Filtro su maschera' ed aver applicato il filtro,
nell'evento 'Su apertura' del report prendere la proprietà Filter della
maschera e passarla alla proprietà Filter del report. Ricordandosi anche di
azzerare la Me.Filter della maschera che non viene fatto dal pulsante utente
'Rimuovi Filtro'.
Insomma una cosa improponibile per chi non è un programmatore.
Possibile che non si possa fare in maniera 'wizard'??
Saluti.
Paolo
"Peek" <
lemor...@lycos.it
> ha scritto nel messaggio
news:451133fe$0$1000$5fc...@news.tiscali.it...



title: Visualizzazione campo memo

author: Grasso

text:
Salve a tutti,
S.O. WXPP Access 2000.
in una maschera ho un campo memo, chiaramente le dimensioni del campo
non permettono di visualizzare tutto il testo contenuto, devo
utilizzare le barre di scorrimento verticali. E' possibile fare in
modo che posizionandomi con il cursore mi dà l'anteprima del testo?
(Tipo i campi memo di Excel).
Grazie a chi mi vuole aiutare.


title: Visualizzazione campo memo

author: Sergio MAZZA

text:
"Grasso" <
gra...@studiogamma-ct.it
> ha scritto nel messaggio
news:88c51f85.05031...@posting.google.com...

Dovresti crearti una form "frmZoom" con una casella di testo "viewNote" e
gestendo l'evento "su invio" la apri inviandogli come parametro OpenArgs il
testo da visualizzare:
es.
DoCmd.OpenForm "frmZoom",,,,,,me!note
Nell'evento "su apertura" della form inserisci il codice che legge i dati e
li assegna alla casella di testo "viewNote":
es.
if not isnull(me.openargs) then
    me!viewNote = me.openargs
endif
Ciao.
--
Sergio MAZZA


title: Un problema di alunni e assenze alle lezioni

author: Giuseppe

text:
Ebbene sì, siamo a scuola!
Ho una tab. Lezioni:
ID_Lezione
Data_Lezione
e una tab. Assenze:
ID_Lezione
ID_Alunno
oltre alla tab Alunni s'intende
ID_Alunno
Cognome
Nome
Vorrei, in corrispondenza di ogni lezione, presentare per il data-entry,
affiancata all'elenco delle lezioni, una lista di tutti gli alunni con una
casella di tipo sì/no in cui annotare se l'alunno è assente con un click del
mouse.
Attualmente mi sono organizzato con maschera e sottomaschera e la cosa
funziona. Solo che logicamente ad ogni lezione mi tocca aggiungere dei
record della parte assenze e la cosa è un po' scomoda.
Insomma, per ogni lezione io dovrei presentare tutte le righe relative agli
alunni, (prodotto cartesiano della lezione con la tab alunni), ma salvare
solo le righe in cui compare spuntata l'assenza.
Qual'è il modo più semplice per farlo?
--
----------------
saluti
Giuseppe


author: Roberto da casa

text:
"Giuseppe" <
gcondoLev...@libero.it
> ha scritto nel messaggio
news:budg0g$ga3tg$1...@ID-213020.news.uni-berlin.de...
> Ebbene sì, siamo a scuola!
Bei tempi!! :))

Ti sottopongo una soluzione che però, aziché darti l'elenco di tutti gli
alunni in una sottomaschera, te lo dà in una casella di riepilogo; in questa
casella di riepilogo ti compariranno tutti gli alunni in ordine alfabetico e
per gli alunni assenti (ovvero per coloro che per quella lezione hanno un
record nella tabella Assenze) comparirà a fianco al nome la scritta
"Assente".
Facendo clic con il mouse su un nominativo presente (ovvero che NON ha la
scritta "Assente") questo diventerà assente (ovvero verrà registrato nella
tabella Assenze un record per quell'alunno e per quella lezione); se, al
contrario, farai clic su un nomonativo assente (ovvero che ha la scritta
"Assente") questo diventerà presente (ovvero verrà cancellato nella tabella
Assenze il record di quell'alunno per quella lezione).
Se per te questa soluzione va bene fai quanto segue:
1) creati una query chiamata Query1 che abbia il seguente codice SQL:
SELECT Pippo.ID_Lezione, Pippo.Data_Lezione, Pippo.ID_Alunno, Pippo.Cognome,
Pippo.Nome, IIf(IsNull([Assenze].[ID_Lezione]),Null,"Assente") AS Assente
FROM [SELECT Lezioni.ID_Lezione, Lezioni.Data_Lezione, Alunni.ID_Alunno,
Alunni.Cognome, Alunni.Nome
FROM Alunni, Lezioni
ORDER BY Lezioni.Data_Lezione, Alunni.Cognome, Alunni.Nome;]. AS Pippo LEFT
JOIN Assenze ON (Pippo.ID_Lezione = Assenze.ID_Lezione) AND (Pippo.ID_Alunno
= Assenze.ID_Alunno)
WHERE (((Pippo.ID_Lezione)=[Forms]![Maschera1]![ID_Lezione]))
ORDER BY Pippo.Data_Lezione, Pippo.Cognome, Pippo.Nome;
2) Creati una maschera chiamata Maschera1 che abbia come origine record la
tabella Lezioni. In questa maschera inserisci anche una casella di riepilogo
non associata chiamata ElencoAlunni; detta casella di riepilogo deve avere 5
colonne di cui visibili solo le ultime tre; come origine riga della casella
di riepilogo usa il seguente codice SQL:
SELECT DISTINCTROW [ID_Lezione], [ID_Alunno], [Cognome], [Nome], [Assente]
FROM [Query1];
A fronte dell'evento "Su corrente" di Maschera1 genera il seguente codice
VBA;
Private Sub Form_Current()
Me!ElencoAlunni.Requery
End Sub
Al fine di generare l'elenco degli alunni anche dopo l'inserimento di un
nuovo record lezione, a fronte dell'evento "Dopo aggiornamento" della
casella di testo Data_Lezione, associata al campo Data_Lezione della tabella
Lezioni, genera il seguente codice VBA:
Private Sub Data_Lezione_AfterUpdate()
DoCmd.RunCommand acCmdSaveRecord
Me!ElencoAlunni.Requery
End Sub
Infine, a fronte dell'evento "Su clic" della casella di riepilogo genera il
seguente codice VBA:
Private Sub ElencoAlunni_Click()
Dim DepLez As Long
Dim DepAlu As Long
DepLez = Me!ElencoAlunni.Column(0)
DepAlu = Me!ElencoAlunni.Column(1)
DoCmd.SetWarnings False
If Me!ElencoAlunni.Column(4) = _
    "Assente" Then
    DoCmd.RunSQL "DELETE * FROM " & _
    "Assenze WHERE ID_Lezione =" & _
    DepLez & " And ID_Alunno =" & _
    DepAlu & ";"
Else
    DoCmd.RunSQL "INSERT INTO Assenze " & _
    "( ID_Lezione, ID_Alunno ) SELECT " _
    & DepLez & ", " & DepAlu & ";"
End If
DoCmd.SetWarnings True
Me!ElencoAlunni.Requery
End Sub
Dovrebbe funzionare.
Se non vuoi modificare in alcun modo i codice SQL che ti ho consigliato, è
necessario che la query si chiami Query1 e la maschera si chiami Maschera1,
in caso contarrio cambia tali nomi all'interno dei codice SQL di cui sopra.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
Ciao Roberto,
come al solito gentilissimo.
Mi hai dato un bel suggerimento, che mi ha dato molto da riflettere.
> 1) creati una query chiamata Query1 che abbia il seguente codice SQL:
>
> SELECT Pippo.ID_Lezione, Pippo.Data_Lezione, Pippo.ID_Alunno,
Pippo.Cognome,
> Pippo.Nome, IIf(IsNull([Assenze].[ID_Lezione]),Null,"Assente") AS Assente
> FROM [SELECT Lezioni.ID_Lezione, Lezioni.Data_Lezione, Alunni.ID_Alunno,
> Alunni.Cognome, Alunni.Nome
> FROM Alunni, Lezioni
> ORDER BY Lezioni.Data_Lezione, Alunni.Cognome, Alunni.Nome;]. AS Pippo
LEFT
> JOIN Assenze ON (Pippo.ID_Lezione = Assenze.ID_Lezione) AND
(Pippo.ID_Alunno
> = Assenze.ID_Alunno)
> WHERE (((Pippo.ID_Lezione)=[Forms]![Maschera1]![ID_Lezione]))
> ORDER BY Pippo.Data_Lezione, Pippo.Cognome, Pippo.Nome;
Questa mi ha dato abbastanza filo da torcere!
Pensa che per capire come funziona mi sono dovuto costruire la query in
modalità struttura e lo strano della cosa è stato che access 2002 pur
facendola girare non ha voluto che saperne di salvarla.
Cmq siccome mi è abbastanza ostica da comprendere l'ho sostituita da una
cascata di due query:
la prima fa un prodotto cartesiano tra lezioni e alunni, così ottengo una
combinazione delle lezioni con tutti gli alunni.
SELECT Alunni.ID_Alunno, Alunni.Cognome, Alunni.Nome, Lezioni.ID_Lezione,
Lezioni.Data_Lezione
FROM Alunni, Lezioni;
successivamente faccio un join esterno sin tra quest'ultima query e la tab
Assenze inserendo un campo come hai fatto tu con valore "Assente" per
ID_Lezione non Null. in questo modo si ottiene una tabella che contiene
tutte le combinazioni Lezioni-Alunni abbinate con le Assenze
SELECT AxL.ID_Lezione, AxL.Data_Lezione, AxL.ID_Alunno, AxL.Cognome,
AxL.Nome, IIf(IsNull(Assenze.ID_Lezione),Null,"Assente") AS Assenza
FROM AxL LEFT JOIN Assenze ON (AxL.ID_Alunno = Assenze.ID_Alunno) AND
(AxL.ID_Lezione = Assenze.ID_Lezione);
La tua soluzione brillante mi appare dura da digerire!
Adesso senti, qundo spengo o accendo Assente su un Alunno la riga
selezionate appare senpre la prima della casella di riepilogo. occorre
memorizzare la posizione corrente della riga manipolata per poi rendere
questa attiva dopo il requery. A parole è facile ma c'è un metodo per
memorizzare. ho usato una var long per memorizzare la proprietà:
memRiga = Me.ElencoAlunni.ListIndex
e poi per ripristinare selezione sulla stessa riga ho usato:
Me.ElencoAlunni.Selected(memRiga) = True
Ma accadono stranezze: il pulsante di chiusura maschera nn chiude più e
chiudendo la fin dal pulsante di chiusura e come se partisse un clic sulla
selezione invertendone lo stato.
che sarà mai?


text:
"Giuseppe" <
gcondoLev...@libero.it
> ha scritto nel messaggio
news:buimm8$iegrh$2...@ID-213020.news.uni-berlin.de...
> Ciao Roberto,
> come al solito gentilissimo.
> Mi hai dato un bel suggerimento, che mi ha dato molto da riflettere.
>
> > 1) creati una query chiamata Query1 che abbia il seguente codice SQL:
> >
> > SELECT Pippo.ID_Lezione, Pippo.Data_Lezione, Pippo.ID_Alunno,
> Pippo.Cognome,
> > Pippo.Nome, IIf(IsNull([Assenze].[ID_Lezione]),Null,"Assente") AS
Assente
> > FROM [SELECT Lezioni.ID_Lezione, Lezioni.Data_Lezione, Alunni.ID_Alunno,
> > Alunni.Cognome, Alunni.Nome
> > FROM Alunni, Lezioni
> > ORDER BY Lezioni.Data_Lezione, Alunni.Cognome, Alunni.Nome;]. AS Pippo
> LEFT
> > JOIN Assenze ON (Pippo.ID_Lezione = Assenze.ID_Lezione) AND
> (Pippo.ID_Alunno
> > = Assenze.ID_Alunno)
> > WHERE (((Pippo.ID_Lezione)=[Forms]![Maschera1]![ID_Lezione]))
> > ORDER BY Pippo.Data_Lezione, Pippo.Cognome, Pippo.Nome;
>
> Questa mi ha dato abbastanza filo da torcere!
> Pensa che per capire come funziona mi sono dovuto costruire la query in
> modalità struttura e lo strano della cosa è stato che access 2002 pur
> facendola girare non ha voluto che saperne di salvarla.
Non capisco cosa tu voglia dire.
Io in Access97 sono riusito a copiarla, salvarla ed eventualmente a
visionare la sua griglia di struttura; non avendo Access 2002 non posso
ricostruire la situazione in cui tu operi.
> Cmq siccome mi è abbastanza ostica da comprendere l'ho sostituita da una
> cascata di due query:
> la prima fa un prodotto cartesiano tra lezioni e alunni, così ottengo una
> combinazione delle lezioni con tutti gli alunni.
>
> SELECT Alunni.ID_Alunno, Alunni.Cognome, Alunni.Nome, Lezioni.ID_Lezione,
> Lezioni.Data_Lezione
> FROM Alunni, Lezioni;
>
> successivamente faccio un join esterno sin tra quest'ultima query e la tab
> Assenze inserendo un campo come hai fatto tu con valore "Assente" per
> ID_Lezione non Null. in questo modo si ottiene una tabella che contiene
> tutte le combinazioni Lezioni-Alunni abbinate con le Assenze
>
> SELECT AxL.ID_Lezione, AxL.Data_Lezione, AxL.ID_Alunno, AxL.Cognome,
> AxL.Nome, IIf(IsNull(Assenze.ID_Lezione),Null,"Assente") AS Assenza
> FROM AxL LEFT JOIN Assenze ON (AxL.ID_Alunno = Assenze.ID_Alunno) AND
> (AxL.ID_Lezione = Assenze.ID_Lezione);
>
Di fatto hai fatto con due quey quello che io fatto con una sola: la mia
query non è altro che la tua seconda query che nella FORM utilizza la tua
prima query (che se non sbaglio si chiama AxL) come sottoquery.
Natruralmente non cambia il risultato tra la tua soluzione che usa due query
in cascata rispetto alla mia che inserisci la prima query come subquery
della tua seconda query; comunque sia tutto è giusto se restituisce il
risultato voluto.
Dopo di che una query in meno è solo una ottimizzazione, o se preferisci,
una "finezza" non necessaria. :)
> La tua soluzione brillante mi appare dura da digerire!
Di fatto la mia soluzione si limita ad usare come origine riga di una
casella di riepilogo una query che contiene un campo calcolato che assume il
valore "Assente" qualora una determinata riga raccoglie dati anche dalla
tabella Assenze. Al clic sulla casella di riepilogo, inserendo o cancellando
record dalla tabella Assenze e poi facendo il requery della casella di
riepilogo si aumentano o diminuiscano le righe contrassegnate con la scritta
"Assente".
Insomma il problema è costruire la query, la casella di riepilogo si limita
solo a visualizzarla; quanto poi al codice VBA che inserisce o cancella i
record dalla tabella Assenze non credo ci siano problemi: se invece il
problema è proprio lì, dicci cosa non ti è chiaro.
> Adesso senti, qundo spengo o accendo Assente su un Alunno la riga
> selezionate appare senpre la prima della casella di riepilogo. occorre
> memorizzare la posizione corrente della riga manipolata per poi rendere
> questa attiva dopo il requery. A parole è facile ma c'è un metodo per
> memorizzare. ho usato una var long per memorizzare la proprietà:
> memRiga = Me.ElencoAlunni.ListIndex
> e poi per ripristinare selezione sulla stessa riga ho usato:
> Me.ElencoAlunni.Selected(memRiga) = True
> Ma accadono stranezze: il pulsante di chiusura maschera nn chiude più e
> chiudendo la fin dal pulsante di chiusura e come se partisse un clic sulla
> selezione invertendone lo stato.
Le due istruzioni che usi sono perfette allo scopo di rievidenziare la riga
selezionata dopo il requery, però per non avere i problemi che lamenti devi
impostare a Estesa la proprietà Selezione multipla e questo anche se, nel
tuo caso, non effettuerai mai la selezione multipla; non so spiegarti
logicamente il perché ciò sia necessario, ma l'esperienza mi ha ormai
insegnato che se uso le proprietà ListIndex, Selected, ListCount ecc. di una
casella di riepilogo questo è l'unico modo per ottenere il risultato voluto
senza "problemi collaterali".
>
> che sarà mai?
Spero di essere stato chiaro, in caso contrario rifatti vivo.



title: protezione db con numero seriale hd

author: Paolo Donnarumma

text:
ho visto che sul sito comune del 5/6/2001 c'è un file per protezione del
database mediante numero del disco fisso, l'ho scaricato, ma, avendo access
versione 95, non riesco ad aprirlo: è possibile in qualche modo vedere cosa
contiene il file?


title: protezione db con numero seriale hd

author: Al

text:
"Paolo Donnarumma" <
paolo.do...@tin.it
> ha scritto nel messaggio
news:jwoB9.16026$744.5...@news1.tin.it...

Anche a me dà errore e non riesco a leggerlo (con AccXP)
Alb


title: protezione db con numero seriale hd

author: Fabrizio Quercia

text:
"Paolo Donnarumma" <
paolo.do...@tin.it
> ha scritto nel messaggio
news:jwoB9.16026$744.5...@news1.tin.it...
scaricato, ma, avendo access
> versione 95, non riesco ad aprirlo: è possibile in qualche
access 95 ? capperi un cimelio :))))))
io l'ho provato su access97 e funziona benissimo...forse è un problema di
librerie DAO anziche ADO (access2000-xp) o dao + vecchio, del 95 appunto.
Vedi su Visual Basic - Strumenti - Riferimenti e magari aggiungi DAO350.dll
Ciao :)


title: protezione db con numero seriale hd

text:
"Al" <
al...@tiscali.it
> ha scritto nel messaggio
news:ar5ltd$f4c$1...@lacerta.tiscalinet.it...

Penso che tu debba aprire il database come versione precedente.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: protezione db con numero seriale hd

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:hzwB9.38669$8E3.1...@twister2.libero.it...

> Come si fa ad aprirlo come versione precedente?


title: protezione db con numero seriale hd

text:
"Paolo Donnarumma" <
paolo.do...@tin.it
> ha scritto nel messaggio
news:mI0C9.28987$Yw.14...@news2.tin.it...
[CUT]
> >
> > Come si fa ad aprirlo come versione precedente?
Io uso Access 97 e non ho questa possibilità, ma tu sicuramente hai questa
possibilità dal menu File.
Comunque puoi cercare anche sull'help in linea.



title: funzione effetto web

text:
Salve a tutti,
 su un'etichetta vorrei implementare una funzione su pulsante mouse giů e su
pulsante mouse su , giocando con la trasparenza...per creare un effetto tipo
link web con css(a:hover)..
Public Function SwitchColorMouseDown(a As Label)
    a.BackStyle = 1
End Function
Public Function SwitchColorMouseUp(a As Label)
    a.BackStyle = 0
End Function
come faccio a generalizzarla e ad assegnarla in modo veloce a tutte le 35
etichette che compongono la mia maschera?
Grazie


title: funzione effetto web

author: ErP

text:
> come faccio a generalizzarla
gestisci l'evento MouseUp -o qualcosa del genere-
> assegnarla in modo veloce a tutte le 35
> etichette che compongono la mia maschera?
Soluzione A) Array di Controlli
Soluzione B) For Each Label


title: funzione effetto web

author: Cannibale

text:
ErP ha scritto:
> > come faccio a generalizzarla



Mi servirebbe anke a me...mi potresti mandare un pezzo di codice?
Grazie
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: funzione effetto web

text:
"Claudio70" <
mere...@libero.it
> ha scritto nel messaggio news:42ca8902$0$330$5fc...@news.tiscali.it...

Nel sito di Karl (
www.donkarl.com/.it
) e nella sezione CISA c'č un esempio di gestione degli eventi per tutti i controlli contenuti
in una form...
Ciao.
--
Sergio MAZZA


title: funzione effetto web

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> wrote in message
news:daea3c$8i7$1...@domitilla.aioe.org...

Ho provato con questo codice ma se vedi nel codice della maschera mi da un
errore...:
*****************************
modulo:Evidenzia_textbox
*****************************
Option Compare Database
Private WithEvents Casella As Label
'Private Sub Casella_BeforeUpdate(Cancel As Integer)
 '   If Len(Casella) > 3 Then
 '       MsgBox "Non puoi inserire piů di 3 caratteri nella casella '" &
Casella.Name & "'.", vbOKOnly + vbExclamation, "Esempio WithEvents"
 '       Cancel = True
'    End If
'End Sub
Private Sub Casella_DblClick(Cancel As Integer)
Casella.BackStyle = 1
    'Casella.BackColor = vbYellow
   'Casella.FontBold = True
End Sub
Private Sub Casella_Click()
Casella.BackStyle = 0
   ' Casella.BackColor = vbWhite
   ' Casella.FontBold = False
End Sub
Public Function associa(TB As Label)
    Set Casella = TB
    'Casella.on
   Casella.OnClick = "[Event Procedure]"
  '  Casella.OnDblClick = "[Event Procedure]"
   ' Casella.OnExit = "[Event Procedure]"
End Function
**********************************
maschera
********************************
Option Compare Database
Private Istanze As New Collection
Private Sub Form_Load()
Dim EvidTxtb As Evidenzia_textbox
Dim Ctl As Control
    For Each Ctl In Me.Controls
            If Ctl.Tag = "label" Then
            Set EvidTxtb = New Evidenzia_textbox
            EvidTxtb.associa Ctl
''!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!mi da errore qui in fase di
caricamento della maschera (errore run-time 459 L'oggetto o la classe non
supporta il gruppo di eventi)
            Istanze.Add EvidTxtb
        End If
    Next
End Sub
------------------------------------------------------------------------
Sai darmi una dritta?


title: funzione effetto web

text:
"Claudio70" <
mere...@libero.it
> ha scritto nel messaggio news:42cba27f$0$337$5fc...@news.tiscali.it...
>
> Ho provato con questo codice ma se vedi nel codice della maschera mi da un
> errore...:
> *****************************
> modulo:Evidenzia_textbox
> *****************************
>
> Option Compare Database
>
> Private WithEvents Casella As Label
>
> 'Private Sub Casella_BeforeUpdate(Cancel As Integer)
> '   If Len(Casella) > 3 Then
> '       MsgBox "Non puoi inserire più di 3 caratteri nella casella '" &

Dipende; hai letto bene cosa fa quel codice e come eventualmente modificarlo o hai fatto solo copia/incolla?
Ciao.
--
Sergio MAZZA


title: funzione effetto web

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> wrote in message
news:dagb2q$pkd$1...@domitilla.aioe.org...

non ho fatto copia ed incolla...ho modificato:
texbox in label
e poi aggiunti ho messo degli eventi compatibili con le label.
Forse, proprio con le Label non funziona...
che ne pensi?
grazie


title: funzione effetto web

text:
E' una probabilità da prendere in considerazione; data anche dal fatto
che il messaggio di errore è esplicativo del problema.
Ma puoi crearti delle caselle di testo che graficamente simulano le
label...
Ciao.
--
Sergio MAZZA


title: funzione effetto web

text:
<
sergio...@gmail.com
> wrote in message
news:1120650728.7...@g44g2000cwa.googlegroups.com...

Ciao.
--
Sergio MAZZA
Infatti...era quello il problema...Sulle TEXTBOX funziona a meraviglia..
Una cosa: come faccio a impedire la selezione del testo nel textbox?
Se disabilito il campo, naturalmente, il codice non funziona...
Grazie
Davide


title: funzione effetto web

text:
"Claudio70" <
mere...@libero.it
> ha scritto nel messaggio
news:42cbe74c$0$321$5fc...@news.tiscali.it...
>
>
> Infatti...era quello il problema...Sulle TEXTBOX funziona a meraviglia..
> Una cosa: come faccio a impedire la selezione del testo nel textbox?
> Se disabilito il campo, naturalmente, il codice non funziona...
>
> Grazie
>
> Davide
Abilitato = No, Bloccato = Sě; almeno cosě il backcolor lo cambia...
Ciao.
--
Sergio MAZZA


title: Numero record filtrati

author: il barbi

text:
Ho una maschera mskDocumenti su cui devo effettuare delle ricerche che ho
organizzato cosi': con un pulsante apro un'altra maschera
mskRicercaDocumenti che ha gli stessi campi della maschera principale, in
cui immetto i criteri di ricerca, dopo di che con un altro pulsante della
maschera mskRicercaDocumenti lancio la ricerca applicando il filtro:
Forms!mskDocumenti.SetFocus = true
Forms!mskDocumenti.Filter = stringa dei criteri di ricerca
Forms!mskDocumenti.FilterOn = true
  A questo punto mi visualizza la mskDocumenti filtrata. Il mio problema e'
che vorrei controllare il caso in cui nessun record soddisfa alla ricerca,
visualizzando un popup, solo che non so come esprimere il numero di record
filtrati
qualcuno mi aiuta?
il barbi


title: Numero record filtrati

author: ALESSANDRO Baraldi

text:

Dopo il FilrerOn contali....!
Numero=Forms!mskDocumenti.RecordsetClone.RecordCount
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------


title: Numero record filtrati

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:fknusc$ih6$1...@aioe.org...
>> Ho una maschera mskDocumenti su cui devo effettuare delle ricerche che ho
>> organizzato cosi': con un pulsante apro un'altra maschera
>> mskRicercaDocumenti che ha gli stessi campi della maschera principale, in
>> cui immetto i criteri di ricerca, dopo di che con un altro pulsante della
>> maschera mskRicercaDocumenti lancio la ricerca applicando il filtro:
>> Forms!mskDocumenti.SetFocus = true
>> Forms!mskDocumenti.Filter = stringa dei criteri di ricerca
>> Forms!mskDocumenti.FilterOn = true
>>   A questo punto mi visualizza la mskDocumenti filtrata. Il mio problema
> e'
>> che vorrei controllare il caso in cui nessun record soddisfa alla
>> ricerca,
>> visualizzando un popup, solo che non so come esprimere il numero di
>> record
>> filtrati
>> qualcuno mi aiuta?
>> il barbi
>
> Dopo il FilrerOn contali....!
>
> Numero=Forms!mskDocumenti.RecordsetClone.RecordCount
>
ok funziona, l'ho trovato anche da un'altra parte e diceva di mettere prima
Forms!mskDocumenti.RecordsetClone.MoveLast, e' necessario? a me pare che va
bene lo stesso
Un'altra cosa, quando sono tornato su mskDocumenti con i record filtrati e
poi voglio ritornare all'insieme non filtrato, clicco un pulsante che mi fa:
Forms!mskDocumenti.Filter = ""
Forms!mskDocumenti.FilterOn = false
 pero' poi successivamente mi ritrovo il .Filter ancora uguale al valore
precedentemente settato, anche se il filtro non e' attivo. Cioe', ai fini
pratici va tutto bene, pero' non capisco perche' la proprieta' .filter non
viene resettata quando la resetto io; anche alla partenza la resetto in
Form_Open pero' poi mi vedo comunque l'ultimo valore settato
il barbi


title: Numero record filtrati

author: IvanDaBologna

text:
[...]
> ok funziona, l'ho trovato anche da un'altra parte e diceva di mettere
> prima Forms!mskDocumenti.RecordsetClone.MoveLast, e' necessario? a me pare
> che va bene lo stesso
> Un'altra cosa, quando sono tornato su mskDocumenti con i record filtrati e
> poi voglio ritornare all'insieme non filtrato, clicco un pulsante che mi
> fa:
> Forms!mskDocumenti.Filter = ""
> Forms!mskDocumenti.FilterOn = false
> pero' poi successivamente mi ritrovo il .Filter ancora uguale al valore
> precedentemente settato, anche se il filtro non e' attivo. Cioe', ai fini
> pratici va tutto bene, pero' non capisco perche' la proprieta' .filter non
> viene resettata quando la resetto io; anche alla partenza la resetto in
> Form_Open pero' poi mi vedo comunque l'ultimo valore settato
> il barbi
Anche quando cancelli un file esso non viene 'fisicamente' eliminato dal
disco(a meno chè tu non usi utilities apposite).
Normalmente in Access questo comportamento è valido in qualsiasi punto dove
sia possibile immettere criteri di filtro. Forse Bill ha pensato bene di
lasciare l'impronta del tuo ultimo passaggio, per tuo uso e 'orientamento' !
IvanDaBologna


title: Numero record filtrati

text:
> Forms!mskDocumenti.Filter = ""
prova anche con :
Forms!mskDocumenti.FilterOn = True
IvanDaBologna


title: Numero record filtrati

text:
> ok funziona, l'ho trovato anche da un'altra parte e diceva di mettere
prima
> Forms!mskDocumenti.RecordsetClone.MoveLast, e' necessario? a me pare che
va
> bene lo stesso
> Un'altra cosa, quando sono tornato su mskDocumenti con i record filtrati e
> poi voglio ritornare all'insieme non filtrato, clicco un pulsante che mi
fa:
> Forms!mskDocumenti.Filter = ""
> Forms!mskDocumenti.FilterOn = false
>  pero' poi successivamente mi ritrovo il .Filter ancora uguale al valore
> precedentemente settato, anche se il filtro non e' attivo. Cioe', ai fini
> pratici va tutto bene, pero' non capisco perche' la proprieta' .filter non
> viene resettata quando la resetto io; anche alla partenza la resetto in
> Form_Open pero' poi mi vedo comunque l'ultimo valore settato
> il barbi
E' un problema abbastanza noto...
Prima di disabilita il Filtro poi lo si annulla...
Oggett.FilterOn=False
Oggetto.Filter=vbNullString



title: Conversione Data/Lettere

author: Andrea

text:
Salve,
qualcuno conosce una funzione che converta una data es° 15/03/01 in 15 Marzo
2001.
Grazie mille anticipatamente.
Andrea


title: Conversione Data/Lettere

author: Antonio Biso

text:
Andrea <
a.val...@effecinformatica.it
> wrote in message
kPc96.70684$eB2.5...@news.infostrada.it...

Aaaahhh, l'help on line questo sconosciuto...
format("15-03-2001","dd mmmm yyyy")
Antonio


title: query e combobox

text:
Ciao a tutti...
Vediamo se riesco a spiegare in modo semplice il mio problemone....
Ho un db contenente una tabella denominata tabella1.
Ho una maschera (maschera1) non associata contenete 5 combobox  (combo1,
combo2, combo3...ecc) ognuna delle quali prende dati da tabelle diverse.
Ho una query di selezione (query1),basata sulla tabella1, contenente 5
campi e in ognuno di questi 5 campi ho inserito come criterio:
[Forms]![maschera1]![combo1], [Forms]![maschera1]![combo2] ecc  sino a 5.
Nella maschera1 ho poi inserito un pulsante per l'apertura in anteprima di
un report (report1) basato sulla query1 che mi mostra solo i record
filtrati dai 5 controlli della maschera1 e tutto funziona ma solo se
seleziono valori da tutte e cinque le combobox della maschera1 perchè se
ad esempio non voglio selezionare nessun valore dalla combo3 ma solo dalle
combo1,2,4 e 5 il report non visualizza nessun dato.
Come posso fare per ovviare a questo inconveniente?
grazie a tutti........ciao


title: query e combobox

author: Brunix

text:
<
ca...@fla.it
> ha scritto nel messaggio
news:e00ssb$hsm$1...@fata.cs.interbusiness.it...

Ciao,
nel criterio non mettere semplicemente
[Forms]![maschera1]![combo1]
ma metti una formula, tipo
=IIF([Forms]![maschera1]![combo1] <> "";[Forms]![maschera1]![combo1];"")
ciao
Brunix


title: query e combobox

text:
Prima di tutto voglio ringraziarti per l'aiuto.
Ho applicato il tuo consiglio ma purtroppo non funziona in quanto il
report (quando io non inserisco nessun dato con una delle combo della
maschera) non mostra nessun record (e nemmeno la relativa query).
Le combo della maschera contengono tutte dati di tipo testo.
Bisogna effettuare qualche modifica all'espressione da immettere nel
criterio della query di selezione?
Grazie.......ciao


title: Visualizzaizione valori casella combinata

author: Spino

text:
Salve a tutti.
Chiedo il vostro aiuto per un problema che ho riscontrato con Access
2003.
Ho creato una tabella in cui i valori di un campo sono scelti da casella
combinata che riceve i dati da un'altra tabella già popolata.
Quando inserisco i dati in quel campo il menu a discesa mostra le righe
ma senza valori (sfondo bianco e null'altro), ma se seleziono i valori
dal menu a discesa essi appaiono nel campo. E' come se i valori fossero
presenti nel menu a discesa ma non sono visualizzati.
Da cosa puo' derivare questa anomalia?
Spero di essere stato chiaro. Grazie sin d'ora per l'aiuto.
--
Paolo "Spino"


author: Karl Donaubauer

text:
Spino wrote:
> Chiedo il vostro aiuto per un problema che ho riscontrato con Access
> 2003.
> Ho creato una tabella in cui i valori di un campo sono scelti da casella
> combinata che riceve i dati da un'altra tabella già popolata.
>
> Quando inserisco i dati in quel campo il menu a discesa mostra le righe
> ma senza valori (sfondo bianco e null'altro), ma se seleziono i valori
> dal menu a discesa essi appaiono nel campo. E' come se i valori fossero
> presenti nel menu a discesa ma non sono visualizzati.
> ...
Si tratta di un bug noto dell'SP3 per Office 2003.
Per curarlo devi installare l'hotfix per SP3.
Il link trovi qui:
www.donkarl.com/it?FAQ9.1
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


text:


Grazie mille.
--
Paolo "Spino"


title: campo testo e path foto

author: Marco

text:
In un campo testo è contenuto il path delle foto. Cliccandoci sopra con il
mouse si apre la foto con il programma di default di windows.
In poche occasioni le foto sono più di una e vengono copiate nello stesso
campo, c'è un modo usando la stessa procedura di aprile?
es
\miacartella\foto1.jpg con click si apre
in un'atra tabella con la funzione:
If Len(varFileName & vbNullString) = 0 Then Exit Function
OpenFile = ShellExecute(Application.hWndAccessApp, "Open", varFileName, "",
"C:\", 1)
più foto:
\miacartella\foto2.jpg  \miacartella\foto3.jpg
grazie


title: campo testo e path foto

author: Sergio MAZZA

text:
"Marco" <
marco.w-no-...@email.it
> ha scritto nel messaggio news:46927645$0$4794$4faf...@reader4.news.tin.it...

Puoi utilizzare la funzione Split per ottenere un'array dei nomi di file, con un ciclo le apri tutte...
Ciao.
--
Sergio MAZZA


title: campo testo e path foto

text:
"Sergio MAZZA"  wrote>
>
> Puoi utilizzare la funzione Split per ottenere un'array dei nomi di file,
> con un ciclo le apri tutte...
esistono degli esempi?
>
> Ciao.
> --
> Sergio MAZZA
ciao


title: campo testo e path foto

text:
"Marco" <
marco.w-no-...@email.it
> ha scritto nel messaggio news:4692a5db$0$10615$4faf...@reader2.news.tin.it...
>
> esistono degli esempi?
Nell'help in linea (del VBA) della funzione Split.
es.
Dim myArray() As String
myArray = Split("\miacartella\foto2.jpg  \miacartella\foto3.jpg", " ", -1,vbTextCompare)
Debug.Print myArray(0)
Debug.Print myArray(1)
Debug.Print myArray(2)
> ciao
Ciao.
--
Sergio MAZZA


title: campo testo e path foto

text:
"Sergio MAZZA"  wrote > Nell'help in linea (del VBA) della funzione Split.
> es.
> Dim myArray() As String
> myArray = Split("\miacartella\foto2.jpg  \miacartella\foto3.jpg", "
> ", -1,vbTextCompare)
> Debug.Print myArray(0)
> Debug.Print myArray(1)
> Debug.Print myArray(2)
cosě mi č di scarso aiuto, i nomi delle foto e le estensioni sono diversi.
Mi sarebbe utile poter selezionare con il mouse il path e poi aprirlo
secondo selezione.
> --
> Sergio MAZZA
ciao


title: campo testo e path foto

text:
"Marco" <
marco.w-no-...@email.it
> ha scritto nel messaggio
news:46939231$0$4798$4faf...@reader4.news.tin.it...
>
> cosě mi č di scarso aiuto, i nomi delle foto e le estensioni sono diversi.
> Mi sarebbe utile poter selezionare con il mouse il path e poi aprirlo
> secondo selezione.
Praticamente, vuoi che ti faccia io il programma.
> ciao
Hai a disposizione tutti gli strumenti per realizzare quello che chiedi; con
un poco di impegno potrai riuscirci.
Se qualcosa non ti č chiaro basta che scrivi nell'NG e vedrai che una
soluzione si trova...
Ciao.
--
Sergio MAZZA


title: campo testo e path foto

text:
"Sergio MAZZA"  wrote
> Se qualcosa non ti è chiaro basta che scrivi nell'NG e vedrai che una
> soluzione si trova...
Me.txtmiatext.Value = "tratto selezionato"
Come si scrive in codice, tratto selezionato?
gli esempi che ho visto con SelStart e SelLength non son riuscito a tradurre
tratto selezionato



title: campo testo e path foto

text:
"Marco" <
marco.w-no-...@email.it
> ha scritto nel messaggio
news:4693a04f$0$4787$4faf...@reader4.news.tin.it...
>
> Me.txtmiatext.Value = "tratto selezionato"
Per assegnare un valore ad una casella di testo, non serve l'utilizzo del
Value (e neanche del Text); basta che fai:
Me!txtmiatext = "testo della stringa"
> Come si scrive in codice, tratto selezionato?
Di cosa stiamo parlando?
> gli esempi che ho visto con SelStart e SelLength non son riuscito a
> tradurre tratto selezionato
Non devi selezionare nulla; devi dare in pasto alla funzione Split il
contenuto del controllo che contiene il path e nome file.
Se le vuoi aprire tutte in un sol colpo:
Dim myArray() As String, conta as integer
myArray = Split(me!nomeControlloColPathEFile, " ", -1,vbTextCompare)
For conta = 0 to Ubound(myArray)
    msgbox "Apro: " & myArray(conta)
next
Cambia il nome della casella di testo e la msgbox con l'istruzione di
apertura del file immagine.
Se invece vuoi, prima, selezionare il file da aprire, poi inserire il
contenuto della casella di testo in (es.) una casella combinata/riepilogo e
poi, gestendo l'evento "doppio clic" apri il file selezionato...



title: Criteri query parametrica digitati su maschera

author: Roberto dal portatile

text:
Pubblico qui di seguito un messaggio ricevuto da Sergio e la mia relativa
risposta.
=================================
> Ciao Roberto.
> Sto cominciando a capirci qualcosa.
> Volevo sapere una cosa. Sto impostando una maschera di ricerca, vorrei
> sapere come dovrei impostare i criteri della query per ricercare
> (all'interno di un campo  dati tipo testo) quei record che hanno in quel
> campo almeno una frazione di testo che l'utente digita, attraverso una
query
> con parametri.
> Spero di essere stato chiaro. Aspetto un tuo aiuto
> Grazie Sergio
[CUT]
Perché non usi il NG per per porre quesiti su Access?
Per non essere scortese, solo per questa volta, ti rispondo e pubblicherò il
messaggio sul NG.
Se la maschera di ricerca si chiama Maschera1 e il controllo non associato
in essa contenuto dove digiti la stringa di ricerca si chiama Pippo, nella
riga criteri della query, relativamente al campo sul quale devi effettuare
la ricerca, scrivi:
Like "*" & [Forms]![Maschera1]![Pippo]  & "*"
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: form_a pagine

author: Paolo

text:
Ho utilizzato la seguente routine per visualizzare un controllo
sia a fronte dell'evento "Su corrente"della maschera che a fronte
dell'evento "Dopo aggiornamento" del controllo.
fin qui tutto bene
If IsNull(Me!txtContatoreRadioattivo) Then
    Me!txtContatoreNormal.Visible = True
Else
    txtContatoreNormal.Visible = False
End If
ora perň la mia maschera ha la struttura a pagine
pagina 1 e pagina 2
come devo fare per rendere il controllo
txtContatoreNormal
nella pagina 2 visibile o no.
grazie; Paolo


title: form_a pagine

text:
"Paolo" <***
bjh...@tin.it
> ha scritto nel messaggio
news:9kgH6.1873$FS.2...@news1.tin.it...

Prova con:
'--------------------
Dim xPage As Pages
Set xPage = Me!NomeControlloAPagine.Pages
If IsNull(Me!txtContatoreRadioattivo) Then
    xPage(1).Controls("txtContatoreNormal").Visible = True
Else
    xPage(1).Controls("txtContatoreNormal").Visible = False
End If
Set xPage = Nothing
'--------------------
Ciao.


title: form_a pagine

text:
Paolo <***
bjh...@tin.it
> ha scritto:
> Ho utilizzato la seguente routine per visualizzare un controllo
> sia a fronte dell'evento "Su corrente"della maschera che a fronte
> dell'evento "Dopo aggiornamento" del controllo.
> fin qui tutto bene
>
> If IsNull(Me!txtContatoreRadioattivo) Then
>     Me!txtContatoreNormal.Visible = True
> Else
>     txtContatoreNormal.Visible = False
> End If
>
> ora però la mia maschera ha la struttura a pagine
> pagina 1 e pagina 2
> come devo fare per rendere il controllo
> txtContatoreNormal
> nella pagina 2 visibile o no.
?
Forse non capisco bene ma non importa se ci sono dei controlli
PageBreak o un controllo a pagine. È sempre lo stesso riferimento.
Basta:
Me!txtContatoreNormal.Visible = IsNull(Me!txtContatoreRadioattivo)
--
HTH
Karl
*********
Non meravigliarti del mio strano italiano. M'esercito qui.
Access-FAQ (tedesco):
http://www.donkarl.com


author: Polluce

text:
Che differenza c'e' tra:
Me!testo1
e
Me.testo1
?
Thnkx
--
  ("'-''-/").___..--''"'-._
   `6_ 6  )   '-.  (     ).'-.__.')
   (_Y_.)'  ._   )  `._ '. ''-..-'
  _..'--'_..-_/  /--'_.' ,'
(il),-''  (li),'  ((!.-''
Mailto: mvbo...@lnubb.pbz
Applica ROT13 per rispondere.


author: Alex

text:
"Polluce" <mvbo...@lnubb.pbz> wrote in message
news:mqhvvtclpbf541h41...@4ax.com...
> Che differenza c'e' tra:
>
> Me!testo1
> e
> Me.testo1
> ?
>
> Thnkx
> --
Sostanzialmente nessuna.
La 1° è una deformazione di VBA per Access, la 2° è valida anche in VB, non
come
sintassi in quanto VB non riconosce il riferimento esplicito all'oggetto ME.
Sostanzialmente io preferisco la 2° in quanto durante la scrittura del codice
viene riconosciuta e vengono proposti i Metodi e le Proprietà in automatico.
Ciao
@Alex
--
Posted from  [62.98.15.24]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: chiudere report vuoti

author: acMad

text:
Salve a tutti accessisti,
Ho un form che mi apre i reports selezionando prima determinati filtri,
sull'evento On No Data del report ho una sub che dovrebbe
1) visualizzare un messaggio del tipo "non ci sono report con i filtri
selezionati"
2) chiudere il report.
la mia sub
Private Sub Report_NoData(Cancel As Integer)
    MsgBox "No order found that match the search criteria!", vbOKOnly,
"Info"
    DoCmd.Close
End Sub
il messaggio lo visualizza ma sul comando DoCmd.Close mi da un errore del
tipo:
Run-Time error: 2585
this action can't be carried out while processing a form or report event.
se tolgo il DoCmd.Close, il messaggio esce sempre (ovvio) ma poi
mi apre il report vuoto, io vorrei evitare quest'ultimo..
idee,suggerimenti?
grazie
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: chiudere report vuoti

author: Carlo Costarella

text:
"acMad" <ac...@acMad.it> ha scritto nel messaggio
news:eokv27$c01$1...@news.newsland.it...
> Salve a tutti accessisti,
>
> Ho un form che mi apre i reports selezionando prima determinati filtri,
> sull'evento On No Data del report ho una sub che dovrebbe
>
> 1) visualizzare un messaggio del tipo "non ci sono report con i filtri
> selezionati"
>
> 2) chiudere il report.
>
> la mia sub
> Private Sub Report_NoData(Cancel As Integer)
>    MsgBox "No order found that match the search criteria!", vbOKOnly,
> "Info"
>    DoCmd.Close
> End Sub
>
>
> il messaggio lo visualizza ma sul comando DoCmd.Close mi da un errore del
> tipo:
>
> Run-Time error: 2585
> this action can't be carried out while processing a form or report event.
>
>
> se tolgo il DoCmd.Close, il messaggio esce sempre (ovvio) ma poi
> mi apre il report vuoto, io vorrei evitare quest'ultimo..
>
> idee,suggerimenti?
>
> grazie
>
-----------------------------------------------------
anzichč   DoCmd.Close, cancel = true
Ciao, Carlo


title: chiudere report vuoti

text:
acMad wrote:
> Ho un form che mi apre i reports selezionando prima determinati filtri,
> sull'evento On No Data del report ho una sub che dovrebbe
>
> 1) visualizzare un messaggio del tipo "non ci sono report con i filtri
> selezionati"
>
> 2) chiudere il report.
>
> la mia sub
> Private Sub Report_NoData(Cancel As Integer)
>    MsgBox "No order found that match the search criteria!", vbOKOnly,
> "Info"
>    DoCmd.Close
> End Sub
>
> il messaggio lo visualizza ma sul comando DoCmd.Close mi da un errore del
> tipo:
>
> Run-Time error: 2585
> this action can't be carried out while processing a form or report event.
> ...
Invece del Close devi usare il parameter Cancel. Vedi:
Evitare la stampa in assenza di dati
www.donkarl.com/it?FAQ5.8

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


title: chiudere report vuoti

text:
Karl Donaubauer ha scritto:



perfetto!!!
funziona alla grande!!
aggiungo il tuo sito ai preferiti :D
grazie a tutti
acM



title: Somma su report

author: Francesco Salvagnini

text:
Ciao ragazzi! Su un report ho 2 campi: SEGNO e IMPORTO.
Domanda: come faccio a fare la somma degli importi positivi e di
quelli negativi?
Grazie!  ; )


title: Somma su report

text:

Non è molto chiaro cosa intendi. Se p.e. "positivi e negativo"
si riferisce al campo "SEGNO" e in questo si trova
o un + o un -:

=Sum(iif(SEGNO="+";IMPORTO))
=Sum(iif(SEGNO="-";IMPORTO))

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


title: Somma su report

text:

Sì, sì, era proprio quello che volevo dire. Funziona, grazie!  ; )


title: Casella Combinata

author: SunRex

text:
Ho due caselle combinate identiche (l'origine dati č la stessa tbl)
su due frm ,l'unica differenza č che in una i dati sono filtrati con un
campo Si/No a 0 e nell'altra il campo SI/No č a -1.
La combo con Si/No a 0 quando apro la frm mi mostra il primo record
mentre l'altra combo non mi mostra niente e per vedere i dati in essa
contenuti devo aprirla.
Perchč?
SunRex


title: Casella Combinata

author: Roberto da casa

text:
"SunRex" <
sunrexs...@hotmail.com
> ha scritto nel messaggio
news:4H0Ga.80732$pR3.1...@news1.tin.it...

Dipende se hai impostato o meno il valore predefinito della casella
combianta e se lo hai impostato con quale valore lo hai impostato.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Casella Combinata


title: Casella Combinata

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:4Y2Ga.83729$Ny5.2...@twister2.libero.it...
>
> "SunRex" <
sunrexs...@hotmail.com
> ha scritto nel messaggio
> news:4H0Ga.80732$pR3.1...@news1.tin.it...
> > Ho due caselle combinate identiche (l'origine dati è la stessa tbl)
> > su due frm ,l'unica differenza è che in una i dati sono filtrati con un
> > campo Si/No a 0 e nell'altra il campo SI/No è a -1.
> > La combo con Si/No a 0 quando apro la frm mi mostra il primo record
> > mentre l'altra combo non mi mostra niente e per vedere i dati in essa
> > contenuti devo aprirla.
> > Perchè?
> > SunRex
>
> Dipende se hai impostato o meno il valore predefinito della casella
> combianta e se lo hai impostato con quale valore lo hai impostato.
>
> --
> Roberto
>
Prima di tutto scusa per la ripetizione del post ma non mi si vedeva e
l'ho rinviato e non capisco come è finito sotto un tuo post del 24/05/2003
???Boh.
Cmq sul valore predefinito delle due caselle di riepilogo non c'è impostato
nulla.
SunRex


title: Casella Combinata

text:
"SunRex" <
sunrexs...@hotmail.com
> ha scritto nel messaggio
news:ZzjGa.84772$pR3.1...@news1.tin.it...

Beh, se le caselle combinate sono non associate e non hai impostato nulla
come loro valore predefinito, in teoria all'apertura delle maschere dovresti
vederle "bianche" in quanto il loro valore è uguale a Null.
>
> SunRex



title: Come evidenziare meglio il record su cui è il cursore in visualizz. maschere continue

author: Francesco

text:
Salve a tutti!
Ho questo problema:
Ho una maschera frmPadre con due sottomaschere( in Visualizzazione Maschere
continue): sfrmFiglio1 e sfrmFiglio2.
Nella frmPadre ad ogni record della sfrmFiglio1 posso inserire nella
sfrmFiglio2dei record corrispondenti.
Per non sbagliare l'inserimento di quest'ultimi, ad es. spostando
inavvertitamente il cursore nella sfrmFiglio1 su un record diverso, sarebbe
comodo poter evidenziare il record su cui č il cursore nella sfrmFiglio1,
colorando ad es. tutti controlli del medesimo record.
E' possibile?
Grazie
Francesco


author: Roberto dalla campagna

text:
"Francesco" <
paolo.mene...@tin.it
> ha scritto nel messaggio
news:pne7d.39537$35.18...@news4.tin.it...

Vai sul Sito Comuene (link qui sotto) e nella Sezione Forms leggi la FAQ di
Silvio Savoldi intitolata "Evidenziare records specifici nelle maschere
continue".
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


author: luigi corinna

text:
"Roberto dalla campagna" <
r.ma...@libero.it
> ha scritto nel messaggio
news:TYe7d.18858$N45.4...@twister2.libero.it...
>
> "Francesco" <
paolo.mene...@tin.it
> ha scritto nel messaggio
> news:pne7d.39537$35.18...@news4.tin.it...
> > Salve a tutti!
> > Ho questo problema:
> > Ho una maschera frmPadre con due sottomaschere( in Visualizzazione
> Maschere
> > continue): sfrmFiglio1 e sfrmFiglio2.
> > Nella frmPadre ad ogni record della sfrmFiglio1 posso inserire nella
> > sfrmFiglio2dei record corrispondenti.
> > Per non sbagliare l'inserimento di quest'ultimi, ad es. spostando
> > inavvertitamente il cursore nella sfrmFiglio1 su un record diverso,
> sarebbe
> > comodo poter evidenziare il record su cui è il cursore nella
sfrmFiglio1,
> > colorando ad es. tutti controlli del medesimo record.
> > E' possibile?
> > Grazie
> > Francesco
>
> Vai sul Sito Comuene (link qui sotto) e nella Sezione Forms leggi la FAQ
di
> Silvio Savoldi intitolata "Evidenziare records specifici nelle maschere
> continue".
>
> --
> Roberto
>
> ---------------------------------------------
> il Sito Comune di it.comp.appl.access:
>
http://www.sitocomune.com
> ---------------------------------------------
Non riesco a far evidenziare le righe continue
mi dice che ci vuole l'oggetto (424) ke vuol dire?
ho portato il modulo e gli elementi ke servivano ad evidenziare le righe ...
Ciao e Grazie
Luigi


text:
"luigi corinna" <
luigic...@hotmail.com
> ha scritto nel messaggio
news:lzt7d.44152$35.20...@news4.tin.it...

> Non riesco a far evidenziare le righe continue
> mi dice che ci vuole l'oggetto (424) ke vuol dire?
> ho portato il modulo e gli elementi ke servivano ad evidenziare le righe
...
In effetti se hai orovato l'esempio per Access 2000 non è del tutto
funzionante: mi dispiace non avertole detto prima.
Comunque lunedì 4 o martedì 5 ottobre verrà aggiornato il Sito Comune (ne
verrà data notizia sul NG) e tra gli aggiornamenti c'è quello relativo al
database funzionante anche per la versione Access 2000; la versione per
Access 97 mi risulta essere funzionante.
> Ciao e Grazie
>
> Luigi



text:
"Roberto dalla campagna" <
r.ma...@libero.it
> ha scritto nel messaggio
news:5Wt7d.19012$H11.5...@twister1.libero.it...

Io ho Access 97 ma mi dà questo errore....


text:
"luigi corinna" <
luigic...@hotmail.com
> ha scritto nel messaggio
news:4%u7d.44763$35.20...@news4.tin.it...

> Io ho Access 97 ma mi dà questo errore....
Per scrupolo ho appena riprovato il database di esempio Evidenzia97.mdb con
Access 97 ed a me funzione bene senza segnalarmi alcun errore.



author: Simone Calligaris

text:
"Roberto dalla campagna" <
>
> In effetti se hai orovato l'esempio per Access 2000 non è del tutto
> funzionante: mi dispiace non avertole detto prima.
> Comunque lunedì 4 o martedì 5 ottobre verrà aggiornato il Sito Comune (ne
> verrà data notizia sul NG) e tra gli aggiornamenti c'è quello relativo al
> database funzionante anche per la versione Access 2000; la versione per
> Access 97 mi risulta essere funzionante.
Comunque io ho utilizzato l'esempio per Access 2000 e funziona normalmente
pure quello...


title: nascondere il processo di stampa del comando docmd.outputto

author: mario rossi

text:
buongiorno a tutti

quando eseguo il comando docmd.outputto si vede quel processo che stampa il report e se sono più record si vede continuamente il processo di stampa che genera i vari pdf

è possibile nasconderlo in qualche modo?

grazie.


author: Karl Donaubauer

text:
Salve,

mario rossi:
>
> quando eseguo il comando docmd.outputto si vede quel processo che stampa il report e se sono più record si vede continuamente il processo di stampa che genera i vari pdf
>
> è possibile nasconderlo in qualche modo?

Non è mai stato facile. Solo se è davvero importante proverò il codice
di Dev:
http://www.theaccessweb.com/api/api0037.htm

--
Ciao
Karl
*********
Access Bugs:
https://www.accessforever.org

Access News:
https://youtu.be/cs_mZvaKYeY

Access DevCon:
http://AccessDevCon.com

Access FAQ:
https://www.donkarl.com/it


title: Stampa disegno DWG Autocad su report Access

author: Marco Nappi

text:
Qualcuno ha stampato disegni Autocad su report Access?
Se si come avete fatto?
Grazie anticipatamente


title: Blocco record con condizione

text:
Ciao a tutti, ho una tabella Trat, che per ogni commessa (Comm)
riporta i trattamenti (Campo2) ordinati progressivamente (nTrat) che
la stessa deve subire. Ora ho una maschera associata alla tabella Trat
da cui filtrando per Campo2 (es.Campo2="PU") ossia per trattamento,
riesco a visualizzare quali siano le commesse che devono subire quel
trattamento; vorrei che però selezionando il campo Iniziato di tale
commesse si andasse a verificare se il trattamento precedente della
stessa commessa ha il campo Effettuato= true, se vero continua,
altrimenti impediscimi di modificare il record corrente. E' possibile?
Grazie
ID	Comm	nTrat	Campo2	Iniziato	Effettuato
41	481	1	PU	No	Sì
45	481	2	VP	No	No
39	502	1	ZC	No	No
43	502	2	PU	No	No
46	502	3	PR	No	No
47	502	4	VP	No	No


title: Blocco record con condizione

author: VT @ Work

text:
On Thu, 20 Mar 2008 00:51:35 -0700 (PDT),
dottce...@iol.it
 wrote:
 (...)
>Ciao a tutti, ho una tabella Trat, che per ogni commessa (Comm)
>riporta i trattamenti (Campo2) ordinati progressivamente (nTrat) che
>la stessa deve subire. Ora ho una maschera associata alla tabella Trat
>da cui filtrando per Campo2 (es.Campo2="PU") ossia per trattamento,
>riesco a visualizzare quali siano le commesse che devono subire quel
>trattamento; vorrei che perň selezionando il campo Iniziato di tale
>commesse si andasse a verificare se il trattamento precedente della
>stessa commessa ha il campo Effettuato= true, se vero continua,
>altrimenti impediscimi di modificare il record corrente. E' possibile?
>Grazie
>
>ID	Comm	nTrat	Campo2	Iniziato	Effettuato
>41	481	1	PU	No	Sě
>45	481	2	VP	No	No
>39	502	1	ZC	No	No
>43	502	2	PU	No	No
>46	502	3	PR	No	No
>47	502	4	VP	No	No
Suppongo che nella maschera in questione tutti i controli associati ai
vari campi abbiano nome "prefissato" con txt (txtID, txtComm ecc.)
Nella routine associata all'evento "Prima di aggiornare" del controllo
txtIniziato scrivi il codice seguente:
' Il controllo viene effettuato solo se il record corrente non
corrisponde al primo trattamento della commessa
If Me.txtnTrat<> DMin("nTrat","Trat","Comm=" & Me.txtComm) Then
   If Nz(Dlookup("Effettuato","Trat","Comm=" & Me.txtComm & " AND
nTrat=" & DMax("nTrat","Trat","Comm=" & Me.txtComm & " AND nTrat<" &
Me.txtnTrat )),"No") = "No" Then
MsgBox "Trattamento precedente non effettuato"
   Docmd.CancelEvent
   EndIf
EndIf
Vincenzo Turturro
Certificato Eucip Core Level
ITA 0000-002299 del 14/05/2007
---------------------------------------------
il sito comune di it.comp.appl.access:
http://www.sitocomune.com

---------------------------------------------
risorse Access:
http://www.accessgroup.it

---------------------------------------------
Il sito comune di it.comp.as400
http://www.faq400.com

---------------------------------------------


title: Blocco record con condizione

text:
On 20 Mar, 09:37, "VT @ Work" <V...@Work.it> wrote:
> On Thu, 20 Mar 2008 00:51:35 -0700 (PDT),
dottcefal...@iol.it
 wrote:
>
>  (...)
>
>
>
>
>
> >Ciao a tutti, ho una tabella Trat, che per ogni commessa (Comm)
> >riporta i trattamenti (Campo2) ordinati progressivamente (nTrat) che
> >la stessa deve subire. Ora ho una maschera associata alla tabella Trat
> >da cui filtrando per Campo2 (es.Campo2="PU") ossia per trattamento,
> >riesco a visualizzare quali siano le commesse che devono subire quel
> >trattamento; vorrei che però selezionando il campo Iniziato di tale
> >commesse si andasse a verificare se il trattamento precedente della
> >stessa commessa ha il campo Effettuato= true, se vero continua,
> >altrimenti impediscimi di modificare il record corrente. E' possibile?
> >Grazie
>
> >ID  Comm    nTrat   Campo2  Iniziato        Effettuato
> >41  481     1       PU      No      Sì

> ---------------------------------------------- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
Ciao Vincenzo grazie della tempestività, ho provato la soluzione
proposta e mi viene restituito il seguente errore:
Errore di run-time '3075'
Errore di sintassi (operatore mancante) nell'espressione della query
'Comm=481 And nTrat=',


title: Blocco record con condizione

text:

> 'Comm=481 And nTrat=',- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
c'è nessuno?


title: Blocco record con condizione

author: VT @ home

text:
Il Thu, 20 Mar 2008 02:35:19 -0700 (PDT),
dottce...@iol.it
 ha scritto:
>(.....)
>>
>> Suppongo che nella maschera in questione tutti i controli associati ai
>> vari campi abbiano nome "prefissato" con txt (txtID, txtComm ecc.)
>>
>> Nella routine associata all'evento "Prima di aggiornare" del controllo
>> txtIniziato scrivi il codice seguente:
>>
>> ' Il controllo viene effettuato solo se il record corrente non
>> corrisponde al primo trattamento della commessa
>> If Me.txtnTrat<> DMin("nTrat","Trat","Comm=" & Me.txtComm) Then
>>    If Nz(Dlookup("Effettuato","Trat","Comm=" & Me.txtComm & " AND
>> nTrat=" & DMax("nTrat","Trat","Comm=" & Me.txtComm & " AND nTrat<" &
>> Me.txtnTrat )),"No") = "No" Then
>> MsgBox "Trattamento precedente non effettuato"
>>    Docmd.CancelEvent
>>    EndIf
>> EndIf
>>
>Ciao Vincenzo grazie della tempestività, ho provato la soluzione
>proposta e mi viene restituito il seguente errore:
>Errore di run-time '3075'
>Errore di sintassi (operatore mancante) nell'espressione della query
>'Comm=481 And nTrat=',
Sembra che l'espressione
DMax("nTrat","Trat","Comm=" & Me.txtComm & " AND nTrat<" & Me.txtnTrat )
restituisca Null ...
Onestamente non l'ho provata (e non ho il tempo di farlo adesso; forse domattina ...)
però mi sembra che dovrebbe funzionare, a patto che per ogni record (tranne quelli di ciascuna commessa con nTrat
minimo) esista almeno un record della stessa commessa con valore di nTrat minore del valore di nTrat del record
corrente.
Mi viene in mente adesso: l'errore si verifica quando stai compilando i campi di un nuovo record ?
Hai provato su record già registrati ?



title: Blocco record con condizione

text:
On 20 Mar, 18:43, "VT @ home" <
V...@home.it
> wrote:

> Il sito comune di it.comp.as400
http://www.faq400.com
> ---------------------------------------------- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
Ciao Vincenzo, ti attendevo.
Si ho provato su record già registrati e solo su questi mi servirà, in
quanto effettua solo dei controlli di dati già inseriti.


title: Blocco record con condizione

text:
On Thu, 20 Mar 2008 11:07:52 -0700 (PDT),
dottce...@iol.it
 wrote:
 (...)
>>
>> - Mostra testo tra virgolette -
>
>Ciao Vincenzo, ti attendevo.
>Si ho provato su record già registrati e solo su questi mi servirà, in
>quanto effettua solo dei controlli di dati già inseriti.
Ho creato la tabella con la stessa struttura di quella che hai
postato, ho creato una maschera ad essa associata ed ho incollato il
codice che ti ho proposto: funziona tutto !
Per la commessa 502, tentando di aggiornare il record con nTrat=2
impostando Iniziato="Sì", questo viene impedito.
Per la commessa 481, tentando di aggiornare il record con nTrat=2
impostando Iniziato="Sì", questo viene consentito.



title: Blocco record con condizione

text:
On 21 Mar, 09:28, "VT @ Work" <V...@Work.it> wrote:

Allora dove sbaglio? ecco il codice del txtIniziato della form:
Private Sub txtIniziato_BeforeUpdate(Cancel As Integer)
If Me.txtnTrat <> DMin("nTrat", "Trat", "Comm=" & Me.txtComm) Then
   If Nz(DLookup("Effettuato", "Trat", "Comm=" & Me.txtComm & " AND
nTrat=" & DMax("nTrat", "Trat", "Comm=" &   Me.txtComm & " AND nTrat<"
& Me.txtnTrat)), "No") = "No" Then
   MsgBox "Trattamento precedente non effettuato"
   DoCmd.CancelEvent
   End If
End If
End Sub
Ma per andare a capo nella seconda if come si fà? Io ho riportato
nell'editor vb tutto su una riga, forse lì l'errore?


title: Blocco record con condizione

text:
On Fri, 21 Mar 2008 01:43:51 -0700 (PDT),
dottce...@iol.it
 wrote:
 (...)
>Allora dove sbaglio?
Boh ?
Ti ripeto che ho usato il *mio* codice sui dati *da te* postati,
quindi in teoria stiamo lavorando nelle medesime condizioni.
In pratica no, visto che a me funziona e a te no.
L'unica cosa che posso fare è, se vuoi, inviarti il mio mdb di prova
perchè tu possa confrontarlo con il tuo.
>ecco il codice del txtIniziato della form:
>
>Private Sub txtIniziato_BeforeUpdate(Cancel As Integer)
>If Me.txtnTrat <> DMin("nTrat", "Trat", "Comm=" & Me.txtComm) Then
>   If Nz(DLookup("Effettuato", "Trat", "Comm=" & Me.txtComm & " AND
>nTrat=" & DMax("nTrat", "Trat", "Comm=" &   Me.txtComm & " AND nTrat<"
>& Me.txtnTrat)), "No") = "No" Then
>   MsgBox "Trattamento precedente non effettuato"
>   DoCmd.CancelEvent
>   End If
>End If
>End Sub
>
>Ma per andare a capo nella seconda if come si fà? Io ho riportato
>nell'editor vb tutto su una riga, forse lì l'errore?
No, l'istruzione va tutta sulla medeisma riga.



title: Blocco record con condizione

text:
On 21 Mar, 10:14, "VT @ Work" <V...@Work.it> wrote:

Grazie, continua però con lo stesso errore e non so perchè.
Saresti così gentile da inviarmi magari l'esempio da te sviluppato
così potrei vedere che c'è di diverso?
Grazie di nuovo


title: Blocco record con condizione

text:

> Grazie di nuovo- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
Grazie risolto


title: Blocco record con condizione

text:
On Fri, 21 Mar 2008 05:59:56 -0700 (PDT),
dottce...@iol.it
 wrote:
 (...)
>> Grazie, continua perň con lo stesso errore e non so perchč.
>> Saresti cosě gentile da inviarmi magari l'esempio da te sviluppato
>> cosě potrei vedere che c'č di diverso?
>> Grazie di nuovo- Nascondi testo tra virgolette -
>>
>> - Mostra testo tra virgolette -
>
>Grazie risolto
Sarebbe cosa buona e giusta sapere come ...



title: Blocco record con condizione

text:
On 21 Mar, 14:20, "VT @ Work" <V...@Work.it> wrote:
> On Fri, 21 Mar 2008 05:59:56 -0700 (PDT),
dottcefal...@iol.it
 wrote:
>
>  (...)
>
> >> Grazie, continua però con lo stesso errore e non so perchè.
> >> Saresti così gentile da inviarmi magari l'esempio da te sviluppato
> >> così potrei vedere che c'è di diverso?
> >> Grazie di nuovo- Nascondi testo tra virgolette -
>
> >> - Mostra testo tra virgolette -
>
> >Grazie risolto
>
> Sarebbe cosa buona e giusta sapere come ...
>
> Vincenzo Turturro
>
> Certificato Eucip Core Level
> ITA 0000-002299 del 14/05/2007
> ---------------------------------------------
> il sito comune di it.comp.appl.access:
http://www.sitocomune.com
> ---------------------------------------------
> risorse Access:
http://www.accessgroup.it
> ---------------------------------------------
> Il sito comune di it.comp.as400
http://www.faq400.com
> ---------------------------------------------
Si Hai ragione, perdono.
Ho tolto i doppi apici su
"No") = "No" Then
diventa
If Nz(DLookup("Effettuato", "TratOK", "Comm=" & Me.Comm & " AND
nTrat=" & DMax("nTrat", "TratOK", "Comm=" & Me.Comm & " AND nTrat<" &
Me.nTrat)), False) = False Then
   MsgBox "Trattamento precedente non effettuato"
   DoCmd.CancelEvent
  End If
End If
End Sub
Grazie di nuovo e buona Pasqua


title: Blocco record con condizione

text:
Il Fri, 21 Mar 2008 07:25:09 -0700 (PDT),
dottce...@iol.it
 ha scritto:
>> >Grazie risolto
>>
>> Sarebbe cosa buona e giusta sapere come ...
>>
>> Vincenzo Turturro
>>
>Si Hai ragione, perdono.
>Ho tolto i doppi apici su
>"No") = "No" Then
>
>diventa
>
>If Nz(DLookup("Effettuato", "TratOK", "Comm=" & Me.Comm & " AND
>nTrat=" & DMax("nTrat", "TratOK", "Comm=" & Me.Comm & " AND nTrat<" &
>Me.nTrat)), False) = False Then
>   MsgBox "Trattamento precedente non effettuato"
>   DoCmd.CancelEvent
>  End If
>End If
>End Sub
>
>Grazie di nuovo e buona Pasqua
Non si tratta di doppi apici:
la colonna Effettuato è di tipo Boolean, mentre dall'esempio che avevi postato sembrava di tipo testo.
Tu non l'hai detto ed io non ci ho pensato ...



title: Blocco record con condizione

text:
On 22 Mar, 08:21, "VT @ home" <
V...@home.it
> wrote:

> ---------------------------------------------- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
Ciao Vincenzo, grazie dell'esempio inviatomi.
Comunque forse hai ragione in quanto avevo soltanto detto:
campo Effettuato= true
ambiguo forse.
Grazie di nuovo


title: Trova il primo spazio partendo da destra

author: News TIN

text:
Ho un campo con dei nomi all'interno, la stringa finisce sempre con uuna
virgola preceduta da alcuni caratteri alfanumerici ed uno spazio.
Come potrei fare per selezionare tutto quello che parte dalla virgola di
destra fino al primo spazio??  - da sinistra verso destra utilizzo
Espr:Mid([NomeCampo];1;InStr([NomeCampo];(" ")))


author: Antonio Biso

text:
News TIN <
mam...@tiscalinet.it
> wrote in message
8uefdh$iep$1...@nslave2.tin.it...

function miafun(str as string) as string
for i = len(str) to 1 step -1
  if mid(str,i,1) = " " then
    miafun = mid(str,i)
    exit function
  end if
next
end function
Poi la funzione la puoi usare anche in una query o comunque come espressione
Antonio


title: help in linea Access2k

author: Paolo opg

text:
forse sono un pò in ritardo, ma ho appena iniziato a usare sul serio access
2000 (il 97 mi bastava...).
l'help in linea è penoso come sembra ho ho scordato di installare qualcosa?
un esempio: quando dovevo creare un formato particolare per un campo di una
maschera, andavo in modalità struttura, proprietà del campo, formato e poi
con F1 mi saltava fuori direttamente il riepilogo delle possibilità con
qualche esempio.
adesso invece salta fuori una maschera di ricerca da cui partire inserendo
il termine voluto.
sono così anche le versioni successive?
--
+-------
| Paolo opg
|
| janickg ( at ) hotmail ( dot ) com
| (fake address in reply-to field!)
+-------


title: help in linea Access2k

author: namor

text:
Paolo opg ha scritto:
> forse sono un pò in ritardo, ma ho appena iniziato a usare sul serio access
> 2000 (il 97 mi bastava...).
> l'help in linea è penoso come sembra ho ho scordato di installare qualcosa?
> un esempio: quando dovevo creare un formato particolare per un campo di una
> maschera, andavo in modalità struttura, proprietà del campo, formato e poi
> con F1 mi saltava fuori direttamente il riepilogo delle possibilità con
> qualche esempio.
> adesso invece salta fuori una maschera di ricerca da cui partire inserendo
> il termine voluto.
> sono così anche le versioni successive?
Sì, purtroppo la guida di access 2000 fa schifo.
Si vede che con Access 97 alla Microsoft si sono accorti che dando agli
utenti un help in linea fatto troppo bene poi questi non comperano più i
loro manuali.
Non so com'è l'help di XP.
Namor
--

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


title: help in linea Access2k

author: sv

text:
namor ha scritto:
> Paolo opg ha scritto:
> > forse sono un pò in ritardo, ma ho appena iniziato a usare sul serio
access
> > 2000 (il 97 mi bastava...).
> > l'help in linea è penoso come sembra ho ho scordato di installare qualcosa?
> > un esempio: quando dovevo creare un formato particolare per un campo di
una
> > maschera, andavo in modalità struttura, proprietà del campo, formato e poi
> > con F1 mi saltava fuori direttamente il riepilogo delle possibilità con
> > qualche esempio.
> > adesso invece salta fuori una maschera di ricerca da cui partire inserendo
> > il termine voluto.
> > sono così anche le versioni successive?
> Sì, purtroppo la guida di access 2000 fa schifo.
> Si vede che con Access 97 alla Microsoft si sono accorti che dando agli
> utenti un help in linea fatto troppo bene poi questi non comperano più i
> loro manuali.
> Non so com'è l'help di XP.
> Namor
Concordo pienamente. Utilizzo Acc2000 da circa tre anni, e l'Help in linea
lo trovo tra l'altro estremamente pesante da caricare. Ho un fior di
computer con WinXP pro che utilizzo per lo sviluppo delle applicazioni ed
ogni volta che richiamo l'help le risorse del sistema vengono notevolmente
impegnate. Ho creato una partizione in uno dei due dischi con altro SO e lì
ho caricato Acc97: almeno mi è rimasto il vecchio Help.
--
rgrds
SC



title: Rettangolo in un report

author: Luigi

text:
Buon Giorno access97... in un report ho un rettangolo
..bene vorrei colorarlo di colori diversi a seconda del valore contenuto in
tabella 'BANCHE' riferito
al campo 'RETTANGOLO'
tipo 'ARANCIONE'= rettangolo di colore arancione
etc...
Grazie 1000
Luigi Bari


title: Rettangolo in un report

text:
"Luigi" <
luigic...@hotmail.com
> ha scritto nel messaggio
news:6bfjb.220123$hE5.7...@news1.tin.it...
> Buon Giorno access97... in un report ho un rettangolo
> ..bene vorrei colorarlo di colori diversi a seconda del valore contenuto
in
> tabella 'BANCHE' riferito
> al campo 'RETTANGOLO'
>
> tipo 'ARANCIONE'= rettangolo di colore arancione
> etc...
Su evento formattazione della sezione dove sta il rettangolo farai una serie
di test sul valore del campo quindi imposterai la proprietą backcolor del
controllo rettangolo col colore di conseguenza
Antonio


title: In A2007 succede che il .Format richiede salvataggio form

author: Ganimede

text:
Ciao a tutti,
nelle versioni precedenti non succedeva, almeno non succedeva
sicuramente in A97 e A2K.
Form principare con sub form in foglio dati. Tutto bello. Lo stesso
form lo uso in più punti del db e tramite dei .OpenArgs eseguo
operazioni differenti.
In un caso cambio il colore di una colonna del sub form
Forms!form_principale!sub_form!descrizione.Format = "![Blu]"
Ha sempre funzionato.... ma in A2007 alla chiusura del form mi chiede
di salvare le modifiche... con le altre versioni la modifica del
colore era "temporanea".
Qualche suggerimento ?
THX.
Ganimede Dignan


text:
"Ganimede"
Ciao a tutti,



Forms!form_principale!sub_form!descrizione.Format = "![Blu]"

Qualche suggerimento ?
>
Ti succede anche se il FE è .AccDE?
Saluti.


text:
> Ti succede anche se il FE .AccDE?
Il db nasce in mbd dato che lo uso con diverse versioni di Access.
L'ho convertito in .accdb e poi in .accde ed in quest'ultimo caso non
mi chiede di salvare.
Come posso fare ? ... non vorrei spostarmi dal mio caro .mdb
Miao.
Ganimede Dignan.


text:
"Ganimede" <

Prova così:
DoCmd.Close acForm, "NomeTuaForm", acSaveNo
Saluti.


text:
Ciao,
> Prova così:
>
> DoCmd.Close acForm, "NomeTuaForm", acSaveNo
>
> Saluti.
E' quello che faccio solitamente... nulla.
Grazie.


text:
Ciao a tutti,
Nessuno ha altre idee ? ... vorrei piangere.
Grazie & Miao.


title: Compattazione Db

author: Riaudo Marcello

text:
Salve a tutti ,
Ho una procedura fatta con access 97 ed utilizzavo  per compattare il Db  le
seguenti istruzioni:
DoCmd.Close
strPath = "wscript.exe " & "C:\Gestione\Compact.vbs " & Chr$(34) &
CurrentDb.Name & Chr$(34)
 'Call Shell(strPath, vbNormalFocus)
dove utilizzavo il file Compact.vbs  che funziona benissimo.
passando ad Access 2000 Non funziona più.
ps. qualcuno sa perché il file mdb aumenta sempre nel tempo.
grazie
Marcello Riaudo


title: Compattazione Db

author: Alessandro Baraldi

text:
"Riaudo Marcello" <
riau...@tin.it
> wrote in message
news:UTy_e.24417$
kA.34...@news3.tin.it

Il fatto che non funzioni più è da studiare nel file VBS
che non hai indicato e nemmeno inserito il codice.
In ogni caso dalla versione 2000 si può accedere al Menù
per effettuare il compact:
CommandBars("Menu Bar"). _
    Controls("Strumenti"). _
    Controls("Utilità database"). _
    Controls("Compatta e ripristina database..."). _
    accDoDefaultAction
Il fatto che il DB aumenti è normale in quanto memorizza
i nuovi valori e le cancellazioni, se poi ne modifichi il codice
senza compilarlo...!
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Compattazione Db

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:a433cc506b8238a237...@mygate.mailgate.org...

___________________________________________________________
Il il file Compact.vbs   si trova nella directory gestione e lo preso tanto
tempo fà sul sito comune, lo inserito nella directory indicata e su access
ho scritto le istruzioni che ho scritto sopra.
CommandBars("Menu Bar"). _
>    Controls("Strumenti"). _
>    Controls("Utilità database"). _
>    Controls("Compatta e ripristina database..."). _
>    accDoDefaultAction
queste funzioni però devono essere fatte dall'Utente, io vorrei che fosse
automatico
grazie di nuovo.
Riaudo Marcello


title: Compattazione Db

author: MA

text:

NO tu gli hai dato solo il path dove trovare compatta e ripristina
nell'ogegtto command bar
vedi che alla fine c'è accdodefaultAction??
l'utente deve solo lanciare il file bat
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: Compattazione Db

text:
"Riaudo Marcello" <
riau...@tin.it
> wrote in message
news:rCz_e.30313$
pJ6.2...@news4.tin.it
> Il il file Compact.vbs   si trova nella directory gestione e lo preso tanto
> tempo fà sul sito comune, lo inserito nella directory indicata e su access
> ho scritto le istruzioni che ho scritto sopra.
>
> CommandBars("Menu Bar"). _
> >    Controls("Strumenti"). _
> >    Controls("Utilità database"). _
> >    Controls("Compatta e ripristina database..."). _
> >    accDoDefaultAction
> queste funzioni però devono essere fatte dall'Utente, io vorrei che fosse
> automatico
>
> grazie di nuovo.
>
> Riaudo Marcello
Quella funzione non deve essere fatta dall'utente, provala prima
di fare SUPPOSTE che potrebbero rivoltartisi contro..! ;-)
In ogni caso Access dispone di una proprietà che trovi nelle
Opzioni(Compatta alla Chiusura) se lo flagghi la compattazione
verrà effettuata alla chiusura in AUTOMATICO.



title: Compattazione Db

text:
Alessandro Baraldi wrote:
> "Riaudo Marcello" <
riau...@tin.it
> wrote in message
> news:rCz_e.30313$
pJ6.2...@news4.tin.it
>
>> Il il file Compact.vbs   si trova nella directory gestione e lo
>> preso tanto tempo fà sul sito comune, lo inserito nella directory
>> indicata e su access ho scritto le istruzioni che ho scritto sopra.
>>
>> CommandBars("Menu Bar"). _
>>>    Controls("Strumenti"). _
>>>    Controls("Utilità database"). _
>>>    Controls("Compatta e ripristina database..."). _
>>>    accDoDefaultAction
>> queste funzioni però devono essere fatte dall'Utente, io vorrei che
>> fosse automatico
>>
>> grazie di nuovo.
>>
>> Riaudo Marcello
>
>
> Quella funzione non deve essere fatta dall'utente, provala prima
> di fare SUPPOSTE che potrebbero rivoltartisi contro..! ;-)
E se sono supposte che ti si volgono contro, son dolori...
>
> In ogni caso Access dispone di una proprietà che trovi nelle
> Opzioni(Compatta alla Chiusura) se lo flagghi la compattazione
> verrà effettuata alla chiusura in AUTOMATICO.
>
> @Alex
--



title: Compattazione Db

text:
hai ragione però, purtroppo per certe cose son Duro, non so dove mettere e
come inserire le istruzioni che mi hai passato.
chiedo scusa  ancora grazie
Riaudo Marcello
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:2fc55c453b5cd3429f...@mygate.mailgate.org...



title: Compattazione Db

text:
"MA" <
mas...@massimilianoamendola.it
> wrote in message
news:k0A_e.42376$
TR5....@news.edisontel.com
[CUT]
> E se sono supposte che ti si volgono contro, son dolori...
Si ma dipende dalle dimensioni e dalla forma, quelle quadrate
a detta di molti sono molto scomode.....



title: Compattazione Db

text:
"Riaudo Marcello" <
riau...@tin.it
> wrote in message
news:egA_e.30595$
pJ6.2...@news4.tin.it
> hai ragione però, purtroppo per certe cose son Duro, non so dove mettere e
> come inserire le istruzioni che mi hai passato.
>
> chiedo scusa  ancora grazie
>
> Riaudo Marcello
Il fatto di non sapere sta bene, basta chiedere...!
Metti quel codice che ti ho passato su evento Click di un
CommandButton e vedi che succede....!



title: Compattazione Db

author: Sergio MAZZA

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:b891bcef466523f988...@mygate.mailgate.org...
>
> Si ma dipende dalle dimensioni e dalla forma, quelle quadrate
> a detta di molti sono molto scomode.....
>
> @Alex
Sě ma non scivolano, al contrario di quelle tradizionali...
Ciao.
--
Sergio MAZZA


title: Compattazione Db

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> wrote in message
news:iOA_e.30730$
pJ6.2...@news4.tin.it

Ho detto scomode non comode...!
Il fatto che non scivolano passa in secondo piano al primo spigolo.
;-)



title: Compattazione Db

text:
Ringrazio Alessandro Baraldi ho risolto un problema che avevo da anni
e ho fatto questa funzione che serve a compattare un Db e/o far copia di
Backup dello stesso db forse può interessare ad altri.
Private Sub Uscita_Click()
On Error GoTo Err_Comando49_Click
   Dim retVal As Variant, strCmd As String
   If GLOPassword =  "****Ria" Then
      MessaggioOK = "Compattare Database Si No"
      DoCmd.OpenForm "CasellaSiNoRossa", , , , , acDialog ' Apre Maschera
      If ControlloOK <> "SI" Then
        'Copia su Computer C............:
         GloNomeComputer = TrovaNomeComputer
         Strcriteria = (CurrentDb().Name) '"xxxxxx.mdb"
         NomeMdb = Right(Strcriteria, Len(Strcriteria) -
InStrRev(Strcriteria, "\"))
         Strcriteria1 = "A" & Mid(Date, 7, Len(Date)) & "M" & Mid(Date, 4,
2) & "G" & _
                              Mid(Date, 1, 2) & "T" & Time
         Strcriteria1 = Strcriteria1 & NomeMdb
         strCmd = "xcopy " & Strcriteria & " C:\Turismo.cop\" & Strcriteria1
'& " /i "
         retVal = Shell(strCmd, 1)
         DoCmd.Close
         DoCmd.Quit
       Else
         'Compatta Db
          CommandBars("Menu Bar"). _
          Controls("Strumenti"). _
          Controls("Utilità database"). _
          Controls("Compatta e ripristina database..."). _
          accDoDefaultAction
       End If
   Else
      If Day(Date) / 2 - Int(Day(Date) / 2) > 0 Then
        'Copia su Computer se giorno Dispari
         Strcriteria = (CurrentDb().Name) '"xxxxxx.mdb"
         NomeMdb = Right(Strcriteria, Len(Strcriteria) -
InStrRev(Strcriteria, "\"))
         Strcriteria1 = "A" & Mid(Date, 7, Len(Date)) & "M" & Mid(Date, 4,
2) & "G" & _
                              Mid(Date, 1, 2) & "T" & Time
         Strcriteria1 = Strcriteria1 & NomeMdb
         strCmd = "xcopy " & Strcriteria & " C:\Turismo.cop\" & Strcriteria1
'& " /i "
         retVal = Shell(strCmd, 1)
      Else
      End If
      DoCmd.Close
      DoCmd.Quit
   End If
Exit_Comando49_Click:
    Exit Sub
Err_Comando49_Click:
    MsgBox Err.Description
    Resume Exit_Comando49_Click
End Sub
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:d868bd4046c3185eb3...@mygate.mailgate.org...



title: ancora compattazione alla chiusura

author: iperworld

text:
[cut]
>
>
> La Password non è nè funzionale nè sicura.
> Ci si impiega meno ad aprire un DB con la password
> che senza...!
>
> Usa la protezione a livello utente se vuoi qualcosa di più sicuro.
>
> @Alex
>
E' colpa mia, ho mescolato le due questioni e
così non ci siamo capiti:
So che la password sul DB non è sicura
e la protezione utente è meglio.
ma la domanda riguarda la compattazione in uscita!
è su quella che verte la questione:
 mi sembra di non potermi fidare: ho il dubbio che
una compattazione frequente potrebbe essere
causa di "crasch" del database?
per cui la domanda è: "voi usate abitualmente
la compattazione in chiusura sia del BE che del FE?"
grazia ancora per la cortesia


title: ancora compattazione alla chiusura

text:
"iperworld" <
iperworl...@libero.it
> wrote in message
news:43f4a088$0$28075$
4faf...@reader1.news.tin.it
> [cut]
> E' colpa mia, ho mescolato le due questioni e
> così non ci siamo capiti:
> So che la password sul DB non è sicura
> e la protezione utente è meglio.
L'unica colpa che puoi avere è quella di aver aperto un nuovo 3D.
> ma la domanda riguarda la compattazione in uscita!
> è su quella che verte la questione:
>  mi sembra di non potermi fidare: ho il dubbio che
> una compattazione frequente potrebbe essere
> causa di "crasch" del database?
>
> per cui la domanda è: "voi usate abitualmente
> la compattazione in chiusura sia del BE che del FE?"
Posso dirti come gestivo io  la cosa, poi non ho la pretesa sia
la soluzione a tutti i mali:
Io gestivo un'applicativo con 1 BE in un server di rete e circa
15 Client(FE) di cui la media di accessi contemporanei non era
mai superiore a 5÷6.
La compattazione alla chiusura del FE sempre.
La compattazione del BE alla chiusura mai.
Nel mio sistema avevo il vantaggio che le applicazioni erano usate
dalle 8:00 del mattino fino alle 19:00 circa della sera, quindi
mi sono creato un file VBS che ho schedulato sul server ed eseguiva
la compattazione alle 0:00:00.
Ho inoltre inserito in tutti i FE una gestione sia del Login
che del LogOut(forzato), poichè nel caso di necessità di
manutenzione straordinaria del BE io potessi tramite un applicativo
di Manutenzione imporre il Logout a tutti gli User connessi.
Ma questa è tutt'altra storia.
Ciao

> grazia ancora per la cortesia
Prego
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: ancora compattazione alla chiusura

text:
[cut]
> L'unica colpa che puoi avere č quella di aver aperto un nuovo 3D.
Lo temevo
> La compattazione alla chiusura del FE sempre.
> La compattazione del BE alla chiusura mai.
[cut]
> Ciao
>
>> grazia ancora per la cortesia
>
> Prego
> @Alex
grazie molte, farň cosě perchč temo che
verifichi l'evento "compattazione" del BE
quando un utente esce
mentre un altro utente scrive
nel qual caso non so cosa possa succedere.
compatterň periodicamente.
grazie ancora
PS: come sono andato con il quoting ;-?


title: ancora compattazione alla chiusura

text:
"iperworld" <
iperworl...@libero.it
> wrote in message
news:43f4b757$0$12588$
4faf...@reader3.news.tin.it
> [cut]
> grazie ancora
> PS: come sono andato con il quoting ;-?
Ottimo.



title: Sottoreport

author: Debora

text:
ho inserito un sottoreport in un report,
ora devo fare una somma su un controllo
del sottoreport, ho inserito una casella di testo
nel report e ho scritto
=somma([superficie])
superficie è un controllo del sottoreport.
Non funziona, dove sbaglio'
Debora


title: Sottoreport

author: Roberto da casa

text:
"Debora" <
cbo.ma...@tiscali.it
> ha scritto nel messaggio
news:Kv_m9.44890$e31.9...@twister2.libero.it...

Per prima cosa la funzione Somma non opera sui controlli ma sui campi,
quindi [superficie] non deve essere il nome di un controllo di una
sottomaschera ma il nome di un campo dell'oggetto che è origine record della
sottomaschera.
Se ne desume che la funzione Somma non può sommare un controllo calcolato
(per maggiori dettagli vedi help).
Se poi il nome del controllo coincide con il nome del campo, no problem:
resta il fatto che la somma viene fatta dei valori contenuti nei campi e non
quelli contenuti nei controlli.
Ciò premesso devi inserire nel piè di pagina report del sottoreport una
casella di testo non associata (chiamala Pippo) e nell'origine di questa
casella di testo che si trova nel sottoreport che scriverai:
=somma([superficie])
e non nell'origine controllo di una casella di testo che si trova nel report
principale.
A questo punto hai due possibilità: nella prima possibilità lasci Pippo
visibile, ed otticamente avrai la sensazione che il totale faccia parte del
report principale.
La seconda è che dichiari Pippo non visibile, inserisci una casella di testo
non associata nel report principale e nella sua origine controllo (se il
controllo sottoreport si chiama Pluto) scrivi:
=[Pluto]![Pippo]
Resta il fatto che nella funzione Somma scritta nell'origine controllo di
una casella di testo di un report principale non puoi far direttamente
riferimanto ad un campo dell'origine record di un sottoreport, ma solamente
a campi dell'origine record del report principale, oppure adotti il
marchingegno che ti ho spiegato.
Spero di essere stato chiaro.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Sottoreport

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:hi4n9.46795$e31.1...@twister2.libero.it...
>
> "Debora" <
cbo.ma...@tiscali.it
> ha scritto nel messaggio
> news:Kv_m9.44890$e31.9...@twister2.libero.it...
> > ho inserito un sottoreport in un report,
> > ora devo fare una somma su un controllo
> > del sottoreport, ho inserito una casella di testo
> > nel report e ho scritto
> > =somma([superficie])
> > superficie è un controllo del sottoreport.
> > Non funziona, dove sbaglio'
> > Debora
>
> Per prima cosa la funzione Somma non opera sui controlli ma sui campi,
> quindi [superficie] non deve essere il nome di un controllo di una
> sottomaschera ma il nome di un campo dell'oggetto che è origine record
della
> sottomaschera.
> Se ne desume che la funzione Somma non può sommare un controllo calcolato
> (per maggiori dettagli vedi help).
> Se poi il nome del controllo coincide con il nome del campo, no problem:
> resta il fatto che la somma viene fatta dei valori contenuti nei campi e
non
> quelli contenuti nei controlli.
Ok, nome controllo è lo stesso del nome campo
> Ciò premesso devi inserire nel piè di pagina report del sottoreport una
> casella di testo non associata (chiamala Pippo) e nell'origine di questa
> casella di testo che si trova nel sottoreport che scriverai:
> =somma([superficie])
Ok, nel piè pafina di report, sbagliavo qui.
> e non nell'origine controllo di una casella di testo che si trova nel
report
> principale.
> A questo punto hai due possibilità: nella prima possibilità lasci Pippo
> visibile, ed otticamente avrai la sensazione che il totale faccia parte
del
> report principale.
> La seconda è che dichiari Pippo non visibile, inserisci una casella di
testo
> non associata nel report principale e nella sua origine controllo (se il
> controllo sottoreport si chiama Pluto) scrivi:
> =[Pluto]![Pippo]
>
> Resta il fatto che nella funzione Somma scritta nell'origine controllo di
> una casella di testo di un report principale non puoi far direttamente
> riferimanto ad un campo dell'origine record di un sottoreport, ma
solamente
> a campi dell'origine record del report principale, oppure adotti il
> marchingegno che ti ho spiegato.
>
> Spero di essere stato chiaro.
Sei stato chiarissimo, come sempre.
Grazie 1000.
Debora


title: filtro e ordinamento

text:
Sono alle prese con una maschera che voglio poter ordinare e filtrare.
I problemi sono questi:
1) se applico un ordinamento (es. A-Z) questo mi viene salvato
*automaticamente* e applicato alla successiva apertura della maschera
2) se applico un filtro dopo aver effettuato un ordinamento, compare una
finestra che richiede l'immissione di un parametro (il valore della
combo associata al campo usato per il filtro). Ho provato a intercettare
vari eventi, cercando p.e. di modificare il valore di Me.OrderBY, senza
risolvere il problema.
Qualcuno mi sa aiutare?
Grazie
--
leo_duca


filtro e ordinamento


title: Utilizzo di DLookup in una msgbox

author: Carlo.

text:
Ciao!
Sto utilizzando i risultati di un DLookup per avvisare l'utente tramite
una semplice msgbox.
Se il risultato č relativo ad UN solo Record, il dato č visualizzato bene,
ma se č relativo a piů di un Record viene visualizzato il dato di un
Record soltanto (a caso) e non tutti i Record.
Es. Restituisci tutti i nomi dei prodotti che iniziano per "K" e
visualizzali in una msgbox. Se c'č un solo prodotto lo visualizza
correttamente, se ce ne sono di piů ne visualizza uno soltanto!
Come faccio a farli comparire tutti nella msgbox?
grazie in anticipo per l'aiuto,
Ciao!
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Utilizzo di DLookup in una msgbox

text:
"Carlo." <
ov...@tiscali.it
> ha scritto nel messaggio
news:clnsf5$kmt$1...@news.newsland.it...
>
> Ciao!
> Sto utilizzando i risultati di un DLookup per avvisare l'utente tramite
> una semplice msgbox.
> Se il risultato č relativo ad UN solo Record, il dato č visualizzato bene,
> ma se č relativo a piů di un Record viene visualizzato il dato di un
> Record soltanto (a caso) e non tutti i Record.
> Es. Restituisci tutti i nomi dei prodotti che iniziano per "K" e
> visualizzali in una msgbox. Se c'č un solo prodotto lo visualizza
> correttamente, se ce ne sono di piů ne visualizza uno soltanto!
> Come faccio a farli comparire tutti nella msgbox?
>
> grazie in anticipo per l'aiuto,
> Ciao!
>
Invece di una msgbox usi una maschera ad hoc e mostri quella.
Oppure conti i record e visualizzi un msgbox tipo
Ci sono Tot record che iniziano per K. Vuoi vederli?
MAssimiliano


title: Utilizzo di DLookup in una msgbox

text:
MA ha scritto:

Ciao Max
la msgbox mi serve come riepilogo, mi spiego meglio:
Prima di mandare una mail con una serie di allegati, presenta una msgbox
di riepilogo nella quale evidenzia quali prodotti iniziano per "K", poi
utilizza lo stesso elenco anche nell'oggetto e nel corpo della mail che
sto per inviare (con i famosi allegati), ma anche li non restituisce
un'elenco completo ma solo il risultato di un record!
Cosa suggerisci?!
Ps. scusa se non rispondo subito, rientro tra un'ora per la pausa pranzo!



title: Utilizzo di DLookup in una msgbox

author: Vulcanbrain

text:
"Carlo." <
ov...@tiscali.it
> ha scritto nel messaggio
news:clnt3j$qrr$1...@news.newsland.it...
> MA ha scritto:
>
>> "Carlo." <
ov...@tiscali.it
> ha scritto nel messaggio
>> news:clnsf5$kmt$1...@news.newsland.it...
>> >
>> > Ciao!
>> > Sto utilizzando i risultati di un DLookup per avvisare l'utente tramite
>> > una semplice msgbox.
>> > Se il risultato è relativo ad UN solo Record, il dato è visualizzato
>> > bene,
>> > ma se è relativo a più di un Record viene visualizzato il dato di un
>> > Record soltanto (a caso) e non tutti i Record.
>> > Es. Restituisci tutti i nomi dei prodotti che iniziano per "K" e
>> > visualizzali in una msgbox. Se c'è un solo prodotto lo visualizza
>> > correttamente, se ce ne sono di più ne visualizza uno soltanto!
>> > Come faccio a farli comparire tutti nella msgbox?
>> >
>> > grazie in anticipo per l'aiuto,
>> > Ciao!
>> >
>> Invece di una msgbox usi una maschera ad hoc e mostri quella.
>> Oppure conti i record e visualizzi un msgbox tipo
>> Ci sono Tot record che iniziano per K. Vuoi vederli?
>> MAssimiliano
>
> Ciao Max
> la msgbox mi serve come riepilogo, mi spiego meglio:
> Prima di mandare una mail con una serie di allegati, presenta una msgbox
> di riepilogo nella quale evidenzia quali prodotti iniziano per "K", poi
> utilizza lo stesso elenco anche nell'oggetto e nel corpo della mail che
> sto per inviare (con i famosi allegati), ma anche li non restituisce
> un'elenco completo ma solo il risultato di un record!
> Cosa suggerisci?!
> Ps. scusa se non rispondo subito, rientro tra un'ora per la pausa pranzo!
>
> --
>
> questo articolo e` stato inviato via web dal servizio gratuito
>
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it
>
>
Dlookup restituisce il primo dei valori che trova con i requisiti da te
richiesti.
Per visualizzarli tutti perchè non avvii un recordset?
Magari per velocizzare il tutto puoi fare un if su dcount, che se è >1
lancia il recordset altrimenti il dlookup


title: Utilizzo di DLookup in una msgbox

text:
Vulcanbrain ha scritto:
> "Carlo." <
ov...@tiscali.it
> ha scritto nel messaggio
> news:clnt3j$qrr$1...@news.newsland.it...
> > MA ha scritto:
> >
> >> "Carlo." <
ov...@tiscali.it
> ha scritto nel messaggio
> >> news:clnsf5$kmt$1...@news.newsland.it...
> >> >
> >> > Ciao!
> >> > Sto utilizzando i risultati di un DLookup per avvisare l'utente tramite
> >> > una semplice msgbox.
> >> > Se il risultato č relativo ad UN solo Record, il dato č visualizzato
> >> > bene,
> >> > ma se č relativo a piů di un Record viene visualizzato il dato di un
> >> > Record soltanto (a caso) e non tutti i Record.
> >> > Es. Restituisci tutti i nomi dei prodotti che iniziano per "K" e
> >> > visualizzali in una msgbox. Se c'č un solo prodotto lo visualizza
> >> > correttamente, se ce ne sono di piů ne visualizza uno soltanto!
> >> > Come faccio a farli comparire tutti nella msgbox?
> >> >
> >> > grazie in anticipo per l'aiuto,
> >> > Ciao!
> >> >
> >> Invece di una msgbox usi una maschera ad hoc e mostri quella.
> >> Oppure conti i record e visualizzi un msgbox tipo
> >> Ci sono Tot record che iniziano per K. Vuoi vederli?
> >> MAssimiliano
> >
> > Ciao Max
> > la msgbox mi serve come riepilogo, mi spiego meglio:
> > Prima di mandare una mail con una serie di allegati, presenta una msgbox
> > di riepilogo nella quale evidenzia quali prodotti iniziano per "K", poi
> > utilizza lo stesso elenco anche nell'oggetto e nel corpo della mail che
> > sto per inviare (con i famosi allegati), ma anche li non restituisce
> > un'elenco completo ma solo il risultato di un record!
> > Cosa suggerisci?!
> > Ps. scusa se non rispondo subito, rientro tra un'ora per la pausa pranzo!
> >
> > --
> >
> > questo articolo e` stato inviato via web dal servizio gratuito
> >
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it
> >
> >
> Dlookup restituisce il primo dei valori che trova con i requisiti da te
> richiesti.
> Per visualizzarli tutti perchč non avvii un recordset?
> Magari per velocizzare il tutto puoi fare un if su dcount, che se č >1
> lancia il recordset altrimenti il dlookup
Ora capisco! Proverň con un rst! Ciao e grazie



title: query PT da codice ora mi sballa la data

author: pfmarro

text:
salve
ho 2 tabelle in SQL collegate
creo  da codice un query PT
non capisco come mai da un po' di tempo  il campo DataArrivo che è DateTime in SQL
nella query PT lo vedo visualizzato yyyy-mm-dd mentre altre 2 campi DScarico che è sempre DateTime lo vedo corretto

cosa sbaglio?

GRAZIE


title: Maschere a schemo intero e protezione

author: Giuseppe

text:
Ciao,
come poso fare in modo da far aprire le maschere, query e report a schermo
intero ?
Quando li apro, queste appaiono in formato piccolo sono quindi costretto a
cliccare su "ingrandisci" della barra del titolo per alargarle.
Inoltre esiste qualche protezione tale da nascondere il progetto del DB
ovvero non far apparire la struttura delle maschere, query ecc. ?
Grazie per l'aiuto
ciao
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Maschere a schemo intero e protezione

author: Roberto dal portatile

text:
"Giuseppe" <
raggiodi...@libero.it
> ha scritto nel messaggio
news:217Z59Z200Z58Y...@usenet.libero.it...
>
> Ciao,
> come poso fare in modo da far aprire le maschere, query e report a schermo
> intero ?
Per le maschere ed i report a fronte dell'evento "Su apertura" genera questa
riga di codice VBA:
DoCmd.Maximize
> Quando li apro, queste appaiono in formato piccolo sono quindi costretto a
> cliccare su "ingrandisci" della barra del titolo per alargarle.
> Inoltre esiste qualche protezione tale da nascondere il progetto del DB
> ovvero non far apparire la struttura delle maschere, query ecc. ?
Dal file MDB creati un file MDE (vedi help) ed usa quello: in esso è
visibile solo la struttura delle tabelle.
>
> Grazie per l'aiuto
Prego
> ciao
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: Maschere a schemo intero e protezione

text:
Il 29 Giu 2006, 17:13, "Roberto dal portatile" <
r.ma...@libero.it
> ha
scritto:
>
> "Giuseppe" <
raggiodi...@libero.it
> ha scritto nel messaggio
> news:217Z59Z200Z58Y...@usenet.libero.it...
> >
> > Ciao,
> > come poso fare in modo da far aprire le maschere, query e report a
schermo
> > intero ?
>
> Per le maschere ed i report a fronte dell'evento "Su apertura" genera
questa
> riga di codice VBA:
>
> DoCmd.Maximize
>
> > Quando li apro, queste appaiono in formato piccolo sono quindi costretto
a
> > cliccare su "ingrandisci" della barra del titolo per alargarle.
> > Inoltre esiste qualche protezione tale da nascondere il progetto del DB
> > ovvero non far apparire la struttura delle maschere, query ecc. ?
>
> Dal file MDB creati un file MDE (vedi help) ed usa quello: in esso č
> visibile solo la struttura delle tabelle.
>
> >
> > Grazie per l'aiuto
>
> Prego
>
> > ciao
>
Ciao Roberto,
ti ringrazio per le info.
Per la la conversione da MDB a MDE ok, vedrň l'help.
Per l'evento Su apertura , potresti darmi qualche info in piů: devo creare
una piccola routine in VB? Come faccio a farla partire in apertura del DB ?
Ti ringrazio e mi scuso del disturbo ulteriore.
Ciao
Giuseppe



title: Maschere a schemo intero e protezione

author: VedoTondo

text:
"Giuseppe" <
raggiodi...@libero.it
> ha scritto nel messaggio
news:87Z1Z75Z167Y1...@usenet.libero.it...
> Per l'evento Su apertura , potresti darmi qualche info in più: devo creare
> una piccola routine in VB?
Si!
> Come faccio a farla partire in apertura del DB ?
In apertura del DB non lo sò ma su apertura della Form Puoi usare il form
load.
Saluti Andrea


title: maschera di ricerca

author: rick

text:
in un database che creato per la mia videoteca, ho inserito una maschera
per la ricerca (per titolo, per attore, per regista ecc.). Accanto alle
caselle di testo dove scrivere ho messo dei pulsanti che mi filtrano in
dati
in base alla selezione: ho fatto tutto con l'autocomposizione e fin qui
tutto ok. Il mio problema nasce dal fatto che vorrei inserire un msgbox
nel caso in cui le parole chiave inserite non avessero corrispondenza.
Allego sotto il codice di uno del pulsante trova per titolo (anche se è
banalmente quello dell'autocomposizione di access):
Private Sub Comando4_Click()
On Error GoTo Err_Comando4_Click
    Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "films"

    stLinkCriteria = "[titolo]=" & "'" & Me![CasellaCombinata2] & "'"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_Comando4_Click:
    Exit Sub
Err_Comando4_Click:
    MsgBox Err.Description
    Resume Exit_Comando4_Click

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


title: maschera di ricerca

author: Fabio

text:
"rick" <
viv...@libero.it
> ha scritto nel messaggio
news:alnhl4$s3h$1...@news.newsland.it...
> in un database che creato per la mia videoteca, ho inserito una maschera
> per la ricerca (per titolo, per attore, per regista ecc.). Accanto alle
> caselle di testo dove scrivere ho messo dei pulsanti che mi filtrano in
> dati
> in base alla selezione: ho fatto tutto con l'autocomposizione e fin qui
> tutto ok. Il mio problema nasce dal fatto che vorrei inserire un msgbox
> nel caso in cui le parole chiave inserite non avessero corrispondenza.
>
> Allego sotto il codice di uno del pulsante trova per titolo (anche se č
> banalmente quello dell'autocomposizione di access):
>
> Private Sub Comando4_Click()
> On Error GoTo Err_Comando4_Click
>
>     Dim stDocName As String
>     Dim stLinkCriteria As String
>
>     stDocName = "films"
>
>     stLinkCriteria = "[titolo]=" & "'" & Me![CasellaCombinata2] & "'"
>     DoCmd.OpenForm stDocName, , , stLinkCriteria
>
> Exit_Comando4_Click:
>     Exit Sub
>
> Err_Comando4_Click:
>     MsgBox Err.Description
>     Resume Exit_Comando4_Click
>
> End Sub
>
Se la maschera Films č basata su una tabella Films modifica cosě la routine
Private Sub Comando4_Click()
On Error GoTo Err_Comando4_Click
    Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "films"
    stLinkCriteria = "[titolo]=" & "'" & Me![CasellaCombinata2] & "'"
    if dcount("*","Films",stlinkcriteria)>0 then
        DoCmd.OpenForm stDocName, , , stLinkCriteria
   else
         msgbox "Esito ricerca negativo"
   end if
Exit_Comando4_Click:
    Exit Sub
Err_Comando4_Click:
    MsgBox Err.Description
    Resume Exit_Comando4_Click
End Sub
Ciao, FABIO


title: maschera di ricerca

text:
Fabio wrote:
..cut
> Se la maschera Films č basata su una tabella Films modifica cosě la routine
> Private Sub Comando4_Click()
> On Error GoTo Err_Comando4_Click
>     Dim stDocName As String
>     Dim stLinkCriteria As String
>     stDocName = "films"
>     stLinkCriteria = "[titolo]=" & "'" & Me![CasellaCombinata2] & "'"
>     if dcount("*","Films",stlinkcriteria)>0 then
>         DoCmd.OpenForm stDocName, , , stLinkCriteria
>    else
>          msgbox "Esito ricerca negativo"
>    end if
> Exit_Comando4_Click:
>     Exit Sub
> Err_Comando4_Click:
>     MsgBox Err.Description
>     Resume Exit_Comando4_Click
> End Sub
> Ciao, FABIO
funziona alla grandissima, grazie
