title: pannello comandi trasparente

author: Il Gatto

text:
"Luciano" <
lu.s...@aliceposta.it
> ha scritto nel messaggio
news:oGPGd.418158$b5.20...@news3.tin.it...
>
> "Pablitomf" <
maurizio...@accessgroup.it
> ha scritto nel messaggio
> news:csgcbe$do0$1...@news.newsland.it...
>> Luciano ha scritto:
>>
> Dal sito comune ho scaricato un DB che con qualche modulo, una maschera e
> una tabella inseriti nel mio DB mi da la possibilità di personalizzare con
> un'immagine lo sfondo grigio di Access. Ho scelto uno sfondo ma il
> pannello comandi, che naturalmente si apre all'avvio, mi si piazza proprio
> davanti, ed essendo un pò grandino mi copre molto dello sfondo. E' per
> questo che mi sono chiesto se era possibile renderne trasparente lo
> sfondo, come se fosse una cornice vuota (lasciando però i pulsanti
> visibili naturalmente). Che ne dici?
Ho provato a convertire in VB quello che uso in C (Windows 2000/Xp), ma non
sembra collaborare molto, anche perché qui devi modificare lo stile esteso
della finestra al volo, e fa dei casini allucinanti:
'Da mettere in un modulo qualsiasi
Declare Function SetLayeredWindowAttributes Lib "user32.dll" (ByVal hWnd As
Long, ByVal crKey As Long, ByVal bAlpha As Byte, ByVal dwFlags As Long) As
Long
Declare Function SetWindowLong Lib "user32.dll" Alias "SetWindowLongA"
(ByVal hWnd As Long, ByVal nIndex As Long, dwNewLong As Long) As Long
Declare Function GetWindowLong Lib "user32.dll" Alias "GetWindowLongA"
(ByVal hWnd As Long, ByVal nIndex As Long) As Long
Public Const GWL_EXSTYLE As Long = (-20)
Public Const WS_EX_LAYERED As Long = &H80000
Public Const LWA_ALPHA As Long = 2
Public Const LWA_COLORKEY As Long = 1
' Da mettere in Form_Load()
Dim MioLong As Long
MioLong = GetWindowLong(Me.hWnd, GWL_EXSTYLE)
If MioLong = 0 Then
    MsgBox "Fallita lettura stile", vbCritical + vbOKOnly, Err.LastDllError
Else
    MioLong = MioLong Or WS_EX_LAYERED
    If SetWindowLong(Me.hWnd, GWL_EXSTYLE, MioLong) <> 0 Then
        If SetLayeredWindowAttributes(Me.hWnd, 0, 128, LWA_ALPHA) = 0 Then
          MsgBox "Fallita impostazione alpha", vbCritical + vbOKOnly,
Err.LastDllError
        End If
    Else
        MsgBox "Fallito cambiamento attributi" & Err.Description, vbCritical
+ vbOKOnly, Err.LastDllError
    End If
End If
Quando imposto il valore Alpha (128 = 50%, ma qualsiasi valore non gli
piace) ritorna il codice d'errore 87 (parametro errato). Se qualcuno ha
qualche idea...
IG


title: pannello comandi trasparente

author: Alessandro Baraldi

text:
"Il Gatto" <
no...@nowhere.no
> wrote in message
news:VeRGd.88660$
C94....@tornado.fastwebnet.it
[CUT]
>
> Ho provato a convertire in VB quello che uso in C (Windows 2000/Xp), ma non
> sembra collaborare molto, anche perché qui devi modificare lo stile esteso
> della finestra al volo, e fa dei casini allucinanti:
>
[CUT]
Da quello che ne sò il problema è a monte.
La costante WS_EX_LAYERED non è supportata dalle funzioni grafiche
di Access.
Access non lavora e non può lavorare in modalità MultiLayer, motivo
per il quale se debugghi
    MioLong = MioLong Or WS_EX_LAYERED
    msgbox SetWindowLong(Me.hWnd, GWL_EXSTYLE, MioLong)

Ritorna sempre ZERO.
Io a suo tempo ho risolto in un'altro modo, ti spiego sinteticamente
la tecnica dato che mi pare ti interessino le API.
[UTILIZZO DI QUESTE]
Private Declare Function CreateRectRgn Lib "gdi32" (ByVal X1 As Long,
ByVal Y1 As Long, ByVal X2 As Long, ByVal Y2 As Long) As Long
Private Declare Function CombineRgn Lib "gdi32" (ByVal hDestRgn As Long,
ByVal hSrcRgn1 As Long, ByVal hSrcRgn2 As Long, ByVal nCombineMode As
Long) As Long
Private Declare Function SetWindowRgn Lib "user32" (ByVal hWnd As Long,
ByVal hRgn As Long, ByVal bRedraw As Long) As Long
Ho scomposto il lavoro in 2 Parti:
1)La parte della Maschera
2)La parte dei Controlli.
Per la Maschera ho generato 2 Regioni, una interno Bordo, l'altra
la dimensione esterna.
Quì devi passare all'API GetWindowRect l'Handle della Form per
ricavare correttamente le coordinate, da cui estrai le dimensioni
delle 2 Aree, tra le quali dovrai fare la differenza, otterrai così
Il BORDO in chiaro e l'interno Trasparente.
Ora hai eliminato anche tutti i Controlli....!! ;-)
Memorizza l'Handle della Regione risultante per dopo.
Ora per ogni controllo nella Form devi fare la stessa cosa
quindi Cicli la Classe Controls e ricavi la Regione passando
le Coordinate dello stesso come relative alla WindowRect di prima.
Ora fai un bell'OR tra la regione del Controllo e quella in trasparenza
di prima, e per magia riappaiono tutti i controlli.
Fondamentale sono le coordinate Rect, e la conversione Twips-->Pixel
per la corretta posizione dei Controlli come spostamento relativo.
Buon divertimento...!!
Non sono sadico, ma il Demo che feci qualche anno fà l'ho perso
e no l'ho mai pubblicato in quanto la ritengo poco utile.
In ogni caso alcuni esempi dell'Uso delle Regioni li trovi nel mio
sito nel DEMO:
Sezione [API]
   RoundRect(Form Arrotondate)
http://www.mantuanet.it/alessandro.baraldi/
Ciao



title: pannello comandi trasparente

text:
"Alessandro Baraldi" <
ik2...@libero.it
> wrote in message
news:241075ae3187f53e4d...@mygate.mailgate.org
> "Il Gatto" <
no...@nowhere.no
> wrote in message
> news:VeRGd.88660$
C94....@tornado.fastwebnet.it
>
> [CUT]
> >
> > Ho provato a convertire in VB quello che uso in C (Windows 2000/Xp), ma non
> > sembra collaborare molto, anche perché qui devi modificare lo stile esteso
> > della finestra al volo, e fa dei casini allucinanti:
> >
> [CUT]
Ho fatto qualche riprova:
Copia ed incolla questo in una Form, e vedine l'effetto.
Const LWA_COLORKEY = &H1
Const LWA_ALPHA = &H2
Const GWL_EXSTYLE = (-20)
Const WS_EX_LAYERED = &H80000
Private Declare Function GetWindowLong Lib "user32" Alias
"GetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long) As Long
Private Declare Function SetWindowLong Lib "user32" Alias
"SetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal
dwNewLong As Long) As Long
Private Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal
hWnd As Long, ByVal crKey As Long, ByVal bAlpha As Byte, ByVal dwFlags
As Long) As Long
Private Sub Form_Load()
     Dim Ret As Long
      Ret = GetWindowLong(Application.hWndAccessApp, GWL_EXSTYLE)
    Ret = Ret Or WS_EX_LAYERED
    SetWindowLong Application.hWndAccessApp, GWL_EXSTYLE, Ret
     SetLayeredWindowAttributes Application.hWndAccessApp, 0, 128,
LWA_ALPHA
End Sub
Come vedi la Finestra di ACCESS supporta la cosa in quanto è generata
da una Classe tipica.
Le Form di Access che si suppone siano SDI in realtà vengono
gestite in modo un pò particolare, come tutti gli oggetti grafici
di Access.
In pratica diventano veri solo quando hanno il Focus, queste
semplificazioni
rendono Access molto veloce, ma graficamente limitato....!
Se trovo qualche cosa di più tecnico te lo dico.
Ciao
@ALex



title: pannello comandi trasparente

author: Lele

text:
Ho provato quanto hai postato, e' interessante, funziona.
ciao



title: pannello comandi trasparente

text:
"Lele" <
lele...@gmail.com
> wrote in message
news:hJ2Hd.708884$
35.28...@news4.tin.it
> Ho provato quanto hai postato, e' interessante, funziona.
>
> ciao
Io non la trovo interessante, a cosa potrebbe servire
una Form di Access(con figli a seguito) parzialmente/Totalmente
Trasparente..?
In VB č decisamente meglio gestibile.
Ciao
@Alex



title: pannello comandi trasparente

author: Oscar Manfredini

text:
"Alessandro Baraldi"
> Io non la trovo interessante, a cosa potrebbe servire
> una Form di Access(con figli a seguito) parzialmente/Totalmente
> Trasparente..?
>
> In VB č decisamente meglio gestibile.
Non serve a nulla in ogni caso: non stiamo parlando di giochi...
Ciao.


title: pannello comandi trasparente

text:
"Oscar Manfredini" <
X...@tiscalinet.it
> wrote in message
news:WD3Hd.9532$
GU.3...@twister1.libero.it

Concordo, ma sai che ognuno puň pitturare i propri lavori
come crede.



title: pannello comandi trasparente

text:
"Alessandro Baraldi"
> > Non serve a nulla in ogni caso: non stiamo parlando di giochi...
> Concordo, ma sai che ognuno puň pitturare i propri lavori
> come crede.
Se parliamo di skins grafiche posso essere d'accordo.
Ma non scherziamo con le trasparenze: i programmi devono essere usati, otto
ore al giorno, da utenti che loro malgrado non ci giocano...
Posso consigliare all'amico di:
1) Non usare i pannelli comandi, soluzione preistorica, e affidarsi a barre
dei menů.
2) Oppure inserire i pulsanti del pannello direttamente sullo sfondo grafico
dell'applicazione (i pulsanti potrebbero contenere temi grafici compatibili
con lo sfondo).
Ciao.


title: pannello comandi trasparente

text:
"Oscar Manfredini" <
X...@tiscalinet.it
> wrote in message
news:xq6Hd.9627$
fs6.2...@twister2.libero.it
[CUT]
>
> Se parliamo di skins grafiche posso essere d'accordo.
> Ma non scherziamo con le trasparenze: i programmi devono essere usati, otto
> ore al giorno, da utenti che loro malgrado non ci giocano...
In generale non compatisco nemmeno le Skins
> Posso consigliare all'amico di:
>
> 1) Non usare i pannelli comandi, soluzione preistorica, e affidarsi a barre
> dei menù.
Sacre parole...!
> 2) Oppure inserire i pulsanti del pannello direttamente sullo sfondo grafico
> dell'applicazione (i pulsanti potrebbero contenere temi grafici compatibili
> con lo sfondo).
>
> Ciao.
Questa non l'ho capita.
Vuoi dire di creare una Form Massimizzata che faccia da Sfondo
nella quale mettere i Comandi...??
Ciao



title: pannello comandi trasparente

text:
"Alessandro Baraldi"
> Questa non l'ho capita.
> Vuoi dire di creare una Form Massimizzata che faccia da Sfondo
> nella quale mettere i Comandi...??
Una form d'avvio con temi grafici già ce l'ha, da quanto scrive...
Perchè non inserire i pulsanti (immagini graficamente coerenti con lo
sfondo) direttamente sopra?
Resta il fatto che i pannelli di comandi sono davvero "antichi": che c'è di
meglio di una barrà dei menù con tutte le opzioni sempre a portata di mouse
(i pannelli comandi vengono sovrapposti dalle forms aperte).
Ciao.


title: pannello comandi trasparente

text:
"Oscar Manfredini" <
X...@tiscalinet.it
> wrote in message
news:8y7Hd.9945$
GU.3...@twister1.libero.it
>
> "Alessandro Baraldi"
>
> > Questa non l'ho capita.
> > Vuoi dire di creare una Form Massimizzata che faccia da Sfondo
> > nella quale mettere i Comandi...??
>
> Una form d'avvio con temi grafici già ce l'ha, da quanto scrive...
> Perchè non inserire i pulsanti (immagini graficamente coerenti con lo
> sfondo) direttamente sopra?
Avevo capito un'altra cosa.
Se leggi inizialmente l'Immagine non l'ha messa nella Form Avvio,
ma ha sostituito il BackGround della MDI(Access), pertanto la
Form(Avvio)
è Grigia, con queste mie considerazoni ho frainteso le tue...!
Tutto OK
> Resta il fatto che i pannelli di comandi sono davvero "antichi": che c'è di
> meglio di una barrà dei menù con tutte le opzioni sempre a portata di mouse
> (i pannelli comandi vengono sovrapposti dalle forms aperte).
>
> Ciao.
Vabbè che ci facciamo lo obblighiamo...?
Se si potesse io sarei il primo....! ;-)



