mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Query con campo filtrato

Ho una query che mi restituisce:
MATRICOLA (Tabella Soci) - Matricola (Tabella Storico Soci) - Data di carico 
(Tabella Storico Soci) - Cantiere (Tabella Storico Soci)
    5                                                5 
20/12/2004                                           AZ
    5                                                5 
16/01/2000                                            AZDVCO
    6                                                6 
20/12/2005                                            AZPALL
    6                                                6 
15/01/2004                                            AZCCCC
Mi interessa che la query mi restituisca un solo record per ciascuna 
matricola con la data dell'ultimo cantiere, cioč:
   5                                                5 
20/12/2004                                           AZ
   6                                                6 
20/12/2005                                            AZPALL
da utilizzare per origine dati ad un report che stampa il libro matricola 
con i parametri:
DAL/AL          DA MATRICOLA A MATRICOLA     DA CANTIERE A CANTIERE.
Come posso filtrare nella query solo i record interessati?
Grazie
Pietro 


http://groups.google.com/group/it.comp.appl.access/browse_frm/thread/d603272226743009/f3aa1fc0f1dde0ee
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

 ha scritto nel messaggio 
news:4ijca7F...@individual.net...

Grazie! Il tuo consiglio č stato utilissimo: ho risolto.
Ladrodivita

Newsgroup: it.comp.appl.access
Titolo: ...passare a nuovo record...ancora...

ho già posto il problema ma non ho risolto....
ho in A2000 un form con del codice che deve elaborare un ciclo su un'altro
form che contiene un sub form.
Per chiarezza dal form 1 eseguo un ciclo che lavora sul form 2 che contiene
il subform 2a.
Ho la necessità di far passare il sub form 2a ad un nuovo record,
quindi...eseguo questo codice dal form 1:
Dim db As DAO.Database
Dim rs As DAO.Recordset
Set db = CurrentDb
Set rs = db.OpenRecordset("y")
rs.MoveFirst
Do Until rs.EOF
....
...
forms![2]![2a].setfocus
docmd.gotorecord,,acnewrec
rs.movenext
loop
il mio problema sta nel fatto che non riesco a far passare a nuovo record il
subform ovvero 2a !!!!!!!
..A2000 mi dice impossibile passare al record specificato...! oppure form 2a
non è aperto...!!!???
Grazie ancora anticipatamente
Frankkk

 ha scritto nel messaggio
news:xrwx7.6863$pm2.1...@news2.tin.it...

Se la seconda maschera si chiama form2 ed il controllo sottomaschera in esso
contenuto si chiama form2a, devi prima spostare il fuoco sulla maschera, poi
sul controllo sottomaschera ed infine dare il comando di andare a record
nuovo,  ovvero:
Forms!form2.SetFocus
Forms!form2!form2a.SetFocus
DoCmd.GoToRecord , , acNewRec
Insomma a te manca la prima riga, quella che sposta il fuoco sulla maschera
principale.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Si può disattivare il messaggio di "non in elenco" in una casella combinata? (lunghetto)

Applicazione usata: Access 2003.
La casella combinata *bianco* ha la seguente origine riga:
*SELECT DISTINCT giocatori.idGiocatori,nome,punti FROM giocatori ORDER 
BY nome;*
la colonna associata è la prima (*idGiocatori*);
la larghezza dei campi è: 0cm; 3,5 cm; 1cm
Siccome la prima colonna visualizzata non è quella associata sono 
costretto a mantenere l'opzione "solo in elenco" a *SI*.
sull'evento "non in elenco" ho il seguente codice:
*Private Sub bianco_NotInList(NewData As String, Response As Integer)
Dim msgB As String
Dim rispB As Long
Dim valB As String
     msgB = "Il giocatore non è stato inserito. Inserirlo adesso?"
     rispB = MsgBox(msgB, vbYesNo + vbExclamation, "nuovo giocatore")
     If rispB = vbNo Then
         bianco.Text = ""
         GoTo etB
     Else
         valB = bianco.Text
         DoCmd.OpenForm "giocatori"
         DoCmd.GoToControl "nome"
         Forms!giocatori![nome].Text = valB
         DoCmd.GoToControl "punti"
     End If
etB:
End Sub*
Il problema è che non riesco a disattivare il messaggio di sistema "il 
testo immesso non corrisponde a una voce dell'elenco". Non vorrei essere 
costretto a disattivare i controlli di errore su tutti i controlli; è 
possibile "neutralizzare" solo quello specifico messaggio?
grazie e ciao
Peppe

 Peppe
Ciao Peppe,
manca il response=acdataErrContinue, per indicare ad Access di non far
visualizzare il messaggio di errore dopo la msgbox, dai un occhio anche a
acDataErrDisplay e acDataErrAddedd nell'help.
visita questo link :
http://www.donkarl.com/it/
,   Casella combinata - Aggiungere un nuovo record
faq 4.13 sez.maschere
Ciao, Sandro

 faq 4.13 sez.maschere
Perfetto, grazie.
ciao
Peppe 

 Peppe
Imposta la larghezza della prima colonna a 0,001 invece che a zero, e poi
puoi cambiare la proprietà 'Solo in elenco'.
Detto ciò, a cosa ti serve la colonna idGiocatori se non la visualizzi e
non la usi nemmeno come colonna associata? Secondo me la puoi eliminare e
usare 'nome' come prima colonna e colonna associata, risolvendo il
problema alla radice.
Namor
-- 
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 non la usi nemmeno come colonna associata?
La colonna idGiocatori č associata; se ne setto la larghezza a 0.0001, 
nella casella di riepilogo dovrň inserire non piů il nome ma l'id.
ciao
Peppe

Peppe Monti ha scritto:




Ah si, scusa, ho letto poco attentamente. Allora non ti resta che gestire
l'evento 'Non in elenco'.
Ciao.

Newsgroup: it.comp.appl.access
Titolo: Routine per creare file da inviare alla banca per la presentazione ricevute bancarie

Sapete se si possa trovare una routine, in vba, per ottenere il file 
formato standard cbi per la presentazione in banca degli effetti tipo 
ricevute bancarie o simili?
Molto utile sarebbe anche una procedura per la verifica formale del file 
creato, cosi' da evitare invii non sintatticamente corretti


una routine standard la vedo dura visto che ogni uno usa un proprio 
metodo per gestire le scadenze
 
lo standard cbi delle riba è cmq una boiata da fare
https://www.cracantu.it/files/STANDARD_CBI_AREA_INCASSI-RIBA-REL_5_01.pdf
 
 
basta ciclare la tua tabella scadenze con riba e creare il txt come da 
link qui sopra
 
