mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Perchè quando apro una scheda mi si chiude access 97 ? Così va bene, l'oggetto?

Da quando ho cambiato il pc (win XP sp2), non riesco + ad aprire i 
database access97... Qui in ufficìo mi hanno dato un pc con access 2003, 
allora io ho installato access97 perchè mi serve x aprire e modificare 
vecchi database senza convertirli, ma come apro un database con 
l'istruzione "form_open" access si chiude e mi ritorna al desktop.
Mi spiego meglio: il database si apre in struttura, ma se eseguo una 
scheda per esempio con questa istruzione:
Private Sub Form_Open(Cancel As Integer)
MsgBox "ciao"
End Sub
access si chiude. Se la scheda ha altro codice allora funziona.
Ho provato a disinstallare office 2003, pulire a mano il regedit, 
riavviare, installare office 97 (solo access 97 il resto non mi 
interessa) ma il problema persiste.
Ho messo anche il service pack 1 x access97, il sr2 non si installa 
perchè mi da un errore che mi dice che non si puo' installare...
che fare? Avete idee x aiutarmi? Non vorrei formattare tutto x 
ritrovarmi con lo stesso problema; secondo me dipende dal fatto che sul 
pc nuovo era già installato office 2003 ed è rimasto qualcosa che crea 
conflitto col 97... ma non so + che fare...
grazie,

 ha scritto nel messaggio 
news:bWefg.1102$O76...@tornado.fastwebnet.it...

Già il fatto che la Sr2 non si installa potrebbe essere un problema.
Prova a disintallare tutte le versioni di office e per il '97 c'è il 
regcleaner che elimina i residui di chiavi(che); elimina anche la cartella 
..\office dentro Programmi e con un altro programma che fa una scansione del 
registro e visulizza eventuali chiavi non utilizzate/errate, finisci la 
pulizia.
Poi riparti con l'installazione del '97 compresa la Sr2...
Ciao.
-- 
Sergio MAZZA 

ti ringrazio innanzitutto per i consigli dati, purtroppo il problema non 
si è risolto...
Ho fatto così:
- ho disinstallato dal pannello di c. tutti gli office che avevo.
- ho installato "Advanced Uninstaller PRO 2005" attivando il monitor 
delle installazioni.
- ho reinstallato completamente office 2003 (tranne outlook)
- ho reinstallato office 97 completo
- tramite "Advanced Uninstaller PRO 2005" ho disinstallato office 2003
- tramite "Advanced Uninstaller PRO 2005" ho disinstallato office 97
- ho ripulito tramite "Advanced Uninstaller PRO 2005" il reg. di 
configurazione
- ho riavviato il sistema
- ho reinstallato office 97 (solo access 97 e i suoi componenti 
aggiuntivi quali driver di database ecc)
- ho provato a reinstallare: sr1 con successo, sr2a senza riuscirci come 
anche sr2b
- ho provato a creare un nuovo database con una sola scheda contenente 
il codice form_open ecc ecc
- ho constatato che è sempre uguale... access si chiude da solo e torna 
al desktop
se potete darmi qualche aiuto, vi ringrazio tantissimo, sono sull'orlo 
della formattazione.... grrrrrrr
ciao,
Giancarlo

 Giancarlo
Io ho il '97 se puoi inviarmelo (zippato) ci butto un occhio...
Ciao.
-- 
Sergio MAZZA 

ti ho spedito lo zip, ma non dipende sicuramente dall' MDB ...
ciao
giancarlo

 giancarlo
Domani lo controllo...
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: in apertura visualizzo file scritti in giapponese

Mi è successa una cosa stranissima , aprendo il mio db due record vengono 
visualizzati in giapponese e cirillico!! e non riesco ad eliminarli .
Mi viene restituito questo avviso:
"Chiave di ricerca non trovata in alcun record"
Ho provato a riempirli in italiano
Ho provato una qr di eliminazione
niente...........
Cosa posso fare ?!!!!!!!!! 

 Mi č successa una cosa stranissima , aprendo il mio db due record

si č corrotto il file
importa uin nuovo file tutte le altre tab e quella corotta senza i record
incriminati
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it

 ha scritto nel messaggio 
news:eeem89$grd$1...@area.cu.mi.it...

E' un problema il mio db č enorme con decine e decine di relazioni&tabelle 

 relazioni&tabelle
Quelle le mantieni tutte

Newsgroup: it.comp.appl.access
Titolo: maschera - cambio record

Mi è capitato questa situazione: ho composto una maschera in base ad una
tabella , semplice e niente di eccezionale, però mi da un problema!
inserisco i dati nei vari campi e alla fine invece di andare sul nuovo
record successivo, mi ritorna al primo campo dello stesso record appena
inserito. Dove sbaglio?  mi sto' perdendo in una goccia d'acqua?
grazie
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 grazie
Controlla come è settata la Sequenza record della maschera, se tutti i
record o Record corrente.
--
rgrds
SC


Newsgroup: it.comp.appl.access
Titolo: funzione 'LastDayInMonth'

Salve a tutti!
Ho la necessità di calcolare l'ultimo giorno del mese partendo da una data
So che in Visual basic esiste la funzione 'LastDayInMonth', se provo ad
inserirla in VBA Access mi dice che non esiste. Come posso fare? devo
aggiungere qualche libreria, quale?? Eventualmente potete fornirmi anche la
sintassi?
maverick1168
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/


io di solito utilizzo questa funzione:
dateserial((year(mia data),month(mia data)+1,0)
Spero che ti sia utile :)
Gabry 69

 fornirmi anche la sintassi?
www.donkarl.com/it
 FAQ 2.8 Primo/Ultimo giorno del mese
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 


grazie a entrambi, funziona alla grande!!


Newsgroup: it.comp.appl.access
Titolo: inseriment dati tramite maschera

ciao ragazzi,
da poco lavoro su access e non sono tanto brava, per cui vi chiedo un
aiuto.
devo creare un db che un utente deve usare per inserire dei dati in una
tabella.
per farlo ho pensato di creare una maschera con caselle di testo o
combinate che vadano a scrivere su una tabella. come faccio a fare in modo
che qualsiasi cosa sia scritta in queste caselle vada ad alimentare la
tabella ?
so che è una domanda stupida ma io non sono ancora molto capace.
grazie e spero che vogliate aiutare una ragazza disperata ;-)
Dani
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 -- 
La maschera deve avere come origine record la tabella ed i controlli della
maschera debbono avere come origine controllo i campi della tabella cui
debbono essere associati.
Visto che sei agli inizi, forse per creare una maschera associata ad una
tabella, la cosa migliore è farlo usando l'Autocomposizione Maschera: verrà
lanciato un winzard che ti aiuterà moltissimo a creare la tua tabella.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Aiuto Margini di Stampe!!!

