text:
On Wed, 22 Mar 2000 17:25:06 +0100, "Antonio Biso" <
ch...@etruria.net
>
wrote:
>C'eri quasi! Devi aggiungere un criterio su uno dei campi della tabella B
>scrivendo appunto come criterio is null
>In questo modo lui ti restituisce tutti i record di A che NON legano la
>tabella B, che infatti "restituisce campo null"
quasi-quasi prendo a testate la parete.... :-)
sapevo che doveva esserci una soluzione semplice :-)
grassieeeeeeeeeeeeeee :-)
(ieri ero riuscito ad ottenere lo stesso risultato con una query
contorta che incorporava 2 sottoquery una delle quali rieseguita per
ogni riga.... non era il massimo dell'efficienza su tabelle do 10000
righe... :-)))))
Ciao, Max


title: problema: estrarre dalla tabella A solo le righe che non compaiono nella tabella B; come lo faccio?

author: MarcoMax

text:
On Wed, 22 Mar 2000 17:18:58 +0100, "Ditta Cerri (Sib)"
<
cerriserv...@tiscalinet.it
> wrote:
>
>MarcoMax dice:
>> Allora, ho 2 tabelle, A e B.
>[cut]
>> Io cosa voglio? voglio una queri che mi estragga dalla tabella delgi
>
>Si dice query (con la Y)
ehm.... :-)
>> ordini A tutte le copie articolo-colore che non appartengono alla
>> categoria elencata in B.
>
>[cut]
>
>Si chiama query per dati non corrispondenti:
mmm
>SELECT DISTINCTROW Tabella1.aaa, Tabella1.bbb, Tabella1.ccc
>FROM Tabella1 LEFT JOIN Tabella2 ON Tabella1.aaa = Tabella2.azz
>WHERE (((Tabella2.azz) Is Null));
a che serve il DISTINCTROW?
>Questa estrae titti i record di Tabella1 in cui il campo aaa non trova una
>corrispondanza nel campo azz di Tabella2
>
>Ciao, Sib
>
>PS: c'era bisogno di scrivere un messaggio chilometrico con quelle
>tabellone??
sai.... ho pensato "e se poi mi spiego male e non capiscono?" :-)



author: Matteo Fortini

text:
MarcoMax wrote:
> SELECT A.articolo, A.colore
> FROM A INNER JOIN B ON (A.articolo=B.articolo AND A.colore=B.colore)
>
SELECT A.articolo, A.colore
FROM A
WHERE NOT EXISTS (SELECT articolo
                  FROM B
                  WHERE A.articolo = B.articolo
                        AND A.colore = B.colore);
Ti conviene scriverla in modalità SQL, altrimenti naturalmente Access te
la incasina scrivendo ((((((((((EXISTS ....)))))))))) = false)
Ciao,
    Matteo


author: Ditta Cerri (Sib)

text:
MarcoMax chiede:
> a che serve il DISTINCTROW?
Serve a fare visualizzare tutti i record distinti che rientrano nella query,
DISTINCT (senza ROW) serve a visualizzare tutte le righe distinte formate
dai campi scelti per essere visualizzati
> quasi-quasi prendo a testate la parete.... :-)
Per carita', potresti danneggiarti la parete ;-)
> sapevo che doveva esserci una soluzione semplice :-)
Ciao, Sib


title: Contatore/aa