ciao
BFS


Si, conosco il documento
E per la verifica formale conosci qualcosa?
 
 
 


no
ma bene o male tutti i siti di hb in fase di import te lo testano.
poi è talmente semplice che è dura sbagliare qualcosa.
ovvio che se l'utente in anagrafica carica un abi o un cab di 4 
caratteri il file viene poi sbagliato. ma io in fase di caricamento 
anagrafiche verifico praticamente tutto per evitare problemi di questo 
tipo prima di salvare il nominativo
Newsgroup: it.comp.appl.access
Titolo: Maschera tabulare senza campi

Ciao a tutti.
Ho una maschera tabulare continua che non mi visualizza i campi.
Cioč, nella struttura vedo tulle le textbox associate ai campi della
query, ma quando "lancio" la maschera i campi non si vedono.
Credo che dipenda dalla query, ma da cosa in particolare??
Grazie a tutti.
-- 
Dario
--
Il bello della vita č vivere:
molti esistono, ecco tutto.
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Grazie a tutti.
E come si fa a capire cosa vedi???
la query che è origine funziona?
I controlli sono associati correttamente?
Se la apri in modalità foglio dati che ti dà?
MAssimiliano

 Credo che dipenda dalla query, ma da cosa in particolare??
Di solito capita se la query non contiene data e non č aggiornabile.
Ma esistono anche altre versioni come descritto qui:
http://support.microsoft.com/?id=93261
-- 
HTH
Karl
*********
Access-FAQ (tedesco): 
http://www.donkarl.com

 
http://support.microsoft.com/?id=93261
Scusami ma sono un principiante
1) La tabella collegata non ha nessun record, ma non dipende da quello
2) Come faccio a capire se non è aggiornabile??
Grazie comunque 
-- 
Dario
--
Il bello della vita è vivere:


 Access-FAQ (tedesco): 
http://www.donkarl.com
Una domanda nuova da parte mia: a quando una versione inglese del tuo sito??
;-P
MAssimiliano

 Grazie comunque 
Ho risolto.
Praticamente avevo impostato a 'no' la proprietà della maschera 'consenti
aggiunte', quindi se la tabella collegata (cui fa riferimento la query)
non ha nessun dato la maschera non visualizza niente, e quando ho aggiunto
un record nella tabella la maschera comunque non me lo vedeva. E' bastato
impostare a 'si' la proprietà per fare funzionare il tutto.
Grazie comunque a Karl e a Ma che mi hanno dedicato un pò del loro tempo.
Ciao :-)


 Ciao :-)
Peraltro, adesso che ho risolto il problema rileggendo il tread di Karl mi
sono reso conto che era proprio quello che aveva detto lui. 
L'ignoranza (la mia) è proprio una brutta bestia. ;-)
Av salut

Newsgroup: it.comp.appl.access
Titolo: Memo nei report

Già un pò di tempo fa posi questa domanda, ma senza avere risposte 
conclusive...
In pratica ho un report dove una casella ditesto mi deve restituire + di 
255 caratteri, ovviamente anche impostando a ridimensionamento 
automatico non lo fa.
E' un limite dei Report rispetto al campo memo delle tabelle o sbaglio 
qualcosa?

 ha scritto nel messaggio
news:3ED4EED9...@libero.it...

Sinceramente non saprei io ho inserito in un Report la descrizione
per la preparazione di Ricette di Cucina, e spesso sono una paginata
di roba e pare che funzioni..............!!!
@Alex.

 ha scritto:

Dipende dalla version di Access che certo non hai rivelato.
La causa la più frequente è che si tratta di A00 o AX e hai
un ragruppamento per il memo nella query di dove vengono
le date del report. In questo caso nella query il memo viene
trattato come un campo testo gioè ridotto a 255 caratteri
automaticamente. Stranamente non è documentato.
Se nel tuo caso si tratta di questa variante forse puoi prendere
un'altra funzione (p.e. First) per il memo. Un altro workaround
è di prendere 2 query. Una con tutte le date senza il memo
e una solo con il memo e la chiave per conettere le due query.
--
HTH
Karl
*********
Access-FAQ (tedesco): 
http://www.donkarl.com


Chiedo scusa effettivamente ho access 2000
solo non capisco, in realtà il problema sorge se la base del report è 
una query?
Dovrei in pratica usare direttamente la tabella?

Newsgroup: it.comp.appl.access
Titolo: query record duplicati

Non riesco a creare una query che dati i seguenti record:
campo1   campo 2
casa                1
casa                1   (*)
casa                2   (*)
villa                3
castello          4  (*)
castello          5  (*)
mi ritorni solo quelli con l'asterisco, che cioč hanno
uguale campo1 ma diverso il campo2.
Grazie.
Sandro

 Sandro
USa il Raggruppamento, è quel pulsante di SOMMATORIA nella
barra strumenti in alto.
La query una volta raggruppata non è più editabile ovviamente.
@Alex.
Newsgroup: it.comp.appl.access
Titolo: DATA PROGRESSIVA

Ciao a tutti,
mi servirebbe sapere come si può fare in access, in una tabella del
tipo Data;Entrate;Uscite a far inserire la data in automatico in modo
che per ogni record risultino date progressive, mi spiego meglio, seil
campo data del record1 è 16/11/04, il DB mi dovrebbe dare al
record2(in automatico) la data del 17/11/04, al rec3 18/11/04 e cosi
via...
Grazie a tutti quelli che saprano essermi utili e anche solo a
chileggerà il mio post.
Ciao a tutti

 ha scritto nel messaggio
news:d66c2a79.04111...@posting.google.com...

Se la tabella che contiene i dati si chiama Tabella1, nel Valore predefinito
della casella di testo associata al campo Data scrivi:
=IIf(IsNull(DMax("Data";"Tabella1"));Date();DMax("Data";"Tabella1")+1)
Per il primo record che inserirai in tabella il campo Data avrà come valore
la data di sistema, che se non ti soddisfa puoi modificare manualmente.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 la data di sistema, che se non ti soddisfa puoi modificare manualmente.
Scusate ma nessuna sembra funzionare,cmq su access XP c'è la funzione
DateAdd con la seguente sintassi
DateAdd («intervallo»; «numero»; «data»)
maanche questanon funziona xchè mi da operatore o operando
mancante(sempre) anche copiando e incollando l'esempio sulla Guida in
Linea.
Bohhhhhhhh.

 la data di sistema, che se non ti soddisfa puoi modificare manualmente.
