mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Eliminazione date

Salve a tutti, dovrei realizzare una query di eliminazione su di un database
pieno zeppo di record, vorrei selezionare un range di periodi, non sono
certo però di quale sia la funzione migliore per gestire le date.
Ho pensato di inserire nel criterio del campo data:    >[dal: gg/mm/aaaa]
And <[al: gg/mm/aaaa]
però mi anticipa di un giorno, oppure sarebbe meglio usare il between?
La data è in formato data e ora:     gg/mm/aaaa  hh:mm:ss
Ringrazio per l'aiuto.
Filippo.

 ha scritto nel messaggio
news:8Pdp9.11989$%M1.2...@twister2.libero.it...

Se il campo di tipo Data/ora si chiama Pippo e, oltre alla data contiene
anche un orario, crea nella query il seguente campo calcolato :
PippoBis: Int(Pippo)
e nei criteri del campo calcolato scrivi:
Between [dal: gg/mm/aaaa] And [al: gg/mm/aaaa]
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:oAep9.12650$RO.2...@twister1.libero.it...

Ci ho provato, il risultato è sempre lo stesso, a metà esecuzione delle
query si pianta il pc. Ho provato ad eseguirla su puù pc ed è sempre la
stessa cosa.
Pensavo fossero troppi dati così ho tentato di eliminare solo piccole
porzioni di dati per volta, ma nulla da fare.
La tabella che contiene questi record è esterna, collegata al database ma
sempre sullo stesso pc.
Da cosa può dipendere?
Grazie ancora.

 Grazie ancora.


 ha scritto nel messaggio
news:HLxp9.16304$RO.3...@twister1.libero.it...

Ho verificato ma non è danneggiato il disco, ti spiego meglio: il database è
gestito da un programma (credo fatto in vb o c) e salva i dati lì; se provo
ad prirlo mi dice che è stato realizzato con una versione precedente e
quindi è in sola lettura.
Ho provato allora a crearne uno vuoto importando tutte le tabelle e la query
funziona, anche se converto l'originale la query funziona.
Devo dedurre che modificare una tabella collegata ad un database realizzato
con una versione precedente può far piantare il pc?
Io proverei a convertire l'originale, non so però se poi il programma possa
avere problemi a gestire un database che ha cambiato versione.
Grazie per l'aiuto.

 Grazie per l'aiuto.
Non saprei che dirti.

Newsgroup: it.comp.appl.access
Titolo: leggere file di testo riga per riga e copiare il contenuto in tabella con TransferFile

buongiorno a tutti, 
 
ho un file di testo con N righe cosi fatte
59011;8564877;2023/04/24 16.15.15;0301234567;00390654585854;39020;Italy Roma;4;0,0003;1;0;0;39060;39060;0,0000;nome cliente1
59011;8564877;2023/04/24 16.15.15;0301234567;00390654585854;39020;Italy Roma;4;0,0003;1;0;0;39060;39060;0,0000;nome cliente2
 
con il comando 
DoCmd.TransferText acImportDelim, , "TabellaRighe", nomefile
 
ottengo l'importazione, il problema è che Access considera come delimitatore la virgola quindi mi inserisce il contenuto di una riga in 3 campi F1,F2,F3 che contengono:
 
F1=9011;8564877;2023/04/24 16.15.15;0301234567;00390654585854;39020;Italy Roma;4;0,0003;1;0;0;39060;39060;0
 
F2=0003;1;0;0;39060;39060;0
 
F3= 0003;1;0;0;39060;39060;0,0000;nome cliente1
 
come fare per ottenere i campi separati dal punto è virgola?
grazie.


ho sbagliato a dividere i valori F1, F2, F3 ma credo abbiate capito, il problema è che usa la virgola e non il punto e virgola come delimitatore


ho trovato un post in cui l'avevo già chiesto , uso questi esempi
https://groups.google.com/g/it.comp.appl.access/c/ImCmkooEyrM/m/wiILISHyCgAJ
 
 
poi con il comando split dovrei riuscire ad ottenere i valori di ogni riga compresi fra il punto e virgola
 


se sei sicuro che non ci siano virgole puoi con un replace cambiare ; con ,
 
altrimenti usa split che è una garanzia
 
BFS


Si ci sono virgole ho optato per split, grazie.

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

ciao a tutti, sono nuovo del ng e mi scuso nel casoil mio quesito sia gia
stato posto
in un db ho due campi: regione e provincia
come faccio a fare in modo che inserendo un regione da un menu a tendina
creato con >ricerca guidata nel menu a tendina del campo provincia mi
appaiano solo le province di quella regione??
ringrazio anticipatamente.
Roby

 ha scritto nel messaggio
news:qP4w6.32108$lT1.5...@news2.tin.it...

Vai sul Sito Comune (link qui sotto), Sezione Forms, "Esempi di utilizzo
delle Forms".
Fai il download, installa ed esegui il database di esempi lì indicato.
Dalla maschera che visualizzerai all'apertura, seleziona il topics
"Synchronizing Two Combo Boxes on a Form". Nella sottomaschera in basso è
contenuto l'HiperLink, cliccando sul quale ti collegherai al sito Microsoft
che ti darà tutte le spiegazioni che ti serviranno a risolvere il tuo
problema.
Premendo il pulsante Show Example ti verrà invece mostrato un esempio di ciò
che ti è stato spiegato nel sito di cui sopra.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:qP4w6.32108$lT1.5...@news2.tin.it...

Alimenta la seconda combo con una query che prenda il dato della regione
dalla prima combo.
Dopo aver scelto la regione dalla prima combo esegui da codice una requery
sulla seconda combo e il gioco e fatto.
Ciao, Carlo
Newsgroup: it.comp.appl.access
Titolo: stampa dati filtrati

Ciao a tutti spero che mi possiate aiutare ho creato una query per filtrare
dei dati quindi l' ho importata in una maschera per poterla visualizzare poi
con il comando filtro in base a selezione filtro i dati che mi necessessita
sapere ora pero' vorrei riuscire a stampare solo i dati che filtro come
posso fare ??? ho provato a creare un tasto per stampare su di un report ma
mi stampa sempre tutti i record .... grrrrrrrrr dove sbaglio
grazie in anticipo per il vostro aiuto

 ha scritto nel messaggio
news:9f2adn$1t$1...@fe1.cs.interbusiness.it...