text:
Buongiorno a tutti. Questa volta ho un problema molto più serio di
quello delle maschere colorate (che comunque non sono riuscito a
risolvere...)
Mi sono accorto di aver bisogno, nella mia tabella principale, di un
campo come in oggetto, tipo 01/06 - 02/06 - 03/06 - 01/07.... etc
ho trovato nel sito comune questo esempio:
="E" & Format(Date();"aa") & "/" &
Format(IIf(IsNull(DMax("MioContatore";"MiaTabella";"MioContatore like
'?" &
Format(Date();"aa") &
"/????'"));1;Right(DMax("MioContatore";"MiaTabella";"MioContatore like
'?" & Format(Date();"aa") & "/????'");4)+1);"0000")
che andrebbe impostato come valore predefinito del campo, e che
restituisce però qualcosa tipo"E06/0001".
Non sono in grado di modificarlo per le mie esigenze, qualcuno potrebbe
aiutarmi o, eventualmente indicarmi strade diverse? Nel NG non ho
trovato nulla..
Un saluto.


title: Contatore/aa

text:
T_A_O ha scritto:

Io ho usato per un caso simile al tuo una normale maschera di input del
tipo 0000/000 direttamente nel controllo della maschera, creata ad hoc
per l'occasione...


title: Contatore/aa

author: wlady

text:
T_A_O ha scritto:

non ho fatto un analisi completa, ma a prima vista credo potresti fare
così:
=Format(IIf(IsNull(DMax("MioContatore";"MiaTabella";"MioContatore like
'?" &
Format(Date();"aa") &
"/????'"));1;Right(DMax("MioContatore";"MiaTabella";"MioContatore like
'?" & Format(Date();"aa") & "/????'");4)+1);"0000") & "/" &
Format(Date();"aa")
prova e fammi sapere
ciao


title: Contatore/aa

text:
wlady ha scritto:

Grazie mille ad entrambi, ora provo...


title: Contatore/aa

text:
T_A_O ha scritto:

Se lo metto come campo numerico mi dice che è possibile ci sia un
operando senza l'operatore, non posso metterlo come contatore perche ho
già la chiave primaria contatore e mi è necessario resti
così....come posso fare? ne ho proprio bisogno....
Per quanto riguarda la soluzione di Gianluca mi sembra di capire che
dovrei inserirli manualmente i dati invece io avrei bisogno di un campo
che si aggiornasse in automatico.
E' un mondo difficile......


title: Contatore/aa

text:
wlady ha scritto:

Ho provato a metterlo nel valore predefinito controllo della mia chiave
primaria contatore ma sembra non funzioni, mi da il contatore come
sempre....


title: Contatore/aa

text:
T_A_O ha scritto:

credo tu possa usare una semplice funzione del tipo:
=DMax("CampoDaContare";"Tabella") & "/" & Format(Date();"aa")
ciao


title: Contatore/aa

text:
wlady ha scritto:

Non succede nulla di significativo wlady, sempre messo nel valore
predefinito dela campo contatore nella maschera, mi viene fuori solo il
numero, come se non facessi nulla.
Può essere rilevante che sia il nome del campo, ovverosia "N°
cliente" che il nome della tabella sono composti? ho provato anche con
"N°_cliente" ma non da segni di vita...
So che sono uno dei tuoi clienti peggiori......sorry.....


title: Contatore/aa

author: cidi

text:
"T_A_O" <
iln...@katamail.com
> ha scritto nel messaggio
news:1150440929....@f6g2000cwb.googlegroups.com...



Ciao T_A_O
prova con:
="E" & Format(Date();"aa") & "/" &
Format(IIf(IsNull(DMax("MioContatore";"MiaTabella";"MioContatore like
'?" &
Format(Date();"aa") &
"/??'"));1;Right(DMax("MioContatore";"MiaTabella";"MioContatore like
'?" & Format(Date();"aa") & "/??'");2)+1);"00")
tutto questo per funzionare lo devi mettere nel valore predefinito di un
controllo
della maschera ed il campo associato della tabella deve essere testo.
non puoi e non è conveniente(che io sappia) utilizzare il campo contatore
della tabella.
Daniele


title: Contatore/aa

text:
T_A_O ha scritto:

ma il campo è di tipo testo, vero?


title: Contatore/aa

text:
wlady ha scritto:

Ehm....no....ora provvedo e poi ti faccio sapere...grazie per
l'aiuto....


title: Contatore/aa

text:
T_A_O ha scritto:

Aggiornamento, la prima formula di wlady, con il campo testo mi darebbe
la formattazione che mi servirebbe, cioè 0001/06, il problema è che
non si autoincrementa sul nuovo record, rimane così.
la formula di daniele funziona ma mi da E/06/01 - E/06/02 e non è ciò
che mi serve....
La seconda formula di wlady mi da 06 - 06/06 - 06/06/06 ect.....
Buonanotte e a domani.....


title: Contatore/aa

text:
T_A_O ha scritto:

riprendo la formula di Daniele, cambiando un po' l'ordine degli
elementi:
= Format(IIf(IsNull(DMax("MioContatore";"MiaTabella";"MioContatore like
'?" &
Format(Date();"aa") &
"/??'"));1;Right(DMax("MioContatore";"MiaTabella";"MioContatore like
'?" & Format(Date();"aa") & "/??'");2)+1);"00") & "/" &
Format(Date();"aa")
è la stessa ma senza la E e con contatore e anno invertiti...
anche se a me non piace questa soluzione;
io scriverei il campo in programmazione dopo l'evento di inserimento
ciao


title: Contatore/aa

text:
wlady ha scritto:

Wlady, ma a te funziona? a me resta fermo a 01/06 su nuovo record.....


title: Contatore/aa

text:
T_A_O ha scritto:

mi viene un dubbio...mi posti esattamente quello che hai messo nel tuo
controllo?


title: Contatore/aa

text:
wlady ha scritto:

Eccolo:
= Format(IIf(IsNull(DMax("IdA";"tab clienti";"IdA like '?" &
Format(Date();"aa") &
"/??'"));1;Right(DMax("IdA";"tab clienti";"IdA like



title: Contatore/aa

text:
T_A_O ha scritto:

allora ci sono due problemi sostanziali:
1. La funzione DMax calcola il valore massimo e non funzionerà se
modifichiamo il campo aggiungendo /aa in quanto la funzione DMax non
riesce ad interpretarlo correttamente
2. C'è un errore nel confronto LIKE, in quanto è impostato un formato
sbagliato
l'ho riscritta in questo modo:
=Format(IIf(IsNull(DCount("IdA";"tab clienti";"IdA like '??/" &
Format(Date();"aa") & "'"));1;Right(DCount("IdA";"tab clienti";"IdA
like
'??/" & Format(Date();"aa") & "'");2)+1);"00") & "/" &
Format(Date();"aa")
naturalmente il campo IdA che tu specifichi nella formula deve essere
lo stesso dove inserisci il contatore..



title: Contatore/aa

text:
wlady ha scritto:

Ti presenterei mia sorella se ne avessi una... :)
Solo due dubbi, non è che così il numero massimo degli inserimenti è
99? posso inserirne 3785/06 giusto?
L'altro è, posso stare tranquillo che non mi facciano rientrare dalla
ferie a capodanno perchè rimane /06 e non /07? :)
Grazie mille, come sempre paziente e gentilissimo


title: Contatore/aa

text:
T_A_O ha scritto:

Il primo dubbio è fugato, effettivamente si fermava a 100 e non andava
più avanti, ho modificato così:
=Format(IIf(IsNull(DCount("IdA";"tab clienti";"IdA like '????/" &
Format(Date();"aa") & "'"));1;Right(DCount("IdA";"tab clienti";"IdA
like '????/" & Format(Date();"aa") & "'");2)+1);"0000") & "/" &
Format(Date();"aa")
Ora è perfetta!


title: Contatore/aa

text:
T_A_O ha scritto:

No, rettifico, a 100 mi ricomincia da 0001/06.... non mollarmi...ci
siamo quasi.....


title: Contatore/aa

text:
T_A_O ha scritto:

prova a impostare la data del tuo pc al 2007 così ti togli anche il
secondo dubbio ;)
non ce l'hai una cugina?
ciao!!


title: Contatore/aa

text:
wlady ha scritto:

Spero che tu abbia letto anche il seguito...avevo cantato vittoria
troppo presto...


title: Contatore/aa

text:
T_A_O ha scritto:

mi stai facendo fare gli straordinari...prova così:
=Format(IIf(IsNull(DCount("IdA";"tab clienti";"IdA like '????/" &
Format(Date();"aa") & "'"));'0001';DCount("IdA";"tab clienti";"IdA like
'????/" & Format(Date();"aa") & "'")+1);"0000") & "/" &
Format(Date();"aa")


title: Contatore/aa

text:
wlady ha scritto:

La statua nel giardino la vuoi semplice o equestre con cavallo rampante
e spada sguainata? :)
Scherzi a parte, grazie davvero, mi hai risolto un problemone!!!


title: Ordinamento date di due campi concatenati

text:
In una query ho creato un nuovo campo e ho concatenato due campi
[data1] e [data2] in un'unico valore chiamato [DATA] così che mi si
presenti un unico campo con l'insieme dei due campi, ma non riesco ad
ordinarlo in maniera crescente.
Come posso fare?
Grazie


title: AGGIORNARE QUERY CON CAMPI RAGGRUPPATI

author: GianniB

text:
Salve, in una maschera devo visualizzere il risultato di una query con la
somma di valori di alcuni campi. Fin qui tutto bene.
Il problema è che deve essere possibile selezionare i singoli record della
query, operazione che access nega in quanto sono presenti le somme di cui
sopra. Esiste un modo per aggirare l'ostacolo?


title: AGGIORNARE QUERY CON CAMPI RAGGRUPPATI

author: Pinko Pallino

text:
"GianniB" <
gia...@inwind.it
> ha scritto nel messaggio
news:Vyu79.71375$n04.2...@twister2.libero.it...

Fai una query di selezione dove ti vengono sommati i valori di alcuni campi
e la unisci ad un l'altra che te li visualizza singolarmente dandoti però
pure la somma dei precedenti..
Ciao, Pinko


title: AGGIORNARE QUERY CON CAMPI RAGGRUPPATI

text:
"Pinko Pallino" <
pinko_...@inwind.it
> ha scritto nel messaggio
news:LKu79.71422$n04.2...@twister2.libero.it...

Ciao, scusa l'ignoranza, ma non ho capito la tua soluzione: ho provato a
creare una query di unione, ma occorrono gli stessi campi in entrambe le
tabelle (e non li ho), ho provato a fare 2 query di selezione e poi una
terza query sulle prime 2: il recordset viene visualizzato correttamente, ma
non è aggiornabile...
poi spiegarmi + chiaramente la tua soluzione?
Grazie


title: Uso di variabile recordset a livello di modulo

author: Gigi

text:
Ho trovato difficoltà ad eseguire (in pratica non ci sono riuscito) un
openrecordset di una tabella creata a livello di codice di maschera,
utilizzando una variabile recordset dichiarata a livello di modulo.
la variabile viene vista correttamente.
la tabella viene creata regolarmente.
ciò che non funziona è l'openrecordset, in quanto mi dice "tipo non
corrispondente"
Sottolineo il fatto che ho creato la tabella con CreateTableDef assegnandola
ad una variabile tabledef ed ho usato come nome della tabella una stringa
"".
Ho ripetuto anche l'operazione assegnando un nome alla tabella, ma se non la
accodi all'insieme non ti ci fa lavorare.
Quello che voglio fare è lavorare su una variabile recordset a livello
globale contenente una tabella vera e propria senza che nulla venga accodato
agli oggetti tabledefs.
grazie a chi vorrà rispondermi


author: Sib

text:
"Gigi" dice

Prima di tutto, senza vedere il codice che hai scritto, non e' facile capire
se e dove ci possono essere errori, in ogni caso, se non mi inganno, un
oggetto tabledef creato da codice di fatto *non esiste* finche' non lo
accodi. non e' che quando lo crei e' pronto a funzionare. Se non lo accodi,
quando cerchi di aprirlo come recordset, Access non lo trova nell'insieme
TableDefs e quindi non apre un bel niente.
Se spieghi cosa vuoi fare e perche' non dovresti accodarlo forse arriviamo
da qualche parte.
Ciao, Sib


title: Gestione Errori dopo nuova installazione.

author: Alex De Rossi

text:
Salve a tutti,
dopo aver formatato il PC e rinstallato office 2000 le applicazioni create
in precedenza con una gestione degli errori su alcune funzion Dlooup che
tenevano conto della possibilità di un record NULL con err.number 94 non
vengono più intercettati , o meglio non si verificano.
Anche programmando il debug. faccendo si che il record trovato sia Null non
viene generato nessun error,  infatti  Debug.Print dlookup....= Null
debug.print err.number = 0
Chi mi sa aiutare?
Alessandro


author: MA

text:

Rivedi i riferimenti.
ciao MAssimiliano
--------------------------------
Inviato via
http://usenet.libero.it


text:
> >
> Rivedi i riferimenti.
> ciao MAssimiliano
>
>
I riferimenti sono tutti apposto.
Praticamente è successo questo, impostando +  variabili String normalmente
le imposto in questa maniera
Dim A,B,C as String
Quindi
C= Dlookup(...)
Il problema stava tutto nel dichiarare singolarmente le variabili String
Dim A as String
Dim B as String Etc...
In questa maniera l' errore viene generato.
Mi sembra di aver letto da qualche parte di diffidare nel usare l'
istruzione Dim per dichiara più variabili con la stessa proprietà....mi
sembra su Access 2000 manuale di Programmazione della Jackson, consiglio che
non avevo seguito :-(
Mi piacerebbe conoscere anche il parere dei più esperti!
Grazie
Alessandro


title: Inserire il simbolo Euro

author: Carlo DE LUCA

text:
Salve,

in un report, per ottenere la somma totale del costo dei corsi, nella etichetta
'Costo totale corsi' ho scritto la seguente strnga: =Somma([Costo)]

Fin qui tutto a pčosto, in quanto la stringa funziona.

Mi sono accorto perň che manca il simbolo dell'euro all'inizio della somma.

Come posso inserirlo nella stringa fatta: =Somma([Costo)]?

Carlo - Verona


title: Inserire il simbolo Euro

author: CIDI

text:
"Carlo DE LUCA" <
carlo...@alice.it
> ha scritto nel messaggio
news:507d0d7c$0$13275$4faf...@reader2.news.tin.it...

etichetta? forse non ho capito ....

se invece č una txtbox allora seleziona il formato

ciao

Daniele


title: Inserire il simbolo Euro

text:
"CIDI" <
dado...@spamtin.it
> ha scritto nel messaggio
news:k5jo3d$vp5$1...@speranza.aioe.org...
>
> "Carlo DE LUCA" <
carlo...@alice.it
> ha scritto nel messaggio
> news:507d0d7c$0$13275$4faf...@reader2.news.tin.it...
>> Salve,
>>
>> in un report, per ottenere la somma totale del costo dei corsi, nella
>> etichetta 'Costo totale corsi' ho scritto la seguente strnga: =Somma([Costo)]
>>
>> Fin qui tutto a pèosto, in quanto la stringa funziona.
>>
>> Mi sono accorto però che manca il simbolo dell'euro all'inizio della somma.
>>
>> Come posso inserirlo nella stringa fatta: =Somma([Costo)]?
>
> etichetta? forse non ho capito ....
>
> se invece è una txtbox allora seleziona il formato
>
> ciao
>
> Daniele
No, è lo scritto che il Report mette facendo la somma dei costi dei corsi,
attraverso la stringa =Somma([Costo)]?

La stringa funziona, infatti mi dà il Totale.

Io vorre anteporre al Totale, il simbolo dell'euro.

Devo modificare la stringa?

Carlo - Verona


title: Inserire il simbolo Euro

text:
On 17 Ott, 22:28, "Carlo DE LUCA" <
carlodel...@alice.it
> wrote:
> "CIDI" <
dadonz...@spamtin.it
> ha scritto nel messaggionews:k5jo3d$vp5$1...@speranza.aioe.org...
>
>
>
>
>
> > "Carlo DE LUCA" <
carlodel...@alice.it
> ha scritto nel messaggio
> >news:507d0d7c$0$13275$4faf...@reader2.news.tin.it...
> >> Salve,
>
> >> in un report, per ottenere la somma totale del costo dei corsi, nella
> >> etichetta 'Costo totale corsi' ho scritto la seguente strnga: =Somma([Costo)]
>
> >> Fin qui tutto a p osto, in quanto la stringa funziona.
>
> >> Mi sono accorto per che manca il simbolo dell'euro all'inizio della somma.
>
> >> Come posso inserirlo nella stringa fatta: =Somma([Costo)]?
>
> > etichetta? forse non ho capito ....
>
> > se invece una txtbox allora seleziona il formato
>
> > ciao
>
> > Daniele
>
> No, lo scritto che il Report mette facendo la somma dei costi dei corsi,
> attraverso la stringa =Somma([Costo)]?
>
> La stringa funziona, infatti mi d il Totale.
>
> Io vorre anteporre al Totale, il simbolo dell'euro.
>
> Devo modificare la stringa?
>
> Carlo - Verona- Nascondi testo citato
>
> - Mostra testo citato -

Ciao Carlo
Mi sembra strano che puoi inserire una formula in una etichetta se non
inserendo la formula un un codice e assegnare il risultato al
"Caption" dell'etichetta;
secondo me si tratta di un textbox come diceva CIDI e a questo punto
segui il suo consiglio che è anche mio:
Imposta il formato del textbox a tipo: Valuta.

Saluti
M7a1x


title: Inserire il simbolo Euro

text:
Hai (avete) ragione.

In Formato, non ero andato più giù con lo scrolling, dove giustamente c'è
l'euro.

Come si dice? A volte ci si perde in un bicchier d'acqua!

Carlo

"M7a1x" <
melm...@gmail.com
> ha scritto nel messaggio
news:29be6e98-5b5c-47f4...@r10g2000vby.googlegroups.com...



title: E' possibile iconizzare Access?

author: Stefano Marzocchi

text:
Come da oggetto: esiste la possibilità di iconizzare a codice l'intera
finestra dell'applicazione .... e ripristinarla subito dopo?
Task manager alla mano, questa tecnica sembra avere benefici eccezionali
sulla quantità di memoria allocata da un'applicazione win.
Ciao a tutti, Stefano


title: Posizionamento record in subform...

author: Gio

text:
Access 97 :
ho una maschera con all'interno una subform ( x intenderci testata fattura
con all'interno la subform dei dettagli).
Quando inserisco un nuovo dettaglio logicamente sono posizionata sull'ultimo
record della subform. Se ricerco un valore nella testata la subforms rimane
posizioanta sull'ultimo record e non vedo immediatamente se ho già dei
dettagli se non spostandomi con la scrollbar verticale.
Esiste una soluzione??
Grazie a tutti
--------------------------------
Inviato via
http://usenet.libero.it


title: recordset e parametri nelle query

author: ciroteo

text:
come è possibile fa funzionare dei recordset basati su query memorizzate , o
stringhe sql on the fly che comportino una valutazione di un criterio?
Dim rst As DAO.Recordset
Dim dbs As Database
Set dbs = CurrentDb
Set rst = dbs.OpenRecordset("Qry_contagiorni_lavorativi", dbOpenDynaset)
If rst.RecordCount > 0 Then
Me.giorni_lavorativi = rst.RecordCount
End If
rst.Close
dbs.Close
Set rst = Nothing
Set dbs = Nothing
End Sub
la query ha come criterio: forms!utility!seleziona_periodo ... e seleziona
un periodo di riferimento
senza questo criterio funziona ... altrimenti errore


title: recordset e parametri nelle query

text:
"ciroteo" <
ciroteochio...@libero.it
> ha scritto nel messaggio
news:dt4fda$866$1...@fittipaldi.interac.it...

scusate errore 3061 parametri insufficienti


title: recordset e parametri nelle query

text:
"ciroteo" <
ciroteochio...@libero.it
> ha scritto nel messaggio
news:dt4fee$86d$1...@fittipaldi.interac.it...

scusate ... forse è sitocomune 2.2 ...


title: recordset e parametri nelle query

author: RinoFerrari

text:
"ciroteo" <
ciroteochio...@libero.it
> ha scritto nel messaggio
news:dt4fp6$89i$1...@fittipaldi.interac.it...

Forza Cirotè ci sei quasi :-)))))
Un salutone
Rino


title: recordset e parametri nelle query

text:
"RinoFerrari" <
rinof...@virgilio.it
> ha scritto nel messaggio
news:43f5c470$0$28071$4faf...@reader1.news.tin.it...

mannaggia rino ...
ho sentito di casi di aviaria in puglia ... siete preoccupati?
ti va bene chè è inverno ed hai il maglione ...


title: recordset e parametri nelle query

author: Genefer

text:
>>
>
> mannaggia rino ...
> ho sentito di casi di aviaria in puglia ... siete preoccupati?
> ti va bene chè è inverno ed hai il maglione ...
 Siamo ottimisti
beh.... in merito al maglione, giù nel profondo sud
il clima e molto più mite quindi ............... camice anche d'inverno
e per la gioia dei tuoi occhi  "TUTTO A  ROMBI " !!!!!!!!
Ci vediamo al Cisa (Spero).
Rino ;-)))))))))))))))))))))))))))))))))))))))))))))))))))))))))))


title: recordset e parametri nelle query

text:

Per dover di cronaca il messaggio non e stato postato dal mio
Account, sono fuori sede.
By


title: recordset e parametri nelle query

text:
"Genefer" <
gen...@tin.it
> ha scritto nel messaggio
news:43f6053b$0$5999$4faf...@reader2.news.tin.it...

don't worry! a presto.


title: ComboBox

author: Polpo Muschio (Lavoro)

text:
Ciao, sapete se esite la possibilità di inserire una combo a contenuto
dinamico in un menu o barra degli strumenti?
Saluti


title: ComboBox

author: vtt