title: pannello comandi trasparente

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:241075ae3187f53e4d...@mygate.mailgate.org...
> "Il Gatto" <
no...@nowhere.no
> wrote in message
> news:VeRGd.88660$
C94....@tornado.fastwebnet.it
> Da quello che ne sò il problema è a monte.
> La costante WS_EX_LAYERED non è supportata dalle funzioni grafiche
> di Access.
> Access non lavora e non può lavorare in modalità MultiLayer, motivo
> per il quale se debugghi
>
>    MioLong = MioLong Or WS_EX_LAYERED
>    msgbox SetWindowLong(Me.hWnd, GWL_EXSTYLE, MioLong)
>
> Ritorna sempre ZERO.
E' qui che ho preso una fregatura: In vba NON mi ritorna 0, va avanti e poi
da parametro errato sulla SetLayeredWindowAttributes, dove con questo
immagino si intenda l'hwnd che fa riferimento a una finestra non layered e
non come pensavo io al valore di trasparenza. Per pura curiosità ho creato
una micro dll in C da richiamare in VB che facesse le stesse cose con una
funzione che prendeva come solo parametro l'HWND e qui sì che SetWindowLong
ritorna sempre 0 con le mdichild di Access!!!
IG


title: pannello comandi trasparente

author: ALESSANDRO Baraldi

text:
> E' qui che ho preso una fregatura: In vba NON mi ritorna 0, va avanti e
poi
> da parametro errato sulla SetLayeredWindowAttributes, dove con questo
> immagino si intenda l'hwnd che fa riferimento a una finestra non layered e
> non come pensavo io al valore di trasparenza. Per pura curiosità ho creato
> una micro dll in C da richiamare in VB che facesse le stesse cose con una
> funzione che prendeva come solo parametro l'HWND e qui sì che
SetWindowLong
> ritorna sempre 0 con le mdichild di Access!!!
>
> IG
In VB funziona perfettamente sulle Form in quanto ogni
form è una MDI sulle Child come giustamente hai intuito
la cosa è analoga ad Access...!
Porteremo pazienza anche su questa menomazione.
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: pannello comandi trasparente

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:41ed4d61$0$133$5fc...@news.tiscali.it...
>
> Porteremo pazienza anche su questa menomazione.
>
Sono ansioso di vedere (se mai ci sarà) un Office .Net: li non potranno
barare più di tanto, se un form sarà derivato da System.Windows.Forms.Form
dovrò poterci fare almeno tutto quello che faccio con un Form, Opacity per
la trasparenza (al di la dell'utilità) inclusa! O ci beccheremo
Office.Access.Form, ipotetica versione specifica monca!?! :-)
IG


title: pannello comandi trasparente

text:
"Il Gatto" <
no...@nowhere.no
> ha scritto nel messaggio
news:57sHd.91908$C94....@tornado.fastwebnet.it...

La tua considerazione mi farebbe felice, io che praticamente uso solo
le API sarei a nozze senza più limitazioni di HWND dei controlli solo
se hanno il Focus, piuttosto che non avere un HDC, e dovermene creare
uno fittizio magari solo per gestire un minimo effetto grafico...!
Dopo, come detto, ognuno ci fà quello che ci vuole, io se non richiesto
non voglio sindacare, posso esprimere solo la mia opinione.
Magari..!!!



title: pannello comandi trasparente

text:
"ALESSANDRO Baraldi"
> La tua considerazione mi farebbe felice, io che praticamente uso solo
> le API sarei a nozze senza più limitazioni di HWND dei controlli solo
> se hanno il Focus, piuttosto che non avere un HDC, e dovermene creare
> uno fittizio magari solo per gestire un minimo effetto grafico...!
> Dopo, come detto, ognuno ci fà quello che ci vuole, io se non richiesto
> non voglio sindacare, posso esprimere solo la mia opinione.
E' diretta a me quest'affermazione?   :-)
Nessun problema; però non perdere di vista la realtà: le suddette richieste
sono niente più che giochini.
E' più importante che un generatore d'interfacce per DB sia veloce o che
supporti giochetti grafici?
Ciao.


title: pannello comandi trasparente

text:
> E' diretta a me quest'affermazione?   :-)
> Nessun problema; però non perdere di vista la realtà: le suddette
richieste
> sono niente più che giochini.
>
> E' più importante che un generatore d'interfacce per DB sia veloce o che
> supporti giochetti grafici?
>
> Ciao.
No Oscar non preoccuparti se fosse rivolta a te come ad altri sarei diretto
non ho nessun problema o vergogna a dire quello che penso, dovresti averlo
capito, era proprio un affermazione fine a se stessa.
Anzi in questo caso sono della tua stessa opinione, tutte cazzate, ma
ripeto, che gli vuoi fare
se uno lo vuole il "GIOCHINO", lo uccidi...?? ZZiiii suoi...! ti pare..?



title: pannello comandi trasparente

text:
"ALESSANDRO Baraldi"
> No Oscar non preoccuparti se fosse rivolta a te come ad altri sarei
diretto
> non ho nessun problema o vergogna a dire quello che penso, dovresti averlo
> capito, era proprio un affermazione fine a se stessa.
> Anzi in questo caso sono della tua stessa opinione, tutte cazzate, ma
> ripeto, che gli vuoi fare
> se uno lo vuole il "GIOCHINO", lo uccidi...?? ZZiiii suoi...! ti pare..?
Per caritą: rifiuto la violenza!   :-)
Chiaramente se si puņ raggiungere l'obiettivo in maniera lineare, evitando
inutili scampagnate credo sia meglio no?
Non vedo perchč dover rendere un pannello comandi trasparente (per far
risaltare lo sfondo grafico) quando si puņ tranquillamente (secondo me si
*deve*) lavorare su un'unica form che faccia sia da sfondo che da pannello
comandi.
Questa puntualizzazione solo per rimanere nel Th.
Ciao.


title: pannello comandi trasparente

author: MA

text:
"Oscar Manfredini" <
X...@tiscalinet.it
> ha scritto nel messaggio
news:h1OHd.429$5k5....@twister2.libero.it...

Ti dirņ la veritą a me non piace molto la mascheramassimizzata...
Mi mandi la foto di una tua maschera?
Sono curioso
MAssimiliano


title: pannello comandi trasparente

text:
"Oscar Manfredini" <
X...@tiscalinet.it
> wrote in message
news:h1OHd.429$
5k5....@twister2.libero.it
[CUT]
> Chiaramente se si può raggiungere l'obiettivo in maniera lineare, evitando
> inutili scampagnate credo sia meglio no?
> Non vedo perchè dover rendere un pannello comandi trasparente (per far
> risaltare lo sfondo grafico) quando si può tranquillamente (secondo me si
> *deve*) lavorare su un'unica form che faccia sia da sfondo che da pannello
> comandi.
Questo metodo è bello e permette di avere magari un LOGO di sfondo,
nonchè tante comodità non indifferenti di gestione.
Io e te la pensiamo così, e anche altre persona
che hanno sviluppato lavori abbastanza importanti(in Access), a
significare che è un metodo ben valutato, altri possono avere
idee innovative ;-) e magari migliori.
Lascia fare, chi si perde per queste cose, magari è solo per
far risaltare effetti speciali...................................
> Questa puntualizzazione solo per rimanere nel Th.
> Ciao.
Certo, ed io raccolgo
(Pensavo di essere dispotico io nei miei modi, ma vedo che
ho un'ottima compagnia nel NG, mi sento supportato)



title: pannello comandi trasparente

text:
"MA"
> Ti dirņ la veritą a me non piace molto la mascheramassimizzata...
De gustibus...
> Mi mandi la foto di una tua maschera?
Certo che no: mai avuto tempo da perdere con quisquillie grafiche  :)
Inoltre non uso "pannelli di comando": sono inutili residui DOS Style.
> Sono curioso
Un esempio pubblico di Access Form di grande impatto estetico potrebbe
essere il Task Manager pubblicato da Baraldi sulla sua area.
Non serve un artista per prendere spunto da un'idea del genere e creare un
Pannello comandi (massimizzato l'hai aggiunto tu, io non lo pensavo) bello
graficamente e che
faccia pure da Form d'avvio.
Ciao.


title: pannello comandi trasparente

text:
> (Pensavo di essere dispotico io nei miei modi, ma vedo che
> ho un'ottima compagnia nel NG, mi sento supportato)
Ah, quindi il mio stile ti pare dispotico?  :-)
Ciao.


title: pannello comandi trasparente

author: cidi

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:xvPHd.5602$fq5....@news.edisontel.com...

anche io......quindi   :-)
> MAssimiliano
>
grazie
---
Daniele


title: pannello comandi trasparente

text:

Se ti interessa ti mando qualcosa di mio
MAssimiliano


title: pannello comandi trasparente

text:

Ebbene si.
Almeno poco democratico visto che
vuoi obbligare, a costo di usare la forza bruta, a piegarsi
al tuo volere, anche se tecnicamente ineccepibile.
P.S. adesso non chiedermi se per "Bruta" fosse riferito a te...!!!!
Giuro che non ti ho mai visto pertanto ogni rif. è casuale.
;-)



title: pannello comandi trasparente

text:
> Un esempio pubblico di Access Form di grande impatto estetico potrebbe
> essere il Task Manager pubblicato da Baraldi sulla sua area.
> Non serve un artista per prendere spunto da un'idea del genere e creare un
> Pannello comandi (massimizzato l'hai aggiunto tu, io non lo pensavo) bello
> graficamente e che
> faccia pure da Form d'avvio.
>
> Ciao.
Ho un programmino che realizza SKINS delle quali salvi le impostazioni
e puoi generarne con sfumature differenti mantenendo la disposizione
dei settori dove metterai i controlli, questo agevola in modo notevole
ricrearle per accontentare l'utente finale.
[PIPPA ESTETICA]
In una versione di ARCHIFOTO che non ho mai finito per pigrizia, rifatta
completamente con la gestione LISTVIEW e TREE(API), davo la possibilità
di personalizzare lo SKIN grafico di tutte le maschere su una scelta di 5
tipologie.
La cosa non è importante, ma voleva essere solo un'aggiunta al giochino
della
gestione FOTO.
Se avrò voglia la terminerò.....!



title: pannello comandi trasparente

text:
"ALESSANDRO Baraldi"
> > Ah, quindi il mio stile ti pare dispotico?  :-)
> Ebbene si.
> Almeno poco democratico visto che
> vuoi obbligare, a costo di usare la forza bruta, a piegarsi
> al tuo volere, anche se tecnicamente ineccepibile.
Ma non voglio proprio obbligare nessuno.
E' solo questione di buonsenso: complicare inutilmente le applicazioni per
ottenere risultati che si possono avere con semplicità ... è la miglior
ricetta per generare problemi.
Ciao.


title: pannello comandi trasparente

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:3cSHd.5666$fq5...@news.edisontel.com...
>>> Ti dirņ la veritą a me non piace molto la mascheramassimizzata...
>>>
>>> Mi mandi la foto di una tua maschera?
>>> Sono curioso
>>
>> anche io......quindi   :-)
>>
>>> MAssimiliano
>>>
>>
>> grazie
>> ---
>> Daniele
>
> Se ti interessa ti mando qualcosa di mio
> MAssimiliano
ma certamente. ecchehaibisogno del permesso? :-)
---
Daniele


title: Trasfuzione dati tabella1->tabella2

text:
Vorrei inserire in tabella2 i dati presenti in tabella1, le 2 tabelle hanno
struttura identica per cui ho pensato di scrivere:
INSERT INTO tabella2 VALUES (Select * FROM tabella1)
Ho trovato questa stringa sql da qualche parte ma non funziona, dice che
c'e' un errore nella select!!
Ho provato anche quest'altra:
INSERT INTO tabella2 (Campo1, Campo2) VALUES (Select Campo1, Campo2 FROM
tabella1)
Ma non funziona lo stesso, non riesco a capire perchè e come posso fare in
una altro modo per trasfondere i dati da una tabella ad una altra...
Mi potete aiutare?
Grazie mille!!


title: Trasfuzione dati tabella1->tabella2

text:
"Ely77" <Elisa.Adamoli...@Tiscali.it> ha scritto nel messaggio
news:fkxCc.521182$rM4.21...@news4.tin.it...

Prova  con:
INSERT INTO tabella2 SELECT tabella1.* FROM tabella1;
Bye
Diego :o)


title: Trasfuzione dati tabella1->tabella2

author: Nick

text:
"Ely77" <Elisa.Adamoli...@Tiscali.it> ha scritto nel messaggio
news:fkxCc.521182$rM4.21...@news4.tin.it...

sbagli le parentesi
INSERT INTO tabella2
SELECT tabella1.*
FROM tabella1;
ciao
Nick
ps.. se vuoi puoi anche usare il generatore di query per creare le query :-D


title: Trasfuzione dati tabella1->tabella2

author: guggenheim

text:
"Ely77" <Elisa.Adamoli...@Tiscali.it> ha scritto nel messaggio
news:fkxCc.521182$rM4.21...@news4.tin.it...

____________________________
INSERT INTO tabella2
SELECT Tabella1.*
FROM Tabella1;


title: manipolare tutti i record di una form continue (filtrata) in base a condizione

author: universitas srl

text:
con il seguente codice volevo semplicemente selezionare tutti i record
dove acquistare = SI (classico checkbox di "seleziona tutto")
Il codice funziona ma mi cambia solo il record corrente mentre io
desidererei farlo andare (.movenext) in tutti i record filtrati della
form. Dove sbaglio?
inoltre domanda gnocca Come chiudo il recordset alla fine? a meomoria
in un altro post si descriveva l'importanza di chiuderlo
'Dim rst As Recordset
'Set rst = Me.RecordsetClone
'    If Me.Check48 = True Then
'
''
'         With rst
'         .MoveFirst
'         Do Until .EOF
 '           If Me.Acquistare = "SI" Then Me.Check23 = True
 ''       .MoveNext
 '        Loop
 '        End With
  '  Else
'
'         With rst
'         .MoveFirst
'         Do Until .EOF
'            Me.Check23 = False
'        .MoveNext
'         Loop
'         End With
'    End If