Se nella maschera hai inserito un pulsante di comando per stampare il
report, a fronte dell'evento "Su clic" del pulsante di comando genera un il
seguente codice VBA:
Dim StrFiltro As String
StrFiltro = Me.Filter
DoCmd.OpenReport ReportName:="NomeReport", View:=acNormal, _
WhereCondition:=strFiltro
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

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

g 

g
h 

 h
No .... cercava il Punto "G" con Access !!!!!
Saluti scherzosi.....
-- 
Raffaele Alberoni
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

"Raffaele Alberoni" <Raff...@Romagnacom.com> ha scritto nel messaggio 
news:cm2ea2$9u4$1...@news.newsland.it...

s= scusate ma è partita una mail involontaria
---
Saluti
Non sopprimere un idea, trasformala!
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.788 / Virus Database: 533 - Release Date: 01/11/2004
---
Saluti
Non sopprimere un idea, trasformala!
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.788 / Virus Database: 533 - Release Date: 01/11/2004 

 Non sopprimere un idea, trasformala!
E non sopprimere neanche gli apostrofi.
MAssimiliano


---
Saluti
Non sopprimere un idea, trasformala!
Checked by AVG anti-virus system (
http://www.grisoft.com
).


 ci voleva una vocale
Sì ma così ti bruciavi il jolly
MAssimiliano
Newsgroup: it.comp.appl.access
Titolo: Gruppo opzioni...............

Salve a tutti sto cercando di ampliare le mie conoscenze nel campo della
programazione in access..........
bene adesso sto cercando di fare qualcosa di nuovo (per me).........
Ho un gruppo di opzioni abbinata ad una Macro"Ricerca" è diciamo che
funziona bene, ma cominciamo dall'inizio.
Ho una maschera operai dove ho creato un gruppo di Opzioni (tramite Macro)
che mi filtra la maschera in base al Turno di lavoro......io adesso ho
pensato di applicare una casella di controllo che ogni volta che premo un
pulsante nel gruppo dele Opzioni per esempio Turno "A" nella casella di
controllo mi apparisseroi solo gli operai del turno "A".....spero di essere
stato sufficentemente chiaro...........
Volevo anche domandare una cosa come è possibile far funzionare il Gruppo di
Opzioni tramite il codice Visual Basic ,e non usare la macro. .
Grazie a tutti
--
Gianni B.

 stato sufficentemente chiaro...........
