title: Chiusura Form con effetto restringimento

author: Bruno - S95

text:
Per Access 97.
Mi piacerebbe che in chiusura la maschera avesse un'effetto zoom fino a
scomparire, o effetto simile.
Qualcuno conosce il comando in VBA o altro modo.
Mille grazie .. Bruno


author: ALESSANDRO Baraldi

text:
"Bruno - S95" <
bruno...@tin.it
> ha scritto nel messaggio
news:_mlAb.164968$hV.60...@news2.tin.it...

Il comando non c'è occorre scrivere una Routine.
Ma sei sicuro serva una roba simile.......???
In ogni caso prova qualche cosa del genere non l'ho provata
ma il succo è questo:
Devi calcolarti il rapporto tra i lati poiché non è detto che sia
quadrata, quindi per evitare di farla andare via sbilenca avendo
il rapporto ti basta prendere un lato come riferimento e l'altro
di conseguenza lo dividi per il rapporto.
Dai solo uno sguardo al decremento, andrebbe controllato
che il numero sia divisibile per lo Step oppure andrebbe intercettato
l'errore che potrebbe derivarne........!
Private Sub Riduci ()
    dim x as long
    dim y as long
    dim ratio as long
    dim count as long
    x=Me.indidewidth
    y=me.height
    ratio=x/y
    for count=x to 1 step -10
        movesize me.top,me.left,count,count/ratio
    next
    docmd.close acForm, Me.Name
End sub
Ciao.
@Alex.


text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:br0d77$u34$1...@lacerta.tiscalinet.it...

> ___________________
Per tutti.
Ciao Alessandro, ecco la Routine corretta e provata. Strafunziona.
Private Sub Form_Close()
Dim x As Long
Dim y As Long
Dim ratio As Long
Dim count As Long
x = Me.InsideWidth
y = Me.InsideHeight
ratio = 21 / 6 'x/y
For count = x To 1 Step -1000
DoCmd.MoveSize Me.SelTop, Me.SelLeft, count, count / ratio
Next
End Sub
Ciao .. Bruno


author: francesco

text:

E' applicabile anche a form a tutto schermo? Ho provato ma non funziona
ciao
F
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


text:
"francesco" <
fran...@tin.it
> ha scritto nel messaggio
news:82Z49Z81Z251Y1...@usenet.libero.it...

Non saprei. Io la sub l'ho usata su maschera non a tutto schermo e con bordo
sottile.
prava così.
Ciao ... Bruno


text:
"Bruno - S95" <
bruno...@tin.it
> ha scritto nel messaggio
news:MfZAb.172458$hV.64...@news2.tin.it...
>
[CUT]
> Per tutti.
>
> Ciao Alessandro, ecco la Routine corretta e provata. Strafunziona.
>
>
> Private Sub Form_Close()
>
> Dim x As Long
> Dim y As Long
> Dim ratio As Long
> Dim count As Long
> x = Me.InsideWidth
> y = Me.InsideHeight
> ratio = 21 / 6 'x/y
> For count = x To 1 Step -1000
> DoCmd.MoveSize Me.SelTop, Me.SelLeft, count, count / ratio
> Next
>
> End Sub
>
>
> Ciao .. Bruno
Bene, attenzione che non funziona all'apertura.
In quel caso la questione si complica moltissimo devi intercettare
l'evento Load e dirottarlo su una procedura esterna.
E' la tecnica del SubClassing.
Ciao.
@Alex.


title: popolare tabella1 da tabella2

author: Lucia Naddeo

text:
Sono ancora quì.
ho due tabelle: tab1 e tab2
stessi campi:
comune - provincia - frazione - indirizzo - civico - cap - prefisso -
regione
tab1 8000 voci
tab2 85500 voci
la tab1 contiene i dati di prefisso e regione che in tab2 sono vuoti
come faccio a riempirli (dove i campi [comune] sono uguali) prendendoli da
tab1 ?
Grazie in anticipo
Lucia


title: popolare tabella1 da tabella2

text:
Lucia Naddeo ha scritto:
> Sono ancora quě.





> Grazie in anticipo
> Lucia
Potresti farlo con una query di aggiornamento ma forse č piů facile
reperire il file completo dei comuni d'Italia che puoi trovare in internet.
Ciao Nicola
Guarda l'immagine cliccando
http://attach.mynl.it/img?id=NDMzMg
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: popolare tabella1 da tabella2

text:
Lucia Naddeo ha scritto:
> Sono ancora quě.
> ho due tabelle: tab1 e tab2




> Grazie in anticipo
> Lucia
Potresti farlo con una query di aggiornamento ma forse č piů facile
reperire il file completo dei comuni d'Italia che puoi trovare in internet.
Ciao Nicola
Guarda l'immagine cliccando
http://attach.mynl.it/img?id=NDMzMw



title: popolare tabella1 da tabella2

text:
"Nicola47" <
nicola.bi...@libero.it
> ha scritto nel messaggio
news:ej86di$lih$1...@news.newsland.it...
> Lucia Naddeo ha scritto:
>
>> Sono ancora quì.
>
>> ho due tabelle: tab1 e tab2
>
>> stessi campi:
>> comune - provincia - frazione - indirizzo - civico - cap - prefisso -
>> regione
>
>> tab1 8000 voci
>> tab2 85500 voci
>
>> la tab1 contiene i dati di prefisso e regione che in tab2 sono vuoti
>
>> come faccio a riempirli (dove i campi [comune] sono uguali) prendendoli
>> da
>> tab1 ?
>
>> Grazie in anticipo
>> Lucia
>
>
> Potresti farlo con una query di aggiornamento ma forse è più facile
> reperire il file completo dei comuni d'Italia che puoi trovare in
> internet.
> Ciao Nicola
>
> Guarda l'immagine cliccando
http://attach.mynl.it/img?id=NDMzMg
Ti ringrazio,
ma al di là che la mia tabella contiene 85500 record, dato che ho i cap
anche di
tutte le strade delle principali città italiane,
quello che mi interessa è sapere come fare per popolare una tabella con i
dati di un'altra.
Se mi aiutate...
Lucia


title: popolare tabella1 da tabella2

text:
Lucia Naddeo ha scritto:


> Se mi aiutate...
> Lucia
Devi fare una query di aggiornamento coinvolgendo i campi interessati.
Nella Query di aggiornamento devi mettere le due tabelle è opportuno avere
una chiave univoca (nel caso dei comuni potresti usare il codice Istat)
Le due tabelle sono correlate (join) poi devi specificare i campi da
aggiornare per esempio per il PREFISSO:
CAMPO:      PREFISSO
TABELLA:    TAB2 (è quella da aggiornare)
AGGIORNA A: TAB1!PRESISSO
Ciao
Nicola



title: Tabella in un report "Novellino"

author: news

text:
Ragazzi come faccio a creare una tabella in un report come si chiama
l'oggetto che permette di creare una tabella tipo excel in cui poi posso
andare ad inserire i campi che voglio
un grazie anticipato


title: Tabella in un report "Novellino"

author: Antonio Biso

text:
"news" <
dirkp...@fastwebnet.it
> ha scritto nel messaggio
news:eirOd.36897$2h5....@tornado.fastwebnet.it...
Il subject non č molto significativo...
Antonio


title: Tabella in un report "Novellino"

author: MA

text:
"Antonio Biso" <ch...@NOSPAMetruria.net> ha scritto nel messaggio
news:BEsOd.24684$QG6.4...@twister2.libero.it...
> "news" <
dirkp...@fastwebnet.it
> ha scritto nel messaggio
> news:eirOd.36897$2h5....@tornado.fastwebnet.it...
>
> Il subject non č molto significativo...
NOn č vero č il report dell'allenatore della samp
Piů preciso di cosě
MAssimiliano


title: Tabella in un report "Novellino"

text:
Ma che simpatici questi ragazzi di oggi intanto pero nessuno mi ha dato una
risposta concreta


title: Tabella in un report "Novellino"

text:
"news" <
dirkp...@fastwebnet.it
> ha scritto nel messaggio
news:qxtOd.37155$2h5....@tornado.fastwebnet.it...
> Ma che simpatici questi ragazzi di oggi intanto pero nessuno mi ha dato
una
> risposta concreta
No ma se almeno leggi le risposte che ti danno su tutti i NG
nella quale l'hai postata ti accorgi che manca qualcosa...!!
Saluti
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: Tabella in un report "Novellino"

text: cosa ci manca??


title: Tabella in un report "Novellino"

author: Roberto da casa

text:
"news" <
dirkp...@fastwebnet.it
> ha scritto nel messaggio
news:XbuOd.37214$2h5....@tornado.fastwebnet.it...
> cosa ci manca??
Sicuramente manca un minimo di chiarezza e di proprietà di linguaggio nel
porre il quesito, così che penso sia praticamente impossibile capire a cosa
tu ti riferisca quando parli di un ipotetico oggetto che ti permetta di
creare e popolare una tabella in un report.
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Tabella in un report "Novellino"

text:
"news" <
dirkp...@fastwebnet.it
> ha scritto nel messaggio
news:XbuOd.37214$2h5....@tornado.fastwebnet.it...
> cosa ci manca??
A parte il subject significativo, anche la parte di messaggio a cui rispondi
(quoting)
Antonio


title: ricerca record

author: Osvaldo

text:
Ciao a tutti,
Ho database che ho chiamato "magazzino ricambi" con i seguenti campi:
"Codice"," Codice alternativo","Codice
originale","Descrizione","prezzo",ecc. Ho poi fatto una maschera, nella
quale ho messo i vari controlli che mi necessitano ed una casella combinata
per la ricerca sul campo codice.
Avrei bisogno, che la casella combiata o un controllo simile, possa cercare
un codice nei tre campi "codice" , "codice alternativo" , "Codice Originale"
con una sola ricerca. In modo che se un codice e' presente solo alternativo
o originale si trovi lo stesso.
Grazie.


title: ricerca record

text:
"Osvaldo" <
o.bizzar...@inwind.it
> ha scritto nel messaggio
news:H36y8.12650$W9.3...@twister2.libero.it...

Per costruire una combo che ti dia valori da più campi di una stessa
tabella, devi fare una query di unione con select sui vari campi.
Successivamente, per filtrare col codice selezionato, dovrai fare una query
che abbia in OR il criterio sotto i vari campi.
Secondo me comunque la struttura più corretta per il tuo database sarebbe
stata
magazzino
ID e altre info
Tabella codici
Rif_ID Codice Tipo_Codice
copn relazione uno a molti.
La combo sarebbe stata una query sulla nuova tabella, sul campo codice, e il
filtro una query sul magazzino che restituisca gli ID trovati nella nuova
tabella con codice scelto.
Antonio


title: ricerca record

text:
"Osvaldo" <
o.bizzar...@inwind.it
> ha scritto nel messaggio
news:H36y8.12650$W9.3...@twister2.libero.it...

Se i dati sono contenuti in una tabella chiamata Tabella1 che ha una
struttura simile a questa:
ID                            Contatore e chiave primaria
Codice                     Testo
Codice alternativo    Testo
Codice originale       Testo
Descrzione               Testo
Prezzo                      Valuta
ecc. ecc.
Se la maschera che ha come origine record una query di selezione si chiama
Maschera1.
Se la casella combinata (od altro controllo) si chiama CercaCodice.
La query parametrica di selezione su cui è basata Maschera1 deve avere un
codice SQL simile a questo:
SELECT Tabella1.*
FROM Tabella1
WHERE (((Tabella1.Codice)=[Forms]![Maschera1]![CercaCodice] Or
(Tabella1.Codice)=[Forms]![Maschera1]![CercaCodice])) OR (((Tabella1.[Codice
alternativo])=[Forms]![Maschera1]![CercaCodice])) OR (((Tabella1.[Codice
originale])=[Forms]![Maschera1]![CercaCodice]));
Naturalmente, a fronte dell'evento "Dopo aggiornamento" del controllo
CercaCodice genererai la seguente riga di codice VBA:
Me.Requery
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: mr7ita.dll

author: RAffaele Di MAio

text:
Perche' quando lancio il developer di access97 per creare la procedura di
istallazione mi richiede un file, appunto mr7ita.dll che non riesco a
trovare sul mio pc?????
N.B. ho usato altre volte il developer senza mai avere problemi
Grazie
Raffaele


title: Seriali....

author: Cicciuballoi

text:
Ho un problema un po' complesso:
mi serve del codice per copiare tutti i segnali provenienti da una
periferica esterna, che passano attraverso porta seriale, in una tabella.
L'operazione deve avvenire ogni volta che una stringa passa attraverso la
seriale....Credo che sia qualcosa di simile ad un protocollo di
comunicazione.
 Mi è stato detto di chiedere aiuto a chi lavora con registratori di cassa o
simili, ma non conosco nessuno del settore.
Ciao a tutti


title: prob excel

author: Pako

text:
Vi spiego il mio problema e quello che vorrei fare:
Ho un foglio con 2 colonne nella prima ci sono delle date in quella accanto
dei valori, su un altro foglio vorrei sommare i valori della seconda colonna
solo se sono compresi in un certo intervallo di data (calcolare i tot mese
per mese) e' possibile?


title: prob excel

author: Sergio MAZZA (Ufficio Stampa)

text:
"Pako" <
ma...@interfree.it
> ha scritto nel messaggio
news:4Kzz7.8427$V75.1...@news1.tin.it...

Sě e possibile ma ricordati che sei fuori tema e inserire un OT nell'oggetto
non fa male.
Controlla nell'help la funzione SE(), E(), O()...
Ciao.


title: prob excel

author: Riccardo

text:
Pako <
ma...@interfree.it
> wrote in message
4Kzz7.8427$V75.1...@news1.tin.it...

