title: Controllo Record

text:
"Porello" <
por...@tiscali.it
> ha scritto nel messaggio
news:asj2fh$v50$1...@lacerta.tiscalinet.it...
>
> "Santoni" <
santo...@tiscali.it
> ha scritto nel messaggio
> news:3S5H9.32321$qF1.1...@news2.tin.it...
> > 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
> >
> >
>
> 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
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


title: Controllo Record

author: Santoni

text:
"Antonio Biso" <
ch...@etruria.net
> 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


title: Controllo Record

author: Antonio Biso

text:
"Santoni" <
santo...@tiscali.it
> ha scritto nel messaggio
news:sDGH9.42017$qF1.1...@news2.tin.it...
>
> > > Set rs = db.OpenRecordset("Tabella1") 'Tabella1 e' l'origine record
> della
> > > 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
> >
> Sinceramente non lo ho ancora provato se hai un altra soluzuzione semplice
> 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


title: Controllo Record

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:mNHH9.60119$2B1.1...@twister2.libero.it...

> Grazie...... a buon rendere,......,.....,.....,.....,


title: Convertire Database Access 97 --> Access 2000 o superiore

author: Ottomano Nicola

text:
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


author: MA

text:
"Ottomano Nicola" <
ottomano...@fastwebnet.it
> ha scritto nel messaggio
news:PDv_b.788$ND4...@tornado.fastwebnet.it...
> 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
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


text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:LND_b.10913$
HO2....@news.edisontel.com
> "Ottomano Nicola" <
ottomano...@fastwebnet.it
> ha scritto nel
> messaggio news:PDv_b.788$ND4...@tornado.fastwebnet.it...
>> 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
>
> Basta che apri il db dalla versione che ti interessa e sarà lui a
> 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



text:
> >> 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
> >
> > Basta che apri il db dalla versione che ti interessa e sarà lui a
> > 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.
Non credo ci sia qualcosa del genere.
MAssimiliano


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