text:
"Polpo Muschio (Lavoro)" <
NoMail....@infinito.it
> ha scritto nel
messaggio news:33tFd.682802$35.27...@news4.tin.it...
> Ciao, sapete se esite la possibilità di inserire una combo a contenuto
> dinamico in un menu o barra degli strumenti?
>
> Saluti
Ti allego degli estratti delle routine che uso io.
Ti consiglio di analizzare tutte le opzioni disponibili dalla guida in linea
vb (dopo aver inserito il riferimento alla libreria Microsoft Office 10
Object Library).
Il grado di dinamicità dipende dai vari eventi che utilizzi nella form  per
modificare il contenuto della combo o leggerne i valori.
Per crearla e impostare un po' di opzioni:
Dim ctlCBarControl  As CommandBarControl
    Set ctlCBarControl = CommandBars("Nome della
barra").Controls.Add(msoControlComboBox)
        With ctlCBarControl
            .Enabled = True
            .BeginGroup = True
            .Style = msoComboLabel
            .Width = 130
            .Caption = "Anno:"
            .TooltipText = "all'anno selezionato"
            .OnAction = "='Aggiorna()" 'nome della routine da richiamare
            .Parameter = "Selection"
            .Tag = "mese"
            .DropDownLines = 13
            .DropDownWidth = 126
        End With
Per agguingere un po' di voci:
Dim ctlCBarControl  As CommandBarControl
    Set ctlCBarControl = CommandBars("Nome della barra").Controls(1)
    With ctlCBarControl
        .AddItem Year(Now()) - 1, 1
        .AddItem Year(Now()), 2
        .AddItem "altro nome che vuoi aggiungere", 3
    ecc. ecc.
    End With
Per capire cosa è stato scelto:
Public Function Aggiorna()
    Dim strMese As String
    Dim intAnno As Integer
    strMese = CommandBars("Nome della barra").Controls(numero del controllo
della barra).ListIndex ' restituisce il numero della scelta
    intAnno = CommandBars("Nome della barra").Controls(numero del controllo
della barra).Text 'restituisce il testo della scelta


title: ComboBox

author: Polpo Muschio

text:
Grazie 1000!!! domani la provo!
"vtt" <
vittori...@oo.it
 oo = infinito> ha scritto nel messaggio
news:cs66qh$n2v$2...@newsread.albacom.net...



title: ComboBox

author: access il top

text:
"Polpo Muschio" <
nocod.s...@infinito.it
> ha scritto nel messaggio
news:HwBFd.12944$Of5....@nntpserver.swip.net...

 ciao a tutti,
avrei bisogno di un'informazione
dovrei mettere nella combobox via solo le vie del comune selezionato da
un'altra combobox.
devo usare anche io questo codice qui??
premetto che ho due tabelle 1 comuni che ha come campi [ID] e [COMUNE]
L'altra via che ha come campi [ID], [VIA], [CARTINA], [COORDINATE],
[IDCOMUNE] relazionato con id della tabella comuni. sapete aiutarmi??
grazie


title: ComboBox

author: Sergio MAZZA

text:
access il top wrote:
> ciao a tutti,
> avrei bisogno di un'informazione
> dovrei mettere nella combobox via solo le vie del comune selezionato da
> un'altra combobox.
> devo usare anche io questo codice qui??
> premetto che ho due tabelle 1 comuni che ha come campi [ID] e [COMUNE]
> L'altra via che ha come campi [ID], [VIA], [CARTINA], [COORDINATE],
> [IDCOMUNE] relazionato con id della tabella comuni. sapete aiutarmi??
> grazie
(un esempio)
www.sitocomune.com
, sezione Forms: Sincronizzare in una maschera due o più
caselle combinate tra loro in gerarchia...
Ciao.
--
Sergio MAZZA


title: ComboBox

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:cs7uq7$3lo$1...@canarie.caspur.it...

grazie mille ottimo esempio.
ora ho un'altro problema, in base al record che ho selezionata nella
combo via vorrei visualizzare un msgbox con le coordinate. sapete
aiutarmi??


title: ComboBox

text:
"access il top" <
negrinel...@yahoo.it
> ha scritto nel messaggio
news:41e79718$0$8205$5fc...@news.tiscali.it...

mi sono spiegato malissimo nemmeno io capisco da questo messaggio cosa
voglio.
nella mia combobox ci sono 3 colonne [id]; [via]; [coordinate]
su un evento di un bottone vorrei:
msgbox comboboxvia.valorecolonna3
è possibile?? grazie


title: ComboBox

text:

Gestisci l'evento "dopo aggiornamento" della combo e ci inserisci:
msgbox me!comboboxvia.column(2)
Ciao.
--
Sergio MAZZA


title: ComboBox

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:cs88mr$69b$1...@canarie.caspur.it...

grazie mille, funziona alla grande.


title: ComboBox

text:
Funziona egregiamente......anche se ho dovuto rivrdere un attimino il codice
:))
Ti perdono.
Grazie di nuovo.
"vtt" <
vittori...@oo.it
 oo = infinito> ha scritto nel messaggio
news:cs66qh$n2v$2...@newsread.albacom.net...



title: ComboBox

text:
"Polpo Muschio" <
nocod.s...@infinito.it
> ha scritto nel messaggio
news:nqPFd.13092$Of5....@nntpserver.swip.net...

Purtroppo ho dato una risposta un po' frettolosa vista la vastità
dell'argomento e le routine erano solo parziali.
Un altro consiglio e di rivedere tutta la gestione degli errori: esiste il
caso nel caso che un utente inserisca manualmente valori incoerenti nelle
combo e poi prema invio...
Divertiti :)


title: ComboBox

text:
[CUT]
Perdona gli strafalcioni... è una cosa che odio, nonstante la scusante di
scrivere col portatile sulle ginocchia


title: ComboBox

text:
> Purtroppo ho dato una risposta un po' frettolosa vista la vastità
> dell'argomento e le routine erano solo parziali.
Dai , stavo scherzando ;)))
> Un altro consiglio e di rivedere tutta la gestione degli errori: esiste il
> caso nel caso che un utente inserisca manualmente valori incoerenti nelle
> combo e poi prema invio...
è vero! è una cosa che ho notato proprio ieri!
la combo prende valori diversi da quelli della lista....
> Divertiti :)
lo stò facendo :D
Saluti


title: ComboBox

author: Alessandro Baraldi

text:
"Polpo Muschio" <
nocod.s...@infinito.it
> wrote in message
news:vMpGd.13609$
Of5....@nntpserver.swip.net

Si risolve gestendo l'errore.
Io per semplificarne la gestione nel caso ci siano
più Combo faccio così:
' Nel caso l'utente inserisca valori <NON in Elenco> nelle Combo(s)
Private Sub Form_Error(DataErr As Integer, Response As Integer)
  If DataErr = 2237 Then
        Response = acDataErrContinue
        Screen.ActiveControl.Undo
  Else
        Response = acDataErrDisplay
  End If
End Sub
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: ComboBox

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:af6f3997b5c0f8fc73...@mygate.mailgate.org...

Buonasera Alessandro! come vedi le combo non muoiono mai...
In questo esempio ci riferivamo ad una combo nella barra dei menu e questa è
veramente flat... muoio dall'invidia(vedere la mia agonia in  '[OT] Combobox
flat').
A quanto mi risulta non esite un modo per bloccare i valori in lista, che
restituisce però listindex = 0, da cui si puo gestire la digitazione manuale
dell'utente:
If  CommandBars("NomeDellaBarra").Controls(NumeroDelControllo).ListIndex = 0
Then ecc. ecc.
Oppure si può controllare il valore immesso dall'utente, come ad esempio un
anno che non compare nella lista, tramite text:
intAnno =
Cint(CommandBars("NomeDellaBarra").Controls(NumeroDelControllo).Text)
e se l'utente mette un valore testuale viene generato un errore che posso
gestire conn On Error


title: Posizione del cursore

author: il barbi

text:
Mi serve una funzione Visual Basic che mi dia la posizione
del cursore in un controllo di testo, nel senso di numero
d'ordine del carattere su cui e' posizionato, esiste?
il barbi


title: Posizione del cursore

author: ALESSANDRO Baraldi

text:
"il barbi" <
ilb...@tin.it
> ha scritto nel messaggio
news:_ciMb.94545$_P.35...@news4.tin.it...

Ogni Controllo dispone dell'Evento MouseMove, ma se spieghi a cosa
ti serve potresti avere un'aiuto più costruttivo....!
@Alex.


title: Posizione del cursore

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel
messaggio news:btsgb4$er0$1...@lacerta.tiscalinet.it...

nel controllo di testo c'e' una successione di parole,
separate da spazi, e io posizionando il mouse (o usando la
freccia dx) voglio determinare la parola su cui sta il
cursore
il barbi


title: Posizione del cursore

text:
"il barbi" <
ilb...@tin.it
> wrote in message
news:6QwMb.77258$
VW.32...@news3.tin.it
[CUT]
> >
> > Ogni Controllo dispone dell'Evento MouseMove, ma se
> spieghi a cosa
> > ti serve potresti avere un'aiuto più costruttivo....!
> >
> nel controllo di testo c'e' una successione di parole,
> separate da spazi, e io posizionando il mouse (o usando la
> freccia dx) voglio determinare la parola su cui sta il
> cursore
> il barbi
Senza attribuire il Focus al controllo credo sia abbastanza
arduo....!
Facci sapere potrebbe essere d'interesse comune...!
@Alex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Posizione del cursore

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel
messaggio
news:a79c35850d8c64b51e...@mygate.mailgate.o
rg...
> "il barbi" <
ilb...@tin.it
> wrote in message
> news:6QwMb.77258$
VW.32...@news3.tin.it
>
> [CUT]
> > >
> > > Ogni Controllo dispone dell'Evento MouseMove, ma se
> > spieghi a cosa
> > > ti serve potresti avere un'aiuto più costruttivo....!
> > >
> > nel controllo di testo c'e' una successione di parole,
> > separate da spazi, e io posizionando il mouse (o usando
la
> > freccia dx) voglio determinare la parola su cui sta il
> > cursore
> > il barbi
>
>
> Senza attribuire il Focus al controllo credo sia
abbastanza
> arduo....!
>
vabbe' certo che gli do' il focus, ho detto che ci clicco
sopra uno dei caratteri della parola voluta, solo che devo
sapere a che punto sta il cursore
il barbi


title: Posizione del cursore

text:
"il barbi" <
ilb...@tin.it
> ha scritto nel messaggio
news:FfBMb.78876$VW.32...@news3.tin.it...

Ma che ti frega sapere dove stà il cursore, se gli dai il Focus....??
Hai detto che ti serve per sapere qual'è il nome del Controllo
ed il suo contenuto....???
Bene
NomeCotrollo=
Screen.Activecontrol.Name
Contenuto=Screen.Activecontrol
Per sapere dove si trova il cursore(inteso come posizione all'interno di un
testo
non come posizione relativa in coordinate X,Y di Schermo)
leggi bene l'HELP e gli esempi relativi a:
· La proprietà SelLength specifica o determina il numero di caratteri
selezionati in una casella di testo o nella parte casella di testo di una
casella combinata.
· La proprietà SelStart specifica o determina il punto di inizio del testo
selezionato o la posizione del punto di inserimento se non è stato
selezionato del testo.
· La proprietà SelText restituisce una stringa contenente il testo
selezionato. Se non è selezionato alcun testo, tale proprietà contiene un
valore Null.
Ciao.
@Alex.


title: Posizione del cursore

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel
messaggio news:btuoq3$hp0$1...@lacerta.tiscalinet.it...
>
>
> Ma che ti frega sapere dove stà il cursore, se gli dai il
Focus....??
> Hai detto che ti serve per sapere qual'è il nome del
Controllo
> ed il suo contenuto....???
>
non ho detto questo, nel mio post iniziale ho detto che mi
serve sapere la posizione del cursore in una casella di
testo, ad es. che sta dopo l'11° carattere
>zac<
> · La proprietà SelStart specifica o determina il punto di
inizio del testo
> selezionato o la posizione del punto di inserimento se non
è stato
> selezionato del testo.
>
e' questa la risposta, grazie
il barbi


title: Criteri di ricerca

author: Elsis

text:
In una query sulla quale si basa una maschera detta "MOVIMENTI" ho un campo
"Interventi" in cui ho inserito la seguente espressione:
Like("*"&[Forms]![movimenti]![Ricerca Interventi]&"*")
Il controllo "Ricerca Interventi" è inserito nella maschera che è in
modalità maschere continue e serve come si evince per "filtrare" i record
secondo mie esigenze.
Considerate pure che ci sono altri campi nella maschera come questo per
altri tipi di ricerche (clienti, città, etc).
Il problema è che mentre con i campi città, cliente etc non ho problemi, con
il campo Interventi se metto per esempio 2 mi compaiono anche i record con
12 o 122 interventi. Mi rendo conto perfettamente del motivo per il quale
questo accade ma non so come risolvere il problema visto che comunque non
posso creare un criterio restrittivo del tipo che devo necessariamente
mettere il numero di interventi per filtrare i record. Io devo essere in
condizione di filtrarli correttamente se metto un determinato numero ma
anche di avere la libertà di non usare questo criterio e quindi di vederli
tutti.
Grazie a tutti.


title: Criteri di ricerca

author: Roberto dalla campagna

text:
"Elsis" <
el...@tin.it
> ha scritto nel messaggio
news:4dW6d.19409$75.8...@news3.tin.it...

Prova così:
Like Nz([Forms]![movimenti]![Ricerca Interventi]; "*")
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: fax

author: luca

text:
come possofare per spedire un fax via VB avendo a disposizione solo un modem
ma senza il software fax?


title: fax

author: Silvio Berruti

text:
"luca" <
luc...@tiscalinet.it
> ha scritto nel messaggio
news:9higal$v2k$1...@lacerta.tiscalinet.it...
> come possofare per spedire un fax via VB avendo a disposizione solo un
modem
> ma senza il software fax?
Vai dal tuo rivenditore di informatica e compri un programma che te lo
permetta.
Personalmente mi trovo bene con Winfax che è ora acquistabile a lire 99.000
+ IVA: è in italiano, fa quello che dovrebbe e mi pare che ci siano sul S.C.
esempi di utilizzo con Access.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


title: compattare MDB via codice

author: zorro

text:
ciao a tutti
avrei un'altro problemino
premetto che ho cercato sul sito comune, ma non ho trovato nulla
via codice faccio un esport di una tabella creata da una qry, più
esattamente ho 2 qry che mi generano la stessa tabella (ovviamente
sostituendola ogni volta che lancio l'una o l'altra) a seconda del tipo
di scelta che l'utente fa con un flag.
il problema è che così facendo l'MDB cresce a dismisura
vorrei sapere allora se via codice esiste il modo di compattare il
database (come si fa normalmente da menù Strumenti, Utilità database,
Compatta Database)?
Tanto per fare una precisazione:
il comando TransferSpreadsheet consente anche l'esport di qry di
selezione!!!
allora ho provato (trasformando le qry di creazione tabella in qry di
selezione) ad esportare la qry, ma se esporto 1000 record e la volta
dopo esporto sullo stesso file excel 100 record mi rimangono comunque
tutti i 1000 record precedenti.
Che cavolo sbaglio?
Ringrazio veramente tanto tutti quelli che avranno voglia di aiutarmi
Ciao


title: compattare MDB via codice

author: Fabio

text:
Prova con dbengine.compactdatabase <source>,<destination>, (gli altri
parametri non li ricordo)
Non so se funziona anche con il database corrente
Ciao, FABIO
"zorro" <
zorr...@hotmail.com
> ha scritto nel messaggio
news:3CAC4EA6...@hotmail.com...



title: compattare MDB via codice

text:
Grazie per aver risposto
è da stamattina che sto sul dbengine.compactdatabase, ma non ho cavato
un raglo dal buco
sempra proprio che non si possa fare
ciao



title: compattare MDB via codice

author: Roberto da casa