__________
Io ho provato inserendo nella cella J1 la data iniziale e nella cella J2 la
data
finale.
Nella colonna A ho inserito delle date.
Nella colonna B ho inserito degli importi.
nella colonna E ho inserito (ricopiandola poi verso il basso)
=SE(E(A1>DATA(ANNO($J$1);MESE($J$1);GIORNO($J$1));A1<DATA(ANNO($J$2);MESE($J
$2);GIORNO($J$2)));"SI";"NO")
Sotto la colonna degli importi ho inserito:
=
SOMMA.SE
(E1:E5;"SI";B1:B5)
cosě porta il totale degli importi che rientrano nell'intervallo di tempo
scelto.
ciao Riccardo


title: prob excel

text:
[OT] Excel
Innanzitutto grazie del suggerimento che funziona, pero' ho trovato una
funzione piu' adatta alle mie esigenze: la funzione DB.SOMMA, il problema e'
che non riesco a utilizzarla su due fogli diversi, ho una colonna A (data)
con le date e una B (Valori)  e in un'altra posizione ho impostato i
criteri, ho chiamato l'insieme A e B con il nome DB e ho elaborato la
seguente formula: =DB.SOMMA(DB;Valore;criteri) che se utilizzata all'interno
del foglio che contiene tutti idati funziona ma se utilizzata su un secondo
foglio (come servirebbe a me) restituisce #VALORE!
Quale puo' essere il problema?
Ciao e grazie


title: prob excel

text:
Pako <
ma...@interfree.it
> wrote in message
ISQA7.7134$QL2.2...@news2.tin.it...

____________
Non conosco la funzione DB.Somma, ho provato ad usarla, ma sicuramente
non la uso correttamente.
Sinceramente non saprei il motivo.
Generalmente i collegamenti excel se li riporta completi, es:
quando chiudi il file master, nelle celle del file collegato viene riportato
tutto il percorso ed il nome del file, e poi il nome del foglio e
dell'intervallo di celle.
Ti darà #VALORE! perche' forse non riesce a stabilire il collegamento.
Il file è per caso sotto password?
ciao Riccard


title: prob excel

text:
> Ti darà #VALORE! perche' forse non riesce a stabilire il collegamento.
> Il file è per caso sotto password?
>
No, ho fatto un po di prove ma per ora non sono riuscito ad arrivare a capo
del problema, comunque grazie dell'interessamento.
Ciao


title: prob excel

text:
Pako <
ma...@interfree.it
> wrote in message ZfSA7.290$5W6....@news1.tin.it...

ho fatto delle prove anche io e la cosa è strana.
Se tieni aperto anche il file con il db, tutto funziona.
Ma se apri solo il file con la formula, chiede di stabilire un collegamento,
ma è come se non lo facesse.
Restituisce l'errore.
ciao Riccardo


title: prob excel

text:
> ho fatto delle prove anche io e la cosa è strana.
> Se tieni aperto anche il file con il db, tutto funziona.
> Ma se apri solo il file con la formula, chiede di stabilire un
collegamento,
> ma è come se non lo facesse.
> Restituisce l'errore.
A me non interesserebbe tenere il db e la formula in 2 file differenti ma
semplicemente su 2 fogli diversi nello stesso file, comunque pare non
funzionare lo stesso.
Ciao


title: prob excel

text:
Pako <
ma...@interfree.it
> wrote in message KjTA7.760$JR4....@news2.tin.it...

_______
non saprei!
ho provato sullo stesso file (con 2 fogli diversi) e funziona bene.
ciao Riccardo


title: prob excel

text:
> non saprei!
> ho provato sullo stesso file (con 2 fogli diversi) e funziona bene.
>
A me non funziona.
Mi dici come hai scritto la formula.
Ciao


title: doppio clic  su sottomaschera che apre altra maschera

author: @libero.it stefano

text:
in una sottomaschera di dati(che vengono fuori da query eseguite in base a
valori presenti nella maschera principale) visualizzata in modalita
fogliodati, ho inserito ilseguente codice
Private Sub Form_DblClick(Cancel As Integer)
If Not IsNull(Me!Ente) Then
DoCmd.OpenForm "inserisci ac_verifica", , , "ente= " & Me!Ente
End If
End Sub
per far si che facendo doppio clic sulla sottomaschera mi si apra una
maschera relativa "inserisci ac_verifica" secondo il campo ente
Ora ente è unnome di citta..
facendo doppio clic sulla sottomaschera mi si apre  una finestrella di
immisione parametro che reca la dicitura dell ente in questione,quello su
cui ho cliccato,
Immettendo manualmente il parametro ,la citta (campo "ente") mi si apre poi
correttamentel altra maschera secondo i criteri indicati
Perchè non si apre direttamente la maschera?
C'entra il fatto che il campo "ente" nella maschera che vado ad aprire sia
una casella combinata?
come risolvere
grazie per l attenzione
ciao e a presto
stefano


author: Gabriele Bertolucci

text:
> Private Sub Form_DblClick(Cancel As Integer)
> If Not IsNull(Me!Ente) Then
> DoCmd.OpenForm "inserisci ac_verifica", , , "ente= " & Me!Ente
> End If
> End Sub
>
> Ora ente è unnome di citta..
> facendo doppio clic sulla sottomaschera mi si apre  una finestrella di
> immisione parametro che reca la dicitura dell ente in questione,quello su
> cui ho cliccato,
> Immettendo manualmente il parametro ,la citta (campo "ente") mi si apre
> poi correttamentel altra maschera secondo i criteri indicati
> Perchè non si apre direttamente la maschera?
Perché c'è un errore :-)
> C'entra il fatto che il campo "ente" nella maschera che vado ad aprire sia
> una casella combinata?
Penso di so, a meno di errori nell'origine del controllo combobox.
> come risolvere
Racchiudendo tra apici la condizione di where, nel seguente modo:
  DoCmd.OpenForm "inserisci ac_verifica", , , "ente= '" & Me!Ente & "'"
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it


text:
> Perché c'è un errore :-)
>
>> C'entra il fatto che il campo "ente" nella maschera che vado ad aprire
>> sia una casella combinata?
>
> Penso di so, a meno di errori nell'origine del controllo combobox.
>
>> come risolvere
>
> Racchiudendo tra apici la condizione di where, nel seguente modo:
>
>  DoCmd.OpenForm "inserisci ac_verifica", , , "ente= '" & Me!Ente & "'"
>
ho provato in questo modo ma non cambia nnulla
ho provato anche a trsformare il campo ente della inserisci ac verifica in
casella teso non piu combinata, ma non cambia nulla, è come se non prendesse
il valore come stringa..non so


text:
>>> C'entra il fatto che il campo "ente" nella maschera che vado ad aprire
>>> sia una casella combinata?
>>
>> Penso di so, a meno di errori nell'origine del controllo combobox.
>>
>>> come risolvere
>>
>> Racchiudendo tra apici la condizione di where, nel seguente modo:
>>
>>  DoCmd.OpenForm "inserisci ac_verifica", , , "ente= '" & Me!Ente & "'"
>>
> ho provato in questo modo ma non cambia nnulla
>
> ho provato anche a trsformare il campo ente della inserisci ac verifica in
> casella teso non piu combinata, ma non cambia nulla, č come se non
> prendesse il valore come stringa..non so
Lascia perdere la trasformazione in casella di testo.
Forse ho dato per scontata una cosa che invece, probabilmente, non lo č.
Nella condizione di where devi fare riferimento alla colonna dell'origine
riga della combo che effettivamente contiene il dato che ti serve.
Forse nel tuo caso la colonna da prendere non č quella associata.
Prova a postare maggiori informazioni.



text:
"Gabriele Bertolucci" <info@#REMOVE#
pbsoft.it
> ha scritto nel messaggio
news:44045e62$0$5994$4faf...@reader2.news.tin.it...

ma qual ' č la sintassi per inserire il riferimento alla colonna dell
origine dato?
ciao e grazie
>
>


text:
> ma qual ' è la sintassi per inserire il riferimento alla colonna dell
> origine dato?
Me!Ente.Column(n)
dove n è il numero di colonna dell'origine di riga della combo. Ricorda che
il numero di colonne parte da zero.
p.s.: cerca di quotare solo lo stretto necessario.



text:
>
> Me!Ente.Column(n)
>
> dove n è il numero di colonna dell'origine di riga della combo. Ricorda
> che il numero di colonne parte da zero.
>
ho provato questo ..ma a parte che mi da errore runtime "METODO o oggetto
non supportati"
ma credo che non si tratti di questo
la cSELLA combinata ente di "inserisci_ac verifica" ha solo un valore,o
meglio solo un campo,e cioè i nomi di citta
ci deve essere qualcos altro che non va..come posso capirlo?


text:
> ho provato questo ..ma a parte che mi da errore runtime "METODO o oggetto
> non supportati"
> ma credo che non si tratti di questo
> la cSELLA combinata ente di "inserisci_ac verifica" ha solo un valore,o
> meglio solo un campo,e cioè i nomi di citta
> ci deve essere qualcos altro che non va..come posso capirlo?
[premessa: ho visto il database di stefano, quindi conosco il nome delle
form]
Nella form "Sottomaschera AC_Verifica" hai utilizzato l'evento sbagliato.
Devi utilizzare l'evento DblClick del controllo Ente, come segue:
Private Sub Ente_DblClick(Cancel As Integer)
    If Not IsNull(Me!Ente) Then
        DoCmd.OpenForm "inserisci AC_verifica", , , "Ente='" & Me!Ente & "'"
    End If
End Sub



text:
ok grazie!
una cosa ,se volessi aggiungere un secondo filtro, con il campo "anno" come
sarebbe lasintassi?
mi spiego a volte il campo ente mi restituisce piu record,uno relativo al
2000,uno al 2001 ecc..
io voglio che mi si apra proprio quello relativo all anno del record che
clicco
grazie


text:
> una cosa ,se volessi aggiungere un secondo filtro, con il campo "anno"
> come sarebbe lasintassi?
Private Sub Ente_DblClick(Cancel As Integer)
    If Not IsNull(Me!Ente) Then
        DoCmd.OpenForm "inserisci AC_verifica", , , "(Ente='" & Me!Ente &
"') AND (Anno='" & Me!Anno & "')"
    End If
End Sub
Nell'esempio di codice ho supposto che Anno fosse un campo di tipo stringa.
Una nota: se non hai mai studiato qualcosa relativamente ai database
relazionali o al linguaggio SQL, ti consiglio di cominciare a farlo. Visto
che vuoi lavorare con il codice SQL potrebbe tornarti utile.
Su internet trovi una marea di documentazione.



title: Numero tabelle collegate

author: ciroteo

text:
Ciao a tutti, una domanda giusto per soddisfare la mia curiosità.
Il limite di tabelle native di access (256?) vale anche per le tabelle
collegate? Siano esse collegate ad un altro mdb oppure ad un sql?
Le viste collegate come tabelle via odbc si contano come tabelle?


title: Numero tabelle collegate

author: Oscar Manfredini

text:
"ciroteo" <

>
Non mi risulta che ci sia un limite massimo di 256 tabelle collegate a un
Front End
Dove l'hai letto?
Ciao: Oscar


title: Numero tabelle collegate

text:
On 9 Lug, 20:06, "Oscar Manfredini" <
oscar.manfred...@libero.it
>
wrote:

infatti non l'ho letto da nessuna parte era un ricordo vago ...
meglio cosi.
però mi confermi che access ha un numero massimo di oggetti
memorizzabili?


title: Numero tabelle collegate

author: Carlo Costarella

text:
"ciroteo" <
matteo...@gmail.com
> ha scritto cut
infatti non l'ho letto da nessuna parte era un ricordo vago ...
meglio cosi.
perň mi confermi che access ha un numero massimo di oggetti
memorizzabili?
.......................
In A2007 gli oggetti possibili sono piů di 32.000!
I moduli, compresi quelli nelle maschere, possono essere 1.000.
Qui trovi documentazione:
http://office.microsoft.com/it-it/access/HA100307391040.aspx
Ciao, Carlo


title: Numero tabelle collegate

text:
On 10 Lug, 12:04, "Carlo Costarella"
<
carloantoniocostare...@gmail.com
> wrote:
> "ciroteo" <
matteo.ci...@gmail.com
> ha scritto cut
>
> infatti non l'ho letto da nessuna parte era un ricordo vago ...
> meglio cosi.
> però mi confermi che access ha un numero massimo di oggetti
> memorizzabili?
>
> .......................
> In A2007 gli oggetti possibili sono più di 32.000!
> I moduli, compresi quelli nelle maschere, possono essere 1.000.
>
> Qui trovi documentazione:
http://office.microsoft.com/it-it/access/HA100307391040.aspx
>
> Ciao, Carlo
ah però ...
grazie.
m


title: Cerco programma di computo metrico

text:
Cerco programma per la compilazione di computi metrici, il tutto,
ovviamente, scritto in access. Se qualcuno, in alternativa, avesse
intenzione di iniziare a lavorarci su, può contare su di me.
db.mi...@libero.it


title: A03 e driver Oracle.

text:
Buon pomeriggio a tutti,
nessuno di voi ha sperimentato problemi di collegamento ODBC tra A03 e DB
Oracle? Da prove fatte:
W2000+A97+Oracle 8.01.06= OK
WXP+A03+Oracle 8.01.06= KO
Può dipendere da XP o da A03?
Grazie (anche per indicazioni di eventuali altri NG specializzati).
--
***********
NEMO2K
***********
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: A03 e driver Oracle.

author: Cristiano