text:

Non faresti prima a fare una Query ACTION di UPDATE con criterio ed un
Requery...?
@Alex


text:

ti ringrazio, era un'alternativa cui avevo già pensato ma ero curioso
di sapere perchè questo metodo fa solo un record anche se gli
dico .movenext
un consiglio, se possibile. Di solito salvo queste query come query
vere e proprie e poi le vado a lanciare da codice docmd.openquery
"ciccia". Anche voi fate così o create tutto da codice in questi casi?


author: Alessandro Cara

text:
Il 01/06/2011 9.17, universitas srl ha scritto:
[cut]
>
> ti ringrazio, era un'alternativa cui avevo già pensato ma ero curioso
> di sapere perchè questo metodo fa solo un record anche se gli
> dico .movenext
Mettiamola cosi'. Sei sulla catena di preparazione dei ferrero "rosce'"
dovresti assaggiarne uno da ogni scatola ma continui a prenderli da
quella che hai in mano.
me.controllo e' leggermente diverso da rst.campo
--
ac (x=y-1)


title: avviamento applicazione access e riga di comando

author: Ascorbic

text:
Ciao a tutti.
Come è possibile avviare una applicazione di access passando da riga
di comando una serie di parametri?
E' possibile recuperare nel codice VBA i parametri passati dalla riga
di comando?
grazie
ciao.


author: Sergio MAZZA

text:
"Ascorbic" <
portaz_...@hotmail.com
> ha scritto nel messaggio news:j0ooo1dai7b92a3b7...@4ax.com...

Vedi help alla voce: istruzione Shell;
es.
Shell "nomeApplicazione.exe /parametri"
E comunque con google in questo NG trovi altre informazioni, l'argomento è già stato trattato ampiamente...
Ciao.
--
Sergio MAZZA


text:

Poniamola in maniera diversa, cosa vuoi settare con i tuoi parametri?
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


text:
On Tue, 29 Nov 2005 15:39:51 +0100, "Sergio MAZZA"
<
sergi...@tiscali.it
> wrote:
>"Ascorbic" <
portaz_...@hotmail.com
> ha scritto nel messaggio news:j0ooo1dai7b92a3b7...@4ax.com...
>> Ciao a tutti.
>> Come è possibile avviare una applicazione di access passando da riga
>> di comando una serie di parametri?
>> E' possibile recuperare nel codice VBA i parametri passati dalla riga
>> di comando?
>> grazie
>> ciao.
>
>Vedi help alla voce: istruzione Shell;
>es.
>Shell "nomeApplicazione.exe /parametri"
no....
non voglio avviare una applicazione da vba in access e passargli i
parametri...
voglio avviare access con un file mdb o mde passando ad esso dei
parametri e poi recuperarli nel codice vba:
esempio:
MSACCESS.EXE nome_del_db /cmd parametri
dove e come recupero i parametri passati?
>
>E comunque con google in questo NG trovi altre informazioni, l'argomento è già stato trattato ampiamente...
>
>Ciao.
ciao.


text:
"Ascorbic" <
portaz_...@hotmail.com
> ha scritto nel messaggio news:au0po1de3hd55im78...@4ax.com...
>
> no....
> non voglio avviare una applicazione da vba in access e passargli i
> parametri...
> voglio avviare access con un file mdb o mde passando ad esso dei
> parametri e poi recuperarli nel codice vba:
>
> esempio:
> MSACCESS.EXE nome_del_db /cmd parametri
>
> dove e come recupero i parametri passati?
>
> ciao.
Ahaaaa... Allora vedi help alla voce Funzione Command...
Ciao.
--
Sergio MAZZA


text:
"Ascorbic" <
portaz_...@hotmail.com
> wrote in message
news:j0ooo1dai7b92a3b7...@4ax.com

Si è possibile usando i Command, ma per recuperare
i parametri che poi è una Stringa il recupero deve essere in assoluto
la prima operazione fatta.
Se dai un'occhiata al mio Demo di Compattazione di Access
uso proprio quel sistema per diversificare il Compact/ReOpen
da Compact semplice, proprio passando un Parametro.
http://www.mantuanet.it/alessandro.baraldi/
Alla Sezione General
1.32 Compattatore MDB esterno tramite Command(/cmd)
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:


Grandioso.
Grazie e ciao!


text:
On Tue, 29 Nov 2005 19:57:16 +0000 (UTC), "Alessandro Baraldi"
<
ik2...@libero.it
> wrote:

Cial Alex,
ho scaricato il file MDB che mi hai segnalato ed ho trovato
interessante la funzione fAccessWindow che permette di nascondere la
finestra di access... una cosa che cercavo, devo dire: Ottimo!
Il fatto è che dopo aver utilizzato
fAccessWindow acHide
e dopo aver fatto le cose che devo fare uso la funzione
fAccessWindow acShow
per far riapparire la finestra del database...
a questo punto però si presenta uno strano effetto collaterale: le
barre dei menu' superiori di access sono scomparse e non riappaiono in
alcun modo.
La cosa non va bene perchè uso una barra menu' personalizzata per
svolgere alcune funzioni.
La cosa potrebbe anche andarmi bene se ci sarebbe un modo per far si
che la barra menu' in questione venisse associata ad una maschera
invece che alla finestra di access. Si può fare?
Ciao e grazie.


text:

Guarda sul suo sito, ha sviluppato un menù del genere
>
> Ciao e grazie.



text:
>>
>> La cosa potrebbe anche andarmi bene se ci sarebbe un modo per far si
>> che la barra menu' in questione venisse associata ad una maschera
>> invece che alla finestra di access. Si puň fare?
>
>Guarda sul suo sito, ha sviluppato un menů del genere
me lo indicheresti?


text:

www.mantuanet.it/alessandro.baraldi/
sez. Form se ricordo bene 1.4 (non che ricordi tutti gli esempi, ma
interpretando il titolo..)



text:
On Wed, 30 Nov 2005 17:07:51 +0100, "MA"
<
mas...@massimilianoamendola.it
> wrote:
>Ascorbic wrote:
>>>> La cosa potrebbe anche andarmi bene se ci sarebbe un modo per far si
>>>> che la barra menu' in questione venisse associata ad una maschera
>>>> invece che alla finestra di access. Si può fare?
>>>
>>> Guarda sul suo sito, ha sviluppato un menù del genere
>>
>> me lo indicheresti?
>
www.mantuanet.it/alessandro.baraldi/
>sez. Form se ricordo bene 1.4 (non che ricordi tutti gli esempi, ma
>interpretando il titolo..)
grazie...


text:
On Wed, 30 Nov 2005 17:07:51 +0100, "MA"
<
mas...@massimilianoamendola.it
> wrote:
>Ascorbic wrote:
>>>> La cosa potrebbe anche andarmi bene se ci sarebbe un modo per far si
>>>> che la barra menu' in questione venisse associata ad una maschera
>>>> invece che alla finestra di access. Si può fare?
>>>
>>> Guarda sul suo sito, ha sviluppato un menù del genere
>>
>> me lo indicheresti?
>
www.mantuanet.it/alessandro.baraldi/
>sez. Form se ricordo bene 1.4 (non che ricordi tutti gli esempi, ma
>interpretando il titolo..)
ok, ho un piccolo dubbio...
dove creo i menu' primo secondo, etc? per intenderci le pop-up menu
che vengono fuori quando clicco le label menu 1, 2 , etc?
grazie e ciao!


text:
"Ascorbic" <
portaz_...@hotmail.com
> wrote in message
news:5dcro1ti9oru93dlj...@4ax.com
[CUT]
> per far riapparire la finestra del database...
> a questo punto però si presenta uno strano effetto collaterale: le
> barre dei menu' superiori di access sono scomparse e non riappaiono in
> alcun modo.
> La cosa non va bene perchè uso una barra menu' personalizzata per
> svolgere alcune funzioni.
>
> La cosa potrebbe anche andarmi bene se ci sarebbe un modo per far si
> che la barra menu' in questione venisse associata ad una maschera
> invece che alla finestra di access. Si può fare?
>
> Ciao e grazie.
Scusa il ritardo di replay ma ero in trasferta per lavoro e sono
rientrato solo ora...!
In ogni caso quanto accade è strano, ma ogni Form può avere
come barra di Menù una prestabilita, basta impostare nella
proprietà di Maschera quale menù associare.
In questo modo, all'apertura della Form(qualsiasi) verrà
visualizzato solo il Menù dedicato.
Ho capito male...?



title: Lancio programma

text:
Mi interessa sapere come si può lanciare un db access ed ottenere sul
monitor solo la Main Form senza la toolbar. Inoltre,voglio che un utente si
possa muovere solo mediante i comandi presenti nella Main Form senza avere
accesso diretto alle tabelle etc.
--
Posted from
LOCMR1001.ac.com
 [212.161.27.70]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Lancio programma

text:
DOMANDA:
<
simone...@ac.com
> ha scritto nel messaggio
news:OF40AAE3D0.F764B869...@ac.com...


RISPOSTA:
Hai già controllato i parametri in strumenti - avvio?
Ciao.


title: Cosa strana...(Problema di Access?)

author: Ulisse

text:
Access 2000 Professional
Data una query A con dei numeri che sommati danno ad esempio 100 (la somma è
stata testata anche con excel) eseguendo una query di raggruppamento B con
la somma dei numeri il valore restituito dovrebbe essere 100.
La cosa strana che succede è che, su un computer la somma è esatta, su un
altro la somma restituisce un numero del tutto diverso senza una ragione
logica.
Premesso che i due computer hanno lo stesso programma e gli stessi dati non
riesco proprio a spiegarmi il problema considerando anche il fatto che su
entrambi i computer la query A sommata con excel restituisce lo stesso
valore. Mi sembra quindi che il computer (o l'Access) sbagli a fare la
somma!!!!
A qualcuno risulta un problema simile?
Grazie per eventuali delucidazioni.


title: Cosa strana...(Problema di Access?)

author: Antonio Biso

text:
"Ulisse" <
x...@x.it
> ha scritto nel messaggio
news:qPRia.49725$Jg1.1...@news1.tin.it...

Le weakest preconditions sono troppo weak
Antonio


title: Cosa strana...(Problema di Access?)

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:DcSia.2351$DT4....@twister1.libero.it...

Scusa ma non ho capito la risposta...


title: Cosa strana...(Problema di Access?)

text:

Io invece non ho capito il tuo subject. E se la tua conoscenza dell'inglese
è weak o non lo sai proporio, sallo.
ciao MAssimiliano
--------------------------------
Inviato via
http://usenet.libero.it


title: Cosa strana...(Problema di Access?)

text:
"Ulisse" <
x...@x.it
> ha scritto nel messaggio
news:HjSia.67147$i26.2...@news2.tin.it...
> > > A qualcuno risulta un problema simile?
> > > Grazie per eventuali delucidazioni.
> >
> > Le weakest preconditions sono troppo weak
> >
> > Antonio
> >
> >
> Scusa ma non ho capito la risposta...
Significa che le condizioni al contorno iniziali da te descritte non
permettono di avere abbastanza basi per poter farsi un'idea di quale sia il
problema!!!
Antonio


title: [TOSTO] - Creazione runtime tabella personale per ogni utente

author: Giulio Severini

text:
Copio e incollo quanto scritto prima su casa:
CREAZIONE RUNTIME CASELLA COMBINATA:
Salve, ieri mi hanno fatto una bella richiesta tosta (per me).
Ho un campo numerico chiamato NumeroIntervento che contiene il numero
di volte che una persona è stata in
contatto con gli utenti del mio database.
Ieri la coordinatrice di questi utenti mi ha chiesto di modificare
questo campo come segue:
il numero dell'intervento deve essere automatico, e deve essere
possibile associare ad ogni intervento una data
ben precisa.
Ad.es.
N.int. -  Data
1         01/01/2005
2         02/02/2005
e così via.
Ho dunque pensato ad una casella combinata che abbia come rowsource una
tabella contenente:
idUtente
NumeroIntervento
DataIntervento
ma non va bene! Perchè mi sono reso conto che ogni utente deve avere
la sua tabella personale!
Infatti l'utente con id = 212 potrà avere la tabella - che chiameremo
tblIntervento - popolata come segue:
N.Int - Data
1       03/05/2005
quello con id = 23, invece, popolata come segue:
N.Int - Data
1       02/01/2005
2       14/04/2005
e così via. Non è possibile quindi usare UNA SOLA tabella, ma devono
essercene UNA PER OGNI UTENTE
presente nel database.
La soluzione è fare in modo che, cliccando su un pulsante, si apra una
mascherina per l'inserimento
della data dell'intervento, e che il numero dell'intervento si
incrementi in automatico; qualcosa del tipo:
<etichetta_caption: Numero intervento> >casella_combinata>
<pulsante_comando>
dove:
1. casella combinata mi fa apparire due colonne, la prima con il numero
dell'intervento, la seconda con la data
2. il pulsante di comando mi apra una mascherina per l'inserimento
della data; una mascherina con i segg.
controlli:
<etichetta_caption: Numero intervento><casella_testo>
<etichetta_caption: Data intervento>  <casella_testo>
<etichetta_caption: Aggiungi><pulsante_comando>
Il numero intervento si deve incrementare da solo, mentre la data ce la
deve mettere l'utente.
Alla fine, cliccando sul pulsante di comando della mascherina
<Aggiungi>:
1. se la tabella per quel relativo utente è stata creata, aggiornala
aggiungendo questo record alla fine
2. se la tabella per quel relativo utente NON è stata ancora creata,
creala e popolala con questo primo record.
Non è una cosa facile per me.
Ci sono alcune cose ancora nuove per me:
1. creazione controlli e tabelle a runtime
2. aggiornamento via codice VBA di queste tabelle
e altre cose che ora sinceramente non mi vengono in mente.
Chiedo quindi il vostro prezioso aiuto per riuscire a fare questa
cosa!!!
Vi ringrazio in anticipo sin da ora!!!!!
GRAZIE!!!!!!!!


text:

Cominciano i dolori!
La tabella che hai descritto e' piu' che sufficiente per fare quello che
ti serve. Pensaci.
--
a.cara


text:
Una tabella UNICA per tutti gli utenti?
E come è possibile?
Forse va bene una tabella del tipo:
idIntervento - contatore, chiave primaria
idUtente - numerico, chiave esterna
NumeroIntervento
DataIntervento?
da mettere in relazione uno - a - molti con la tabella tblUtenti
mediante il campo idUtente?
Aiutami ti prego!!!!!!
Grazie :))