text:
"zorro" <
zorr...@hotmail.com
> ha scritto nel messaggio
news:3CAC4EA6...@hotmail.com...
> ciao a tutti
> avrei un'altro problemino
> premetto che ho cercato sul sito comune, ma non ho trovato nulla
> via codice faccio un esport di una tabella creata da una qry, più
> esattamente ho 2 qry che mi generano la stessa tabella (ovviamente
> sostituendola ogni volta che lancio l'una o l'altra) a seconda del tipo
> di scelta che l'utente fa con un flag.
> il problema è che così facendo l'MDB cresce a dismisura
> vorrei sapere allora se via codice esiste il modo di compattare il
> database (come si fa normalmente da menù Strumenti, Utilità database,
> Compatta Database)?
[CUT]
Beh, penso proprio che tu non abbia cercato bene nel Sito Comune: ci sono
più di una FAQ che dice come compattare un MDB da codice, ad esempio:
1) Sezione General, "Compattare l'mdb in uso." di Federico Luciani
2) Sezione General, "Compattare tutti i BackEnd dal FrontEnd." di Federico
Luciani e Riccardo Pozzi
3) Sezione General, "Compattatore batch di file MDB" di Giovanni Albertone
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: compattare MDB via codice

author: Pasquale

text:
Ciao,
Prova questo comando:
DoCmd.RunCommand acCmdCompactDatabase
dovresti riuscire a comprimere il database corrente.
Fammi sapere se funziona.
"zorro" <
zorr...@hotmail.com
> ha scritto nel messaggio
news:3CAC4EA6...@hotmail.com...



title: Trim e format nelle query..

author: apache

