mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: [OT] Novembre, andiamo, è tempo di tornare...

Sono in partenza per tornare qualche giorno in Umbria.
Se la raccolta delle olive non mi lascerà troppo tempo libero ci risentiremo
a metà della prossima settimana.
Fate i bravi!
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


Vai sereno, penso io ad Adriana... ;-P
MAssimiliano

 Fate i bravi!
Cavolo! Non hai neanche disfatto le valigie che riparti?
Acc... Che invidiaaaa...
-- 
Sergio MAZZA 

 ha scritto nel messaggio 
news:TM1gd.4828$Es2.1...@twister2.libero.it...

grr!!! dai che te lo sei meritato un po' di ... lavoro ...!!! 

 ha scritto nel messaggio
news:TM1gd.4828$Es2.1...@twister2.libero.it...

Beato te che vai in Umbria a me tocca andare in Abruzzo


Beati voi che andate in Umbria e in Abruzzo.
A me tocca restare a Milano.
:-)
Ciao
Eugenio

 ha scritto nel messaggio 
news:DU4gd.95514$b5.46...@news3.tin.it...

anche tu per la raccolta delle olive?
:-)
se tu e/o Roberto avete bisogno di aiuto .... un pò di agriturismo farebbe 
bene a
qualcuno di questo NG che attualmente è sotto pressione. :-)
---
Daniele

Newsgroup: it.comp.appl.access
Titolo: Cercare un nome nella cella e copiare le celle a destra adiacenti

Un saluto al NG
Mi spiego meglio
Lavoro sullo stesso DB
da una casella combinata seleziono ad es. il nome "Mario"
La tabella che contiene i dati si chiama "Personale" ed è composta da 3
campi:
Nominativo|Mansionelavorativa|LuogoLavoro
____________________________________
    Mario   | operaio                   | Magazzino
    Luca     | impiegato                | ufficio
qual'è la sintassi esatta per dire:
cerca la parola "mario" nel campo "Nominativo" della tabella "Personale"
metti la parola "Mario" nella "VariabileNominativo"
trovata la parola devo memorizzare in qualche modo il record che mi
interessa?
perchè poi devo cercare la parola nella cella adiacente e cioè "operaio" e
metterla nella
"VariabileMansioneLavorativa"  e così via
 scusate la banalità della mia spiegazione ma vorrei essere il più chiaro
possibile.
Ringrazio anticipatamente
Maurizio

 wrote in message
8tbqgl$m5k$1...@fe2.cs.interbusiness.it...

Non hai spiegato molto bene, anche perchè hai dato la tua soluzione e non la
descrizione del problema.
Io ho capito che tu hai una tabella personale contenente record
nome-mansione-luogo e vuoi che selezionando il nome compaiano anche gli
altri valori. E' così?
Se è così guardati la mia risposta Re:Combo box del 25-10 alle 10:53
Antonio
Newsgroup: it.comp.appl.access
Titolo: riferimento dao 2535.tlb

Buongiorno,
ho creato un database in Access97.
la persona che lo utilizza ha la versione AccessXP, ma per motivi di
continui scambi, non deve convertire il database ma mantenerlo in Access97
All'apertura su AccessXP perň, compare il messaggio di errore:
"nel database o nel progetto di Microsoft Office Access manca un
riferimento, o č presente un riferimento non piů valido, al file
'dao2535.tlb' versione 3.5. *per assicurarsi che il database o il progetto
funzioni corettamente č necessario impostare un riferimento corretto"
Nel mio database Access 97, ho eliminato il riferimento a Microsoft DAO
2.5/3.5 Compatibility Library e ho selezionato il riferimento Microsoft
DAO 3.51 Object Library e compilato i moduli. Nessun errore, ma non so se
questo sia corretto e sufficiente, nč se sia possibile fare un'operazione
analoga in AccessXP, in quanto non apre il file, una volta dato l'errore.
E' corretta o sbagliata l'operazione che ho svolto?
Suggerimenti?
Grazie, ciao,
Gloria
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Gloria
Dovrebbe essere suffucente, lo strano č che nn riesci ad aprire l'Mdb.
L'ideale sarebbe avere versioni identiche, oppure distribuire le
applicazioni utilizzando creazione guidata pacchetti e di conseguenza il
run-time con tutte le librerie necessarie aggiornate.
Ciao e buon lavoro


Newsgroup: it.comp.appl.access
Titolo: posizione cursore

Ciao a tutti
Sapete dirmi qual'č la funzione che dice in quale posizione di una stringa
si trova il cursore?
Ad esempio sono in una casella di testo e all'interno ho scritto "Stefano"
ora vorrei sapere se posizionando il cursore diciamo dopo la "f" e cliccando
un pulsante mi dica in quale posizione della stringa mi trovo. (in questo
caso penso posizione 4)
GRazie

 caso penso posizione 4)
SelStart (vedi help).
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com

Newsgroup: it.comp.appl.access
Titolo: Richiesta chiarimenti

CHiedo scusa, ma è la prosecuzione di un mio post del 22/7. Sono riuscito a
ottenere qualche cosa con il seguente codice:
Private Sub CmdTras_Click()
Dim SacUnitKg, SacDecKg, KGUnitS, KGDecS As String
Sacs = Len(Me.SacchiInt)
SacUnitKg = Left(Me.SacchiInt, Len(Me.SacchiInt) - 2)
SacDecKg = Right(Me.SacchiInt, 2)
Me.KGInt.Value = SacUnitKg * 50 + SacDecKg
End Sub
però funziona se immetto valori senza zeri, mentre se inserisco numeri con
lo zero es. 50.10 mi va tutto in pallino, c'è qualche anima gentile che si
prende l briga di darmi un consiglio??
Grazie 1K
Maurizio

 lo zero es. 50.10 mi va tutto in pallino, c'è qualche anima gentile che si
Certo, perchè se il campo è numerico, 50.10 te lo scrive come 50.1.
Trasforma il campo in testo.
Antonio

 ha scritto nel messaggio
news:g%d%8.21100$GV2.5...@twister2.libero.it...

Caro Antonio hai perfettamente ragione, scusa, comunque grazie per la
dritta, ci sono riuscito
Grazie 1K
Maurizio
Newsgroup: it.comp.appl.access
Titolo: transfertext con modello html

è possibile usare un modello per gli html: qualcuno sa dove trovarne 
uno? La guida parla di tag html ma non dice altro.

 uno? La guida parla di tag html ma non dice altro.