Scusami roberto ma ho visto che DateAdd è statico, per quanto riguarda
invece la riga
=IIf(IsNull(DMax("Data";"Tabella1"));Date();DMax("Data";"Tabella1")+1)
Access mi dice Funzione 'DMax' sconosciuta nell'espressione di
convalida o nel valore predefinito di 'Tabella1.Data'. il nome della
tabella e del campo sono gli stessi ma ho letto dal tipo di errore
che:
---------Funzione <nome> sconosciuta nell'espressione di convalida o
nel valore predefinito di <nome>. (3388).
La funzione a cui si sta facendo riferimento è sconosciuta (il nome
non è valido o è scritto in modo errato) oppure è un tipo di funzione
non consentito dalla proprietà ValidationRule o DefaultValue. Tra i
tipi di funzioni non consentiti ci sono le funzioni di aggregazione
SQL definite dall'utente.-------
Sembra dicapire che tale funzione di aggregazione nonè valida nel
campo valore predefinito.
Come fare allora?


A quanto pare hai scritto quella espressione nel Valore predefinito del
campo Data, nella struttura della tabella; io non ti avevo suggerito questo,
ma se leggi bene ti ho suggerito di scrivere, nella struttura di una
maschera, quell'espressione nel Valore predefinito della casella di testo
associata al campo Data: c'è una bella differenza, non credi?
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
[CUT]
Newsgroup: it.comp.appl.access
Titolo: Problemi di conversione file access 2000 to access 97

Ciao a tutti , ho un problema.
Ho creato un database con la versione di access2000, ma in ufficio
sfortunatamente ho la versione 97.
Ho fatto la conversione del file da 2000 a 97 ma non mi fa aprire il
database.
Cosa posso fare per rimediare a questo?
Ringrazio anticipatamente chi mi aiuterà.
rcr...@tin.it

 ha scritto nel messaggio
news:A8cZ5.1129$Kw2....@twister2.tin.it...


 >
ma ti ritorna un qualche messaggio d'errore?
Alfio

 Si mi dice che i moduli non sono compatibili

Newsgroup: it.comp.appl.access
Titolo: Query in apertura di maschera.

Ciao a tutti,
ho una maschera "inserisci carichi" che mi permette di inserire i 
carichi di un cliente.
le tabelle che mi fa gestire la maschera sono 2
conto = id_conto; fornitore; stato: principale
carichi= id_carico; id_conto; data; carico; che voglio riempire 
progressivamente
nella tabella conto il record stato può essere aperto o chiuso, io 
vorrei che quando apro la maschera inserisci carichi vengano selezionati 
solo i record della tabella principale che hanno come stato il valore 
'aperto', come devo fare?
Grazie 1000

 ha scritto nel messaggio
news:45a6482c$0$16142$4faf...@reader3.news.tin.it...

Non sei stato chiarissimo per quanto riguarda la struttura dati del DB.
Comunque, se la maschera inserisci carichi ha come origine record la tabella
conto direttamente, sostituisci questa origine record con una query che
restituisce i dati della tabella stessa ma con un criterio che filtra solo i
record con stato aperto
Antonio

Newsgroup: it.comp.appl.access
Titolo: Conferma di esecuzione di una query

Ciao a tutti,
ho la necessità di avviare una macro all'apertura del file access.
Tale macro avvia una serie di query ma ogni volta che viene eseguita mi
chiede la conferma!
E' possibile disabilitare tale cosa?
A presto,
Simone

 ha scritto nel messaggio
news:b2888j$e4i$1...@fata.cs.interbusiness.it...

SetWarnings False

Grazie Newsgroup,
ma dove sta tale settagio?
Nel senso devo impostarlo a livello di codice, vero?
Grazie ancora,
Simone

 ha scritto nel messaggio
news:b28brs$sck$1...@fata.cs.interbusiness.it...

C'č anche nelle impostazioni d'avvio, ma conviene disabilitarlo da codice
prima di eseguire
l'azione che genera il Messaggio e ripristinarlo subito dopo......!!
DoCmd.SetWarning False
.........'Azione
DoCmd.SetWarning True
@Alex.
Newsgroup: it.comp.appl.access
Titolo: bloccare immissione dati su filtro

Nel caso in cui uno faccia una ricerca con il filtro in base a maschera
vengono visualizzati tutti i record che corrispondono ai criteri immessi.
Ora potrebbe essere conveniente bloccare tutti i controlli della maschera
attualmente attiva affinchè chi usa il Db non smanacci troppo. La mia
domanda è questa: come si può (se si può !) da codice bloccare l'immissione
dei dati quando è attivo il filtro in base a maschera ?
Grazie mille e buon inizio di settimana a tutti !
Antonio
- - - - - -  - - - - - -  - - - - - - - - - - -  - - - - -
Crea il compilatore per creare gli exe in Access e diventerai ricco !!!!
;))))
- - - - -  - - - - - -  - - - - - - - - - -  - - - - - - -

dei dati quando è attivo il filtro in base a maschera ?
Su Corrente una cosa del tipo
Me.AllowEdits = Not (Me.FilterOn)
Ciao Nicola
email: metti inwind al posto  di NOSPAM

Newsgroup: it.comp.appl.access
Titolo: Concatenzaione di stringhe

So cercando di concatenare due stringhe Cognome e Nome in una terza
contenente sia il cognome, sia uno spazio, sia il nome:
La formula che adopero nei critery della query è la seg. 
[Cognome] & "  " & [Nome]
come mai non mi funziona?
Grazie
Ciao

 ha scritto nel messaggio
news:9b1lg0t4ek93d4j6p...@4ax.com...

Posta il Codice SQL completo, ma se è un criterio è anomala
la tua Richiesta dal momento che presumo tu non abbia un
campo unico....!!!
Se invece vuoi ottenere un Nuovo Campo(Calcolato) che
come risultato ha Cognome+Spazio+Nome allora hai errato
il posto in cui hai inserito la Formula.
Deve essere messa nella Riga "CAMPO" come nome del nuovo.
Ciao.
@Alex.

@Alex.
Ho fatto proprio cosě e tutto č andato bene. Grazie era quello che mi
serviva
Ciao a buon rendere

Newsgroup: it.comp.appl.access
Titolo: Vedere dati record nella maschera dopo inserimento 2 campi