text:
Buongiorno..Ho un problema:nel mio database ho creato delle query che usano
all'interno delle funzioni come
TRIM,FORMAT...(es.Format(Format([ISODID1L.ISIDTA],"@@@@\/@@\/@@"),"dd/mm/yyy
y") AS ISIDTA). Fino a Venerdě, e per tutto il periodo precedente, il pgm mi
funzionava bene, adesso quando le lancio mi da "ERRORE DI COMPILAZIONE.
NELL'ESPRESSIONE DELLA QUERY" e poi mi indica il pezzo in qui ho inserito
una qualche funzione..Togliendole non me lo da +,ma ho bisogno di esse e
sono sempre funzionate..Sapete darmi una spiegazione e/o una mano?
Thanks


title: Trim e format nelle query..

text:
Scusate il disturbo..l'ho risolto,il problema mio,legato alle
librerie..Grazie comunque!
"apache" <
a.ri...@sistemics.it
> ha scritto nel messaggio
news:ci3i6s$4k3$1...@fata.cs.interbusiness.it...



title: Trim e format nelle query..

author: TheMax

text:
"apache" <
a.ri...@sistemics.it
> ha scritto nel messaggio
news:ci3i6s$4k3$1...@fata.cs.interbusiness.it...
> Buongiorno..Ho un problema:nel mio database ho creato delle query che
usano
> all'interno delle funzioni come
>
TRIM,FORMAT...(es.Format(Format([ISODID1L.ISIDTA],"@@@@\/@@\/@@"),"dd/mm/yyy
> y") AS ISIDTA).
Sei sicuro che si possa usare l'alias come lo hai usato tu?
Prova as Isidta1 ad esempio
> Fino a Venerdì, e per tutto il periodo precedente, il pgm mi
> funzionava bene, adesso quando le lancio mi da "ERRORE DI COMPILAZIONE.
> NELL'ESPRESSIONE DELLA QUERY" e poi mi indica il pezzo in qui ho inserito
> una qualche funzione..
se non era l'as... cosa è cambiato da venerdì a oggi?
> Togliendole non me lo da +,ma ho bisogno di esse e
> sono sempre funzionate..Sapete darmi una spiegazione e/o una mano?
> Thanks
Ciao,
Massimo
--
web:
www.piubelli.net
Ciò che oggi è facoltativo domani sarà necessario.
Perchè non prepararci per tempo al futuro?
Vuoi il mio indirizzo? Togli _cut_ per rispondermi


title: Fabinonet - Come aggiungere sei Record ad una Tabella per ogni record di un'altra tabella

author: Cia Grosseto

text:
Cyao
Sono un programmatore di Clipper52, ( che trovo straordinario ), e sto
cercando di trasformare i miei applicativi in acceess2000 ( che trovo
insostituibile ).
Per ora i risulati sono ottimi anche se non conosco in maniera adegtuata il
VBA, ma mi sono bloccato su un mio applicativo che non riesco a riscrivere
in VBA.
Problema :
In pratica non riesco a trasformare un File.mdb in un altro File.mdb con
caratteristiche diverve.
Per motivi di procedura Bancaria ogni record del database A deve essere
convertito in sei ( 6 ) record del nuovo database B.
Esempio : ( PER UN RECORD )
DATABASE A :
Nome                    Residente                Ditta
Stipendio            Mese                    Fisso
FABIO                  GROSSETO           NASA                1120
GENNAIO           SI
Dovrebbe essere Convertito in Questo Modo
CampoA     CampoB     CampoC
0000010     00001         FABIO
0000020     00001         GROSSETO
0000030     00001         NASA
0000040     00001         1120
0000050     00001        GENNAIO
0000070     00001         SI
questo per Ogni Record
IN PRATICA NON RIESCO A FARE UN CICLO DO WHILE   LOOP CON DUE TABELLE
SENZA ERRORI  ?
COME POSSO AGGIUNGERE PIU' RECORD A UNA TABELLA USANDO RECORD DI
UN'ALTRATABELLA ?
Come aggiungere sei Record ad una Tabella per ogni record di un'altra
tabella ?
Grazye
Fabino Tip-off


author: Roberto Marengo    -   Sviluppo Software

text:
Prova cosi':
dim rstFrom=dao.recordset
dim rstTo=dao.recordset
set rstfrom=openrecordset("tabella da cui prendere i dati")
set rstto=openrecordset("tabella in cui scrivere i dati")
do while not rstfrom.eof()
    ' record 1
    rstto.addnew
    rstto!campoa="0000010"
    rstto!campob=1
    rstto!campoc=rstfrom!nome
    rstto.update
    ' record 2
    rstto.addnew
    rstto!campoa="0000020"
    rstto!campob=1
    rstto!campoc=rstfrom!cognome
    rstto.update
    ' record 3
    rstto.addnew
    rstto!campoa="0000030"
    rstto!campob=1
    rstto!campoc=rstfrom!ditta
    rstto.update
    ' record 4
    rstto.addnew
    rstto!campoa="0000040"
    rstto!campob=1
    rstto!campoc=rstfrom!stipendio
    rstto.update
    ' record 5
    rstto.addnew
    rstto!campoa="0000050"
    rstto!campob=1
    rstto!campoc=rstfrom!mese
    rstto.update
    ' record 6
    rstto.addnew
    rstto!campoa="0000060"
    rstto!campob=1
    rstto!campoc=rstfrom!fisso
    rstto.update
    rstfrom.movenext
loop
Spero vada bene, sono un po' di corsa e non ho avuto tempo di verificarlo.
Ciao
                Roberto Marengo
"Cia Grosseto" <
fab...@cia.grosseto.it
> ha scritto nel messaggio
news:9n01qg$d2j$1...@lacerta.tiscalinet.it...



author: CarloCos

text:
"Cia Grosseto" <
fab...@cia.grosseto.it
> ha scritto nel messaggio
news:9n01qg$d2j$1...@lacerta.tiscalinet.it...

Fà sempre piacere acquisire nuovi estimatori...specie se qualificati.
Ti ho costruito una routine che dovrebbe fare al caso tuo.
Presupposto: le due tabelle risiedono nello stesso database o la seconda è
allegata al primo.
Public Sub AccodaDatiNuovaTabella()
    Dim db As Database
    Dim RcsA As Recordset, RcsB As Recordset
    Dim i
    Dim FL As Field
    Set db = CurrentDb
    Set RcsA = db.OpenRecordset("TabellaA")
    Set RcsB = db.OpenRecordset("TabellaB")
    RcsA.MoveLast
    RcsA.MoveFirst
    For i = 1 To RcsA.RecordCount
        For Each FL In RcsA.Fields
        With RcsB
        .AddNew
        !CampoA = Format(i, "0000000")
        !CampoB = Format(i, "00000")
        !CampoC = FL.Value
        .Update
        End With
        Next
        RcsA.MoveNext
    Next i
    RcsA.Close
    RcsB.Close
End Sub
Non ho ben capito la progressione di 0000010....0000070 ma sono sicuro che
provvederai tu all'uopo.
Ciao, Carlo


text:
GRAZYE !!!!!
"Cia Grosseto" <
fab...@cia.grosseto.it
> ha scritto nel messaggio
news:9n01qg$d2j$1...@lacerta.tiscalinet.it...



author: MegaMax

text:
"Cia Grosseto" <
fab...@cia.grosseto.it
> ha scritto nel messaggio
news:9n01qg$d2j$1...@lacerta.tiscalinet.it...
> Cyao
> Sono un programmatore di Clipper52, ( che trovo straordinario ), e sto
> cercando di trasformare i miei applicativi in acceess2000 ( che trovo
> insostituibile ).
Ma usando access non ti conviene fare tutto tramite 6 query? (1 per ogni
campo che devi aggiungere)
Max


text:
Grazye
"Roberto Marengo - Sviluppo Software" <
rmar...@ngi.it
> ha scritto nel
messaggio news:9n09m2$rs8$1...@news.ngi.it...



title: Un codice pigro su maschera, funziona da f8 ma non dal clic evento...

text:
In una maschera ho dieci caselle Ordi2011.....Ordi2020 che conteggiano come da formula:
=Conteggio(IIf([Anno]=2011;[IMPORTOOrdinativo]))
e dieci caselle Buo2011....Buo2020 con la seguente formula:
=Conteggio(IIf([Anno]=2011;[IMPORTOBuono]))

Delle venti caselle di testo risultanti Ordixxxx e Buoxxxx , ad un determinato evento vorrei visualizzare solo quelle caselle che sono diverse da zero.
Le ho impostate visibili a no e sul clic ho scritto:

'2011
If Me.Ordi2011 <> 0 Then
    Me.Ordi2011.Visible = True
End If
If Me.Buo2011 <> 0 Then
    Me.Buo2011.Visible = True
End If

'2012
If Me.Ordi2012 <> 0 Then
    Me.Ordi2012.Visible = True
End If
If Me.Buo2012 <> 0 Then
    Me.Buo2012.Visible = True
End If

.....fino a Ordi2020 e Buo 2020.

Se lo faccio da codice (impostando punto interruzione e f8 funziona, se lo lascio da maschera non fa nulla...
Qualcuno sa come facilitarmi ?
grazie infinite


author: Pablitomf

text:
ignazio.pilone <
ignazio...@gmail.com
> ha scritto:

> In una maschera ho dieci caselle Ordi2011.....Ordi2020 che conteggiano
come da formula:
> =Conteggio(IIf([Anno]=2011;[IMPORTOOrdinativo]))
> e dieci caselle Buo2011....Buo2020 con la seguente formula:
> =Conteggio(IIf([Anno]=2011;[IMPORTOBuono]))
>
> Delle venti caselle di testo risultanti Ordixxxx e Buoxxxx , ad un
determinato evento vorrei visualizzare solo quelle caselle che sono
diverse da zero.
> Le ho impostate visibili a no e sul clic ho scritto:
>
> '2011
> If Me.Ordi2011 <> 0 Then
>     Me.Ordi2011.Visible = True
> End If
> If Me.Buo2011 <> 0 Then
>     Me.Buo2011.Visible = True
> End If
>
> '2012
> If Me.Ordi2012 <> 0 Then
>     Me.Ordi2012.Visible = True
> End If
> If Me.Buo2012 <> 0 Then
>     Me.Buo2012.Visible = True
> End If
>
> ......fino a Ordi2020 e Buo 2020.
>
> Se lo faccio da codice (impostando punto interruzione e f8 funziona, se
lo lascio da maschera non fa nulla...
> Qualcuno sa come facilitarmi ?
> grazie infinite

problema di refresh form... vai di DoEvents

--
------------
Pablitomf
Napoli sempre nel "Q"uore!
"mammasantissima" si nasce, non si diventa.


text:
Pablitomf <
pabl...@hotmail.it
> ha scritto:

RIPORTO LA TUA MAIL SPEDITAMI ERRONEAMENTE IN PVT:

Ciao Pablito,
scusa se rompo ma non ti seguo...
Do.events non me lo trova con l' f1 e allora vorrei capirne di piï¿œ..
Se non ho capito male devo fare un ciclo che, inserito tra ogni blocco
anno di istruzioni, conta sino a 20 e incrementa ogni anno.
Oppure mi sfugge qualcosa e devo darlo come evento ad ogni casella di testo ?
scusamio ma sono un pï¿œ gnocco...
grazie infinite, come sempre, ciao
M

---------

ma chi ha parlato di Do.Events? :D ho detto DeEvents... senza punto!

e cmq puoi decisamente togliere tutti quegli if e fare una roba tipo:

Dim x as integer
For x=11 to 20
  If Me.Controls("Buo" & x) <> 0 then
     Me.Ordi2012.Visible = True

Next x



text:
Pablitomf <
pabl...@hotmail.it
> ha scritto:

cliccato ENTER troppo in fretta...

RIPORTO LA TUA MAIL SPEDITAMI ERRONEAMENTE IN PVT:

Ciao Pablito,
scusa se rompo ma non ti seguo...
Do.events non me lo trova con l' f1 e allora vorrei capirne di piï¿œ..
Se non ho capito male devo fare un ciclo che, inserito tra ogni blocco anno
di istruzioni, conta sino a 20 e incrementa ogni anno.
Oppure mi sfugge qualcosa e devo darlo come evento ad ogni casella di testo ?
scusamio ma sono un pï¿œ gnocco...
grazie infinite, come sempre, ciao
M

---------

ma chi ha parlato di Do.Events? :D ho detto DeEvents... senza punto!

e cmq puoi decisamente togliere tutti quegli if e fare una roba tipo:

Dim x as integer
For x=2011 to 2020
  If Me.Controls("Buo" & x) <> 0 then
     Me.Controls("Ordi" & x).Visible= True
  End If
  DoEvents



text:
grazie Pablito, e scusa per la mail in pvt, con questo nuovo look non mi trovo molto...
scusa pure per il do.events....
un caro saluto
M


text:
Il giorno lunedì 10 settembre 2012 16:52:10 UTC+2, ignazio.pilone ha scritto:
> grazie Pablito, e scusa per la mail in pvt, con questo nuovo look non mi trovo molto... scusa pure per il do.events.... un caro saluto M

scusatemi ancora...sono in crisi.
Dopo le indicazioni di Pablito ho scritto questo codice:

Private Sub NMensilità_AfterUpdate()
Dim x As Integer

'rende visibili celle sommatorie mensili Ordinativi e Buoni

x = "2011"
For x = 2011 To 2020
    If Me.controls("Ordi" & x) <> 0 Then
        Me.controls("Ordi" & x).Visible = True
        Else
        Me.controls("Ordi" & x).Visible = False
    End If
        DoEvents
    Next x

x = "2011"
For x = 2011 To 2020
    If Me.controls("Buo" & x) <> 0 Then
        Me.controls("Buo" & x).Visible = True
        Else
        Me.controls("Buo" & x).Visible = False
    End If
        DoEvents
    Next x

End Sub

purtroppo mi appare un box con la dicitura "Nessun valore nell'espressione immessa"
Preciso che se con il cursore vado sul codice di x ne vedo il valore (2011) ma tutto si ferma li...
grazie ancora a tutti per il prezioso aiuto...


text:

1) perche' metti x = "2011" quando l'hai dichiarato integer? devi mettere al
massimo x = 2011

2) perche' fai 2 cicli visto che i valori sono sempre quelli? Metti tutto in un
ciclo...

Dim x As Integer
x = 2011
For x = 2011 To 2020
    If Me.controls("Ordi" & x) <> 0 Then
        Me.controls("Ordi" & x).Visible = True
    Else
        Me.controls("Ordi" & x).Visible = False
    End If
    If Me.controls("Buo" & x) <> 0 Then
        Me.controls("Buo" & x).Visible = True
    Else
        Me.controls("Buo" & x).Visible = False
    End If
    DoEvents
Next x




text:
Il giorno martedì 11 settembre 2012 16:51:05 UTC+2, Pablitomf ha scritto:
> > Private Sub NMensilità_AfterUpdate() > Dim x As Integer > > 'rende visibili celle sommatorie mensili Ordinativi e Buoni > > x = "2011" > For x = 2011 To 2020 > If Me.controls("Ordi" & x) <> 0 Then > Me.controls("Ordi" & x).Visible = True > Else > Me.controls("Ordi" & x).Visible = False > End If > DoEvents > Next x > > x = "2011" > For x = 2011 To 2020 > If Me.controls("Buo" & x) <> 0 Then > Me.controls("Buo" & x).Visible = True > Else > Me.controls("Buo" & x).Visible = False > End If > DoEvents > Next x > > End Sub > > purtroppo mi appare un box con la dicitura "Nessun valore nell'espressione immessa" > Preciso che se con il cursore vado sul codice di x ne vedo il valore (2011) ma tutto si ferma li... > grazie ancora a tutti per il prezioso aiuto... > 1) perche' metti x = "2011" quando l'hai dichiarato integer? devi mettere al massimo x = 2011 2) perche' fai 2 cicli visto che i valori sono sempre quelli? Metti tutto in un ciclo... Dim x As Integer x = 2011 For x = 2011 To 2020 If Me.controls("Ordi" & x) <> 0 Then Me.controls("Ordi" & x).Visible = True Else Me.controls("Ordi" & x).Visible = False End If If Me.controls("Buo" & x) <> 0 Then Me.controls("Buo" & x).Visible = True Else Me.controls("Buo" & x).Visible = False End If DoEvents Next x -- ------------ Pablitomf Napoli sempre nel "Q"uore! "mammasantissima" si nasce, non si diventa.

grazie Pablito.
purtroppo continua a dare "nessun valore nell'espressione immessa" e non visualizza le celle.
ciao grazie


text:
> > grazie Pablito.
> >
> > purtroppo continua a dare "nessun valore nell'espressione immessa" e non
visualizza le celle.

ma su cosa si blocca?... nessun valore su quale espressione?



text:
Il giorno martedì 11 settembre 2012 20:36:11 UTC+2, Pablitomf ha scritto:
> > > grazie Pablito. > > > > purtroppo continua a dare "nessun valore nell'espressione immessa" e non visualizza le celle. ma su cosa si blocca?... nessun valore su quale espressione? -- ------------ Pablitomf Napoli sempre nel "Q"uore! "mammasantissima" si nasce, non si diventa.

ciao Pablito,
ho scoperto che si blocca quando le 20 caselle di testo Ordi20xx e Buo20xx sono vuote.
La formula contenuta in tali caselle (nell'esempio quella di Ordi2011), è questa:
=Conteggio(IIf([Anno]=2011;[IMPORTOOrdinativo]))

posso mettere un NZ davanti a conteggio e avere quindi:
= NZ Conteggio(IIf([Anno]=2011;[IMPORTOOrdinativo]))

grazie infinite
ciao
M


text:
Il giorno mercoledì 12 settembre 2012 13:14:38 UTC+2, ignazio.pilone ha scritto:
> Il giorno martedì 11 settembre 2012 20:36:11 UTC+2, Pablitomf ha scritto: > > > grazie Pablito. > > > > purtroppo continua a dare "nessun valore nell'espressione immessa" e non visualizza le celle. ma su cosa si blocca?... nessun valore su quale espressione? -- ------------ Pablitomf Napoli sempre nel "Q"uore! "mammasantissima" si nasce, non si diventa. ciao Pablito, ho scoperto che si blocca quando le 20 caselle di testo Ordi20xx e Buo20xx sono vuote. La formula contenuta in tali caselle (nell'esempio quella di Ordi2011), è questa: =Conteggio(IIf([Anno]=2011;[IMPORTOOrdinativo])) posso mettere un NZ davanti a conteggio e avere quindi: = NZ Conteggio(IIf([Anno]=2011;[IMPORTOOrdinativo])) grazie infinite ciao M

anche premettendo NZ all'istruzione di conteggio nella casella di testo, il codice mi da errore e non so più come uscirne.
In pratica la maschera attinge da una query, con un combo scelgo un codice Accordo quadro che mi visualizza i record relativi allo stesso.
Le 20 caselle vengono visualizzate se il conteggio relativo al loro anno è diverso da zero.
Purtroppo se la query non mi restituisce record il codice di conteggio va in tilt.
Ho provato anche a valorizzare le 20 celle di conteggio da codice ma non riesco a impostarne la relativa istruzione.
Se qualcuno mi aiuta mi fa un grosso favore.
grazie ancora a tutti.


text:
> Purtroppo se la query non mi restituisce record il codice di conteggio va in tilt.

il conteggio presumo vada in tilt perche' tu esegui una istruzione IF su un
campo che confronti con un valore numerico >0. Trovando nello stesso "null" o
"vuoto" (che non sono valori numerici) diviene ovvio che il confronto va in
errore... basterebbe che nelle caselle, qualora non vi fosse alcun record, tu
attribuissi valori ZERO, e avresti imho risolto.



text:
Pablitomf <
pabl...@hotmail.it
> ha scritto:

> > Purtroppo se la query non mi restituisce record il codice di conteggio va in
tilt.
>
> il conteggio presumo vada in tilt perche' tu esegui una istruzione IF su un
> campo che confronti con un valore numerico >0. Trovando nello stesso "null" o
> "vuoto" (che non sono valori numerici) diviene ovvio che il confronto va in
> errore... basterebbe che nelle caselle, qualora non vi fosse alcun record, tu
> attribuissi valori ZERO, e avresti imho risolto.

e cmq, se proprio non vuoi, basta mettere un On Error Resume Next come prima
riga di codice nella routine di conteggio... in modo tale che se pure il codice
va in errore, continua a girare fino alla fine.



text:
Il giorno giovedì 13 settembre 2012 14:15:11 UTC+2, Pablitomf ha scritto:
> Pablitomf <
pabl...@hotmail.it
> ha scritto: > > Purtroppo se la query non mi restituisce record il codice di conteggio va in tilt. > > il conteggio presumo vada in tilt perche' tu esegui una istruzione IF su un > campo che confronti con un valore numerico >0. Trovando nello stesso "null" o > "vuoto" (che non sono valori numerici) diviene ovvio che il confronto va in > errore... basterebbe che nelle caselle, qualora non vi fosse alcun record, tu > attribuissi valori ZERO, e avresti imho risolto. e cmq, se proprio non vuoi, basta mettere un On Error Resume Next come prima riga di codice nella routine di conteggio... in modo tale che se pure il codice va in errore, continua a girare fino alla fine. -- ------------ Pablitomf Napoli sempre nel "Q"uore! "mammasantissima" si nasce, non si diventa.

mi ero proprio arenato li nel cercare di dare valore 0 a quelle celle.
Ora ho risolto con il tuo GRANDIOSO "On Error Resume Next".
Non mi sembra vero...
grazie dell'utilissima informazione che non dimenticherò mai più.


title: Aiuto per Access 2000

author: Claudio

text:
Salve a tutti,
spero che mi possiate aiutare in questo mio problema.
Stó sviluppando un´applicazione in MsAccess e vorrei
poter salvare i dati in un´altra applicazione (copia) per poterli
mettere da parte in modo da non perdere i dati.
Fare un backup insomma..........
Solo che vorrei sapere come farlo visto che con il "Copi" e "Incolla"
non ci riesco.Ci sará pure un modo piú "professionale" di farlo no ?
Qualche buon´anima che mi voglia aiutare ??
Grazie.
Claudio


title: Aiuto per Access 2000

author: Billuz

text:
Beh, crea un altro db, poi con una macro lanci una query di accodamento che
copia tutti i dati della tua tabella nella tabella dell'altro db (che deve
essere copllegata). meglio se fai tutto in vba
"Claudio" <
clau...@clix.pt
> ha scritto nel messaggio
news:96585496...@tubarao.ip.pt...



title: aggiornare txt associato a query

author: michele de meo

text:
Ho una maschera associata ad una query. Questa, a sua volta, dipende
dalla tab1.
Nella maschera è previsto un bottone con il cui clik vado a modificare
il valore di un campo, per un particolare record, nella tab1.
A questo punto, dopo il click del bottone, è cambiato il valore della
tabella ma il txt associato alla query mantiene ancora il valore della
tabella antecedente l'aggornamento. Come faccio ad aggiornare anche la
query e quindi il txt ad essa associato?
Credo si debba parlare del metodo refresh, ma ho provato con Me.Refresh
senza ottenere risultato (immagino quindi che non sia questo il
corretto modo di utilizzarlo).
grazie
mdm


title: aggiornare txt associato a query

author: Roberto dal portatile

text:
"michele de meo" <
michel...@gmail.com
> ha scritto nel messaggio
news:1154430411.9...@i3g2000cwc.googlegroups.com...

Invece di Me.Refresh prova con:
Me.Requery
>
>grazie
Prego
>mdm
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: aggiornare txt associato a query

text:
Roberto dal portatile ha scritto:
> "michele de meo" <
michel...@gmail.com
> ha scritto nel messaggio
> news:1154430411.9...@i3g2000cwc.googlegroups.com...
> >Ho una maschera associata ad una query. Questa, a sua volta, dipende
> >dalla tab1.
> >Nella maschera è previsto un bottone con il cui clik vado a modificare
> >il valore di un campo, per un particolare record, nella tab1.
> >A questo punto, dopo il click del bottone, è cambiato il valore della
> >tabella ma il txt associato alla query mantiene ancora il valore della
> >tabella antecedente l'aggornamento. Come faccio ad aggiornare anche la
> >query e quindi il txt ad essa associato?
> >Credo si debba parlare del metodo refresh, ma ho provato con Me.Refresh
> >senza ottenere risultato (immagino quindi che non sia questo il
> >corretto modo di utilizzarlo).
>
> Invece di Me.Refresh prova con:
>
> Me.Requery
grazie roberto,
il Me.Requery nella Sub cmd_click mi dà proprio il risultato che
cercavo.
mdm


title: Cancellare campo

author: GeKo

text:
Vorrei cancellare il contenuto di un campo di una tabella per tutti i record
della tabella stessa, senza però toccare gli altri campi.
Spero che qualcuno possa aiutarmi, Grazie.


title: Cancellare campo

text:
"GeKo" <
mam...@amsjv.it
> ha scritto nel messaggio
news:aln0kf$1j$1...@e3k.asi.ansaldo.it...

Fai una query di aggiornamento e imposti il campo a  Null
Fabio


title: aprire una form popup sotto al mouse

author: il mago galbusera

text:
come da oggetto..
.. avete qualche suggerimento per implementare una cosa del genere?
--
saluti
il mago galbusera


title: aprire una form popup sotto al mouse

author: stwe

text:
"il mago galbusera" <galb...@katamail.com.INDOVINACOSADEVITOGLIERE> ha
scritto nel messaggio news:aih0va$ad$1...@fe2.cs.interbusiness.it...

su mouse over (sopra) ci metti il codice docmd.openform "tua popup"
by
stwe


title: aprire una form popup sotto al mouse

text:
> su mouse over (sopra) ci metti il codice docmd.openform "tua popup"
> by
> stwe
questo apre il popup quando passo sopra con il mouse
io invece voglio che ad un evento onclick di un bottone si apra la form
popup che ha per coordinate alto,sx pari alle coordinate del mouse
non sono riuscito a farlo con un modo ovvio e/o immediato
immagino che ci vogliano delle chiamate a basso livello di api o cose del
genere.
oppure un qualche controllo non fornito con access..
.. ne sapete nulla?


title: scusate, ma Fw: firma digitale in una maschera?

author: rik

text:
non ho avuto modo di accedere ad internet per svariati giorni, problemi
tecnici!
avevo postato il seguente msg, esiste una risposta? - grazie
----- Original Message -----
From: "rik" <
doctor...@hotmail.com
>
Newsgroups: it.comp.appl.access
Sent: Friday, September 21, 2001 5:58 PM
Subject: firma digitale in una maschera
> ho una maschera ordini con un campo 'autorizzato da'.
> devo fare in modo che la persona che autorizza possa mettere una firma
> digitale sottoforma di immagine scannerizzata o in un altro modo.
> il database è condiviso in rete e sarebbe ancora meglio che solo chi
> autorizza abbia la maschera con il comando per immettere questa firma
> come posso fare?
> grazie pe l'interesse
> saluti
> riccardo


text:
"rik" <
doctor...@hotmail.com
> ha scritto nel messaggio
news:9os2re$2ssl$1...@newsreader1.mclink.it...

Se hai Windows NT/2000 potresti proteggere il file immagine con la firma
digitalizzata. Solo chi ha l'autorizzazzine alla lettura del file potrà
usarlo.
Se non hai NT o 2000 credo che l'unica strada percorribile sia quella della
sicurezza a livello utente.
Personalmente uso una password, criptata con una API, per ogni utente
abilitato. Solo digitando la giusta password sarà possibile inserire un
nuovo dato.
Ciao, Carlo


title: Access da chiavetta USB

author: Alberto F.

text:
Buon giorno,
cortesemente chiedo se qualcuno di voi può darmi indizazione sulla
possibilità di far girare una applicazione access su chiavetta usb senza
che sul computer sia stato installato access.
Cio mi sarebbe utili per far girare una applicazione (piccola) per la
compilazione e stampa di un verbale di intervento consulenziale, evitando
di dover accendere ogni volta il mio pc portatile.
Grazie e buone vacanze a tutti voi.

--

questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Access da chiavetta USB


title: Access da chiavetta USB

author: Karl Donaubauer

text:
Alberto F. wrote:
> cortesemente chiedo se qualcuno di voi pu� darmi indizazione sulla
> possibilit� di far girare una applicazione access su chiavetta usb
> senza che sul computer sia stato installato access.
> Cio mi sarebbe utili per far girare una applicazione (piccola) per la
> compilazione e stampa di un verbale di intervento consulenziale,
> evitando di dover accendere ogni volta il mio pc portatile.

Non � mai possibile di "far girare una applicazione" Access senza
Access (versione completta o runtime). Chiavetta USB o no
non importa.

Puoi solo cavare i dati dalle tabelle con un programma diversa di
Access (usando ODBC, DAO o ADO) ma non aprire maschere
o report o eseguire codice VBA ecc.

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


title: Database con varianti taglia/colore

author: Cominelli Maurizio

text:
Buongiorno a tutti!
Avrei bisogno di alcune dritte per quanto riguarda la gestione
di un database con varianti Taglie/colori.
Posso anche mandarvi una copia per sapere se lo ho strutturato
correttamente!
Ringrazio anticipatamente chiunque abbia voglia, e buon cuore, di darmi una
mano
Maurizio


title: Database con varianti taglia/colore

author: Giuliano Bolzonello

text:
Cosa ti serve di preciso ?
Ciao
Giuliano
"Cominelli Maurizio" <
cominel...@libero.it
> ha scritto nel messaggio
news:W2aO6.21789$Ql3.9...@news.infostrada.it...



title: Non visualizzare #errore

author: Luc Lucc

text:
Ho una maschera con sottomaschera dove vengono sommati dei valori e
visualizzato il totale.
I record sono conseguenza di un valore scelto attraverso una casella
combinata.
Al momento della partenza chiaramente è tutto vuoto e al posto dei
totali mi appare la scritta #errore. Posso fare in modo che questo non
avvenga?
Inoltre se chiudo e riapro la maschera nonostante la combo appaia vuota
alcuni altri valori sono pieni.
Come posso svuotare tutto?
Grazie
                     Luciano
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Non visualizzare #errore

author: Max De Poli

text:
"Luc Lucc" <
lucia...@hotmail.com
> wrote in message news:<
646f69ccc441f841121...@mygate.mailgate.org
>...
> Al momento della partenza chiaramente è tutto vuoto e al posto dei
> totali mi appare la scritta #errore. Posso fare in modo che questo non
> avvenga?
Diciamo che la tua casella combinata si chiama "PIPPO", nella casella
del totale metti
=IIF(IsNull(PIPPO),Null,<la tua formula qui>)
Cia'
Max De Poli


title: Non visualizzare #errore

author: GIGIGNO

text:
"Max De Poli" <
rocc...@katamail.com
> ha scritto nel messaggio
news:c2f1e49e.02030...@posting.google.com...

E SE VOGLIO CHE NELLA CASELLA TOTALE
SE E' NULL VOGLIO LO ZERO COME VALORE!!!!
gRAZIE E SCUSATE L'INTRUSIONE
CIAO DA LUIGI


title: Non visualizzare #errore

author: david

text:
On Fri, 01 Mar 2002 17:28:26 GMT, "GIGIGNO" <
gco...@tin.it
> wrote:
>E SE VOGLIO CHE NELLA CASELLA TOTALE
>SE E' NULL VOGLIO LO ZERO COME VALORE!!!!
>gRAZIE E SCUSATE L'INTRUSIONE
>CIAO DA LUIGI
>
Io ho fatto cosi':
iif(iserror([nomecampo]);0;[nomecampo])
Ciao
david
davidgrr#
libero.it


title: [OT] Da RoDAcasa a RoDAgo

author: Roberto da casa

text:
Prima che mi dimentichi e faccia brutta figura:
100 di questi giorni
Ciao, Roberto


title: [OT] Da RoDAcasa a RoDAgo

author: RoDAgo

text:
"Roberto da casa" ha scritto nel messaggio ...
> Prima che mi dimentichi e faccia brutta figura:
>
> 100 di questi giorni
>
> Ciao, Roberto
Anche se in grosso ritardo, tantissime grazie!!!  :-)))
--
RoDAgo


title: [OT] Da RoDAcasa a RoDAgo

author: ferdiprimo

text:
Auguroni
Ferdinando


title: Operazione sul tipo  Data

author: Cicerone

text:
Ho due caselle di testo in una maschera, entrambe in formato "Data in
cifre".
Nella prima casella posso inserire la data, nella seconda invece, bloccata,
mi deve comparire automaticamente come data il giorno 15 del mese
successivo. Come devo implementare questo calcolo?
Praticamente dovrei impostare come giorno sempre il 15, come mese quello
successivo, e come anno quello corrente (a meno che l'immissione nn avvenga
a dicembre, in questo caso anke l'anno è il successivo).
Sapete darmi una dritta?
Grazie :-)


title: Operazione sul tipo  Data

author: geppo

text:

NomeTuoControllo = DateAdd("m", 1, "15/" &
Month(NomeControlloCheContieneçaData) & "/" & Year(Date))
--
Ciao
Geppo


title: Operazione sul tipo  Data

text:
....opss
.....year(NomeControlloCheContieneçaData)
--
Ciao
Geppo


title: Operazione sul tipo  Data

text:
"geppo"
>
> NomeTuoControllo = DateAdd("m", 1, "15/" &
> Month(NomeControlloCheContieneçaData) & "/" & Year(Date))
>
Grazie mille!!!!!! :-D


title: Impostazione boolean su tabella sulla base di valori da altra tabella...

author: vuLCan Karayan

text:
Oggetto peggiore non potevo sceglierlo.
Vediamo se riesco a spiegarmi meglio.
Ho due tabelle simili
MiaTabella_1
IDRecord, Numerico, InteroLungo
Nome, Testo, 25
Cognome, Testo, 25
Accettato, Boolean
MiaTabella_2
IDRecord, Numerico, InteroLungo
Conferma, Boolean
Vorrei che tutti i valori Accettato di MiaTabella_1 venissero aggiornati
allo stato del campo Conferma di MiaTabella_2
Ovvero, se l'IDrecord n.003 in MiaTabella_2 č TRUE vorrei venisse aggiornato
a TRUE anche il campo Accettato del record 003 di MiaTabella_1
Posso farlo con una query o č meglio il codice?


author: Lorenzo(pyx)

text:
In news:45b0fb0d$0$20810$
5fc...@news.tiscali.it
,
vuLCan Karayan <
nos...@nospam.it
> ha scritto:

Ciao,
se come immagino il campo di correlazione esistente in entrambe le tabelle
e' idrecord, fai una query di aggiornamento.
Nel QBE (Costruttore grafico di query) Collega le due tabelle tramite
l'idrecord, porta giu' il campo Accettato e nella riga AggiornaA digita
[Conferma]
Esegui la query, non dovrebbe servirti altro.
Un backup prima elimina problemi dopo ;-)
--
Lorenzo


title: variabili globali

author: fsangio

text:
Come si definiscono delle variabili globali in Access?
Mi spiego:
devo passare dei dati da una maschera ad un'altra, entrambe però vengono
aperte in una sottomaschera. Quindi non posso passare un argomento con
OperArgs dal comando docmd.openform, perchè uso il metodo objectsource
per aprire le maschere nella sottomaschera.
Quindi ho pensato di ricorrere ad una variabile globale, ma non so come
definirla e se è possibile farlo (credo di si).
Grazie e ciao


title: variabili globali

author: Alessandro

text:
"fsangio" <
fsa...@infinito.it
> wrote in message
news:MPG.16ae8e2e9...@powernews.libero.it...
> Come si definiscono delle variabili globali in Access?
> Mi spiego:
> devo passare dei dati da una maschera ad un'altra, entrambe perň vengono
> aperte in una sottomaschera. Quindi non posso passare un argomento con
> OperArgs dal comando docmd.openform, perchč uso il metodo objectsource
> per aprire le maschere nella sottomaschera.
> Quindi ho pensato di ricorrere ad una variabile globale, ma non so come
> definirla e se č possibile farlo (credo di si).
>
>
> Grazie e ciao
Le variabili GLOBAL č un tipo di variabili un pň datato.
Credo tu possa utilizzare 2 sistemi:
1)Crei un Modulo e inserisci le Variabili come:
Public TuaVariabile as String/Integer o altro
2)Puoi utilizzare nelle SubForm il Metodo Property Let/Get (Piů scomodo e forse
per il tuo caso poco pratico)
Ciao
Alessandro(@Alex)
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: variabili globali