www.sitocomune.com
-- 
-- 
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access

 
aaargh!! grazie, ma ho provato a cercare html e spulciarmi da tutto il 
giorno i risultati e non l'ho visto, per quello chiedevo... per favore 
un aiutino (in general, forms report...?)
Riprendo la ricerca con inviaoggetto e sendobject, grazie ancora..
ps: a quelli di sitocomune, il motore di ricerca è un po' lento perchè 
non usate gooogle? (spero che non si offenda nessuno hihihi)

 uno? La guida parla di tag html ma non dice altro.
E in effetti č cosě che devi crearti il modello ma non solo con quelli; 
trovi info qui:
http://www.microsoft.com/technet/archive/office/office97/maintain/off304ef.mspx?mfr=true
L'esempio sul sito comune: Sezione General - 6.154 Creare da VBA un file 
.HTM basato su un file template, utilizza la stessa filosofia (sostutizione 
di tag con del testo html) utilizzando VBA.
A te la scelta...
Cioa.
-- 
Sergio MAZZA

Newsgroup: it.comp.appl.access
Titolo: numero della settimana

Partendo da una data vorrei ricavare quanti giorni sono trascorsi dal
1° Gennaio del relativo anno e in seguito calcolare il numero della
settimana in cui si trova la suddetta data.
Avete idee?
CARLO.

 ha scritto nel messaggio
news:390b2125...@news.net-one.it...

Sì, vedi sull'Help  la funzione DatePart(con i vari parametri)
Ciao
--
Cordiali saluti
Nunzio Santini

settimana in cui si trova la suddetta data.
format ww
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/

Sì, vedi sull'Help  la funzione DatePart(con i vari parametri)
ma mi funziona con il trimestre, l'ora, i minuti e i secondi
(indicando cioè "q", "h", "m" , "s").
Se invece metto "yyyy" oppure "ww" nella colonna risutante dalla query
mi segnala: #errore.
Tra l'altro ho notato che nella query quando scrivo:
...("ww", [Data])
nella riga compare
...("""ww""", [Data])
oppure a volte
...("/ww", [Data])
e tutto ciò è per me incomprensibile.
Grazie per eventuali suggerimenti,
					CARLO.

Newsgroup: it.comp.appl.access
Titolo: Tasto TAB

Ciao a tutti, sapete se esiste il modo di disablitare il tasto tab?
Grazie
stefano


Ne esistono un po' ( io ne conosco due a dire il vero): 
da codice esiste la proprietà TabStop;
oppure in visualizzazione struttura attraverso la finestra proprietà
(Altro) c'è da settare 'Selezione con tabulazione' a si/no.
Ciao. Fabrizio
Newsgroup: it.comp.appl.access
Titolo: BATH PER BACKUP

Ciao a tutti. ho la necessità di effettuare delle copie periodiche del mio
mdb. In pratica vorrei copiare il mio db in una directory COPIA e il file
deve avere per nome la data del giorno in cui effettuo la copia. Avevo
pensato ad un bach ma non riesco a crearlo. Avete qualche idea? GRAZIE

 ha scritto...

Se vuoi farlo direttamente dal Front End basterebbe:
FileCopy "tuo.mdb", Format (Date(),"ddmmyy") & ".mdb"
Il format è necesario altrimenti creerebbe un nome di file non valido,
contenente delle slash ( / ).
--
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/
*************************************************

Sia mai che quello principale risulti occupato e uno proprio non riesce a
trattenerla...
ROTFL!
Antonio

Newsgroup: it.comp.appl.access
Titolo: Nessun valore nell'espressione immessa

Ciao a tutti.
Sull'evento "Su corrente" di una maschera, ho inserito il seguente codice:
Private Sub Form_Current()
    strFiltro = "idMansione = " & Me!IDMansione
    strFiltro1 = "idReparto = " & Me!IDReparto
    Me!TestoReparto = DLookup("DescrizioneReparto", "Reparto", strFiltro1)
    Me!TestoMansione = DLookup("DescrizioneMansione", "Mansione", strFiltro)
End Sub
Questo serve per compilarmi delle caselle di testo in base a quello che c'è
in un'altra casella di testo.
Il problema è questo: al momento non c'è niente nelle tabelle associate alla
maschera, perciò all'apertura della maschera esce il messaggio "Nessun
valore nell'espressione immessa".
Ho provato a evitarlo con questa porzione di codice inserita prima del
DlookUp:
If IsNull(Me.IDMansione) Then
 Exit Sub
End If
ma mi blocca lo stesso il codice evidenziandomi lo stesso il DlookUp. Devo
fare riferimento alla tabella anzichè alla maschera? O Isnull non è la
funzione corretta?
Come al solito
Grazie
Stefano

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

 ha scritto nel messaggio
news:SKqXg.475$Fk1...@twister2.libero.it...

Ah! In effetti adesso funziona.
Però il mio intento era quello di dire che se Me!IDMansione è vuoto, esci
dalla procedura. E lui invece si bloccava.
Adesso però funziona. Ci metterò un pò ma riuscirò a capire perchè.
Comunque
Grazie

 Grazie
Prego.


Newsgroup: it.comp.appl.access
Titolo: barra menu,personalizzate....importazione...

Voglio trasferire tutti gli oggetti di un mdb in un altro mdb...ma...
le barre menů personalizzate che ho creato come le importo ???!
Grazie mille
Ciao.
Enrico
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Quando selezioni la voce "Importa..." dal menu File, Carica dati esterni ed
hai scelto il nome del file da cui importare gli oggetti, ti compare la
finestra "Importa oggetti".
Accertati che nel frame "Importa" della sezione "Opzioni" sia spuntata la
voce "Menu e barre degli strumenti".
Ciao.
Newsgroup: it.comp.appl.access
Titolo: focus su primo controllo in struttura a schede

Salve a tutti.
In una form devo spostare il focus da una casella di testo della form principale al primo controllo della prima scheda di una struttura a schede.
Senza nessun codice, il focus si sposta dalla casella di testo sulla linguetta della prima pagina a schede.
Se su routine tasto giù della casella di controllo sposto il focus sulla prima casella di controllo della prima scheda con
me.txtmiocontrollo.setfocus 
mi dà errore di run-time 2455 - Riferimento non valido alla proprietà | nell'espressione. Se faccio debug e vado avanti con F8 il codice prosegue e il focus va dove deve andare.
Ho provato anche a spostare prima il focus sulla prima pagina del controllo a schede con
me.tabCtl.Pages(0).setfocus
ma mi dà sempre errore di run time e anche in questo caso andando avanti con F8 il debug procede senza interruzioni.
Come risolvo?
Grazie e buona serata.
Giuseppe