text:

Puo' darsi che non abbia capito ma......
-------------------------------------
idUT     NumInt  Data
1         1       ----
2         1       ----
1         2       ----
3         1       ----
1         3       ----
2         2       -----
1         4       -----
3         2       -----
in questo caso
su idut = 1 hai fatto 4 interventi
           2           2
           3           2
select max(numint) from where idut=x  ti da l'ultimo intervento su
quell'utente il progressivo di intervento te lo calcoli e
lo scrivi tu.
Lascia da parte sti cavolo di contatori quando non servono.
La chiave e' idUt+numint il dottore non proibisce di mettere
la chiave primaria su piu' colonne.
Se poi hai bisogni di sapere chi ha fatto l'intervento metti un
altro attributo idoperatore che punta ad una tabella operatori
la chiave rimane sempre la stessa
--
a.cara


text:
Alessandro Cara wrote:
> Giulio Severini wrote:
>
>> Una tabella UNICA per tutti gli utenti?
>>
>> E come è possibile?
>>
>> Forse va bene una tabella del tipo:
>>
>> idIntervento - contatore, chiave primaria
>> idUtente - numerico, chiave esterna
>> NumeroIntervento
>> DataIntervento?
p.s. per quanto mi riguarda manco il numero di
intervento ci metterei. Di fatto e' un calcolato
a meno che tu non faccia piu' di un intervento
sullo stesso utente nella stessa giornata.
Se metti now() (intendo dire data+ora) manco sto problema tieni
--
a.cara


text:
Okkei, vediamo se ho capito:
tblIntervento:
idUtente
NumeroIntervento
DataIntervento
nel campo NumeroIntervento ci metto una
SELECT max(NumeroIntervento) FROM WHERE idUtente = x al valore
predefinito.
Però, come lo prende l'idUtente? E per la data intervento non posso
mettere Now() perchè magari l'utente è stato contattato il 18 Maggio
ma l'inserimento avviene il 23 Giugno.
Grazie :)))


text:
Giulio Severini wrote:
> Okkei, vediamo se ho capito:
>
> tblIntervento:
>
> idUtente
> NumeroIntervento
> DataIntervento
>
> nel campo NumeroIntervento ci metto una
>
> SELECT max(NumeroIntervento) FROM WHERE idUtente = x al valore
> predefinito.
magari + 1
>
> Però, come lo prende l'idUtente?
non mi hai detto che hai una tabella utenti?
Lo saprai pure su quale utente sei intervenuto.
  E per la data intervento non posso
> mettere Now() perchè magari l'utente è stato contattato il 18 Maggio
> ma l'inserimento avviene il 23 Giugno.
e dalli. Quello che volevo dirti e' di usare un campo data+ora e non
solo data
e proprio per il motivo che dici tu, cioe' che la registrazione potresti
farla a posteriori. Se ti sbagli potresti essere costretto a rinumerare
tutti gli interventi, per cui, senza il numero intervento e' meglio.
--
a.cara


text:
Ciao Ale, il mio amico di Milano mi ha risolto il problema.
Ho fatto un post apposta!
Grazie di tutto sei stato gentilissimo!!!!!!!!


title: passare a casella di testo sucecssiva

author: Sandrobi

text:
Si puň fare in modo che dopo il tot carattere digitato in una casella di
testo il focus passi direttamente alla casella sucecssiva senza battere
Invio o Tab.
Grazie e saluti a tutti.
Sandro


title: passare a casella di testo sucecssiva

author: fidirico

text:
"Sandrobi" <
sandb...@libero.it
> ha scritto nel messaggio
news:Xoytb.118215$vO5.4...@twister1.libero.it...

Se vuoi che il testo sia lungo, ad es., non piů di 10 caratteri , puoi scrivere:
 Private Sub MioControllo_Change()
    If Len(MioControllo.Text) > 10 Then
        Me.AltroControllo.SetFocus
    End If
End Sub


title: passare a casella di testo sucecssiva

text:
> > Si puň fare in modo che dopo il tot carattere digitato in una casella di
> > testo il focus passi direttamente alla casella sucecssiva senza battere
> > Invio o Tab.
> Se vuoi che il testo sia lungo, ad es., non piů di 10 caratteri , puoi
scrivere:
>
>  Private Sub MioControllo_Change()
>     If Len(MioControllo.Text) > 10 Then
>         Me.AltroControllo.SetFocus
>     End If
> End Sub
>
Grazie, č proprio quello che cercavo.
Avevo provato con SelText ma sbagliavo.
Saluti. Sandrobi


title: Come nascondere le query?

author: alexfreenet

text:
Mi presento, sono Alex. Seguo da qualche giorno questo ng ed ho trovato
diversi consigli utili su Access, tra cui uno che indicava il modo
per nascondere le Tabelle (mi riferisco alla procedura di AntoGal).
Il quesito che vi sottopongo è il seguente:
c'è un modo per nascondere le query in modo tale che non siano visibili
anche se imposto "Mostra oggetti nascosti e di sistema" ?
Grazie.
alexf...@tiscalinet.it


title: Come nascondere le query?


title: Come nascondere le query?

author: Lbo da casa

text:
>c'è un modo per nascondere le query in modo tale che non siano visibili
>anche se imposto "Mostra oggetti nascosti e di sistema" ?
che io sappia no, ma le puoi sempre creare dinamicamente e
cancellarle.
--------------------------------------------------
ATTENZIONE!
it.comp.database.access diventera' it.comp.appl.access!
cercalo tra i nuovi ng e linkalo!
-----------------------------------
rimuovere NOSPAM. per mandare email
-----------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access


title: Come nascondere le query?

author: Stefano Bettini

text:
alexfreenet ha scritto nel messaggio <86nq5e$34m$
1...@pegasus.tiscalinet.it
>...
>Mi presento, sono Alex. Seguo da qualche giorno questo ng ed ho trovato
>diversi consigli utili su Access, tra cui uno che indicava il modo
>per nascondere le Tabelle (mi riferisco alla procedura di AntoGal).
>Il quesito che vi sottopongo č il seguente:
>c'č un modo per nascondere le query in modo tale che non siano visibili
>anche se imposto "Mostra oggetti nascosti e di sistema" ?
>
Non credo. In ogni caso č proprio sbagliato il concetto; non č
che si devono nascondere tabelle e query, il punto č che
bisogna impedire all' utente la possibilitą di aprire la finestra
database!  Guarda sull' help le opzioni di avvio e la proprietą
AllowByPassKey....
Bye, Ste


title: Ricerca su stringa

author: Basjlico

text:
Nel lontato Wed, 29 Mar 2000 15:50:05 +0200 d.C., il simpatico Alberto
Fracassi <
a.fra...@tiscalinet.it
> ebbe a scrivere:
>Ho una tabella "Numeri" composta dai campi [NumeroID], [Prefisso],
>[Numero]. [Prefisso] prende il suo valore dalla tabella "Prefissi". Io
>dovrei selezionare nella tabella "Numeri" tutti i numeri di telefono
>che, a parità di prefisso ed escludendo le ultime 3 cifre, risultino
>uguali. Finora non ci sono riuscito...
>
>Ciao. Alberto
Potresti utilizzare la funzione MID, se magari indichi fino a che
punto sei arrivato...
Ciao
Basjlico


title: Compleanni

author: marco

text:
Ho una tabella Clienti con la data di nascita; vorrei sapere con due giorni
di anticipo quali di questi clienti compirą gli anni.
Come posso fare ?
Grazie, Marco


title: Compleanni

author: Karl Donaubauer

text:
marco wrote:
> Ho una tabella Clienti con la data di nascita; vorrei sapere con due
> giorni di anticipo quali di questi clienti compirà gli anni.
www.donkarl.com/it
 FAQ 3.12 Creare una lista di compleanni
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it
+ Conferenza Italiana per Sviluppatori di Access (CISA)


title: import files excel

author: Shadow

text:
Sapete qual'e' l'istruzione vba che mi consente di
importare un file excel in una tabella access ?
Grazie ciao.


title: import files excel

author: Roberto dal portatile

text:
"Shadow" <
sha...@isolevergini.it
> ha scritto nel messaggio
news:eadnn7$u51$1...@nnrp.ngi.it...
> Sapete qual'e' l'istruzione vba che mi consente di
> importare un file excel in una tabella access ?
Usa il Metodo TransferSpreadsheet (vedi help)
> Grazie ciao.
Prego
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: Da cercare in tabella prezzo più recente

author: SimoneB

text:
Salve a tutti,
ho una tabella dal nome "DettaglioAcquisto" la quale è relazionata ad
un'altra dal nome "Articolo" e ad un'altra ancora denominata "Acquisto".
"Acquisto" definisce la data, il fornitore e il numero della fattura di
acquisto, "Articolo" definisce il Codice, la descrizione e la categoria dei
prodotti acquistati ed infine "DettaglioAcquisto contiene la quantità,
l'articolo (messo in relazione con "Articolo") e il prezzo di acquisto oltre
al campo di relazione con la tabella "Acquisto". Vorrei creare una query che
restituisca il prezzo di acquisto più recente. Come posso fare?
Saluti SimoneB


author: PBsoft

text:

Se - come pare - non ti interessa porre alcun vincolo, dovrebbe bastarti
la seguente
SELECT Min(PrezzoAcquisto) AS MigliorPrezzo
FROM DettaglioAcquisto
WHERE IDProdotto = nomecontrolloconidprodotto
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution


text:

Se ti capisco bene ti serve una sottoquery con Max(Data) o
in alternativo p.e.
SELECT TOP 1 DettaglioAcquisto.Prezzo
FROM Acquisto INNER JOIN DettaglioAcquisto ON Acquisto.IdAquisto =
DettaglioAcquisto.IdAquisto
WHERE DettaglioAcquisto.IdArticolo=[TuoParametroPerLArticolo]
ORDER BY Acquisto.Data DESC
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: Problema Report-SottoReport

author: cnicola

text:
Ho questo problema. (Access 2002)
Report principale LAVORI
Sottoreport DETTAGLI nel corpo del report principale che mi mostra tutti i
materiali utilizzati.
Sottoreport MANODOPERA che mi mostra i dettagli delle ore impiegate.
Riesco ad ottenere i subtotali dei singoli sottoreport raggruppati per data
del lavoro.
In pratica:
Data lavoro #####
Dettagli materiali......
Dettagli manodopera......
Subtotale materiali per questa data
Subtotale manodopera per questa data
e cosi via con le altre date.
Ma poi nel report principale vorrei ottenere il totale generale della
manodopera e il totale generale del materiale per tutte le date e non
riesco:
Se faccio riferimento Report..sottoreport ecc... mi da solo il totale
dell'ultima data.
Oppure se cerco di fare la somma dei subtotali mi esce la finestra dei
parametri.
Ci sara' pure un modo.
Grazie!


title: Problema Report-SottoReport

author: Roberto da casa

text:
"cnicola" <
cni...@libero.it
> ha scritto nel messaggio
news:p_YO8.21794$Kt3.5...@twister2.libero.it...

Non sono sicuro di aver compreso tutto del tuo problema, ma penso che i
totali al livello di lavoro o al livello generali te li puoi calcolare in
caselle di testo non associate tramite la funzione DSum (vedi help).


title: Problema Report-SottoReport

text:
Ti ringrazio in effetti ci avevo pensato, ma credevo ci fosse un'altra
soluzionea livello di report.
Ora seguiro' il tuo consiglio e  provero' questa strada.
Grazie


title: inserire varianti su ordinazioni pietanze cucina

text:
Buonasera,
A2003 vorrei implementare sul programmino per comande sagra che ho sviluppato ,anche grazie ai vostri  suggerimenti, la possibilità di aggiungere delle varianti alle pietanze (ES  ben cotta, abbondante prosciutto,- mozzarella,ecc).
per la visualizzazione degli ordini uso una maschera in visualizzazione Foglio Dati che ha come origine questa query:
SELECT OrdiniDettaglio.IdOrdine, Pietanze.IdTipoPietanza, Pietanze.IdPietanza , Pietanze.PrzPietanza, OrdiniDettaglio.PrzPietanzaOrdi, OrdiniDettaglio.PrzListinoOrdi, OrdiniDettaglio.NumPietanza, Pietanze.NomePietanza, OrdiniDettaglio.Sequenza, (OrdiniDettaglio!PrzListinoOrdi*OrdiniDettaglio!NumPietanza) AS ImportoListino, (OrdiniDettaglio!PrzPietanzaOrdi*OrdiniDettaglio!NumPietanza) AS Importo
FROM TblVarianti, DatiOrdini INNER JOIN (Pietanze INNER JOIN OrdiniDettaglio ON Pietanze.IdPietanza = OrdiniDettaglio.IdPietanza) ON DatiOrdini.IdOrdine = OrdiniDettaglio.IdOrdine
ORDER BY OrdiniDettaglio.Sequenza;
Ho poi creato2 tabelle
TblVarianti che contiene i dati delle varianti
TblVariantiOrdini con un campo Sequenza relazionato molti a 1 con il campo OrdiniDettaglio.Sequenza, dove inserisco i record delle varianti presenti negli ordini.
Nella maschera ordini vorrei ottenere questa visualizzazione
2	pizza margherita	5,50	11,00
1	pizza capricciosa	7,00	7,00
	+capperi
	ben cotta
	-prosciutto