author: Antonio Biso

text:
fsangio <
fsa...@infinito.it
> wrote in message
MPG.16ae8e2e9...@powernews.libero.it...

In questi casi io uso il trucco di mettere dei controlli nascosti dove
scrivere valori ed andare a leggerli in maniera trasparente all'utente...
Antonio


title: variabili globali

text:
> > Come si definiscono delle variabili globali in Access?
> > Mi spiego:
> > devo passare dei dati da una maschera ad un'altra, entrambe però vengono
> > aperte in una sottomaschera. Quindi non posso passare un argomento con
> > OperArgs dal comando docmd.openform, perchè uso il metodo objectsource
> > per aprire le maschere nella sottomaschera.
> > Quindi ho pensato di ricorrere ad una variabile globale, ma non so come
> > definirla e se è possibile farlo (credo di si).
>
> In questi casi io uso il trucco di mettere dei controlli nascosti dove
> scrivere valori ed andare a leggerli in maniera trasparente all'utente...
>
> Antonio
>
>
>
Già ho adottato questo metodo, però mi sembra un po grezzo!!!


title: variabili globali

text:
fsangio <
fsa...@libero.it
> wrote in message
MPG.16aed15fb...@news.infinito.it...

Funziona alla grande e non è affatto grezzo. Ti toglie le castagne dal fuoco
molto spesso ed è assolutamente trasparente all'utente. Che voi di più?!?
Antonio


title: Help principiante - file txt

author: dott Monti