text:
"NEMO2K" <
> W2000+A97+Oracle 8.01.06= OK
> WXP+A03+Oracle 8.01.06= KO
>
> Può dipendere da XP o da A03?
> Grazie (anche per indicazioni di eventuali altri NG specializzati).
Non conosco quella configurazione, ma hai aggiornato JET 4.0 a SP8?


title: A03 e driver Oracle.

text:
Cristiano ha scritto:
> "NEMO2K" <


Nessun aggiornamento di questo tipo si rende necessario (ho WXP SP2 che
non richiede quanto mi consigli).



title: A03 e driver Oracle.

text:
"NEMO2K"
>
> > Non conosco quella configurazione, ma hai aggiornato JET 4.0 a SP8?
>
> Nessun aggiornamento di questo tipo si rende necessario (ho WXP SP2 che
> non richiede quanto mi consigli).
Te lo chiedevo perchè il SP8 risolve proprio un problema di connettività ad
Oracle.
Senti ma, a titolo di curiosità, in cosa consiste il problema: non ti
connetti proprio?
Sicuro non sia un problema legato al driver ODBC?


title: A03 e driver Oracle.

text:
Cristiano ha scritto:
> Senti ma, a titolo di curiosità, in cosa consiste il problema: non ti
> connetti proprio?
> Sicuro non sia un problema legato al driver ODBC?
Esatto, quando cerco di linkare tabelle del DB Oracle, subito dopo
l'inserimento della password mi restituisce l'errore "ORA-12514:
TNS:listener could not resolve SERVICE_NAME given in connect descriptor".
E questo solo in configurazione WXP+A03 (funziona in W2000+A97).
Non sono sicuro che dipenda dal driver ODBC ma propendo più per la
combinazione sistema/software.



title: access e as400

author: Studio Menozzi

text:
Un saluto ed un ringraziamento anicipato per le vostre risposte.
Attraverso i driver ODBC e clien access riesco ad importare le librerie
residenti su as400 in tabelle msaccess.
Importando però alcune tabelle (guarda caso proprio qulel di cui ho maggior
bisogno) mi viene visualizzato il seguente errore.
"chiamata non riuscita"Errore-3146.
Saluti Mirco


title: access e as400

author: OndaMax

text:
Studio Menozzi wrote in message ...

Vedi questo link ...
http://support.microsoft.com/support/kb/articles/Q160/7/62.asp
Forse non è quello il problema, ma ....
OndaMax


title: access e as400

author: Gianni Innocentin

text:
di solito frequento l'altro ng ... quello di as400.
ho usato molto access
con tabelle collegate / importate da e vs As400.
Un tipico problema che
potresti avere si genera se il numero dei 'campi' di una tabella supera un
certo limite (non ricordo quanti ....) : ho una tabella con più di 400
campi e via Access non e' accessibile (perdona il gioco di parole) inoltre
se un file ha più di tot indici non riesci a collegarlo (qui mi sembra
ricordare che il limire era 16, per Access 97)
se hai problemi, scrivimi
pure su it.comp.as400 oppure in provato togliendo
TOGLIQUESTO
dasll'indirizzo.
Ciao
--------------------------------
Inviato via
http://usenet.iol.it


title: Aggiornamento casella combinata

author: Massimo Pallavicini

text:
Salve a tutti, ho questo problema: in una form ho una casella combinata che
prende i dati da una tabella, vorrei fare in modo che aggiungendo un nuovo
valore nella casella combinata me lo venga salvato direttamente nella
tabella.
E' possibile?
Grazie per l'aiuto
Massimo Pallavicini


title: Aggiornamento casella combinata

author: MA

text:
"Massimo Pallavicini" <
maspall...@virgilio.it
>
ha scritto nel messaggio
news:80f%c.210335$OR2.9...@news3.tin.it...

Evento notInList
ci sono mille esempi nei post precedentie e
soprattutto un buon help
MAssimiliano


title: Aggiornamento casella combinata

author: Roberto dalla campagna

text:
"Massimo Pallavicini" <
maspall...@virgilio.it
> ha scritto nel messaggio
news:80f%c.210335$OR2.9...@news3.tin.it...

Vai sul Sito Comune (link qui sotto) e nella Sezione Forms leggi la mia FAQ
intitolata "Si può aggiungere un record alla tabella che è origine riga di
una casella combinata senza usare una maschera?".
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: aggiornamento campi

text:
raga ho un problemino...
devo costruire una maschera dove inserendo il valore di un controllo mi
vada ad aggiornare in automatico altri valori di altri controlli. ok
mi spiego fino in fondo
ho due tabelle in access: registrazione_manutenzione e manutenzione
preventiva.
la prima mi serve per registrare i dati della manutenzione che ho fatto
su alcune macchine; nell'altra ci sono i valori della manutenzione
preventiva.
dovrei costruire la maschera per la registrazione. mettendo il valore
id_manutenzione i campi id macchina, id sottomacchina, attività,
addetto, e materiali si dovrebbero aggiornare automaticamente. della
serie prendo i dati dalla tabella manutenzione preventiva per compilare
la mia maschera.
spero di essermi spiegato, in effetti non è facile dirlo a parole...
il fatto è che non so da dove cominciare, proprio niente di niente...
spero che possiate darmi una mao vi sarei davvero riconoscente.. grazie


title: aggiornamento campi

author: PBsoft

text:
[omissis]
Vediamo di chiarificare: tu vorresti una maschera per la registrazione delle
manutenzioni dalla quale selezioni un modello di manutenzione preventiva
e ti ritrovi la nuova manutenzione che stai inserendo già compilata, con
solo qualche aggiustamento da fare?
Se è così, puoi ricorrere facilmente al VBA, tramite cui andare a copiare
i record dei dettagli della manutenzione preventiva nei dettagli della manutenzione
che vuoi inserire.
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype: pbsoftsolution


title: aggiornamento campi

text: si esatto ma per il codice non so da che parte rifarmi....


title: aggiornamento campi

text:
mica mi potresti aiutare in qlc modo... ti posso dare tutte le
informazioni che ti servono non ti rimane altro che chiedere... se ti
va di farlo altrimenti....mi bloccherò.. grazie!!


title: aggiornamento campi

text:
> si esatto ma per il codice non so da che parte rifarmi....
Comincia con il postare l'esatta struttura delle tabelle e delle relazioni
contenute nel database in questione.



title: aggiornamento campi

text:
allora le due tabelle sono:
MANUTENZIONE_PREVENTIVA con i campi:
id manutenzione (contatore), id master (numerico), id slave (testo),
attività (testo), [frequenza (giorni)] (numerico), materiale e
quantità (memo), note operative (memo), [tempo previsto (h,mm)]
(data/ora), addetto (testo), prossima manutenzione (data/ora)
REGISTRAZIONE_MANUTENZIONE con i campi:
id registrazione (contatore), id manutenzione (numerico), id master
(numerico), id slave (testo), attività (testo), addetto (testo),
materiale e quantità (memo), [tempo (h,mm)] (data/ora), anomalie
(memo), note operative (memo), data (data/ora)
L'obiettivo sarebbe quello di creare una maschera dove inserendo io
l'id manutenzione mi si riempiono i campi id master, id slave,
attività, addetto. Nel campo data il valore predefinito dovrà essere
la data odierna.
Aggiungendo poi tutti gli altri campi rimasti vuoti il tutto dovrà
essere salvato nella tabella REGISTRAZIONE_MANUTENZIONE.
Altra operazione sarebbe quella di sommare la DATA con la FREQUENZA per
ottenere il campo PROSSIMA MANUTENZIONE da salvare nella tabella
MANUTENZIONE_PREVENTIVA
La relazione tra le tabelle: 1 a molti tra
MANUTENZIONE_PREVENTIVA.ID
MANUTENZIONE e
REGISTRAZIONE_MANUTENZIONE.ID
 MANUTENZIONE
ti ringrazio anticipatamente anche per avermi ascoltato... grazie
grazie grazie...
se ti serve qualche altro particolare non hai altro che da chiedere...
se pio vedi che la cosa ti sta occupando troppo tempo me lo dici che
provvederò a spararmi da solo.... eheheh :-)) grazie mille ancora


title: aggiornamento campi

text:
Se avessi scritto la struttura in questa maniera sarebbe stato meglio :-)
> MANUTENZIONE_PREVENTIVA
> id manutenzione (contatore),
> id master (numerico),
> id slave (testo),
> attività (testo),
> [frequenza (giorni)] (numerico),
> materiale e quantità (memo),
> note operative (memo),
> [tempo previsto (h,mm)] (data/ora),
> addetto (testo),
> prossima manutenzione (data/ora)
>
> REGISTRAZIONE_MANUTENZIONE
> id registrazione (contatore),
> id manutenzione (numerico),
> id master (numerico),
> id slave (testo),
> attività (testo),
> addetto (testo),
> materiale e quantità (memo),
> [tempo (h,mm)] (data/ora),
> anomalie (memo),
> note operative (memo),
> data (data/ora)
>
> La relazione tra le tabelle: 1 a molti tra
MANUTENZIONE_PREVENTIVA.ID
> MANUTENZIONE e
REGISTRAZIONE_MANUTENZIONE.ID
 MANUTENZIONE
Intanto partiamo con il dire che l'approccio che hai seguito è un pochino
discutibile, nel senso che la tabella MANUTENZIONE_PREVENTIVA costituisce
agli effetti un modello di compilazione della tabella REGISTRAZIONE_MANUTENZIONE,
quindi a livello logico non esiste una relazione 1---M.
Mi spiego meglio. Una relazione 1---M ha senso, ad esempio, quando si parla
di Manutenzione e DettagliManutenzione.
Nel tuo caso la tabella MANUTENZIONE_PREVENTIVA dovrebbe essere invece utilizzata
come tabella di lookup, dalla quale prendere i dati per compilare un nuovo
record nella REGISTRAZIONE_MANUTENZIONE.
> L'obiettivo sarebbe quello di creare una maschera dove inserendo io
> l'id manutenzione mi si riempiono i campi id master, id slave,
> attività, addetto.
Quale deve essere l'origine record di questa maschera?
> Nel campo data il valore predefinito dovrà essere
> la data odierna.
Questo comportamento lo puoi ottenere già dalla struttura della tabella,
quindi ti consiglio di agire lì.
> Aggiungendo poi tutti gli altri campi rimasti vuoti il tutto dovrà
> essere salvato nella tabella REGISTRAZIONE_MANUTENZIONE.
Quindi l'origine dati di questa maschera deve essere la tabella REGISTRAZIONE_MANUTENZIONE.
Quello che ti serve, quindi, è intercettare l'evento AfterUpdate della combobox
dalla quale sceglierai la manutenzione preventiva.
In questo evento andrai a valorizzare i campi che ti servono mediante delle
DLookup sulla tabella MANUTENZIONE_PREVENTIVA, in questo modo (te ne scrivo
uno, gli altri si recuperano nella stessa maniera, con minime variazioni):
Me.[id master] = DLookup("[id master]", "MANUTENZIONE_PREVENTIVA", "[id manutenzione]="
& Me.[id manutenzione])
> Altra operazione sarebbe quella di sommare la DATA con la FREQUENZA
> per
> ottenere il campo PROSSIMA MANUTENZIONE da salvare nella tabella
> MANUTENZIONE_PREVENTIVA
?!?!?
Ferma ferma ferma.
In base a quello che hai scritto, quindi, la MANUTENZIONE_PREVENTIVA NON
E' un modello di compilazione della REGISTRAZIONE_MANUTENZIONE.
Nel tuo post precedente in risposta al mio hai detto l'esatto contrario.
Comunque, visto che la form in questione ha come origine record la tabella
REGISTRAZIONE_MANUTENZIONE, per andare a modificare un record in una tabella
differente devi necessariamente ricorrere al VBA.
A questo punto l'evento da scegliere dipende da quando vuoi riportare la
modifica in quella tabella.
Supponendo di volerla riportare dopo che hai salvato il record, quindi l'evento
sarà Form_AfterUpdate o Form_AfterInsert.
In uno di questi eventi dovrai utilizzare il seguente codice:
Dim intNumGiorni as integer
intNumGiorni = DLookup("[frequenza (giorni)]", "MANUTENZIONE_PREVENTIVA",
"[id manutenzione]=" & Me.[id manutenzione])
DoCmd.SetWarnings False
DoCmd.RunSQL "UPDATE MANUTENZIONE_PREVENTIVA SET [prossima manutenzione]
= " & DateAdd("d", intNumGiorni, Me.Data)
DoCmd.SetWarnings True
Buona fortuna.



title: aggiornamento campi

author: Raptor

text:
ciao... scusa se disturbo ancora ma ho qlc problemino...
1. Per la data in predefinito è tutt'ok.. grazie...
2. Per quanto riguarda il DLookup ho dei problemi... ti spiego.
Ebbene il tutto dovrà essere salvato nella tabella
REGISTRAZIONE_MANUTENZIONE quindi l'origine dei dati dovrà essere
quella stessa tabella.
>Me.[id master] = DLookup("[id master]", "MANUTENZIONE_PREVENTIVA", "[id manutenzione]="
>& Me.[id manutenzione])
dove lo vado a scrivere??? io l'ho inserito dopo l'aggiornamento della
Combobox ID Manutenzione della maschera, ma mi dà dei problemi:
"Impossibile trovare la macro Me."
cos'è che sbaglio?? mica mi potresti dare qlc informazione in più se
non ti scoccia??? ti ringrazio tanto
3. Per l'altra data.. ossia la somma di data e frequenza ancora non mi
ci sono messo... magari ti scrivo dopo...
ciao e grazie ancora...


title: aggiornamento campi