title: SetFocus su nome maschera da variabile (Forms!"Variabile".Setfocus, Come'''

author: Claudio

text:
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


author: Alessandro Baraldi

text:
"Claudio" <
reale....@gmail.com
> wrote in message
news:1140108680.9...@g47g2000cwa.googlegroups.com
> 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
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


text:
> Ma questa variabile Public di che tipo è:
Ciao Alex, sempre pronto a rispondere
>
> 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
si scusa mi ero dimenticato di diterlo
l'ho dichiarata string
>
> Forms(FormAperta).setfocus
funziona perfettamente
> 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.
è semplice
ho una serie di di finestre di ricerca con campo data
mi sono creato una finestra calendario,
dalle finestre di ricerca sul campo data con il Dx del mouse
popolo questa variabile con il nome della form
mi apro la finestra calendario
faccio scegliere la data e chiudo e ritorno sulla finestra
ecco il motivo
l'ho fatto per comodità
così evito di farmi tanti controlli calendario in tutte quelle
finestre di ricerca
> @Alex
ciao
CLaudio


text:
"Claudio" <
reale....@gmail.com
> wrote in message
news:1140112886....@g14g2000cwa.googlegroups.com
[CUT]
> mi apro la finestra calendario
> faccio scegliere la data e chiudo e ritorno sulla finestra
> ecco il motivo
> l'ho fatto per comodità
> così evito di farmi tanti controlli calendario in tutte quelle
> finestre di ricerca
Immaginavo ci fosse qualche accrocchio di mezzo.
Se la Finestra Calendario la Apri in modalità acDialog dalla
finestra di ricerca fai senza fare tutto quello sforzo, il Focus
ritorna automaticamente sulla Form Chiamante.
> CLaudio
Ciao



title: Cambiare bordercolor agli interruttori di un gruppo di opzioni.

author: Alfio

text:
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


author: Popi - TheBadHabits

text:

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


text:
> 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.

Si, è supportata :)

> 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

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


text:
Il giorno mercoledì 4 aprile 2012 12:49:13 UTC+2, Alfio ha scritto:
> 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


title: Ricerca record all'interno della Form

author: MC

text:
Bene,
in una form ho impostato un criterio di ricerca così composto:
Public Sub CMD_DESTROVA_Click()
Dim rs As DAO.Recordset
Set rs = Me.RecordsetClone
Me.RecordsetClone.Requery
rs.FindFirst "ARTDES = '" & Me!ART_DESTROVA & "'"
If Not rs.NoMatch Then
    Me.Bookmark = rs.Bookmark
End If
Set rs = Nothing
End Sub
Il codice è corretto e mi ritorna il primo articolo che nella
descrizione contiene il valore che digito all'intenro dle campo
art_destrova ... domanda: Se ho però più articoli che contengono la
stringas di ricerca da me utilizzata, come faccio??????
Grazie per le aventuali risposte e buona giornata a tutti!
--
MC


title: Ricerca record all'interno della Form

text:
errore...il codice sopra riportato funziona solo se inserisco l'intera
descrizione articolo ... come mi muovo per una descrizione parziale ...
credevo che quanto scritto fosse sufficente ... mi sono perso in un
passaggio ... thanx!
--
mc


title: Ricerca record all'interno della Form

author: Roberto dalla campagna

text:
"MC" <
mauro.c...@gmail.com
> ha scritto nel messaggio
news:1120641772....@g47g2000cwa.googlegroups.com...

Prova a sostituire la riga di codice:
rs.FindFirst "ARTDES = '" & Me!ART_DESTROVA & "'"
con:
rs.FindFirst "ARTDES Like '*" & Me!ART_DESTROVA & "*'"
> --
> mc
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Ricerca record all'interno della Form

author: ciroteo

text:
"MC" <
mauro.c...@gmail.com
> ha scritto nel messaggio
news:1120641390.7...@g43g2000cwa.googlegroups.com...






credo che allora ti serva fare un filtro oppure un cambio di recorsource
della maschera.
In realtà il metodo findfirst trova il primo record che soddisfa il tuo
criterio, il filtro o una query tutti i records che soddisfano il criterio.
Concettualmente sono due cose diverse.
Io ho abbandonato il findfirst proprio per questo motivo, ma son certo che
non avendo approfondito l'argomento forse ci può essere un'altra
alternativa.


title: Ricerca record all'interno della Form

text:
MC wrote:
> Bene,
> in una form ho impostato un criterio di ricerca cosě composto:
>
> Public Sub CMD_DESTROVA_Click()
> Dim rs As DAO.Recordset
>
> Set rs = Me.RecordsetClone
> Me.RecordsetClone.Requery
>
> rs.FindFirst "ARTDES = '" & Me!ART_DESTROVA & "'"
> If Not rs.NoMatch Then
>
>     Me.Bookmark = rs.Bookmark
> End If
> Set rs = Nothing
> End Sub
>
> Il codice č corretto e mi ritorna il primo articolo che nella
> descrizione contiene il valore che digito all'intenro dle campo
> art_destrova ... domanda: Se ho perň piů articoli che contengono la
> stringas di ricerca da me utilizzata, come faccio??????
> Grazie per le aventuali risposte e buona giornata a tutti!
Fai un accesso Ado forwardonly e a quel punto riscatena l'evento col click
lui va al il prossimo che matcha
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: Ricerca record all'interno della Form

text:
FUNZIONA!
Se però ricerco una sorta di stringa (test) presente in più record e
premo consecutivamente il pulsante, non passa da un record all'altro
... cosa si può fare per ovviare al problema secondo te?
Intanto grazie per il precedeten aiuto!
--
MC


title: Ricerca record all'interno della Form

text:
Ovvero?
scusa ma non conosco questo metodo, potrei avere maggiori
delucidazioni?
Intanto guardo nell'help ... ma nell'ufficio dove mi trovo ora ... non
so perchè ma sembra bnon funzionare (l'help).
Grazie.
--
MC


title: Ricerca record all'interno della Form

text:
"MC" <
mauro.c...@gmail.com
> ha scritto nel messaggio
news:1120649500.5...@g14g2000cwa.googlegroups.com...

scusalo ... è napoletinglish ...
dai MA traduci per favore anche a me interessa questa cosa ...


title: Ricerca record all'interno della Form

text:
ahh però? come un baba al gusto di omelette?!!!
Scherzi a parte ... probabilmente a volte faccio richieste strane, del
resto lo era anche il mio ex nickname!!!
Abbiate pazienza arrivo da altra piattaforma e stò imparando,
purtroppo lavoro, famiglia e pendolarismo non milasciano molto tempo
libero , ma se sfoglio il mio storico di post capisco che lentamente
miglioro!!!!
Nel frattempo se sapete aiutarmi per il mio quesito, di cuore Vi
ringrazio!!!!!!!!!!!!!
--
MC


title: Ricerca record all'interno della Form

text:
"MC" <
mauro.c...@gmail.com
> ha scritto nel messaggio
news:1120651766.7...@g44g2000cwa.googlegroups.com...


risposta (scrivo così perchè il mio Outlook express non mi fa più vedere le
virgolette ...)
Come ti ho accennato nel messaggio precedente, salvo ricevere smentite da MA
che ti consiglia di utilizzare ADO al posto di DAO, io ti dicevo di cambiare
nettamente strategia e fare un filtro oppure modificare la query sottostante
la maschera.
Non è forse la soluzione ottimale, ma nel frattempo secondo me ti toglie le
castagne dal fuoco, anche se non è stagione di castagne
(e sempre restando in tema culinario, ti consiglio di evitare di parlar di
babbà ... leggi a proposito i post successivi alla CISA.)
la strategia che io utilizzo è quella dei filtri.
sull'evento dopo aggiornamento di una casella di testo che chiamiamo ricerca
che metterai nell'intestazione della maschera.
Me.FilterOn = True
Me.Filter = "[nomeform]![nomecampo]='"& chr(34) & Me![ricerca]  & & chr(34)
& "'"
In questo caso ti filtra la form in base al valore contenuto anche
parzialmente nella casella ricerca. Controlla bene gli apici il chr(34)
corrisponde ai doppi apici cosi trovi anche parole con l'apostrofo.
Spero faccia al caso tuo.


title: Ricerca record all'interno della Form

text:
SCRIVO:
Public Sub CMD_DESTROVA_Click()
Me.FilterOn = True
Me.Filter = "[op_ana_art]![artdes]='" & Chr(34) & Me![ART_DESTROVA] &
Chr(34) & "'"
End Sub
Ma quando clicco il pulsante, dopo aver valorizzato il campo
ART_DESTROVA contenente la stringa o parte di essa che deve essere
trovata all'interno del campo ARTDES, il sistema mi mostra una forma
filtrata con zetro risultati, anche se la parte di stringa ricercata
era contenuta in ARTDES, da cosa può dipendere secondo te?
--
...dimenticavo... ;o) Grazie!
--
MC


title: Ricerca record all'interno della Form

author: Sergio MAZZA

text:
Per trovare il prossimo utilizzi il metodo FindNext (vedi help)...
Ciao.
- -
Sergio MAZZA


title: Ricerca record all'interno della Form

text:

Ragazzi no tagliate le cose che servono altrimenti faccio fatica a capire a
cosa vi riferite



title: Ricerca record all'interno della Form

text:

E' certo hai messo una caterva di virgolette
Chr(34) sostitsce le virgolette
quindi "Pippo = '" & Pluto & "'"



title: Ricerca record all'interno della Form

text:
Hai ragione scusa, stò rispondendo da google gruppi beta e da rispondi
mi fa il cut del thread a quanto pare, i'm sorry, non era mia
intenzione.
--
MC


title: Ricerca record all'interno della Form

text:
"MC" <
mauro.c...@gmail.com
> ha scritto nel messaggio
news:1120654271.9...@z14g2000cwz.googlegroups.com...


Le parole che dovrai cercare possono contenere apostrofo?
Allora dovrebbe andare bene l'esempio che ti ho mandato sennò metti quello
di MA:
Me.FilterOn = True
Me.Filter = "[op_ana_art]![artdes]='" & Me![ART_DESTROVA] & "'"


title: Blocco applicativo su chiusura maschera

author: eSQueL

text:
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


title: Blocco applicativo su chiusura maschera

author: IgnazioC

text:
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


title: Blocco applicativo su chiusura maschera

author: geppo

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


title: Blocco applicativo su chiusura maschera

text:
"IgnazioC" <
ignazioc_t...@gmail.it
> ha scritto nel messaggio
news:mn.ad7a7d7c9...@gmail.it...

Ho fatto cosě e ho risolto.
Grazie a entrambi.
eSQueL


title: annullare il ciclo for...next

author: Singer

text:
dim dbname(8) as string
dbname(0)="Nome1.mdb"
dbname(1)="Nome2.mdb"
....
dbname(7)="Nome8.mdb"
 For i=0 to 7
    currentdb.execute "INSERT INTO RIFORNIMENTI  SELECT * FROM
  ESPORTADATI IN '" & dbname(i) & ".MDB' WITH OWNERACCESS OPTION;"
con questa istruzione, suggerita da Cinzia qualche giorno fa, faccio in modo
di importare nel mio db i dati da più file che hanno - nel tempo - sempre lo
stesso nome: nome1, nome2 ...., nome7.
ho fatto in modo che ci sia un messaggio quando un file non viene trovato.
però mi sono accorto che i dati degli altri db vengono ugualmente importati.
c'è un modo per annullare l'importazione se non ci sono nella cartella
predefinita tutti i file da cui devo importare i dati
oppure un modo per verificare prima la loro presenza e poi lanciare il ciclo
Grazie


title: annullare il ciclo for...next

text:
Singer wrote:
> dim dbname(8) as string
> dbname(0)="Nome1.mdb"
> dbname(1)="Nome2.mdb"
> ....
> dbname(7)="Nome8.mdb"
> For i=0 to 7
if dir(dbname(i) & ".mdb" <>"" Then
>    currentdb.execute "INSERT INTO RIFORNIMENTI  SELECT * FROM
>  ESPORTADATI IN '" & dbname(i) & ".MDB' WITH OWNERACCESS OPTION;"
end if
>
>
> con questa istruzione, suggerita da Cinzia qualche giorno fa, faccio
> in modo di importare nel mio db i dati da più file che hanno - nel
> tempo - sempre lo stesso nome: nome1, nome2 ...., nome7.
>
> ho fatto in modo che ci sia un messaggio quando un file non viene
> trovato. però mi sono accorto che i dati degli altri db vengono
> ugualmente importati. c'è un modo per annullare l'importazione se non
> ci sono nella cartella predefinita tutti i file da cui devo importare
> i dati
> oppure un modo per verificare prima la loro presenza e poi lanciare
> il ciclo
>
> Grazie
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access
Segrate (MI), 7-8 giugno 2007


title: annullare il ciclo for...next

text:

mi dispiace ma non funziona.
se ci sono tutti i file importa
se ne manca uno importa ugualmente dal file presente
io voglio invece che mi interrompa l'importazione
se invece di <> metto =
non trova il file se nella directory non c'è
ma se ci sono tutti  non da errori ma non fa l'importazione


title: annullare il ciclo for...next

author: Alessandro Cara

text:

Mi vengono in mente quattro diversi metodi
1) Cancellare i dati scritti
2) Usare transazioni
4) Fare prima un ciclo che verifichi se i db ci sono tutti e solo in
quel caso eseguire le insert
Ho soppresso il caso 3 perche' e' una una inutile complicazione del caso
4. Io sono per la 4, la verifica "preemptive" dei db non porta via molto
tempo ;<)
--
ac
y-1=x


title: annullare il ciclo for...next

text:
"Alessandro Cara" <
alessan...@ay-1asistemi.it
> ha scritto nel messaggio
news:4bWzi.8201$fb....@tornado.fastwebnet.it...

scusa ma non ho capito nulla!!!


title: annullare il ciclo for...next

author: Access

text:
Ciao Singer,
"Singer" <
fuscoa...@tin.it
> ha scritto nel messaggio
news:46d07f85$0$17944$4faf...@reader1.news.tin.it...

Con il suggerimento di MAssimiliano, potresti creare una funzione tipo
questa che ti controlla se i db esistono e qualora ne mancasse uno esce
dalla funzione passando quest'ultima a "false":
Function ExistDB()
Dim i As Integer
Dim dbname(3) As String
dbname(0) = "c:\prova1"
dbname(1) = "c:\prova2"
dbname(2) = "c:\prova3"
For i = 0 To 2
If Dir(dbname(i) & ".mdb") <> "" Then
   ExistDB = True
Else
   ExistDB = False
   Exit Function
End If
Next i
End Function
nell'evento click del pulsante:
Private Sub NomeTuoPulsante_Click()
Dim i As Integer
Dim dbname(3) As String
dbname(0) = "d:\ciccioriccio"
dbname(1) = "d:\pippo"
dbname(2) = "d:\fattoquesto"
If ExistDB = True Then
For i = 0 To 2
 CurrentDb.Execute "INSERT INTO RIFORNIMENTI SELECT * FROM ESPORTADATI IN '"
& dbname(i) & ".mdb' WITH OWNERACCESS OPTION;"
Next i
End If
End Sub
--
Ciao
Access


title: annullare il ciclo for...next

author: ALESSANDRO Baraldi

text:
"Access" <c...@tin.it.invalid> ha scritto nel messaggio
news:wJ%zi.95187$%k.23...@twister2.libero.it...
> Ciao Singer,
>
> "Singer" <
fuscoa...@tin.it
> ha scritto nel messaggio
> news:46d07f85$0$17944$4faf...@reader1.news.tin.it...
> >
> > "Alessandro Cara" <
alessan...@ay-1asistemi.it
> ha scritto nel
> > messaggio news:4bWzi.8201$fb....@tornado.fastwebnet.it...
> >>
fuskoa...@gmail.com
 wrote:
> >>> On 25 Ago, 09:51, "MA" <
mas...@massimilianoamendola.it
> wrote:
> >>>> Singer wrote:
> >>>>> dim dbname(8) as string
> >>>>> dbname(0)="Nome1.mdb"
> >>>>> dbname(1)="Nome2.mdb"
> >>>>> ....
> >>>>> dbname(7)="Nome8.mdb"
> >>>>> For i=0 to 7
> >>>> if dir(dbname(i) & ".mdb" <>"" Then
> >>>>
> >>>>>    currentdb.execute "INSERT INTO RIFORNIMENTI  SELECT * FROM
> >>>>>  ESPORTADATI IN '" & dbname(i) & ".MDB' WITH OWNERACCESS OPTION;"
> >>>> end if
> >>>>
> >>>>
> >>>>
> >>>>> con questa istruzione, suggerita da Cinzia qualche giorno fa, faccio
> >>>>> in modo di importare nel mio db i dati da piů file che hanno - nel
> >>>>> tempo - sempre lo stesso nome: nome1, nome2 ...., nome7.
> >>>>> ho fatto in modo che ci sia un messaggio quando un file non viene
> >>>>> trovato. perň mi sono accorto che i dati degli altri db vengono
> >>>>> ugualmente importati. c'č un modo per annullare l'importazione se
non
> >>>>> ci sono nella cartella predefinita tutti i file da cui devo
importare
> >>>>> i dati
> >>>>> oppure un modo per verificare prima la loro presenza e poi lanciare
> >>>>> il ciclo
> >>>>> Grazie
> >>>> --
> >>>> --
> >>>> MAssimiliano
Amendolawww.accessgroup.it
> >>>> Cisa - Conferenza Italiana Sviluppatori Access
> >>>> Segrate (MI), 7-8 giugno 2007
> >>>
> >>> mi dispiace ma non funziona.
> >>> se ci sono tutti i file importa
> >>> se ne manca uno importa ugualmente dal file presente
> >>> io voglio invece che mi interrompa l'importazione
> >>>
> >>> se invece di <> metto =
> >>> non trova il file se nella directory non c'č

Singolare il fatto di aggiungere l'estensione dopo... ;-)
E se la mettevi quě...?
dbname(0) = "d:\ciccioriccio.mdb"
dbname(1) = "d:\pippo.mdb"
dbname(2) = "d:\fattoquesto.mdb"
Boh....
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------


title: annullare il ciclo for...next

text:
Ciao ALESSANDRO Baraldi
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:fasq15$pog$1...@aioe.org...

c'č differenza?
cosi non si scrive di meno?
Qual'č la cosa migliore?
Grazie.
> --
> @Alex (Alessandro Baraldi)
> ---------------------------------------------------------------------------
>
http://www.sitocomune.com/
>
http://www.alessandrobaraldi.it
> ---------------------------------------------------------------------------
--
Ciao
Access


title: annullare il ciclo for...next

text:
> c'è differenza?
>
> cosi non si scrive di meno?
>
> Qual'è la cosa migliore?
>
> Grazie.
Voleva essere una battuta, ma ....
Questo è quello che hai proposto:
dbname(0) = "d:\ciccioriccio"
.....
If Dir(dbname(i) & ".mdb") <> "" Then
Questo è quello che intendevo
dbname(0) = "d:\ciccioriccio.mdb"
If Dir(dbname(i)) <> "" Then
Non c'è differenza ovviamente di funzionamento ma perchè mai non mettere
l'estensione già nella stringa...????
Dimmi tu se secondo te c'è un motivo, io non lo trovo...
;-)



title: annullare il ciclo for...next

text:
ciao ALESSANDRO Baraldi,
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:fasrpq$uvs$1...@aioe.org...
>> c'è differenza?
>>
>> cosi non si scrive di meno?
>>
>> Qual'è la cosa migliore?
>>
>> Grazie.
>
> Voleva essere una battuta, ma ....
>
> Questo è quello che hai proposto:
> dbname(0) = "d:\ciccioriccio"
> .....
> If Dir(dbname(i) & ".mdb") <> "" Then
>
> Questo è quello che intendevo
> dbname(0) = "d:\ciccioriccio.mdb"
> If Dir(dbname(i)) <> "" Then
>
> Non c'è differenza ovviamente di funzionamento ma perchè mai non mettere
> l'estensione già nella stringa...????
>
> Dimmi tu se secondo te c'è un motivo, io non lo trovo...
> ;-)
non avevo capito la battuta, pero'...
un motivo potrebbe essere questo:
dbname(20)
si scrive di meno cosi:
dbname(0) = "c:\tuodatabase" 'x 20 volte
 If Dir(dbname(i) & ".mdb") <> "" Then 'una sola volta.
poi ho visto che MA la scritta cosi, cinzia anche, allora mi chiedevo
perche' scrivere 20 volte dbname(0) = "c.\nome.mdb" quando si puo omettere
.mdb e scriverlo dopo una sola volta?
--
> @Alex (Alessandro Baraldi)
> ---------------------------------------------------------------------------
>
http://www.sitocomune.com/
>
http://www.alessandrobaraldi.it
> ---------------------------------------------------------------------------
--
Ciao
Access


title: annullare il ciclo for...next

text:
[cut]
> non avevo capito la battuta, pero'...
>
> un motivo potrebbe essere questo:
>
> dbname(20)
>
> si scrive di meno cosi:
>
> dbname(0) = "c:\tuodatabase" 'x 20 volte
>
>  If Dir(dbname(i) & ".mdb") <> "" Then 'una sola volta.
>
> poi ho visto che MA la scritta cosi, cinzia anche, allora mi chiedevo
> perche' scrivere 20 volte dbname(0) = "c.\nome.mdb" quando si puo omettere
> .mdb e scriverlo dopo una sola volta?
Non sono queste le cose che fanno risparmiare..., anzi il risparmio
deve essere
asservito alla chiarezza, ed in questo caso è riduttivo... IMHO...
> --
> Ciao
> Access
Ciao
@Alex


title: annullare il ciclo for...next

text:
ciao Alessandro Baraldi,
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:1188203139.6...@d55g2000hsg.googlegroups.com...


Ok. Faccio bagaglio di cio'.
Mettete sempre la vostra esperienza a nostra (dilettanti) disposizione, un
Grazie enorme.
>Ciao
>@Alex
--
Ciao
Access


title: Disabilitare inserimento dati in alcuni campi

author: Maria

text:
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?


author: ramblers

text:
"Maria" <
g...@eil.it
> 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.


title: Somma e differenza ore

author: Zut

text:
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


title: Somma e differenza ore

text: Proprio nessuno in grado di aiutarmi?


title: Somma e differenza ore

text:
"Zut" <
lucia...@libero.it
> ha scritto nel messaggio
news:lb81cu$hf$1...@speranza.aioe.org...
> Proprio nessuno in grado di aiutarmi?
>
>
Ciao, dar� una occhiata in serata, e vedo se posso essere d'aiuto


title: Somma e differenza ore

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


title: Database di immagini

author: Gentile Antonio

text:
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!


title: Database di immagini

author: Nick

text:
"Gentile Antonio" <
gentile...@tin.it
> 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


title: TOTALE in SUB MASCHERA che SODDISFA TOTALE in MASCHERA

author: luigi corinna

text:
Buon Giorno...
A97
ho una maschera chiamata MANDATO con FORNITORE e TOTALE MANDATO prefissati
(record creato precedentemente da un'altra postazione PC)
collegata ad una SUB MASCHERA chiamata RIGHE RENDICONTO dove la mia
segreteria crea records (maschere continue) a pareggio del TOTALE MANDATO
della MASCHERA MANDATO...
Bene
CONTROLLO se la mia segretaria ha realmente soddisfatto la MASCHERA
MANDATO con la creazione di records in SUB MASCHERA....con un IS Null sul
Link_Tesoreria che � il collegamento tra MASCHERA e SUB MASCHERA...
Bene...
ma se voglio controllare oltre la creazione dei RECORDS ...sapere se i gli
stessi con la casella TOTALE RIGA (la loro somma)....soddisfano la cifra
presente in TOTALE MANDATO della MASCHERA MANDATO ???
Grazie e Buona Giornata
Luigi, Bari


title: Campi che possono contenere o meno dei valori

author: Pino

text:
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.


author: Popi - TheBadHabits

text:
Ciao.

Scorri la collection Fields del recordset.

HTH
Popi


title: file MDE ribelle......

author: Massimo Pallavicini

text:
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


title: file MDE ribelle......

author: ciroteo

text:
"Massimo Pallavicini" <
maspall...@virgilio.it
> 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.


title: file MDE ribelle......

text:
"ciroteo" <
cir...@libero.it
> 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


title: file MDE ribelle......

text:
"Massimo Pallavicini" <
maspall...@virgilio.it
> 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 ...


title: file MDE ribelle......

text:
"ciroteo" <
cir...@libero.it
> 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..............


title: file MDE ribelle......

text:
"Massimo Pallavicini" <
maspall...@virgilio.it
> 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!


title: file MDE ribelle......

author: Marco Antonioli

text:
> 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.
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


title: la proprieta' timeout dell' oggetto command non opera con i recordset asincroni

author: radicale 004

text:
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.
'


author: Antonio Biso

text:
"radicale 004" <
radica...@gmail.com
> ha scritto nel messaggio
news:c698ddc2-0ef0-4b21...@q14g2000vbf.googlegroups.com...
l'idiota scrisse un sacco di idioze
SKIPPED
Antonio


title: Definizione di variabili e funzioni.

author: Riccardo Baldinotti

text:
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


title: Definizione di variabili e funzioni.

text:

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


title: Definizione di variabili e funzioni.

author: Alessandro Cara

text:
Il 15/09/2011 17.00, Riccardo Baldinotti ha scritto:
[cut]
> 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
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)


title: Definizione di variabili e funzioni.

text:
On 15 Set, 17:09, Alessandro Cara <
alessandro.c...@ay-1anetwork.it
>
wrote:
> Il 15/09/2011 17.00, Riccardo Baldinotti ha scritto:
> [cut]> 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
>
> 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)

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


title: visualizzare ultimo record inserito...

author: SuperPippo宰at Home

text:
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


title: visualizzare ultimo record inserito...

author: ALESSANDRO Baraldi

text:
"SuperPippo®_at Home" <cuccoT*O*G*L*I*S*P*A*
M...@libero.it
> 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
---------------------------------------------------------------------------


title: visualizzare ultimo record inserito...

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:eq2l3d$s9g$1...@aioe.org...
> 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.
ci avevo provato ripetute volte ma mi uscica sempre #Nome#...
poi per altri problemi non ho + potuto dedicarmi al lavoro...ù
> 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.....!
questo è vero...:-))).
> Devi leggere l'help ed un MANUALE non si va a tentoni...
ok... quando avrò tempo....:-((
> I Post ripetuti su più NG non danno una buona impressione ...!
mi devo crocifiggere ???
Bye


title: Filtraggio record

author: Filippo

text:
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


title: Filtraggio record

author: Gabriele Bertolucci

text:
> Capisco che il primo gruppo utilizza le Proprietà e il secondo i
> 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


title: Filtraggio record

text:
"Filippo" <
f....@panservice.it
> 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
---------------------------------------------------------------------------


title: Errore esecuzione query aggiornamento, accodamento

author: Giovanni Pettorossi

text:
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


text: Stesso problema per me. Identico


text:
Il giorno martedì 11 luglio 2017 22:38:15 UTC+2,
fsol...@gmail.com
 ha scritto:
> 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


text:

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.


text:
Leggi questo:

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

@Alex


author: Sandro Peruz

text:

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.


title: Messaggio conferma creazione campo

author: Fanciullo

text:
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


title: Messaggio conferma creazione campo

author: Carlo Costarella

text:
"Fanciullo" <
vito...@alice.it
> 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


title: Formula su access

author: ^Ben Hascom^

text:
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


title: Formula su access

author: Alessandro Baraldi

text:
"^Ben Hascom^" <
crystal...@tin.it
> 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


title: Formula su access

text:
Alessandro Baraldi ha scritto:
> "^Ben Hascom^" <
crystal...@tin.it
> wrote in message
> news:WE%Ue.49304$
4g5.3...@news4.tin.it
>
>
>>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
>
>
>
> 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.
>
non me la fa sta differenza :(


title: Formula su access

author: MA

text:

 Totale=nz(Entrate)-nz(Uscite)
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: Funzione ricerca esempio  3.122 sitocomune

text:
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


author: geppo

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


text:
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...



text:
Ciao
pa...@libero.it
 wrote:
> 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?
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


text:
Grazie mille funziona tutto
Paolo
"geppo" <c...@tin.it.invalid> ha scritto nel messaggio
news:06xgj.212156$%k.34...@twister2.libero.it...
> Ciao
pa...@libero.it
 wrote:
>> 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?



title: errore di run time 3464

author: massimo

text:
ho letto i post precedenti ma niente.......
ho confrontato le librerie selezionate nel db nei due pc...... sono
uguali....
cosa devo fare?
sicuramente manca qualche riferimento?


title: Valore predefinito........

author: MarkRed

text:
Salve!
questo problema è stato già suggerito ma non trovo più il post e tantomeno
chi l'ha risolto:
dovendo inserire un nuovo record vorrei che in un determinato campo il
valore fosse quello del record precedente.
Mi ricordo che la formula va messa nell'impostazione "Valore predefinito".
Grazie.
Marco.


title: Valore predefinito........

author: Arilolo

text:
Ciao!
Puoi trovare la risposta su
www.sitocomune.com
, sotto Forms, penultima voce.
ciao ciao
----------------------------------------------------------------------------
----
"MarkRed" <
con...@libero.it
> ha scritto nel messaggio
news:FYR68.7004$nI1.1...@twister1.libero.it...



title: Valore predefinito........

text:
"Arilolo" <
ari...@inwind.it
> ha scritto nel messaggio
news:zRT68.7890$nI1.2...@twister1.libero.it...

Ciao,
senti, ma quando vado ad un nuovo record dovrei aver visualizzato il valore
del record precedente e invece non c'è nulla.
Ho fatto quanto suggerito dal Sito Comune ma non funziona.
questo è il mio codice:
Private Sub cognome_BeforeUpdate(Cancel As Integer)
Me.COGNOME.DefaultValue = "'" & Me.COGNOME.Value & "'"
End Sub
e non succede niente.
Ho anche provato ad inserire nelle proprietà della casella di testo COGNOME
il valore predefinito in tutte le maniere ma senza alcun risultato.
Grazie, Marco.


title: Valore predefinito........

text:
Tanto per assicurarti che i riferimenti funzionino prova a fare una cosa di
questo tipo
Private Sub cognome_BeforeUpdate(Cancel As Integer)
msgbox Me.COGNOME.DefaultValue
msgbox "'" & Me.COGNOME.Value & "'"
End Sub
In questo modo ti compaiono due messaggi, uno con il valore predefinito
correntemente impostato e uno con quello che dovrebbe sostituirlo.
Comunque, adesso che ci faccio caso, secondo me l'evento non è quello
giusto. Se non ricordo male dovrebbe essere Prima di inserire nelle
proprietà della maschera, in modo che prima di salvare il record ti imposti
anche il valore predefinito. Come l'hai fatto tu lo imposta prima che tu
inserisca un valore nel campo. Forse è quello... se ho capito bene quello
che hai fatto.
Ciao ciao.
"MarkRed" <
con...@libero.it
> ha scritto nel messaggio
news:UYU68.7510$5M4.2...@twister2.libero.it...



title: Valore predefinito........

text:
"Arilolo" <
ari...@inwind.it
> ha scritto nel messaggio
news:NoW68.7971$5M4.2...@twister2.libero.it...
> Tanto per assicurarti che i riferimenti funzionino prova a fare una cosa
di
> questo tipo
>
> Private Sub cognome_BeforeUpdate(Cancel As Integer)
> msgbox Me.COGNOME.DefaultValue
> msgbox "'" & Me.COGNOME.Value & "'"
> End Sub
>
> In questo modo ti compaiono due messaggi, uno con il valore predefinito
> correntemente impostato e uno con quello che dovrebbe sostituirlo.
> Comunque, adesso che ci faccio caso, secondo me l'evento non è quello
> giusto. Se non ricordo male dovrebbe essere Prima di inserire nelle
> proprietà della maschera, in modo che prima di salvare il record ti
imposti
> anche il valore predefinito. Come l'hai fatto tu lo imposta prima che tu
> inserisca un valore nel campo. Forse è quello... se ho capito bene quello
> che hai fatto.
> Ciao ciao.
>
Allora, se vado sul campo cognome, il quale è ancora vuoto e non vedo nessun
valore predefinito, e, per esempio, premo barra spaziatrice, mi compaiono
gli msgbox, ma di aggiornare il campo non se ne parla.
Cosa c'è che non va?
Grazie ancora.
Marco.


title: Valore predefinito........

text:
Allora impostalo su Dopo aggiornamento nelle proprietà del controllo.
Secondo me è molto più logico... però mi sono fidato di quello che ho letto
questa mattina, ammesso che me lo ricordi bene.
Fammi sapere!
Ciao ciao
"MarkRed" <
con...@libero.it
> ha scritto nel messaggio
news:wCW68.8049$5M4.2...@twister2.libero.it...



title: Valore predefinito........

author: Mark Red

text:
"Arilolo" <
ari...@inwind.it
> wrote in message
news:e0X68.9126$nI1.2...@twister1.libero.it...
> Allora impostalo su Dopo aggiornamento nelle proprietà del controllo.
> Secondo me è molto più logico... però mi sono fidato di quello che ho letto
> questa mattina, ammesso che me lo ricordi bene.
> Fammi sapere!
> Ciao ciao
>
Scusa,ma se sto per inserire un nuovo record il campo in questione
dovrebbe
già essere aggiornato al valore del precedente record quindi,
cosa devo aggiornare se sul quel campo io non devo fare nulla
se non altro confermare, passando al record successivo,
il valore che è stato precedentemente stabilito?
Comunque ho provato sull'evento AfterUpdate ma, giustamente,
non funziona.
Saluti, Marco.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Valore predefinito........

text:
Anche quello è vero!!!
Allora, io ho provato e mi funziona assegnandolo all'evento "Dopo
inserimento" nelle proprietà della maschera. Solo che funziona soltanto dopo
l'inserimento di un nuovo record. Da quel momento in poi funziona
perfettamente. Chiudendo la maschera però il valore predefinito viene
perso... quindi basterebbe salvare il valore predefinito.
Altrimenti, se vogliamo risolverla a modo mio, assegni all'evento "Prima di
inserire" della maschera questa routine:
Private sub form_beforeinsert()
dim defval as string 'o quello che è
docmd.gotorecord acdataform, "maschera", acprevious
defval =me.[tuocontrollo]
docmd.gotorecord acdataform, "maschera", acnext
me.[tuocontrollo]=defval
end sub
Non sarà forse il massimo ma l'ho testata e funziona sempre perfettamente.
Sarebbe interessante comunque sapere, se qualcuno che sta seguendo la
vicenda lo sapesse, come si fa a salvare nella maschera le modifiche
apportate con routine. Io ho provato con docmd.save acform, "maschera" ma
nono funziona.
Ciao ciao!
"Mark Red" <
con...@libero.it
> ha scritto nel messaggio
news:1a1ba823b6b0add3999...@mygate.mailgate.org...



title: Valore predefinito........

text:
Vedi se ti piace in questo modo:
Private Sub Form_Open(Cancel As Integer)
Me.COGNOME.DefaultValue = "'" & Me.COGNOME.Value & "'"
End Sub
Funziona alla perfeziona!!!!!! Prova anche tu cosě, magari, vediamo qualche
"bug"
Ciao.
Marco.


title: Valore predefinito........

text:
"MarkRed" <
con...@libero.it
> ha scritto nel messaggio
news:K5Z68.8729$5M4.2...@twister2.libero.it...
> Vedi se ti piace in questo modo:
>
> Private Sub Form_Open(Cancel As Integer)
> Me.COGNOME.DefaultValue = "'" & Me.COGNOME.Value & "'"
> End Sub
>
> Funziona alla perfeziona!!!!!! Prova anche tu così, magari, vediamo
qualche
> "bug"
>
> Ciao.
> Marco.
>
>
>
Anche!
Però prima devi andare all'ultimo record o no?
Magari l'hai già fatto...
Però ho il dubbio che anche il tuo primo record abbia in quel campo il
valore che ti interessa come valore predefinito e non ti sei accorto del
problema.
Dimmi se sono in errore o se il mio dubbio è fondato.
Ciao ciao!


title: Valore predefinito........

text:
"MarkRed" <
con...@libero.it
> ha scritto nel messaggio
news:K5Z68.8729$5M4.2...@twister2.libero.it...
> Vedi se ti piace in questo modo:
>
> Private Sub Form_Open(Cancel As Integer)
> Me.COGNOME.DefaultValue = "'" & Me.COGNOME.Value & "'"
> End Sub
>
> Funziona alla perfeziona!!!!!! Prova anche tu così, magari, vediamo
qualche
> "bug"
>
> Ciao.
> Marco.
>
>
>
Ma poi, toglimi una curiosità... cosa ti spinge a smanettare con access fino
alle 22.56 di un sabato sera come questo?
Pensavo di essere io il malato di access che pensa ai suoi crucci di codice
durante tutta la giornata e quando arriva a casa testa tutte le intuizioni
che gli sono venute in mente e che ci pensa anche in momenti molto più
inopportuni che sul lavoro. Quando non riesco a fare qualcosa mi impunto
fino a quando non ci riesco... sono più cocciuto di... non so cosa! Comunque
oggi sono a casa perché ammalato... ma tu? Sei ammalato anche tu?
Il tutto con simpatia!
A me passa più velocemente il tempo se ci sono persone come te che scrivono
anche a quest'ora.
Comunque, se decidessi di andare a letto... buonanotte!
Ciao ciao!


title: Valore predefinito........

text:
"Arilolo" <
ari...@inwind.it
> ha scritto nel messaggio
news:kbZ68.9835$nI1.2...@twister1.libero.it...

> Hai ragione!!!!!!!! me ne sono accorto solo adesso!!!! inserisce, per
default, il primo record e non l'ultimo.....mannaggia!!!!
E come si fa?????
Marco.


title: Valore predefinito........

text:
"Arilolo" <
ari...@inwind.it
> ha scritto nel messaggio
news:giZ68.9864$nI1.2...@twister1.libero.it...

Sono in vacanza "forzata" e sono fuori sede assieme a mia madre. Sono
costretto a rimanere in casa, tutto qui, e felicemente smanetto in Access
fino a tardi.
Ciao. :-)


title: Valore predefinito........

text:
"MarkRed" <
con...@libero.it
> ha scritto nel messaggio
news:GjZ68.8793$5M4.2...@twister2.libero.it...

Allora, vedo che vuoi fare le ore piccole!
Da parte mia, ho paura che vengano a dirmi per l'ennesima volta che se sto
sempre al computer non guarirò mai! Quindi tra un po' spengo.
Menate a parte,
Private Sub Form_Open(Cancel As Integer)
docmd.gotorecord acdataform, "maschera", aclast
Me.COGNOME.DefaultValue = "'" & Me.COGNOME.Value & "'"
docmd.gotorecord acdataform, "maschera", acnewrec   ' vedi PS
End Sub
Ps: questa la metti solo se non ti piace che quando apri la maschera si
posizioni sull'ultimo record.In alternativa puoi sostituire acnewrec (nuovo
record) con acfirst. Comunque non appena digiti la virgola ti propone i vari
parametri disponibili, basta solo scegliere quello che ti piace di più.


title: Valore predefinito........

text:
Io stacco, altrimenti mi arriva una bolletta!
Ciao e buonanotte.
Ci sentiamo alle prossime... per modo di dire!
"Arilolo" <
ari...@inwind.it
> ha scritto nel messaggio
news:QzZ68.9954$nI1.2...@twister1.libero.it...



title: Valore predefinito........

text:
Buongiorno!
Sai, questa notte, vittima degli effetti collaterali degli antibiotici
(insonnia, nausea e dolori intestinali), ho pensato che il tuo valore
predefinito non dovrebbe funzionare ancora come si deve, perché viene
impostato all'apertura della maschera e quindi, se tu inserisci più record e
cambi il valore in quel campo, continuera comunque a proporti quello
impostato all'apertura. O sbaglio?
Forse ci hai già pensato, comunque in caso basta mettere quello che ti avevo
scritto... aspetta, vado a cercarlo...
private sub form_afterinsert ()    'o afterupdate, forse va meglio
Me.COGNOME.DefaultValue = "'" & Me.COGNOME.Value & "'"
Exit sub
Con afterupdate se modifichi un record, compreso il tuo campo ormai famoso,
ti viene comunque aggiornato il valore predefinito.
Spero che questa sia la volta buona.
Ciao ciao!
"Arilolo" <
ari...@inwind.it
> ha scritto nel messaggio
news:jKZ68.9982$nI1.2...@twister1.libero.it...



title: Valore predefinito........

text:
Funziona tutto bene ma molto meglio se inserisci la stessa routine anche
nell'evento "DopoAggiornamento" della maschera. Essenziale se devi
aggiungere più records.
Ciao.
Marco.


title: Valore predefinito........

text:
Buongiorno anche a te.
comunque, forse non hai visto il mio ultimo messaggio, la routine messa
sull'evento all'apertura della maschera e sull'evento dopo aggiornamento,
funziona che č una favola. Era quello che volevo e, cioč, ogni volta che
devo inserire un nuovo record o ogni volta che devo aprire la maschera
d'inserimento voglio che mi visualizzi, per default, l'ultimo nominativo del
record precedente. Finalmente pare che abbiamo risolto o ci sono altri
problemi?
Grazie.
Marco.


title: Valore predefinito........

text:
"MarkRed" <
con...@libero.it
> ha scritto nel messaggio
news:6M978.11725$nI1.3...@twister1.libero.it...

Perfetto!
Ci abbiamo messo un bel po'... ma alla fine...
Il fatto č che non ho mai provato a farlo,
a parte il test che ho fatto con il mio metodo,
e cosě i problemi scaturivano di messaggio in
messaggio, ogni volta un nuovo particolare
che non andava!
Comunque... sbagliando si impara.
Ciao ciao!


title: Sospendere esecuzione codice di un pulsante

author: Franco

text:
Ciao a tutti. Ho un piccolo problema con il codice che ho scritto
sull'evento click di un pulsante di una form.
In pratica, quando premo il pulsante, voglio aprire una form in cui l'utente
deve scegliere un'opzione. Sulla base della scelta dell'utente, il codice
continua la sua esecuzione in modo differente a seconda della scelta fatta
dall'utente.
Ho provato cosi':
Private Sub cmdGeneraScheda_Click()
...codice iniziale...
docmd.OpenForm "frmSceltaScheda"
...codice per scelta 1
...codice per scelta 2
...codice per scelta 3
End Sub
il problema è che quando si apre la form frmSceltaScheda, il codice dovrebbe
fermarsi per aspettare la scelta dell'utente, invece cosi' l'esecuzione
continua ma ovviamente la routine non funziona perche' ad un certo punto mi
va in errore, mancando un parametro.


author: Karl Donaubauer

text:

Arrestare l'esecuzione del codice per dialogo
www.donkarl.com/it?FAQ6.9
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: visibilità condizionata

author: eggpap

text:
Vorrei sapere se è possibile, per ciascun record di una maschera o
sottomaschera, condizionare la
visibilità di un controllo al valore di un campo. Per esempio, come nel mio
caso, nascondere/visualizzare una casella
di opzione (associata ad un campo logico) quando il valore di un secondo
campo è diverso/uguale ad un certo valore.
Ho provato con l'evento su corrente, ma non funziona con la modalità che
vorrei usare di visualizzazione maschere continue.
Grazie mille,
Emiliano


title: visibilità condizionata

text:
In modaltià maschere continue devi usare la Formattazione
condizionale...!
Nel tuo caso usa gli stessi colori dello Sfondo associati al Criterio e
vedrai che sparisce.
@Alex


title: visibilità condizionata

text:
Sei stato di grande aiuto, ma la formattazione condizionata ha risolto solo
in parte il mio problema. Mi sembra di aver capito che, purtroppo non si
applica ad una casella di controllo e quindi ho dovuto usare con una casella
combinata, ma l'unica cosa che sono riuscito ad ottenere è lo stato di
disattivazione quando il criterio è soddisfatto e non la completa
invisibilità del controllo. Voglio precisare che con la non visibilità del
controllo l'interfaccia sarebbe molto più chiara, ma anche così funziona. Ti
ringrazio.
Emiliano
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:1143653134....@u72g2000cwu.googlegroups.com...



title: visibilità condizionata

text:
Mi sembra di aver capito che, purtroppo non si
applica ad una casella di controllo e quindi ho dovuto usare con una
casella
combinata, ma l'unica cosa che sono riuscito ad ottenere è lo stato di
disattivazione quando il criterio è soddisfatto e non la completa
invisibilità del controllo.
[RISPOSTA]
Direi di no, è applicabile benissimo anche ad una TextBox, se imposti
i colori
uguali a quelli dello sfondo diventa NonVisibile....!
Voglio precisare che con la non visibilità del
controllo l'interfaccia sarebbe molto più chiara, ma anche così
funziona. Ti
ringrazio.
[Come sopra.]
Emiliano
CIao
@Alex


title: VBA: uscire da Do until...

author: ringo

text:
Salve  a tutti,
come posso fare al verificarsi di una condizione
uscire dalle istruzioni interne ad un ciclo Do until
e passare al record successivo?
grazie!
ringo


title: VBA: uscire da Do until...

author: Paolo opg

text:
"ringo" <
ri...@tiscali.it
> wrote in message
news:b0lk0h$t44$1...@serv1.albacom.net...

a memoria non mi ricordo, ma se pigi F1 evidenziando la parola "do", oppure
la cerchi nell'help in linea, trovi anche gli esempi.


title: VBA: uscire da Do until...

text:
"ringo" <
ri...@tiscali.it
> ha scritto nel messaggio
news:b0lk0h$t44$1...@serv1.albacom.net...

Exit Do
Ciao, Carlo


title: Problema di elaborazione

author: Alessandro Cara

text:
Il problema che pongo non riguarda strettamente access e' un generico
problema di elaborazione dati.

Noi abbiamo un numero di questa tipo 2^2^n + 1 (Numero di Fermat) e sono
interessato a valori di n compresi fra 5 e 25 (cio' significa un numero
di bit compreso fra 33 e 33554433) Su questi "numeri" devo fare una
operazione di modulo di questa natura 2^(2^n/2) % (k*2^(n+2) + 1) con k
= progressivo a partire da 1.
Al di la dei tempi "teorici" richiesti come, praticamente, risolvereste
il problema?

--

ac (x=y-1) e non uso il KillFile.
La violenza e' l'ultimo rifugio degli incapaci (Salvor Hardin)


title: Problema di elaborazione

text:
Che ci devi fare con il numero di Format. ..? Se non ricordo male hanno già dimostrato che ha detto una calzata. ...per n>5.... tant'è che quei primi prima li schifi pure tu...!

Scherzi a parte non capisco il senso della domanda... o meglio do per scontato che i problemi siano 2.
1 Il numero di Bit non gestibile in modo nativo
2 La precisione per gli arrotondamenti in virgola mobile

Se, e dico se per ovvie ragioni di ignoranza mia, erano i problemi ai quali accennavo..... non ci siano molte possibilità.... se non usare gruppi di Decimal ed applicare i vecchi concetti dell'assembler per ricostruire il calcolo finale.
Ma sei certo non sia meglio usare una Lib di MathLab o simili da istanziare se non direttamente tramite dll Wrapper scritta in vb6 o in c se riesci...?

Dicci cosa vi fai con queste supposte matematiche...
@alex


title: Problema di elaborazione

text:
Il 03/12/2013 6.33, @Alex ha scritto:
> Che ci devi fare con il numero di Format. ..? Se non ricordo male hanno gi� dimostrato che ha detto una calzata. ...per n>5.... tant'� che quei primi prima li schifi pure tu...!

ED infatti li ho chiamati "Numeri di Fermat" ;-)

BY the way i fattori di F_5 (2^32 + 1) sono 641 e 6700417 (li conosco a
memoria) ;-)
>
> Scherzi a parte non capisco il senso della domanda... o meglio do per scontato che i problemi siano 2.
> 1 Il numero di Bit non gestibile in modo nativo

Yes!

> 2 La precisione per gli arrotondamenti in virgola mobile

Non mi interessa la virgola. Il "lavoro" e' sugli interi. Mi interessa
il /resto/ , che si puo' ottenere /senza/ uso della divisione,
soprattutto se si lavora direttamente sul /binario/ (intendo sistema di
numerazione e non quello utilizzato dai treni)
La /routinetta/  che mi trasforma una /stringa/ numerica decimale -
qualsiasi lunghezza - in /stringa/ binaria (o esadecimale), in un
momento di lucidita', la ho gia' scritta

>
> Se, e dico se per ovvie ragioni di ignoranza mia, erano i problemi ai quali accennavo..... non ci siano molte possibilit�.... se non usare gruppi di Decimal ed applicare i vecchi concetti dell'assembler per ricostruire il calcolo finale.
> Ma sei certo non sia meglio usare una Lib di MathLab o simili da istanziare se non direttamente tramite dll Wrapper scritta in vb6 o in c se riesci...?

E' sicuro che usare Mathlab o Mathematica e' meglio ma io sono un
/rozzo/ artigiano con pochi mezzi a disposizione, poca voglia di
lavorare, residui momenti di lucidita' e di un autarchismo sfrenato   ;-)

>
> Dicci cosa vi fai con queste supposte matematiche...

E' diventato un mio /pallino/ e vorrei aiutare un matematico in
difficolta:
http://www.prothsearch.net/fermat.html
   ;-)
E vorrei stressare un po' Access fino a che non dichiari la sua impotenza

Ciao Alex!



title: Problema di elaborazione

author: Bruno Campanini

text:
Alessandro Cara submitted this idea :
> Il problema che pongo non riguarda strettamente access e' un generico
> problema di elaborazione dati.
>
> Noi abbiamo un numero di questa tipo 2^2^n + 1 (Numero di Fermat) e sono
> interessato a valori di n compresi fra 5 e 25 (cio' significa un numero di
> bit compreso fra 33 e 33554433) Su questi "numeri" devo fare una operazione
> di modulo di questa natura 2^(2^n/2) % (k*2^(n+2) + 1) con k = progressivo a
> partire da 1.
> Al di la dei tempi "teorici" richiesti come, praticamente, risolvereste il
> problema?

Guarda che VBA, anche coi LongLong da poco implementati
(9 223 372 036 854 775 807),
non arriva a F6 (18 446 744 073 709 551 617).
Mentre F25 ï¿œ formato da olre 10 milioni di cifre...
Credo che non vi sia luogo a procedere.

Mathematica ce la farebbe... perï¿œ io non ho capito bene
le successive operazioni di modulo da farsi su ciascuno degli F,
per k variabile da 1 a...?

Bruno


title: Problema di elaborazione

text:
Il 03/12/2013 15.46, Bruno Campanini ha scritto:
> Alessandro Cara submitted this idea :
>> Il problema che pongo non riguarda strettamente access e' un generico
>> problema di elaborazione dati.
>>
>> Noi abbiamo un numero di questa tipo 2^2^n + 1 (Numero di Fermat) e
>> sono interessato a valori di n compresi fra 5 e 25 (cio' significa un
>> numero di bit compreso fra 33 e 33554433) Su questi "numeri" devo fare
>> una operazione di modulo di questa natura 2^(2^n/2) % (k*2^(n+2) + 1)
>> con k = progressivo a partire da 1.
>> Al di la dei tempi "teorici" richiesti come, praticamente,
>> risolvereste il problema?
>
Ciao Bruno.

> Guarda che VBA, anche coi LongLong da poco implementati
> (9 223 372 036 854 775 807),
> non arriva a F6 (18 446 744 073 709 551 617).

il mio /vecchio/ a2003 si "incazza" intorno a 2^50

> Mentre F25 ï¿œ formato da olre 10 milioni di cifre...

esattamente 33554433 bits che grosso modo fanno 10Mega decimali  ;-)

> Credo che non vi sia luogo a procedere.

Nella legge italiana ed in informatica un "luogo" a procedere in qualche
modo lo si trova  ;-)

In fondo si tratta, forse, di reinventare l'acqua calda, cioe',
reimplementare la funzione di addizione direttamente sulle stringhe
carattere. In binario e' piuttosto semplice.
Come te per le "tabelle pivot" lo sto facendo principalmente per scopi
/didattici/

Mi ricordo ancora le facce /allibite/ di alcuni miei /studenti/ quando
gli ho chiesto, dopo solo un paio di lezioni, di rifare la calcolatrice
di windows  per le quattro operazioni di base ;-)

>
> Mathematica ce la farebbe... perï¿œ io non ho capito bene
> le successive operazioni di modulo da farsi su ciascuno degli F,
> per k variabile da 1 a...?

(k*2^(n+2) + 1) sono i soli divisori possibili per un numero di Fermat
i.e. 641=b 10.10000001=5*2^(5+2) + 1 | F_5
e, i divisori, sono /tutti/ congruenti -1 in 2^2^n (mi sono sbagliato in
2^(2^n/2) c'e' un'altra cosa che serve, eventualmente, per verificare la
divisibilita')
Sto parlando, ovviamente, delle classi resto modulo



title: Problema di elaborazione

text:
Alessandro Cara used his keyboard to write :

>> Guarda che VBA, anche coi LongLong da poco implementati
>> (9 223 372 036 854 775 807),
>> non arriva a F6 (18 446 744 073 709 551 617).
>
> il mio /vecchio/ a2003 si "incazza" intorno a 2^50
>
>> Mentre F25 ï¿œ formato da olre 10 milioni di cifre...
>
> esattamente 33554433 bits che grosso modo fanno 10Mega decimali  ;-)
Come fai determinare quei 33 554 433 bits?
>
>> Credo che non vi sia luogo a procedere.
>
> Nella legge italiana ed in informatica un "luogo" a procedere in qualche modo
> lo si trova  ;-)
> In fondo si tratta, forse, di reinventare l'acqua calda, cioe',
> reimplementare la funzione di addizione direttamente sulle stringhe
> carattere. In binario e' piuttosto semplice.
> Come te per le "tabelle pivot" lo sto facendo principalmente per scopi
> /didattici/
Sï¿œ capisco, perï¿œ occorre uno strumento che consenta di sfruttare ad
libitum tutta la RAM fisica e tutta la RAM virtuale (HD) disponibili.
E tale strumento (linguaggio) non sarï¿œ certo il VBA.
Solo per memorizzare una stringa da 10Mby in A2003 occorrono oltre 150
campi memo.
Curiositï¿œ: per stampare un numero da 10Mega cifre sui vecchi fogli
protocollo (quelli fincati che potevano essere compilati con max 25
righe da 47 caratteri cadauna), occorrerebbero oltre 8500 fogli...

Credo che sarebbe giï¿œ un'impresa maneggiare un numero di qualche decina
di migliaia di cifre.

Comunque, auguri... e figli gay.

Bruno


title: Problema di elaborazione

text:
Il 04/12/2013 10.19, Bruno Campanini ha scritto:
> Alessandro Cara used his keyboard to write :
>
>>> Guarda che VBA, anche coi LongLong da poco implementati
>>> (9 223 372 036 854 775 807),
>>> non arriva a F6 (18 446 744 073 709 551 617).
>>
>> il mio /vecchio/ a2003 si "incazza" intorno a 2^50
>>
>>> Mentre F25 ï¿œ formato da olre 10 milioni di cifre...
>>
>> esattamente 33554433 bits che grosso modo fanno 10Mega decimali  ;-)
> Come fai determinare quei 33 554 433 bits?

2^25 + 1

2^3 sono quattro bits 1000
2^8 sono 9 bits 1.00000000

(2^25 + 1) * ln(2)/ln(10) = 10 100 891 (numero cifre  decimali) che si
riducono a 8 388 609 se li si scrive esadecimali (questi sono bytes)
Per tutte le numerazioni se li si scrive /binarizzati/ sono 2^22 + 1
bytes (4 194 305)

>>
>>> Credo che non vi sia luogo a procedere.
>>
>> Nella legge italiana ed in informatica un "luogo" a procedere in
>> qualche modo lo si trova  ;-)
>> In fondo si tratta, forse, di reinventare l'acqua calda, cioe',
>> reimplementare la funzione di addizione direttamente sulle stringhe
>> carattere. In binario e' piuttosto semplice.
>> Come te per le "tabelle pivot" lo sto facendo principalmente per scopi
>> /didattici/
> Sï¿œ capisco, perï¿œ occorre uno strumento che consenta di sfruttare ad
> libitum tutta la RAM fisica e tutta la RAM virtuale (HD) disponibili.
> E tale strumento (linguaggio) non sarï¿œ certo il VBA.
> Solo per memorizzare una stringa da 10Mby in A2003 occorrono oltre 150
> campi memo.

O un file sequenziale da 10Mega, robetta! ;-)
Ho tenuto in memoria roba molto piu' grossa senza grandi problemi
E non dovrebbe servire neanche /averlo/ in fondo e' un 1 seguito da
tutti zeri (ed un 1 in fondo), discorso diverso e' per gli eventuali
divisori o se si vuole /mantenere/ lo stato della elaborazione per
esecuzione a /pezzi/.
L'unico problema del VBA e' che non consente di agire, in modo
immediato, sul singolo bit.



title: Problema di elaborazione

text:
Spiega meglio l'ultima affermazione.
Quando all'inizio io lo chiamai Format, che è stata l'autocorrezione della tastiera Samsung (ero in quel di Bangkok) era inteso giusto ma in senso letterario...! FORMAT. ..

@ALEX


title: Problema di elaborazione

text:
Il 04/12/2013 21.19, @Alex ha scritto:
> Spiega meglio l'ultima affermazione.
> Quando all'inizio io lo chiamai Format, che � stata l'autocorrezione della tastiera Samsung (ero in quel di Bangkok) era inteso giusto ma in senso letterario...! FORMAT. ..
>
> @ALEX
>

Non ho capito nulla!
Che intendi con ultima affermazione,ce ne sono almeno tre nell'ultimo quote
1) File sequenziale
2) Non necessita' di memorizzare il Fermat Number
3) Impossibilita' di VBA di gestire i bits in modo "nativo"

  e cosa centra "Format" ? ....ahhh ho riletto. Avevi scritto "Numero di
Format", avevo fatto la correzione automatica a rovescio ( non mi ero
neanche accorto del cambio di vocale).
Il tuo consiglio finale , se leggo l'ironia, e' "lascia perdere e Format
oltre che dei dischi anche del PC" ;-)

P.S. E per favore non parlarmi di luoghi esotici (o erotici?, tastiera
Samsung! ;-) ) .



title: Problema di elaborazione

text:
di erotico c'era mia moglie che mi dava scappellotti quando giravo la testa...! ;-)

Intendevo la 3°... ma confermo il consiglio finale... tuttavia reputo che l'approccio ASM o elementare sia proprio l'unico da poter valutare.

@Alex


title: valore simultaneo

author: Matteo

text:
ho il seguente problema: in una maschera inserisco un numero in un campo
CAMPO1 e vorrei che mentre digito il numero, in un secondo campo CAMPO2 si
visualizzi il valore che ho sto inserendo nel campo1. In pratica io sono sul
campo1 e digito 3 e vedo 3 sul campo2, ma se dopo il tre inserisco 4 vedo 34
sul campo2. spero di essere stato chiaro. grazie


title: valore simultaneo

author: ALESSANDRO Baraldi

text:
"Matteo" <
gestser...@uno.it
> ha scritto nel messaggio
news:qoV0d.239281$OR2.10...@news3.tin.it...

Nelle Maschere non ci sono CAMPI, ma Controlli(eventualmente associati a
Campi)
Se non ho capito male č cosě.....
Su KeyPress della TextBox1 scrivi nella TetxBox2
Private Sub TextBox1_KeyPress(KeyAscii As Integer)
    me.TextBox2=chr(keyAscii)
End Sub
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: valore simultaneo

text:
> Se non ho capito male č cosě.....
>
> Su KeyPress della TextBox1 scrivi nella TetxBox2
>
> Private Sub TextBox1_KeyPress(KeyAscii As Integer)
>     me.TextBox2=chr(keyAscii)
> End Sub
>
> Ciao
>
> --
> @Alex (Alessandro Baraldi)
> --------------------------------------------------------------------------
-
>
http://www.sitocomune.com/
>
http://www.mantuanet.it/alessandro.baraldi/
> --------------------------------------------------------------------------
-
>
>
il problema é che se digito 1 su textbox1 vedo 1su textbox2, ma se dopo l'1
digito 2 per scrivere 12 su textbox2 vedo solo 2 e non piů l'1
grazie
ciao


title: valore simultaneo

text:
"Matteo" <
gestser...@uno.it
> ha scritto nel messaggio
news:GJ01d.306196$5D1.13...@news4.tin.it...
>
> > Se non ho capito male č cosě.....
> >
> > Su KeyPress della TextBox1 scrivi nella TetxBox2
> >
> > Private Sub TextBox1_KeyPress(KeyAscii As Integer)
> >     me.TextBox2=chr(keyAscii)
> > End Sub
> >
> > Ciao
> >
> > --
> > @Alex (Alessandro Baraldi)
> >
> il problema é che se digito 1 su textbox1 vedo 1su textbox2, ma se dopo
l'1
> digito 2 per scrivere 12 su textbox2 vedo solo 2 e non piů l'1
> grazie
> ciao
>
Era quello che avevo capito dovessi fare...!!
 Private Sub TextBox1_KeyPress(KeyAscii As Integer)
     me.TextBox2=me.TextBox2 & chr(keyAscii)
 End Sub
Ciao.



title: casella di teso.

author: Rimo

text:
Se da codice voglio controllare il bloccaggio di una casella di testo
(non l'abilitazione), quale proprietà uso??
Perchè se una casella è bloccata, non la posso disabilitare..Perciò
vorrei sapere da codice come si fa a sbloccare e poi in seguito a
ribloccare una casella di testo!
Inviato da
www.mynewsgate.net


title: casella di teso.

text:
"Rimo" <61...@mynewsgate.ned.invalid> ha scritto
nel messaggio
news:200404091...@mynewsgate.net...

tuacasella.locked = true
e ovviamente false
MAssimiliano


title: casella di teso.

author: Roberto da casa

text:
"Rimo" <61...@mynewsgate.ned.invalid> ha scritto nel messaggio
news:200404091...@mynewsgate.net...

Vai sull'help e leggi l'argomento Proprietà Abilitato, Bloccato (italiano).
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Fatture... Aiuto Urgentissimo (sono ignorante)

author: Fiac

text:
Per emettere una fattura vorrei collegare il mio db access (.adp) con word
tramite una stampa unione. Il problema è questo
Devo stamptare le informazioni di fatturazione del cliente (provenienti da
una tabella indirizzi di fatturazione) e l'elenco di tutti i prodotti
acquistati (proveniente da una tabella ordini)
ho creato una procedura che esporta i dati in un file di testo delimitato da
;
il problema è il seguente:
o esporto in questo file una riga per ogni prodotto acquistato, ripetendo
sempre i dati di datturazione del cliente per la fattura (questo comporta
che word crea una fattura disitinta per ogni prodotto)
oppure esporto i dati di intestazione della fattura (indirizzo partita iva
ecc.) in un file e l'elenco dei prodotti in un altro file, ma non so come
fare in modo che finiscano sulla stassa pagina.
elenco di seguito un esempio dei dati che devo stampare
Sig. pinco pallino, via X città Y
P.iva :
3209384234
prodotto 1, quantita prezzo
prodotto 2 , quantita prezzo
.........
Vi ringrazio fin d'ora perchè sono veramente impicciato in questa storia
p.s. volevo utilizzare questa strada perchè ho bisogno di modificare
manualmente la fattura, cosa non possibile se esport un report in snapshot.
Se esporto un record in rtf non prende le linee e le immagini, e nemmeno in
html mi mette le immagini. che posso fare?


text:
"Fiac" <
fabio...@hotmail.com
> ha scritto nel messaggio
news:jzio8.79057$%g7.25...@twister2.libero.it...

Forse faresti meglio a fare il modulo della fattura con un report se
l'impaginazione dei dati è fissa.
in questo modo hai rispolto i tuoi problemi senza usare word.


author: Namor

text:
Si, è più facile usare un report.
Però puoi anche usare comandi DDE per aprire Word e spedirgli i dati del
cliente e una ad una tutte le righe dei dettagli della fattura. In questo
caso devi avere un riferimento (Strumenti-->Riferimenti) alla libreria di
oggetti di Microsoft Word, definire due oggetti, di tipo Word.Application e
Word.Document, per gestire l'invio dei dati.
Se fatto bene, puoi arrivare a vedere aprire Word e comparire i dati riga a
riga come se venissero digitati da tastiera. Fa molta scena e raggiunge il
risultato. (puoi anche rendere word visibile solo DOPO aver passato i dati,
eviti la parte "scenografica"!)
-Marco-
"Fiac" <
fabio...@hotmail.com
> ha scritto nel messaggio
news:jzio8.79057$%g7.25...@twister2.libero.it...



author: Antonio Biso

text:
Namor <
na...@inwind.it
> wrote in message
wimo8.80085$%g7.25...@twister2.libero.it...
> Si, č piů facile usare un report.
Scrivi DOPO IL QUOTING!!!
Antonio


text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:Mboo8.80766$%g7.25...@twister2.libero.it...
> Namor <
na...@inwind.it
> wrote in message
> wimo8.80085$%g7.25...@twister2.libero.it...
> > Si, è più facile usare un report.
>
> Scrivi DOPO IL QUOTING!!!
>
> Antonio
>
>
Scusa Antonio, avevo visto anche il msg precedente, ma non avevo capito cosa
intendessi!
Per le prossime farò il bravo!  ;-)
Ciao.


text:
Namor <
na...@inwind.it
> wrote in message
iZFo8.86594$1S3.2...@twister1.libero.it...

Ok, perfetto!
Antonio


title: Autoexec per riallegare tabelle BE

author: Opera

text:
Ho già postato su microsoft.public.it.office.access ma non avendo trovato
aiuto, riposto qui.
Sul sitocomune ho trovato la seguente funzione:
Public Function CollegaTabelle()
  Dim Catalogo As New ADOX.Catalog
  Dim Tabella As ADOX.Table
  Dim Prop As ADOX.Property
  Dim Dir As String
  Catalogo.ActiveConnection = CurrentProject.Connection
  Dir = CurrentProject.FullName
  Dir = Replace(Dir, "FE.mdb", "BE.mdb")
  For Each Tabella In Catalogo.Tables
    If Tabella.Type = "LINK" Then
      Set Prop = Tabella.Properties("Jet OLEDB:Link Datasource")
      Prop.Value = Dir
    End If
  Next Tabella
  Set Catalogo = Nothing
End Function
Chiamo questa funzione con una macro autoexec all'avvio di access.
Il fatto è che, quando sposto il FE e il BE in una diversa directory, access
al primo avvio mi restituisce l'errore
 "Impossibile trovare il file: C:\....\be.mdb"
Solo dopo questo primo errore l'apertura del pannello comandi avviene senza
problemi (e così le successive aperture).
E' possibile intercettare l'errore generato dall'applicativo in fase di
apertura? Se sì, in che modo?
L'errore sta nella macro? Le sua struttura è la seguente:
Nome macro: Autoexec
Azione: EseguiCodice
Nome funzione: CollegaTabelle() (la funzione sta dentro un modulo bas).
Nel frattempo, ho provato ad inserire uno Stop nella funzione
CollegaTabelle(). Questo mi ha persmesso di verificare che il msg di errore
è generato prima del running della funzione stessa.
Grazie per qualsiasi aiuto.


title: Autoexec per riallegare tabelle BE

author: Sib

text:
"Opera" <
kronos...@virgilio.it
> ha scritto nel messaggio
> Ho già postato su microsoft.public.it.office.access ma non avendo trovato
> aiuto, riposto qui.
>
> Sul sitocomune ho trovato la seguente funzione:
>
> Public Function CollegaTabelle()
>  Dim Catalogo As New ADOX.Catalog
>  Dim Tabella As ADOX.Table
>  Dim Prop As ADOX.Property
>  Dim Dir As String
>
>  Catalogo.ActiveConnection = CurrentProject.Connection
>  Dir = CurrentProject.FullName
>  Dir = Replace(Dir, "FE.mdb", "BE.mdb")
>
>  For Each Tabella In Catalogo.Tables
>    If Tabella.Type = "LINK" Then
>      Set Prop = Tabella.Properties("Jet OLEDB:Link Datasource")
>      Prop.Value = Dir
>    End If
>  Next Tabella
>
>  Set Catalogo = Nothing
> End Function
>
> Chiamo questa funzione con una macro autoexec all'avvio di access.
>
> Il fatto è che, quando sposto il FE e il BE in una diversa directory,
> access
> al primo avvio mi restituisce l'errore
>
> "Impossibile trovare il file: C:\....\be.mdb"
In corrispondenza di quale istruzione?
Esegui altre funzioni o apri maschere prima di questa?
Sib
--
http://www.gestionedati.com


title: Autoexec per riallegare tabelle BE

author: Alessandro Baraldi

text:
Non è che hai una Form impostata all'apertura come Form_Avvio che
ha un DataSource in parole povere che è Associata...?
Se fosse così, togli la Form come Form_Avvio ed aprila alla fine
del Relink delle tabelle.
In qualsiasi modo quella funzione non genera errori di quel tipo,
quindi deve provenire
perforza da un'altra azione che fai all'apertura, ed è per questo che
ho ipotizzato
una Form_Avvio Associata.
Saluti
@Alex


title: Autoexec per riallegare tabelle BE

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:1142127459....@i39g2000cwa.googlegroups.com...
Non č che hai una Form impostata all'apertura come Form_Avvio che
ha un DataSource in parole povere che č Associata...?
Se fosse cosě, togli la Form come Form_Avvio ed aprila alla fine
del Relink delle tabelle.
In qualsiasi modo quella funzione non genera errori di quel tipo,
quindi deve provenire
perforza da un'altra azione che fai all'apertura, ed č per questo che
ho ipotizzato
una Form_Avvio Associata.
Era proprio cosě. Sono sempre in debito con te :)
Ciao


title: Mancato aggiornamento record

author: TDK

text:
Salve
Mi succede un cosa strana. Perchï¿œ il db funzioni devo sempre dare il
comando di menu Record > Aggiorna. Per esempio ho fatto una sub che mi
inserisce il nome del fornitore in una casella combinata perï¿œ per
visualizzarlo devo dare il comando di cui sopra, non serve a nulla
impostare comandi requery, repaint ecc. da codice, devo farlo sempre
manualmente da menu. Mi succede anche con un altra casella combinata
che riceve il rowsource via codice (per filtrare l'elenco), perchï¿œ lo
prenda devo fare dare il comando manuale, ï¿œ la prima volta che mi
succede, qualche idea sulla causa?
Per risolvere potrei dare il comando Recor>Aggiorna da codice, ma non
riesco a trovarlo ne nelle macro (per poi convertirla :-) ) ne su
esempi e aiuti qualcuno conosce il comando VBA per eseguire la voce di
menu?
Grazie 1M per l'help


title: Mancato aggiornamento record

author: Karl Donaubauer

text:
TDK wrote:
> Mi succede un cosa strana. Perch� il db funzioni devo sempre dare il
> comando di menu Record > Aggiorna. Per esempio ho fatto una sub che mi
> inserisce il nome del fornitore in una casella combinata per� per
> visualizzarlo devo dare il comando di cui sopra, non serve a nulla
> impostare comandi requery, repaint ecc. da codice, devo farlo sempre
> manualmente da menu. Mi succede anche con un altra casella combinata
> che riceve il rowsource via codice (per filtrare l'elenco), perch� lo
> prenda devo fare dare il comando manuale, � la prima volta che mi
> succede, qualche idea sulla causa?
> Per risolvere potrei dare il comando Recor>Aggiorna da codice, ma non
> riesco a trovarlo ne nelle macro (per poi convertirla :-) ) ne su
> esempi e aiuti qualcuno conosce il comando VBA per eseguire la voce di
> menu?
Siccome non riveli il tuo codice non si puo dire se fai un Requery
all'oggetto e al momento giusto.
La voce di men� puoi chiamare con
RunCommand acCmdRefresh
Ma non � per niente meglio di un proprio Requery alla combo.
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: Non stampa simbolo euro nei report

author: Cristian

text:
Anche se  il tipo di carattere è presente su tastiera , è riconosciuto da
Word excel ecc nei report di access non me lo stampa e nemmeno mi permette
di visualizzarlo a video.
Esiste qualche aggiornamento da scaricare ???
Grazie
Cristian


title: Non stampa simbolo euro nei report

author: CarloCos

text:
"Cristian" <
lu...@italymail.com
> ha scritto nel messaggio
news:99urhh$apo$1...@fe2.cs.interbusiness.it...

Ho provato varie volte a stampare il simbolo dell'Euro e tutto funziona. Ho
usato il font Arial. Da tastiera Alt GR + E.
Che dipenda dalla stampante impostata a solo testo anzichè in grafica?
Facci sapere.
Ciao, Carlo


title: Non stampa simbolo euro nei report

author: Sib dall'ufficio

text:
"Cristian" <
lu...@italymail.com
> ha scritto nel messaggio
news:99urhh$apo$1...@fe2.cs.interbusiness.it...

E' un problema di tipo di carattere. Se il tipo di carattere che scegli non
lo prevede esplicitamente non ti funziona.
Prova con Arial e vedrai che funziona.
Sib


title: Non stampa simbolo euro nei report

author: Fabio Montagner

text:
Verifica il driver della stampante
"CarloCos" <
carloco...@libero.it
> wrote in message
news:E4Dw6.1880$E01.1...@news.infostrada.it...



title: Non stampa simbolo euro nei report

text:
"CarloCos" <
carloco...@libero.it
> ha scritto nel messaggio
news:E4Dw6.1880$E01.1...@news.infostrada.it...

Grazie adesso funziona
Serviva proprio Font arial e driver stampante  adeguato.


title: controllare via codice i controlli in modalità foglio dati

author: Odino Saur

text:
Salve a tutti
ho la necessità di visualizzare dei dati di una form in formato "foglio
dati"
a parte il fatto che le colonne prendono il nome dal nome del controllo e
non dalla caption che gli è stata data.. ci sono un sacco di cose che non mi
tornano...
ad esempio come far sparire una colonna? far rendere il controllo invisibile
a quanto pare è ininfluente!
e l'ordine delle colonne chi lo controlla?
altro casino lo apportano i fogli dati secondari.. come gestirli? sparisce
anche la voce nel menù in alto..
mi sapete dare qualche indicazione?
grazie mille
odino


author: Carlo Costarella

text:
"Odino Saur" <
no...@rispondo.org
> ha scritto nel messaggio
news:b8e3iu$i5t$1...@fata.cs.interbusiness.it...

Per non dilungarmi in spiegazioni ti consiglio di usare il formato "Maschere
Continue" anzichè il foglio dati.
Basta dare un aspetto appropriato ai controlli e nessuno si accorgerà che
non si tratta di un foglio dati. Il tutto con evidenti vantaggi per le cose
che devi fare.
Ciao, Carlo