text:
Ho un file txt con dentro una serie di dati ess:
"Paolo";"Monticelli";"1030,41"
"Diego";"Monticelli";"75,30"
Dovrei eliminare le virgolette (") e trasformare le virgole (,) in punti (.)
in modo da ottenere quanto
Paolo;Monticelli;1030.41
Diego;Monticelli;75.30


title: Help principiante - file txt

author: namor

text:
dott Monti ha scritto:

Se lo devi fare una sola volta lo apri in notepad e fai un
trova-sostituisci
Se invece devi ripetere spesso l'operazione ti devi scrivere il codice. In
vba sono poche righe.
Se lo vuoi fare da DOS, ho un programmino che lo può fare.
Namor
--
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Help principiante - file txt

text:
"namor" <
do...@spam.me
> ha scritto nel messaggio
news:btu4f8$t6i$1...@news.newsland.it...
> dott Monti ha scritto:
>
> > Ho un file txt con dentro una serie di dati ess:
> > "Paolo";"Monticelli";"1030,41"
> > "Diego";"Monticelli";"75,30"
> > Dovrei eliminare le virgolette (") e trasformare le virgole (,) in punti
(.)
> > in modo da ottenere quanto
> > Paolo;Monticelli;1030.41
> > Diego;Monticelli;75.30
>
>
> Se lo devi fare una sola volta lo apri in notepad e fai un
> trova-sostituisci
> Se invece devi ripetere spesso l'operazione ti devi scrivere il codice. In
> vba sono poche righe.
> Se lo vuoi fare da DOS, ho un programmino che lo puņ fare.
> Namor
Dovrei farlo piu volte, e.... mi piacerebbe farlo con VB (da access), se
fosse possibile avere il codice ti ringrazio
ti ringrazio comunque per la risposta


title: Help principiante - file txt

text:
dott Monti ha scritto:
> "namor" <
do...@spam.me
> ha scritto nel messaggio
> news:btu4f8$t6i$1...@news.newsland.it...
> > dott Monti ha scritto:
> > > Ho un file txt con dentro una serie di dati ess:
> > > "Paolo";"Monticelli";"1030,41"
> > > "Diego";"Monticelli";"75,30"
> > > Dovrei eliminare le virgolette (") e trasformare le virgole (,) in punti
> (.)
> > > in modo da ottenere quanto
> > > Paolo;Monticelli;1030.41
> > > Diego;Monticelli;75.30
> > Se lo devi fare una sola volta lo apri in notepad e fai un
> > trova-sostituisci
> > Se invece devi ripetere spesso l'operazione ti devi scrivere il codice. In
> > vba sono poche righe.
> > Se lo vuoi fare da DOS, ho un programmino che lo può fare.
> > Namor
> Dovrei farlo piu volte, e.... mi piacerebbe farlo con VB (da access), se
> fosse possibile avere il codice ti ringrazio
> ti ringrazio comunque per la risposta
Devi aprire due file con Open, uno in lettura ed uno in scrittura (con un
altro nome), leggere dal primo file un carattere alla volta, se è una
virgoletta " non fai niente, se è una virgola scrivi sul secondo file un
punto, se è un qualsiasi altro carattere lo scrivi sul file tale e quale.
Alla fine chiudi i due files e se non si sono verificati errori cancelli
il primo e rinomini il secondo.
Per darti uno spunto allego un paio di righe per scrivere su un file:
    nomefile = "D:\docs\MioOutput.txt"
    numFile2 = FreeFile
    char = "X"
    Open nomefile For Output As #numFile2
    While <condizione>
       Print #numFile2, char
    Wend
    Close numFile2



title: Esempio 6.196 del SC Access/OutlooK Importare Indirizzi - Errore

author: Napoleone

text:
Carissimi amici e frequentatori,
preso dalla curiosità di vedermi il demo messo a disposizione dall'amico
Sandro Peruz, (Che saluto), volevo mettere in atto quanto visto; ma dopo
aver creato una t_Contatti, creato il riferimento e scatenato l'evento che
determina l'importazione degli indirizzi, mi viene segnalato:
Tipo di errore: La classe non supporta l'automazione o l'interfaccia
prevista.
Rinnovo i miei saluti.
Cataldo Formaro


title: Regolazione data e ora tipo SysTray ed attesa.

author: Michele (Giò)

text:
Buonasera a tutti.
Ho visto in un precetente topic che con l'istruzione
Shell "rundll32.exe shell32.dll,Control_RunDLL timedate.cpl,,0"
posso consentire la regolazione della data e ora aprendo da Access la regolazione di data e ora.
Solo che io avrei piacere che questa finestra si aprisse in popup sopra access e che questo
attendesse la regolazione per proseguire.
Come posso fare?
Forse Alessandro potrà tirar fuori una delle sue performance API..... Ho visto sul sito comune un
esempio di Baraldi per attendere la fine di un eseguibile, ma forse sono fuori strada e la cosa è
molto più semplice.
Grazie
---------------------------
Michele (Giò)
joyl...@alice.it


author: Carlo Costarella

text:
"Michele (Giò)" <
joyl...@alice.it
> ha scritto nel messaggio
news:456b4e4e$0$19239$4faf...@reader4.news.tin.it...

Sì dovrebbe andare bene.
In alternativa dai un'occhiata qui:
http://www.mvps.org/access/api/api0004.htm
Ciao, Carlo


title: Conversione orari

author: Agos

text:
Ciao a tutti

Ho un problema di conversione dati con un progetto
.adp di access;

Devo modificare gli orari inseriti in campi di tipo
DateTime su SQL Server, pescando i valori su una maschera e passandoli
a una stored procedure.

Il problema è che la s.p. si pianta.

Credo che il problema sia la conversione dei dati
al tipo 'DateTime' della tabella sul server.

Non so come risolvere il problema.

Di seguito, se mi volete aiutare, riporto lo
stralcio della routine che richiama la S.P. e la S.P. stessa:

questa è la routine...

'----------------------------------------------------------------------------

    Dim OraInizio As String, orafine
As String, giorno
        OraInizio =
"30/12/1899 " & Me.Testo26 &
".00"
        orafine = "30/12/1899 "
& Me.Testo28 & ".00"

giorno = Me.Testo32
    CurrentProject.Connection.Execute
"AggiornaOrarioDomenicaPomeriggioEstivoInvernale ('" & giorno & "', '"
& OraInizio & "', '" & orafine &
"')"
'----------------------------------------------------------------------------

e questa è la stored...

'----------------------------------------------------------------------------

set ANSI_NULLS ON

set QUOTED_IDENTIFIER ON

GO

ALTER PROCEDURE
[dbo].[AggiornaOrarioDomenicaPomeriggioEstivoInvernale]

@DataIns DATETIME, @OraIn DATETIME, @OraFin
DATETIME

AS

BEGIN

SET NOCOUNT
ON;

UPDATE [Servizi].[dbo].[TurnazioneDomenicale]

Set Orainizio = @OraIn,

[OraFine] = @OraFin

Where DataDomenica >= @DataIns AND [M/P] =
'P';

END

'----------------------------------------------------------------------------

...Ma chi c..zo l'ha inventato il tipo di dati
'DATETIME' ? Se lo piglio lo strozzo!

Ciao a tutti, grazie, a presto

Agos


title: Conversione orari

text:
Ti consiglio di passare le date alla s.p. come stringhe in questo
formato (yyyymmdd hh:MM:ss):
ad es. la data del 29/09/2007 in '20070929 00:00:00'.
Nella s.p. devi poi convertire il parametro stringa in datetime:
CONVERT (DATETIME; @varDate; 102). Quindi supponiamo che nella WHERE
vogliamo filtrare un intervallo di date la ns. s.p. la scriveremo
così: WHERE     (Data BETWEEN CONVERT(DATETIME, @varDate_Begin, 102)
AND CONVERT(DATETIME, @varDate_End, 102)).
Riccardo


title: Conversione orari

text:
<
r.ca...@gmail.com
> ha scritto nel messaggio
news:1191108237.6...@w3g2000hsg.googlegroups.com...

Ciao Riccardo
Grazie per l'interessamento
Il problema però è che devo passare un orario e non una data.
Ho fatto alcuni esperimenti direttamente sul server e se nella stored invece
della variabile metto direttamente un orario in formato hh:mm:ss, badando a
intercalare con i due punti e non con il punto, la s.p. funziona.
Quando però passo un orario da una routine VB dichiarando la variabile di
tipo 'Date', le cose sono due:
1) se provo a formattare così: Format$(Testo26, "yyyymmdd hh:mm:ss") ... mi
dà errore "Tipo non corrispondente"
2)Se invece provo così: Format$(Testo26, "hh:mm:ss"), e cioè intercalando
con i due punti, me la ritrasforma intercalando con i punti e la s.p. non
l'accetta.
L'unico modo in cui sono riuscito a fargliela 'digerire' e a modificare i
dati in tabella è statodichiarando la
variabile di tipo stringa e concatenando così:
'----
Dim OraInizio as String
OraInizio = "30/12/1899 " & Me.Testo26 & ".00", ottenendo '30/12/1899
15:30:00'
'----
Quando però vado a richiamare altre s.p. che utilizzano il dato così
modificato (che in
tabella, almeno apparentemente, non si distingue dagli altri) queste si
piantano.
Spero che tu ci capisca qualcosa, perché mi rendo conto che la questione non
è neanche facile da spiegare. Se per strigare la matassa ti serve qualche
altra indicazione fammi sapere.
Ciao, Agos


title: Conversione orari

text:
Se non puoi o hai difficoltà a modificare la sp e vuoi quindi passare
un parametro data/orario:
1) - per l'orario passa il parametro con la funzione di VB: ad es.
CDATE('15.30.00') inserendo i punti tra ora.min.sec.
2) - se vuoi passare la data/ora come stringa devi cambiare la data 0
che in Access è 30/12/1899 invece in SQL Server è 01/01/1900.
Riccardo


title: Help !!! come faccio a comporre un n di telefono ?

text:
Come faccio a comporre un numero di telefono ?
E' possibile comporre un numero di telefono tramite il modem senza passare
dall'applicativo di microsoft "connessione telefonica". Apre un mare di
finestre !!!
Grazie Andrea


title: gestioen degli errori di access in un file di LOG

text:
come creare un file di log lo visto nel sito comune, secondo voi è possibile
intercettare ogni errore che può verificarsi durante il funzionamento del
database, il nome della maschera o altro in cui si trova e mandarlo in una
nuova riga di un file di log come riga di testo da anallizzare in seguito?


author: Emyr

text:


sulle procedure on error di ogni evento fai eseguire una funzione che
scrive le informazioni nel file txt
Saluti.
Emanuele.


title: Urgente richiesta di aiuto!

author: Willie

text:
Buona sera a tutti.
Scusate la banalità della domanda, ma sto alle prime armi.
Sto creando il mio primo database, vorrei cortesemente sapere come devo fare
affinchè i dati che inserisco in una tabella (ad esempio: Professionisti
abilitati), vengano registrati anche in un'altra tabella (ad esempio:
Rubrica telefonica).
Ringrazio molto chi vorrà rispondere ed invio cordiali saluti a tutti.
Willie


title: Urgente richiesta di aiuto!

author: Silvio Berruti

text:
"Willie" <
okm...@tin.it
> ha scritto nel messaggio
news:5JMS6.29799$vt.3...@news1.tin.it...
> Buona sera a tutti.
> Scusate la banalità della domanda, ma sto alle prime armi.
>
> Sto creando il mio primo database, vorrei cortesemente sapere come devo
fare
> affinchè i dati che inserisco in una tabella (ad esempio: Professionisti
> abilitati), vengano registrati anche in un'altra tabella (ad esempio:
> Rubrica telefonica).
Semplice: non lo devi fare.
Se nella tua tabella "Professionisti abilitati" hai una struttura del tipo:
IDProf    Contatore Chiave primaria
CognomeProf    Testo
NomeProf      Testo
n°Abilitaz    Numerico
nella tabella "Rubrica telefonica" avrai una struttura tipo:
IDRubrica    Contatore Chiave primaria
IDProf    Numerico    Lungo
Indirizzo    Testo
CAP    Testo
Città    Testo
in qualsiasi momento potrai ricavare unire i dati delle due tabelle con una
query o ricavarli con un DLookup.
Insomma, Access è un DB relazionale, quindi sfrutta le relazioni.
Ti consiglio di andarti a guardare sulla guida di Access alla voce
Relazioni/Panoramica.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


title: Ancora sul comportamento anomalo di barra menu

author: Salvatore

text:
Ciao a tutti,
qualche giorno fa ho postato un problema relativo alle barre dei menu
personalizzate.
Riassumo brevemente: la barra dei menu non risulta agganciata nella
posizione di partenza (N.B. le sue proprietà non consentono lo spostamento)
e cliccando sulle varie voci del menu non viene eseguita alcuna azione. La
barra non è associata a nessuna maschera in particolare, ma viene caricata
all'avvio.
 Ho avuto qualche risposta da MA che mi consigliava di controllare il codice
(o le istruzioni) prima dell'apertura della barra.
Ho controllato il tutto e non trovo errori (tant'è che nel 99% dei PC sui
quali è installato l'applicativo, la barra viene caricata regolarmente).
Adesso, il problema è cambiato: la barra dei menu risulta sempre spostata
però è possibile eseguire i comandi associati alle varie voci. In compenso
la barra rimane in primo piano con tutto il sottomenu espanso e copre
parzialmente le maschere.
Vi chiedo nuovamente: può essere un problema imputabile al funzionamento del
PC (problemi del S.O. o hardware)?
Grazie
Salvatore


text:
"Salvatore" <
sal...@tiscali.it
> ha scritto nel messaggio
news:42b98538$0$19537$5fc...@news.tiscali.it...

Domanda forse stupida: hai provato a personalizzare le proprietà della
barra?
Aggancio, Consenti spostamento, ridimensionamento, Attiva/disattiva, ecc.?
Ancora: in Strumenti Avvio quali opzioni sono attivate?
Usi delle macro? o il codice? Il db è in sola lettura?
Ciao, Carlo


text:
"Carlo Costarella" <
carloantoni...@virgilio.it
> ha scritto nel
messaggio news:K0uue.32419$b5.14...@news3.tin.it...

Ho controllato praticamente tutto. E non c'è nulla di anomalo.
Ho notato però una cosa: il problema si verifica solo su un certo tipo di
portatili (Acer con processore Centrino). Inoltre, come già detto,
inizialmente il programma funziona regolarmente; è solo dopo un po' di tempo
(parlo di giorni..) che il problema inizia a manifestarsi. Prima con la
scomparsa della barra dei menu (ma, da codice con una combinazione di tasti,
sono riuscito a farla riapparire), poi con il suo spostamento, poi con il
funzionamento anomalo...
Continuo a credere che il problema sia dovuto al PC.
Ciao
Salvatore


title: Allow Zero Lenght

author: Matteo Masina

text:
Ciao a tutti !
Ho una domanda che forse č stupida, ho una tabella all'interno di un DB
access; un tabella con circa 100 colonne.
Come faccio a settare la proprietą Allow Zero Lenght =Yes, senza doverle
passare tutte a mano ?
Grazie Matteo


title: Allow Zero Lenght

author: Luciano (DOC)

text:
"Matteo Masina" <
matteo...@inwind.it
> wrote in message
news:9datm0$q6i$
1...@nreadB.inwind.it
..
> Ho una domanda che forse è stupida, ho una tabella all'interno di un DB
> access; un tabella con circa 100 colonne.
> Come faccio a settare la proprietà Allow Zero Lenght =Yes, senza doverle
> passare tutte a mano ?
Ciclando sui campi:
For cont = 0 to miatab.fields.count -1
    for each prop in miatab.fields(cont).properties
        if
prop.name
 = "Allow Zero Lenght" then prop.value = "YES"
    next
next
Controlla la sintassi, l'ho scritto al volo!
Saluti.
Luciano
(DOC)


title: Allow Zero Lenght

author: Sib dal portatile

text:
"Luciano (DOC)" <
lucia...@sitocomune.com
> ha scritto nel messaggio
news:9dbcoh$hl0li$3...@ID-86073.news.dfncis.de...
>
> "Matteo Masina" <
matteo...@inwind.it
> wrote in message
> news:9datm0$q6i$
1...@nreadB.inwind.it
..
>
> > Ho una domanda che forse č stupida, ho una tabella all'interno di un DB
> > access; un tabella con circa 100 colonne.
> > Come faccio a settare la proprietą Allow Zero Lenght =Yes, senza doverle
> > passare tutte a mano ?
>
> Ciclando sui campi:
>
> For cont = 0 to miatab.fields.count -1
>     for each prop in miatab.fields(cont).properties
>         if
prop.name
 = "Allow Zero Lenght" then prop.value = "YES"
>     next
> next
Scusa l'intervento, ma perche' ciclare 2 volte?
Dim fcampo As Field
For Each fcampo In CurrentDb.TableDefs("TuaTabella")
    fcampo.AllowZeroLength = False
Next fcampo
tanto vale impostarla subito.
Sib


title: Allow Zero Lenght

text:
----- Original Message -----
From: "Sib dal portatile" <
sibN...@iol.it
>
Newsgroups: it.comp.appl.access
Sent: Wednesday, May 09, 2001 2:27 PM
Subject: Re: Allow Zero Lenght
> Scusa l'intervento, ma perche' ciclare 2 volte?
Hai perfettamente ragione!:-)
Saluti.
Luciano
(DOC)