Salve a tutti.
Con Access 2003, ho una tabella "Anagrafiche" con i campi
"Cognome", "Nome", ed altri ....
Inserisco nuovi records mediante una maschera che ha recordsource
la tabella "Anagrafiche".
Quando inserisco un nuovo record, digito il Cognome, poi il Nome. Su evento
After Update del Nome, controllo che i dati non siano già presenti nella 
tabella
"Anagrafiche" con
If DCount("Cognome & Nome", "Anagrafiche", "Cognome & Nome = " & Me.Cogn & 
Me.Nom) > 0 then
ecc...
end if
La domanda: Quando trovo che il record che sto inserendo esiste già, come 
faccio
ad annullarlo e a visualizzare nella maschera tutti i dati del record già 
presente in
tabella "Anagrafiche" ? (eventualmente per modificarlo...)
Ho provato a guardare un pò dappertutto, purtroppo con i miei anni faccio 
fatica a
trovare la risposta.. :-(
Gradirei capire quale è la via da seguire, poi per il codice mi arrangerò...
Grazie in anticipo per l'eventuale cortese risposta.
Antonio 
 

Hai avuto risposta al precedente IDENTICO QUESITO... ti piace fare più volte la stessa domanda...?
 
Di norma non è bellissimo...
 
@Alex
Newsgroup: it.comp.appl.access
Titolo: Dimensioni db

Ciao a tutti.
Qualcuno sa spiegarmi xchè appena uso il db senza aggiungere foto o grandi
quantità di dati la dimensione aumenta in maniera notevole.
Appena adesso ho sistemato un po di cose e da 2 MB è passato a 10 MB
Ciao e grazie a tutti

 Appena adesso ho sistemato un po di cose e da 2 MB è passato a 10 MB
Questa e' ormai diventata una FAQ, ti sarebbe bastato una piccola ricerca
tra i messaggi da 15 giorni a questa perte per trovare risposta.
Se hai una libreria con tutti i libri ordinati e sistemati in modo da
poterne leggere il titolo e da poterli estrarre e/o trovare con facilita'
questa libreria ti prendera', magari, un parete.
Certo puoi anche accatastare tutti i libri in un angolo, occuperai
certamente meno spazio, ma prova a mantenerli ordinati man mano che aggiungi
nuovi libri o pensa alla "facilita' " con cui potrai eliminare i libri ormai
vecchi (cercandoli magari in fondo alla catasta).
Sib

Newsgroup: it.comp.appl.access
Titolo: Access2000 Premium e MSDE2000

Ciao a tutti,
vi risulta qualche incompatibilita'?
da me succede che A2000 (applicazione) vede tuttele sp come NomeSP;1
con questo ;1 in coda.
le vede ma non le apre ne' facendoci doppio click sopra ne' come origine
record delle maschere.
lo stesso file adp (ver 2000) aperto con AXP funziona regolarmente.
Bo!
Sib

"Sib" <si...@SPAMiol.it> ha scritto nel messaggio
news:6Nzhb.195159$hE5.6...@news1.tin.it...

Articolo Microsoft Knowledge Base - 269824
ACC2000: Incompatibility Issues Between Access 2000 Projects and SQL Server
2000
http://support.microsoft.com/default.aspx?scid=kb;en-us;269824&Product=acc20
00
Ciao Giorgio


http://support.microsoft.com/default.aspx?scid=kb;en-us;269824&Product=acc2000
Azz
Ti ringrazio, ma non credere che non abbia cercato, a volte non si capisce
che cavolo faccia sto motere di ricerca nella knowledge di base.
Ciao
Sib

Newsgroup: it.comp.appl.access
Titolo: ID contatore dopo query accodamento

Dovrei accodare, tramite query, n record a una tabella che contiene
come chiave il campo contatore ID.
Ai record che accodo viene assegnato in automatico il loro ID. C'è la
possibilità di salvarlo da qualche parte subito dopo l'accodamento?
Grazie


Se usi il campo contatore numero è assegnato da Access,
il default è l'incremento del valore di 1 unità (potresti anche aver
impostato Nuovi Valori a Casuale).
Se lavori con il default:
per l'ultimo puoi fare una quey del tipo:
SELECT MAX(NomeID) From TuaTabella
(oppure anche il DLookUp)
Per gli n valori devi farti una query,
se salvi gli ID puoi estrarti i valori > dell'ultimo ID memorizzato,
altrimenti devi estrarti gli n valori più grandi.
Se Nuovi Valori = Casuale puoi solamente farti delle query
identificando il singolo record tramite gli altri campi.
HTH, mpio.

Grazie dell'aiuto.
Ho preferito cambiare il metodo utilizzando del codice al posto della
query per inserire in nuovi record in tabella e salvare l'ID che
veniva assegnato
Newsgroup: it.comp.appl.access
Titolo: Filtro ad Esclusione in VBA

Ciao a tutti!!
Qualcuno sa come si fa in VBA un filtro AD ESCLUSIONE?!?
Grazie mille
GM 

 ha scritto nel messaggio 
news:3ErEf.157586$65.43...@twister1.libero.it...