text:
>In base a quello che hai scritto, quindi, la MANUTENZIONE_PREVENTIVA NON
>E' un modello di compilazione della REGISTRAZIONE_MANUTENZIONE.
la tabella manutenzione_preventiva mi serve anche per fare il
calendario delle prossime manutenzioni..


title: aggiornamento campi

text:
>Dim intNumGiorni as integer
intNumGiorni = DLookup("[frequenza (giorni)]",
"MANUTENZIONE_PREVENTIVA",
"[id manutenzione]=" & Me.[id manutenzione])
DoCmd.SetWarnings False
DoCmd.RunSQL "UPDATE MANUTENZIONE_PREVENTIVA SET [prossima
manutenzione]
= " & DateAdd("d", intNumGiorni, Me.Data)
DoCmd.SetWarnings True
scusa ma l'editor di visual basic mi dà un errore di compilazione
DateAdd("d"............... mi dà errore sulla "d".. mi dice che è
prevista un fine istruzione... dove sta il problema??
tutto questo lo vado a scrivere nel AfterUpdate di DATA va bene????
grazie mille sei gentilissimo e piano piano mi stai risolvendo grossi
guai.. ciao


title: aggiornamento campi

text:


Allora devi rivedere la struttura della base dati.
Senza una struttura efficace, che rispecchia il problema logico, è INUTILE
che tu provi a scrivere anche una sola riga di codice.
Mio modesto parere, s'intende.



title: aggiornamento campi

text:
>> Me.[id master] = DLookup("[id master]", "MANUTENZIONE_PREVENTIVA",
>> "[id manutenzione]=" & Me.[id manutenzione])
> dove lo vado a scrivere???
.....questo era quasi un rigore.....
> io l'ho inserito dopo l'aggiornamento della
> Combobox ID Manutenzione della maschera,
Allora lo sai il punto in cui devi scrivere quel codice.
> ma mi dà dei problemi: "Impossibile trovare la macro Me."
Prova a modificarla come segue:
Me.Controls("id master") = DLookup("[id master]", "MANUTENZIONE_PREVENTIVA",
"[id manutenzione]=" & Me.Controls("id manutenzione")



title: aggiornamento campi

text:
> DoCmd.RunSQL "UPDATE MANUTENZIONE_PREVENTIVA SET [prossima
> manutenzione] = " & DateAdd("d", intNumGiorni, Me.Data)
> scusa ma l'editor di visual basic mi dà un errore di compilazione
> DateAdd("d"............... mi dà errore sulla "d".. mi dice che è
> prevista un fine istruzione... dove sta il problema??
Prova a modificare quell'istruzione nel seguente modo:
DoCmd.RunSQL "UPDATE MANUTENZIONE_PREVENTIVA SET [prossima manutenzione]
= #" & DateAdd("d", intNumGiorni, Me.Data) & "#"
> tutto questo lo vado a scrivere nel AfterUpdate di DATA va bene????
Non sono più sicuro nemmeno di come mi chiamo.



title: aggiornamento campi

text:
grazie ho risolto tutto scrivendo tutta la maschera e tutti gli
aggiornamenti in cadice.. mi c'è voluto un bel po' ma ce l'ho fatta ed
ho risolto i problemi.. Adesso ho delle difficoltà con una stringa
SQL, ho postato una nuova discussione... magari dacci un'occhiata se
vuoi...
Comunque la struttura del DB doveva esser fatta così...


title: selezionare specifico record per etichetta

author: Valtere

text:
ciao...
magari è un argomento già trattato....
ho fatto un piccolo db in cui nella singola tabella tengo un archivio
d'indirizzi, necessari per poi stampare le etichette e/o le buste...
il fatto è così com'è se clicco sulla stampante stampo tutti gli
indirizzi (200)...
è possibile far si di selezionare i record interessati, magari aprendo
un 'altra maschera in cui selezionare tramite la solita "spunta" ????
naturalmente ben accette altre idee e/o soluzioni...
grazie a tutti
Valter


author: Sandro Peruz

text:
"Valtere" <
pro...@libero.it
> ha scritto nel messaggio
news:4550dc5d$0$19244$4faf...@reader4.news.tin.it...

Ciao Valter,
una possibile soluzione potrebbe essere quella di appoggiarsi ad una tabella
temporanea che contiene tutti i campi del record che viene flaggato,
popolata magari con una  query di accodamento.
La query la fai eseguire appena prima di lanciare il report assegnando al
report come recordsource la tabella appena popolata.
Ciao, Sandro


title: Lasciare campo uguale al precedente

text:
Salve a tutti.
Ho fatto una maschera, che si riferisce ad una tabella co 3 campi. Uno
dei tre campi, quello chiamato "fornitore", spesso è uguale per molti
record consecutivi anche se i "fornitori" sono almeno 30. Come devo
fare per poter avere come valore di un campo lo stesso del record
precedente senza doverlo scrivere ogni volta.
grazie


title: Lasciare campo uguale al precedente

author: PePonzio

text:

metti una variabile globale tipo:
dim UltimoFornitore
su form_afterupdate
UltimoFornitore = Fornitore
su form_current
if NewRecord = True then Fornitore = UltimoFornitore


title: Ottimizzazione invio mail tramite MAPI

author: Roberto da Parma

text:
Ciao a tutti, č un pň che non ci si sente...beh...sono ancora vivo...tra
vacanze e impegni "urgenti" al rientro al lavoro č sempre un casino...
So che l'argomento č stato ampiamente discusso ma mi permetto di chiedere
una "ottimizzazione" ... mi spiego...
Uso una delle tante funzioni con MAPI per gestire l'invio della
mail...funziona tutto benissimo tranne per un piccolo particolare...e
cioč...
Se imposto una firma e/o uno sfondo in OE o Outlook questo viene
ignorato...ho provato vari settaggi sui programmi ma credo di essere giunto
alla conclusione che deve essere impostato da VBA...
Ho creato infatti una configurazione per email in html ma come faccio ad
applicarla all'invio???
Si puň? Eventualmente posso anche accettare l'invio con un'altro tipo di
procedura... :-((
Parte del codice che utilizzo lo posto qui sotto...
Grazie come sempre
--
Roberto da Parma
P.S X Ciroteo...la straputtanaccia... in puglia avessi preso un giorno
bello!Secondo me solo la mia settimana ha fatto brutto!!
Type MAPIMessage
    Reserved As Long
    Subject As String
    NoteText As String
    MessageType As String
    DateReceived As String
    ConversationID As String
    flags As Long
    RecipCount As Long
    FileCount As Long
End Type
Type MAPIRecip
    Reserved As Long
    RecipClass As Long
    Name As String
    Address As String
    EIDSize As Long
    EntryID As String
End Type
Type MAPIFile
    Reserved As Long
    flags As Long
    Position As Long
    PathName As String
    FileName As String
    FileType As String
End Type
Private Declare Function MAPILogon Lib "MAPI32.DLL" _
        (ByVal UIParam As Long, _
        ByVal User As String, _
        ByVal PASSWORD As String, _
        ByVal flags As Long, _
        ByVal Reserved As Long, _
        ByRef Session As Long) As Long
Private Declare Function MAPILogoff Lib "MAPI32.DLL" _
        (ByVal Session As Long, _
        ByVal UIParam As Long, _
        ByVal flags As Long, _
        ByVal Reserved As Long) As Long
Public Declare Function MAPISendMail Lib "MAPI32.DLL" _
        Alias "BMAPISendMail" _
        (ByVal Session&, _
        ByVal UIParam&, _
        message As MAPIMessage, _
        Recipient() As MAPIRecip, _
        File() As MAPIFile, _
        ByVal flags&, _
        ByVal Reserved&) As Long
Public Declare Function GetProfileString Lib "Kernel32" _
        Alias "GetProfileStringA" _
        (ByVal lpAppName As String, _
        ByVal lpKeyName As String, _
        ByVal lpDefault As String, _
        ByVal lpReturnedString As String, _
        ByVal nSize As Long) As Long
Global Const SUCCESS_SUCCESS = 0
Global Const MAPI_TO = 1
Global Const MAPI_CC = 2
Global Const MAPI_LOGON_UI = &H8
Public Function Sendmail(sSubject As String, sTo As String, sCC As String,
sAttach As String, sMessage As String)
On Error Resume Next
    Dim i, cTo, cCC, cAttach
    Dim MAPI_Message As MAPIMessage
    cTo = CountTokens(sTo, ";")
    cCC = CountTokens(sCC, ";")
    cAttach = CountTokens(sAttach, ";")
    ReDim rTo(0 To cTo) As String
    ReDim rCC(0 To cCC) As String
    ReDim rAttach(0 To cAttach) As String
    ParseTokens rTo(), sTo, ";"
    ParseTokens rCC(), sCC, ";"
    ParseTokens rAttach(), sAttach, ";"
    ReDim MAPI_Recip(0 To cTo + cCC - 1) As MAPIRecip
    For i = 0 To cTo - 1
        MAPI_Recip(i).Name = rTo(i)
        MAPI_Recip(i).RecipClass = MAPI_TO
    Next i
    For i = 0 To cCC - 1
        MAPI_Recip(cTo + i).Name = rCC(i)
        MAPI_Recip(cTo + i).RecipClass = MAPI_CC
    Next i
    ReDim MAPI_File(0 To cAttach) As MAPIFile
    MAPI_Message.FileCount = cAttach
    For i = 0 To cAttach - 1
        MAPI_File(i).Position = -1
        MAPI_File(i).PathName = rAttach(i)
    Next i
    MAPI_Message.Subject = sSubject
    MAPI_Message.NoteText = sMessage
    MAPI_Message.RecipCount = cTo + cCC
    Sendmail = MAPISendMail(0&, 0&, MAPI_Message, MAPI_Recip, MAPI_File,
MAPI_LOGON_UI, 0&)
End Function


title: Ottimizzazione invio mail tramite MAPI

author: ALESSANDRO Baraldi

text:
"Roberto da Parma" <
aris...@libero.it
> ha scritto nel messaggio
news:46e54d73$1$17941$4faf...@reader1.news.tin.it...
> Ciao a tutti, è un pò che non ci si sente...beh...sono ancora vivo...tra
> vacanze e impegni "urgenti" al rientro al lavoro è sempre un casino...
>
> So che l'argomento è stato ampiamente discusso ma mi permetto di chiedere
> una "ottimizzazione" ... mi spiego...
>
> Uso una delle tante funzioni con MAPI per gestire l'invio della
> mail...funziona tutto benissimo tranne per un piccolo particolare...e
> cioè...
>
> Se imposto una firma e/o uno sfondo in OE o Outlook questo viene
> ignorato...ho provato vari settaggi sui programmi ma credo di essere
giunto
> alla conclusione che deve essere impostato da VBA...
>
> Ho creato infatti una configurazione per email in html ma come faccio ad
> applicarla all'invio???
> Si può? Eventualmente posso anche accettare l'invio con un'altro tipo di
> procedura... :-((
>
> Parte del codice che utilizzo lo posto qui sotto...
>
> Grazie come sempre
[cut]
Ciao Roberto.
Sinceramente non credo sia possibile accedere a MAPI per inviare HTML,
almenon non ho
trovato alcun sistema... nativo...!
Potresti provare a formattare il Body con Tag HTML... ma sapendo come aviene
la decodifica SMTP
dubito possa funzionare...!
Il metodo migliore è usare componenti esterni come Winsock.Ocx (usare la DLL
da Access sarebbe un bagno di sangue)...!
A questo punto se puoi distribuire Winsock allora hai 3 strade...!
1) Usare il mio demo di SendMail, che se non ricordo male prevede anche la
Firma...! ;-)
2) Usare una DLL esterna che Wrappa il controllo Winsock(che devi sempre
distribuire), in sostanza fà quello che fà il mio demo, ma in modo più
raffinato conuna DLL...!
3) Cercare una DLL(oppure farla in VB6 che è relativamente)semplice che si
appoggia al Socket direttamente per evitare di distribuire l'OCX
Dimmi che strada puoi prendere.
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------


title: Ottimizzazione invio mail tramite MAPI

text:
"Roberto da Parma" <
aris...@libero.it
> ha scritto nel messaggio
news:46e54d73$1$17941$4faf...@reader1.news.tin.it...
> Ciao a tutti, è un pò che non ci si sente...beh...sono ancora vivo...tra
> vacanze e impegni "urgenti" al rientro al lavoro è sempre un casino...
>
> So che l'argomento è stato ampiamente discusso ma mi permetto di chiedere
> una "ottimizzazione" ... mi spiego...
>
> Uso una delle tante funzioni con MAPI per gestire l'invio della
cut
Oltre a quello che ti ha suggerito Alex, hai provato con CDO presente dalla
versione 2000 di windows?
Non vorrei sbagliare ma credo che MA abbia fatto un lavoro del genere.
Ciao, Carlo


title: Ottimizzazione invio mail tramite MAPI

text:

Io uso i CDO, ma non mi sono inventato nulla
è tutto codice disponibile e molto semplice
(resta il discorso dei riferimenti)
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access
Segrate (MI), 7-8 giugno 2007


title: Ottimizzazione invio mail tramite MAPI

text:
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:fc3q3g$r6e$1...@tdi.cu.mi.it...
cut
> Oltre a quello che ti ha suggerito Alex, hai provato con CDO presente
> dalla versione 2000 di windows?
> Non vorrei sbagliare ma credo che MA abbia fatto un lavoro del genere.
Girando per la rete ho trovato qualcosa.
Per esempio questo semplice codice funziona per inviare un messaggio con
allegato e sempre dopo aver messo il riferimento a Microsoft CDO:
Dim myMail
Set myMail = CreateObject("CDO.Message")
myMail.Subject = "email di testo con allegato"
myMail.From = "
tuoind...@libero.it
"
myMail.To = "
tuodest...@virgilio.it
"
myMail.TextBody = "messaggio di testo semplice."
myMail.AddAttachment "c:\pdate.txt"
myMail.Send
Con questo esempio puoi inviare testo html:
Dim myMail
Set myMail=CreateObject("CDO.Message")
myMail.Subject="email di testo HTML"
myMail.From="
ma...@miodominio.com
"
myMail.To="
qual...@dominio.com
"
myMail.HTMLBody = "
questo è un testo HTML, h1 è un tag che fa grande il
testo (header1)
"
myMail.Send
Ciao, Carlo


title: Ottimizzazione invio mail tramite MAPI

author: ciroteo

text:
ehehe. ... che ti credi? il bel tempo ha seguito solo me . ..ricorda
il sole bacia i brutti perchè i belli li bacian tutti!
spero comunque che tu non abbia preso come me quei bei 5 kg che tutti
devono portare a casa dopo le vacanze in puglia!
:-)
On 10 Set, 15:58, "Roberto da Parma" <
arisib...@libero.it
> wrote:
> Ciao a tutti, è un pò che non ci si sente...beh...sono ancora vivo...tra
> vacanze e impegni "urgenti" al rientro al lavoro è sempre un casino...
>
> So che l'argomento è stato ampiamente discusso ma mi permetto di chiedere
> una "ottimizzazione" ... mi spiego...
>
> Uso una delle tante funzioni con MAPI per gestire l'invio della
> mail...funziona tutto benissimo tranne per un piccolo particolare...e
> cioè...
>
> Se imposto una firma e/o uno sfondo in OE o Outlook questo viene
> ignorato...ho provato vari settaggi sui programmi ma credo di essere giunto
> alla conclusione che deve essere impostato da VBA...
>
> Ho creato infatti una configurazione per email in html ma come faccio ad
> applicarla all'invio???
> Si può? Eventualmente posso anche accettare l'invio con un'altro tipo di



title: Ottimizzazione invio mail tramite MAPI

text:
On 10 Set, 18:07, "Carlo Costarella" <
carlocoslib...@libero.it
> wrote:
> "Roberto da Parma" <
arisib...@libero.it
> ha scritto nel messaggionews:46e54d73$1$17941$4faf...@reader1.news.tin.it...> Ciao a tutti, è un pò che non ci si sente...beh...sono ancora vivo...tra



title: Ottimizzazione invio mail tramite MAPI

text:
On 10 Set, 18:20, "Carlo Costarella" <
carlocoslib...@libero.it
> wrote:
> "Carlo Costarella" <
carlocoslib...@libero.it
> ha scritto nel messaggionews:fc3q3g$r6e$1...@tdi.cu.mi.it...
> cut
>
> > Oltre a quello che ti ha suggerito Alex, hai provato con CDO presente
> > dalla versione 2000 di windows?
> > Non vorrei sbagliare ma credo che MA abbia fatto un lavoro del genere.
>
> Girando per la rete ho trovato qualcosa.
> Per esempio questo semplice codice funziona per inviare un messaggio con
> allegato e sempre dopo aver messo il riferimento a Microsoft CDO:
> Dim myMail
> Set myMail = CreateObject("CDO.Message")
> myMail.Subject = "email di testo con allegato"
> myMail.From = "
tuoindiri...@libero.it
"
> myMail.To = "
tuodestinata...@virgilio.it
"
> myMail.TextBody = "messaggio di testo semplice."
> myMail.AddAttachment "c:\pdate.txt"
> myMail.Send
>
> Con questo esempio puoi inviare testo html:
> Dim myMail
> Set myMail=CreateObject("CDO.Message")
> myMail.Subject="email di testo HTML"
> myMail.From="
m...@miodominio.com
"
> myMail.To="
qualc...@dominio.com
"
> myMail.HTMLBody = "
questo è un testo HTML, h1 è un tag che fa grande il
> testo (header1)
"
> myMail.Send
>
> Ciao, Carlo
ciao! io ho problemi col cdo in una rete dove c'è exchange. non avendo
io accesso al server exchange non posso risolvere. il problema è che
mi blocca le mail che non sono nel dominio. per il resto sono comodi.


title: Ottimizzazione invio mail tramite MAPI

text:
"ciroteo" <
matteo...@gmail.com
> ha scritto nel messaggio
news:1189458316.8...@22g2000hsm.googlegroups.com...


Almeno quello no....mangiavo pesce....e l'unica cosa che potevo fare era
correre...anche sotto la pioggia! :-(((
--
Roberto da Parma


title: Ottimizzazione invio mail tramite MAPI

text:
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:fc3quc$4c2$1...@tdi.cu.mi.it...

Proverò a darci un'occhiata....vi saprò dire.
Grazie mille a tutti.
naturalmente appena ci salto fuori vi faccio sapere
--
Roberto da Parma


title: Due database distinti che si puntano...

author: =^Fabio Zed^=

text:
Brevemente: mi trovo a lavorare su un'applicazione asp in parte non
sviluppata da me. Ho trovato una pagina (piu' di una) in cui vengono aperte
due connessioni a due database distinti, Access97, ed in cui in una tabella
del DB che chiamo A (per semplicita') un campo si riferisce ad un campo ID
di una tabella del DB B.
Non mi sembra che siano state stabilite regole (utilizzando funzionalita' di
Access che tra l'atro non conosco bene e che sarei grato a chiunque mi
voglia accennare in 4 parole) che sincronizzino i due DB se non
nell'applicazione ASP stessa (dunque access ad occhio non sa niente del
legame che sussiste tra i due DB). Quello che mi preoccupa non e'
l'integrita' referenziale nel senso della possibilita' o meno di cancellare
un certo record, visto che l'applicazione e' l'unica ad aggire sui due DB e
sembra funzionare perfettamente, e nemmeno che la mancanza dell'utilizzo di
una transcaction mi possa desincronizzare i DB (anche se qui mi riserbo
un'analisi piu' attenta delle casistiche).
La domanda e' molto piu' semplice:
ammettiamo che un gruppo di record del DB viene cancellato, eseguendo una
ricompattazione io ho sempre immaginato che gli ID dei vari record (gestiti
a contatori da Access) fossero riorganizzati. I db sono gia' stati
compattati varie volte e sembrano continuare ad essere congruenti. Chiedo:
posso lasciare le cose cosi'? Access non procedera' mai a riorganizzare di
sua iniziativa gli ID dei record nel database? Gli ID di record cancellati,
alpiu' saranno riutilizzati da nuovi record, ma gli ID dei record non
cancellati rimarranno sempre invariati?
In caso negativo cosa fare? Esiste un modo veloce per riagganciare i
database? Meglio agganciarli tra di loro (con le suddette funzionalita' di
cui conosco poco) o spostare tutto in un solo database (con la conseguente
riscrittura delle connections in ASP)?
Grazie mille, Fabio Zed Zamparelli


title: Due database distinti che si puntano...

author: Davide Bianchi

text:
=^Fabio Zed^= wrote in message <8bvffp$q7n$
1...@news.unina.it
>...
<snip>
>Quello che mi preoccupa non e'
>l'integrita' referenziale nel senso della possibilita' o meno di cancellare
>un certo record, visto che l'applicazione e' l'unica ad aggire sui due DB
E se uno dei due db crasha l'altro come si mette a posto ? (ORRORE!!!)
<snip>
>ammettiamo che un gruppo di record del DB viene cancellato, eseguendo una
>ricompattazione io ho sempre immaginato che gli ID dei vari record (gestiti
>a contatori da Access) fossero riorganizzati.
<snip>
Assolutamente no (per fortuna), anche perche' se lo facesse dovrebbe PURE
mettersi a posto tutte le tabelle in cui tale ID viene riportato (e non sei
mica obbligato a dirgli quali sono tali tabelle), oppure farlo tu a manina.
Se MS avesse fatto una cosa del genere Access non lo avrebbero mai venduto
(tu la compreresti una cosa del genere?).
<snip>
>ma gli ID dei record non cancellati rimarranno sempre invariati?
<snip>
Se non li modifichi tu a manina....
<snip>
>In caso negativo cosa fare? Esiste un modo veloce per riagganciare i
>database? Meglio agganciarli tra di loro (con le suddette funzionalita' di
>cui conosco poco)
Access non supporta la replicazione dei dati, puoi usare delle transazioni
distribuite per sincronizzare le scritture su piu' database, ma lo fai
esternamente.
>o spostare tutto in un solo database (con la conseguente
>riscrittura delle connections in ASP)?
<snip>
Dato che la cosa funziona, lasciala come sta' (meno rischi=meno casini), poi
potresti cominciare a domandarti PERCHE' hanno scelto di avere due database
separati, forse hanno
le loro ragioni, o tali ragioni c'erano ed adesso non ci sono piu', in tal
caso FORSE potrebbe essere una buona idea iniziare a pensare ad un ridisegno
dell'intero sistema.
Davide


title: Creare campo con valore che incrementa

author: Dan

text:
Salve a tutti.
Ho questo problema.
Ho una tabella che per semplificare ha 3 campi
NOME		NUMERO	POGRESSIVO
PIPPO
PIPPO
PIPPO
PIPPO
PLUTO
PLUTO
PAPERINO
PAPERINO
PAPERINO
Ho l'esigenza di riempire il campo numero con un mumero prestabilito
che prendo da altra tabella oppure immetto manualmente ma che cmq si
incrementa di 1 ogni volta che il valore del campo NOME cambia.
In piu' il campo PROGRESSIVO deve partire da 1 e incrementare ogni
riga per ricominciare da 1 ogni volta che il noime cambia
Per cui deve divantare:
NOME		Numero		PROGRESSIVO
PIPPO		150			1
PIPPO		150			2
PIPPO		150			3
PIPPO		150			4
PLUTO		151			1
PLUTO		151			2
PAPERINO	152			1
PAPERINO 	152			2
PAPERINO   	152			3
Etc....etc.....
Come potrei fare ?
Grazie in anticipo per l'aiuto
Dan


title: invio messaggi con M.Outlook

author: Maurizio Begani

text:
Ciao a tutti.
In un'azienda che utilizza Microsoft Outlook per la trasmissione di messaggi
nella rete interna, vorrei che dal database per la gestione del laboratorio
che ho creato (A97), alle scadenze definite dal database stesso, venissero
inviati messaggi di avviso ad un utente utilizzando Microsoft Outlook.
Qualcuno sa indicarmi come devo fare ?
grazie.
   Maurizio


title: invio messaggi con M.Outlook

text:
"Maurizio Begani" <
m.be...@libero.it
> ha scritto nel messaggio
news:WR3B6.11227$xC3.1...@news.infostrada.it...

Io ho risolto cosi, controlla che nei riferimenti sia installato Microsoft
Outlook 8.0 (9.0 nel caso del A2000) object library
Sub InviaMessaggio(DisplayMsg As Boolean, Optional AttachmentPath)
Dim objOutlook As Outlook.Application
Dim objOutlookMsg As Outlook.MailItem
Dim objOutlookRecip As Outlook.Recipient
Dim objOutlookAttach As Outlook.Attachment
Dim A, CC, CORPOM As String
    'Creo il corpo del messaggio
    CORPOM = "Prima linea"
    CORPOM = CORPOM + vbCrLf + "Seconda linea"
          ' Creo la sessione di Outlook
          Set objOutlook = CreateObject("Outlook.Application")
          ' Creo il messaggio
          Set objOutlookMsg = objOutlook.CreateItem(olMailItem)
          With objOutlookMsg
              ' Inserisco il nome del destinatario
              Set objOutlookRecip = .Recipients.Add(A)
              objOutlookRecip.Type = olTo
If CC <> "" Then
              ' Inserisco il nome del destinatario per conoscenza
              Set objOutlookRecip = .Recipients.Add(CC)
              objOutlookRecip.Type = olCC
End If
             ' Imposto oggetto copro e priorità del messaggio.
             .Subject = "Soggetto"
             .BODY = CORPOM & vbCrLf & vbCrLf
             .Importance = olImportanceHigh  'priorità alta
(olImportanceNormal=normale)
             ' Aggiungo un allegato al messaggio
             If Not IsMissing(AttachmentPath) Then
                 Set objOutlookAttach = .Attachments.Add(AttachmentPath)
             End If
             ' Risolvo i nomi dei destinatari
             For Each objOutlookRecip In .Recipients
                 objOutlookRecip.Resolve
             Next
             ' visualizzare il messaggio prima della trasmissione?
             If DisplayMsg Then
                 .Display
             Else
                 .Save
                 .Send
             End If
          End With
          Set objOutlook = Nothing
End Sub
Ciao
JJ8
Ps. Buona Pasqua


title: invio messaggi con M.Outlook

author: Alessandro Tealdi

text:
"Maurizio Begani" <
m.be...@libero.it
> ha scritto nel messaggio
news:WR3B6.11227$xC3.1...@news.infostrada.it...

Studiati il metodo SendObject dell'oggetto DoCmd.   (sintassi
Docmd.SendObject ...)
Funziona sia con Outlook Express che con l'Outlook completo,
e molto probabilmente ti consentirą di fare tutto ciņ che vuoi senza
infilarti in oggetti di Outlook, API ed altre amenitą del genere ...
CIAO


title: invio messaggi con M.Outlook

text:
Maurizio Begani <
m.be...@libero.it
> wrote in message
WR3B6.11227$xC3.1...@news.infostrada.it...
Proverň.Grazie.
Maurizio


title: Developper Access2003

author: Raffaele Alberoni

text:
Buongiorno a tutti,
avrei bisogno di qualche chiarimento sui vari pacchetti di Microsoft:
Dunque, fino ad OfficeXp esisteva la versione Developper per far si che le
applicazioni di Access girassero anche senza Access installato (sto
cercando di riassumere!!!)
Con Office 2003, se non sbaglio, è necessario acquistare Visual Studio
Tools per Microsoft Office System per poter creare un applicativo che gira
senza Access.
La prima domanda è se è corretto quanto affermato sopra.
La seconda domanda è se Visual Studio.net Professional può sostituire
Tools di cui sopra???
Grazie a tutti.
Saluti
--
Raffaele Alberoni
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Developper Access2003

author: Pablitomf

text:
Raffaele Alberoni ha scritto:
> Buongiorno a tutti,
> avrei bisogno di qualche chiarimento sui vari pacchetti di Microsoft:
> Dunque, fino ad OfficeXp esisteva la versione Developper per far si che le
> applicazioni di Access girassero anche senza Access installato (sto
> cercando di riassumere!!!)
> Con Office 2003, se non sbaglio, è necessario acquistare Visual Studio
> Tools per Microsoft Office System per poter creare un applicativo che gira
> senza Access.
> La prima domanda è se è corretto quanto affermato sopra.
Si.
> La seconda domanda è se Visual Studio.net Professional può sostituire
> Tools di cui sopra???
No.
> Grazie a tutti.
> Saluti
Prego :-)
--
Pablitomf (Maurizio Facciuti)
“Quando non ti eserciti ricorda che qualcuno in qualche posto si sta
allenando e, quando lo incontrerai, ti batterà”.
Ed Macauley



title: Storicizzare valori : ricalcolo o tabelle separate ?

author: Francesca

text:
salve,
googlando to trovato varie opinioni su quale sia il miglior modo di
costruire uno storico (storicizzare dei valori) :
Limitandoci ad un database per emissioni fatture :
conviene effettuare delle query d'accodamento in tabelle apposite o
affidarsi alle query (giocando sui vari campi data) ?
i pro e i contro dell'opzione ?
grazie.


author: Ungi

text:
"Francesca" <
nospa...@spam.it
> ha scritto nel messaggio
news:476a46c9$0$3315$6e1e...@read.cnntp.org...

Personalmente uso la seconda opzione, utilizzando un apposito campo chiamato
Anno per filtrare i dati e non affidandomi al solo campo Data, in questo
modo si può avere lo storico di tutti gli anni di un determinato Cliente o
Fornitore in modo molto semplice, il contro di questa opzione è che
ovviamente cresce molto la dimensione della tabella
Ungi


title: stampare record filtrati in una maschera

author: Cidi

text:
ciao a tutti
AXP
maschera di ricerca con origine dati una query parametrica.
con questo codice su evento clic di un pulsante:
  stDocName = "rRiepilogoImpegno1"
     DoCmd.OpenReport stDocName, acPreview, , Me.Filter
dovrei stampare i soli record filtrati
ma il report mi fa vedere tutti i record.
non riesco a trovare l'errore.
qualche idea ...suggerimenti
grazie a tutti per l'attenzione

Daniele


text:

scusate, ho trovato l'errore nell'origine report.
funziona tutto.

buona giornata a tutti

Daniele


title: Tabelle: Nuovi campi dopo divisione file e creazione mde del fe.

author: Zappus

text:
Salve a tutti,
per l'appunto dopo aver diviso un data base, in alcune tabelle mi sono
comparsi nuovi campi, tutti apparentemente con lo stesso nome :
s_ColLineage; s_Generation; s_GUID; s_Lineage.
Il programma continua a funzionare correttamente, ma ho notato che un campo
contatore di una tabella adesso parte da numeri incredibili: -678244657
oppure -1285794716 ecc... .
Non che questo mi complichi le funzioni del programma ma vorrei capire se
posso continuare tranquillamente ad usarlo oppure se questi strani campi e
questi contatori assurdi possono in qualche modo danneggiare funzioni o
quant'altro.
Grazie Luca


author: Cinzia

text:
"Zappus" <
luca...@aliceposta.it
> ha scritto nel messaggio
news:bN5Ge.14885$2U1.1...@news3.tin.it...

Ciao Luca,
di solito i campi di cui parli vengono creati quando fai una replica del db,
non è che oltre a dividere il db l'hai anche replicato?
Se l'hai fatto per errore e vuoi ritornare allo stato normale prova questi
suggerimenti
http://office.microsoft.com/it-it/assistance/HP052167901040.aspx
Saluti
Cinzia


author: Roberto dalla campagna

text:
"Zappus" <
luca...@aliceposta.it
> ha scritto nel messaggio
news:bN5Ge.14885$2U1.1...@news3.tin.it...

Non dovresti aver problemi: valori come tu dici "assurdi" si possono avere
in un campo di tipo Contatore nel caso in cui nella struttura della tabella
è stato impostata a Casuale invece che a Incremento la proprietà di campo
Nuovi valori del contatore.
Se invece non sei in questa condizione e non stai usando una replica Access
di un database, allora la cosa è decisamente strana e merita di essere
approfondita.
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


text:
"Zappus" <
luca...@aliceposta.it
> ha scritto nel messaggio
news:bN5Ge.14885$2U1.1...@news3.tin.it...

OK Grazie ragazzi mi avete tranquillizzato....
Luca


title: errore run-time '3021' su funzione borrelli

author: no spam @email.it Marco

text:
Un tempo saltuariamente, ora molto spesso compare l'errore run-time '3021'
sulla funzione per colorare i record:
' Autore: Silvio Savoldi
'
silvio....@libero.it
'*****
' Qualora i records da evidenziare si trovassero in una SubForm
' la formula di Formattazione Condizionale invocata dai vari controlli sarà:
' GetRecNum(Forms!<NomeFormPrincipale>!<NomeCorniceSubForm>.Form) mod 2 <> 0
'*****
Public Function GetRecNum(ByRef Frm As Form) As Long
' (La funzione in oggetto è stata postata da Maurizio Borrelli su
it.comp.appl.access)
' restituisce "Numero Riga" record corrente
'============================================================
    'Name : GetRecNum()
    'Purpose :
    'Author : Maurizio Borrelli
    'Date : 01 febbraio 2002
    'Called by :
    'Calls :
    'Inputs :
    'Output : Posizione assoluta del record corrente+1
'============================================================
 On Error GoTo erh
    With CodeContextObject.RecordsetClone
        If Not (.BOF And .EOF) Then
            .Bookmark = CodeContextObject.Bookmark
            GetRecNum = .AbsolutePosition + 1
        End If
    End With
ext:
    Exit Function
erh:
    GetRecNum = 0
End Function
naturalmente ci sono record nella maschera sottomaschera, la funzione va o
si pianta qui .Bookmark = CodeContextObject.Bookmark, se chiudo e riapro il
db l'errore non si presenta più per la sessione finchè non viene spento il
pc.
Come posso risolvere?
Esistono eventualmente altri modi semplici per ottenere una colorazione
alternata in una sottomaschera?
grazie


author: Alessandro Baraldi

text:
Marco ha scritto:

L'errore non è nella funzione di Maurizio, nè nel codice di Silvio,
ma di sicuro è dovuto all'insieme delle 2 situazioni....!
In pratica singolarmente le considerazioni sono funzionali, ma usate
insieme fanno cilecca...!
Prova a verificare se, su esecuzione della funzione di Maurizio,
l'oggetto espresso da CodeContextObject è realmente la SubForm e non
qualcosa d'altro....!!
@Alex


text:
"Alessandro Baraldi"  wrote
>L'errore non è nella funzione di Maurizio, nè nel codice di Silvio,
>ma di sicuro è dovuto all'insieme delle 2 situazioni....!
bhe certo, ho solo riportato la situazione generale.
>In pratica singolarmente le considerazioni sono funzionali, ma usate
>insieme fanno cilecca...!
>Prova a verificare se, su esecuzione della funzione di Maurizio,
>l'oggetto espresso da CodeContextObject è realmente la SubForm e non
>qualcosa d'altro....!!
Ti sarei grato se potessi tradurre con un esempio, o indicarmi con quali
comandi  posso verificare.
@Alex
ciao


text:
Marco ha scritto:
[CUT]
> >Prova a verificare se, su esecuzione della funzione di Maurizio,
> >l'oggetto espresso da CodeContextObject è realmente la SubForm e non
> >qualcosa d'altro....!!
>
> Ti sarei grato se potessi tradurre con un esempio, o indicarmi con quali
> comandi  posso verificare.
Il brutto del copia incolla....
Con il Debug verifica il nome dell'oggetto CodeContextObject magari con
un
Debug.Print CodeContextObject.name e verifica nella finestra
immediata(CTRL+G) dopo aver messo un BreakPoint..... insomma ti devi un
pò muovere anche per conoscere quello che stai usando....
@Alex


text:
"Alessandro Baraldi"  wrote
>Il brutto del copia incolla....
>Con il Debug verifica il nome dell'oggetto CodeContextObject magari con un
>Debug.Print CodeContextObject.name e verifica nella finestra
>immediata(CTRL+G) dopo aver messo un BreakPoint..... insomma ti devi un
>pò muovere anche per conoscere quello che stai usando....
In maschere il nome è:
tblNome_subform1 che ha origine dalla tabella tblNome
Nella maschera che contiene la sottomaschera l'origine è tblNome_subform1
mentre il nome è frmtblNome_subform1
nella formattazione condizionale la formula é
GetRecNum([Forms]![NomeMaschera]![frmtblNome_subform1].[Form]) Mod 2<>0
La finestra immediata restituisce tblNome_subform1
>@Alex
ciao


text:
Marco ha scritto:

Ma lo restituisce quando funziona o quando da l'errore...???
Da quanto hai detto, almeno per me, sembrerebbe tutto OK.... ovvio che
se quando hai testato
non restituiva errore è normale...!
@Alex


author: Marco

text:
"Alessandro Baraldi" wrote
>Ma lo restituisce quando funziona o quando da l'errore...???
sempre
>Da quanto hai detto, almeno per me, sembrerebbe tutto OK.... ovvio che
>se quando hai testato
>non restituiva errore è normale...!
io ho aggiunto al codice
....
            .Bookmark = CodeContextObject.Bookmark
Debug.Print CodeContextObject.name
            GetRecNum = .AbsolutePosition + 1
....
la finestra immediata  restituisce tblNome_subform1  "multiplo"
se metto il Breakpoint su GetRecNum = .AbsolutePosition + 1 "singolo", ma
penso sia normale.
Comunque l'errore lo fa sempre.
A volte capita che posizionandosi sopra alla riga contrassegnata con il
mouse ci siano ulteriori indicazioni dell'errore in questa situazione invece
non c'è nulla.
>@Alex
ciao


text:
Marco ha scritto:

Sono spiacente Marco ma non saprei proprio cosa suggerirti visto che
apparentemente sembrerebbe normale...!
@Alex


title: Campo Vero / Falso con SQL2000

author: Eugenio

text:
Buongiorno.
Ho un'applicazione Access97 che utilizza com database SQLserver7. Ci sono
alcune query che filtrano i dati in base al valore di un campo bit. Access
utilizza -1 per Vero e 0 per Falso e con questi valori le query vengono
eseguite correttamente.
In ambiente di prova sto provando la stessa applicazione, ma con il database
SQL2000 e le mie query non funzionano piů, perchč il valore vero = 1 e non
piů -1.
Perň se guardo la tabella il valore contenuto nel mio campo lo vedo come -1
e se faccio un filtro per 1, vedo tutte le righe, mentre se lo faccio
per -1, non vedo nulla.
Come č possibile?
Cosa fare per risolvere il mio problema?
Grazie
Ciao
Eugenio


title: Campo Vero / Falso con SQL2000

text:

Nessuno ha mai riscontrato questo problema?


title: Campo Vero / Falso con SQL2000

author: Sergio MAZZA

text:
"Eugenio" <
epiw...@tiscali.it
> ha scritto nel messaggio
news:424cf850$0$8084$5fc...@news.tiscali.it...

Ti hanno risposto nell'altro NG dove hai scritto...
Ciao.
--
Sergio MAZZA


title: Campo Vero / Falso con SQL2000

text:
> >> Buongiorno.
> >>
> >> Ho un'applicazione Access97 che utilizza com database SQLserver7. Ci
sono
> >> alcune query che filtrano i dati in base al valore di un campo bit.
> >> Access
> >> utilizza -1 per Vero e 0 per Falso e con questi valori le query vengono
> >> eseguite correttamente.
> >>
> >> In ambiente di prova sto provando la stessa applicazione, ma con il
> > database
> >> SQL2000 e le mie query non funzionano più, perchè il valore vero = 1 e
> >> non
> >> più -1.
> >>
> >> Però se guardo la tabella il valore contenuto nel mio campo lo vedo
> > come -1
> >> e se faccio un filtro per 1, vedo tutte le righe, mentre se lo faccio
> >> per -1, non vedo nulla.
> >>
> >> Come è possibile?
> >> Cosa fare per risolvere il mio problema?
> >>
> >> Grazie
> >> Ciao
> >> Eugenio
> >>
> >>
> >
> > Nessuno ha mai riscontrato questo problema?
> >
>
>
> Ti hanno risposto nell'altro NG dove hai scritto...
>
> Ciao.
>
> --
> Sergio MAZZA
>
>
Beh, ma quello è il NG di Microsoft, ho letto e ho replicato. Aspetto una
eventuale replica di Giorgio, se potrà darmi ulteriori suggerimenti.
Ciò non significa che se devo risolvere il mio problema non possa rivolgermi
in un altrro NG o forum.
Mi stai dicendo che non è possibile?
Grazie
Ciao
Eugenio


title: Campo Vero / Falso con SQL2000

text:
"Eugenio" <
epiw...@tiscali.it
> ha scritto nel messaggio
news:424cfcb4$0$18150$5fc...@news.tiscali.it...
>
> Beh, ma quello è il NG di Microsoft, ho letto e ho replicato. Aspetto una
> eventuale replica di Giorgio, se potrà darmi ulteriori suggerimenti.
> Ciò non significa che se devo risolvere il mio problema non possa
> rivolgermi
> in un altrro NG o forum.
> Mi stai dicendo che non è possibile?
>
> Grazie
> Ciao
> Eugenio
Secondo me bastava inviarne uno di messaggio visto che Giorgio ed altri
spaziano in entrambi gli NG; comunque se non hai avuto risposta nei (tuoi)
tempi previsti non significa che non ne avrai alcuna in tempi successivi...
Ciao.
--
Sergio MAZZA


title: Campo Vero / Falso con SQL2000

text:
> Secondo me bastava inviarne uno di messaggio visto che Giorgio ed altri
> spaziano in entrambi gli NG; comunque se non hai avuto risposta nei (tuoi)
> tempi previsti non significa che non ne avrai alcuna in tempi
successivi...
>
> Ciao.
>
> --
> Sergio MAZZA
>
>
Grazie...


title: Immagine in una maschera visibile se - Access 2007

text:
Salve a TUTTI,
in passato ho fatto la stessa domanda, ma non riesco a far funzionare l'esempio che mi è stato suggerito. Io vorrei in una maschera fa comparire una delle due immagini in base ad un risultato di una casella di testo,magari su un evento per esempio: "su uscita". In altre parole, mettendo le immagini di due cestini, vorrei visualizzare nella maschera quello pieno quando il risultato è maggiore di zero, quello vuoto quando il risultato della casella di testo è zero.
Potete aiutarmi?
Grazie Fabio


author: BFS

text:
Il 18/10/2014 17:50,
z.f...@gmail.com
 ha scritto:
> Salve a TUTTI,
> in passato ho fatto la stessa domanda, ma non riesco a far funzionare l'esempio
> Potete aiutarmi?
> Grazie Fabio
>

non so cosa ti abbiano suggerito...
cmq in vba l'immagine di un controllo immagine si imposta con :

NomeTuoControlloImmagine.picture="c:\.....\pippo.bmp"

quindi va da se che con un

if tua condizione then
	NomeTuoControlloImmagine.picture="c:\.....\pippo.bmp"
else
	NomeTuoControlloImmagine.picture="c:\.....\pluto.bmp"
endif

altra soluzione...se le immagini sono sempre le stesse è di inserirle
entrambe gia nella form...e di attivarne il visible  si/no in base alla
tua condizione

ciao
BFS


text:
Il giorno sabato 18 ottobre 2014 17:50:42 UTC+2,
z.f...@gmail.com
 ha scritto:
> Salve a TUTTI, in passato ho fatto la stessa domanda, ma non riesco a far funzionare l'esempio che mi è stato suggerito. Io vorrei in una maschera fa comparire una delle due immagini in base ad un risultato di una casella di testo,magari su un evento per esempio: "su uscita". In altre parole, mettendo le immagini di due cestini, vorrei visualizzare nella maschera quello pieno quando il risultato è maggiore di zero, quello vuoto quando il risultato della casella di testo è zero. Potete aiutarmi? Grazie Fabio

Grzia BFS per la Tua risposta,
le immagini che devo usare sono sempre le stesse e le vorrei inserire stabili nella Form. Il problema per me che NOn so scrivere in VBA è che nella casella delle proprietà dell'oggetto mi accetta visibile si/no e non mi fa scrivere una condizione. Potresti aiutarmi con qualche rica di codice da incollare nel mio DB, o con un esempio?
Grazie Fabio


text:
Il 20/10/2014 12:21,
z.f...@gmail.com
 ha scritto:
> Il giorno sabato 18 ottobre 2014 17:50:42 UTC+2,
z.f...@gmail.com
 ha scritto:
>> Salve a TUTTI, in passato ho fatto la stessa domanda, ma non riesco a far funziona
>
> Grzia BFS per la Tua risposta,
> le immagini che devo usare sono sempre le stesse e
> Grazie Fabio
>

supponiamo che la tua maschera si chiami frmPippo
e di avere nella maschera una textbox chiamata txtPluto
e le due immagini img1 e img2 entrambe invisibili
e vuoi che sela textox contiene "a" allora img1 sia visibile altrimenti
sia visibile img2
sull'evento "su corrente" della tua form scrivi

if me.texPluto="A" then
	me.img1.visible=true
	me.img2.visible=false
else
	me.img1.visible=false
	me.img2.visible=true
endif

ciao


text:
Il giorno lunedì 20 ottobre 2014 14:18:14 UTC+2, BFS ha scritto:
> Il 20/10/2014 12:21,
z.f...@gmail.com
 ha scritto: > Il giorno sabato 18 ottobre 2014 17:50:42 UTC+2,
z.f...@gmail.com
 ha scritto: >> Salve a TUTTI, in passato ho fatto la stessa domanda, ma non riesco a far funziona > > Grzia BFS per la Tua risposta, > le immagini che devo usare sono sempre le stesse e > Grazie Fabio > supponiamo che la tua maschera si chiami frmPippo e di avere nella maschera una textbox chiamata txtPluto e le due immagini img1 e img2 entrambe invisibili e vuoi che sela textox contiene "a" allora img1 sia visibile altrimenti sia visibile img2 sull'evento "su corrente" della tua form scrivi if me.texPluto="A" then me.img1.visible=true me.img2.visible=false else me.img1.visible=false me.img2.visible=true endif ciao

Il giorno lunedì 20 ottobre 2014 14:18:14 UTC+2, BFS ha scritto:
> Il 20/10/2014 12:21,
z.f...@gmail.com
 ha scritto: > Il giorno sabato 18 ottobre 2014 17:50:42 UTC+2,
z.f...@gmail.com
 ha scritto: >> Salve a TUTTI, in passato ho fatto la stessa domanda, ma non riesco a far funziona > > Grzia BFS per la Tua risposta, > le immagini che devo usare sono sempre le stesse e > Grazie Fabio > supponiamo che la tua maschera si chiami frmPippo e di avere nella maschera una textbox chiamata txtPluto e le due immagini img1 e img2 entrambe invisibili e vuoi che sela textox contiene "a" allora img1 sia visibile altrimenti sia visibile img2 sull'evento "su corrente" della tua form scrivi if me.texPluto="A" then me.img1.visible=true me.img2.visible=false else me.img1.visible=false me.img2.visible=true endif ciao

BFS GRAZIE!!!
Fatto! Grazie ancora e conto su di Voi anche per il futuro!
Fabio


text:
Ho cantato vittoria troppo presto!
Il codice funziona, ma quando faccio: COMPATTA E RIPRISTINA poi non funziona piu, nel senso che la maschera dove i due cestini vengono visualizzati, l'ho chiamata HP e mi serve per fare delle ricerche su varie tabelle, utilizzando la funzione nz, quando compatto sembra che poi la query non riconosca piu' i parametri i chiede sempre di inserire i parametri. E' difficile da spiegare, ma chiedo Aiuto.
Grazie F.


title: che variabile e asseganzione devo usare

author: nwrr

text:
NomeMaschera!NomeControllo.Form.RecordsetClone
voglio usare questo riga di codice però con altre proprietà
quindi devo creare una variabile di che tipo?
credo che si faccia così:
Dim Tutto as objet
Set Tutto=NomeMaschera!NomeControllo.Form.RecordsetClone
e poi per usare le proprietà posso fare
Tutto.Recordcount etc
si fa così? e poi alla fine della sub si deve azzerare qualcosa e come
si fa?


title: che variabile e asseganzione devo usare

author: Antonio Biso

text:
nwrr <
nwrrAN...@lycos.it
> wrote in message 3C45E079...@lycos.it...
> NomeMaschera!NomeControllo.Form.RecordsetClone
>
> voglio usare questo riga di codice però con altre proprietà
> quindi devo creare una variabile di che tipo?
> credo che si faccia così:
> Dim Tutto as objet
> Set Tutto=NomeMaschera!NomeControllo.Form.RecordsetClone
Il recordsetclone è un recordset quindi dovrai assegnarlo ad una var di tipo
recordset
> e poi per usare le proprietà posso fare
> Tutto.Recordcount etc
recordcount lo puoi applicare direttamente al recordsetclone senza settarlo
ad alcuna variabile
Antonio


title: che variabile e asseganzione devo usare

text:
>
> > NomeMaschera!NomeControllo.Form.RecordsetClone
> >
> > voglio usare questo riga di codice però con altre proprietà
> > quindi devo creare una variabile di che tipo?
> > credo che si faccia così:
> > Dim Tutto as objet
> > Set Tutto=NomeMaschera!NomeControllo.Form.RecordsetClone
>
> Il recordsetclone è un recordset quindi dovrai assegnarlo ad una var di tipo
> recordset
>
> > e poi per usare le proprietà posso fare
> > Tutto.Recordcount etc
>
> recordcount lo puoi applicare direttamente al recordsetclone senza settarlo
> ad alcuna variabile
>
> Antonio
Dim RecordMio as Recordset
Set RecordMio = NomeMaschera!NomeControllo.Form.RecordsetClone
quindi se voglio applicare la proprietà recordcount
RecordMio.recordcount
o per esempio il findfirst
RecordMio.findfirst
1) giusto?
però a questo punto (ho dato un'occhiata ai recordset)
devo alla fine di una sub dove uso il RecordMio
aggiungere
RecordMio.close
set RecordMio= nothing
proprio come si fa per i recordset normali
2)esatto?
(a proposito sto cercando di capire al meglio come funziona il recordsetclone in
relazione ad controllo con sottomaschera
a seguito della tua prima delucidazione)
thank you di nuovo


title: che variabile e asseganzione devo usare

text:
nwrr <
nwrrAN...@lycos.it
> wrote in message 3C461BC3...@lycos.it...
> >
> > recordcount lo puoi applicare direttamente al recordsetclone senza
settarlo
> > ad alcuna variabile
> >
> > Antonio
>
> Dim RecordMio as Recordset
> Set RecordMio = NomeMaschera!NomeControllo.Form.RecordsetClone
> quindi se voglio applicare la proprietą recordcount
> RecordMio.recordcount
> o per esempio il findfirst
> RecordMio.findfirst
> 1) giusto?
Perfetto
anche se potresti fare:
NomeMaschera!NomeControllo.Form.RecordsetClone.recordcount
> perņ a questo punto (ho dato un'occhiata ai recordset)
>
> devo alla fine di una sub dove uso il RecordMio
> aggiungere
> RecordMio.close
> set RecordMio= nothing
> proprio come si fa per i recordset normali
> 2)esatto?
Ti basta fare set RecordMio= nothing per eliminare l'istanza dell'oggetto
> (a proposito sto cercando di capire al meglio come funziona il
recordsetclone in
> relazione ad controllo con sottomaschera
> a seguito della tua prima delucidazione)
Ripeto, ti da il recordset dei record visualizzati in sottomaschera in quel
momento!
Antonio