1	panino			3,00	3,00
Ci ho provato anche inserendo una listbox ,ma non ho nessuna idea di come uscirne,anche data la mia scarsa esperienza .
Qualcuno mi puoi aiutare e indirizzare sulla retta via ?
Grazie


author: BFS

text:
Il 12/03/2018 01:20,
maurizio...@gmail.com
 ha scritto:
> Buonasera,

> Nella maschera ordini vorrei ottenere questa visualizzazione
> 2	pizza margherita	5,50	11,00
> 1	pizza capricciosa	7,00	7,00
> 	+capperi
> 	ben cotta
> 	-prosciutto
> 1	panino			3,00	3,00
> Ci ho provato anche inserendo una listbox ,ma non ho nessuna idea di come uscirne,anche data la mia scarsa esperienza .
> Qualcuno mi puoi aiutare e indirizzare sulla retta via ?
> Grazie
>

tralasciando come hai strutturato il tutto, se vuoi ottenere quel tipo
di visualizzazione dove ad ogni pietanza fai seguire una serie di
aggiunte/rimozioni userei una query di unione tra la tabella delle righe
delle ordinazioni e la tabella che per ogni riga della ordinazione
contiene le aggiunte stabilinendo un ordinamento tale da avere sempre
per ogni riga di ordinazione subito dopo tutte le relative aggiunte

semplificando al massimo ho fatto una bozza. vedi qui

http://it.tinypic.com/r/1441ocm/9

ciao
BFS


author: GiorgioDaPrato

text:
> Ci ho provato anche inserendo una listbox ,ma non ho nessuna idea di come uscirne,anche data la mia scarsa esperienza .

aggiungo qualche osservazione, sperando si rivelino suggerimenti

e faccio una (la solita) premessa:
realizzo procedure piuttosto limitate
e quindi posso arrivare a suggerimenti limitati
(quando ci arrivo ...)

l' argomento è di mio interesse per due motivi:
1) vi si ritrovano i termini di una "gestione della produzione"
con attenzioni alla personalizzazione sotto forma di richiesta varianti
(è una cosa che mi si presenta con le schede prodotto di capi abbigliamento)
2) qualche mese fa era apparso un post praticamente uguale,
e il ripetersi della questione mi dà occasione di una riflessione aggiuntiva

allora:
LASCIO DA PARTE (considerandola effettuata) la registrazione dei prodotti
("cibi a catalogo": potrebbe anche essere fatta dai soli nomi e prezzi ...)

e mi soffermo sulle ordinazioni evidenziando due (eventuali) scopi:
-- "personalizzazione" del prodotto
(oppure, che quasi è la stessa cosa, "enfasi" sul frequentatore)
-- situazione di "street food"
(le variazioni proposte vengono considerate valide "dalla casa"
che metterà a catalogo quel prodotto ...)

quindi la registrazione degli ordini può avvenire così:

-ordineTestata
(tabella Master di ordineRighe)
mi sembra sia la "descrizione del tavolo",
con gli attributi necessari (numero, data, ora ...)

-ordineRighe
(tabella Detail di ordineTestata, E Master di ordineRigheDiciture)
c'è il riferimento a tabella Testata,
c'è il riferimento a tabella Prodotti,
alcuni campi "propri":
quantità, PREZZO (modificabile dopo le variazioni ?), FREQUENTATORE

-ordineRigheDiciture ("funziona come un blog")
(tabella Detail di ordineRighe)
c'è il riferimento a tabella ordineRighe,
alcuni campi "propri":
dicitura, tipoRiga E numeroRiga
QUESTI ULTIMI DUE per scopi di stampa e gestionali

Esempio:
tipoRiga "blog" (diciture inserite dal tavolo)
         --> numeroRiga in ordine (da codice: confermare currentRecord ?)
tipoRiga "gestione" (diciture "preparate" con scopo gestionale)
         --> numeroRiga ALTO (prestabilito, superiore al numero teorico blog)

scopi gestionali:
-le variazioni richieste fanno variare ANCHE il prezzo ...
-le variazioni richieste sono da esaminare dai "tecnici" (cuochi)
perchè possono far generare un nuovo prodotto ...
-le variazioni richieste, unite al riempimento del campo FREQUENTATORE,
possono far riproporre l'ordinazione (fidelizzazione) ...
-il FREQUENTATORE è un VIP (magari del luogo) e ce ne faremo pubblicità ...

a questo punto la difficoltà (forse) maggiore è quella di costruire
una form di registrazione dati a subform "dipendenti"
(oggettivamente più adeguata allo scopo rispetto al foglio dati indicato)

mentre avvalendosi della struttura gerarchica delle tabelle
e dei numeri ordinali presenti nelle righe diciture
si possono preparare i report riassuntivi delle ordinazioni per il tavolo
e i report di avviso a scopo gestionale interno


text:
mi scuso per il ritardo ,ma sono preso con il lavoro
Grazie a tutti per le risposte
X BFS
Ho provato a adattare la query union alle tabelle presenti e  questo è il codice:
Select Sequenza,0 as Posizione,NomePietanza,numPietanza From OrdiniDettaglio
UNION ALL select Sequenza ,VarianteSeq,VarianteNome ,0 from OrdiniVarianti
ORDER BY Sequenza, Posizione;
quando lancio la query mi da errore:
L'espressione ORDER BY(Sequenza) include campi non selezionati dalla query.Solo i campi richiesti nella prima query possonoi essere inclusi in un'espressione ORDER BY
Il campo Sequenza è presente nella tabella.
cosa sto sbagliando ?
per il resto (come ho strutturato Il tutto)come posso modificare ?
grazie
Ciao
Maurizio


text:
> per il resto (come ho strutturato Il tutto)come posso modificare ?

per quanto detto da parte mia:

Credo che un inserimento dati a subform annidate risolva la situazione
(pur NON avendo MAI adoperato subform annidate ...)

e ritaglio, semplificandola per lo scopo,
la struttura dati già prospettata:

-ordineTestata
(tabella Master di ordineRighe)
mi sembra sia la "descrizione del tavolo",
con gli attributi necessari (numero, data, ora ...)

-ordineRighe
(tabella Detail di ordineTestata, E Master di ordineRigheVarianti)
c'è il riferimento a tabella Testata,
c'è il riferimento a tabella Prodotti,
alcuni campi "propri":
quantità, PREZZO (modificabile dopo le variazioni), ordinante

-ordineRigheVarianti ("funziona come un blog")
(tabella Detail di ordineRighe)
c'è il riferimento a tabella ordineRighe,
alcuni campi "propri":
dicitura(-->"variante"), numeroRiga

NOTE:
-lascia perdere (per ora ?) gli "scopi gestionali" prima indicati

-subform annidate:
come detto NON le adopero come tali,
ma penso si debba costruire per prima quella terminale
(in questo caso quella con ordineRighe e ordineRigheVarianti)
e poi inserire questa in quella superiore
(in questo caso ordineTestata)

-varianti (diciture come le ho chiamate io):
in teoria NON è necessaria una tabella che le raccoglie
(listaVarianti), è sufficiente una combo che mostra,
raggruppate, quelle già registrate.
Comunque è una buona prassi tenere la lista in una tabella
(e aggiungere direttamente da codice dalla combo il nuovo valore)

NOTA PERSONALE: per come vengono registrate,
queste "varianti" NON sono, in pratica, varianti del prodotto
ma "aggiunte" della rigaOrdine
(E' scopo gestionale farle diventare varianti del prodotto,
e allora può essere necessario il tipoVariante)

- il prezzo della rigaOrdine è un campo calcolato
(come è un campo calcolato l'importo totale dell'ordine del tavolo)

- i numeri Riga sono autonumber progressivi

Procedendo in questo modo mi sembra proprio
che la "semplice" registrazione (e il suo richiamo)
"spiattelli pari pari" i piatti ordinati ...
(anche se un report, a strutturazione identica, sarebbe più indicato)


text:
Buonasera,
mi scuso per la risposta tardiva,ma ho potuto dedicare pochissimo tempo allo sviluppo dell'applicazione.
Sono finalmente arrivato al risultato voluto usando una query union come suggerito da BFS,  soluzione che ho poi usato anche per i report Scontrino e Comanda.
Ho preferito questa soluzione rispetto a quella suggerita da GiorgioDaPrato,che ringrazio comunque tantissimo,in quanto volevo iniziare a approcciare le query union.
Grazie ancora a tutti


title: printout

author: Matteo

text:
con il comando printout, come faccio ad indirizzare ad una stampante
specifica per es. Epson Stylus, Epson Stylus(Copia1) ecc.
grazie
matteo


title: printout


title: printout

text:
rileggendo mi sono spiegato malissimo.
Ho 4 stampanti su 4 porte USB. Come faccio ad indirizzare, tramite comando
printout su una USB specifica? grazie e scusate


title: printout

text:
Matteo wrote:
> con il comando printout, come faccio ad indirizzare ad una stampante
> specifica per es. Epson Stylus, Epson Stylus(Copia1) ecc.
Come si puo leggere nel <F1> con PrintOut non è possibile.
Vedi:
Cambiare la stampante o le impostazioni stampante/pagina
www.donkarl.com/it/?FAQ5.1
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: file mdb o mde in cloud ....

author: Lucky

text:
Buongiorno a tutti.
Vorrei sapere se è possibile far girare un db access (file mdb oppure mde)
in cloud computing.
Qualcuno ha già avuto esperienze e può ragguagliarmi in merito ?
Grazie
Saluti
Lucky


title: file mdb o mde in cloud ....

author: Simone Calligaris

text:
"Lucky" <

> Buongiorno a tutti.
> Vorrei sapere se è possibile far girare un db access (file mdb oppure mde)
> in cloud computing.
> Qualcuno ha già avuto esperienze e può ragguagliarmi in merito ?

Cloud computing è una definizione che vuol dire tutto e niente.
Di fatto puoi affittare uno spazio su un Server remoto, farci installare la
versione di windows che ti pare, installare Access (e/o Runtime) che ti pare
ed eseguire in remoto i programmi che vuoi.

Saluti.


title: file mdb o mde in cloud ....

author: pfmarro

text:

Salve!
anche a me piacerebbe approfondire il discorso su clouds:
la mia idea sarebbe quella di mettere un mdb su un server web/clouds e da locale interrogare il database utilizzando il Front End di Access

e' possibile
potete darmi dell dritte?

sola lettura o lettura e scrittura?

Grazie anticipatamente


title: file mdb o mde in cloud ....

text:
"pfmarro"

Salve!
anche a me piacerebbe approfondire il discorso su clouds:
la mia idea sarebbe quella di mettere un mdb su un server web/clouds e da
locale interrogare il database utilizzando il Front End di Access

e' possibile
potete darmi dell dritte?

sola lettura o lettura e scrittura?

>

No, ho scritto "esecuzione in remoto", vale a dire in Terminal Server.
Alcuni miei clienti hanno affittato spazi su Server Aruba per usare le
applicazioni in quel modo, evitando l'ingombro di avere in azienda un Server
fisico.

Saluti.


title: Connessione ad access 2000

author: Francesco Rotondo

text:
Salve, mi chiamo Francesco.
Dovrei realizzare una connessione tra un database access ed una pagina asp.
Lasciando il database senza password, la connessione avviene senza
problemi... appena setto la password su access invece, la connessione viene
rifiutata.
Penso che sbagli a settare correttamente la password su access... qualcuno
mi può dare chiarimenti in merito?
Grazie.


title: Modificare un valore boolean se si modifica il record

author: vuLCan Karayan

text:
Ciao a tutto il NG.
Ho una tabella molto semplce
Table1
IDRecord (Contatore)
Nome (Testo, 50)
Cognome (Testo, 50)
Indirizzo (Testo, 100)
CAP (Numerico, 5)
Citta (Testo, 20)
Modificato (Boolean)
Mi occorre impostare a TRUE il valore di Modificato ogni volta che un utente
dalla maschera modifica anche un solo carattere del record.
Ho provato ad inserire
Me.Modificato = True
nell'evento Dopo Aggiornamento della maschera ma mi viene fuori il solito
errore che altri utenti stanno modificando il record...
Qualche suggerimento?
Grazie a tutti.


text:

O prendi l'evento "Prima di Aggiornare" o usa un recordset
dopo l'aggiornamento. Vedi gli esempi nella
www.donkarl.com/it
 FAQ 2.23.
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it
 + CISA2
Conferenza Italiana per Sviluppatori di Access, Ancona, 22+23/4/2006


text:
> O prendi l'evento "Prima di Aggiornare" o usa un recordset
> dopo l'aggiornamento. Vedi gli esempi nella
>
www.donkarl.com/it
 FAQ 2.23.
Tnx


author: Alessandro Baraldi

text:
Before Update scrivi:
Me!nomeControlloModificato=Me.Dirty
Ciao
@Alex


text:
> Before Update scrivi:
>
> Me!nomeControlloModificato=Me.Dirty
Interessante, Alessandro...
Mi spiegheresti meglio?