E' possibile impostare da codice o in qualche altro modo i margini di stampa
di un report prima di mandarlo in stampa?
Il mio problema è che con Access 2000 quando apro un report in anteprima
saltuariamente perde l'impostazione dei margini, ripristinando
l'impostazione di default.
Qualcuno ha qualche suggerimento?
Grazie per le risposte
Rodrigo Forlani

 Qualcuno ha qualche suggerimento?
Vedi la mia risposta al thread "slavare le impostazioni della stampante"
iniziato da Ezio il 18/07/01 13:07
Ciao, Max
Newsgroup: it.comp.appl.access
Titolo: treeview,treLislm_97 dal sitocomune..........

Ciao a tutti,ho visto gli esempi treeview,treLislm_97 sul sitocomune e sono
ottimi,mi servirebbero proprio nel mio db.......qualcuno può spiegarmi come
si metta in atto partendo da zero????? (se possibile tenete conto che sono
un principiantissimo!!!)
Ciao e grazie!!

 wrote in message
news:9qYp9.47479$
cS4.1...@news2.tin.it

Prima dei GIOCHINI sarebbe meglio saper usare il prodotto.
Non prenderla come offesa, ma non capisco perchè chi si 
avvicina ad ACCESS ha fretta di rendere le applicazioni 
che non funzionano almeno "BELLE".
Sono cose non complesse, ma richiedono concetti minimi, ai quali
si arriva con dedizione e calma.........!!!!!!!!!!!!!!!!!!!!!!!!
In ogni caso sono giocattoli per i quali serve la LICENZA,
o almeno la versione ODE....!!
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 wrote in message
16dde3b3035f324c8f...@mygate.mailgate.org...


Newsgroup: it.comp.appl.access
Titolo: Domanda Query

Ciao a tutti, avrei questo problema:
Supponiamo di avere una tabella con i campi A e B di tipo testo. 
Io ho un campo C (che in pratica è la concatenzione dei campi A e B)
Il mio problema è fare una query del tipo :
SELECT * FROM TABELLA WHERE AconcatenatoB = C
Si può fare questa concatenazione ?
Grazie a tutti per l'attenzione
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Grazie a tutti per l'attenzione
Da dove proviene il contenuto di C...?
Prova così, ma sono quasi certo che un confronto
stretto come questo difficilmente restituirà Records.
SELECT * FROM TABELLA WHERE A+B = C
@Alex


Grazie mille ... ha funzionato. (Io invece di + usavo ||)
P.S: Cmq il vaore C era proprio la concatenazione dei due campi A e B e
mi
veniva visualizzata in una COMBO, per questo il confronto stretto
funziona
P.SII: Non ti sto a spiegare cosa dovevo fare perchè è più difficile a 
dirsi che a farsi.

Newsgroup: it.comp.appl.access
Titolo: caratteri non rilevati

Con questo messaggio vi chiedo aiuto a risolvere un problema che mi blocca
una parte del mio lavoro,
il quesito è questo :
vi riporto il codice per chiarire meglio
Private Sub Comando18071_Click()
On Error GoTo Err_Comando18071_Click
Dim StDocName As String
Dim StLinkCriteria As String
StDocName = "FattureRighe"
StLinkCriteria = "[CL_CODICE]&[NomeSocietà]&[LO_LOCCOD]=" & "'" & Me![Codice
Cliente] & [NomeSocietà] & [Codice Località] & "'"
DoCmd.OpenForm StDocName, , , StLinkCriteria
Exit_Comando18071_Click:
    Exit Sub
Err_Comando18071_Click:
    MsgBox Err.Description
    Resume Exit_Comando18071_Click