title: che variabile e asseganzione devo usare

text:
> > Dim RecordMio as Recordset
> > Set RecordMio = NomeMaschera!NomeControllo.Form.RecordsetClone
> > quindi se voglio applicare la proprietà recordcount
> > RecordMio.recordcount
> > o per esempio il findfirst
> > RecordMio.findfirst
> > 1) giusto?
>
> Perfetto
(quando si ha un buon prof.-senza fare nomi-)
> anche se potresti fare:
> NomeMaschera!NomeControllo.Form.RecordsetClone.recordcount
volevo usare la variabile per rendere il codice più leggibile infatti i primi
due nomi che
ho usato sno molto lunghi e poi volevo usare anche altre proprietà tipo delete
nomatch
findfirst etc. ecco perchè miserviva una var pertinente
a proposito c'è una lunghezza massima dei nomi? fino a 64 caratteri mi sembra.
>  devo alla fine di una sub dove uso il RecordMio
> > aggiungere
> > RecordMio.close
> > set RecordMio= nothing
> > proprio come si fa per i recordset normali
> > 2)esatto?
> Ti basta fare set RecordMio= nothing per eliminare l'istanza dell'oggetto
ok il close non serve, in effetti pur non capendoci quasi nulla ho notato che
nei recordset
si mette il close perchè suppongo prima faccio un openrecordset.
ma se uno dimentica nei recordset di mettere close e nothing cosa succede al db
nel caso di close dimenticato e nel caso di nothing?