title: Allow Zero Lenght

text: Grazie :-)


title: Avviso scadenze da Windows

author: Francesco

text:
La settimana scorsa è stato postato un problema che mi interessa molto.É
stato chiesto se era possibile ricevere un avviso da windows per informare
di alcune  senza aprire un database di access. La soluzione che è stata
proposta utilizzazva penso uno scipt di visual basic che ho cercato di
utilizzare inserendo in un form di visual basic sicuramente sbagliando
quel codice che veniva indicato ma mi dava un errore nel codice  nel punto
    Set Rs = Db.OpenRecordset("Select * From Scadenze Where Scadenza=" &
Clng(date)). Vorrei chiedere a qualche anima pia di spegarmi quale sia la
retta via per applicare quel codice. Grazie
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Avviso scadenze da Windows

author: Giorgio Prx

text:
"Francesco" <
fpera...@libero.it
> ha scritto nel messaggio
news:bfguae$ql5$1...@news.newsland.it...

Ciao Francesco
Funziona così come è anche in Access, penso che il problema sia il ritorno a
capo dopo la & , toglilo e prova.
Ciao Giorgio


title: Avviso scadenze da Windows

text:
"Giorgio Prx" <
giorgio...@nospamtiscali.it
> ha scritto nel messaggio
news:bfh35n$seo$1...@lacerta.tiscalinet.it...
>
> "Francesco" <
fpera...@libero.it
> ha scritto nel messaggio
> news:bfguae$ql5$1...@news.newsland.it...
Dimenticavo se vuoi usare il codice senza access lo incolli nel notepad e lo
salvi con estensione vbs, in access conviene inserire i riferimenti a DAO
senza bisogno di creare l'oggetto  DAO.DBengine.36.
Ciao Giorgio.


title: Avviso scadenze da Windows

text:
Giorgio Prx ha scritto:


> Ciao Giorgio.
Grazie mille funziona adesso provo a utilizzarlo



title: Perche' si continua ad usare l'HTML?

author: Lorenzo

text:
Vorrei chedere a chi continua ad usare l'HTML nel testo delle loro news di
guardare cosa succede ai loro messaggi e di valutare la leggibilita' del
testo, specialmente per le lettere accentate, ma anche per i TAG HTML in
generale.
Sarebbe opportuno configurare l'invio dei messaggi nelle news in solo testo
normale.
Grazie,
Lorenzo


title: Windows 2019 Server Datacenter - 139 euro ???

author: RobertoA

text:
Portate pazienza il 1/2 ot ma diciamo che di striscio Access lo tocca
Vedo su Amazon alcuni venditori che forniscono un Microsoft Windows
Server 2019 Datacenter, al prezzo di 139 euro
Venditore italiano, con regolare fattura vendita, solo chiave
Pensavo costasse qualche migliaio di euro
Sento che mi sfugge qualcosa, anche se non so bene cosa
Che dite?


author: BFS

text:

sarà come quelli che vendono l'office 2019 HB a 20 euro
a sentir loro tutto legale
a leggere su internet mica tanto

BFS


title: W2000-A2000 Inibire messaggio d'errore ... tosto(per me)

author: Riviera

text:
Scusate ma è un bel po' che tento di impedire un display che dice così :
"Impossibile salvare oggetto ." e sotto "è possibile che si sia verificato
...." , con pulsanti di "SI" e "NO".
Ora questo display proviene dalla routine di BeforeUpdate che attivo se la
password o alcuni dati inseriti (in un record nuovo) non sono conformi . il
codice ...
Private Sub Form_BeforeUpdate(Cancel As Integer)
If IsNull(campoa) Or (IsNull(campob) Or 0)  etc etc Then
                MsgBox "Dati incompleti "
               Cancel = True
                GoTo FineRoutine
End If
If isnull(password) then
                me.undo
                vorrei proprio chiudere senza salvare il record
end if
FineRoutine:
End sub
il messaggio non è prodotto (pare) in questa routine ma esattamente prima
dell'evento "Su Scaricamento" .
Vorrei dare la possibilità di modificare o aggiungere dati anche dopo una
errata operazione di inserimento . Devo dire che per adesso la chiusura
della maschera avviene tramite il puls classico in alto a dx.
Ciao , grazie
Marce


author: Alessandro Romeo

text:
"Riviera" <
marce...@smartino.ge.it
> ha scritto nel messaggio
news:a52re3$bon$1...@ftp-news.csita.unige.it...

Prova con docmd.echo = false o forse docmd.setwarning = false
Ciao Alessandro


text:
"Alessandro Romeo" <
alessand...@hotmail.com
> ha scritto nel messaggio
news:PU7d8.1005$v7.2...@twister1.libero.it...

Grazie , provo . Però come faccio a tornare sui miei passi senza perdere i
dati già inseriti ??
Forse questa era la vera domanda ...
Ciao Marce


title: Non Uscire dalla Maschera

text:
Non e' un titolo di un filma ma un mio problema...
Come faccio ad inibire la chiusura od il cambio record...se un campo
o vari campi non sono stati compilati (tra cui anche caselle di
riepilogo)...magari con un msgbox......
Grazie
Gigino


title: richiamare una Function

author: Ricky

text:
E' possibile chiamare una funzione specificando il suo nome in una
variabile?
esempio:
dim nomefunc as string
nomefunc="funzione1"
call nomefunc
Da me non funziona!
Grazie e ciao


title: richiamare una Function

author: Alessandro Cara

text:
Ricky ha scritto:

prova application.run nomefunc (N.b se non ricordo male la funzione deve
essere una public preferibilmente definita in "Moduli")
A. CARA


title: richiamare una Function

text:
Alessandro Cara <
al...@blunet.it
> wrote in message
news:393C4234...@blunet.it...

FUNZIONA anche senza public.
Grazie mille, sono riuscito a togliere un select case infinito, adesso va
tutto con una riga di codice, che bello !!!
Ciao Ricky


title: richiamare una Function

author: Dott. Michele Amato

text:
Ricky <
rsantoli...@interfree.it
> wrote in message
8hh9o5$r4r$1...@serv1.iunet.it...
> E' possibile chiamare una funzione specificando il suo nome in una
> variabile?
> esempio:
>
> dim nomefunc as string
> nomefunc="funzione1"
> call nomefunc
>
> Da me non funziona!
>
> Grazie e ciao
>
>
>
Io uso Eval(nomefunc & "()")
(la trovo più generale, gli puoi dare in pasto di tutto, anche 4*5+1)
Michele Amato
--
{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}
Un pò di pubblicità per il mio sito, su
http://utenti.worldonline.it/micheleamato
è possibile trovare una add-in per Access97:
MAE_Navigator (in fase di beta test)
mi piacerebbe conoscere la tua opinione...
{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}


title: Tabelle collegate: costanti DAO e runtime error

author: Stolcius Von Stolcenberg

text:
In un manuale di programmazione VBA Access leggo che l'utilizzo della
costante DAO DbOpentable come argomento tipo di OpenRecordset provoca
un runtime error qualora l'origine si riferisca a un oggetto TableDef
inerente a una tabella collegata.

Fin qui non ci piove: il tutto è in linea con l'esperienza.

Una successiva affermazione, però mi ha non poco stupito.

L'autore sostiene che lo stesso errore viene sollevato anche  qualora
l'origine si riferisca a un oggetto Querydef, Recordset di tipo
Snapshot,  nonchè - e questa è la ragione della mia perplessità -
Recordset di tipo Dynaset!

A me non risulta: il tipo dbOpenDynaset mi funzica alla grande con le
tabelle collegate.

E' un mio errore di interpretazione?

Errore di traduzione?

Che ne pensate?

Un salutone,
Stolcius


title: OCX per barra stile Outllook

author: bobbit

text:
Sto cercando un ocx FREEWARE per creare barre in stile Outlook, ne ho uno ma
è limitato nel numero di sottomenu che si possono creare.
Grazie, Bobbit


title: Query su AS400 e generazione report lenta

text:
Salve a tutti avrei un quesito teorico/pratico

Lo scenario è questo: catena di operazioni non modificabile per ordini
"superiori" ....niente stored...niente ottimizzazioni lato
server....posso solo fare una select più o meno complessa. stop...

Access 2000/2003 al massimo...possibile un access 97

Server as400 connnector ODBC
3 tabelle linkate sul server

uTonto manager mi chiede di compiere operazioni su tutto il
magazzino...query che opera su un milione o poco più di records....
ci mette circa 2 minuti ad elaborare...ed è accettabile da
specifica.(avete capito che è una multinaz?)

L'inaccettabile per il manager è aspettare altri 3 4 minuti per
costruire il report che mostra la situazione generale!S'è fissato..!
che cosa se ne farà di qualche centinaio di pagine...non è problema
mio...suppongo nemmeno del manager ma sia un problema di qualche
stagista che se lo deve spulciare... mi spiace per lui!

Domanda....come velocizzo la generazione del eport visto che ci sono
subtotali? io so che il report finche non riceve tutti i dati non compie
operazioni ...anche banali...come il numerare le pagine!
Non è  possibile avere una generazione report asincrona?

Quello che posso fare lato client è usare il VBA....però credo
DAO....nemmeno ado!non credo consentano di installarlo!


author: Karl Donaubauer

text:
wodka40[LinuxMint] wrote:
> ...
> Lo scenario � questo: catena di operazioni non modificabile per ordini
> "superiori" ....niente stored...niente ottimizzazioni lato
> server....posso solo fare una select pi� o meno complessa. stop...
>
> Access 2000/2003 al massimo...possibile un access 97
>
> Server as400 connnector ODBC
> 3 tabelle linkate sul server
>
> uTonto manager mi chiede di compiere operazioni su tutto il
> magazzino...query che opera su un milione o poco pi� di records....
> ci mette circa 2 minuti ad elaborare...ed � accettabile da
> specifica.(avete capito che � una multinaz?)
>
> L'inaccettabile per il manager � aspettare altri 3 4 minuti per
> costruire il report che mostra la situazione generale!S'� fissato..!
> che cosa se ne far� di qualche centinaio di pagine...non � problema
> mio...suppongo nemmeno del manager ma sia un problema di qualche
> stagista che se lo deve spulciare... mi spiace per lui!
>
> Domanda....come velocizzo la generazione del eport visto che ci sono
> subtotali? io so che il report finche non riceve tutti i dati non
> compie operazioni ...anche banali...come il numerare le pagine!
> Non �  possibile avere una generazione report asincrona?
>
> Quello che posso fare lato client � usare il VBA....per� credo
> DAO....nemmeno ado!non credo consentano di installarlo!

Puoi provare di usare una tabella temporanea, cio� "di lavoro",
come origine del report.

Questa tabella puoi mettere in un backend (di JET) e collegare
nel frontend dove si trova il report. Cos� si gonfia solo il BE che
puoi o compattare o sostituire con FileCopy o creare di nuovo
sul volo ogni volta.

Se usi il BE pi� volte prima fai un:
DELETE * FROM TabellaDiLavoro

Poi invece di un SELECT sulla tabella server usa un INSERT INTO,
cio� una query di accodamento, per riempire la tabella di lavoro.

Il report su questa base dovrebb'essere molto pi� veloce.
La prova in prima linea sar� quanto tempo costa la query
di accodamento.

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


text:
Karl Donaubauer ha spiegato il 14/11/2012 :
> wodka40[LinuxMint] wrote:
>> ...
zac
> Il report su questa base dovrebb'essere molto piï¿œ veloce.
> La prova in prima linea sarï¿œ quanto tempo costa la query
> di accodamento.

Thanks!... proverï¿œ!

--
----- Italliaaaaa 3227! -----
Il grande maestro di pittura meta-gastro-fisica Luciano Lupoletti in:
David Arlequin
http://www.lupoletti.com/public/lupoletti/09-10-24-12-05-21@David%20Arlequin%20-%20Olio%20su%20tela.jpg

(ROTFL: oddio mi ribalto)


title: Formattazione condizionale

author: happy

text:
Ciao amici,
continuo a bere a questa fontana, finchè non mi chiuderete i rubinetti!
espongo il mio problema:
ho win xp e office xp
- In un report  evidenzio dei periodi di lavoro.
- In un campo a piè di pagina sommo i periodi.
- Vorrei che tali periodi fossero evidenziati in tre blocchi, quando
superano il n° di 270 così:
se sono, per esempio, in totale 500
- in un controllo 270
- in un secondo controllo  80  (da 271 a 350)
- in un terzo  150   (da 351 a 500)
Pensavo di risolvere con la formattazione condizionale ma non ci capisco
molto. Pensate che sia possibile?
Grazie per l'attenzione datami fin ora e per quella futura ;O)))
Antonio