Con questo codice apro una maschera che mi recupera dei dati, e tutto
funziona bene, il problema è che nel campo nomesocietà ci sono dei caratteri
tipo ( ' ) apostrofo o ( * ) asterisco ecc. e il codice in questi casi non
rileva più i dati e mi dice errori di sintassi operatore mancante
nell'espressione della query.
qualcuno sa come risolvere questo problema
grazie in anticipo
Giovanni

 ha scritto nel messaggio
news:uacW9.46191$0v.14...@news1.tin.it...

Il tuo problema nasce dal fatto che hai erroneamente usato l'APICE nella
composizione della StringaCriterio.
Prova a sostituirla con questa, in cui ho inserito chr(34) ............!
StLinkCriteria = "[CL_CODICE]&[NomeSocietà]&[LO_LOCCOD]=" & chr(34) &
Me![Codice
 Cliente] & [NomeSocietà] & [Codice Località] & chr(34)
@Alex

 ha scritto nel messaggio
news:yncW9.18436$ZE.5...@twister2.libero.it...

Grazie per l'aiuto ora funziona.
Newsgroup: it.comp.appl.access
Titolo: mail con allegato pdf da thunderbird

Salve a tutti,
da un mio programmimo eseguo la conversione di un report fattura in pdf per 
poi inoltrarla in allegato in una mail.
ho una routine che mi crea la mail per Outlook express e una che mi crea la 
mail per MS outlook.
Ovviamente in fase di installazione imposto un parametro per specificare 
quale dei due programmi utilizza il cliente.
Sono però sempre più i clienti che utilizzano Mozilla thunderbird. Esiste il 
modo di creare da vba la mail con allegato anche per questo client di posta?
N.B. E' essenziale che la mail sia nella cartella posta inviata del client 
usato..quindi non posso inviare direttamente la mail dal programma con 
librerie e ocx vari disponibili.
Qualche suggerimento?
Ciao, Ivan 

 ha scritto nel messaggio 
news:472069f8$0$17948$4faf...@reader1.news.tin.it...

Io uso una routine per OE ma funziona anche per TB ... se hai scritto la 
routine per OE non dovresti avere problemi ad utilizzare TB ...
La procedura indicata sul sitocomune per l'invio di allegati funziona anche 
con TB...basta impostare come predefinito quel programma di posta....diverso 
il discorso per Outlook.
Ciao
-- 
Roberto da Parma

 modo di creare da vba la mail con allegato anche per questo client di posta?
Si può fare tramite l'opzione -compose della command-line di
Thunderbird, con questa sintassi:
"c:\Programmi\Mozilla Thunderbird\thunderbird.exe" -compose
"attachment='file://nomefile',
subject='oggetto del messaggio',
body='corpo del messaggio'"
N.B.: dopo -compose e le virgole non devi mettere ritorni a capo, l'ho
fatto ora per evitare formattazioni astruse da parte dei news reader.
In pratica devi creare una riga come quella sopra, da lanciare
tramite
shell(comando)
ciao,
Panathos

Newsgroup: it.comp.appl.access
Titolo: Eseguire comando DOS

Dovrei lanciare da una maschera un comando DOS ed ottenere lo standar output
prodotto dal comando stesso per poterlo interpretare.
E' possibile in qualche modo?
Ringrazio per l'attenzione
Lucio

 Lucio
Ciao,
Massimo 

 Massimo
Sì, in questo modo riesco a lanciare un comando dos. Però quello che devo
fare è poter gestire il risultato del comando (lo standar output).
Per esempio se eseguo il comando DIR dovrei poter verificare i file presenti
nella cartella (non il mio caso e solo un esempio).
In particolare devo eseguire un comando GPG per controllare un file firmato
digitalmente e intepretarne il risultato (Good o Bad).
Grazie per il suggerimento
Ciao, Lucio

 Ciao, Lucio
Ciao,
Massimo
Newsgroup: it.comp.appl.access
Titolo: Bloccare controllo in base a data corrente

Salute a tutti,
ho la necessità di bloccare un controllo se la data corrente è > di una
certa data...
In una maschera DDTVENDITA ho inserito una casella di riepilogo .... vorrei
che se la data odierna fosse superiore a esempio 12/02/03 la casella
combinata risulti bloccata o disabilitata.
Ho provato a inserire il seguente codice su vari eventi della maschera:
if Date>12/02/03 then
me.COMBO.Enabled=false
else
me.Combo.enabled=true
end if
ma non funziona...suggerimenti?
Grazie Luca

 ha scritto nel messaggio
news:_EyZ9.56038$YG2.1...@twister1.libero.it...

Una istruzione del genere funziona:
Private Sub Form_Current()
    Dim DD As Date
    DD = "12/02/2003"
    If DateSerial(Year(Date), Month(Date), Day(Date)) > DateSerial(Year(DD),
Month(DD), Day(DD)) Then
    Me.COMBO.Enabled = False
    Else
    Me.COMBO.Enabled = True
    End If
End Sub
Ciao, Carlo

  Ma 12/02/03 proviene da una textbox?

 ha scritto nel messaggio
news:_EyZ9.56038$YG2.1...@twister1.libero.it...

Grazie a tutti per l'aiuto
Luca

> if Date>12/02/03 then
12 diviso 2 diviso 3 = 2
sempre vero, prova con:
if date> #12/2/2003#

Newsgroup: it.comp.appl.access
Titolo: Cerca Tabella in DB

Ciao a tutti!
Vorrei trovare il modo di verificare se una determinata tabella esiste
del DB corrente: ho visto l'articolo di ricerca tabella sul Sito Comune
ma non sono riuscito a farlo funzionare. Mi piacerebbe che su click di
un certo pulsante, un codice cercasse se esiste Tabella1 in DBmio, e
nel caso ci fosse facesse uscire un messaggio tipo "OK c'è", se no
"Non c'è"!
Potete darmi una mano!
Ri-Ciao!

Se non sei riuscito a farlo funzionare non è che magari sia
il caso di capire perchè...???
Che problemi ti dà..?
@Alex

Non sono riuscito ad inserire bene il nome del mio DB!



Scusa ma cosa dovrei capire con quanto mi dici...??
La funzione Funziona, quindi non hai molte alternative,
o ti spieghi in modo tecnico o non sò che fare.
@Alex

 wrote in message 
news:1140777151....@u72g2000cwu.googlegroups.com...

Definisci TableName ed eventualmente il nome
del database remoto
=============================
Private Sub Command22_Click()
Dim db As Database, Esiste As Boolean
Dim TableName As String, i As TableDef
'Set db = CurrentDb
Set db = OpenDatabase("C:\Access\Lotto\Lotto2.mdb")
TableName = "t_Estrazioni"
For Each i In db.TableDefs
    If i.Name = TableName Then
        Esiste = True
        Exit For
    End If
Next
MsgBox Esiste
End Sub
================================
Ciao
Bruno 

Grazie Bruno, sono riuscito a farla funzionare!
Newsgroup: it.comp.appl.access
Titolo: unione campi

sapreste indicarmi come posso creare un campo testo che contenga un join di
testo di altri due campi ossia:
io ho due campi  campo 1:     NOME
                         campo 2 :   COGNOME
come posso creare il campo 3 : NOMECOGNOME
grazie

 wrote in message 87e491$hd9$1...@nslave2.tin.it...

Nella proprietą "dati" del campo3 inserisci [campo1] & " " & [campo2]. Lo
spazio č facoltativo...
Attenzione, se non lo fai con il generatore di espressioni devi inserire
prima un = (uguale).
Ciao.

L'operatore & serve per concatenare stringhe.
Se hai quei tre campi puoi fare
update tabella set nomecognome = nome & cognome
o meglio
update tabella set nomecognome = nome & " " & cognome
Bai
--
Lorenzo Coronati
--
<<Nessuno sa che questa affermazione e' vera>>
(John D. Barrow)
--

testo di altri due campi ossia:
guarda che per join si intende qualcosa di completamente diverso.
quello che dici tu si chiama concatenazione.

Newsgroup: it.comp.appl.access
Titolo: combinare pulsanti

buongiorno,
ho un scheda nella quale ho messo tre pulsanti.
Ogni pulsante apre una routine evento che a sua volta apre un report, e 
lo stampa creando diversi file pdf con il nome dei diversi agenti.
funziona tutto bene, solo che devo lanciare i tre diversi tasti.
Ora mi chiedevo se fosse possibile creare un quarto pulsante che 
praticamente simuli il lancio dei 3 pulsanti.
Grazie,

 praticamente simuli il lancio dei 3 pulsanti.
Certo. Basta che nella sua routine evento chiami le tre routine evento
degli altri pulsanti.
Private sub PulsanteTutti_Click()
Pulsante1_click
Pulsante2_click
Pulsante3_click
End sub
cia'
Max

maestro ha scritto:

mi rispondo da solo con una call, scusate ma non ci riuscivo.
Un'altro problema, come faccio invece a impostare una stampante 
predefinita per un report.
Grazie
Newsgroup: it.comp.appl.access
Titolo: Dir() e caratteri internazionali

Ciao a tutti,
"sarà capitato anche a voi" come dice la famosa canzone, di scansionare una 
cartella con la funzione Dir(), nulla di più facile ed efficace eccetto che 
in un caso, se il nome della cartella contiene caratteri internazionali, ad 
es.: "POD BUDA" dove, come potete osservare, la A ha quella specie di 
codina, bene: una cartella con questo nome viene letta dalla funzione Dir 
come "POD BUDA" con la A normale, risultato: se cerchiamo di accedere a 
quella cartella col nome letto dal comando dir avremo un bellissimo errore 
53 (file non trovato) (che bello avere questo errore dopo aver ottenuto il 
nome dal comando Dir!!).
Accetterei qualsiasi suggerimento in proposito.
Grazie a tutti
Sib
-- 
http://www.gestionedati.com
 

 dalla funzione Dir
CUT
e invece non potete vedere niente perchè anche qui succede la stessa cosa, 
il carattere internazionale non viene riconosciuto e viene quindi 
interpretato come A (ASCII 65) invece che come risultava originariamente.
Sperco comunque che il messaggio fosse chiaro ugualmente...
Sib
-- 
http://www.gestionedati.com
 

> "sarà capitato anche a voi" come dice la famosa canzone, di scansionare
CUT
Non ci credo che sia capitato solo a me!
insomma, immagino che bisogna cercare di sfruttare i caratteri unicode, ma 
si può con la funzione Dir?
Sib

Newsgroup: it.comp.appl.access
Titolo: campo numerico autoincrementante solo in maschera

Salve a tutti,
è da poco che sono passato alla programmazione in VBA.
Spiego il problema:
ho realizzato un db per la catalogazione di rullini, quindi la maschera 
di ogni rullino ha una sottomaschera in visualizzazione "foglio dati" 
con elencati tutti i fotogrammi, generalmente 36. Finora digitavo a mano 
i numeri 1, 2, 3, ... 36, 37 nel campo Fotogramma, ma la cosa è 
abbastanza noiosa per cui sto cercando di capire se con VBA si può 
farglielo fare al computer.
ho provato così
Option Compare Database
Option Explicit
Private intNumFoto As Integer
Private Sub Form_AfterUpdate()
     If Me.Fotogramma.Value Is Null Then
         Me.Fotogramma.Value = intNumFoto + 1
     End If
End Sub
Private Sub Fotogramma_AfterUpdate()
     'Dim intNumFoto As Integer
      intNumFoto = Me.Fotogramma.Value
End Sub
ma mi dà errore 424 quando cambio record, la sintassi mi sembra chiara, 
dov'è che sbaglio.
Grazie per qualsiasi delucidazione
Saluti
Sam

 ha scritto nel messaggio 
news:M1lNg.276$A34...@nntpserver.swip.net...

ho provato così



End Sub

Grazie per qualsiasi delucidazione
Saluti
Sam
     If IsNull(Me.Fotogramma.Value) = True Then
Ciao
Newsgroup: it.comp.appl.access
Titolo: problema di ordinamento

ogni volta che creo una tabella, creo successivamente una query di questa
tabella per ordinare i dati in ordine alfabetico secondo un campo da me
deciso, sapete se posso ottenere questo in un modo più rapido senza ogni
volta dover creare una query?
Grazie.

> "@----- Pinco --@-- Pallino -----@" [...]:

    Apri la tabella, clic sul campo che ti interessa, quindi:
        Record > Ordina > Ordinamento crescente|decrescente
        File > Salva
poi riapri la tabella in struttura:
        Visualizza > Proprieta'
seleziona la proprieta':
        Ordina per
e ... premi F1.
--
Ciao.
Maurizio
--------
?SPQR(C)
 X
--------

Newsgroup: it.comp.appl.access
Titolo: Controllo Record

Ciao a tutti....
Ho un problema vorrei con una macro o con il codice (forse meglio con una
macro), scorrere tutti i record di una sottomaschera per controllare se la
casella si/no è accesa o spenta e visualizzare un messagio di errore se uno
o piu record hanno la casella spenta. come faccio a farli scorrere.... HO
SCUSATE SE SONO UN PRINCIPIANE......Ciao e grazie

 SCUSATE SE SONO UN PRINCIPIANE......Ciao e grazie
Ti apri un recordset sul recordsetclone della sottomaschera.
Quindi te lo cicli fino all'eof testando il valore di
rst.fields("campoSě/No")
Antonio

 ha scritto nel messaggio
news:3S5H9.32321$qF1.1...@news2.tin.it...

Quindi....... crea un pulsante che chiamerai trova, che ti servira' per fare
il controllo e nell'evento su click del pulsante inserisci il seguente
codice:
Dim db As Database
Dim rs As Recordset
Set db = CurrentDb
Set rs = db.OpenRecordset("Tabella1") 'Tabella1 e' l'origine record della
sottomaschera
Do Until rs.EOF
    If rs![check] = False Then   'checkBox e' il nome del controllo nella
sottomaschera che ha il valore si o no
    MsgBox ("Attenzione l' articolo" & " " & rs![Codice] & " e' impostato su
NO"), vbCritical + vbOKCancel, "A t t e n z i o n e"  ' Codice e' il nome
del prodotto
    End If
   Cancel = True
rs.MoveNext
Loop
Ciao e buon lavoro !!!!!  Ricordati che nei riferimenti il Dao 3.6 deve
essere impostato prima dell' Ado!!!!
Se hai altri problemi puoi passare da me (Area Informatica)
 Ciao ;-)))))

 Sei un mito grazie.......

 sottomaschera