Ciao Giuseppe, prova così:
Forms!NomeForm.TabCtl.Pages(0).Controls(0).setfocus
Maurizio


Ciao Maurizio.
Grazie per la risposta.
Mi dà errore di run-time 438 e in questo caso con il debug non si sblocca come invece avveniva prima.
Giuseppe.

Newsgroup: it.comp.appl.access
Titolo: Loop !!!

Avendo una tabella con un unico campo dove ci sono gli anni ed una con tutti
i dati di produzione, tra cui la data, come deve essere il loop per poter
creare delle tabelle raggruppate per l'anno della prima tabella ???
grazie
Sergio

 ha scritto nel messaggio
news:a5cqgf$924$1...@fe1.cs.interbusiness.it...

A occhio mi sembra che il modo piů facile per fare ciň che ti serve sia
crearti una query di selezione (se necessario di raggruppamento), lasciando
stare i loop con relativo codice VBA e la creazione di tabelle di appoggio.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: Report e vecchie versioni

Devo stampare report con versioni che si aggiornano.
Come posso fare per utilizzare le vecchie versioni in modo semplice ?
--
Gianluigi Ascheri
Ufficio progettazione CFP Cemon
0174/701284   
www.cfpcemon.it
Qualora questo messaggio fosse da Voi ricevuto per errore vogliate
cortesemente darcene notizia e distruggere il messaggio ricevuto
erroneamente.
Quanto precede ai fini del rispetto della Legge 675/96 sulla tutela dei dati
personali.

 Come posso fare per utilizzare le vecchie versioni in modo semplice ?
Che significa???
Provo ad interpretare
Ti crei un report su una tabella e lo devi stampare
L'indomani la tabella cambia valore e tu a scelta devi stampare o il report
attuale o quello precedente.
Se č cosě stampati gli snapshot dei report e poi scegli quale stampare
ciao MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it
Newsgroup: it.comp.appl.access
Titolo: script VBE

Esiste in "natura" o avete magari creato una funzione che funga da avviso
(come quella dell'esempio)?
Questo script VBE viene lanciato con wscript.exe per evitare i pallosi file
batch e anche perchè con i batch non ho trovato il modo di avere il nome del
file con la data di sistema.
In questo modo invece è molto rapido ed efficace, basta lanciare WSCRIPT.EXE
C:\NOMEFILE.VBE.
Non posso usare una form perchè lo script non lo permette (almeno credo).
Ecco lo script:
Option Explicit
Dim Shell
Dim PathSource
Dim PathTarget
Dim cNameFileDate
PathSource="c:\pippo"
PathTarget="d:\pippo"
cNameFileDate=Mid(cdate(date),7,4) & Mid(cdate(date),4,2) &
Mid(cdate(date),1,2)
Avviso "Backup giornaliero archivi, attendere prego...." ' è questa la
funzione che mi manca!
Set Shell = WScript.CreateObject("WScript.Shell")
Shell.Run "winzip.exe -min -a -r " & PathTarget & cNameFileDate & " " &
PathSource , 1
Set Shell = Nothing
Avviso "Backup terminato...."
If Err.Number <> 0 Then MsgBox "Impossibile avviare il backup"&
Hex(Err.Number) & " (hex).", vbCritical

 Ecco lo script:

se tu intendi un messaggio al pc io uso il "net send" del dos creando in
automatico un file che poilancio con la shell di access
te ne copio uno:
"net send xxxxxxxxx non utilizzate la stampante xerox per 10 minuti.
Grazie"
dove xxxxxxx è l'indirizzo ip o il nome del pc. con l'asterisco lo mandi a
tutti i pc della tua rete.
ciao
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ha scritto nel messaggio
news:bpak29$tob$1...@news.newsland.it...



ciao rispondi dopo il quoting cosě č piů chiaro x tutti.
certo che puoi mandarlo anche a te stesso non ci sno limitazioni.


 Non posso usare una form perchè lo script non lo permette (almeno credo).
[...]
    Un file HTA?
-- 
Ciao :o)
Maurizio
--------
?SPQR(C)
 X
--------

Un file HTA? Cos'è

 Un file HTA? Cos'è
 
http://msdn.microsoft.com/library/
        Web Development
        HTML Applications (HTA)


Newsgroup: it.comp.appl.access
Titolo: Da Access 97/2000...

... è possibile visualizzare il percorso completo + nome db utilizzando le
impostazioni standard di Access senza creare macro o modulo VBA?

 impostazioni standard di Access senza creare macro o modulo VBA?
Si, p.e. con un ControlSource di una casella di testo:
=CurrentDb.Name
--
HTH
Karl
*********
Non meravigliarti del mio strano italiano. M'esercito qui.
Access-FAQ (tedesco): 
http://www.donkarl.com
Newsgroup: it.comp.appl.access
Titolo: Lista numeri codici errori..........

Salve a tutti!
Vorrei, gentilmente, sapere dove reperire una lista dei numeri dei
codici di errore di Access '97, per esempio, per cambiare il messaggio
di errore quando si tenta di duplicare un valore in una violazione di
chiave.
Con la speranza di essere stato abbastanza chiaro, anticipatamente
ringrazio.
Marco.

 ha scritto nel messaggio 
news:efa4ca95-48d5-4e16...@r24g2000vbp.googlegroups.com...

Non so se esiste una lista di numeri, ma se tu all'inizio di ogni routine 
evento scrivi una piccola routine di errore che ti visualizza con un msgbox 
l'errore occorso, dopo puoi utilizzare quel numero per quello che ti può 
servire.
Ciao
Antonio

 ha scritto nel messaggionews:efa4ca95-48d5-4e16...@r24g2000vbp.googlegroups.com...

Il problema è proprio questo: il messaggio di violazione chiave, non
ha codice errore, in modo da poter personalizzare il messaggio con "If
err_n......". Ho provato ad inserire la routine sull'evento "prima di
aggiornare", "dopo aggiornamento", "su attivato", "su
attivazione",...........ecc.ecc., ma la situazione non cambia, esce
sempre l'errore "di sistema". Non capisco dove poter agire per
personalizzare questo tipo di messaggio.
Grazie dell'attenzione.
Marco.

 personalizzare questo tipo di messaggio.