Dipende da quali sono i valori che caratterizzano il campo Turno. Se per
caso hai specificato come valori 1, 2 e 3 per turno A, B e C, allora ti
basta mettere nella query origine record della maschera un criterio sotto
quel campo fatto così
[forms]![tuaform]![gruppo]
e dopo aggiornamento del gruppo fare me.requery
Altrimenti (se memorizzato c'è proprio "A", "B" e "C", uno sporco trucco
potrebbe essere quello di mettere un controllo non visibile nella maschera,
su aggiornamento del gruppo fare
if gruppo = 1 then
  grupponascosto = "A"
elseif gruppo = 2 then
  grupponascosto = "B"
else
  grupponascosto = "C"
end if
quindi fare la requery della maschera.
Ovviamente in questo caso il criterio sotto il campo nella query sarà
[forms]![tuaform]![grupponascosto]
Antonio
Newsgroup: it.comp.appl.access
Titolo: verifica inserimento data

Buonasera.
In un controllo data con formato maschera input 99/99/99;;* e con origine campo datanascita formato data/ora, vorrei evitare l'inserimento errato della data, già in fase di digitazione e non ad inserimento completato.
Ho messo su evento modifica:
If Mid([datanascita], 1, 2) > 31 Then  '(per il giorno)
Me.datanascita.SelStart = 0
End If
If Mid([datanascita], 4, 2) > 12 Then  '(per il mese)
Me.datanascita.SelStart = 4
End If
ma non funge.
E' errata la funzione?
Grazie.
Giuseppe

 E' errata la funzione?
 
S�. "Su modifica" devi usare la propriet� Text del controllo
perch� il nuovo valore non � ancora salvato. Inoltre non devi
paragonare "n*" con un numero ma con un testo. Prova cos�:
 
If Mid(Me!datanascita.Text, 1, 2) > "31" Then
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 
Access Lobby: 
http://www.AccessDevelopers.org
 
 
 


Grazie Karl, in realtà ci vorrebbe una funzione da applicare a tutti i controlli data.
Forse chiedo troppo, ma la mia intenzione era di controllare uno ad uno tutti e due i numeri del giorno e tutti e due i numeri del mese.
Ho provato così per il giorno, ma funziona solo per quanto riguarda il primo numero che non deve essere superiore al 3:
If Mid(Me!datanascita.Text, 1, 1) < "4" Then
Me.datanascita.SelStart = 1
Else
Me.datanascita.SelStart = 0
If Mid(Me!datanascita.Text, 1, 1) = "3" And Mid(Me!datanascita.Text, 2, 1) > "1" Then
Me.datanascita.SelStart = 3
Else
Me.datanascita.SelStart = 2
End If
End If
E' fattibile o è meglio lasciare che access alla fine dell'inserimento se la data è errata non sposti il focus sul controllo successivo?
Grazie Giuseppe.

 controllo successivo?
 
Personalmente non faccio mai questo tipo di controllo ma
lascio solo controllare Access per una data valida.
 
- Una data � una data o un double in Access/ACE non una
combinazione fissa di lettere.
- Faccio spesso applicazioni internazionali dove i formati
delle date dipendono dal sistema.
- Non serve di farsi la vita pi� complicata in questo punto.



Perfetto.
Lascio perdere.
Ci sono altre cose da imparare e mettere in pratica.
Grazie.
Giuseppe.

Newsgroup: it.comp.appl.access
Titolo: io diventerò scemo

Il mio applicativo funziona con maschere di ricerca separate chiamate da una
barra personalizzata. Le tabelle sono contenute in un db protetto da pwd che
viene invocato alla apertura di ogni singola maschera tramite una funzione
inserita in moduli diversi per ogni maschera. La cosa strana succede quando
tento di aprire una delle tre maschere che funziona praticamente in maniera
identica alle altre, e cioè da una combo seleziono un valore che mi elenca
dati in base a quel valore. Mentre le prime due si aprono alla perfezione,
la terza mi errore sulla pwd, cioè "Password non valida". Come mai questo
mistero secondo voi?
Francesco
--------------------------------
Inviato via 
http://usenet.libero.it

 ha scritto nel messaggio
news:193Z205Z174Z38Y...@usenet.libero.it...
Anche noi, se continuiamo a trovare questi post con subject assolutamente
non significativi!!!
Antonio
Newsgroup: it.comp.appl.access
Titolo: immagini in form con bassa qualità

salve a tutti
in un controllo immagine di una form via codice visualizzo la bmp 
dell'articolo corrispondente...il problema è che le immagini visualizzate 
sono di pessima qualità...come sporche pur essendo le bmp di origine 
perfette.
sbaglio qualcosa?
ciao, AEOM 

 ha scritto nel messaggio news:LDe0f.9830$ID6.1...@twister2.libero.it...

Forse imposti la proprietà "modalità ridimensionamento" a Zoom? O "espansione immagine" a "sì"?
Ciao.
-- 
Sergio MAZZA 

 ha scritto nel messaggio 
news:dhu6v0$vo0$1...@area.cu.mi.it...

Ciao Sergio, in effetti si non essendo le foto di dimensioni standard.
Hai qualche consiglio in merito?
AEOM

 AEOM
Pochi che diventano pochissimi se le immagini sono più grandi del controllo che le contiene; potresti al limite dare l'anteprima 
dell'immagine e con un doppio clic o un bottone aprire un viewer per il file...
Ciao.
P.S. Già dato un'occhiata nel sito comune?
-- 
Sergio MAZZA 

 ha scritto nel messaggio 
news:dhvr4r$b5e$1...@area.cu.mi.it...

Il problema è che il cliente vuole le anteprime belle nitide...lo 
costringerò a fare scansioni della stessa dimensione della picturebox e 
imposto su ritaglia la proprietà.
La cosa strana è che sulla stampa che funziona allo stesso modo picturebox 
con immagini associate al volo queste vengono perfette. bho
Ciao, AEOM

 Ciao, AEOM
Un problema in meno...
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: Attivazione casella di testo da gruppo opzioni

Salve avrei l'esigenza di realizzare una form in cui delle caselle di testo
(che hanno tutte come valore predefinito : =[mycontrol]+num1.. , num2 ,
numn ) vengono attivate dal clis su una casella di controllo o da un gruppo
di opzioni in modo tale che la fonte dati ( che per le caselle di testo è
uguale in tutte) sia aggiornata in base alla opzione o pulsante
corrispondente.
dato che la cosa è un pò ingarbugliata vedo di farvi questo schema:
casella_di_testo1 : (origine controllo= datatest)(valore
predefinito=[data_test]+[primonumero]) casella di controllo ( su clikkato mi
salva sulla tabella questa data)
_________________________________________________________________
casella_di_testo2 : (origine controllo= datatest)(valore
predefinito=[data_test]+[primonumero])( su clikkato mi salva sulla tabella
questa data)
_________________________________________________________________
casella_di_testo3 : (origine controllo= datatest)(valore
predefinito=[data_test]+[primonumero])( su clikkato mi salva sulla tabella
questa data)
_________________________________________________________________
 In questo modo se seleziono la 3° casella di testo mi aggiorna la data alla
terza scelta e non alla prima o alla seconda.
Si può fare una cosa del genere o devo trovare un altra alternativa??? in
base a ciò che ho trovato nell' help, non ci sono riuscito ... una premessa
non sono molto ferrato in Visual basic
Scusate per il post lungo
Grazie.

 ha scritto nel messaggio
news:cn0366$mv0$1...@domitilla.aioe.org...

Non ci ho capito molto, però è un gruppo di opzioni?
Bene
mettici un bel select case su afterupdate di questo controllo
e hai risolto.
Per aiutarti meglio, ho bisogno di maggiore charezza.
MAssimilaino

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

Salve dovrei estrarre le giornate di degenza ma non so come fare:
data inizio   data fine  con un calcolo (datediff) mi ricavo le giornate
degenza
Però la finalità non e questa a me interessa questo sapere il giorno
01/01/2023 quanti degenti ci sono in un reparto e via dicendo
Come posso fare
Grazie 


Conti i record in cui 
- 'data inizio' <= 01/01/2023 
- 'data fine' >= 01/01/2023
- 'reeparto' = xxx
... con la dovuta sintassi ovviamente
Alberto S
Newsgroup: it.comp.appl.access
Titolo: Visualizzare Buon Giorno Buona Sera o Buon Pomeriggio

Salve,
è una fesseria ma purtroppo nei programmi ci va anche questo.
ho un campo libero chiamato "saluto"
vorrei che in base all'orario questo assuma un valore diverso:
Dalle 5 alle 12   BUON GIORNO
Dalle 12 alle 19 BUON POMERIGGIO
Dalle 19 alle 24 BUONA SERA
Dalle 0 alle 5     BUONA NOTTE
come posso fare?
Grazie 

 ha scritto nel messaggio
news:ONGVd.2428$WC1....@tornado.fastwebnet.it...

Su un evento da decidere testi l'ora di sistema e scrivi nel controllo
quello che vuoi
Antonio

"Antonio Biso" <ch...@NOSPAMetruria.net> ha scritto nel messaggio 
news:iyHVd.59929$lB4.1...@twister1.libero.it...

ho fatto... è questo quello che volevo fare:
'Procedura per generare il saluto
'************************************
Dim giorno As String
Dim pomeriggio As String
Dim sera As String
Dim notte As String
giorno = "Buon Giorno"
pomeriggio = "Buon Pomeriggio"
sera = "Buona Sera"
notte = "Buona Notte"
Dim ora_attuale As Variant
Dim msg_saluto As String
ora_attuale = Format(Me.ora, "HH")
If ora_attuale >= 5 And ora_attuale < 12 Then
msg_saluto = giorno
ElseIf ora_attuale >= 12 And ora_attuale < 20 Then
msg_saluto = pomeriggio
ElseIf ora_attuale >= 20 And ora_attuale < 23 Then
msg_saluto = sera
ElseIf ora_attuale >= 23 And ora_attuale < 5 Then
msg_saluto = notte
End If
Me.saluto = msg_saluto

 ha scritto nel messaggio
news:UAHVd.2548$WC1...@tornado.fastwebnet.it...

Perfetto!
E complimenti per aver postato la soluzione, magari utile per altri
Antonio

 ho fatto... č questo quello che volevo fare:


 Potrebbe anche essere ridotta a questo:
Può essere tutto se viene scritto correttamente DOPO il quoting
Antonio

 ha 
scritto nel messaggio news:5UWVd.1002162$35.37...@news4.tin.it...

Ciao ZioPit (.com)"
bella funzione.....perň inserisci la tua risposta DOPO e NON prima
del testo a cui ti riferisci. come sto facendo io č una delle regole di 
questo NG.
un'altra č quella di rispondere a post con un OGGETTO attinente,
Visualizzare buongiorno e buona sera non mi sembra il massimo......
ma TU, forse, non potevi saperlo.....
---
Daniele
Newsgroup: it.comp.appl.access
Titolo: FYI Uservoice per PowerQuery in Access

Salve,
 
sulla conferenza tedesca per Access abbiamo avuto una presentazione su 
PowerQuery. È un tool dalla MS che fa importazioni e trasformazioni di 
dati da molte sorgenti diverse come server database, tutti file di una 
cartella, siti web, XML, SAP ecc.
 
È soprattutto conosciuto come add-in e nella versione 2016 parte 
integrata in Excel, ma viene anche usato da PowerBI ed altri programmi:
https://support.office.com/it-it/article/Introduzione-a-Microsoft-Power-Query-per-Excel-6E92E2F4-2079-4E1F-BAD5-89F6269CD605
 
 
Siccome vogliamo avere questo tool anche in Access abbiamo lanciato una 
piccola iniziativa su Access UserVoice. Al momento si trova già alla 
posizione 4 dei suggerimenti ma vogliamo ancora ascendere. ;-)
 