Intendi un recordset che restituisca tutto meno un valore?
Cosě?
Public Function EscludiCitta(NomeCitta As String)
Dim rcs As Recordset
Set rcs = CurrentDb.OpenRecordset("SELECT Clienti.* FROM Clienti WHERE 
(((Clienti.Citta) Not Like " & "'" & NomeCitta & "'" & "));")
rcs.MoveLast
rcs.MoveFirst
MsgBox rcs.RecordCount
rcs.Close
Set rcs = Nothing
End Function
Ciao, Carlo

 ha scritto nel messaggio 
news:43e25cb3$0$26447$4faf...@reader1.news.tin.it...


Newsgroup: it.comp.appl.access
Titolo: Loop in fase di creazione tabella legata all'evento apertura di una maschera

Ciao a tutti,
ho la maschera mscScadFattureForn dove voglio visualizzare i record di una
tabella (tblScadenzario) che mi creo a run-time utilizzando delle query di
accodamento.
Siccome la tabella deve essere ricreata ad ogni richiamo della maschera, ho
legato la sua creazione all'evento apertura della maschera utilizzando il
codice riportato di seguito :
Private Sub Form_Open(Cancel As Integer)
Dim sql As String
sql = " delete * from tblScadenzario"
CurrentDb.Execute (sql)
DoCmd.OpenQuery "qryAccodaScadenza1", acViewNormal
DoCmd.OpenQuery "qryAccodaScadenza2", acViewNormal
DoCmd.OpenQuery "qryAccodaScadenza3", acViewNormal
DoCmd.OpenQuery "qryAccodaScadenza4", acViewNormal
MsgBox "Fine Creazione Tabella !!!"
 DoCmd.Close acTable, "tblScadenzario"
    DoCmd.Close acForm, "mscScadFattureForn"
   DoCmd.OpenForm "mscScadFattureForn", acNormal, "", ""
'dopo l'esecuzione del codice della riga precedente torna all'inizio della
'routine
GoTo Esci
Esci:
End Sub
Succede che, esegue l'intera routine e, alla fine, invece di andare a esci e
cedere il controllo alla maschera, "Looppa" in questa routine senza
permettermi di uscire.
Qualcuno mi puo' aiutare ?
Grazie
Maurizio

 ha scritto nel messaggio
news:_G13a.116444$YG2.3...@twister1.libero.it...

Prova a mettere exit sub
 GoTo Esci
 Esci:
exit sub
 End Sub
 Stefano

 ha scritto nel messaggio
news:_G13a.116444$YG2.3...@twister1.libero.it...

Scusami Maurizio, ma è normale che looppi : la routin viene eseguita ogni
volta che apri la maschera mscScadFattureForn; alla fine della routine
chiudi tale maschera ed immediatamente la riapri; alla sua riapertura viene
generato l'evento "Su apertura" e quindi viene rieseguita nuovamente la
routine, che alla fine chiude e riapre la maschera, e così via all'infinito.
Penso che tu non debba riaprire la maschera alla fine della routine, a che
ti serve?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: formato per conteggio ore oltre le 24h

Access 97... ho bisogno di visualizzare il totale espresso in ore di una
somma campo Somma([tempo])
Vorrei applicare un formato che mi visualizzi per esempio 25:30 e non 01:30
come avviene adesso.
Sapete dirmi come scrivere il giusto testo? =format(somma([tempo]).....
Grazie dell'aiuto
--
skipper dixit...
www.superskipper.it

"skipper" <skippe...@NOSPAMsuperskipper.it> ha scritto nel messaggio
news:4xKAa.72244$DN.16...@tornado.fastwebnet.it...

Nell'origine controllo della casella di testo dove vuoi visualizzare la
somma degli orari nella forma hh:mm, prova a scrivere:
=Int(Somma([tempo])*24) & ":" & Int((Somma([tempo]) *24 - Int(Somma([tempo])
*24)) *60)
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


grazie mille.... funziona!
solo un piccolissimo dettaglio estetico... 5 ore e 5 minuti me li segna 5:5
al posto di 5:05.... si riesce ad ovviare?
--
skipper dixit...
www.superskipper.it

 skipper dixit...



Prova così:

--
Roberto
grazie mille... ora, oltre che funzionante, è anche esteticamente a posto
--
skipper dixit...
www.superskipper.it
Newsgroup: it.comp.appl.access
Titolo: Modifica proprietà di una maschera con sottomaschera

Salve, ho una maschera con una sottomaschera
Il mio obiettivo č quello di renderle entrambe alla loro apertura in sola
lettura e creare due pulsanti denominati
1-Modifica record 2-Salva record.
il pulsante 1 deve consentire di apportare modifiche alle maschere, il
pulsante 2 deve effettuare il salvataggio dei dati e fare ritornare le due
maschere in sola lettura dandomi un messaggio del tipo "Record salvato"
Spiego cosa ho fatto:
Nella maschera principale "su corrente" ho aggiunto questo codice VB:
Private Sub Form_Current()
    Me.AllowEdits = False
    Nome_rivista.SetFocus
    Form_Sottomaschera.Form.AllowEdits = False
    Form_Sottomaschera.Form.AllowDeletions = False
    Form_Sottomaschera.Form.AllowAdditions = False
 
End Sub
Ho creato il pulsante Modifica record con questo codice "su clic":
Private Sub ModificaRecord_Click()
    Me.AllowEdits = True
    Form_Sottomaschera.Form.AllowEdits = True
    Form_Sottomaschera.Form.AllowDeletions = True
    Form_Sottomaschera.Form.AllowAdditions = True
 
End Sub
Ho creato il pulsante Salva record con questo codice "su clic":
Private Sub Salva_record_Click()
    Me.AllowEdits = False
    Nome_rivista.SetFocus
    Form_Sottomaschera.Form.AllowEdits = False
    Form_Sottomaschera.Form.AllowDeletions = False
    Form_Sottomaschera.Form.AllowAdditions = False
    MsgBox "Record salvato", vbExclamation
End Sub
Funziona tutto ma non mi soddisfa pienamente in quanto il pulsante Salva
record non si comporta come si comporterebbe se fosse stato creato con
l'autocomposizione guidata.
Infatti ad ogni pressione del pulsante Salva record mi si presenta il
messaggio Record salvato anche non avendo premuto il pulsante modifica cosa
che non vorrei che accadesse.
Invece vorrei che il messaggio Record salvato comparisse soltanto dopo avere
effettuato un vero aggiornamento.
Probabilmente ci vorrebberero altre righe di codice nella maschera
principale "Dopo aggiornamento" ma probabilmente anche il codice del
pulsante Salva record non č corretto. Mi sapreste dire quale codice devo
scrivere?
Grazie a tutti ciao Simone.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Grazie a tutti ciao Simone.
Se il record è in modifica (hai inserito/modificato dati) la proprietà Dirty 
della form è = true.
Quindi il bottone Salva dovrebbe risultare:
...
If Me.Dirty Then
    Me.Refresh '<-- forza la scrittura dei dati
    Msgbox "Record salvato"
else
    msgbox "non c'è nulla da salvare"
end if
...
Ricordati che il Refresh avviene se navighi tra i record e se passi (focus) 
da form a subForm (e viceversa); quindi il bottone Salva non avrebbe scopo 
di esistere...
Ciao.
-- 
Sergio MAZZA 


Grazie mille ho fatto come mi hai suggerito ho tolto il pulsante salva che
in effetti non serve più.
Ciao.

Newsgroup: it.comp.appl.access
Titolo: serie di controlli in maschera continua

Ciao Guru!
 
Ho bisogno di mettere una serie di controlli (che determinati campi siano 
popolati) quando in una maschera continua passo da un record a quello 
successivo.
Pensavo di trovare un evento "Su uscita", ma non ho trovato nulla.
 
Ne ho provati un po' ma nessuno funzionava nel caso che serve a me.
 
Qualche suggerimento?
 
grazie
 
-- 
_____/)_____
 
Skipper dixit... 
 


Scusa ma non ti basta controllare 2 Eventi:
1) BeforeInsert
2) BeforeUpdate
 
L'evento Current non ha un BeforCurrent, quindi analizza cosa avviene
quando lavori:
 
1) Nuovo Record
    In questo caso se non hai compilato tutti i campi intervieni
forzando CANCEL=TRUE
    Questo OBBLIGA l'utente a riempire i campi necessari.
    Ovvio che quando passa ad un Record esistente è IMPLICITO che
abbia inserito tutto altrimenti l'evento BeforeInsert non prosegue...
CANCEL=TRUE
 
2) Edit Record Esistente
    In questo caso il Record inserito precedentemente è sicuramente