text:
Cosa..?
L'evento è ovviamente BeforeUpdate, questo presuppone che tu abbia
un controllo associato al Campo Modificato(Si/No) nascosto, quindi
la proprietà Dirty, che rileva se effettivamente il Record è stato
modificato,
rappresenta il valore del tuo campo.
Era questo che intendevi...?
Ciao
@Alex


text:

C'è un vantaggio indiscutibile:
Visto che l'evento BeforeUpdate sempre e solo succede se Me.Dirty=True
l'uso di "=Me.Dirty" invece di un banalissimo "=True" rende la cosa un po'
più raffinata.
--
:-)



text:
"Karl Donaubauer" <
NoS...@donkarl.com
> wrote in message
news:44rt7mF...@individual.net
[CUT]
> C'è un vantaggio indiscutibile:
> Visto che l'evento BeforeUpdate sempre e solo succede se Me.Dirty=True
> l'uso di "=Me.Dirty" invece di un banalissimo "=True" rende la cosa un po'
> più raffinata.
Verissimo, l'effetto è esattamente identico.
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: [Access 2000] Problemi apertura DB

author: Franco

text:
Ciao a tutti.
ho un DB Access 2000 con una Maschera Master Detail.
Nei Dettagli ho un campo che riporta la path di immagini sul disco.
Io associo al record Master l'immagine Detail selezionata all'evento 'su
corrente'.
Il problema è il seguente : quando chiudo il DB e lo riapro subito dopo, non
viene aperto !!
Nell'elenco dei Task di Windows 98 c'è MSAccess, si vede il file ldb del
Database, ma non lo apre !!!
Devo PRIMA terminare il task POI aprirlo !!!
In questo caso me lo apre....
Qualcuno ha qualche idea ?
Grazie
--
                  \/
                 -   -
                 (.) (.)
----o0O0o--(_)--o0O0o----
<<Oh Grande Spirito,
Concedimi la serenità
Di accettare le cose
Che non posso cambiare,
Il coraggio di cambiare le cose
Che posso cambiare,
E la Saggezza di capirne la differenza.>>
               (Preghiera Cherokee)
Ciao
Franco


title: [Access 2000] Problemi apertura DB

author: Marco

text:
Ho lo stesso problema, uso win me. Ho notato che se clikki sul mdb access
non si apre. se invece apri access, riesci anche a fare apri mdb. (bel
giochino di parole ma spero di essermi spiegato) Sul sitocomune non ho
trovato nulla. Speriamo che qualche anima pia sappia illuminarci.
"Franco" <
franc...@libero.it
> ha scritto nel messaggio
news:a9e7op$2d4d3$1...@ID-104779.news.dfncis.de...



title: SQL 7

author: Graziano Franchi (Dal Client)

text:
Salve ragazzi/e.
Se ho un database con tante query gestito in rete come posso modificarlo per
farlo funzionare con sql???
Ciao e Grazie
Graziano Franchi


title: SQL 7

author: LaLo

text:
"Graziano Franchi (Dal Client)" <
franchi...@centoservizi.it
> ha scritto
nel messaggio news:955pd3$lbc$1...@news.IT.net...

Come hai scritto le query non-SQL? :-))
Potresti spiegarti meglio?
Ciao
LaLo


title: SQL 7

author: Federico Luciani

text:

e' inutile che continui ad inviare sempre lo stesso msg.
ti hanno gia' detto di essere piu' chiaro.
che significa 'farlo funzionare con sql'?
forse che vuoi trasferire i tuoi dati da un mdb ad un server SQL!
--
Federico
fluc...@paperino.sitocomune.com
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
mailto:
webm...@sitocomune.com
--------------------------------------


title: SQL 7

text:
Si vorrei trasferire il database su un server sql ma non so niente.
Ho un database che funziona in rete.
Ora i client sono un po' lenti perchè i dati sono molti.
Cosa devo installare sul server?
Come devo modificare le query del databse?
Grazie
Graziano Franchi


title: SQL 7

text:
"Graziano Franchi (Dal Client)" wrote:

prima di tutto di consiglio di valutare la cosa attentamente, MSSql costa caro.
Se usi Access2000, puoi fare le tue prove, installando MSDE (lo trovi sul dc di
Office2000 o sul sito MS).
MSDE e' un sql server molto ridotto, e con una limitazione (credo di licenza) a
5 client, ma e' molto utile in fase di progettazione, anche perche' lo puoi
installare su Win98.
Dopo di che puoi usare Access 2000 per convertire i tuoi dati da access al db
sql.
Per quanto riguarda le query, se sono di selezione, probabilmente ti basta
trasformarle in query di tipo pass-through.



title: Conto alla rovescia

author: Stefano

text:
Salve,
ho una tabella dove vi è il campo timer1
Da un altro computer, vi è il form che cambia lo stato di un pulsante.

Se lo stato è 1, deve partire un conto alla rovescia di 30 minuti e si
deve aggiornare ogni secondo il campo timer1
Se lo stato è 2, si deve interrompere il conto alla rovescia ed
eventualmente riprendere se lo stato torna a 1
Se lo stato è 3, il conto alla rovescia si deve interrompere e tornare a
30 minuti.

Devo intervenire solo sul computer dove c'è il conto alla rovescia. Come
posso far partire o interrompere il conto alla rovescia? e soprattutto,
come faccio fare il conto alla rovescia?

Ho messo su timer con itervallo 1000, il seguente codice:
me.timer1 = dateadd ("s",-1,"30:00")
ma non funziona.

Grazie.

Ciao.
Stefano


title: Raggruppamento record in Tbl

author: Vercellone Milena

text:
Ciao a tutti!
La rogna che non riesco a risolvere si chiama Tbl Arrivi merce i cui campi
Id - codice articolo -Numero arrivo - Data - Quantita'
contengono record che vorrei raggruppare.
Questi record li prelevo tramite ODBC e un singolo arrivo (ad esempio il n.1
del 1-1-01) e' presente piu' volte con delle quantita' "parziali" il totale
merce infatti corrispondera alla somma dei parziali.
In pratica come posso avere un solo record con la somma delle quantita' di
tutti i record prelevati per n.documento?
Un grazie enorme a tutti voi
Mile


title: Raggruppamento record in Tbl

author: Liones

text:

se ho capito bene:
SELECT Arrivi.NumDocumento, Sum(Arrivi.Qta) AS SommaDiQta
FROM Arrivi
GROUP BY Arrivi.NumDocumento;
ciao


title: Raggruppamento record in Tbl

author: Roberto dalla campagna

text:
Vercellone Milena <
milen...@libero.it
> wrote in message
TI_Ia.110823$lK4.3...@twister1.libero.it...

Collegati alla tabella che contiene i dati e creati una query di
raggruppamento basata sulla tabella collegata e che raggruppa su Numero
arrivo e somma le Quantità.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: dividere un report

author: maestro

text:
Buongiorno,
ho la necessita di stampare un report per agente.
Oggi faccio in questo modo, apro una maschera che mi chiede codice
agente iniziale, codice agente finale, inserisco i dati richiesti e mi
visualizza in anteprima il report.
Se scelgo la stampante pdf mi stampa il report per gli agenti scelti
generando un file pdf e  fin qui tutto bene.
Ora mi piacerebbe invece stampare in automatico tanti file quanti sono
gli agenti scelti.
esempio  se scelgo di stampare da agente abc a agente abf   vorrei
ottenere i file pdf
abc, abd, abe, abf.
Come faccio.
grazie a tutti


title: dividere un report

author: Roberto dal portatile

text:
"maestro" <
m_avv...@yahoo.it
> ha scritto nel messaggio
news:eqclb2$v56$1...@tdi.cu.mi.it...

Devi necessariamente lanciare il report tante volte quanti sono gli agenti
compresi tra abc e abf ed in ogni report stampi dati di un solo agente.
Per far questo potresti aprire un recordset sulla tabella anagrafica agente
e per ognni record che soddisfa le condizioni impostate nella maschera
esegui il report filtrandolo in modo che stampi solo idati dell'agente
corrente.
> grazie a tutti
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: [OT] Base dati dei tempari delle case automobilistiche e archivi pezzi di ricambio auto

author: VT @ home

text:
Salve.
Sto valutando la possibilità di realizzare un'applicativo Access per
la gestione di un'autofficina autorizzata con vendita auto.
Una delle richieste del titolare è l'integrazione della procedura con
il tempario delle riparazioni della casa automobilistica di cui ha
l'autorizzazione.
Lui si serve già di un tempario fornitogli dalla casa, ma è protetto
(fra parentesi, è un mdb !), quindi inutilizzabile senza il programma
fornito contestualmente.
Volevo sapere se qualcuno di voi ha già affrontato il problema o
comunque conosce soggetti che forniscano questi archivi in formato
leggibile, tenendoli aggiornati periodicamente.
Grazie
Vincenzo Turturro
---------------------------------------------------------
Se no diventiamo tutti **** dai portatili o peggio ancora
provetti poeti fiorentini come vturturro.
(Così disse Ivan Lelli Ven 25 Aug 2000 09:34:52 +0200)
---------------------------------------------
il sito comune di it.comp.appl.access:
http://www.sitocomune.com/index_new.html
---------------------------------------------
Le FAQ di it.comp.as400
http://www.clavis.it/as400/
---------------------------------------------


author: Antonio Biso

text:
VT @ home <
V...@home.it
> wrote in message
3a87c3de...@news.tiscalinet.it...
> Salve.
> Sto valutando la possibilità di realizzare un'applicativo Access per
> la gestione di un'autofficina autorizzata con vendita auto.
> Una delle richieste del titolare è l'integrazione della procedura con
> il tempario delle riparazioni della casa automobilistica di cui ha
> l'autorizzazione.
> Lui si serve già di un tempario fornitogli dalla casa, ma è protetto
> (fra parentesi, è un mdb !), quindi inutilizzabile senza il programma
> fornito contestualmente.
> Volevo sapere se qualcuno di voi ha già affrontato il problema o
> comunque conosce soggetti che forniscano questi archivi in formato
> leggibile, tenendoli aggiornati periodicamente.
Io ho lavorato molto ad applicativi per la gestione della manutenzione
preventiva su impianti. La tempistica degli interventi però era stabilita da
me (o comunque erano dati da me accedibili in maniera tabellare)
Antonio


text:
Il Tue, 13 Feb 2001 08:59:15 GMT, "Antonio Biso" <
ch...@etruria.net
>
ha scritto:
>Io ho lavorato molto ad applicativi per la gestione della manutenzione
>preventiva su impianti. La tempistica degli interventi perň era stabilita da
>me (o comunque erano dati da me accedibili in maniera tabellare)
>
>Antonio
In questo caso, la tempistica viene stabilita dalla casa
automobilistica.
Ogni intervento di manutenzione č "atomizzato" nelle sue operazioni
elementari, ed ognuna di queste ha un suo tempo stabilito.
Questi vincoli valgono solo per le officine autorizzate;
l'autorizzazione dipende anche dal rispetto di questi tempi nella
redazione dei preventivi e, ovviamente, nell'esecuzione degli
interventi di manutenzione.
Grazie comunque.
Vincenzo Turturro
---------------------------------------------------------
Se no diventiamo tutti **** dai portatili o peggio ancora
provetti poeti fiorentini come vturturro.
(Cosě disse Ivan Lelli Ven 25 Aug 2000 09:34:52 +0200)
---------------------------------------------
il sito comune di it.comp.appl.access:
http://www.sitocomune.com/
---------------------------------------------
E quello di it.comp.as400
http://www.clavis.it/as400/
---------------------------------------------


title: Immagini jpeg in un report

text:
Buongiorno a tutti
ho sfogliato varie discussioni che riguardano il tema in oggetto, ma
non riesco a trovare risposta alla mia domanda.
Il quesito è semplice: sto creando un db che dovrà essere utilizzato
da vari utenti su stazioni differenti.
Il mio problema sta nel poter collegare un immagine salvata nello
stesso percorso del database con una stringa che non identifichi il
path completo, in modo tale che un utente X possa salvare database e
immagine nel percorso che preferisce e l'immagine resti comunque
collegata.
Mi spiego meglio:
Sul mio pc ho salvato il db nel percorso "C:\Documenti\database.mdb";
in un report richiamo l'immagine "C:\Documenti\Immagine1.jpg". Voglio
che lo stesso db salvato ad es su una directory "C:\prova" (insieme
con l'immagine1.jpg) continui a funzionare correttamnente senza
modificare il path dell'immagine.
Grazie in anticipo a chiunque voglia darmi una mano
Jo


title: Immagini jpeg in un report

author: Antonio

text:
<
un.insetto.s...@gmail.com
> ha scritto nel messaggio
news:1170671362....@l53g2000cwa.googlegroups.com...
Buongiorno a tutti
ho sfogliato varie discussioni che riguardano il tema in oggetto, ma
non riesco a trovare risposta alla mia domanda.
[CUT]
metti un oggetto "immagine" nel report
come "proprietà immagine" metti solo il nome del file: 1.jpg
come "tipo immagine" metti collegata.
CAncelli la immagine dal controllo, in modo che non ci sia nessuna proprietà
in "immagine".
Nel report inserisci all'evento dell'apertura del report stesso:
Immagine1.Picture = "tuopercorso/1.jpg" si carica dal percorso corrente
oppure metti uno relativo o assoluto.
Ciao.


title: Che vantaggi / svantaggi nell'usare formato file 2003 piuttosto del 2000 ?

author: RobertoA

text:
Ho letto da poco un 3d sul formato file e mi e' venuta in mente una
curiosita' che vorrei chiarire
Installando Access 2003 di default il formato file e' Access 2000
Che limitazioni si hanno rispetto all'utilizzare il formato file 2003 ?
Ciao e grazie
RobertoA


author: MA

text:

Oggetto printer per esempio
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


author: Sergio MAZZA

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:geua1c$7op$1...@tdi.cu.mi.it...
Oggetto printer per esempio
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access
[risposta]
Forse intendeva nella gestione dei dati...
Ciao.
--
Sergio MAZZA


author: Karl Donaubauer

text:

Nessuno.
Ci sono millioni di database nel formato di A00 senza che la
gente chi lavora con Access XP o 2003 si accorge di questo fatto. ;-)
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: Distinct o group