Ognuno chi ha voglia di supportare l'iniziativa puo votare qui:
https://access.uservoice.com/forums/319956-access-desktop-application/suggestions/20083453-add-powerquery-to-access
 
 
-- 
Ciao
Karl
*********
http://www.AccessDevCon.com
 
Access FAQ: 
http://www.donkarl.com/it
 


Fatto
 
Ciao

Ottimo, fatto.
 
@Alex

 
 
Ah, avete fatto bene! Ora è il no 3 e no 2 non sembra molto lontano:
 
https://access.uservoice.com/forums/319956-access-desktop-application/filters/top
 


 
https://access.uservoice.com/forums/319956-access-desktop-application/filters/top
 
 
2


 2
 
... e certamente vogliamo ancora ascendere. ;-)


 ... e certamente vogliamo ancora ascendere. ;-)
 
Ecco fatto!
 
Dopo l'ultimo appello di oggi in una mail a >700 contatti (sulle mie 
conferenze in 2018) è arrivato alla posizione 1.
 
-- 
:-)


fatto!


 > fatto!
 
 
Bene, meglio che abbiamo un po' di prominenza... in caso gli altri fanno 
una campagna. ;-)
 
Quindi, manca solo la tua iscrizione su 
http://www.AccessDevCon.com
. 
Finora abbiamo iscrizioni da 9 paesi, ma ancora nessuno dall'Italia. 
Siete troppo esitanti!
 
-- 
Ciao


ciao Karl!
Hai ragione non ho ancora dato l'ok!
Cerco di organizzare così vengo con famiglia.
m


Newsgroup: it.comp.appl.access
Titolo: Inserire un criterio di minoranza

Cia ragazzi, in una maschere all'evento su timer ho inserito il codice che
segue, il problema è che se il valore "Testo71" è negativo (quindi minore di
0) no ho l'effetto desiderato ovvero che l'immagine "Immagine74" lampeggi,
come è possibile? Come posso fare per i valori minori di 0?
Private Sub Form_Timer()
If Me!Testo71 < "0" Then
Me.Immagine74.Visible = Not Me.Immagine74.Visible
End If
End Sub


ti faccio un esempio
' prima setti il timer
Private Sub Form_Load()
    TimerInterval = 1000
End Sub
' ogni secondo il colore della textbox cambia da giallo a rosso e viceversa
Private Sub Form_Timer()
If TextBox.BackColor = vbYellow Then
    TextBox.BackColor = vbRed
Else
    TextBox.BackColor = vbYellow
End If
End Sub
Newsgroup: it.comp.appl.access
Titolo: DB Esterno

Salve a tutti :)
Mi sono bloccato sul linguaggio VBA. Sto cercando di aprire un collegamento
per inserire dei dati in una tabella presso un db access esterno (sempre nel
mio pc ma non è il db che uso normalmente).
Quello che ho fatto io è:
Dim db As Database
Set db = Currentdb (ma questo mi apre tabelle o query nel database corrente)
per aprire database esterni? Qual'è il codice? mi sembra ADODB etc.....lo
ignoro....
C'è chi può aiutarmi??
Grazie ancora!
Ultra

ultrareflex ha scritto:

<F1> OpenDatabase
-- 
HTH
Karl
*********
Access-FAQ (tedesco): 
http://www.donkarl.com

Newsgroup: it.comp.appl.access
Titolo: Blocco singolo record su un database in rete.

Volevo sottoporvi un mio quesito.
Avendo un database in rete (Dati.Mdb) e un database di front-end, quando due
utenti aprono lo stesso record e poi lo salvano, succede che il secondo
quando salva il programma chiede "un altro utente ha già salvato il record,
vuoi salvare lo stesso o abbandonare le modifiche?" P.S. E' circa così.
Come si potrebbe fare per evitare il problema?
Una soluzione l'ho trovata, ma sinceramente è un bagno di sangue, cioè ho
creato un flag che viene aggiornato quando una apre il record specificato,
ovviamente questo flag viene testato se attivo o no, in caso affermativo non
ti fa entrare nel record selezionato.
Esiste un altra soluzione, meno faticosa?
Ho provato il locked, ma non mi funziona.
Grazie Maxdidi

 Come si potrebbe fare per evitare il problema?
A2000 ha il lock a livello di field e non di record, o almeno cosi'
dichiara.

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

Ciao,
io ho convertito una applicazione da un database Access97 ad Acess2000.
Il mio problema è che sulla taskbar mi compare ogni maschera che apro.
C'è un mdo di disabiltiare questa cosa ?
Grazie

 ha scritto nel messaggio
news:VnEz7.8704$QV6.1...@news2.tin.it...

Strumenti, Opzioni se ricordo bene (perché uso A97 normalmente).
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com
Newsgroup: it.comp.appl.access
Titolo: contatore

Sto cecando di fare una fattura con report.
Nel corpo della fattura ho messo:
quantita , pr.unit ,importo ,AL iva
1           10           10    20%
1           50            50    4%
1           20            20    20%
Vorrei come risultato al fondo del foglio :
Imponibile:   AL.iva    Imposta    
30             20%       6
50              4%        2
non riesco ad raggrupare secondo l'iva.
Grazie  .
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 -- 
Si tratta di messaggio con oggetto troppo generico e oltretutto
fuorviante...
Ciao.
-- 
Sergio MAZZA

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