completo, ma potresti cancellare i dati...!
    Serve solo controllare l'EVENTO BeforeUpdate e nel caso in cui non
abbia inserito tutto CANCEL=TRUE
 
L'insieme di questi 2 Test è assolòuta garanzia che non ci siano
BUCHI, ed il passaggio da un Record ad un'altro è forzatamente esente
da controlli.
A completamento hai anche la proprietà Dirty o l'Evento Dirty, ma nel
tuo caso io li eviterei.
 
@Alex


ok stasera studio...
grazie
 
e scusato il doppio post...
ma sembrava che il primo non fosse partito...
 
-- 
_____/)_____
 
Skipper dixit...

Newsgroup: it.comp.appl.access
Titolo: Problema su report mensile

Salve a tutti,
un problema:
avendo una query a campi incrociati sul fatturato mensile clienti,
Es.
RagSoc TotAnno 01  02  03  04  05  06  07  08  09  10  11  12
 
ho creato un report basandomi su tale query.
Succede che quando filtro la suddetta, es. primo trimestre
quindi i mesi 01 02 03
 
il report va ovviamente in errore perche quando l'ho creato
avevo i 12 mesi e nel corpo ci sono i riferimenti ai campi
04 05 06 ecc...
 
Come posso risolvere?
 
Grazie
WS
 
-- 
 
WS
 
 


http://groups.google.com/group/it.comp.appl.access/msg/31631948c4a4fa10
 
 
Se non � questo rivela in quale errore va.
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 
 
 

 Se non ï¿œ questo rivela in quale errore va.
 
L'errore ï¿œ quello, vedo qule delle soluzioni posso applicare.
Grazie
 
WS
 
-- 
 
WS
Newsgroup: it.comp.appl.access
Titolo: ListBox

Sono alle prime armi nell'utilizzo dei controlli ActiveX
Mi piacerebbe poter riempire una ListBox con un Recorset
di dati provenienti da una query.
Non riesco a crearmi una routine per caricarmi il set di record.
Mi chiederete, ma perchè una ListBox e non una normale
casella di riepilogo. Be, la ListBox, credo abbia più propietà
di una normale casella di riepilogo. No ?
Grazie, ciao
Marica


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

 ha scritto nel messaggio > Sono alle prime armi

Ho impiegato un po' a capire che non parlavi delle ListBox.
Sinceramente non ho approfondito l'activex di cui parli, ma le ListBox
(quelle propriamente dette) mi sono sembrate prefino superiori alle normali
necessita'.
Tu che ci devi fare con le proprieta' in piu' che dovrebbe avere il tuo
activex?
Sib
PS Tanto per esplicitare, le ListBox SONO le Caselle di riepilogo.

Newsgroup: it.comp.appl.access
Titolo: Tipo testo "Allegato"

Ciao,
in Access 2007 da un campo con tipo dati "Allegato" si può inserire una foto aprendo il percorso per individuare la sua posizione con un doppio clic sullo stesso campo (o sulla stessa casella di testo).
Domanda:
è possibile ricavare anche il nome della foto inserendolo all'interno di un' altra casella di testo?
Vladimiro


Ciao Vladimiro, guarda questo articolo  
http://web.mclink.it/MC5884/
 comprensivo di esempio allegato.
vai alla voce di menu NOVITA e ricerca questa stringa: Gestione classificazione immagini leggi e scarica il file TESTFOTO. Spero possa esserti utile. Ciao

Il giorno sabato 16 novembre 2013 00:31:28 UTC+1, Vladimiro Leone ha scritto:



Grazie Mariano, interessante.
Un saluto ad Alessandro.
Ciao Vladimiro
Newsgroup: it.comp.appl.access
Titolo: weighted average







I'm attempting to calculate numerous "weighted 
averages" wieghted on a field named AmtFinanced.  The formula is as follows 
assuming i was calculating a weighted average for a field named 
Payment.


 


Sum([Payment]*[AmtFinanced])/Sum([AmtFinanced])


 


How do I put it in a module


 


 


I'd like to have a formula on my report say 
=weighted_avg("tablequery","payment")


 


Thanks, again



Jeff Clarke wrote:

You could create a query.  After you add the table, create 2 columns, in
column 1 enter
    [Payment]*[AmtFinanced]
and in column 2, drag
    [AmtFinanced]
to it.
Then click the totals query, and make sure each totals row says Sum
If you added a third column, lets say LoanNumber, you could break on
that.  Let's say the report was based on LoanNumber.  You could now
like, in the recordsource for the report, the main table/query to the
Totals query just created.
If the weighted avg is based on 1 loan record activity vs the entire
portfolio (ex:  Sum up all Financed, compare payments on the loan to the
entire portfolio), you might want to get the sum of the total portfolio
in the OnOpen event of the report by either a DSUM() or else open a
recordset that sums the values and store that in a field that is not
visible in the page header.  The main query could have a sum of payments
on the loan.  Then base you calcs on that. and the values from your main
recordsource query.  That would speed up the report.
It's been about 10 years since I did weighted avg calcs and the
portfolio was over 100K records.  If I remember correctly wighted avgs
was computational intensive so you want to cut down as much computation
as possible to present the results to the end user fast.
If the above didn't help, I'd be glad to offer some more help if I
understand what values your are summing....the entire set vs 1 record
activity.
Newsgroup: it.comp.appl.access
Titolo: Esportare una qry in Excel e creare una Pivot

Dunque ho una qry che invio ad Excel  con la routine sottostante.
Dovrei sui dati esportati in excel impostare una pivot che comprenda anche i
nuovi
record che si aggiungeranno alla qry.
Suggerimenti?
SunRex
Public Function Esporta()
'Funzione per l'esportazione dei dati in Excel e relativa apertura dello
stesso
    g_strPath = "D:\Yeast\AnalisiDati\AnalisiDati.xls"
    DoCmd.TransferSpreadsheet acExport, 8, "qryAnalisiVisite", g_strPath,
True, ""
    Shell "C:\Programmi\Microsoft Office 2000\Office\Excel.exe " &
g_strPath, vbNormalNoFocus
End Function

 Che versione di access usi?