La tua soluzione, che per il resto è corretta, ha un errore di fondo: non è
detto che in quel momento nella sottomaschera ci sia tutto il recordset
originale, perchè potrebbe essere cambiato.
Per questo avevo detto di utilizzare il recordsetclone della sottomaschera
stessa!!!
Antonio

 ha scritto nel messaggio
news:3YjH9.54504$3l.15...@twister1.libero.it...

Sinceramente non lo ho ancora provato se hai un altra soluzuzione semplice
aiutami tu....
ciao grazie

 aiutami tu....
La soluzione è quella giusta. Devi solo sostituire la riga
Set rs = db.OpenRecordset("Tabella1") 'Tabella1 e' l'origine record
con
set rs = me.controllosottomaschera.form.recordsetclone
Antonio

 Grazie...... a buon rendere,......,.....,.....,.....,
Newsgroup: it.comp.appl.access
Titolo: Convertire Database Access 97 --> Access 2000 o superiore

Salve a tutti.
Vi faccio una domanda insolita ma che ha una sua logica.
Ho un database access 97 che dovrei convertire in 2000 o superiore.
Esiste una utility che mi fa la conversione (possibilmente free)?
O esiste un modo per modificare l'header del db per farlo riconoscere come
se fosse 2000?
premetto che programmo in VB e che potrei crearlo io, ma vorrei sapere
eventualmente come fare.
grazie
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
www.nicolaottomano.it

 grazie
Basta che apri il db dalla versione che ti interessa e sarà lui a
chiedertelo di convertirlo.
E pensa ti basterà solo una mano, quindi te ne rimarranno 7 per fare ciò che
vuoi... ;-P
ciao MAssimiliano

 chiedertelo di convertirlo.