title: che variabile e asseganzione devo usare

author: Emyr

text:


non liberi le risorse e dopo un pò si pianta tutto?
Saluti.
Emanuele.


title: che variabile e asseganzione devo usare

text:
nwrr <
nwrrAN...@lycos.it
> wrote in message 3C47146F...@lycos.it...
> > anche se potresti fare:
> > NomeMaschera!NomeControllo.Form.RecordsetClone.recordcount
>
> volevo usare la variabile per rendere il codice più leggibile infatti i
primi
> due nomi che
> ho usato sno molto lunghi e poi volevo usare anche altre proprietà tipo
delete
> nomatch
> findfirst etc. ecco perchè miserviva una var pertinente
Ok, era solo per dirti che non era necessario
> a proposito c'è una lunghezza massima dei nomi? fino a 64 caratteri mi
sembra.
Dovrebbe essere 256
> > Ti basta fare set RecordMio= nothing per eliminare l'istanza
dell'oggetto
>
> ok il close non serve, in effetti pur non capendoci quasi nulla ho notato
che
> nei recordset
> si mette il close perchè suppongo prima faccio un openrecordset.
> ma se uno dimentica nei recordset di mettere close e nothing cosa succede
al db
>
> nel caso di close dimenticato e nel caso di nothing?
Succede che non hai liberato la memoria e potrebbe capitare che Access dopo
un po' si pianti, ti dia errori di sforamenti di memoria oppure quel
problema della finestra access che non si chiude
Antonio