-- 
   \  /_ _ : _ _           
    \/(_|/_|| | |          
  mail me  :  
vazim_at_libero.it
 
  view me  :  
http://www.vazim.net

     \/(_|/_|| | |
97 e/o 2000
SunRex

 ha scritto nel messaggio
news:DZvpb.404590$R32.13...@news2.tin.it...

Non fai prima a crearti la tabella pivot in excel puntando alla query di
access?
Ti salvi il foglio e ogni volta che lo apri ti rinfresca i dati...
Ciao.
--
Sergio MAZZA

 ha scritto nel messaggio
news:bo88ll$t8$1...@canarie.caspur.it...

In pratica è quello che faccio avendo impostato sulle propietà della pivot
aggiorna dati
all'apertura.Il problema è che la qry in questione estrae i dati da due tbl
una con i nomi dei
materiali di un magazzino e l'altra con i record relativi alla
movimentazione in scarico dei
relativi nateriali.Se rinfresco i dati all'apertura avendo la pivot bloccata
su un range di celle
ben definito mi perdo i dati per strada.Da qui la necessità di impostare la
pivot su Excel
previo conteggio delle righe (cioè i record).
Forse cmq mi stavi suggerendo di crearmi con MS Query la qry da excel.Il
problema è che
ogni volta che lancio il file .dqy creato caricando i dati dall'.mdb  mi
crea una cartel nuova.
SunRex

 SunRex
Non ho capito; perché hai "...la pivot bloccata su un range di celle"? Che
significa?
Se vuoi utilizzare la tabella pivot per due tabelle, ti consiglio di crearti
prima una tabella che unisce il risultato delle due (me so' incartato?), e
poi la tabella pivot la fai su quest'ultima tabella senza "bloccare range".
Spero di aver interpretato bene...
Ciao.
--
Sergio MAZZA

 ha scritto nel messaggio
news:bo8h55$3hv$1...@canarie.caspur.it...

Spiego
Una volta inviato il risultato della qry su excel clicco su una cella
e poi sul  menu strumenti\dati \Rapporto tabella pivot grafico etc etc
San Excel mi chiede dove sono i dati ed io gli dico che ce li ha sotto
il naso (Elenco oDataBase MS Excel) clicco avanti e mi dice che
i dati per lui vanno da  $A$1:$C$375 e di seguito.Una volta impostata
la pivot coi miei bei campi anche se aggiorno i dati la pivot non mi
aggiungerà i
record eventualmente presenti dalla cella C376 in poi ma dovro
necessariamente
rifarmi la pivot da capo.
O No :(
SunRex


Ma nooooo!!!
La tabella pivot può leggerti la query direttamente su access (dati - report
tabella pivot - origine dati esterna - estrai dati - etc. etc.).
Perché fai ciò!!!
Ciao.
--
Sergio MAZZA

 Perché fai ciò!!!
Perchè sono masochista :(
Grazie per l'aiuto è propio quello che volevo.
SunRex
Newsgroup: it.comp.appl.access
Titolo: Automazione per esportare dati  da Access a Word con bookmarks

Ciao,
Ho un problemino, ho usato una routine copiata da 
www.sitocomune.com
 
(generale: autore Namor) per esportare dati da access in word. Lo riadattata 
al mio caso ma rimangono alcuni piccoli problemini che non riesco a 
risolvere. Il database riguarda dei protocolli che registro ed invio a Word 
con i relativi destinatari.
Il codice scritto dall'autore è stato solo leggermente modificato. I 
problemi sono due:
1)Vorrei esportare i dati in Maiuscolo direttamente in Word. Ho provato a 
formattare i dati in access in maiuscolo ma invano, nell'esportazione 
tornano minisculi.
2)Alcuni campi di destinatari possono essere vuoti, ma questa evenienza 
blocca l'esportazione. Quindi vorrei fare in modo che se un campo rimane 
vuoto, l'esportazione continuasse oltre.
Spero che qualcuno mi possa aiutare. Allego parte del codice
 'seleziona il bookmark del primo campo Destinatario1:
    Doc.Bookmarks("Destinatario1").Select
pausa
    'e sovrascrivilo con il contenuto del campo
    'Destinatario1:
    Wrd.Selection.TypeText Me.Destinatario1
pausa
    'secondo bookmark Destinatario2:
    Doc.Bookmarks("Destinatario2").Select
pausa
    Wrd.Selection.TypeText Me.Destinatario2
pausa
    'Destinatario3
    Doc.Bookmarks("Destinatario3").Select
pausa
    Wrd.Selection.TypeText Me.Destinatario3 

 vuoto, l'esportazione continuasse oltre.
io a questo ho ovviato sostituendo uno spazio vuoto se il campo è nullo, in 
questo modo: " " . Non ho capito come risolvere altrimenti, credo che il 
bookmark si aspetti sempre qualcosa


     Wrd.Selection.TypeText Me.Destinatario3
Prova a modificare i typetext cosě
     Wrd.Selection.TypeText ucase(nz(Me.Destinatario1,""))
Le righe 'pausa' le puoi anche togliere, servono solo a rallentare
l'esempio per vedere meglio come funziona.
Namor
-- 
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Namor
Grazie Namor, ho provato le modifiche da te consigliate e funzionano alla 
perfezione. Non so come rigraziarti, Hai fatto un lavoro grandioso. Grazie 
di nuovo
Newsgroup: it.comp.appl.access
Titolo: Non visualizzare un campo nel report

Ciao a tutti.
In un report vorrei fare una cosa di questo tipo : se non ho la seconda data
di scadenza mi stampa 0.00.00 , io vorrei invece che non venisse stampata.
Come fare? Ho visto che la proprietą VISIBILE non si puņ usare ???
Grazie a tutti.
Ronny.
--------------------------------
Inviato via 
http://usenet.libero.it


Puoi inserire nell'origine dati della casella di testo la funzione IIF (vedi
help) e utilizzarla così:
=iif(isnull([campoData]);Null;[campoData])
Ciao.
--
Sergio MAZZA


purtroppo, specificato cosě mi da: #errore



Forse perché hai lasciato il nome della casella identico ad un nome di
campo...
Ciao.
--
Sergio MAZZA

Newsgroup: it.comp.appl.access
Titolo: Query: Gestione F.I.F.O.

Salve a tutti dopo il post di ieri mi sono informato meglio su questa
gestione F.I.F.O. del magazzino.
E' più complesso di quello che pensassi.
Mi spiego con un esempio:
Tabella_Inventario
Codice; QTaInventario;
AAA        50
Tabella_Movimenti
Codice; Quantità; DataMovimento; Prezzo
AAA        10            30/12/2008    10,00
AAA        20            01/05/2008    11,00
AAA        20            01/01/2008    12,00
Se metto in relazione le due tabelle avrò:
Codice; Quantità; DataMovimento; Prezzo; QTaInventario
AAA        10            30/12/2008    10,00        50
AAA        20            01/05/2008    11,00        50
AAA        20            01/01/2008    12,00        50
Deve risultare:
Codice; Quantità; DataMovimento; Prezzo; QTaInventario; CampoX (Quantità *
PrezzoUltima data)
AAA        10            30/12/2008    10,00        50
50 è maggiore di 10(Quantità) allora 10(Quantità)*10,00  rimangono 40
AAA        20            01/05/2008    11,00        50
40(rimasti da prima) è maggiore di 20(Quantità) allora 20(Quantità)*11,00
rimangono 20
AAA        20            01/01/2008    12,00        50
20(rimasti da prima) è uguale a 20(Quantità) allora 20(Quantità)*12,00
Fine
In un Campo della query mi dovrebbe decrementare il valore della
QTaInventario fino a diventare zero e terminare il ciclo.
Vi ringrazio per l'aiuto da solo non riesco.
Luca

 ha scritto nel messaggio 
news:f1jNj.12211$o06....@tornado.fastwebnet.it...

Non credo che F.I.F.O in tutto questo centri qualcosa ma un esempio di 
quello che dovresti realizzare lo trovi qui:
www.sitocomune.com
 Sezione Queries
2.16 Come si può ottenere il totale progressivo di un campo in una query e 
come si può numerare progressivamente le righe di una query?
2.11 Come si può ottenere il totale progressivo di un campo in una query?
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: Ottenere la posizione GetCursorPo di un controllo di una form

Non mi chiedete perché, ma ho la necessità di forzare un click su un controllo di una form, dato che in alcune circostanze (dopo la visualizzazione di un PDF Activex Control di Acrobat) il SetFocus non funziona.
 
E' possibile ottenere le coordinate dello schermo di un controllo di una form?
 
Ho cercato senza successo. Ci sono esempi circa l'interrogazione dopo i vari eventi mouse, ma a me serve spostare con le API il mouse e simulare click down e click up:
 
SetCursorPos x, y
mouse_event MOUSE_EVENT_F_LEFT_DOWN, x, y, 0, 0
mouse_event MOUSE_EVENT_F_LEFT_UP, x, y, 0, 0
 
Ovviamene ho bisogno di x e y del controllo che non so come leggere.
 
Grazie a tutti.
 
Daniele

GetCursorPos l'hai pensata...?
 
Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
 
Attenzione che le coordinate X e Y del type POINTAPI SONO relative allo Screen quindi al Desktop.
Se la form è popup non cambia molto ma se la form non è popup le coordinate devono essere scalate alla Client Area.
Ne consegue che devi usare la conversione con ma chiamata API ScreenToClient.
 
Esempio:
 
Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long
Private Declare Function ScreenToClient Lib "user32" (ByVal hWnd As Long, lpPoint As POINTAPI) As Long
Private Type POINTAPI
x As Long
y As Long
End Type
 
Sub MouseClicked()
Dim pt As POINTAPI
Dim lRetVal As Long
Dim lValRet As Long
'
' See where the mouse is.
Call GetCursorPos(pt)
' Convert into client coordinates.
Call ScreenToClient(hWnd, pt)
'
MsgBox "My Position:" & vbLf & pt.x & "," & pt.y
End Sub
 
Ora vedi tu... la cosa è molto semplice...
 
@Alex

Scusa forse avevo frainteso...
Il concetto ScreenToClient è sempre valido... 
Tu devi posizionare X e Y relative alla Form e non allo SCREEN.
Quindi usi le coordinate in twips del controllo relative alla form le devi convertire in pixels.
Attenzione all'header che devi sommate come altezza...
Ricavati questi scali X e Y che hanno come Client la Form allo Screen con la funzione inversa ClientToScreen dove l'hwnd dello screen è di norma 0.
Poi le passi a SetCursorpos.
 
Eviterei la ricerca dell'handle del button che non è il massimo con Access... 
 
@Alex


Grazie ai tuoi suggerimenti, ho risolto!
Daniele
Newsgroup: it.comp.appl.access
Titolo: somma

chi mi può dire come posso fare una sottrazione esempio:
ho tre campi
 data           quantità            stato
21/01/03         10                    3
mi spiego in data inserisco la data in quantità inserisco la quantità , il
risultato di stato dovrebbe essere:
in un mese ho 100 batterie io in stato vorrei che uscisse il risultato di
quante mi restano in magazzino
scusate è un po complicato per me spiegare ma in sintesi dovrebbe essere
(mese-quantità=stato)

 ha scritto nel messaggio
news:8WB_9.153023$AA2.6...@news2.tin.it...


Andrea , grazie
non mi sono spiegato bene scusa ci riprovo
ho da consumare in un mese 100 batterie ogni giorno ne vendo 2  come posso
sapere a l 31/01/03 quante batterie mi sono rimaste?
spero di essere stato chiaro adesso
Ti ringrazio dell' aiuto
ciao piero

Newsgroup: it.comp.appl.access
Titolo: Scusate il livello rasoterra !

Mi rendo conto leggendo i vostri quesiti che il livello della mia domanda č
sotto il rasoterra ... ma da qualche parte devo pure cominciare. Il mio
"problema" č il seguente :
Vorrei richiamare in una maschera un determinato record (visualizzandone
soltanto alcuni campi) selezionando da  un "menu a discesa" il campo chiave
di quel record. Siccome probabilmente non uso una terminologia esatta faccio
un esempio banale di quello che voglio ottenere :
Tabella con campi : Codice, Nome, Cognome ecc. ecc.
1  Pippo Bianchi ecc. ecc.
2  Pluto  Rossi ecc. ecc.
3  Tizio  Verdi ecc. ecc.
4  Caio  Neri ecc. ecc.
Vorrei creare una maschera dove poter selezionare (o digitare) 
p.e.il
 codice
3 dalla lista 1-2-3-4 che mi riportasse quindi i valori Tizio Verdi. (cosě
da individuarlo senza dubbi)
In un secondo tempo (se mai ci arriverň) voglio aggiungere al record
selezionato delle note (che possono essere inserite diverse in occasioni
diverse (per esempio in date diverse) per lo stesso record e memorizzare il
tutto in un'altra tabella formata, per esempio, dai campi Codice, Note, e
Data.
Spero di essermi spiegato bene.
Grazie. Stefano.
P.S. Si accettano anche consigli del tipo "Comprati un block notes" che
forse fai prima ;-)

 Data.
Questa e' un'altra tabella che devi legare alla prima con una relazione.
Scrivi un oggetto significativo la prossima volta altrimenti non si capisce
di cosa parli.
Sib

 Data.
Per questo crei una sottomaschera basata sulla tabella TabNote, e
utilizzi il campo Codice per collegarla alla maschera madre. (Collega
campi master="Codice", Collega campi secondari = "Codice").
Cia' 
Max

 > In un secondo tempo (se mai ci arriverņ) voglio aggiungere al record