Questo lo so. Però io ho access 97 originale e non mi va di comprare il 2000
(o superiore), anche perchè con VB mi trovo meglio ad usare access 97.
Ma ho bisogno di convertire un database access da 97 a 2000 e devo farlo più
volte in vari giorni differenti (per motivi che non ti posso spiegare).
Quindi avevo pensato di sviluppare in 97 e fare solamente la conversione in
2000 con un tool di conversione.
bye


 2000 con un tool di conversione.
Non credo ci sia qualcosa del genere.
MAssimiliano

> Non credo ci sia qualcosa del genere.
Ho trovato ESP0DAMA sul Sito Comune di VB
grazie comunque


Newsgroup: it.comp.appl.access
Titolo: SetFocus su nome maschera da variabile (Forms!"Variabile".Setfocus, Come'''

Forse l'ogetto dice poco
avrei questa esigenza
su un evento
vorrei aprire impostare il focus su una maschera il cui nome è
presente su una variabile pubblica
per cui
Public FormAperta
Forms! FormAperta.setfocus
ho provato a comporre il tutto con apici e & ma mi da errore, o errore
di overflow
non capisco
attendo istruzioni ;))
grazie
Claudio

 Claudio
Ma questa variabile Public di che tipo č:
Public FormAperta
dichiarata cosě č variant e non si capisce con che dato la
popoli, quindi asiutarti č impossibile.
In qualsiasi modo č da evitare l'uso di un Variant(occupa troppa
memoria inutilmente), in questo caso č da evitare anche l'uso
di una variabile Oggetto dichiarata come Access.Form poichč
occuperebbe sempre troppa memoria.
Io ti consiglio di usare una stringa,  a quel punto sarebbe:
Public FormAperta as String
Forms(FormAperta).setfocus
Poi c'č da capire perchč devi salvare in una variabile public
il nome di una Form Aperta, ma questo dipende dal tuo modello
di sviluppo.
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 @Alex
ciao
CLaudio

 CLaudio
Ciao

Newsgroup: it.comp.appl.access
Titolo: Cambiare bordercolor agli interruttori di un gruppo di opzioni.

Buongiorno,
espongo il problema: ho una maschera associata ad una tabella, in questa maschera ho 40 interruttori in un gruppo di opzioni. Ogni interruttore all'interno è nominato da Tav1 fino a Tav40. All'apertura della maschera ho la seguente necessità, la tabella associata, contiene 40 record, uno per ciascun interruttore, l'Id di questa tabella corrisponde al valore dell'interruttore, interruttore Tav1 valore 1 corrisponde all'Id 1 della tabella, interruttore Tav2 valore 2 corrisponde all'Id 2, e via così fino al 40°... Dicevo, la tabella deve essere controllata per verificare il contenuto di un campo che può avere valore 1 o 0 quindi, a seconda del valore, colorare il bordo dell'interruttore di rosso o di verde, fatto ciò passa al record successivo  fino alla fine dei record. Potreste farmi qualche piccolo esempio di come creare questo ciclo, ponendo che la tabella si chiama "tblQuadro" e il campo si chiama "Linea", ed è di tipo Si/No, la maschera si chiama frmRst ed il gruppo di opzioni si chiama "BoxLinee"
Spero di essere stato il più chiaro possibile, la versione di access è il 2010.
 
Grazie
 
Alfio


Ciao!
 
Posto che "bordercolor" sia una proprietà supportata dall'oggetto Interruttore in A10 (nel mio AXP non se ne parla proprio), potresti fare una cosa di questo genere.
 
dim rsPerColori as dao.recordset
 
set rsPerColori=currentdb.openrecordset("tblQuadro")
 
do while (rsPerColori.eof=false)
    me("Tav" & rsPerColori.fields("Id").bordercolor= _
        iif(rsPerColori.fields("Linea"),vbred,vbgreen)
 
    rsPerColori.movenext
loop
rsPerColori.close
set rsPerColori=nothing
 
Tieni presente che è codice scritto al volo, quindi ocio agli errori.
 
HTH
Popi

 Popi
 
Grande!!!! Non riuscivo a trovare una soluzione per ciclare i nomi degli interruttori, bravissimo!!! Unico errore era nella mancata chiusura della parentesi prima di .bordecolor, nulla di che... Ancora grazie!!!!
 
Alfio

 Grande!!!! Non riuscivo a trovare una soluzione per ciclare i nomi degli interruttori, bravissimo!!! Unico errore era nella mancata chiusura della parentesi prima di .bordecolor, nulla di che... Ancora grazie!!!!
 
Prego :)
 
Popi
Newsgroup: it.comp.appl.access
Titolo: Blocco applicativo su chiusura maschera

win xp - access 2003
Ho una form anagrafica che espone alcuni pulsanti i quali aprono altre 
forms.
Accade che ieri ho eliminato una di queste maschere (e relativa tabella non 
relazionata con alcuna altra tabella) e, da allora, quando cerco di chiudere 
l'anagrafica access si blocca.
Questo accade sia se chiudo l'anagrafica usando il pulsante che ho sulla 
form, sia il pulsante "X", sia se uso "compatta e ripristina".
Grazie per qualsiasi aiuto.
eSQueL preoccupato 

Nel suo scritto precedente, eSQueL ha sostenuto :

davanti ad inspiegabili "blocchi" di access la prima cosa da fare e 
creare un nuovo db ed importare tutto il necessario da quello vecchio 
(moduli, maschere, report etc)
alle volte questa cosa fa miracoli :D
-- 
ignazioc


Corruzione di una tabella sistema a seguito delle modifiche apportate, segui 
il consiglio di IgnazioC e vedrai che risolvi. :-)
-- 
Ciao
Geppo 

 ha scritto nel messaggio 
news:mn.ad7a7d7c9...@gmail.it...

Ho fatto cosě e ho risolto.
Grazie a entrambi.
eSQueL
Newsgroup: it.comp.appl.access
Titolo: Disabilitare inserimento dati in alcuni campi

Ho questo problema:
ho creato una tabella (e correlata maschera) composta da alcuni campi,
mettiamo A, B, C.
Vorrei fare in modo che inserendo un dato nel campo A, venisse disabilitata
la
possibilita' di inserire altri dati nei campi B e C...o viceversa.
Qualcuno potrebbe aiutarmi?
Grazie di cuore,
Maria
P.S.: sono alle prime armi con Access, quindi, se la cosa non e' troppo
lunga, potreste
spiegarmi i passaggi da compiere?

 ha scritto nel messaggio
news:iy2%7.3215$aD.1...@twister2.libero.it...

guarda la proprietą locked (bloccato) del controllo
es. se valorizzi A impost b.locked = true e c.locked=true ecc.
ciao.

Newsgroup: it.comp.appl.access
Titolo: Somma e differenza ore

Non capisco dove sbaglio:
 
[entrata] (Data/ora)
[uscita]  (Data/ora)
[ore_teoriche] (numero intero)
 
[ore_reali]= CDAte(uscita-entrata)
[differenza]= CDate([ore_reali]-[ore_teoriche])
Il formato di differenza ï¿œ hh:nn; -hh:nn[Rosso]
 
Fino a qui tutto bene.
 
In una form a piï¿œ pagina metto un controllo per i totali
 
[Totale_reale]=Fix(Somma([ore_reali]))*24+DatePart('h';Somma([ore_reali])) 
& '.' & Format(Somma([ore_reali]);'nn')
 
bene anche questo ... poi
 
[Totale_differenza]= CDate(Somma([differenza])
in formato hh:nn; -hh:nn[Rosso]
 
Funziona ma NON MI SUPERA LE 24 ore ... oppure
 
[Totale_differenza]= 
Fix(Somma([differenza]))*24+DatePart('h';Somma([differenza])) & '.' & 
Format(Somma([differenza]);'nn')
in formato hh:nn; -hh:nn[Rosso]
 
Funziona ma NON MI METTE IL SEGNO NEGATIVO TRANNE quando supero il 24 (e 
comunque non diventa rosso)
 
Spero di essermi spiegato. Grazie

Proprio nessuno in grado di aiutarmi?
 
 


Ciao, dar� una occhiata in serata, e vedo se posso essere d'aiuto 
 
 

 Ciao, darï¿œ una occhiata in serata, e vedo se posso essere d'aiuto
Ti ringrazio

Newsgroup: it.comp.appl.access
Titolo: Database di immagini

come faccio ad inserire in un database per ogni scheda una immagine diversa
che si vede al caricamento della scheda stessa...???
per intenderci un database con schede che rappresentano la copertina del
libro e le informazioni circa l'autore!
grazie per l'aiuto!

 ha scritto nel messaggio news:YMSkd.311819$35.14...@news4.tin.it...

inserisci un campo dove metti il percorso dell'immagine
poi nella maschera o nel report inserisci un controllo immagine non associato metti l'istruzione
me.nomecontrolloimmagine.picture = me.nomecampoconpercorso
nella maschera lo metti nell'evento "su corrente"
nel report nell'evento "su formattazione" della sezione in cui è inserito il controllo immagine.
cmq vai su 
www.sitocomune.com
 c'è una FAQ che dice "come implementare correttametne un archivio di immagini" che ti può dare aiuto
ciao
Nick
Newsgroup: it.comp.appl.access
Titolo: Campi che possono contenere o meno dei valori

Il mio problema e' il seguente: ho un tabella con alcuni campi A, B,
C, D ecc. Ho creato una query per buttare in questa tabella un solo
record (in base a una condizione) che contiene alcuni valori ma non
tutti. Ad esempio il record potrebbe contenere solo i valori dei campi
a e b o c e d o a, b, c.
Il passo seguente sarebbe tirar fuori tramite query o Vba *solamente*
i campi che contengono i valori.
Come faccio a sapere dopo che ho fatto l'append del record quali campi
della tabella vengono popolati?
Grazie.

Ciao.
 
Scorri la collection Fields del recordset.
 
HTH
Popi
Newsgroup: it.comp.appl.access
Titolo: file MDE ribelle......

Salve a tutti, so che questo messaggio è stato già postato pochi giorni fa,
ma ho l'identico problema di Emy e la risposta di MA francamente non l'ho
capita.
Comunque ho win xp e office 2003 Pentium 3 1000mhz, 256 MB ram, ho creato un
MDB con parecchio codice di una dimensione totale di circa 12 MB. Quando
provo a creare MDE incomincia la conversione ma poi si blocca tutto e sono
costretto a usare i tasti CTRL+ALT+CANC per chiudere le applicazioni.
Qualcuno può dirmi dove sta l'errore?
Grazie
Massimo Pallavicini

 ha scritto nel messaggio
news:FbmWc.136245$OR2.6...@news3.tin.it...

prima di fare l'mde hai provato a far preventivamente compilare il tutto
dalla finestra del modulo?
magari trova qualche errorino e ti si impalla x questo.

 ha scritto nel messaggio
news:cgcrei$lfa$1...@hulme.interac.it...

no ma anche perchè non ho mai provato a farlo.....
Mi potresti dare una mano per favore?
Grazie

 ha scritto nel messaggio
news:_BmWc.136376$OR2.6...@news3.tin.it...

Apri una qualunque maschera in visualizzazione struttura, poi, dal menu
visualizza visualizza codice.
ti si apre la finestra del codice.
da qui dal menu debug, la prima scelta è compila ...
lanci la compilazione. Il programma controlla tutte le righe del codice e
vede se c'è qualche errore e te lo segnala fino a che non lo correggi.
Altrimenti potresti controllare sempre dalla stessa finestra del codice, il
menu strumenti l'opzione riferimenti. guarda se c'è qualche riferimento con
scritto manca ...

 ha scritto nel messaggio
news:cgcvn3$lje$1...@hulme.interac.it...

Ho provato a fare quanto mi hai detto, problemi di codice non c'è ne sono
mentre per quanto riguarda l'opzione riferimenti, mi appare soltanto una
sfilza di riferimenti disponibili .............. alcuni spuntati e altri
no......
Morale della favola non mi crea l'MDE..............

 ha scritto nel messaggio
news:s2rWc.176917$5D1.8...@news4.tin.it...

allora la questione è solo legata alla versione di access, e al fatto che tu
abbia convertito da 2000 a xp...
Io che ho l'xp, non faccio altro che andare su un pc con installato 2000,
creo l'mde da quello e lo metto su cartella condivisa per la distribuzione
agli utenti.
son pigro ... hai ragione ...
fammi sapere cmq!

 costretto a usare i tasti CTRL+ALT+CANC per chiudere le applicazioni.
Hai provato ad importare tutti gli oggetti in ul altro database ?
In alternativa prova ad importare gli oggetti (direi con codice) 1 alla
volta fino ad individuare quello che (penso) corrotto.
E' una rottura ma potresti risolvere.
Ciao+
Marco
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.appl.access
Titolo: la proprieta' timeout dell' oggetto command non opera con i recordset asincroni

quando ci si connetta al DB2 IBM usando l' OLE
DB provider dell' IBM stessa.
Dannazione, sono fottuto.
Letto sul sito dell' IBM, e manco lo trovo piu' !
L' unica cosa che mi rimane da fare, se voglio continuare ad usare
l' asincronicita' e nello stesso tempo dare un timeout alla query, e'
impostare un orologio di sistema in call back, con la speranza che
funzioni.
Faro' :
pubblica_v = true
qui accendo l' orologio con una chiamata all' API di windows.
poi
rc.open CMD,,, asynctype
pubblica_v = false
L' orologio chiama una certa funzione F() dopo
diciamo 5 minuti, che si va a guardare il valore
della pubblica_v. Se lo trova ancora a true, stacca
la connessione, intercetta l' errore e gestisce il tutto.
E cosi' dovrei fregarlo, a meno che l' istruzione
rc.open impedisca al sistema operativo di chiamare
la F(), ma non dovrebbe.
Vi faccio sapere.
'

 ha scritto nel messaggio 
news:c698ddc2-0ef0-4b21...@q14g2000vbf.googlegroups.com...
l'idiota scrisse un sacco di idioze
SKIPPED
Antonio

Newsgroup: it.comp.appl.access
Titolo: Definizione di variabili e funzioni.

Sto usando da poco A2010 ma finora ho modificato applicazioni create
con versioni precedenti; adesso, con un'applicazione nuova, mi succede
quanto segue.
In un modulo scrivo:
Public Codice As Long
e in un altro modulo comincio una funzione con:
Codice = Nz(DMax("[idFide]", "tFidejussioni"), 0) + 1
avendo all'inizio la clausola Option Explicit.
Facendo il Debug / Compila file, mi esce l'errore "Variabile non
definita" e mi si evidenzia la parola Codice della seconda linea
riportata.
È una cosa che ho sempre fatto, dove sbaglio?
 
Un altro errore è il seguente.
Nell'evento SuAttivato di una casella  combinata ho scritto:
=fApricombo("mInserisci";"funzFide")
e in un modulo ho:
Function fApricombo(cosa, dove)
    Forms(cosa)(dove).Dropdown
eccetera
Passando il focus a quella casella combinata mi esce errore
"Impossibile trovare il nome di funzione".
Anche questa è una cosa che ho fatto mille volte. Dove devo andare a
cercare il problema?
Grazie a tutti.
Riccardo Baldinotti


Avevo creato un modulo di classe anziché un modulo normale.
Come si fa a modificare l'oggetto della discussione in "Sono un
cretino" ?.
Riccardo Baldinotti

 Riccardo Baldinotti
cosi? Ma per cosi' poco. Cosa dovrei dire per me stesso che per 24 ore 
ho continuato a fare 3*2 = 9
 
-- 
 
ac (x=y-1)

 ac (x=y-1)
 
Grazie per la collaborazione :-)
Ricordo male, o rispetto a A2007 l'ordine delle due icone per creare
un nuovo modulo è stato invertito? Come "Excel" e "Access" in Dati
Esterni.
Questo, insieme alla ristrutturazione del menu Disponi, rendono il
ribbone peggiore del precedente, e già mi era antipatico.
Nel consorzio degli utilizzatori di Windows, nessuno ha mai tentato di
scoprire chi propone le modifiche ai programmi? Così, giusto per saper
chi ammazzare...
Riccardo Baldinotti
Newsgroup: it.comp.appl.access
Titolo: visualizzare ultimo record inserito...

certo il titolo non è il massimo... ma cercherò di spiegare cosa vorrei 
fare...
ho una maschera MASK1 con origine tabella Anagrafe
in cui vorrei visualizzare in un  controllo della Mask1 l'ultimo numero 
di pratica inserito
del campo della tabella N_Pratica, devo dire che il campo n_pratica è in 
formato testo
in quanto gli inserimenti vengono effettuati sia numerici che testo.. 
tipo 3456/ML
mi serve ciò in quanto servirebbe a ricordare di inserire correttamente 
un n_pratica
successivo a quello visualizzato...
speriamo che mi avete capito...:-)))
Ciao e grazie 

 ha scritto nel
messaggio news:Mz4xh.15953$422.2...@twister2.libero.it...

Argomento già trattato su MPIOA e ti ho già suggerito la soluzione.
Tiinvito a rileggerlo ed aprire l'Help per capire cosa ti ho suggerito di
fare.
Ti ho suggerito la funzione da usare ed anche come accedere alla finestra
immediata che
non conoscevi e che immagino tu non abbia nemmeno scoperto.....!
Devi leggere l'help ed un MANUALE non si va a tentoni...
I Post ripetuti su più NG non danno una buona impressione ...!
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------

 I Post ripetuti su più NG non danno una buona impressione ...!
mi devo crocifiggere ???
Bye

Newsgroup: it.comp.appl.access
Titolo: Filtraggio record

Buonasera,
Volendo filtrare i record di una tabella esposta in un form, via
codice, che differenza c'è tra questi due gruppi di istruzioni:
PRIMO GRUPPO
A) Per filtrare:
Me.Filter =  "chkPagato = True"
Me.FilterOn = True
B) Per rimuovere il filetro
Me.Filter=vbNullString
Me.FileterOn = False
SECONDO GRUPPO
A) Per filtrare
DoCmd.ApplyFilter "", "chkPagato = True"
B) Per rimuovere il filtro
DoCmd.ShowAllRecords
Capisco che il primo gruppo utilizza le Proprietà e il secondo i
Metodi, ma dal punto di vista pratico quale è preferibile usare?
Grazie
Filippo

 Metodi, ma dal punto di vista pratico quale è preferibile usare?
Non trovando differenze sostanziali, direi il "secondo gruppo", visto che
sia per mettere che per togliere il filtro utilizzi una sola istruzione
invece di due.
-- 
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution

 ha scritto nel messaggio
news:hsa0m35equ0efiudm...@4ax.com...

Con il 1° puoi filtrare senza spostare il FOCUS su mashcere aperte... con il
2° no.. quindi
a mio avviso il 1° è meglio...
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Errore esecuzione query aggiornamento, accodamento

Buona sera
mi volevo confrontare con chi avesse avuto la mia stessa problematica.
Ho Access 32 bit versione 2016 ver. 16.0.8319.1 Office Insider fast, da quando è stato fatto ultimo aggiornamento se lancio query da menù a Sx Access mi da un errore e si riavvia, se lancio la stessa query in modalità struttura e lancio esegui, la esegue tranquillamente.
Qualcuno ha avuto lo stesso problema.
Grazie

Stesso problema per me. Identico

 Stesso problema per me. Identico
 
Sinceramente ho A365, ma non riscontro il problema in Query UPDATE/INSERT...
 
Possiamo vedere una Query di esempio...?
Ho il sospetto possano essere Query Parametriche con Condizioni WHERE riferite ad Oggetti nelle Maschere...
 
Suggerisco queste letture Generiche:
https://support.microsoft.com/en-us/help/328828/how-to-troubleshoot-errors-that-may-occur-when-you-update-data-in-acce
 
https://support.office.com/en-us/article/Common-errors-when-you-run-an-append-query-26eecd3b-cbea-45c1-80c4-f5bb50a9ccfa
 
 
@ALex


Alex non sono solo query parametriche e non solo legate a maschere, anzi il contrario. Il problema è fino a prima dell'ultimo aggiornamento tutto funzionava, come descritto.

Leggi questo:
 
https://social.msdn.microsoft.com/Forums/vstudio/en-US/3c81019d-747a-4108-8902-617290679f69/access-2016-append-query-error?forum=accessdev
 
 
@Alex
 


ciao Giovanni,
è un bug generato in seguito all'ultimo aggiornamento di Office 2016.
Ci sono alcuni post nella community italiana del forum di Access relativi a questo problema.
Dai test che ho eseguito, l'update ha eliminato il bug precedente relativo al non mantenimento delle impostazioni relative i tre flag di conferma ( file, opzioni, impostazioni client, conferma) ma ha generato questo bug.
Dal mio punto di vista non è così aggressivo perché l'action query viene eseguita se lanciata in struttura, se eseguita via codice con il metodo execute.
La query viene risolta anche se i tre flags non sono spuntati, ovviamente meglio lasciarli spuntati.
Un MVP canadese mi ha confermato che MSFT è al lavoro...speriamo arrivi presto il fix.
Fronte Excel l'ultimo update sta colpendo duramente le tabelle pivot...
 
Attendiamo fiduciosi!
 
ciao, Sandro.
Newsgroup: it.comp.appl.access
Titolo: Messaggio conferma creazione campo

Ciao sono Fanciullo,
access97
ho questo codice che mi crea un campo:
Dim fld As Field
Set fld = CurrentDb().TableDefs(Me.cscCONTATORE).CreateField(Me.csCAMPO, 
dbLong)
'imposta l'attributo del campo a contatore
fld.Attributes = fld.Attributes + dbAutoIncrField
CurrentDb().TableDefs(Me.cscCONTATORE).Fields.Append fld
come faccio ad avere via codice una conferma della
avvenuta creazione del campo?
grazie 

 ha scritto nel messaggio 
news:49231900$0$40305$4faf...@reader5.news.tin.it...

Potresti rileggere i fields della tabella...se c'è il tuo campo ok, 
altrimenti...
Personalmente uso una funzione (i nomi sono di pura fantasia) come questa:
Public Function DimmiSePippo() As Boolean
Dim rcs As Recordset
Dim MiaSQL As String
On Error Resume Next
MiaSQL = "SELECT First(TuaTabella.TuoNomeCampo) AS QuelloCheVuoi FROM 
TuaTabella;"
Set rcs = CurrentDb.OpenRecordset(MiaSQL)
If Err = 0 Then
        DimmiSePippo = True
        rcs.Close
        Set rcs = Nothing
    Else
        DimmiSePippo = False
        rcs.Close
       Set rcs = Nothing
    End If
End Function
Se la funzione restituisce False vuol dire che il campo non esiste.
A runtime, per controllare se un campo è stato aggiunto al BE e quindi non 
ripetere la procedura di creazione campo (CreateField), faccio proprio così:
If DimmiSePippo = False Then
'codice per la creazione del campo
End if
Ciao, Carlo

Newsgroup: it.comp.appl.access
Titolo: Formula su access

Salve, come faccio a fare un operazione di questo genere:
  Entrate - Uscite = Totale
so che si deve inserire la formula esatta nella query, ho provato ma non 
mi riesce, potete aiutami? Grazie anticipatamente
Ben

 wrote in message
news:WE%Ue.49304$
4g5.3...@news4.tin.it

In realtà si scrive così:
Totale=Entrate-Uscite
dove entrate ed uscite sono i 2 campi della tabella/query relativi
e Totale è il nuovo campo Calcolato da inserire nella Query.
Ciao
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 
non me la fa sta differenza :(


 Totale=nz(Entrate)-nz(Uscite)
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it
Newsgroup: it.comp.appl.access
Titolo: Funzione ricerca esempio  3.122 sitocomune

Ragazzi vorrei inserire nel mio database una funzione di ricerca, 
precisamnete vorrei inserire l'esempio preso da SITO COMUNE n° 3.122 
(maschera COMUNE 2) il fatto è che la mia casella ID si chiama "Codice 
Cliente" ovvero presenta uno spazio che non è supportato dall'esempio.
Come posso risolvere? ho provato a modificare eliminando lo spazio ma mi 
sfascia tutto il database.
Come posso far funzionere questo esempio inserendo pero gli spazi vuoti?
grazie mille
paolo 


prova a scriverlo cosi:
[Codice Cliente]
oppure cosi
Codice_Cliente
-- 
Ciao
Geppo

Funziona grazie mille, ora però volevo chieder nuovamente il vs aiuto sempre 
su questo esempio mi spiego meglio:
Ho una maschera principale (chiamata maschera) in questa sono presenti 3
caselle di testo collegate ad una tabella (chiamata Archivio).
Queste 3 caselle di testo sono:
Codice Cliente   -    Nominativi    -    Nome
Nella maschera oltre a queste 3 caselle di testo ho inserito un pulsante
"trova" che mi apre un'altra maschera dove all'interno è presente una
casella di testo (per immetere la voce da cercare) e una casella di
riepilogo (è lo stesso esempio presente sul sito comune alla voce 3.122
sotto la maschera COMUNI 2).
Il mio problema è questo:
una volta fatta la ricerca mi compaiono i risultati nella casella di
riepilogo io volevo far si che cliccando sulla voce della casella, cambiasse
l'ID (codice cliente) della maschera principale in modo da restituimi il 
NOMINATIVO e il NOME
collegato a quell'ID che poi è il nominativo e il nome che mi vengono fuori
dalla ricerca e che sono presenti nella casella di riepilogo della 2°
maschera.
Come posso fare? c'è qualche esempio che posso visionare per capire un pò
come risolvere questo prob?
"geppo" <c...@tin.it.invalid> ha scritto nel messaggio 
news:LOvgj.212075$%k.34...@twister2.libero.it...


 un pň come risolvere questo prob?
tenendo in conto che la colonna associata dalla Casella di riepilogo č id, 
nell'evento click inserisci:
Private Sub TuaCasellaRiepilogo_Click()
Dim vTrova
trova = TuaCasellaRiepilogo
DoCmd.OpenForm "tabella1", , , "id =" & trova
End Sub
-- 
Ciao
Geppo 

> un pņ come risolvere questo prob?