salve ho una maschera "vendite", nella quale mi vengono illustrate le
vendite.
Ho un campo chiamato "pagato" di tipo sě/no.
E' possibile creare in una casella non associata un totale solo per le
vendite pagate, cioč quando il
campo pagato č si?
Grazie anticipatamente.
Massimo

 wrote in message
news:QKex7.3839$pm2....@news2.tin.it...

Si, su Corrente della Form e su Dopo Aggiornamento campo Si/no:
If me.Pagato then me.Totale=(Totale)
@Alex.
-- 
Posted from  [146.133.1.30] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Guarda che ti abbiamo già risposto
Ciao Roberto - Syd

 ha scritto nel messaggio
news:QKex7.3839$pm2....@news2.tin.it...

Si, con la funzione di aggregazione sui dominii DSum (vedi help)
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: dbf e access

Ho fatto un programma che lavora
collegandosi a file dbf (DBIV)
Il programma lo porto su un altro PC dove
access non ha installato i drive per leggere i file dbf:
come posso fare senza andare alla installazione
quali librerie soltanto debbo copiare e in quali directory di sistema?
grazie
Alfonso

Alfonso Carfora ha scritto:

Č un po spiritoso di non srivere la versione di Access.
Per A97 p.e. č msxbse35.dll nel Windows\System directory.
Debbi anche registrare questo dll con regsvr32.exe.
Per piů informazione:
http://support.microsoft.com/support/kb/articles/Q171/9/55.ASP
--
HTH
Karl
*********
-Access-FAQ (tedesco): 
http://www.donkarl.com

Alfonso Carfora ha scritto:

Beh, dipende dalla versione di Access che non hai scritto.
Per A97 p.e. è msxbse35.dll nel Windows\System directory.
Debbi anche registrare questo dll con regsvr32.exe.
Per più informazione:
http://support.microsoft.com/support/kb/articles/Q171/9/55.ASP
--
HTH
Karl
*********
Access-FAQ (tedesco): 
http://www.donkarl.com

 ha scritto nel messaggio
news:9t5ra5$glun$1...@ID-46617.news.dfncis.de...

la versione è ACCESS 97 ma che significa registrare con regsvr32.exe?
ciao
grazie ancora
Alfonso
Newsgroup: it.comp.appl.access
Titolo: Lampeggio a video

Ciao a tutti.
Avrei bisogno di evidenziare in  una maschera uno schema bidimensionale
rappresentate una libreria.
In un archivio ho indicato l'ubicazione per cella/scaffale dei ogni
singolo libro.
A fronte di una richiesta libro a video dovrei far "lampeggiare" la
cella corrispondente.
Mi potete dare indicazioni su come posso rappresentare graficamente la
libreria (no CAD o altri disegni) e come faccio a far lampeggiare parte
dello schermo?
La libreria mi basta farla vedere dall'alto, non mi serve un disegno
vero e proprio.
Spero di essere  stato chiaro e confido in qualche aiuto.
Grazie e ciao a tutti.

 ha scritto nel messaggio 
news:1149777176.2...@f6g2000cwb.googlegroups.com...

non so se ho ben capito
ma se supponiamo il riquadro che vuoi far lampeggiare si chiama quadro1
metti nell'evento ontimer() della tua form
me.quadro1.visible=not quadro1.visible
e come timerInterval=0
poi all'evento che deva dar inizio al lampeggio scrivi
tuaform.timerinterval=1000
ciao, AEOM

GRAZIE- Adesso devo solo disegnare la libreria.......potrei usare tante
caselle di testo protette...... che dici ?
AEOM ha scritto:


uau
se ho capito bene quello che fà questo programmino
è fantastico
Mi hai fatto venire in mente un'idea geniale per avere a video la
mappatura 3D di tutto il magazzino, ubicazioni vuote/piene e loro
contenuto.....
sarebbe chiedere troppo riceverlo in dono ?
sarebbe un gran bella fetta di lavoro risparmiato
Grazie Sandro

Newsgroup: it.comp.appl.access
Titolo: strano comportamento dei campi valuta mette il simbolo euro a destra

buongiorno a tutti, 
 
nel pannello di controllo di windows ho controllato la valuta ed è euro impostata come segue
 
positivo: € 123.456.789,00 negativo: -€ 123.456.789,00
 
se però apro un anteprima report di access vedo 220,00 €
 
come posso mettere il simbolo a sinistra all'inizio della cifra anziché a destra
 
Grazie a tutti.


ho risolto, ho selezionato un campo e c'era 
#.##0,00 €;-#.##0,00 €
 
ho messo 
€ #.##0,00;€ -#.##0,00
 
ed è tutto ok
Newsgroup: it.comp.appl.access
Titolo: macro copia oggetto tabella

buongiorno a tutti,
vorrei alla chiusura del db dare un comando (su uscita dalla maschera)
che mi copi cinque tabelle su un db di "appoggio".
Ho un problema, anzi cinque: per ogni istruzione di copia mi chiede
conferma per la sovrascrittura della tabella, impedendo di fatto la
chiusura  e l'uscita dal db.
L'istruzione che ho compilato, partendo da una macro, è questa:
DoCmd.CopyObject "\\Totodr2sa01\TO_TO_PUBLIC\DATI PCG\monster
mirror_be.mdb", "", acTable, "NumerazioniRoberto"
    DoCmd.CopyObject "\\Totodr2sa01\TO_TO_PUBLIC\DATI PCG\monster
mirror_be.mdb", "", acTable, "ACC_GruppiMerce"
    DoCmd.CopyObject "\\Totodr2sa01\TO_TO_PUBLIC\DATI PCG\monster
mirror_be.mdb", "", acTable, "ACC_Strutture"
    DoCmd.CopyObject "\\Totodr2sa01\TO_TO_PUBLIC\DATI PCG\monster
mirror_be.mdb", "", acTable, "ACC_TECNICI"
    DoCmd.CopyObject "\\Totodr2sa01\TO_TO_PUBLIC\DATI PCG\monster
mirror_be.mdb", "", acTable, "Ditte"
Qualcuno è così gentile da potermi aiutare ?
grazie.

 grazie.
Cancella prima la tabella da sovrascrivere
 

 - Mostra testo citato -
si ma il problema è che cancellando le tabelle perdo i collegamenti
tra loro.
Non esiste nulla di più facile ?
grazie mille a chiunque vorrà intervenire.