Siccome non č un errore di Access ma di JET la gestione č diversa.
Devi prendere l'evento "Su errore" della maschera. Vedi l'esempio
nella variante 1 di:
Evitare duplicati
www.donkarl.com/it?FAQ4.25
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

 Access FAQ:
www.donkarl.com/it
Perfetto! Grazie.
Newsgroup: it.comp.appl.access
Titolo: Avviare un filmato.......

Salve a tutti!
Ho necessitaà di avviare un filmato in formato AVI da un pulsante in una
maschera.
Come posso fare?
Grazie anticipatamente.
Marco.

 ha scritto nel messaggio
news:Ws3Pc.81686$5D1.4...@news4.tin.it...

Prova così:
Sub ShellApplicationApriFile()
Dim objShell As Object
Set objShell = CreateObject("Shell.Application")
objShell.Open "TuoPercorsoFile.avi"
Set objShell = Nothing
End Sub
Ciao, Carlo

 ha scritto nel messaggio
news:Ws3Pc.81686$5D1.4...@news4.tin.it...

Perchè invece del Pulsante non usi l'Hyperlink
e fai eseguire il Programma direttamente.
Codice da scrivere=0
@ALex.

 ha scritto nel
messaggio news:Se7Pc.63643$OR2.3...@news3.tin.it...

Grazie a tutti per aver risposto.
Comunque penso che il suggerimento di Carlo sia il più adatto.
Infatti avevo già messo a punto qualcosa del genere ed anzichè mettere
"tuopercorsofile.avi" metto una variabile e alle proprietà dell'ActiveX di
Media Player, ho dichiarato " ActiveControl.URL.value=MiaVariabile " -
FUNZIONA ALLA GRANDE - così in una casella combinata posso scegliere il
filmato da vedere.
Grazie di nuovo!
Marco.

 ha scritto nel messaggio
news:Ws3Pc.81686$5D1.4...@news4.tin.it...

Visto che vuoi usare un pulsante di comando per avviare la visualizzazione
del file AVI, se il pulsante di comando si chiama MioPulsante, senza usare
una funzione Shell puoi eseguire la seguente riga di codice VBA:
Me!MioPulsante.HyperlinkAddress = "Percorso del file AVI"
A questo punto, quando pigerai il pulsante di comando verrà avviata la
visualizzazione del file AVI.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:UJmPc.24075$1V3.5...@twister2.libero.it...

Perfetto! ancora più "snello" :-)
Grazie tanti tanti affettuosi saluti a te, Roberto!
Marco.

Newsgroup: it.comp.appl.access
Titolo: Requery di una sottomaschera

Ragazzi, quale evento devo utilizzare per fare il requery di una
sottomaschera
contenuta all'interno di un controllo struttura a schede..?
Sarebbe a dire ho una pagina dove inserisco i dati e altre due dove i stessi
dati sono riepilogati tramite query,
come posso aggiornare i dati al momento in cui cambio pagina?
o devo eseguire il refresh ad ogni modifica dei dati.... nella prima pagina?

 ha scritto nel messaggio
news:be3cp2$60u$1...@lacerta.tiscalinet.it...

Hai provato a fare il requery a fronte dell'evento "Su modifica" della
struttura a schede (vedi help)?
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: larghezza form

Salve a tutti!
Vi chiedo un piccolo aiuto.
Vorrei che all'evento click su un bottone la larghezza di una form 
diventasse pi larga di 10 cm, e viceversa cioč al successivo click si 
ridimensionasse ritornando piů stretta. Grazie in anticipo 

 ha scritto nel messaggio 
news:DXWyk.61124$Ca.1...@twister2.libero.it...

Su quale base?
Hai misurato lo schermo?
In quale risoluzione?
Width e Height sono espresse in Twips: per convertire in twips valori
espressi in pixels puoi usare le funzioni ScaleX e ScaleY
Comunque ci sono esempi di ridimensionamento delle form sui soliti siti di 
competenza
Guarda anche qui...
http://support.microsoft.com/kb/138901/it
Se fai una piccola ricerca su google trovi sicuramente quello che 
cerchi....anche sui vecchi post.
Ciao
-- 
Roberto da Parma
Newsgroup: it.comp.appl.access
Titolo: Da pannello comandi a maschera inizializzare variabili

Ciao a tutti.
Ho un db Access costituito essenzialmente da un pannello ( pan1 )  e
da 2 maschere ( form1 e form2 )
Preciso che per pannello ( pan1 ) intendo una maschera basata su
nessuna tabella.
Mentre form1 e form2 sono due maschere ,basate sulla stessa tabella
tbNominativi.
Il mio problema e' :
vorrei che cliccando su un bottone ( bottone1 ) di pan1 mi si aprisse
form1 ma che al contempo inizializzasse 2 variabili var1 e var2
presenti nel codice della maschera form1 .
In pratica clicco su bottone1 di pan1  , mi si apre form1 e le due
variabili var1 e var2 diventano :
var1 = "testo1" , var2="testo2".
Non riesco a scrivere il codice , chiedo cortesemente il vostro aiuto.
Grazie.

 ha scritto nel messaggio 
news:2b6a6f15-a87c-4b60...@d31g2000hsg.googlegroups.com...

Le variabili sono valorizzabili da un modulo presente nella maschera1?
Potresti metterle in un modulo pubblico? Cosě da renderle globali?
Ciao, Carlo 

 Ciao, Carlo
Grazie per la risposta.
Ho creato un modulo dove con public ho dichiarato var1 e var2.
Poi sul pannello ho creato un pulsante avente il seguente codice :
Private Sub bottone1_Click()
On Error GoTo Err_bottone1_Click
    Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "form1"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
    var1= "testo1"
Exit_bottone1_Click:
    Exit Sub
Err_bottone1_Click:
    MsgBox Err.Description
    Resume Exit_bottone1_Click
End Sub
Ma non funziona .
Come posso fare per passare il valore di var1 alla form1 appena
viene aperta da pannello , in modo tale da poter essere utilizzata ?
Grazie di nuovo

 Ciao, Carlo
Grazie per la risposta.
Ho creato un modulo dove con public ho dichiarato var1 e var2.
Poi sul pannello ho creato un pulsante avente il seguente codice :
Private Sub bottone1_Click()
On Error GoTo Err_bottone1_Click
    Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "form1"
    DoCmd.OpenForm stDocName, , , stLinkCriteria
    var1= "testo1"