title: colore nelle form

author: Sthepan

text:
Salve,
qualcuno puň dirmi se si puň sostituire il colore delle form con altri
colori che non siano quei pochi del menů sfondo?
Se si, come si fa?
grazie ciao
Sthepan


title: colore nelle form

author: ALESSANDRO Baraldi

text:
"Sthepan" <
sth...@supereva.it
> ha scritto nel messaggio
news:18kgibbtb15em$.1mqoyjx1nw3z1$.dlg@40tude.net...
> Salve,
>
> qualcuno può dirmi se si può sostituire il colore delle form con altri
> colori che non siano quei pochi del menù sfondo?
> Se si, come si fa?
>
> grazie ciao
> Sthepan
Vai nelle proprietà della Form ed accedi alla proprietà
Colore di Fondo.... a destra ti appare un Pulsante "..."
che ti fa accedere al ColorBrowser.
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: colore nelle form

author: luigiOnofrio

text:
ALESSANDRO Baraldi ha scritto:
> "Sthepan" <
sth...@supereva.it
> ha scritto nel messaggio
> news:18kgibbtb15em$.1mqoyjx1nw3z1$.dlg@40tude.net...
> > Salve,
> >
> > qualcuno può dirmi se si può sostituire il colore delle form con altri
> > colori che non siano quei pochi del menù sfondo?
> > Se si, come si fa?
> >
> > grazie ciao
> > Sthepan
> Vai nelle proprietà della Form ed accedi alla proprietà
> Colore di Fondo.... a destra ti appare un Pulsante "..."
> che ti fa accedere al ColorBrowser.
> Ciao
e se ci si vuole mettere un motivo?
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: colore nelle form