Newsgroup: it.comp.appl.access
Titolo: Compare più tabelle ...

Ho da porvi un quesito:
avendo tre o più tabelle contenenti "tutte" i
campi [numero1] e [numero2], ho necessità di evidenziare
 i valori uguali presenti contemporaneamente in almeno "un campo" di
tutte le tabelle.
Ho bisogno che mi vengano restituiti i soli valori uguali presenti in tutte
le tabelle. Vale a dire quel numero che si ripete anche una sola volta in
uno dei due campi ...
Un grazie a tutti ...
Angelo

 ha scritto nel messaggio
news:64YTa.18027$Za4.4...@news2.tin.it...

Gioca con le QUERY e con le relazioni, hai la possibilità
di impostarle in modo da prelevare solo i records in cui
il Campo che indichi è =..........!
Il tutto dal generatore di QUERY
@Alex.

Newsgroup: it.comp.appl.access
Titolo: Adesione ad un gruppo di utenti con file MDW con Access 2007

Salve...
non so da dove si aderisce ai gruppi di lavoro contenuti nel file MDW con il 
nuovo Access 2007, c'è nessuno che saprebbe indicarmelo?
Grazie e saluti SimoneB 

SimoneB ha scritto:

Funzionalità eliminata da Access 2007 (per quanto mi risulta)

Funzionalità eliminata da Access 2007 (per quanto mi risulta)
Questa mi garba... e se io ho un DB protetto con un file MDW come faccio a 
sbloccarlo e riproteggerlo a livello di utente?
Grazie x le risposte...
Newsgroup: it.comp.appl.access
Titolo: Vorrei 2 file access che comunicano.

Spero di riuscirmi a spiegare.
Ho creato con non poca fatica un file access che mi tiene conto di tutto
cio' che accade in laboratorio. Macchine che entrano, riparazione, stato
ecc. ecc.
Ora siccome vorrei metterlo in rete mi servirebbe che la segretaria
inserisse i clienti man mano che entrano e che tutt'al piu' fornisca lo
stato della riparazione. Tutte le altre funzioni dovrebbero essere inibite.
Pensavo, ma non so se si puo' fare, di creare un secondo file di access che
generi la stesso tipo di record e contenga la stessa tabella dell'archivio
del primo.  In questo modo potrei inserire soltanto le maschere e le
funzioni che dico io e la segretaria o la persona di turno non corre il
rischio di incaciottarmi l'archivio. Si puo' fare.
In alternativa posso creare un paio di maschere solo per lei e inibire
specificatamente tutto il resto?
Grazie mille
F.