Exit_bottone1_Click:
    Exit Sub
Err_bottone1_Click:
    MsgBox Err.Description
    Resume Exit_bottone1_Click
End Sub
Ma non funziona .
Come posso fare per passare il valore di var1 alla form1 appena
viene aperta da pannello , in modo tale da poter essere utilizzata ?
Grazie di nuovo
----------------------------------
Se hai messo le variabili in un modulo pubblico...p.e.:
Dim Var1 as string, Var2 as String
devi valorizzarle prima di aprire la maschera:
Var1 = "QuelloCheVuoi"
DoCmd.OpenForm ...
Se devi leggere il valore della variabile dalla maschera (p.e. in un 
controllo o per fare operazioni) è bene farti restituire il valore da una 
funzione pubblica che restituisce lo stesso tipo di dati.
Public Function DimmiVar1() as String
DimmiVar1 = Var1
End Function
A questo punto il tutto diventa, aprendo la maschera da pannello:
Var1 = "QuelloCheVuoi"
DoCmd.OpenForm ...
Nella maschera, p.e.
Me.MioTesto = DimmiVar1
Ciao, Carlo
Newsgroup: it.comp.appl.access
Titolo: Relazione campi in maschera

Ciao a tutti,
sono nuovo e avrei bisogno di un aiuto. Stò utilizzando Access 2007.
Ho creato due tabelle relazionate tra di loro, la relazione è uno a molti.
Queste due tabelle le ho inserite in una maschera, nell'intestazione ho 
disegnato i campi della tabella a uno e nel corpo i campi della tabella a 
molti.
Quando ho disegnato i campi delle due tabelle mi hachiesto se esisteva una 
relazione tra le due ed io gli ho indicato sia i campi in relazione che la 
tipologia di relazione.
Ora quando vado a riempire la seconda riga dell'entità a molti, questo mi 
crea anche un nuovo record dell'entità a uno, non gli assegna in automatico 
il campo relazionato!!!
Momentaneamente l'ho risolto inserendo manualmente la chiave dell'entità a 
uno in quella a molti. Come posso fare ad automattizzare il tutto?
Ciao e grazie 

 ha scritto nel messaggio 
news:CI7aj.197408$%k.33...@twister2.libero.it...

Ciao Re Saul,
solitamente si metta nella maschera principale i campi della tabella 
lato 1 della relazione e si inserisce una sottomaschera con i campi 
del lato molti, inserendo la sottomaschera ti  viene chiesto su che 
campi attivare la relazione, e poi automaticamente gestisce lui tutto 
quanto.
-- 
Cinzia [Office Access MVP]
_______________________
 
www.riolab.org
---------------------------------------->
Newsgroup: it.comp.appl.access
Titolo: Pocket Access

Come funziona Pocket Access per Pocket Windows 2003?
Se ho un applicazione in access 2000 (mdb & mde), come posso gestirla con il
palmare?
Grazie.

"Cassius" <a.v...@XYZclaniusconsulting.com> ha scritto nel messaggio 
news:cp9g0k$imh$1...@lacerta.tiscalinet.it...

Microsoft non ha realizzato (lo sta facendo ora) una versione Access per 
Pocket PC cosě come per PowerPoint.
Queste due mancanze sono state sostituite con dei tools realizzati da terze 
parti. A volte costano veramente poco, meno di 20 dollari. Questi tools 
permettono di sincronizzare un db Access da desktop con una versione 
modificata e adatta al PocketPC (.CBD).
Prima di trasferire un db desktop sul pocket da ActiveSync devi spuntare 
PocketAccess nelle opzioni.
A questo punto potrai draggare il tuo db verso il Pocket. I tools di cui ti 
parlavo provvedono a farti vedere, lavorare, modificare o creare un nuovo 
db.
Questo un link di ricerca su google:
http://www.google.com/search?q=pocket+access&hl=it&lr=lang_it&start=10&sa=N
Ciao, Carlo

Newsgroup: it.comp.appl.access
Titolo: R: Problema Con le date!!!

 e non funziona niente di come vorrei io.
Nelle istruzioni SQL la data va usata nel formato americano: mm/dd/yy e tra
#.
L'istruzione Format è utile per eseguire la conversione. Esempio:
DataI = Format(Me!DaData, "mm/dd/yy")
DataF = Format(Me!Adata, "mm/dd/yy")
DoCmd.RunSQL "DELETE * FROM TblOrdini WHERE (DataOrdine Between #" & DataI &
"# And #" & DataF & "#)"
--
Ciao, AntoGal
*************************************************
Home Page (area programmatori di VolFtp)
http://volftp.mondadori.com/italiani/galletta/
per scaricare un gioco di DAMA ITALIANA
*************************************************

Grazie Infinite!
che bello il neswgroup!!!
^_^
"AntoGal" <zer...@NOSPAMtiscalinet.it> ha scritto nel messaggio
news:8c1fo3$br2$1...@pegasus.tiscalinet.it...



--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/

sapete come posso invertire il mese con i giorni
con la funzione format.  se vuoi un consiglio, formatta in questo
formato: aaaa/mm/gg.
esempio di uso di funzione format in una stringa sql:
dim ssql
ssql="SELECT * FROM Tabella " & _
        "WHERE data = #" & format(now, "yyyy/mm/dd") & "#"


 

Newsgroup: it.comp.appl.access
Titolo: Data del server per s.o. 98

Ho trovato tramite una ricerca nei vecchi post l'esistenza di una funzione 
che restituisca la data del server per sistemi operativi win nt e superiori.
Siccome in azienda ancora ci sono macchine 98 e stimo che ci resteranno 
ancora per molto qualcuno ha qualche suggerimento per riuscire a fare 
caricare la data del server al posto di quella dei client che potrebbero 
anche averla diversa?
Con msde si potrebbe ovviare o persiste il problema? 

ciroteo ha scritto:

Creati un file .bat e lo inserisci nei client in esecuzione automatica.
Codice:
echo off
net time \\mionomeServer /set /yes
--
rgrds
SC
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 SC
Ops
"date".. quello era l'orario


 SC
Beh potrebbe in definitiva essere un'idea, in esecuzione automatica ho già 
un bat che verifica l'ultima versione disponibile del front end aggiungergli 
qualche riga non dovrebbe procurare particolari danni.
In definitiva tu usi sempre la data del client dopo averla sincronizzata con 
quella del server.
per ora faccio così ma vorrei avere una gestione un po' più da applicazione 
server e mantenere il controllo anche su questi fattori.
grazie!
p.s. echooff serve x non far vedere la finestra dos? 