author: greg

text:
Avendo la tabella sotto riportata, c'� un modo di sapere quanti CoDclienti
distinti ci sono per ogni data, senza ricorrere a sottoquery?
Grazie
Data  CodCliente Telefono
8/2    12    021234568
8/2    12    0245689
8/2    55    06458963
7/2    12    021234568
7/2    12    0245689
IO vorrei ottenere
8/2    2
7/2    1
--
Greg


title: Distinct o group

author: OneEDP

text:

Jet non supporta Count(Distinct Campo)
devi necessariamente creari una query correlata
Utilizza gli statement piuttosto che il qbe... � molto pi� snello.
Ciao


title: Distinct o group

text:
OneEDP ha scritto:
> Jet non supporta Count(Distinct Campo)
> devi necessariamente creari una query correlata
Ok
> Utilizza gli statement piuttosto che il qbe... � molto pi� snello.
Qui temo di non capire
--
Greg


title: Distinct o group

author: Popi - TheBadHabits

text:
On 9 Feb, 17:41, "greg" <
gre...@invalid.it
> wrote:
> Avendo la tabella sotto riportata, c'è un modo di sapere quanti CoDclienti
> distinti ci sono per ogni data, senza ricorrere a sottoquery?
> Grazie
>
> Data  CodCliente Telefono
>
> 8/2    12    021234568
> 8/2    12    0245689
> 8/2    55    06458963
> 7/2    12    021234568
> 7/2    12    0245689
>
> IO vorrei ottenere
> 8/2    2
> 7/2    1
Sono curioso, lo so, ma ... perché "senza sottoquery"?
A meno che tu non intenda "creare 2 diverse query", cioè avere una
prima query "CodCliDiversi"
SELECT TabCli.Data, TabCli.CodCliente FROM TabCli GROUP BY
TabCli.Data, TabCli.CodCliente;
richiamata da un'altra
SELECT CodCliDiversi.Data, Sum(1) AS QuantiCli FROM CodCliDiversi
GROUP BY CodCliDiversi.Data;
mentre potresti risolvere il tutto in una sola passata con
SELECT CodCliDiversiInterna.Data, Sum(1) AS QuantiCli FROM (SELECT
TabCli.Data, TabCli.CodCliente FROM TabCli GROUP BY TabCli.Data,
TabCli.CodCliente) AS CodCliDiversiInterna GROUP BY
CodCliDiversiInterna.Data;
Popi


title: Distinct o group

text:

E' pi� semplici costruire la query non con l'utilizzo della modalit�
struttra di Access, ma utilizzando la sintassi SQL utilizzando "Visualizza
SQL"


title: Distinct o group

text:
"Popi - TheBadHabits" <
rlu...@yahoo.com
> ha scritto nel messaggio
>Sono curioso, lo so, ma ... perch� "senza sottoquery"?
>A meno che tu non intenda "creare 2 diverse query", cio� avere una
>prima query "CodCliDiversi"
>SELECT TabCli.Data, TabCli.CodCliente FROM TabCli GROUP BY
>TabCli.Data, TabCli.CodCliente;
>richiamata da un'altra
>SELECT CodCliDiversi.Data, Sum(1) AS QuantiCli FROM CodCliDiversi
>GROUP BY CodCliDiversi.Data;
Infatti di solito faccio cosi
>mentre potresti risolvere il tutto in una sola passata con
>SELECT CodCliDiversiInterna.Data, Sum(1) AS QuantiCli FROM (SELECT
>TabCli.Data, TabCli.CodCliente FROM TabCli GROUP BY TabCli.Data,
>TabCli.CodCliente) AS CodCliDiversiInterna GROUP BY
>CodCliDiversiInterna.Data;
Questa ha il vantaggio che non deve essere salvata come oggetto querydef.
E' quello che volevo fare, anche se per me diventa di piu difficile lettura,
soprattutto se volessi innestarne un'altra per aveve anche il Count Distinct
sul campo Telefono
Ciao
greg


title: Distinct o group

text:
On 10 Feb, 13:14, "greg" <
greg_inva...@tin.it
> wrote:
> "Popi - TheBadHabits" <
rlu...@yahoo.com
> ha scritto nel messaggio
>
> >Sono curioso, lo so, ma ... perché "senza sottoquery"?
> >A meno che tu non intenda "creare 2 diverse query", cioè avere una
> >prima query "CodCliDiversi"
> >SELECT TabCli.Data, TabCli.CodCliente FROM TabCli GROUP BY
> >TabCli.Data, TabCli.CodCliente;
> >richiamata da un'altra
> >SELECT CodCliDiversi.Data, Sum(1) AS QuantiCli FROM CodCliDiversi
> >GROUP BY CodCliDiversi.Data;
>
> Infatti di solito faccio cosi
>
> >mentre potresti risolvere il tutto in una sola passata con
> >SELECT CodCliDiversiInterna.Data, Sum(1) AS QuantiCli FROM (SELECT
> >TabCli.Data, TabCli.CodCliente FROM TabCli GROUP BY TabCli.Data,
> >TabCli.CodCliente) AS CodCliDiversiInterna GROUP BY
> >CodCliDiversiInterna.Data;
>
> Questa ha il vantaggio che non deve essere salvata come oggetto querydef.
> E' quello che volevo fare, anche se per me diventa di piu difficile lettura,
> soprattutto se volessi innestarne un'altra per aveve anche il Count Distinct
> sul campo Telefono
Io mi regolo così: creo le subquery necessarie e la/le query che le
richiamano, poi sostituisco ad ogni FROM nella/e query che le
richiamano ogni "FROM nomedellasubquery" con "FROM (SELECT ...) AS
nomedellasubquery".
Nota a margine: l'esperienza mi ha insegnato che le subquery
provvisorie le elimino DOPO aver verificato che tutto funzioni
(sembrerà banale ma le leggi di Murphy son sempre in agguato) :).
Buon divertimento!
Popi


title: Protezione

author: Giuliano