author: ciroteo

text:
"luigiOnofrio" <
onof...@tin.it
> ha scritto nel messaggio
news:cpjhcj$egm$1...@news.newsland.it...

non credo che si possa. L'unica cosa che potresti fare è mettere come sfondo
un immagine, e li puoi sbizzarrirti se sei un esperto grafico!.
La cosa che chiedi ha una qualche utilità oppure è solo un vezzo estetico?


title: colore nelle form

text:
"luigiOnofrio" <
onof...@tin.it
> wrote in message
news:cpjhcj$egm$
1...@news.newsland.it
[CUT]
>
> > Vai nelle proprietą della Form ed accedi alla proprietą
> > Colore di Fondo.... a destra ti appare un Pulsante "..."
> > che ti fa accedere al ColorBrowser.
>
> > Ciao
>
> e se ci si vuole mettere un motivo?
E' lui che vuole o sei tu che vuoi un Motivo...?
In ogni caso c'č la proprietą Immagine di Sezione
che ottempera pienamente a questo.
@ALex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: colore nelle form

text:
Alessandro Baraldi ha scritto:
> "luigiOnofrio" <
onof...@tin.it
> wrote in message
> news:cpjhcj$egm$
1...@news.newsland.it
> [CUT]
> >
> > > Vai nelle proprietą della Form ed accedi alla proprietą
> > > Colore di Fondo.... a destra ti appare un Pulsante "..."
> > > che ti fa accedere al ColorBrowser.
> >
> > > Ciao
> >
> > e se ci si vuole mettere un motivo?
> E' lui che vuole o sei tu che vuoi un Motivo...?
 č a me che č venuta questa curiositą pensando alla creazione guidata di
una maschera, quando access chiede di scegliere uno stile fra quelli
disponibili e in cui vi sono appunti degli sfondi non uniformi. Alludevo a
quelli!!! come fare per modificarli o sostituirli con altre immagini di
mia scelta.
> In ogni caso c'č la proprietą Immagine di Sezione
> che ottempera pienamente a questo.
č valido per quello che ho detto poc'anzi?
> @ALex



title: colore nelle form

text:
"luigiOnofrio" <
onof...@tin.it
> wrote in message
news:cpjtom$trn$
1...@news.newsland.it
[CUT]
>  è a me che è venuta questa curiosità pensando alla creazione guidata di
> una maschera, quando access chiede di scegliere uno stile fra quelli
> disponibili e in cui vi sono appunti degli sfondi non uniformi. Alludevo a
> quelli!!! come fare per modificarli o sostituirli con altre immagini di
> mia scelta.
>
> > In ogni caso c'è la proprietà Immagine di Sezione
> > che ottempera pienamente a questo.
>
> è valido per quello che ho detto poc'anzi?
> > @ALex
Hai provato a segure quello che ho detto....???
Hai fatto qualche test sulla cosa....???
Serve anche un pò di iniziativa non credi...?
Saluti.
@Alex



title: colore nelle form

author: Franco

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:55f4d2a1d42929d8f6...@mygate.mailgate.org...

Forse quello che cerchi è questo:
Con Paint ti crei uno sfondo  settando gli attributi ad es. 32 x 32
Salvi l'immagine in una cartella.
Apri Access  e poi nuovo database
Creai una maschera in visualizzazione struttura (le dimensioni non hanno
importanza). Nelle proprietà formato della maschera cerchi la parola
immagine e ci metti, cercandola nella cartella dove hai salvato quella
fatta, e setti la voce espansione a Si.
Fatto questo chiudi le proprietà e fai click sul menu formato. Vedi che è
attiva la voce formattazione automatica, click e si apre una maschera. Fai
click sulla voce personalizza e poi selezioni l'opzione " crea nuovo formato
..........
Click su Ok e ti chiede di assegnare un nome alla nuova formattazione.
Assegnato il nome fai ckick su Ok e puoi vedere che il nuovo formato è stato
aggiunto all'alenco.
Esci pure da access senza che sia necessario salvare la maschera. Inoltre
volendo puoi cancellare anche il database (che in realtà non contiene
niente).
Tutte le volte che crei un nuovo database e poi crei una maschera con
"creazione guidata maschera" vedrai che quando arrivi a dover inserire lo
sfondo nell'elenco c'è quello che hai creato.
Ciao Franco


title: avere il numero dei record in recordset in sola lettura

author: tmtube

text:
eseguo il seguente codice
per avere gli allievi con almeno un abbonamento ma senza avere doppioni
il problema č che recordcount restituisce sempre 1 anche se sono 4
se eseguo rs.edit per avere recordcount mi risponde che "č in sola lettura"

come ottengo recordcount?

    Set rs = db.OpenRecordset("select distinct idallievo from abbonamenti
order by idallievo")
    If rs.RecordCount > 0 Then


author: Karl Donaubauer

text:
tmtube wrote:
> eseguo il seguente codice
> per avere gli allievi con almeno un abbonamento ma senza avere
> doppioni il problema è che recordcount restituisce sempre 1 anche se sono
> 4
> se eseguo rs.edit per avere recordcount mi risponde che "è in sola
> lettura"
> come ottengo recordcount?
>
>    Set rs = db.OpenRecordset("select distinct idallievo from
> abbonamenti order by idallievo")

rs.MoveLast

>    If rs.RecordCount > 0 Then

Vedi anche:
http://www.donkarl.com/it?FAQ6.17

altri commenti:
La raggione per la sola lettura è il DISTINCT.
Lascia perdere L'ORDER BY perché è già incluso nel DISTINCT.

--
Ciao
Karl
*********
Access FAQ:
http://www.donkarl.com/it


text:
>rs.MoveLast

cioč dovendo scorrerli dal primo all'ultimo tutti
prima vado all'ultimo per sapere il numero e poi ritorno al primo con
movefirts?


text:

Solo se il primo record ti interessa.
Non so per quali operazioni usi il rs.

Se ci sono molti record e il MoveLast č lento, ci sono alternative come

SELECT Count(*) AS NumRec
FROM (SELECT DISTINCT idallievo FROM abbonamenti)

Forse serve anche cliccare il link della prima risposta.



text:
>Se ci sono molti record e il MoveLast è lento, ci sono alternative come

>SELECT Count(*) AS NumRec
>FROM (SELECT DISTINCT idallievo FROM abbonamenti)

>Forse serve anche cliccare il link della prima risposta.

>--
>Ciao
>Karl
>*********
>Access FAQ:
http://www.donkarl.com/it

Grazie.


title: ho sbagliato

author: Warrant

text:
scusate, ma non avendo il db qui in ufficio non ho riflettuto su una cosa,
la query la utilizzo perchè devo anche calcolarmi un campo. Nella
tb_dettaglio ho solo il prezzo unitario, con la query mi calcolo il
prezzototale=quantità*prezzounitario.
Non sono ancora riuscito a capire come scrivere dentro una tb un valore
calcolato.
Ho creato la query per questo motivo


title: ho sbagliato

text:
"Warrant" <
webm...@cedsrl.it
> ha scritto nel messaggio
news:vTte8.12756$_u5.4...@news1.tin.it...
> scusate, ma non avendo il db qui in ufficio non ho riflettuto su una cosa,
> la query la utilizzo perchè devo anche calcolarmi un campo. Nella
> tb_dettaglio ho solo il prezzo unitario, con la query mi calcolo il
> prezzototale=quantità*prezzounitario.
>
> Non sono ancora riuscito a capire come scrivere dentro una tb un valore
> calcolato.
Sempre le stesse domande!!!
Nelle tabelle non si salvano i campi calcolati, proprio perchè puoi
calcolarli ogni volta che vuoi...
Antonio


title: ho sbagliato

author: Paolo P

text:
"Warrant" <
webm...@cedsrl.it
> ha scritto nel messaggio
news:vTte8.12756$_u5.4...@news1.tin.it...

Come dice il grande Antonio non ha senso scrivere il valore calcolato nella
tabella dato che lo potrai sempre ricavare con una query...realizza il tuo
sistema di maschera-sottomaschera basandoti sulle tabelle, nella
sottomaschera crei un controllo non associato "PrezzoTotale", nell'origine
riga scrivi  =quantità*prezzounitario.
Semplice e lineare.
Ciao Paolo


title: Maschera di input...BUG Access2000????

author: Marco Gualdrini

text:
Salve a tutti.
sono un neoutente Access2000. Ho usato Access qualche anno fa, adesso ho
dovuto rispolverarlo per esigenze di lavoro. Abbiamo acquistato Access2000,
che facciamo girare sia su Windows 2000 che su Windows98. Quasi subito mi
sono imbattuto in quello che sembra essere un bug.
Nella impostazione di una normale tabella anagrafica, vado ad inserire, in
Struttura, in corrispondenza del campo "nome", la maschera di input
>L<????????? (il campo e' di 10 caratteri), per avere la prima lettera,
obbligatoria, maiuscola, e le restanti 9 lettere, facoltative, minuscole.
Salvo la struttura e vado ad inserire dati. Scrivo il mio nome nella
tabella, e l'assistente di Office mi segnala un errore:
"Il valore immesso non e' valido per la maschera di input '?a<LLLLLLLLL'
specificata per il campo"
E che e'???? Io non ho inserito quella maschera!!! Il comportamento e'
analogo, anche se cambio la maschera di input i caratteri non vengono
riportati correttamente, e quindi la maschera viene cambiata... La cosa
accade sia sotto W2000 sia sotto W98.
Su Access97 ho verificato che invece tutto funziona bene...
Qualcuno ha notizia di questo bug? Soluzioni?
Ringrazio anticipatamente
Marco Gualdrini


title: Errore su chiusura forms

author: e-emme di Marzocchi Ennio

text:
Buongiorno.
Diversi clienti mi hanno chiamato in mattinata perchè alla chiusura di alcune forms, apparivano messaggi random quali "chiave di ricerca non trovata" oppure "nessun record corrente" ed addirittura riferimenti a campi che non fanno affatto parte della form interessata dall'errore.
In un caso ho solo disattivato una funzione del tutto ininfluente che visualizzava o nascondeva un pulsante, il che non ha molto a che fare coi messaggi di cui sopra.
Ho aggiornato anche l'Office (365 32 bit) ma non ho risolto.
Compattati backend e frontend.
Sembra tutto ok.
Non ho altre idee.
Qualche consiglio?
Grazie anticipatamente.


title: Errore su chiusura forms

text:
e-emme di Marzocchi Ennio:

Prova le procedure 2+3 (nuovo accdb + decompile) dell'articolo

Come procedere con database danneggiati
https://www.donkarl.com/it?FAQ1.27

--
Ciao
Karl
*********
Access News:
https://youtu.be/kUkLjfYwgg8

Access DevCon:
http://AccessDevCon.com

Access FAQ:
https://www.donkarl.com/it


title: Errore su chiusura forms

text:

Vecchi front-end perfettamente funzionanti adesso presentano lo stesso difetto.
Il be, se aperto direttamente, non scatena errori se aperto direttamente. Le relazioni sono a posto e alla chiusura delle tabelle non rilevo alcun problema.
Uno dei back-end era stato compattato e le dimensioni,dopo la compattazione, sono pressochè identiche.
 Adesso ho creato un nuovo BE ed ho importato le tabelle (nel be ci sono solo quelle).
Il difetto del FE persiste, non su tutte le finestre, solo alla chiusura delle stesse.
Ho notato anche che entrando ed uscendo dalle form, capita che in chiusura non restituiscano errori ma se prima di chiudere, clicco su un controllo o un campo, alla chiusura mi restituisce l'errore.
Nel dubbio cmq ho creato un nuovo front-end e ho importato tutti gli oggetti presenti (ma senza utilizzare decompile o modificando in testo il FE).