>> net time \mionomeServer /set /yes
a me funziona se faccio \\mionomeserver


scusa ancora, ma date non è presente c'è solo il time! :-( 

 ha scritto nel messaggio 
news:d623jp$bis$1...@hulme.interac.it...

scusa scusa ancora risolto ... time fa entrambe le cose!
grazie! 

 p.s. echooff serve x non far vedere la finestra dos?
Serve a non far vedere la riga del codice successivo.
Per non far vedere la finestra dos, metti il file .bat in windows\system e
in esecuzione automatica inserisci un collegamento .pif al file .bat che
imposterai "ridotto ad icona" e  se non ricordo male in win98 c'era
"chiudi all'uscita".... in questo momento non ho Win98 sottomano.


 ha scritto nel messaggio 
news:d623v1$qa8$1...@news.newsland.it...

Tu ricevi i fax direttamente nel tuo gestionale? E che tipo di file archivi, 
.tif?


ciroteo ha scritto:


Doppio slash... non capisco newsland toglie uno slash...


ciroteo ha scritto:


Hai ragione, "time" combina data/ora... un po' di ruggine col mio caro
DOS..


 ha scritto nel messaggio 
news:d6243e$r3k$1...@news.newsland.it...

sob! anche io avevo scritto doppio slash ... 

 > Per non far vedere la finestra dos, metti il file .bat in windowssystem e

Newsgroup: it.comp.appl.access
Titolo: accedere allo stesso db da due uffici diversi

salve a tutti
ho la necessità di accedere allo stesso database da due uffici che si
trovano fisicamente in due edifici diversi (alcuni Km di distanza).
Quale poterbbe essere la soluzione migliore ? pensavo di mettere il db
in un server web ma non so se poi da un pc riesco a collegarmi.
Qualche suggerimento sulla strada da seguire ?
grazie a tutti e buona giornata
Maurizio
(reinvio il messaggio perchè credo che la prima volta non sia partito)


hai il db diviso in fe e be?
se si, lasci il be su uno dei due edifici, e tramite vpn colleghi i fe 
del secondo al primo. ovviamente qui le prestazioni saranno 
proporzionali alla velocità di connessione tra i due edifici? (adsl, 
linea dedicata...dimmi tu) per la vpn puoi anche usare qualcosa tipo hamachi
altrimenti se non hai problemi di $....un bel windows server con licenze 
terminal server...e ti colleghi da dove vuoi al tuo db con le 
prestazioni come se fossi in locale
non hai detto quanti utenti si collegano...se se solo tu basta anche un 
normale desktop remoto da un pc all'altro delle due sedi
ciao
BFS


grazie per la risposta
il db è già diviso in fe e be
gli utenti saranno probabilmente 10 e forse mi converrebbe installare
windows server ?
ciao
Maurizio


se non hai problemi di budget tra licenza server e licenze terminal 
server....è la soluzione ottimale...sopratutto in termini di 
prestazione. Gli utenti remoti infatti lavoreranno praticamente alla 
stessa velocità di quelli locali
ciao
BFS

 ha scritto nel messaggio 
news:2f0cc171-68a1-40f2...@l14g2000yql.googlegroups.com...
salve a tutti
ho la necessità di accedere allo stesso database da due uffici che si
trovano fisicamente in due edifici diversi (alcuni Km di distanza).
Quale poterbbe essere la soluzione migliore ? pensavo di mettere il db
in un server web ma non so se poi da un pc riesco a collegarmi.
Qualche suggerimento sulla strada da seguire ?
grazie a tutti e buona giornata
Maurizio
http://www.xpunlimited.com/
In italiano:
http://www.vendita-software.it/index.php/software/xp-unlimited/
Se ne è parlato spesso qui ed anche ad una CISA (ero il relatore).
Molto economico e funziona bene.
Ciao, Carlo
Newsgroup: it.comp.appl.access
Titolo: Funzione DSum lenta

Per determinare la giacenza di un materiale  in un controllo in una maschera
ho inserito l' espressione che trovate a fondo post. Purtroppo ho notato che
in presenza di materiali con molti carichi e scarichi l'elaborazione risulta
lentissima (ance piu' di un minuto). La cosa avviene anche con macchine
potenti.
Qualcuno mi puo' dare qualche suggerimento o consigliare un'espressione
alternativa?
Espressione
=IIf(IsNull(DSum("Quantità";"Carico";"IDProdotto=" &
[IDMatCons]));0;DSum("Quantità";"Carico";"IDProdotto=" &
[IDMatCons]))-IIf(IsNull(DSum("Quantita";"Scarico";"IDMateriale=" &
[IDMatCons]));0;DSum("Quantita";"Scarico";"IDMateriale=" & [IDMatCons]))

"Alessio (SV) dal laboratorio" <in...@TOGLIEREodontotecnico.it> ha scritto
nel messaggio news:9coikv$vp0$1...@lacerta.tiscalinet.it...

Secondo me dimezzi i tempi di elaborazione usando questa espressione:
=Nz(DSum("[Quantità]";"Carico";"IDProdotto=" &
[IDMatCons]);0)-Nz(DSum("[Quantità]";"Scarico";"IDMateriale=" &
[IDMatCons]);0)
Se i tempi di risposta del sistema per fornire la giacenza dovessero
comunque risultare non accettabili, penso che dovresti rinunciare a
calcolarti ogni volta la giacenza come sommatoria dei singoli movimenti e
gestire invece in tempo reale un archivio giacenze; non sarebbe una
passeggiata, ma....
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: mettere un "a capo" in una stringa

in una riga di codice ho un
"mailto:
ma...@hotmail.com
?subject=lettera&body=Cara mamma, eccetera"
prima dell'eccetera vorrei inserire un a capo. Come si fa?
Grazie, Davide

 wrote in message
news:cs7sa3$f6i$
1...@newsread.albacom.net

"mailto:
ma...@hotmail.com
?subject=lettera&body=Cara mamma," & vbcrlf &
eccetera"
Ciao
@ALex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 @ALex
T'é scappata una " prima di eccetera.
...mamma," & vbcrlf & " eccetera"
Ciao.
-- 
Sergio MAZZA 

 Ciao.
Si proprio scappata perchè ho fatto in Copy/Paste
ecc...!!
Ciao
@Alex


 ha scritto nel messaggio
news:cs7u97$3gj$1...@canarie.caspur.it...

scusate se mi intometto ma c'è per caso anche la possibilità di allegare
un file a una stringa così???


Con quella tecnica non credo...
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: URGENTE altro problema che non riesco a far funzionare

Ho una maschera chiamata CLIENTI tra cui i seguenti campi:
SCONTO
PROVVIGIONE
Ho una tabella chiamata SCONTISTICAEPROV con le seguenti colonne
IDSCONTO
SCONTOMAX
SCONTOMIN
PROVV
i valori del campo SCONTO nella tabella clienti vengono calcolati con una
formula matematica, io avrei bisogno che dopo il calcolo di quella formula
il programma vada a cercare nella tabella SCONTISTICAEPROV la fascia di
sconto che ho calcolato e mi restituisca il valore PROVV della riga
corrispondente scrivendolo nel campo PROVVIGIONE della maschera CLIENTI
Vi prego non uccidetemi di parole e grazie del vostro aiuto... se poi avete
bisogno di un climatizzatore... chiedete pure :)



 ha scritto nel messaggio