text:
Salve,
come si fa (se e' possibile) per fare in modo che un programma gestionale in
Access sia si utilizzabile, ma che non si possa vedere e modificare la sua
struttura (modalita' struttura delle tabelle, maschere, ecc.....).
GRAZIE.
  Ciao


title: Protezione

author: AntoGal

text:
Giuliano <
gro...@inwind.it
> scrisse...

Crea un MDE dal menù Strumenti -> Utilità database
--
Ciao, AntoGal
*************************************************
Gestione punti vendita (casse e pos NCR)

www.powerretail.it
-------------------------------------------------------------
per scaricare un gioco di DAMA ITALIANA
http://volftp.mondadori.com/italiani/galletta/
*************************************************


title: maschera collegata a casella combinata

author: Zappus

text:
Salve a tutti,
ho una maschera con una sottomaschera "figlio" non associata.
Nella maschera ho una combo che contiene alcuni valori.
In base alla scelta dei valori, la sottomaschera dovra cambiare origine
oggetto, diventando di volta in volta una delle maschere che ho creato a
parte.
ho scritto la seguente routine sul "dopo aggiornamento" della combo
if me.combo="1" then
me.FIGLIO.sourceobject="maschera1"
else
if me.combo=2" then
me.FIGLIO.sourceobject="maschera2"
else
.ecc...
Funziona!!!!
Il problema è che quando inserisco es. "2" nella combo, se vado a
visualizzare gli altri record con valori diversi nella combo questi sono
rimasti come io li avevo inseriti ma la sottomaschera è sempre quella
collegata alla scelta "2" ultima inserita....
Spero di essere stato chiaro.....Premetto che l'origine delle varie maschere
è la stessa ma in ogni maschera ho variato delle etichette che devono
necessariamente apparire diverse a seconda della scelta nella combo.
Grazie anticipatamente.
Luca.


title: maschera collegata a casella combinata

author: Roberto da casa

text:
"Zappus" <
luca...@libero.it
> ha scritto nel messaggio
news:8A6x9.109529$%M1.28...@twister2.libero.it...

Se la casella combinata me.combo NON è associata, penso che il tuo problema
non abbia soluzione.
Se invece la casella combinata me.combo è associata ad un campo dell'oggetto
che è origine record della maschera pricipale, il codice VBA che hai
generato a fronte dell'evento "Dopo aggiornamento" della casella combinata
devi generarlo anche a fronte dell'evento "Su corrente" della maschera
principale.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: maschera collegata a casella combinata

text:
Roberto da casa <
r.ma...@libero.it
> wrote in message
zU7x9.109217$RO.28...@twister1.libero.it...

Scusa per il pvt
ho sbagliato a pigiare...ripeto
GRANDE ROBERTO!!!(Urlato)
Grazie
Luca


title: Convertire Lire Euro grosso db

author: NicLoi

text:
Ho provato a convertire un db molto grande da lire in euro con il programma
di conversione nel sitocomune suggerito da AntoGal, ma mi da errore  durante
la conversione su "UPDATE " non valido.
Sapete perchč?
Ho anche provato a far convertire una tabella alla volta ma niente.
Mi va bene anche una suggerimento per convertire visto che ho provato con:
Int(([Prezzo]/1936.27) ma il risulatato č che mi toglie i decimali
Grazie Loi


title: Convertire Lire Euro grosso db

author: Tecnoricambi

text:
"NicLoi" <
nicol...@tin.it
> ha scritto nel messaggio
news:zyhw8.43726$vF6.1...@news2.tin.it...

 Devi fare cosě:
Int(([Prezzo]*100/1936.27+0,499)/100
Vedrai che funziona
Ciao
Claudio


title: Convertire Lire Euro grosso db

author: Emyr

text:


Function arrotondaeuro(varNr As Double, Optional varPl = 2) As Double
' by Konrad Marfurt + ? + Karl Donaubauer + Fanton Emanuele
'varNr: numero da arrotondare
'varPI: numero di decimali (due predefinito)
varNr = Nz(varNr, 0)
   arrotondaeuro = Fix("" & varNr * (10 ^ varPl) + Sgn(varNr) * 0.5) /
(10 ^ varPl)
End Function
Saluti.
Emanuele.


title: Convertire Lire Euro grosso db

author: Max De Poli

text:
"NicLoi" <
nicol...@tin.it
> wrote in message news:<zyhw8.43726$
vF6.1...@news2.tin.it
>...
> Mi va bene anche una suggerimento per convertire visto che ho provato con:
> Int(([Prezzo]/1936.27) ma il risulatato è che mi toglie i decimali
Se hai Access 2000 puoi usare
Round(([Prezzo]/1936.27);2)
se hai una versione precedente ti conviene la funzioncina gia' suggerita.
Cia'
Max


title: Convertire Lire Euro grosso db

text:
Grazie a tutti mi siete stati utili
Nic


title: Convertire Lire Euro grosso db

author: elio

text:
Tecnoricambi <
tecnor...@wind.it.net
> wrote in message
a9uqqb$11cpl$1...@news02.it.net...
>
> "NicLoi" <
nicol...@tin.it
> ha scritto nel messaggio
> news:zyhw8.43726$vF6.1...@news2.tin.it...
> > Ho provato a convertire un db molto grande da lire in euro con il
> >cut
> > Grazie Loi
>  Devi fare cosě:
> Int(([Prezzo]*100/1936.27+0,499)/100
> Vedrai che funziona
> Ciao
> Claudio
>
Ti sarei molto grato se potessi sapere il significato dello sviluppo di
questa formula.
Soprattutto quel +0,499)/100. Che significa?
Ciao
Elio


title: Imposta valore

author: sanchirco

text:
Sto cercando d'impostare un valore con una macro, e ci sono riuscito.
il problema e che voglio aggiornare tutti i campi di una maschera continua e
non solo il campo in cui si trova il cursore, come faccio ?
Grazie anticipatamente per la risposta


title: Imposta valore


title: Imposta valore

author: Antonio Biso

text:
sanchirco <
moe...@mail.omnitel.it
> wrote in message
8vk64e$9cs$1...@nread2.inwind.it...
> Sto cercando d'impostare un valore con una macro, e ci sono riuscito.
> il problema e che voglio aggiornare tutti i campi di una maschera continua
e
> non solo il campo in cui si trova il cursore, come faccio ?
Buttando le macro e lavorando con le query
Inoltre su una maschera non ci sono i campi, semmai nelle tabelle...
Antonio


title: campi vuoti faq. 3.95

author: michele

text:
Un saluto a tutti
Ho utilizzato il codice proposto dal sitocomune Faq 3.95 al fine di
evitare specifici campi vuoti nei record di una maschera naturalmente
collegata ad una tabella.
La cosa che ho notato che per le caselle di testo tutto funziona per
il meglio mentre per le caselle combinate tale codice non ha effetto.
Qualuno conosce una soluzione.
Grazie
Michele
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: campi vuoti faq. 3.95

author: almorel

text:

Ciao Michele,
se è questa la fubzione:
Private Sub Form_BeforeUpdate(Cancel As Integer)
Dim ctl As Control
For Each ctl In Me.Controls
       If ctl.Tag = "OBBLIGATORIO" Then
            With ctl
                  If .Visible And (.ControlType = acTextBox) Then
                        .BackColor = 12632256
                           If IsNull(.Value) Or .Value = "" Then
                                 .BackColor = 255
                                 MsgBox UCase(ctl.Controls(0).Caption)
& vbCrLf & _
                                          "@Inserire i dati mancanti
nel Campo@", vbExclamation, "AVVISO"
                                 .SetFocus
                                 Set ctl = Nothing
                                 Cancel = True
                                 Exit Sub
                           End If
                  End If
            End With
      End If
Next
Set ctl = Nothing
End Sub
vedi che cerca solo i textbox, qundi gli devi dire:
If .Visible And (.ControlType = acTextBox) or (.ControlType =
acComboBox)Then
Ciao.
Alberto


title: campi vuoti faq. 3.95

author: Karl Donaubauer

text:
almorel wrote:
> michele wrote:
>>
>> Ho utilizzato il codice proposto dal sitocomune Faq 3.95 al fine di
>> evitare specifici campi vuoti nei record di una maschera naturalmente
>> collegata ad una tabella.
>> La cosa che ho notato che per le caselle di testo tutto funziona per
>> il meglio mentre per le caselle combinate tale codice non ha effetto.
>
> se è questa la fubzione:
> Private Sub Form_BeforeUpdate(Cancel As Integer)
> Dim ctl As Control
> For Each ctl In Me.Controls
>        If ctl.Tag = "OBBLIGATORIO" Then
>             With ctl
>                   If .Visible And (.ControlType = acTextBox) Then
> ...
> vedi che cerca solo i textbox, qundi gli devi dire:
>
> If .Visible And (.ControlType = acTextBox) or (.ControlType =
> acComboBox)Then
Se non vuoi cambiare la logica (Visible And Tipo):
If .Visible And
    (.ControlType = acTextBox or .ControlType = acComboBox) Then
--
Ciao
Karl
*********
Access FAQ:
www.donkarl.com/it


title: Sommare ore, minuti e secondi.

author: Dante

text:
Help !!!!
In una tabella ho inserito i dati delle ore giornaliere, effettuate in un
mese di lavoro, nel formato ora estesa. Dovrei fare la somma di questi dati
e stampare il totale ma la somma non viene corretta. Infatti quando arriva a
ore 24.00.00, anziché continuare (25.01.00, 28.16.53, ecc.), riparte da
0.00.00. es. in una somma che dovrebbe risultare 130.15.56, viene stampato
10.22.35. Ho provato diverse soluzioni ma non sono venuto a capo di niente.
Spero di essere stato sufficientemente chiaro. Se qualche buon'anima può
aiutarmi, magari con qualche esempio, le sarei veramente grato.
Salutoni
Dante.


title: Sommare ore, minuti e secondi.

text:


devi gestire la somma via codice con la conversione in campi
personalizzati, purtroppo non siamo su excel che si occupa di tutto
ciò
Saluti.
Emanuele.


title: Sommare ore, minuti e secondi.

text:
"Emyr" <
fan...@lavoro.com
> ha scritto nel messaggio
news:51o7iusa8a4uoi3t0...@4ax.com...
> On Wed, 03 Jul 2002 20:39:47 GMT, "Dante" <
dso...@tin.it
> wrote:
>
> >Help !!!!
> >
> >In una tabella ho inserito i dati delle ore giornaliere, effettuate in un
> >mese di lavoro, nel formato ora estesa. Dovrei fare la somma di questi
dati
> >e stampare il totale ma la somma non viene corretta. Infatti quando
arriva a
> >ore 24.00.00, anziché continuare (25.01.00, 28.16.53, ecc.), riparte da
> >0.00.00. es. in una somma che dovrebbe risultare 130.15.56, viene
stampato
> >10.22.35. Ho provato diverse soluzioni ma non sono venuto a capo di
niente.
> >Spero di essere stato sufficientemente chiaro. Se qualche buon'anima può
> >aiutarmi, magari con qualche esempio, le sarei veramente grato.
questo è il modulo che ho fatto io per il mio "cartellino elettronico"..
sarà sufficiente inviare il totale dei secondi alla funzione... e lui ti
restituisce il numero di ore formattate.
Public Function calcolaore(totsecondi, totoracalcolate)
Dim k, ks, km, kh
For k = 1 To totsecondi
       ks = ks + 1
    If ks = 60 Then
        km = km + 1
        ks = 0
            If km = 60 Then
                kh = kh + 1
                km = 0
            End If
    End If
Next k
totoracalcolate = kh & "." & km & "." & ks
End Function


title: Sommare ore, minuti e secondi.

text:
Chiedo scusa se non ho ancora ringraziato chi mi ha risposto ma, per motivi
di lavoro, sono stato assente e solo ora ho aperto il newgroup. Vorrei solo
chiedere a ### CH v 2000 ###, essendo io un novellino, dove devo agganciare
la Public Function ... Mi spiego; il report, alla fine,
in -OrigineControllo- ha "=somma(nz([TempoImpegato])) ...
Di nuovo grazie e... abbiate pazienza.
Saluti
Dante


title: Sommare ore, minuti e secondi.

text:
"Dante" <
dso...@tin.it
> ha scritto nel messaggio
news:okHX8.61518$Jj7.1...@news1.tin.it...

invece di impostare - OrigineControllo -    dalla maschera delle
proprietą... fallo da Visual
cioč su evento formattazione ci metti...
il nome del controllo ha cui hai associato precedentemente
=somma(nz([TempoImpegato]))... magari l'hai chiamato "totaleore".....
-------------------
Esempio...(i nomi delle function e del campo sono inventati...dopo gli
adatti tu)
Private Sub PičDiPaginaGruppo1_Format(Cancel As Integer, FormatCount As
Integer)
dim totoracalcolate
call calcolaore(totsecondi, totoracalcolate)
totaleore=totoracalcolate
end sub
----------------------


title: Sommare ore, minuti e secondi.

text:
"### CH v.2002 ###" <
ngma...@genio-af.it
> ha scritto nel messaggio
news:agu4a4$35l$1...@fe1.cs.interbusiness.it...
>
> "Dante" <
dso...@tin.it
> ha scritto nel messaggio
> news:okHX8.61518$Jj7.1...@news1.tin.it...
> > Chiedo scusa se non ho ancora ringraziato chi mi ha risposto ma, per
> motivi
> > di lavoro, sono stato assente e solo ora ho aperto il newgroup. Vorrei
> solo
> > chiedere a ### CH v 2000 ###, essendo io un novellino, dove devo
> agganciare
> > la Public Function ... Mi spiego; il report, alla fine,
> > in -OrigineControllo- ha "=somma(nz([TempoImpegato])) ...
> > Di nuovo grazie e... abbiate pazienza.
>
> invece di impostare - OrigineControllo -    dalla maschera delle
> proprietà... fallo da Visual
>
> cioè su evento formattazione ci metti...
>
> il nome del controllo ha cui hai associato precedentemente
> =somma(nz([TempoImpegato]))... magari l'hai chiamato "totaleore".....
> -------------------
> Esempio...(i nomi delle function e del campo sono inventati...dopo gli
> adatti tu)
>
> Private Sub PièDiPaginaGruppo1_Format(Cancel As Integer, FormatCount As
> Integer)
>
> dim totoracalcolate
> call calcolaore(totsecondi, totoracalcolate)
> totaleore=totoracalcolate
>
> end sub
> ----------------------
>
>
Ti ringrazio dei dettagli ma non sono riuscito a farlo funzionare. Ho invece
adottato questo sistema e funziona:
=(Somma(Hour([TempEff]))+(Somma(Minute([TempEff]))+(Somma(Second([TempEff]))
)\60)\60) & "." & (Somma(Minute([TempEff]))+(Somma(Second([TempEff])))\60)
Mod 60 & "." & (Somma(Second([TempEff]))) Mod 60
se hai qualche altro suggerimento è ben gradito.
Saluti
Dante


title: Sommare ore, minuti e secondi.

text:
"Dante" <
dso...@tin.it
> ha scritto nel messaggio
news:hLGZ8.82556$Jj7.2...@news1.tin.it...
> Ti ringrazio dei dettagli ma non sono riuscito a farlo funzionare. Ho
invece
> adottato questo sistema e funziona:
>
>
=(Somma(Hour([TempEff]))+(Somma(Minute([TempEff]))+(Somma(Second([TempEff]))
> )\60)\60) & "." & (Somma(Minute([TempEff]))+(Somma(Second([TempEff])))\60)
> Mod 60 & "." & (Somma(Second([TempEff]))) Mod 60
>
> se hai qualche altro suggerimento è ben gradito.
>
scusa ma il mio modulo in VBA chiamato calcolaore c'è l'hai?
adesso appena ho 30 Microsecondi ti invio il dettaglio...ok?


title: Sommare ore, minuti e secondi.

text:
"Dante" <
dso...@tin.it
> ha scritto nel messaggio
news:hLGZ8.82556$Jj7.2...@news1.tin.it...
> Ti ringrazio dei dettagli ma non sono riuscito a farlo funzionare. Ho
invece
> adottato questo sistema e funziona:
>
>
=(Somma(Hour([TempEff]))+(Somma(Minute([TempEff]))+(Somma(Second([TempEff]))
> )\60)\60) & "." & (Somma(Minute([TempEff]))+(Somma(Second([TempEff])))\60)
> Mod 60 & "." & (Somma(Second([TempEff]))) Mod 60
Il mio report ha un codice cosě...
Private Sub PičDiPaginaGruppo1_Format(Cancel As Integer, FormatCount As
Integer)
Dim kexore, kmenore, orefin, of1, of2
kexore = Second(Me.totextmens) + (Minute(Me.totextmens) * 60) +
(Hour(Me.totextmens) * 3600)
         ' calcola il totale dei secondi del campo sul report totextmens
kmenore = Second(Me.totmenmens) + (Minute(Me.totmenmens) * 60) +
(Hour(Me.totmenmens) * 3600)
         ' calcola il totale dei secondi del campo sul report totmenmens
If kexore > kmenore Then            ' caso che kexore sia maggiore di
kmenore
    orefin = kexore - kmenore
    Call calcolaore(orefin, of1)
    orefinali2.Visible = False
    orefinali1.Visible = True
    norecupero.Visible = True
    noesubero.Visible = False
ElseIf kexore < kmenore Then        ' caso che kexore sia maggiore di
kmenore
    orefin = kmenore - kexore
    Call calcolaore(orefin, of2)
    orefinali2.Visible = True
    orefinali1.Visible = False
    norecupero.Visible = False
    noesubero.Visible = True
End If
Me.orefinali1 = Format$(of1, "hh.mm.ss")            'esubero ore
Me.orefinali2 = Format$(of2, "hh.mm.ss")            'mancanza ore
End Sub
ricordati che per il mio codice di calcolo ore devi creare un modulo nel
database
ciao


title: Filtro record su query

author: Giuseppe

text:
Ciao a tutti
Ho una query con due campi; Numero,
Descrizione
i record sono del
tipo:
Numero
Descrizione
0

acqua
0
levissima
0
vitasnella
0
san
benedetto
0

birra
0
moretti
0
nastro
azzurro
0
duff
0

Pan
carrè
0
Mulino
bianco
0
sidis
e così via;
Vorrei poter cambiare il numero 0 per esempio a
tutta l'acqua o a tutta la birra. Come posso fare?

Grazie. Giuseppe


title: Filtro record su query

author: max

text:
<Giuseppe> ha scritto nel messaggio
news:4a66bd6d$0$27121$4faf...@reader1.news.tin.it
...


 con una query di aggiornamento, metti il criterio sotto la
  descrizione e nella riga aggiorna a del numero metti il numero che vuoi

ciao

Max


title: Filtro record su query

text:



Grazie Max, ma c'è un piccolo problemino; in criteri cosa
    devo inserire? A me serve per esempio che il numero 0 cambi solo dal record
    successivo alla descrizione acqua fino al record precedente alla parola
    birra, ovvero che il numero levissima, vitasnella e san benedetto diventi 1
    o 2 o qualsiasi altro numero che gli dico io. Ho provato in criteri a
    scrivere così: >"acqua" and <"birra" ma in questo modo mi salta solo
    la colonna birra ovvero mi restituisce levissima, vitasnella, san benedetto,
    mulino bianco e sidis. Ho provato in altri modi ma non riesco a risolvere il
    problema.

Grazie.Giuseppe


title: Filtro record su query

text:
Giuseppe wrote:
> Ho una query con due campi; Numero, Descrizione
> i record sono del tipo:
> Numero        Descrizione
> 0                    acqua
> 0                    levissima
> 0                    vitasnella
> 0                    san benedetto
> 0                    birra
> 0                    moretti
> 0                    nastro azzurro
> 0                    duff
> 0                    Pan carr�
> 0                    Mulino bianco
> 0                    sidis
>
> e cos� via;
> Vorrei poter cambiare il numero 0 per esempio a tutta l'acqua o a
> tutta la birra. Come posso fare?
Con questa struttura dei dati non puoi mai gestirli bene.
Perch� sono strutturati cos� e non come relazione 1 a molti
(gruppo - prodotto) che sarebbe la regola in un db relazionale?
L'hai fatto con la query o i dati si trovano gi� cos� in una tabella
dove non puoi modificare la struttura?
--
cu
Karl
*********
Access FAQ:
www.donkarl.com/it


title: Filtro record su query

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:7cou14F...@mid.individual.net...

Grazie Karl.
In realt� i dati si trovano in una tabella non modificabile.
Grazie. Giuseppe