Certo che si può fare; crei un mdb (Front-End) con le sole maschere/report/query che servono alla segretaria, le tabelle (Back-End)
le colleghi indicando il percorso di rete (ti consiglio di mapparti la risorsa). La stessa cosa fai sul tuo pc (mdb FE collegato
all'mdb BE)...
Ciao.
-- 
Sergio MAZZA

 ha scritto nel messaggio
news:Y0c7d.3518$eb....@tornado.fastwebnet.it...



Fantastico questo programma. Ogni tanto scopro delle potenzialità
eccezionali. Dunque, mi ci e' voluto poco per capire cosa e' un FE e un BE
ed in effetti e' una soluzione ottima tanto per essere ridondante.  Mi
sfugge ancora qualcosa. Premetto che ho collegato le tabelle con file-->
carica dati esterni --> collega tabelle.
Se cambio la cartella in cui si trova BE immagino dovro' cambiare anche
qualcosa in FE. Dove la trovo questa informazione?
Intendevi questo quando mi dicevi  di mappare la risorsa? (cosa
intendialtrimenti?)
Ancora grazie e grazie anche a zawy
Ciao

 Ciao
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: Aggiornamento casella combinata

Problema: ho una maschera di inserimento prodotti che contiene più di una
casella combinata, per esempio ho una casella combinata che mi inserisce il
colore, solo che ha volte ho dei nuovi colori che non avevo precedentemente
inserito!!!!
Quindi ho pensato di aggiungere un tastino per ognuna di queste caselle che
mi aprisse la relativa mascherina in modo da inserire i dati mancanti al
menù a discesa delle caselle...ok, tutto bene per quanto riguarda
l'inserimento, sull'aggiornamento invece ho qualche problemino, io inserisco
ma la casella non viene aggiornata!!!!
Grazie a tutti!!!!!!
Ciao
Lo

 ha scritto nel messaggio
news:KXx_8.93632$Jj7.2...@news1.tin.it...

io, di solito, in questi casi faccio così:
nella maschera da aprire dichiaro una variabile pubblica di tipo control
Public Ctl as control
e sulla chiusura, eseguo un requery del controllo
Private sub Form_close
    ' eventuale controllo se effettuare il requery
    ctl.requery
end sub
Sul form con le combo:
Quando viene richiamata la form, setta la variabile con il
controllo(combobox nel tuo caso) in questione:
Private Sub GestioneColori_Click
    docmd.openform "Colori"
    set forms("Colori").ctl = me.combocolori
end sub
ciao.
--
e` inutile versare ruhm...
nu strunz nun addiventa babba'

 ha scritto nel messaggio
news:KXx_8.93632$Jj7.2...@news1.tin.it...

Sull'evento su chiusura della maschera che permette l'inserimento dei nuovi
dati, fai una requery della combo con la sintassi
forms("tuaform").tuacombo.requery
Antonio
Newsgroup: it.comp.appl.access
Titolo: Tracciati INDICOD

Qualcuno ha mai fatto esperimenti o prove per esportare dai  Access
dati in formato INDICOD ?
I formati INDICOD sono file di testo che seguono delle specifiche ben
precise per lo scambio elettronico di dati.
Se qualcuno sa qualcosa chiedo gentilmente qualche indicazione e/o
soluzione.
Grazie per l'aiuto

deve...@aruba.it
 ha scritto:

Tutto cio' che non e' possibile esportare via transferText e' possibile, 
qualsiasi sia la sua complessita', via print# e/o write# oppure usando 
il metodo write di FileSystemObject e viceversa per la importazione 
usando le corrispondenti  funzioni di lettura (i.e. input#...etc)
--
ac

 
develo...@aruba.it
 ha scritto:> Qualcuno ha mai fatto esperimenti o prove per esportare dai  Access

Grazie per l'aiuto , ma potresti essere più esplicativo su qs.
metodo ?
Sinceramente non lo conosco per niente.
Grazie anticipate

Grazie per l'aiuto , ma potresti essere più esplicativo su qs.
metodo ?
Sinceramente non lo conosco per niente.
Grazie anticipate
------------------------------------
Ciapa ki
250       num_file = FreeFile()
260       Open "TEST.TXT" For Output As #num_file
270       Print #num_file, "Ciao Belli"
280       Close num_file
Naturalmente il suggermento non e' aggratisse
Appena hai finito la routine che spara fuori in formato Indicod sei tenuto a 
faccela vede'
Ciao
RobertoA

 RobertoA
Che mi devo fare l'intimo corazzato?
Ciao.
-- 
Sergio MAZZA 

 Sergio MAZZA
No
Puoi tenere il tanga leopardato, contento te
Ciao
RobertoA 

 RobertoA
Ok; allora non lo porto in lavanderia...
Ciao.
-- 
Sergio MAZZA 

Allura ???
Sto codice per fare l'Indicod ???
Ciao
RobertoA 

 ha scritto nel messaggio 
news:48d4a29a$1...@newsgate.x-privat.org...

Si tratta di uno standard EAN/UCC 128.
Questa la definizione presa da 
barcode.it
:
"Quando si vuole vendere un prodotto nel mercato bisogna avere il codice a 
barre che identifichi in modo univoco il produttore, e' così sorto l'INDICOD 
come ente senza scopo di lucro per registrare ed associare le aziende."
Per avere qualche assaggio:
http://www.unindustria.bg.it/restyling/servizi/qualita/file/codiceean128.pdf
http://www.agritracer.com/doc/Fondamenti%20tracciabilita.pdf
http://www.agritracer.com/doc/Lineeguida_%20ortofrutta.pdf
http://www.indicod-ecr.it/
http://www.neodynamic.com/barcodes/UCC_EAN_128_Barcode.aspx
http://www.barcode.it/etichetta.html
Ciao, Carlo 

 
http://www.barcode.it/etichetta.html
I know, but... i would like to have some 'pappa-pronta Access code'
Tanto qua (sull'Indicod intendo) non ce' niente di interessante da 
sviluppare, basta solo seguire la definizione che danno e comporre 
l'etichetta correttamente
Quando uno ha fatto il mattoncino e' inutile che altri ci perdano tempo a 
costruirselo
Ciao
RobertoA
Newsgroup: it.comp.appl.access
Titolo: FE - Arrotondamenti su riga / totale documento

Allora, cliente che vende carburanti
Vorrebbe ottenere l'importo totale fatture uguale all'importo 
corrisposto dal cliente
Il cliente fa 20 euro di gasolio => fattura con totale 20 euro
Il cliente fa 50 euro di gasolio => fattura con totale 50 euro
Il prezzo unitario del carburante e' sempre a tre decimali, tipo 1,875 
euro/litro
Stante il fatto che il prezzo ivato pagato dal cliente puo' essere a due 
decimali, penso, metto la quantita' a sei decimali, evito di arrotondare 
e sono a posto
Non e' cosi'
Aggiungi iva, tira via iva, il totale non viene mai uguale
O tieni fermo il totale e sposti la quantita (il prezzo a litro non si 
puo' modificiare) oppure metti la quantita' giusta ed il totale non e' 
quasi mai quello pagato dal cliente
Esempio:
1- cliente paga 2000,00 euro (ivato)
2- prezzo a litro 1,875 (ivato)
3- in fattura ci andra' un imponibile prezzo/lt   di 1,537 (prezzo ivato 
di 1,875 scorporato di iva ed arrotondato al 3 decimale) ed una quantita 
di 1066,584 (imponibile_pagato / imponibile_prezzo_a_lt)
4- il parziale di riga, imponibile, sara' 1639,34
5- applicando il 22% di iva su 1639,34 mi da' una 1999,99
Come fare per, partendo dal totale pagato ivato, inserire gli imponibili 
unitari ed il prezzo unitario, e fare in modo che tutto torni col totale 
ivato pagato?
Qual'e' esattamente il metodo di conteggio usato da agenzia entrate per 
il controllo riga per riga e sul totale documeto?
Ciao e grazie

Non so qual è il controllo dell'agenzia delle entrate ma il conto non si può fare così perché un calcolo che torni in ogni situazione non si può fare.
Di sicuro ogni arrotondamento si deve fare a favore dell'Iva, 360,65574 deve essere 360,66. Ne consegue che l'imponibile è 1639,34.
Quando calcoli l'iva devi aggiungere 0,00999 € e poi troncare al secondo decimale.
L'ovvia conseguenza è che se fai il calcolo contrario non torna (1639,34*1,22=1999,9948).
Decidi tu, in base alla normativa di riferimento, quando fare il calcolo e l'arrotondamento.

>>>>  
http://www.bb2002.it
 :)  <<<<<
........... [ al lavoro ] ...........

 
 
Il prezzo unitario puo' avere il valore che vuoi tu
Supponendo di avere il prezzo/lt a 4 decimali, e allora?
Il problema arrotondamenti c'e' sempre, basta arrivare ad un adeguato 
numero di righe in fattura e te lo ritrovi sempre tra i piedi
Newsgroup: it.comp.appl.access
Titolo: 2 caselle di riepilogo con scrolling sincronizzato... come fare?

salve 
ho una maschera con2 caselle di riepilogo,
queste sono basate su 2 tabelle con dati molto simili (in pratica sono
dei prezzi, originali in una caselle, e modificati nell'altra)
volevo far si che mentre uno scrolla una casella, anche l'altra
seguisse lo scroll... in modo da visualizzare sempre le stesse righe,
sia in una casella che nell'altra....
come posso farlo?
come posso impostare con VB in una casella di riepilogo qual'č la
prima riga da visualizzare?
ciao, max

 come posso impostare con VB in una casella di riepilogo qual'è la


cazzi tuoi
Al mondo esistono persone estremamente educate che capiscono
perfettamente quando è il caso di parlare e quando invece è il caso di
stare zitti...
persone che hanno molto rispetto degli altri, e dei loro problemi, 
persone che riflettono profondamente prima di parlare, dando sfoggio
della loro intelligenza, della loro acutezza... ed di un sacco di
altre cose....

 altre cose....
Sono perfettamente d'accordo, ha perso un'occasione!
Per tornare a noi;
nella prima casella di riepilogo, quella che "comanda", nell'evento "su
clic" inserisci:
me.nomeSecondaCasella.requery
nella proprietà della secondaCasella - origine dati, apri il generatore di
espressioni e inserisci come condizione:
[Forms]![Maschera]![PrimaCasella]
Ciao.

[Forms]![Maschera]![PrimaCasella]
grassie :)
ciao, max


Scusa, per origine dati intendi Origine Riga ??
Ciao Marco

Sě scusa, hai ragione, č origine riga...
Ciao.
Newsgroup: it.comp.appl.access
Titolo: Condizione where

Salve a tutti,
non riesco a scovare il problema.
Ho una tabella in cui ho un campo utente.
In base all'user che accede devo filtrare questa tabella.
con la funzione fncGetMachinename ottengo l'utente
ma quando vado a filtrare la tabella per il controllo
Dim utonto as string
utonto = fncGetMachineName
Me.lingua.RowSource = "SELECT Tbl_Supporti.Lingua, Tbl_Supporti.Supporto, "
_
                                            & "Tbl_Supporti.Programma,
Tbl_Supporti.utente " _
                                            & " FROM Tbl_Supporti where
utente = " & "'" & utonto & "'"
ho questo problema
errore di sintassi nella stringa della sintassi della query "utente =
MAssimiliano"
Mi aiutate a corregere l'errore?
MAssimiliano

MA ha scritto:


Metti l'SQL in una stringa e imposta un punto di interruzione subito dopo
cosě puoi controllare se ha creato bene la query e vedi subito dov'č
l'inghippo.
SQL="SELECT....."
Me.lingua.RowSource = SQL    <-- (STOP)
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
me lo da proprio nell'assegnazione
Me.lingua.RowSource = SQL
MAssimiliano

MA ha scritto:



Sì perchè c'è qualcosa che non va nella stringa SQL. Se la metti in una
variabile prima di assegnarla alla rowsource, quando ti dà l'errore vai in
debug e controlli che la query contenuta nella stringa "SQL" sia corretta.


 Me.lingua.RowSource = SQL
A parte che io ribadisco che aborro l'uso degli _ piuttosto che concatenare
la stringa con sè stessa, fai il trace, quindi nella finestra immediata fai
? var_sql INVIO
Quindi copia la stringa e incollala dentro una query QBE vuota, nella
visualizzazione SQL.
Ti dovrebbe dire quale è il problema
Antonio

 ha scritto nel messaggio
news:bpisd5$s8t$1...@news.newsland.it...

Se vado sull'utonto lui mi visualizza Massimiliano con un segnetto vicino.
Credo di superarlo prendendomi le prime 5 lettere
Ora non mi dà + l'errore ma non mi filtra la tabella
MAssimiliano






Lo scopo del passare la query attraverso una variabile stringa è quello di
poter esaminare la query prima che venga assegnata al rowsource. Se ci
mandi la query magari si capisce cos'è.
SQL="SELECT....."
debug.print SQL
stop 'qui fai menù:  Visualizza - Finestra debug
Me.lingua.RowSource = SQL
Se ti ritrovi un "segnetto" vicino al nome può darsi che sia la funzione
fncGetMachinename ad aggiungerlo, magari perchè ritorna il nome NetBios
comprensivo di identificativo di servizio. Prova a sostituirla con
Interaction.Environ("Computername") o Interaction.Environ("Username"), o
togli l'ultimo carattere con left().



coem ho superato l'errore.
Ho creato una txbox non associata che in form_load vado a caratterizzare con
la funzione utente
a quel punto mi sono creato una query come origine record che va a pescare
il filtro su quel controllo.
Risolto, ma mi piace pochino.
Grazie a tutti e due
MAssimiliano

 MAssimiliano
No, no, dobbiamo risolverlo nel formato originale!
Cosě "ci piace poco anche a noi!"
;-)

Newsgroup: it.comp.appl.access
Titolo: Impostare mxg errore per campo indicizzato

Un saluto a tutti!
Dovrei impostare un mxg  per sostituire quello d'errore in questa 
situazione:
ho una form non associata che tramite un pulsante aggiunge i record a una 
tbl.
In questa tbl il campo PROTOCOLLO � impostato a Richiesto e Indicizzato, 
duplicati non ammessi.
Correttamente, quando provo a reinserire un record nella mschera con lo 
stesso Protocollo, compare l'errore.
Come posso inserire il messaggio "SCADENZA GIA' INSERITA PER QUESTA 
FATTURA!" in questo codice?
Private Sub SALVA_Click()
Me.Form.Requery
    Dim db As DAO.Database
    Set db = CurrentDb
    Dim rs As DAO.Recordset
    Set rs = db.OpenRecordset("SCADENZARIO INTESTAZIONE")
    With rs
        .AddNew
        !PROTOCOLLO = Me.PROTOCOLLO
        ![FT NUMERO] = Me.FT_NUMERO
        !IMPORTO = Me.IMPORTO
        !FORNITORE = Me.FORNITORE
        .Update
        .Close
    End With
    Set rs = Nothing
    Set db = Nothing
Me.Form.Requery
    Set db = CurrentDb
    Set rs = db.OpenRecordset("SCADENZARIO DETTAGLI")
    With rs
        .AddNew
        !IMPORTO = Forms![SCADENZARIO]![SCADENZARIO DETTAGLI]![IMPORTO]
        !SCADENZA = Forms![SCADENZARIO]![SCADENZARIO DETTAGLI]![SCADENZA]
        .Update
        .Close
    End With
    Set rs = Nothing
    Set db = Nothing
DoCmd.Close
End Sub
Grazie
-- 
Giorgia 

 ...
Sarebbe una buona idea di scrivere anche numero e messaggio
dell'errore che vuoi sostituire. � molto probabile che si tratta di 3022.
In questo caso:
Private Sub SALVA_Click()
On Error GoTo myError
'qui tutto il tuo vecchio codice e poi:
myExit:
    Exit Sub
myError:
    Select Case Err.Number
        Case 3022
            MsgBox "SCADENZA GIA' INSERITA PER QUESTA FATTURA!"
            Resume myExit
        Case Else
            MsgBox "Piccola eccezione " & vbCrLf & _
                Err.Number & " " & Err.Description
            Resume myExit
    End Select
End Sub
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

 Access FAQ: 
www.donkarl.com/it
S� hai ragione Karl!
ti confermo trattasi di errore 3022.
Provo quanto mi hai suggerito.
Grazie
Giorgia


Grazie Karl funziona perfettamente!
Buonweekend.
Giorgia