news:CB8ob.68495$e5.24...@news1.tin.it...
Subject poco significativo!
Skipped
Antonio

Newsgroup: it.comp.appl.access
Titolo: Transazione con progress bar

Ciao a tutti,
la mia domanda è un po curiosa, spero di sapermi spiegare bene,
ho creato una procedura in access2000 che mi deve aggiornare un listino di
prodotti da diverse fonti dati (file .mdb, xls ecc..), il tutto l'ho risolto
semplicemente collegandomi o importandomi le tabelle interessate e su queste
ho creato delle query di aggiornameto e di accodamento, fin tanto che
ottengo il risultato voluto.
Fin qui nessun problema, la mia domanda ora è: c'è la possibilità di
attivare tipo una transazione all'avvio dell'esecuzione delle query in modo
che se per puro caso dovesse succedere un intoppo o un problema ripristinare
il tutto? e allo stesso tempo man mano che le query scorrono attivare una
barra di progressione che mi dia il nome della query e la sua progressione?
Considerando che le query da avviare sono circa una trentina e che il tutto
avviene all'evento click di una pulsante in una maschera.
Spero di essere stato abbastanza chairo e che qualcuno possa aiutarmi.
Ciao tommy

Ciao,
scusate se torno a postare nuovamente il quesito ma per me è molto
importante, quindi se qulacuno può darmi una mano, questa era la mia
domanda:
ho creato una procedura in access2000 che mi deve aggiornare un listino di
prodotti da diverse fonti dati (file .mdb, xls ecc..), il tutto l'ho risolto
semplicemente collegandomi o importandomi le tabelle interessate e su queste
ho creato delle query di aggiornameto e di accodamento, fin tanto che
ottengo il risultato voluto.
Fin qui nessun problema, la mia domanda ora è: c'è la possibilità di
attivare tipo una transazione all'avvio dell'esecuzione delle query in modo
che se per puro caso dovesse succedere un intoppo o un problema ripristinare
il tutto? e allo stesso tempo man mano che le query scorrono attivare una
barra di progressione che mi dia il nome della query e il suo avanazamento?
Considerando che le query da avviare sono circa una trentina e che il tutto
avviene all'evento click di una pulsante in una maschera.
Spero di essere stato abbastanza chiaro e che qualcuno possa aiutarmi.
Ciao tommy

 ha scritto nel messaggio
news:%1_Ac.6400$GQ3.1...@twister2.libero.it...

Posso suggerirti di fare delle ricerche con google in questo NG...
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: connessione a db3

sono sufficienti i drivers forniti con office?
mi hanno chiesto di leggere dati da tabelle in quel formato, ma io non ne so
niente...
grazie dell'attenzione
--
+-----
| Paolo opg
| 
jan...@hotmail.com
+-----

 wrote in message
8a2lda$cse$1...@amati.cremona.polimi.it...

Sě, vengono forniti i driver per leggere (non so per scrivere) files DBIII,
DBIV, DBV...
Ciao.

 wrote in message
8a2qrf$c6h$1...@suite03.caspur.it...


niente...
Col 97 vai tranquillo, puoi allegare i dbf e pure condividerli.
Col 2K so che ci sono delle patch perche' li aprirebbe in sola
lettura...
--
Lorenzo Coronati
--
<<Nessuno sa che questa affermazione e' vera>>
(John D. Barrow)
--

Newsgroup: it.comp.appl.access
Titolo: piccolo lavoro su un DB access

sto cercando qualcuno che possa realizzare un paio di machere e report
per il mio db. Chiaramente sono disposto a retribuire il lavoro. Di
seguito spiego di cosa si tratta, se siete interessati per piacere
rispondetemi via email.
Ho costruito un DB comprendente 5 tabelle:
Clienti
Contatti
Preventivi
Fornitori
Strutture
per una cooperativa (la mia) che si occupa della costruzione di rampe
per skateboard.
Le tabelle (ad eccezione di strutture) sono collegate tramite il campo
"ragione sociale".
Ho bisogno di :
1- Una maschera di inserimento che mi permetta di inserire
contemporaneamente un nuovo cliente, 1 o + contatti e 1 preventivo,
smistando i dati verso le varie tabelle e duplicandoli dove necessario
(ragione sociale).
2- Un report che mostri i preventivi emessi in ordine di tempo indicando
diversi campi delle tabelle Clienti e Contatti, in un formato facilmente
stampabile.
3- la possibilità (se esiste) di ricercare il DB per parola chiave in
ogni tabella.
Grazie e ciao 
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:601a4a546493a4544c5...@mygate.mailgate.org...

Si puo fare tutto
Ciao

 wrote in message
601a4a546493a4544c5...@mygate.mailgate.org...

Alla proposta di un lavoro retribuito non si può dire di no!
Da come lo descrivi non sembra poi un lovoraccio.
FM

 ha scritto nel messaggio
news:601a4a546493a4544c5...@mygate.mailgate.org...

Attendiamo proposte! no problem
Ciao

 ha scritto nel messaggio
news:601a4a546493a4544c5...@mygate.mailgate.org...

Newsgroup: it.comp.appl.access
Titolo: Errore di run-time '2046'

Comando o azione 'Ordine crescente' non disponibile.
Volevevo semplicemente aggiungere un pulsantino che fa la stessa cosa del
pulsante "ordinamento crescente" che č presente nella barra dei menů
"Visualizzazione maschera".
Non ho fatto altro che scrivere:
DoCmd.RunCommand acCmdSortAscending
Non funziona.
Grazie in anticipo a chi mi sa aiutare.
Rossana

 ha scritto nel messaggio 
news:BYrCg.195$wh...@nntpserver.swip.net...

Ciao Rossana,
potresti usare il comando OrderBY
-- 
--------------------------------------
      Cataldo Formaro
-------------------------------------- 

 Rossana
Devi prima spostare il fuoco sul controllo della maschera che suppongo sia
in visualizzazione Maschere continue, pertanto sull'evento click del
pulsante:
Me.MioControllo.SetFocus
DoCmd.RunCommand acCmdSortAscending
--
sv
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Grazie mille! svelato un mistero!
Ciao,
Rossana

Newsgroup: it.comp.appl.access
Titolo: Reports - margini

A00 e A03.
Quando cerco d'impostare a zero i margini di un report, Access lo impedisce, 
imponendo la misura minima di 4,23 mm.
E' possibile forzare la misura di uno o più margini a zero?
Grazie in anticipo.
eSQueL 

eSQueL ha scritto:

Penso dipenda dall'area di stampa, che è una caratteristica della
stampante selezionata.
bye

 eSQueL
Penso dipenda dall'area di stampa, che č una caratteristica della
stampante selezionata.
bye
In effetti, ho verificato che č proprio cosě.
Grazie.

Newsgroup: it.comp.appl.access
Titolo: Raggruppamenti nella query

Ho un semplicissimo data base:
esempio
campo contatore
Cognome
Nome
Data prestazione
Reparto
Prestazione
Ho raggruppato il reparto con la prestazione
Esempio
Reparto1
    Prestazione 1 10
    prestazione 2 20
    prestazione 3 30
etc
Reparto 2
    Prestazione 1 12
    Prestazione 2 23
    Prestazione 3 21
A me interessa ottenere anche il totale delle prestazioni
Ovvero
Reparto 1 prestazioni 60
Reparto2 Prestazioni 56 Etc.
Il raggruppamento che uso è banalmente
SELECT Principale.Reparto, Principale.Trattamento, 
Count(Principale.NumeroProgressivo) AS ConteggioDiNumeroProgressivo
FROM Principale
GROUP BY Principale.Reparto, Principale.Trattamento
ORDER BY Principale.Reparto;
Grazie Angelo 

 ORDER BY Principale.Reparto;
SELECT Reparto, Count(*) AS TotaleReparto
FROM Principale
GROUP BY Reparto ORDER BY Reparto;
Se proprio vuoi una queri unica puoi provare:
SELECT Reparto, '*******', Count(*) AS Totale
FROM Principale
GROUP BY Reparto ORDER BY Reparto
UNION
SELECT Reparto, Trattamento, Count(*) AS Totale
FROM Principale
GROUP BY Reparto, Trattamento
ORDER BY Reparto;
HTH.
Alessandro

 ha scritto nel messaggio 
news:cuv55o$28n$1...@newsread.albacom.net...

Grazie mille.
E' esattamente quello che volevo.
Grazie mille
Angelo
Newsgroup: it.comp.appl.access
Titolo: Evento dopo aggiornamento.

ciao a tutti in una maschera mi servirebbe inserire
una routine che dopo l'aggiornamento di un controllo
che contiene una stinga di numeri (formato testo)
mi dia errore se gia esiste la stringa di numeri...
 in origine tabella ho provato ad
inserire ( No duplicati) ma purtroppo me lo dice alla fine degli
inserimenti in maschera... mentre vorrei che lo dicesse 
dopo aver inserito il codice nella casella...
sepro di essermi spiegato...
grazie...

"SuperPippo®" <ik0qd...@SPAMlibero.it> ha scritto nel messaggio
news:1gu6a.151699$YG2.4...@twister1.libero.it...

A fronte dell'evento dopo aggiornamento del controllo inserisci
Private Sub Controllo_AfterUpdate()
IF Dcount("NomeTabella","*", "NomeCampo='" & Replace(Controllo.Value &
"","'","''") & "'") > 0 Then
    msgbox "Dato esistente"
End If
End Sub
Se invece preferisci inserire il test nell'evento rpima di aggiornare
e quindi impedire il salvataggio del valore duplicato:
Private Sub Controllo_BeforeUpdate(Cancel As Integer)
IF Dcount("NomeTabella","*", "NomeCampo='" & Replace(Controllo.Text &
"","'","''") & "'") > 0 Then
    Cancel = True
    msgbox "Dato esistente"
End If
End Sub

 End Sub
-----------------------
Ciao omnitow... ho optato per la seconda soluzione ma mi risponde
sub o function non definita... ti incollo il codice...forse qualche errore
di incollaggio...ciao e grazie...
Private Sub CR_BeforeUpdate(Cancel As Integer)
If DCount("Anagrafe", "*", "Codice_Regionale='" & Replace(CR.Text & "", "'",
"''") & "'") > 0 Then
    Cancel = True
    MsgBox "Dato esistente"
End If
End Sub


scusami ho invertito dei parametri prova cosě:
Private Sub CR_BeforeUpdate(Cancel As Integer)
 If DCount("*", "Anagrafe", "Codice_Regionale='" & Replace(CR.Text & "",
"'", "''") & "'") > 0 Then
     Cancel = True
     MsgBox "Dato esistente"
 End If
 End Sub
Ciao, omnitow

  End Sub
-------------
purtroppo mi da sempre errore di compilazione...
function o sub non definita....
la stringa Private diventa gialla...
ed il comando Replace evidenziato Blu....
probabilmente l'errore è in quest'ultimo ???
Ciao...

"SuperPippo®" <ik0qd...@SPAMlibero.it> ha scritto nel messaggio
news:rb47a.157237$YG2.4...@twister1.libero.it...

Non saprei cosa dire, ho fatto una prova sul mio pc (Access 2000) e
funziona...
Ciao, omnitow

 funziona...
--------------------
beh... io lo stò provando con Access 97... forse il problema è questo...??
Ciao...

"SuperPippo®" <ik0qd...@SPAMlibero.it> ha scritto nel messaggio
news:%2o7a.160234$YG2.4...@twister1.libero.it...

Scusami ma AC97 non lo conosco...
omnitow