title: Access e word stampa unione

text:
"iperworld" <
poal...@tiscali.it
> ha scritto nel messaggio
news:49c6c3a4$0$7901$c83e...@anchorman-read.tele2.net...
> Non mi sono spiegato bene,
> intendevo che non possono essere usate (da word) query che includono
> criteri con riferimento ad una maschera, del tipo
> [miamaschera]![miocampo]...
> word non le può includere come origine dati della stampa unione
>
> ciao
Io consiglio sempre di passare a word una fonte dati già filtrata, ci si
guadagna in tempo e praticità.
Quindi:
- puoi lasciare la query in access con i parametri del filtro che puntano
alla form aperta e indicare a word quella query come fonte dati.
- puoi trasformare la stessa query di selezione in query di creazione
tabella e indicare a word quest'ultima...
Ciao.
--
Sergio MAZZA


title: Access e word stampa unione

author: RobertoA

text:
>> Non mi sono spiegato bene,
>> intendevo che non possono essere usate (da word) query che includono
>> criteri con riferimento ad una maschera, del tipo
>> [miamaschera]![miocampo]...
>> word non le può includere come origine dati della stampa unione
>>
>> ciao
> Io consiglio sempre di passare a word una fonte dati già filtrata, ci si
> guadagna in tempo e praticità.
> Quindi:
> - puoi lasciare la query in access con i parametri del filtro che puntano
> alla form aperta e indicare a word quella query come fonte dati.
> - puoi trasformare la stessa query di selezione in query di creazione
> tabella e indicare a word quest'ultima...
Come fate a 'passare' da Access a Word la query ?
Con la stampa unione, da quello che mi risulta, selezioni prima su Word il
db a cui collegarsi, piazzi i campi che ti servono sul foglio e poi fai
partire la procedura di unione testo ai dati db
Ciao e grazie
RobertoA


title: Access e word stampa unione

author: iperworld

text:
[cut]
> - puoi lasciare la query in access con i parametri del filtro che puntano
> alla form aperta e indicare a word quella query come fonte dati.
O.K. ecco il punto: questo è esattamente quello che non credo sia possibile
fare: word non ammette la query "filtrata" come fonte dati.
Con "non ammette" intendo dire che word non permette di indicarla
come fonte di dati per la stampa unione.
> - puoi trasformare la stessa query di selezione in query di creazione
> tabella e indicare a word quest'ultima...
Userò questa seconda strada che mi ha iindicato,
Ancora GRAZIE Sergio.
Matteo


title: Access e word stampa unione

author: Sergio MAZZA

text:
"RobertoA" <
amor...@tiscalinet.it
> ha scritto nel messaggio
news:49c73ac5$1...@newsgate.x-privat.org...
> Come fate a 'passare' da Access a Word la query ?
> Con la stampa unione, da quello che mi risulta, selezioni prima su Word il
> db a cui collegarsi, piazzi i campi che ti servono sul foglio e poi fai
> partire la procedura di unione testo ai dati db
> Ciao e grazie
> RobertoA
Io non ho parlato di "passare" query ma di indicare a word qual'è la query
di orgine dati.
Poi se vuoi/puoi con VBA puoi anche, da access, modificare/rimuovere
l'origine dati (la quey) del documento tramite OLE...
Ciao.
--
Sergio MAZZA


title: Trovare record che corrispondono ai requisiti e problemi correlati

author: Andrea

text:
In una tabella anagrafica mi sarebbe utile visualizzare un elenco di
record che risponsano a determinati requisiti.
Ho costruito una form contenente le seguenti caselle di testo:
Cognome, Nome, Età, Anno di nascita, Sesso.
Ad ognuna di esse corrisponde una chkbox che se selezionata abilita la
corrispondente casella di testo per l'immissione dei dati.
Quindi una casella di riepilogo dove visualizzare i record ottenuti ed
un pulsante per avviare la ricerca.
Lo scopo sarebbe, come intuito, di inserire 1 o più valori di ricerca:
ad es. cerco un tale di cognome Pippo che dovrebbe avere 50 anni, oppure
tutti i maschi nati nel 1965, e così via con tutte le combinazioni
possibili di quelle caselle di testo.
I problemi che mi sono ritrovato sono stati:
- Età : esiste nel Db un campo data NatoIl. Come fargli trovare il
record inserendo l'età? dovrebbe considerare la data attuale (ovviamente
solo l'anno), sottrarre l'età inserita e ricercare nella tabella i campi
data in cui il solo valore dell'anno risulta dalla sottrazione Anno
attuale - Età......
- Anno di nascita: vabbè, il criterio dovrebbe essere simile a quello di
sopra.....
- Oltre a quanto sopra, non riesco a creare la query che mi ricerchi i
dati in base ai criteri immessi.
- Posso stampare il contenuto della casella di riepilogo?
Grazie per l'aiuto
Andrea


author: NSantini

text:
"Andrea" <
Andr...@libero.it
> ha scritto nel messaggio
news:_SiBi.98256$%k.24...@twister2.libero.it...
> In una tabella anagrafica mi sarebbe utile visualizzare un elenco di
> record che risponsano a determinati requisiti.
> Ho costruito una form contenente le seguenti caselle di testo:
> Cognome, Nome, Età, Anno di nascita, Sesso.
> Ad ognuna di esse corrisponde una chkbox che se selezionata abilita la
> corrispondente casella di testo per l'immissione dei dati.
> Quindi una casella di riepilogo dove visualizzare i record ottenuti ed un
> pulsante per avviare la ricerca.
> Lo scopo sarebbe, come intuito, di inserire 1 o più valori di ricerca:
Perché non usi il pulsante *Filtro in base a maschera*? Dovrebbe risolvere
il tuo problema senza metterti a costruire maschere con cekbox ecc.
> ad es. cerco un tale di cognome Pippo che dovrebbe avere 50 anni, oppure
> tutti i maschi nati nel 1965, e così via con tutte le combinazioni
> possibili di quelle caselle di testo.
> I problemi che mi sono ritrovato sono stati:
> - Età : esiste nel Db un campo data NatoIl. Come fargli trovare il record
> inserendo l'età? dovrebbe considerare la data attuale (ovviamente solo
> l'anno), sottrarre l'età inserita e ricercare nella tabella i campi data
> in cui il solo valore dell'anno risulta dalla sottrazione Anno attuale -
> Età......
>
[cut]
Sempre nel filtro in base a maschera nel contrllo NatoIl puoi inserire la
parola chiave Between per fare delle selezioni entro un range di date
Ciao
NSantini


author: Access

text:
ciao Andrea,
"Andrea" <
Andr...@libero.it
> ha scritto nel messaggio
news:_SiBi.98256$%k.24...@twister2.libero.it...
> In una tabella anagrafica mi sarebbe utile visualizzare un elenco di
> record che risponsano a determinati requisiti.
> Ho costruito una form contenente le seguenti caselle di testo:
> Cognome, Nome, Età, Anno di nascita, Sesso.
> Ad ognuna di esse corrisponde una chkbox che se selezionata abilita la
> corrispondente casella di testo per l'immissione dei dati.
> Quindi una casella di riepilogo dove visualizzare i record ottenuti ed un
> pulsante per avviare la ricerca.
> Lo scopo sarebbe, come intuito, di inserire 1 o più valori di ricerca: ad
> es. cerco un tale di cognome Pippo che dovrebbe avere 50 anni, oppure
> tutti i maschi nati nel 1965, e così via con tutte le combinazioni
> possibili di quelle caselle di testo.
> I problemi che mi sono ritrovato sono stati:
> - Età : esiste nel Db un campo data NatoIl. Come fargli trovare il record
> inserendo l'età? dovrebbe considerare la data attuale (ovviamente solo
> l'anno), sottrarre l'età inserita e ricercare nella tabella i campi data
> in cui il solo valore dell'anno risulta dalla sottrazione Anno attuale -
> Età......
year(date) - eta'
>
> - Anno di nascita: vabbè, il criterio dovrebbe essere simile a quello di
> sopra.....
>
> - Oltre a quanto sopra, non riesco a creare la query che mi ricerchi i
> dati in base ai criteri immessi.
>
> - Posso stampare il contenuto della casella di riepilogo?
>
> Grazie per l'aiuto
> Andrea
--
Ciao
Access


text:
Grazie ad entrambe per i consigli
Andrea
Access ha scritto:



title: effetto tasto shift

author: Pasquale Antonacci

text:
Pur avendo eseguito alla lettera le tue istruzioni ed aver ricevuto il
messaggio "Vero" lo SHIFT continua imperterrito a funzionare.... Sono
disperato!!!
--
Posted from
sirio.tno.it
 [138.66.200.5]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: effetto tasto shift

author: Dario da PD

text:
Pasquale Antonacci <
p.ant...@tno.it
> wrote in message
01BFFAD9.AE457...@tno.it...
> Pur avendo eseguito alla lettera le tue istruzioni ed aver ricevuto il
> messaggio "Vero" lo SHIFT continua imperterrito a funzionare.... Sono
> disperato!!!
Ciao Pasquale,
sarà, ma ho cercato sul sito comune le funzioni per disabilitare lo shift ma
non le ho trovate.
(forse è il caldo che mi ha rincitrullito).
Spero che quelle in tuo possesso siano queste :
*************************
'Per disabilitare il tasto shift
Function Disable_shift()
On Error GoTo Error_disable_shift
    Dim db As DATABASE
    Dim PRP As Property
    Const Prop_not_found = 3270
Set db = CurrentDb()
db.Properties("AllowByPassKey") = False
Exit Function
Error_disable_shift:
If Err.Number = Prop_not_found Then
        Set PRP = db.CreateProperty("AllowByPassKey", dbBoolean, False)
        db.Properties.Append PRP
        Resume Next
        Else
        MsgBox Err.Number & " " & Err.Description
        End If
End Function
'------------- per riabilitare lo shift
Function Enable_shift()
On Error GoTo Error_enable_shift
    Dim db As DATABASE
    Dim PRP As Property
    Const Prop_not_found = 3270
Set db = CurrentDb()
db.Properties("AllowByPassKey") = True
Exit Function
Error_enable_shift:
If Err.Number = Prop_not_found Then
        Set PRP = db.CreateProperty("AllowByPassKey", dbBoolean, True)
        db.Properties.Append PRP
        Resume Next
        Else
        MsgBox Err.Number & " " & Err.Description
        End If
End Function
******************
Mi scuso se mi permetto di postare qualcosa che ha fatto qualcun'altro senza
nominarlo, ma non mi sono scritto chi le ha postate (mi sembra RodAgo o
Carlo VE, mi scuseranno comunque !!!).
Veniamo al dunque...
Se sono queste le funzioni che hai, ti invio la risposta (con qualche
modifica) che avevo dato tempo fa a Matteo (17/07/2000) su come
implementarle.
******************
La funzione (o meglio le due funzioni) le puoi inserire in un normalissimo
modulo.
Crei inoltre la fatidica macro "AUTOKEYS" che, come sappiamo è quella che
intercetta i tasti funzione che vuoi tu.
Devi creare 2 righe : una per "abilitare" il tasto shift, l'altra per
disabilitarlo.
Vediamo la prima.
Sulla colonna "nome macro" digiti la combinazione dei tasti che vuoi tu (ad
esempio ^{F1} che sta per Ctrl-F1); su "azione" imposti "esegui codice" e,
nella casellina in basso, digiti il nome della funzione ( Disable_Shift() ).
Meglio è se, nella riga successiva in cui lascerai la colonna "nome macro"
vuota, imposti un messaggio (con l'azione FinestraMessaggio) dicendo,
semplicemente, "tasto shift disabilitato".
Vediamo la seconda.
Idem come la prima, ponendo su "nome macro" un altro tasto (es. ^{F2} che
sta per Ctrl-F2), eseguendo la funzione Enable_Shift() e dandone opportuno
messaggio.
A questo punto tu vai avanti con la realizzazione del tuo db, senza fare
null'altro.
Una volta completato crei l'MDE, vai dal tuo cliente, glielo installi, fai
tutte le tue verifiche e, prima d'andartene, premi Ctrl-F1: a questo punto
ti comparirà il messaggino "tasto shift disabilitato" e il tuo cliente non
potrà più andarsi a vedere il tuo db (anche se MDE) tenendo premuto il tasto
shift.
Se ti dovesse capitare di doverlo riabilitare, apri il database, premi
semplicemente Ctrl-F2, lo richiudi e lo riapri tenendo premuto lo shift. Il
tutto tornerà alla normalità.
Come vedi la funzione (le funzioni) non devono essere inserite nel primo
form eseguito dal db, ma sono delle funzioni che possono essere lanciate in
qualsiasi momento ed il metodo migliore per farlo è utilizzare la macro
autokeys.
Scusa se magari sono stato TROPPO passo-passo, ma, non conoscendo il tuo
livello di programmazione, meglio essere precisini piuttosto che sommari.
*****************
Io solitamente le utilizzo così (gli altri non so...) e funzionano.
Spero sia chiaro.
Ciao
Dario da PD


title: effetto tasto shift

text:
> Ciao Pasquale,
> sarà, ma ho cercato sul sito comune le funzioni per disabilitare lo shift
ma
> non le ho trovate.
> (forse è il caldo che mi ha rincitrullito).
'mo ho capito !!!
Mi sono scaricato la versione download in cui non è ancora presente !!!
Beh, come vedrai la funzione è nettamente diversa.
Mi rimangerei tutto, se non fosse per il fatto che ti ho fornito una
soluzione alternativa (spero) ugualmente utile.
Ciao
Dario


title: effetto tasto shift

text:
Anche inserendo l'EseguiCodice nella macro Autoexec il tasto SHIFT continua
imperterrito a funzionare. C'e' per caso qualche parametro generale di
database da impostare??



title: effetto tasto shift

text:
Non sono piu' disperato perche' sono un COGLIONE!!!
Riconosco di aver utilizzato la funzione in modo errato (abilitavo il TRUE pensando di disabilitare lo SHIFT).
Chiedo di nuovo scusa per la mia sbadataggine e ringrazio tutti coloro che mi hanno aiutato.
Un saluto a tutti.  Lino



title: effetto tasto shift

author: Federico Luciani

text:
Pasquale Antonacci wrote:
> Pur avendo eseguito alla lettera le tue istruzioni ed aver ricevuto il
> messaggio "Vero" lo SHIFT continua imperterrito a funzionare.... Sono
> disperato!!!
Non esageriamo, la disperazione e' un'altra cosa :-)
Naturalmente, mi viene da dirti che e' impossibile che non
funzioni.
La funzione va usata in questo modo:
- dallo stesso db, per disabilitare l'effetto
bypassKey(False)
- da un altro db, per disabilitare l'effetto in C:\tuo.mdb
bypassKey(False ,"C:\tuo.mdb")
Se proprio non va, prova a debuggare per seguire le varie
operazioni
--
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------


title: effetto tasto shift

text:
Pasquale Antonacci wrote:
> Non sono piu' disperato perche' sono un COGLIONE!!!
> Riconosco di aver utilizzato la funzione in modo errato (abilitavo il TRUE pensando di disabilitare lo SHIFT).
> Chiedo di nuovo scusa per la mia sbadataggine e ringrazio tutti coloro che mi hanno aiutato.
> Un saluto a tutti.  Lino
Mi sembrava di essere stato chiaro!
FALSE: disabilita l'effetto del tasto shift
TRUE:  abilita l'effetto del tasto shift



title: Form di ricerca

author: sbruscoli

text:
Salve
ho letto alcumi messaggi sull'argomento in oggetto cioč: data una form con
controlli associati ai campi di una tabella, usare la form per il filtraggio
dei record senza usare i pulsanti "filtra in base a maschera" e "applica
filtro" posti sulla toolbar ma con pulsanti posti direttamente sulla
maschera. Allora:
- inserire un pulsante sulla maschera; sull'evento click inserire in
seguente codice:
    DoCmd.RunCommand acCmdFilterByForm
in questo modo i controlli della maschera si puliscono e diventano attivi
per l'inserimento di valori di ricerca per il filtro.
Questo č quanto si trova in diversi post (mi sembra che roberto dia questa
indicazione)
Problema: una volta impostati i valori per il filtraggio nei campi
desiderati come si fa ad attivare il filtro senza dover premere il pulsante
sulla toolbar "applica filtro"????
Grazie


title: Form di ricerca

author: Roberto da casa

text:
"sbruscoli" <
sbru...@yahoo.com
> ha scritto nel messaggio
news:3edef...@linux5.provincia.ps.it...

Me.FilterOn = True
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Si possono inserire commenti?

author: Filippo

text:
Salve,
mi piacerebbe inserire nel file mdb (anche del tipo Back End) da
qualche parte, alcune annotazioni e commenti.
Lo stesso vorrei poter fare nell query
E' possibile?
A me viente in mente come unica possibilità, non proprio elegante,
inserire un modulo e scrivere lì i commenti ovviamente preceduti da
REM o dall'apice.
Esistono alternative?
Grazie
Filippo


title: Si possono inserire commenti?

author: Karl Donaubauer

text:

Come già scritto da Maurizio sul livello dei oggetti esiste
la proprietà Descrizione che trovi con un clic destro del
mouse sul oggetto. Ha il grande vantaggio che è visibile
nella finestra database o riquadro di spostamento.

Sul livello delle maschere, dei report e dei singoli controlli
c'è la proprietà Tag con un limite di 2048 caratteri.

Puoi anche usare una tabella come base di una maschera
o un report. Lo faccio p.e. per communicare le novità delle
versioni ai clienti. Ovvero una maschera non associata
con caselle di testo o etichette...

Dipende per quale ragione/per chi vuoi farlo.

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


title: CustomControl. Questo sconosciuto!!!

author: Klaus Dobermann

text:
Qualcuno ha mai usato il "acCustomControl", per la creazione run time dei
controlli attraverso la funzione CreateReportControl?
Saluti
Klaus Dobermann
doberm...@tin.it


title: CustomControl. Questo sconosciuto!!!

text:
Saluti a tutti del N.G.:
Ok, ho trovato la soluzione, grazie comunque.
Klaus Dobermann
doberm...@tin.it
Klaus Dobermann <
doberm...@tin.it
> wrote in message
GICH8.84296$CN3.2...@news2.tin.it...



title: Assegnare una variabile ad argomento opzionale

author: AlkaSeltzer alias Jena Cool

text:
Quesito grosso come una casa
in una linea del genere:
DoCmd.OutputTo acReport, "NOMEREPORT", "HTML(*.html)", "PATH E NOMEFILE,
False, ""
come faccio a scrivere che l'argomento opzionale "PATH E NOMEFILE"
deve corrispondere a tutti i record di un campo da me definito?
grazie per l'aiuto


text:
"AlkaSeltzer alias Jena Cool" <
alkas...@tin.it
> ha scritto nel messaggio
news:cF8l6.392$Mx3....@twister2.tin.it...

Dovrai eseguire un ciclo che legge i record della tabella:
es.
'-----------------
dim orst as recordset
set orst = currentdb.openrecordset("NomeTabella",dbOpenForwardOnly)
do while not orst.eof
   DoCmd.OutputTo acReport, "NOMEREPORT", "HTML(*.html)", orst!path & "\" &
orst!nomeFile, False, ""
     orst.movenext
loop
orst.close
set orst = nothing
'-----------------
Spero di non aver scordato nulla...
Ciao.


text:
Questo è il testo del messaggio inviatomi per e-mail:
'------------------------ inizio
...per il codice su come assegnare un valore ad un argomento opzionale
...anche se il codice mi da "argomento non valido".... tuttavia è una buona
traccia su cui lavorare.....
ma vorrei abusare della tua gentilezza per sottoporti in modo più chiaro
il mio job....
Il problema è relarivo all'esportazione in HTML di un report....
che com'e' noto genera una serie di pagine html di questo tipo:
----------------------
aaaaaaa1.html
aaaaaaa2.html
aaaaaaa3.html
aaaaaaa4.html
aaaaaaa5.html
---------------------
dove il numero è aggiunto automaticamente dalla routine di esportazione
io invece voglio una serie di files del tipo:
aaaaaaa.html
bbbbbbb.html
ccccccc.html
ddddddd.html
il cui nome - diverso per ogni file - nasce dal contenuto
di un campo da me stabilito....
 grazie se puoi aiutarmi ancora (anzi.. heheheh grazie comunque)
alkas...@tin.it
'------------------------ fine
RISPOSTA:
Cosa non và nel codice che ti ho proposto?
Ciao.


author: AlkaSeltzer

text:
>
> RISPOSTA:
> Cosa non và nel codice che ti ho proposto?
>
> Ciao.
>
>
il debugging mi dice che l'argomento in questa riga non è valido (errore
3001)
Set orst = CurrentDb.openrecordset ("datibase", dbOpenForwardOnly)
(PS: "datibase" è il nome della tabella a base del report da esportare)


text:
"AlkaSeltzer" <
alkas...@tin.it
> ha scritto nel messaggio
news:AAMl6.7241$q97.1...@twister1.tin.it...
>
> il debugging mi dice che l'argomento in questa riga non è valido (errore
> 3001)
>
> Set orst = CurrentDb.openrecordset ("datibase", dbOpenForwardOnly)
>
> (PS: "datibase" è il nome della tabella a base del report da esportare)
>
Per caso usi Acc2000? Io utilizzo Acc'97 e ho riprovato il codice
modificandolo solo in punti "non significativi":
'-----------------------------
Dim orst As Recordset
Set orst = CurrentDb.OpenRecordset("prova", dbOpenForwardOnly)
Do While Not orst.EOF
    If Not IsNull(orst!Path) Then
        DoCmd.OutputTo acReport, "prova", "HTML(*.html)", orst!Path & "\" &
orst!File, False, ""
    End If
    orst.MoveNext
Loop
orst.Close
Set orst = Nothing
'-----------------------------
E non ho riscontrato nessun problema...
Ciao.


text:
> Per caso usi Acc2000? Io utilizzo Acc'97 e ho riprovato il codice
> modificandolo solo in punti "non significativi":
> '-----------------------------
> Dim orst As Recordset
> Set orst = CurrentDb.OpenRecordset("prova", dbOpenForwardOnly)
> Do While Not orst.EOF
>     If Not IsNull(orst!Path) Then
>         DoCmd.OutputTo acReport, "prova", "HTML(*.html)", orst!Path & "\"
&
> orst!File, False, ""
>     End If
>     orst.MoveNext
> Loop
> orst.Close
> Set orst = Nothing
> '-----------------------------
>
> E non ho riscontrato nessun problema...
>
> Ciao.
>
Si è A2K... sarà questo.... comunque provo nuovamente e ti fo' sapere
>


text:
"AlkaSeltzer" <
alkas...@tin.it
> ha scritto nel messaggio
news:sGwm6.16609$q97.3...@twister1.tin.it...
>
> Si è A2K... sarà questo.... comunque provo nuovamente e ti fo' sapere
>
La differenza tra Acc'97 e Acc2000 è che il primo utilizza per default DAO
mentre il secondo ADO. Se (e dico se) vuoi utilizzare l'esempio devi fare
riferimento alla libreria DAO...
Ciao.


title: [SQL] Calcolare differenza orari

author: miyomo

text:
Ciao,
ho la seguente query che mi restituisce il tempo da me volato.
Vorrei pero' esegiure il calcolo *solo* per determinate Voli.Attività
escludendone alcune.
Come potrei fare? (una "voli.attivita" da escludere e', per esempio, "AULA"
ma ce ne sono svariate per le quali ho gli orari di inizio(hi) e fine(hf) ma
non voglio calcolare il tempo trascorso)
Ho bisogno solo di SQL, uso un file access ma non con MSAccess...
SELECT Voli.Attivita, Voli.HI, Voli.HF, Format([HI]-1-[HF],"Short Time") AS
Block
FROM Voli;
Ciao
  Miyomo


title: [SQL] Calcolare differenza orari

text:
"miyomo" <miyomo/KILLSPAM/@
hotmail.com
> ha scritto nel messaggio
news:0gZ1c.781$z23....@news3.tin.it...

Un po' troppo generica come richiesta; ad esempio se modifichi il codice SQL
della query in questo modo:
SELECT Voli.Attivita, Voli.HI, Voli.HF, Format([HI]-1-[HF],"Short Time") AS
Block
FROM Voli
WHERE (Voli.Attivita = [Digita l'attività che vuoi visualizzare]);
quando lanci la query, prima che essa vada in esecuzione, Access apre una
finestra di dialogo che ti chiede di digitare l'attività che vuoi prendere
in considerazione nella query.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: [SQL] Calcolare differenza orari

text:
> Un po' troppo generica come richiesta; ad esempio se modifichi il
> codice SQL della query in questo modo:
> SELECT Voli.Attivita, Voli.HI, Voli.HF, Format([HI]-1-[HF],"Short
> Time") AS Block  FROM Voli WHERE (Voli.Attivita = [Digita l'attività che
vuoi visualizzare]);
> quando lanci la query, prima che essa vada in esecuzione, Access apre
> una finestra di dialogo che ti chiede di digitare l'attività che vuoi
> prendere in considerazione nella query.
Innanzitutto grazie!
Purtroppo, come ho detto nella mail, non uso Access, ma solo
il file .mdb percio' mi servono solo istruzioni SQL.
Ho risolto in questo modo:
SELECT Voli.Attivita, Voli.Hi, Voli.Hf,
IIf(Voli.Attivita like "AULA",'',Format([HI]-1-[HF],"Short Time")) AS Block
FROM Voli;
In questo modo escludo l'attività AULA. E' possibile anche
concatenare piu' condizioni con OR
Ciao
  Miyomo


title: FE+BE vs un solo MDB

author: Chip & Chop

text:
tempo fa ho realizzato una semplice gestione di soci e tesseramenti (anagrafica, tessere negli anni
a seguire, emissione ricevuta-fattura, elenco soci aventi diritto di voto, soci decaduti ecc...) il
tutto ha sempre funzionato egregiamente su di un P166 con 32mb con access95.
Ora la situazione è cambiata: ci sono un Piii 800 128mb e 2 Celeron466 64mb tutti legati da schede e
hub da 10mb + access2000.
Mi hanno chiesto se si poteva accedere all'archivio da i due celeron spostando quest'ultimo sul
Piii.
Conversione e spostamento fatti... Per adesso tutto è OK.... ogni tanto parte un messaggio di access
che avverte del conflitto tra due inserimenti contemporanei, la velocità è di poco
diminuita....specie se entrambe inseriscono i dati (evento comunque assai raro poiché in genere i
nuovi/rinnovi tesseramenti avvengono solo nel periodo dicembre-gennaio).
Il database continene circa 300 soci, circa 1000 tesseramenti e altrettante ricevute/fatture; i
decaduti  e le ricevute più vecchi di 2anni vengono spostate su un archivio storico periodicamente
ogni anno e sempre ogni anno l'archivio viene compattato mantenedo una dimensione di 4/5mb.
1)Secondo voi ci sono gli estremi per "spezzare" il db nelle canoniche due parti: una client e una
server, oppure può andare bene così lo stesso? Ci guadagnerei in termini di prestazioni oppure no?
2)Se mi conviene "spezzare"...... qualcuno è così gentile da dirmi come si fa in specifico?
altrimenti come posso ottenere il massimo dalla soluzione con un songlo MBD?
grazie


title: calcolare festività all'interno di un certo perido

author: tmtube

text: come si pu� calcolare il numero di festivit� di un certo periodo?


author: pfmarro

text:
Il giorno martedì 17 settembre 2013 23:55:45 UTC+2, tmtube ha scritto:
> come si può calcolare il numero di festività di un certo periodo?

DOMANDA
cosa intendi per festività?

solo le domeniche?
potresti trasformare contare weekday(data) = numero del giorno (1 sunday)

Weekday ( date_value, [firstdayofweek] )
Weekday function returns a number representing the day of the week (a number from 1 to 7) given a date value


text:
>DOMANDA
>cosa intendi per festività?

>solo le domeniche?
>potresti trasformare contare weekday(data) = numero del giorno (1 sunday)

>Weekday ( date_value, [firstdayofweek] )
>Weekday function returns a number representing the day of the week (a
>number from 1 to 7) given a date value

per festività intendo tutte le feste dell'anno ad esempio

1 gennaio 2013 capodanno è un martedì
15 agosto 2013 è un ferragosto ed è un giovedi

grazie.


text:
A prescindere le FESTE programmate, serve poi identificare le feste Locali... e la Pasqua che come sai è Variabile...!

Se vuoi scarica questo Demo:
http://www.accessgroup.it/forms/calcolo-giorni-lavorativi.html

All'interno trovi come calcolare i Giorni Lavorativi, in sostanza la logica da usare è ben Definita, quindi invece di fare il CALCOLO per Differenza dal TOTALE(GG)-FERIE, andrai a prendere solo i gg di Ferie.

@Alex


title: Maschera modificati dati

author: Debora

text:
Domandina semplice semplice:
questo codice:
Private Sub Elenco_DblClick(Cancel As Integer)
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "utenti"
stLinkCriteria = "[Codiceutenti]=" & Me![Elenco].Column(0)
DoCmd.Close
DoCmd.OpenForm stDocName, , , stLinkCriteria, acFormEdit
End Sub
mi apre una maschera con DblClick , in modalità modifica,ma se mi sposto coi
selettori mi porta anche
su un record nuovo!
E' possibile farsì che la visualizzazione rimanga sempre
sulla modalità modifica?
So che l'istruzione é: Me.AllowAddition = false. ma dove la metto?
Ciao Debora.


title: Maschera modificati dati

text:
"Debora" <
cbo.ma...@tiscali.it
> ha scritto nel messaggio
news:3H_d9.7863$%z1.1...@twister1.libero.it...

mettila su apertura della maschera form_open
metti il seguente
me.alloadditions=false cosi non ti mette l'ultimo record vuoto. Ciao. ;)


title: Maschera modificati dati

text:
"@----- Pinco --@-- Pallino -----@" <
tos...@libero.it
> ha scritto nel
messaggio news:3K_d9.7871$%z1.1...@twister1.libero.it...
[cut]
> >
>
> mettila su apertura della maschera form_open
>
> metti il seguente
>
> me.alloadditions=false cosi non ti mette l'ultimo record vuoto. Ciao. ;)
no, xkè quella msk tramite altri pulsanti la apro in modalità inserimento.
Dvrei mettere quella istruzione fra le righe dell'evento doppioclick!
Ciao Debora.


title: Maschera modificati dati

author: Antonio Biso

text:
"Debora" <
cbo.ma...@tiscali.it
> ha scritto nel messaggio
news:9P_d9.7686$AW6.1...@twister2.libero.it...
>
> "@----- Pinco --@-- Pallino -----@" <
tos...@libero.it
> ha scritto nel
> messaggio news:3K_d9.7871$%z1.1...@twister1.libero.it...
> [cut]
> > >
> >
> > mettila su apertura della maschera form_open
> >
> > metti il seguente
> >
> > me.alloadditions=false cosi non ti mette l'ultimo record vuoto. Ciao. ;)
>
> no, xkè quella msk tramite altri pulsanti la apro in modalità inserimento.
Fai così:
quando apri la maschera con uno di quei pulsanti, passagli anche l'openargs,
che è l'ultimo parametro della docmd.openform
Gli passi una stringa per esempio così:
"INS" o "MOD"
Su apertura della maschera testi l'openargs e se è MOD fai la allowadditions
a false, altrimenti no
Antonio


title: Maschera modificati dati

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:fX_d9.7928$%z1.1...@twister1.libero.it...

comè la sintassi per openargs? (se non chiedo troppo.)
nel frattempo, verifico meglio se ci sono altri post al riguardo.
Ciao Debora.
P.S. Grazie.


title: Maschera modificati dati

text:
"Debora" <
cbo.ma...@tiscali.it
> ha scritto nel messaggio
news:Lj%d9.8041$%z1.1...@twister1.libero.it...
>
> > Fai cosě:
> > quando apri la maschera con uno di quei pulsanti, passagli anche
> l'openargs,
> > che č l'ultimo parametro della docmd.openform
> > Gli passi una stringa per esempio cosě:
> > "INS" o "MOD"
> > Su apertura della maschera testi l'openargs e se č MOD fai la
> allowadditions
> > a false, altrimenti no
> >
> > Antonio
>
> comč la sintassi per openargs? (se non chiedo troppo.)
> nel frattempo, verifico meglio se ci sono altri post al riguardo.
Deboruccia...
prova a spulciare l'help di access.
Vedrai la sintassi della docmd.openform e di come si fa riferimento alla
openargs nella maschera aperta
Antonio


title: Maschera modificati dati

author: Alessandro Cara

text:
Antonio Biso wrote:
[cut]
> Deboruccia...
volevi dire Deboluccia...... vero?
--
a.cara


title: Maschera modificati dati

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:km%d9.7842$AW6.1...@twister2.libero.it...
> "Debora" <
cbo.ma...@tiscali.it
> ha scritto nel messaggio
> news:Lj%d9.8041$%z1.1...@twister1.libero.it...
> >
>
> > > Fai cosě:
> > > quando apri la maschera con uno di quei pulsanti, passagli anche
> > l'openargs,
se inserisco
DoCmd.OpenForm stDocName, , , stLinkCriteria, acFormAdd,"MOD"
intendi cosě?
> > > che č l'ultimo parametro della docmd.openform
> > > Gli passi una stringa per esempio cosě:
> > > "INS" o "MOD"
> > > Su apertura della maschera testi l'openargs e se č MOD fai la
> > allowadditions
if esiste e voglio modificare then
  DoCmd.OpenForm "miaform", , , criterio, acFormEdit, , "Mod"
end if
if non esiste e voglio inserire then
  DoCmd.OpenForm "miaform", , , , acFormAdd, , "Ins"
> > > a false, altrimenti no
> > >
> > > Antonio
> >
> > comč la sintassi per openargs? (se non chiedo troppo.)
> > nel frattempo, verifico meglio se ci sono altri post al riguardo.
>
> Deboruccia...
> prova a spulciare l'help di access.
lascia perdere la guida,in alcuni casi ti porta da tutt'altra parte.
> Vedrai la sintassi della docmd.openform e di come si fa riferimento alla
> openargs nella maschera aperta
>
> Antonio
Ho trovato questo ma non so come applicarlo al mio caso.
su doppioclick
DoCmd.OpenForm "NomeForm", , , , , , "MOD"
'sull'evento 'su apertura' della maschera...
form!miaform! ?????= Me.OpenArgs
Ciao Debora


title: Maschera modificati dati

text:
"Alessandro Cara" <
al...@blunet.it
> ha scritto nel messaggio
news:3D788618...@blunet.it...

Ragazzi,considerate che sono partita da zero, e da circa un mese.
tutto sommato qualcosa l'ho imparato, apprezzate se non altro
almeno l'impegno.
Ciao Debora


title: Maschera modificati dati

text:
Debora wrote:
>
> 'sull'evento 'su apertura' della maschera...
> form!miaform! ?????= Me.OpenArgs
if  me.openargs = "MOD" then
......
--
a.cara


title: Maschera modificati dati

text:
Debora wrote:
> Ragazzi,considerate che sono partita da zero, e da circa un mese.
> tutto sommato qualcosa l'ho imparato, apprezzate se non altro
> almeno l'impegno.
> Ciao Debora
ma no Debora, non ti infiammare.
personalmente apprezzo.
Fammi giocare un po', che questi sono tempi tristi per il ns. settore
(almeno nella mia zona)
--
a.cara


title: Maschera modificati dati

text:
"Alessandro Cara" <
al...@blunet.it
> ha scritto nel messaggio
news:3D788E07...@blunet.it...

Vuoi giocare? Hai trovato la persona giusta.
Certe volte però non capisco se state giocando o .....
Io sono ancora in tenera età e non ho la vostra malizia! :°-(
Bye bye


title: Maschera modificati dati

text:
Debora wrote:
> Vuoi giocare? Hai trovato la persona giusta.
Visto visto.
> Certe volte però non capisco se state giocando o .....
Qualche rischio bisogna correrlo
> Io sono ancora in tenera età e non ho la vostra malizia!
malizia?  Perfidia pura, altro che malizia.
> Bye bye
ma si! ;<)
--
a.cara
PS mi sembra che qualcuno -rif. 3d "Dati ripetuti"-- e' un po' fuori
strada
(sempre che tu voglia i valori del record precedente)
Guardati la  mia risposta, c'e' un piccolo problema (dovuto a neuroni
lenti)
ma risolvibile.


title: Maschera modificati dati

text:
"Debora" <
cbo.ma...@tiscali.it
> ha scritto nel messaggio
news:qV%d9.8025$AW6.1...@twister2.libero.it...

Questo l'ho già visto...
Potenza del cut&paste
Antonio


title: Maschera modificati dati

text:
"Debora" <
cbo.ma...@tiscali.it
> ha scritto nel messaggio
news:YP%d9.7993$AW6.1...@twister2.libero.it...
>
> se inserisco
> DoCmd.OpenForm stDocName, , , stLinkCriteria, acFormAdd,"MOD"
> intendi cosě?
Sě
> if esiste e voglio modificare then
>   DoCmd.OpenForm "miaform", , , criterio, acFormEdit, , "Mod"
> end if
> if non esiste e voglio inserire then
>   DoCmd.OpenForm "miaform", , , , acFormAdd, , "Ins"
Esatto!
> > Deboruccia...
> > prova a spulciare l'help di access.
>
> lascia perdere la guida,in alcuni casi ti porta da tutt'altra parte.
NON SONO D'ACCORDO!
E' molto importante l'uso della guida, molto piů che i suoi contro quando
cerchi male...
> Ho trovato questo ma non so come applicarlo al mio caso.
> su doppioclick
> DoCmd.OpenForm "NomeForm", , , , , , "MOD"
>
> 'sull'evento 'su apertura' della maschera...
> form!miaform! ?????= Me.OpenArgs
No no
Su apertura della form scriverai
if me.openargs = "MOD" then me.allowadditions = false
Antonio


title: Maschera modificati dati

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:jl1e9.8483$AW6.1...@twister2.libero.it...

Caspita! Sono proprio una brava "tosa"!
Funziona davvero! Ovviamente su inserimento
devo aggiungere un'ltra riga:
 if me.openargs = "ins" then me.allowadditions = true
e lo stesso vale per ogni pulsante!?! e se ne avessi 20?
Debora.


title: Maschera modificati dati

text:
"Alessandro Cara" <
al...@blunet.it
> ha scritto nel messaggio
news:3D789869...@blunet.it...

Ora la guardo. Debora


title: Maschera modificati dati

text:
"Debora" <
cbo.ma...@tiscali.it
> ha scritto nel messaggio
news:alafn1$q19$2...@lacerta.tiscalinet.it...
>
> > No no
> > Su apertura della form scriverai
> > if me.openargs = "MOD" then me.allowadditions = false
> >
> > Antonio
> >
> Caspita! Sono proprio una brava "tosa"!
O è il maestro?
> Funziona davvero! Ovviamente su inserimento
> devo aggiungere un'ltra riga:
>  if me.openargs = "ins" then me.allowadditions = true
Non necessariamente. Visto che sono due le possibilità, una sarà il defualt,
per cui non fai nulla e l'altro (mod per esempio) il caso ijn cui devi
cambiare la proprietà!
> e lo stesso vale per ogni pulsante!?! e se ne avessi 20?
Che vol dì?
I casi sono due, inserimento o modifica!!!
Antonio


title: Impossibile creare il database MDE

author: Kimmima

text:
Perchč mi dŕ questo errore
grazie
Michele


title: Impossibile creare il database MDE

text:
Kimmima <
miche...@interfree.it
> wrote in message
yfjr8.125131$1S3.3...@twister1.libero.it...
> Perchè mi dà questo errore
> grazie
>
> Michele
Errore di codice caro mio... hai fatto il debug prima? fai la compilazione e
il salvataggio dei codici e vedi dov'è l'errore... se il codice non è
apposto, l'mde non lo crei.
--
Maurizio75


title: Impossibile creare il database MDE

author: Paolo P

text:
"Kimmima" <
miche...@interfree.it
> ha scritto nel messaggio
news:yfjr8.125131$1S3.3...@twister1.libero.it...
> Perchè mi dà questo errore
> grazie
>
> Michele
>
Se non hai errore nel codice, può anche darsi che tu nel codice stesso
chiedi ad Access di aprire qualche form o report in modalità struttura per
fare delle modifiche, e questo nel MDE non è più permesso.
Paolo


title: Impossibile creare il database MDE

author: Lucia Rita Carfagno

text:
"Kimmima" <
miche...@interfree.it
> ha scritto nel messaggio
news:yfjr8.125131$1S3.3...@twister1.libero.it...
> Perchè mi dà questo errore
> grazie
>
> Michele
>
>
A me è successa la stessa cosa perchè le variabili non sono state dichiarate
e quindi non è stato possibile creare la versione MDE.
Ciao Rita


title: [OT] GMail (seconda infornata)

author: Sergio MAZZA

text:
Per chi vuole, mi scriva (non in html che mi va a finire nello SPAM) che lo
"invito"...
Ciao.
P.S. A vostro rischio e pericolo...
--
Sergio MAZZA


title: [OT] GMail (seconda infornata)

author: FID

text:
Sergio MAZZA ha scritto:
> Per chi vuole, mi scriva (non in html che mi va a finire nello SPAM) che lo
> "invito"...
> Ciao.
> P.S. A vostro rischio e pericolo...
ho 50 inviti, se qualcuno li vuole!
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: [OT] GMail (seconda infornata)

author: Luciano (DOC)

text:
"FID" <
fe_l...@yahoo.it
> ha scritto nel messaggio
news:cuhj8i$8lu$1...@news.newsland.it...
> ho 50 inviti, se qualcuno li vuole!
Qualcuno mi spiega il perche' del mercimonio di inviti gmail che c'e' in
giro da un po'?
Saluti.
Luciano


title: [OT] GMail (seconda infornata)

text:
"Luciano (DOC)" <
XXXlucia...@sitocomune.com
> ha scritto nel messaggio
news:373a0rF...@individual.net...

Che ne so'? Io sono stato "invitato" e mi hanno offerto due tornate di
inviti da 5 ognuno; ora me ne ritrovo na' cinquantina.
Devo dire che è molto veloce nella gestione delle mail con allegati
pesanti...
Ciao.
--
Sergio MAZZA


title: [OT] GMail (seconda infornata)

author: MA

text:
>>> ho 50 inviti, se qualcuno li vuole!
>>
>> Qualcuno mi spiega il perche' del mercimonio di inviti gmail che c'e' in
>> giro da un po'?
>> Saluti.
>>
>> Luciano
>>
>
>
> Che ne so'? Io sono stato "invitato" e mi hanno offerto due tornate di
> inviti da 5 ognuno; ora me ne ritrovo na' cinquantina.
> Devo dire che è molto veloce nella gestione delle mail con allegati
> pesanti...
>
> Ciao.
>
> --
> Sergio MAZZA
Il titolo del post è inquietante...
mandi nel forno crematorio gli hd??
MAssimiliano


title: [OT] GMail (seconda infornata)

author: access il top

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:YM_Od.2283$hd4....@news.edisontel.com...

ciao, posso ricevere un'invito anche io.
mi servirebbe la mail
negrinellisrl(ciocciola)nonso.dd
grazie


title: [OT] GMail (seconda infornata)

text:
"access il top" <
negrinelliw...@yahoo.it
> ha scritto nel messaggio
news:420c794a$0$32353$5fc...@news.tiscali.it...
>
> ciao, posso ricevere un'invito anche io.
> mi servirebbe la mail
>
> negrinellisrl(ciocciola)nonso.dd
>
> grazie
>
Ma a quale mail?
Ciao.
--
Sergio MAZZA


title: [OT] GMail (seconda infornata)

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:cuhuim$qul$1...@canarie.caspur.it...

a quella che compare togliendo nospam
negrinelliw...@yahoo.it
grazie


title: [OT] GMail (seconda infornata)

text:
access il top wrote:
> a quella che compare togliendo nospam
>
negrinelliw...@yahoo.it
> grazie
Andato...
Ciao.
--
Sergio MAZZA


title: [OT] GMail (seconda infornata)

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:cui3ke$sh3$1...@canarie.caspur.it...
> access il top wrote:
>
> > a quella che compare togliendo nospam
> >
negrinelliw...@yahoo.it
> > grazie
>
> Andato...
>
> Ciao.
grazie
un'informazione
quanto possono pesare i singoli allegati


title: [OT] GMail (seconda infornata)

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:cuhs5r$qad$1...@canarie.caspur.it...
> Che ne so'? Io sono stato "invitato" e mi hanno offerto due tornate di
> inviti da 5 ognuno; ora me ne ritrovo na' cinquantina.
Invitato da chi?
E poi scusa, ma 2 per 5 non fa 10?:-)
Saluti.
Luciano


title: [OT] GMail (seconda infornata)

text:

Fin'ora ho veicolato (in/out) allegati da 20/40Mbyte...
Ciao.
--
Sergio MAZZA


title: [OT] GMail (seconda infornata)

text:
Luciano (DOC) wrote:
> "Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
> news:cuhs5r$qad$1...@canarie.caspur.it...
>
>> Che ne so'? Io sono stato "invitato" e mi hanno offerto due tornate di
>> inviti da 5 ognuno; ora me ne ritrovo na' cinquantina.
>
> Invitato da chi?
Da chi aveva disponibile già un altro account che era stato invitato da un
altro che aveva già un account che era stato invitato da un altro che aveva
già un account che era stato invitato da un altro che aveva già un account
che era stato invitato da un altro che aveva già un account che era stato
invitato da un altro che aveva già un account... Pant! Pant!
Che curioso che sei!!!
> E poi scusa, ma 2 per 5 non fa 10?:-)
Sì, ora devi aggiungere + 50 = 70 account...
> Saluti.
>
> Luciano
Ma alla fine ne vuoi uno o ti fai pregare? Non vuoi provare l'ebrezza?
Sia chiaro che non busco una Lir... Euro...
Ciao.
--
Sergio MAZZA


title: [OT] GMail (seconda infornata)

author: TANNHAUSER

text:
Sergio MAZZA ha scritto:
> Per chi vuole, mi scriva (non in html che mi va a finire nello SPAM) che lo
> "invito"...
> Ciao.
> P.S. A vostro rischio e pericolo...
Ciao Sergio,
grazie, ti ringrazio se mi mandi un invito a:
tannauser
(at)
virgilio
(punto)
it
TANNHAUSER



title: [OT] GMail (seconda infornata)

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:cui97h$sj$1...@canarie.caspur.it...
> Ma alla fine ne vuoi uno o ti fai pregare? Non vuoi provare l'ebrezza?
Continuo a non capire....in tutti i siti del mondo se vuoi un account vai
sul sito e ti iscrivi. Qui invece si va per inviti, che pero' sono inviti
"della mignotta" (nel senso che ce l'hanno tutti) e la gente si fa pregare
per prenderli. Ed in giro ancora non ho visto nessuno che  usa 'sta gmail.
Saluti.
Luciano


title: [OT] GMail (seconda infornata)

text:
TANNHAUSER wrote:
> Sergio MAZZA ha scritto:
>
>> Per chi vuole, mi scriva (non in html che mi va a finire nello SPAM) che
>> lo
>> "invito"...
>
>> Ciao.
>
>> P.S. A vostro rischio e pericolo...
>
> Ciao Sergio,
>
> grazie, ti ringrazio se mi mandi un invito a:
>
> tannauser
> (at)
> virgilio
> (punto)
> it
>
>
> TANNHAUSER
Andato...
Ciao.
--
Sergio MAZZA


title: [OT] GMail (seconda infornata)

text:

Luciano, se non sbaglio, prima di Google non c'era nessuno che offriva
gratis tanto spazio; al momento dell'annuncio Libero ha implementato il
servizio "Jumbo Mail" ma gli allegati rimangono disponibili (viene inviato
solo il link) per una settimana o periodo prestabilito.
HotMail, sempre gratis, ti da 250Mbyte ma sono fasulli, ho incontrato
problemi su allegati da 50Mbyte.
Katamail = 5Mbyte; Tiscali = 10Mbyte...
GMail ha anche l'indicizzazione dei contenuti delle mail per una ricerca
veloce e ho anche il sospetto che se due utenti GMail si inviano messaggi,
il server è "intelligente" da spostare la mail nella casella del
destinatario senza passare per le vie "tradizionali". Almeno la mia
impressione è stata questa perché una mail di 30Mbyte (caricata da
interfaccia web via http) ed inviata è arrivata in un soffio!
Ciao.
--
Sergio MAZZA


title: [OT] GMail (seconda infornata)

text:
Sergio MAZZA ha scritto:
> Per chi vuole, mi scriva (non in html che mi va a finire nello SPAM) che lo
> "invito"...
> Ciao.
> P.S. A vostro rischio e pericolo...
Apprezzerei,
Grazie.
"
nessun...@libero.it
"



title: [OT] GMail (seconda infornata)

text:
Sergio MAZZA ha scritto:
> Per chi vuole, mi scriva (non in html che mi va a finire nello SPAM) che lo
> "invito"...
> Ciao.
> P.S. A vostro rischio e pericolo...
Posso averne uno?
basket66 at virgilio dot it
Grazie mille.



title: [OT] GMail (seconda infornata)

text:
[cut]
> Posso averne uno?
>
> basket66 at virgilio dot it
>
> Grazie mille.
>
ma non te lo avewvo gia passato io?  ;o)  mi pare di ricordare almeno...
p.s. cmq pure io ho 50 inviti ... tanto per la cronaca!
--
strano...mavero
mail: mauro . chiarello @ gmail . com
ICQ: 292-118-822
Se vuoi mettere al sicuro i tuoi dati, caricali su un server ed aspetta che
qualcuno ne faccia un mirror
Linus Torvalds


title: [OT] GMail (seconda infornata)

text:
strano...mavero ha scritto:
> [cut]
> > Posso averne uno?
> >
> > basket66 at virgilio dot it
> >
> > Grazie mille.
> >
> ma non te lo avewvo gia passato io?  ;o)  mi pare di ricordare almeno...
> p.s. cmq pure io ho 50 inviti ... tanto per la cronaca!
Certo che me lo avevi già inviato tu.
Ci sono sempre degli amici a cui fare un favore...



title: [OT] GMail (seconda infornata)

text:
[cut]
invito partito!



title: [OT] GMail (seconda infornata)

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
> Luciano, se non sbaglio, prima di Google non c'era nessuno che offriva
Ma non e' questo quello che non capisco, bensi' lo strano modo di ottenere
un'email.
Saluti.
Luciano


title: [OT] GMail (seconda infornata)

text:
[cut]
> Ma non e' questo quello che non capisco, bensi' lo strano modo di ottenere
> un'email.
> Saluti.
>
> Luciano
>
Ciao Luciano,
inizialmente gli inviti venivano concessi ai possessori di account gmail
sulla base della movimentazione della loro casella di posta ... ultimamente
anche se "elargisco" 2\3 inviti al giorno, ogni mattino ho sempre una
disponibilità di inviti pari a 50 ...
Probabilmente è un tentativo di google di invadere il mercato con la sua
gmail e molti utenti la VOGLIONO nel vero senso della parola perchè tramite
alcuni software e sfruttabile come una sorta di ftp space ... 1Gb di spazio
gratuito a casella di posta ... io ad esempio se attivassi tutti e 50 gli
account potrei godere di 50 ftp space da 1Gb cadauno ... farei chiudere
Gnutella, emule, edonkey, kazaa e tutti gli altri in 30 secondi!!!
A mio avviso la politica di far entrare solo su invito è stata voluta per
rendere "figa" questa casella, considerala anche una mossa kitch, fatto sta
che è molto richiesta, per ora ...
Saluti,
--
strano...mavero


title: [OT] GMail (seconda infornata)

author: MRM

text:
Sergio MAZZA ha scritto:
> Per chi vuole, mi scriva (non in html che mi va a finire nello SPAM) che lo
> "invito"...
> Ciao.
> P.S. A vostro rischio e pericolo...
mario . rossi . mario (at) libero . it
Scusa la banalità e grazie.



title: [OT] GMail (seconda infornata)

text:
"Luciano (DOC)" <
XXXlucia...@sitocomune.com
> ha scritto nel messaggio
news:373vudF...@individual.net...
>
> Ma non e' questo quello che non capisco, bensi' lo strano modo di ottenere
> un'email.
> Saluti.
>
> Luciano
Beh, č originale nooo? Ti da un senso di esclusivo, che poi non č...
Quello che vorrei sapere, invece, č chi sono stati i primi ad ottenere
l'account e come l'hanno ottenuto. Quello che sapevo, l'ho letto da riviste
che annunciavano l'inizio del servizio ma il link era introvabile... Vabbé
una operazione commerciale...
Ciao.
--
Sergio MAZZA


title: [OT] GMail (seconda infornata)

text:
"MRM" <
m...@libero.it
> ha scritto nel messaggio
news:cuimbg$bjm$1...@news.newsland.it...
>
> mario . rossi . mario (at) libero . it
>
> Scusa la banalità e grazie.
>
> --
Partito...
Ciao.
--
Sergio MAZZA


title: Modificare tutti i records di una maschera in una botta sola. Come si fa ?

text:
Ossia :
c' ho una maschera access che insiste su una tabella nel modo
classico. Sapete, con creazione guidata maschera su tabella.

Uno dei campi e' un flag

Qual'  e'   il  modo  piu' semplice  per far si che l' utente,
premendo il tasto T della maschera, metta tutti i record della
tabella  "sottostante"  a  true senza doverli scorrere uno a
uno ?

Grazie


author: RobertoA

text:

Sull'evento Click del controllo collegato al campo FLAG, immagino una
checkbox, ci metti "currentdb.execute "update NOME_TABELLA set
NOME_CAMPO_FLAG=true where " & me.filter


text:

Grande. Ti ringrazio !

Solo due domandine, se posso :
1)
la maschera "vede" immediatamente la modifica ? Sarebbe il caso.

2)
da dove esce quel me.filter ? Ossia cos' e', dove lo vedo, come lo
posso far costruire dall' utente ...


text:

1) no, se desideri aggiornare basta un  requery
2) esce dall'ipotesi che i record visibili nella maschera siano
filtrati, se non lo fossero il where e tutto il resto non serve


text:
Il giorno mercoledì 6 maggio 2015 15:20:41 UTC+2, RobertoA ha scritto:

> 1) no, se desideri aggiornare basta un  requery
> 2) esce dall'ipotesi che i record visibili nella maschera siano
> filtrati, se non lo fossero il where e tutto il resto non serve

Grazie Robby mi e' tutto chiaro, almeno in teoria. Ma si comporta
in modo (IMHO) insoddisfacente.

Cerco di spiegarmi :

Tanto per cominciare  se faccio  click su un campo e lo lascio in
modalita'  modifica (ossia non tolgo il focus : il campo "aspetta"
di essere aggiornato)  e  poi col mouse clicco  il  pulsante  che
contiene la query di aggiornamento quella aggiorna tutti i record
TRANNE quello che e' in modalita' modifica.

Il che ha senso, pero' sai com' e' ... l' utente  scimmia  non lo
capirebbe. Forse.

Allora devo sparare due volte la query per scavalcare il problema
(perche' l'esecuzione della prima forza la maschera a togliere il
record dalla  modalita'  inserimento  per  cui alla seconda botta
funziona)

E questa e' una.

Poi, cosa ancora piu' fastidiosa, e' che se faccio due tasti : uno
(T) che mi mette tutti i record col flag a true e un altro (F) che
me li mette tutti a false e seguo questa sequenza di azioni :

1) metto un campo in modalita' modifica (come sopra)
2) premo T (che spara la query di update due volte)

fin qui tutto ok, ma se a questo punto :

3) rimetto il campo in modalita' modifica
4) premo  il  tasto F (ossia  l'  ALTRO TASTO)  Access  mi spara un
messaggio  con  scritto  che  un  altro  utente  sta   tentando  di
modificare  il  record  e   mi  chiede se  voglio rinunciare  o  se
invece voglio portare a termine la modifica  (della  query  update)

Ossia :
lascio record in mod. modifica -> premo tasto T -> Ok
lascio record in mod. modifica -> premo tasto F -> conflitto

Parrebbe (dico : parrebbe) che il cambio  tasto l' access lo veda
come se un altro utente stia modificando.

Si, ha senso : se ragioniamo a livello di trhed : il tasto F
e' COME SE FOSSE un certo "utente" (un 3D) e il tasto T un altro.

D' altra parte sappiamo che il VB ragiona a 3D ...

Fintanto  che  uso  solo  uno dei tasti nessun problema. Ma se
invece cambio tasto ecco che per access un altro 3D autonomo
interviene.


text:

Io non farei entrare in modifica cliccando sulla checkbox
Se clicchi, allora parte la routine
1- prendi un bookmark di dove sei
2- aggiorni il campo flag sul db
3- requery (e il cursore torna al primo record)
4- torni al bookmark
5- ficus sulla checkbox


text:

focus


text:

Aoh, nisba. Non c'e' stato verso, 'cci sua.

Sai come l' ho fregato ? A un certo punto me so incazzato :
Je stacco la  connessione dalla sorgente, je  modifico  i
"flegghete" nella tabelle e poi riconnetto la maschera alla
sorgente.

Adavede come frulla, er fio de na mignotta ;-)
Ah !

scusa lo sfogo


title: browsefolder percorso iniziale

author: Dario Sacco

text:
Salve.
Perchè la function browsefolder, quando le passo il percorso
iniziale di default, punta effettivamente la cartella,
ma non permette di tornare indietro della struttura ad albero?
Non è possibile cioè sfogliare il nodo padre.
Qualche informazione?
Posto la function che ho scopiazzato:
Function BrowseFolder(Optional Caption As String, _
    Optional InitialFolder As String) As String
    Dim SH As Shell32.Shell
    Dim F As Shell32.Folder
    Set SH = New Shell32.Shell
    Set F = SH.BrowseForFolder(0&, Caption, BIF_RETURNONLYFSDIRS, _
        InitialFolder)
    If Not F Is Nothing Then
        BrowseFolder = F.Items.Item.Path
    End If
End Function
You can the call the BrowseFolder function with the following code:
    Dim FName As String
    FName = BrowseFolder("Select a folder", "C:\InitialFolder")
    If FName = "" Then
        MsgBox "You didn't select a folder"
    Else
        MsgBox "You selected: " & FName
    End If
Si possono fare aggiunte?
grazie.


title: Gestire documenti Word

author: Perseo

text:
Salve a tutti!
Ho la necessità di gestire in modo avanzato i documenti prodotti con
Microsoft Word.
Quello che devo fare è leggere da Access el proprietà dei decumenti Word;
per intenderci tali proprietà sono quelle che si associano ad un documento
mediante il menù File->Proprità: ci sono una serie di campi da rimepire e si
posso addirittura aggiungere a piacimento.
Qualcuno mi sa indicare come posso andare a leggere le informazioni
contenute in questi campi?


title: Gestire documenti Word

text:
"Perseo" <
perse...@icqmail.com
> ha scritto nel messaggio
news:0cIxa.11255$lK4.3...@twister1.libero.it...

Per cercare o leggere il contenuto in un File di Word puoi usare
l'automazione
di Word.
Ti posto qualche riga di codice che ho estrapolato da una Sub un pò
complessa.
Questo fa qualcosa del Genere:
Cerca un Testo che tu passi e lo sistituisce con un'altro........!
L'ho postata solo per darti un'idea di come accedere al Documento
e all'automazione di Word, non l'ho provata, ma poichè
l'ho buttata giù in fretta avrà sicuramente delle cose da rivedere.
Function FindReplace(strFinalDoc as String, strToFind as string,
strToReplace as String)
   'strToReplace= Nuovo Testo da immettere
   'strToFind= Vecchio testo da sostituire
   Dim appWord As Word.Application
   Dim docWord As Word.Document
   Set appWord = CreateObject("Word.Application")
   Set docWord = appWord.Documents.Open(strFinalDoc)
   appWord.Visible = True
      With docWord.Content.Find
         .Execute FindText:=strToFind , _
               ReplaceWith:=strToReplace , Format:=True, _
               Replace:=wdReplaceAll
       End With
   docWord.Save
End Function
@Alex.


title: Gestire documenti Word

text:
"Perseo" <
perse...@icqmail.com
> ha scritto nel messaggio
news:0cIxa.11255$lK4.3...@twister1.libero.it...

Qui trovi un componente per leggere le proprietà dei documenti office;
http://support.microsoft.com/default.aspx?scid=kb%3ben-us%3b224351
Ciao.
--
Sergio MAZZA


title: Evento pulsante: salva, chiudi, apri altr maschera

author: Giorgia

text:
L'oggetto spiega gi� tutto:
ho questo evento  click di un pulsante CONTABILIZZA PAGAMENTO nella maschera
CONTAB ANALITICA
Private Sub CONTAB_PAGAMENTO_Click()
On Error GoTo Err_CONTAB_PAGAMENTO_Click
    Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "PAGAMENTO"
    stLinkCriteria = "[DETTAGLI FATTURE ACQUISTO.PROTOCOLLO]=" &
Me![PROTOCOLLO]
    DoCmd.OpenForm stDocName, , , stLinkCriteria
Exit_CONTAB_PAGAMENTO_Click:
    Exit Sub
Err_CONTAB_PAGAMENTO_Click:
    MsgBox Err.Description
    Resume Exit_CONTAB_PAGAMENTO_Click
End Sub
ma prima di fargli aprire la maschera PAGAMENTO, vorrei che salvasse il
record e che si chiudesse la maschera CONTAB ANALITICA.
Ho provato a inserire un po' ovunque nel codice le seguenti righe
 DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
 DoCmd.Close
ma il risultato non � quello sperato: o la maschera non si chiude o compare
l'errore "l'oggetto di riferimento � stato chiuso".
Dove sbaglio?
Grazie
--
Giorgia


author: Pablitomf

text:
> Dove sbaglio?
Se la form che stai chiudendo � una form direttamente legata alla tabella
che incrementi, gi� la sua chiusura porta il conseguenziale salvataggio del
o dei records caricati.... (in realt� gi� solo passare al record successivo
vuol dire salvare/modificare i records precedenti)
--
---
Ciao
Pablitomf
FORZA NAPOLI - - - SEMPRE!
Tifosi Napoletani, gente fantastica
http://it.youtube.com/watch?v=gUqFHOXrK-M&feature=related


title: Voci menu in una maschera

author: nabir albar

text:
E' possibile creare una barra di menù in una maschera (form) di
Access? Se sì, come? (sto usando Access 2003).
grazie


title: Voci menu in una maschera

author: Alessandro Baraldi

text:
nabir albar ha scritto:
> E' possibile creare una barra di menù in una maschera (form) di
> Access? Se sì, come? (sto usando Access 2003).
>
> grazie
In modo nativo no, ma è possibile in questo modo:
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=103
Ciao
@Alex


title: fattura elettronica - cliente privato pec oppure codice univoco o nessuno dei 2?

author: mario rossi

text:
buongiorno a tutti, se un mio cliente emette fatture elettroniche a clienti privati senza partita iva ma solo con codice fiscale cosa devo inserire nella pec o nel codice univoco? possono essere lasciati vuoti?

grazie a tutti.


author: BFS

text:
Il 09/01/2019 10:15, mario rossi ha scritto:
> buongiorno a tutti, se un mio cliente emette fatture elettroniche a clienti privati senza partita iva ma solo con codice fiscale cosa devo inserire nella pec o nel codice univoco? possono essere lasciati vuoti?
>
> grazie a tutti.
>

codice univoco 7 zeri e pec vuota
al cliente copia in pdf di cortesia e se vuole si preleva originale dal
sito agenzia delle entrate

ciao
BFS

---
Questa email è stata esaminata alla ricerca di virus da AVG.
http://www.avg.com


text:
Il giorno mercoledì 9 gennaio 2019 10:15:38 UTC+1, mario rossi ha scritto:
> buongiorno a tutti, se un mio cliente emette fatture elettroniche a clienti privati senza partita iva ma solo con codice fiscale cosa devo inserire nella pec o nel codice univoco? possono essere lasciati vuoti?
>
> grazie a tutti.

uso questo codice per cessionario, vi sembra corretto?

*** CODE ***

    'INIZIO CESSIONARIO COMMITTENTE
    riga(IncNum(numriga)) = "<CessionarioCommittente>"
    riga(IncNum(numriga)) = "<DatiAnagrafici>"

    '<CodiceFiscale> solo se privato è il codice fiscale
    CesCodiceFiscale = EncodeString(UCase(Nz(DLookup("CODICEFISCALE", TabellaClienti, CampoIDCliente & "=" & idcliente), "")))
    If (CesCodiceFiscale <> "") Then
        If Len(CesCodiceFiscale) = 16 Then
            riga(IncNum(numriga)) = "<CodiceFiscale>" & CesCodiceFiscale & "</CodiceFiscale>"
        Else
            MsgBox "CODICE FISCALE NON VALIDO ACCEDI ALL'AREA CLIENTI PER IMPOSTARLO CORRETTAMENTE", vbInformation, ""
            Exit Sub
        End If
    End If

    'questa parte solo se ha partita iva
    '<IdCodice> se azienda è la partita iva
    Dim CesIdCodice As String
    CesIdCodice = EncodeString(UCase(Nz(DLookup("PARTITAIVA", TabellaClienti, CampoIDCliente & "=" & idcliente), "")))
    If (CesIdCodice <> "") Then

        riga(IncNum(numriga)) = "<IdFiscaleIVA>"

        '<IdPaese>
        Dim CesIdPaese As String
        CesIdPaese = UCase(Nz(DLookup("FE_cesidpaese", TabellaClienti, CampoIDCliente & "=" & idcliente), ""))
        If (CesIdPaese <> "") Then
            riga(IncNum(numriga)) = "<IdPaese>" & CesIdPaese & "</IdPaese>"
        Else
            MsgBox "ID PAESE NON VALIDO ACCEDI ALL'AREA CLIENTI PER IMPOSTARLO CORRETTAMENTE", vbInformation, ""
            Exit Sub
        End If

        If (CesIdCodice <> "") Then
            If Len(CesIdCodice) = 11 Then
                riga(IncNum(numriga)) = "<IdCodice>" & CesIdCodice & "</IdCodice>"
            Else
                MsgBox "PARTITA IVA NON VALIDA ACCEDI ALL'AREA CLIENTI PER IMPOSTARLO CORRETTAMENTE", vbInformation, ""
                Exit Sub
            End If
        End If
        riga(IncNum(numriga)) = "</IdFiscaleIVA>"
    End If
    'questa parte solo se ha partita iva

    riga(IncNum(numriga)) = "<Anagrafica>"

    '<Denominazione>
    Dim CesDenominazione As String
    Dim Cesnome As String
    Dim Cescognome As String
    CesDenominazione = EncodeString(UCase(Nz(Forms(FormFattura)![Fe_Denominazione], "")))
    Cesnome = EncodeString(UCase(Nz(Forms(FormFattura)![Fe_Nome], "")))
    Cescognome = EncodeString(UCase(Nz(Forms(FormFattura)![Fe_Cognome], "")))

    If (CesDenominazione <> "") Or ((Cesnome <> "") And (Cescognome <> "")) Then
        If (CesDenominazione <> "") Then
            riga(IncNum(numriga)) = "<Denominazione>" & CesDenominazione & "</Denominazione>"
        ElseIf (Cesnome <> "") And (Cescognome <> "") Then
            riga(IncNum(numriga)) = "<Nome>" & Cesnome & "</Nome>"
            riga(IncNum(numriga)) = "<Cognome>" & Cescognome & "</Cognome>"
        End If
    Else
        MsgBox "DENOMINAZIONE O NOME E COGNOME CESSIONARIO NON NON VALIDI ACCEDI ALL'AREA CLIENTI PER COMPILARLI CORRETTAMENTE", vbInformation, ""
        Exit Sub
    End If

    riga(IncNum(numriga)) = "</Anagrafica>"
    riga(IncNum(numriga)) = "</DatiAnagrafici>"

    riga(IncNum(numriga)) = "<Sede>"


author: Bruno Campanini

text:
on 09-01-19, BFS supposed :
> Il 09/01/2019 10:15, mario rossi ha scritto:
>> buongiorno a tutti, se un mio cliente emette fatture elettroniche a clienti
>> privati senza partita iva ma solo con codice fiscale cosa devo inserire
>> nella pec o nel codice univoco? possono essere lasciati vuoti?
>>
>> grazie a tutti.
>>
>
> codice univoco 7 zeri e pec vuota
> al cliente copia in pdf di cortesia e se vuole si preleva originale dal sito
> agenzia delle entrate

Già, ma nell'ipotesi che sia completamente sconosciuto all'ADE (non
ha partita IVA, non fa dichiarazione dei redditi) l'Agenzia che fa?
gli apre un account senza pin e senza password? direi proprio di no.
In tale circostanza io credo che all'ADE non ci sia niente per lui.

Ne consegue che il fornitore gli dovrà rilasciare/inviare regolare
fattura cartacea, altro che copia in pdf!

Bruno


title: Esempio di automazione con MSWord

author: Simone Bianchi

text:
L'esempio trovato sul SITO COMUNE puo' essere utile per risolvermi un
problema. Ho provato ma non riesco a salvare automaticamente il documento di
Word con un nome a mia scelta.
Grazie per l'aiuto
Nicola
*************
Private Sub cmdWord_Click()
    'Autore: Federico Luciani
    Dim wordApp As Object
    Dim wordDoc As Object
    Dim blOpen As Boolean
    On Error Resume Next
    blOpen = True
    Set wordApp = GetObject(, "Word.Application")
    If Err.Number = 429 Then
        Set wordApp = CreateObject("Word.Application")
        blOpen = False
        Err.Number = 0
    End If
    On Error GoTo gestErrori
    Set wordDoc = wordApp.Documents.Add()
    With wordApp
        .Visible = True
        .Activate
        .Selection.Style = wordDoc.Styles("Titolo 1")
        .Selection.TypeText "Hello world!"
    End With
    If Not blOpen Then
        wordDoc.Close savechanges:=False
        wordApp.Application.Quit
    End If
esci:
    Set wordDoc = Nothing
    Set wordApp = Nothing
    Exit Sub
gestErrori:
    MsgBox Err.Number & " - " & Err.Description
    GoTo esci
End Sub


title: Esempio di automazione con MSWord

author: Carlo Costarella

text:
"Simone Bianchi" <
simone...@libero.it
> ha scritto nel messaggio
news:0Que9.1245$qE6...@tornado.fastwebnet.it...

Private Sub cmdWord_Click()
'Autore: Federico Luciani, modificata da Carlo Costarella
    Dim wordApp As Object
    Dim wordDoc As Object
    Dim blOpen As Boolean
    blOpen = True
    Set wordApp = CreateObject("word.Application")
    If Err.Number = 429 Then
        blOpen = False
        Err.Number = 0
    End If
    On Error GoTo gestErrori
    Set wordDoc = wordApp.Documents.Add()
    With wordApp
        .Visible = True
        .Selection.Style = wordDoc.Styles("Titolo 1")
        .Selection.TypeText "Hello world!"
    End With
    If blOpen = True Then
        wordDoc.Close savechanges:=True
        DoEvents
        wordApp.Application.Quit
    End If
esci:
    Set wordDoc = Nothing
    Set wordApp = Nothing
    Exit Sub
gestErrori:
    MsgBox Err.Number & " - " & Err.Description
    GoTo esci
End Sub
Ovviamente avrai impostato i riferimenti con Microsoft Office 10 o 9 object
Library
La routine apre un nuovo doc di word, scrive qualcosa e lo salva
proponendoti un nome e un percorso.
L'ho provata e funziona.
Fammi sapere.
Ciao, Carlo


title: Esempio di automazione con MSWord

author: Maurizio Borrelli

text:
> "Simone Bianchi" [...]:
> L'esempio trovato sul SITO COMUNE puo' essere utile per risolvermi un
> problema. Ho provato ma non riesco a salvare automaticamente il documento
> di Word con un nome a mia scelta.
> *************
> Private Sub cmdWord_Click()
>     'Autore: Federico Luciani
>     Dim wordApp As Object
>     Dim wordDoc As Object
>     Dim blOpen As Boolean
>     On Error Resume Next
>     blOpen = True
>     Set wordApp = GetObject(, "Word.Application")
>     If Err.Number = 429 Then
>         Set wordApp = CreateObject("Word.Application")
>         blOpen = False
>         Err.Number = 0
>     End If
>     On Error GoTo gestErrori
>     Set wordDoc = wordApp.Documents.Add()
>     With wordApp
>         .Visible = True
>         .Activate
>         .Selection.Style = wordDoc.Styles("Titolo 1")
>         .Selection.TypeText "Hello world!"
>     End With
    Il codice seguente:
>     If Not blOpen Then
>         wordDoc.Close savechanges:=False
>         wordApp.Application.Quit
>     End If
chiude il documento senza salvarlo e chiude word.
    Tu invece *prima* avresti dovuto salvare il documento dandogli un nome:
        wordDoc.SaveAs "Unitą:\PercorsoCompleto\Nome.doc"
(consulta la guida a proposito di SaveAs).
> esci:
>     Set wordDoc = Nothing
>     Set wordApp = Nothing
>     Exit Sub
> gestErrori:
>     MsgBox Err.Number & " - " & Err.Description
>     GoTo esci
> End Sub
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


title: Esempio di automazione con MSWord

text:
"Simone Bianchi" <
simone...@libero.it
> ha scritto nel messaggio
news:0Que9.1245$qE6...@tornado.fastwebnet.it...

Se poi si preferisce salvare il file senza che appaia la maschera di "Salva
con Nome" per il salvataggio del file basta sostituire questo pezzo di
codice:
    If blOpen = True Then
         wordDoc.Close savechanges:=True
         DoEvents
         wordApp.Application.Quit
     End If
Con questo:
    If blOpen = True Then
    wordDoc.SaveAs FileName:="c:\pippo.doc"
    DoEvents
    wordApp.Application.Quit
    End If
Ciao, Carlo


title: access developer system

author: pone

text:
ciao a tutto il ng
navigando qua e là ho letto della possibilità di convertire un file
mdb realizzato con access 2003 in un exe che si installa utilizzando
l'msi ed è utilizzabile anche da chi non abbia access installato....
è vera questa cosa?
funziona solo con l'access 2003?
ma il file generato è un vero exe o un mde che per aprendosi apre
comunque anche access?
una curiosità che penso possa tornare utile anche ad altri ....
grazie


title: access developer system

author: Cinzia

text:
"pone" <
p.o...@gmail.com
> ha scritto nel messaggio
news:1182688616.9...@n2g2000hse.googlegroups.com...


è vera questa cosa?



grazie
Ciao pone,
come prima cosa
www.sitocomune.com
 Faq 6.1
....
sostanzialmente non c'è nessun EXE il massimo che puoi ottenere è un MDE che
puoi distribuire con la versione runtime di Access.
L'unica novità rispetto a quanto scritto nella FAQ del sitocomune è che con
A2007 sarà presto disponibile gratuitamente la versione runtime di Access
2007
Vedi
http://msdn2.microsoft.com/it-it/office/bb229700(en-us).aspx
 per
maggiori info ..
--
Cinzia [Office Access MVP]
_______________________

www.riolab.org
----------------------------------------


title: access developer system

text:
ciao Cinzia
mille grazie per la tua risposta
>
> Ciao pone,
> come prima cosawww.sitocomune.comFaq 6.1
utilissima (a proposito x chi legge il post e come me ha un versione
successiva al 97 la faq è la 6.126 in generale)
> ....
> sostanzialmente non c'è nessun EXE il massimo che puoi ottenere è un MDE che
> puoi distribuire con la versione runtime di Access.
> L'unica novità rispetto a quanto scritto nella FAQ del sitocomune è che con
> A2007 sarà presto disponibile gratuitamente la versione runtime di Access
> 2007
> Vedihttp://
msdn2.microsoft.com/it-it/office/bb229700(en-us).aspxper
> maggiori info ..
>
> --
> Cinzia [Office Access MVP]
> _______________________
>
www.riolab.org
> ----------------------------------------
non nascondo che ci avevo sperato. Comunque grazie ancora
Peppe


title: Installazione Access Runtime & XP SP2

author: Mavic

text:
Salve,
Scusate se riposto lo stesso argomento di qualche mese fa, ma non
ricordo piu quale file bisognava modificare per evitare l'errore che si
  verifica durante l'installazione di un'applicazione access runtime su
Win XP SP2 (richiesto aggiornamento a SP1 o superiore....)
Attendo notizie, Grazie.


title: Installazione Access Runtime & XP SP2

text:
"Mavic" <
assis...@dgelettroinformatica.it
> ha scritto nel messaggio
news:v5E0e.9337$IN.2...@twister2.libero.it...

Le notizie sono arrivate:
http://support.microsoft.com/default.aspx?scid=kb;en-us;837150&Product=acc2002
Ciao, Carlo


title: Installazione Access Runtime & XP SP2

text:
> Le notizie sono arrivate:
>
http://support.microsoft.com/default.aspx?scid=kb;en-us;837150&Product=acc2002
>
> Ciao, Carlo
>
>
>
Grazie e buone feste !!!


title: Installazione Access Runtime & XP SP2

text:
"Mavic" <
assis...@dgelettroinformatica.it
> ha scritto nel messaggio
news:thE0e.9365$IN.2...@twister2.libero.it...

Buona Pasqua anche a te e famiglia.
Carlo


title: accesso a tabelle allegate

author: Maurizio

text:
salve a tutti
ho creato un database Access2000 in c:\prova\test.mdb
ho collegato una tabella "Codice" che ha un solo record dove viene scritto
un valore numerico: questa tabella si trova in un computer collegato in rete
e all'interno di un database di nome dati.mdb
devo fare un controllo su questo numero e quindi ho utilizzato il seguente
codice
Dim rs1 as DAO.Recordset
Dim Cod as integer
Dim dbsDati as Database
set dbsDati = DBEngine.Workspaces(0).OpenDatabase("c:\prova\test.mdb")
set rs1 = dbsDati.OpenRecordset("Codice", dbOpenTable)
mi compare l'errore "operazione non valida"
grazie e buon sabato
Maurizio


title: accesso a tabelle allegate

author: ALESSANDRO Baraldi

text:
"Maurizio" <
maur...@tin.it
> ha scritto nel messaggio
news:XDpId.742663$35.29...@news4.tin.it...

Maurizio ciao.
Se passi alla connessione un percorso del genere: "c:\prova\test.mdb"
è ovvio che venga interpretato come un indirizzo locale, quindi è normale
l'errore che dichiari.
Devi passare l'indirizzo di rete completo del suo LOCALE
\\NomePC.....
Se provi con un Browser vedrai che restituisce la PAth completa
e corretta.
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: accesso a tabelle allegate

author: Alessandro Cara

text:
[cut]
> Se provi con un Browser vedrai che restituisce la PAth completa
> e corretta.
messa cosi' al femminile sembra una cosa gustosa e succulenta....quasi
erotica
--
a.cara


title: accesso a tabelle allegate

text:
"Alessandro Cara" <
alexqu...@blunet.it
> ha scritto nel messaggio
news:35eocrF...@individual.net...

Maniaca...!
;-)



title: accesso a tabelle allegate

author: cidi

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:41f22cb3$0$8202$5fc...@news.tiscali.it...
> "Alessandro Cara" <
alexqu...@blunet.it
> ha scritto nel messaggio
> news:35eocrF...@individual.net...
>> [cut]
>> > Se provi con un Browser vedrai che restituisce la PAth completa
>> > e corretta.
>> messa cosi' al femminile sembra una cosa gustosa e succulenta....quasi
>> erotica
E' qualcosa rimasta in memoria?
>> --
>> a.cara
>
> Maniaca...!
> ;-)
>
> --
> @Alex (Alessandro Baraldi)
Eh si! qualcuno ieri sera ha gironzolato ;-)
---
Daniele


title: campi incrociati

author: Francesco

text:
Vorrei sapere come posso creare una query a campi incrociati, prelevando i
dati da tre tabelle relazionate:
FILM - campi: IDFILM e FILM
GENERE - campi: IDGENERE e GENERE
GENERE_FILM - campi: ID, IDGENERE, IDFILM
Vorrei creare una query che mi visualizzi per ogni film il genere,
sottolineo che un film puo' avere piu generi, es:
tab. genere_film
ID - IDFILM - IDGENERE
1 - 1 - 1
2 - 2 - 2
3 - 2 - 3
4 - 2 -1
Vorrei che il film con IDFILM 2, abbia solo un record con tutti i generi.


title: campi incrociati

author: Roberto dalla campagna

text:
"Francesco" <
fran...@tin.it
> ha scritto nel messaggio
news:434d7ae7$0$20503$4faf...@reader4.news.tin.it...

Se desideri che nel risultato vengano visualizzati il FILM e IL GENERE e non
il loro IDFILM ed il loro IDGENERE.
Se vuoi risolvere questo problema con una query a campi incrociati.
Creati una query a campi incrociati che abbia il seguente codice SQL:
TRANSFORM First(Pippo.GENERE) AS [Il valore]
SELECT Pippo.FILM
FROM [SELECT
GENERE_FILM.ID
, GENERE.GENERE, FILM.FILM
FROM GENERE INNER JOIN (FILM INNER JOIN GENERE_FILM ON FILM.IDFILM =
GENERE_FILM.IDFILM) ON GENERE.IDGENERE = GENERE_FILM.IDGENERE;]. AS Pippo
GROUP BY Pippo.FILM
PIVOT Pippo.GENERE;
Se invece ti basta di visualizzare l'IDFILM e i relativi IDGENERE usa una
query a campi incrociati con il seguente codice SQL:
TRANSFORM First(GENERE_FILM.IDGENERE) AS [Il valore]
SELECT GENERE_FILM.IDFILM
FROM GENERE_FILM
GROUP BY GENERE_FILM.IDFILM
PIVOT GENERE_FILM.IDGENERE;
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: campi incrociati

text:
Ho risolto, il mio problema era di stamparla a video sotto browser web...
grazie per i consigli... ho creato una query SQL...
"Roberto dalla campagna" <
r.masso...@libero.it
> ha scritto nel
messaggio news:nHu3f.11092$Pe2.2...@twister2.libero.it...



title: Errore di runtime 3061

author: Luke

text:
Salve a tutti.
Ho due tabelle cosě strutturate:
TABELLA1      TABELLA2
idAnagrafico      data
cognome            idAnagrafico
nome                 valore
altri campi          altri campi
con idAnagrafico come campo di collegamento e per TABELLA2 non ho chiavi
Ho poi creato due query: una semplice, "Query1", che seleziona cognome,
nome, data, valore
in base a un intervallo di date e una a campi incrociati, "Query2", che
preleva i dati da "Query1"
e con: intestazione di riga: cognome, nome;
          intestazione di colonna: data;
          valore: valore.
Le informazioni di "Query2" le utilizzo per un report che riempio in modo
dinamico con il
seguente codice:
    Private Sub Report_Open(Cancel As Integer)
    Dim rst As Recordset
    Dim indice As Integer
    Set rst = CurrentDb.OpenRecordset("Query2")
    For indice = 0 To rst.Fields.Count - 1
        Me("controllo" & Trim(indice)).ControlSource =
rst.Fields(indice).Name
        Me("lbl" & Trim(indice)).Caption = rst.Fields(indice).Name
    Next indice
    Set rst = Nothing
    End Sub
Funziona tutto finchč inserisco esplicitamente l'intervallo di date come
criterio di Query1, ma
ho bisogno di inserirlo da tastiera con un box di dialogo. Ho quindi pensato
di usare un
parametro ed č qui che iniziano i problemi: infatti al momento di aprire il
report appare il seguente
messaggio:"Errore di run-time '3061': Parametri insufficienti. Previsto 1".
Le guide, in linea e cartacea, non mi sono state di nessun aiuto.
Scusate la prolissitŕ e grazie per l'attenzione.
** Articolo inviato tramite i servizi gratuiti di
www.x-privat.org
 **


title: Errore di runtime 3061

author: Sergio MAZZA

text:
"Luke" <
xlu...@supereva.it
> ha scritto nel messaggio
news:3f296464$1...@x-privat.org...
> Salve a tutti.
>
> Ho due tabelle così strutturate:

> Funziona tutto finchè inserisco esplicitamente l'intervallo di date come
> criterio di Query1, ma
> ho bisogno di inserirlo da tastiera con un box di dialogo. Ho quindi
pensato
> di usare un
> parametro ed è qui che iniziano i problemi: infatti al momento di aprire
il
> report appare il seguente
> messaggio:"Errore di run-time '3061': Parametri insufficienti. Previsto
1".
> Le guide, in linea e cartacea, non mi sono state di nessun aiuto.
> Scusate la prolissità e grazie per l'attenzione.
>
Due cose; fai attenzione al campo chiamato "data" (e anche "descrizione")
perché questo è un termine utilizzato da access e ti potrebbe causare strani
comportamenti.
Mi sembra di capire che la condizione l'hai scritta nella colonna data con
una richiesta di input dall'utente al momento della esecuzione della query;
se è così prova con:
es.
Between CVDate([inserire la prima data]) And CVDate([inserire la seconda
data])
Ciao.
--
Sergio MAZZA


title: Errore di runtime 3061

author: Antonio Biso

text:
"Luke" <
xlu...@supereva.it
> ha scritto nel messaggio
news:3f296464$1...@x-privat.org...
> Salve a tutti.
>
> Ho poi creato due query: una semplice, "Query1", che seleziona cognome,
> nome, data, valore
> in base a un intervallo di date e una a campi incrociati, "Query2", che
> preleva i dati da "Query1"
>     Set rst = CurrentDb.OpenRecordset("Query2")
> ho bisogno di inserirlo da tastiera con un box di dialogo. Ho quindi
pensato
> di usare un
> parametro ed è qui che iniziano i problemi: infatti al momento di aprire
il
> report appare il seguente
> messaggio:"Errore di run-time '3061': Parametri insufficienti. Previsto
1".
Che io mi ricordi questo è il classico errore che esce quando si tenta di
usare come origine di un recordset una query con parametri.
Hai due soluzioni:
- utilizzare la proprietà parameters del recordset applicando un filtro dopo
aver aperto il recordset su una query senza filtri
- creare via codice una stringa SQL contenente il filtro mettendoci il
valore inserito dall'utente e quindi aprire il recordset tramite la stringa
SQL
Antonio


title: Errore di runtime 3061

text:
Luke <
xlu...@supereva.it
> wrote in message 3f296464$1...@x-privat.org...
> Salve a tutti.
>
> Ho due tabelle così strutturate:

> Funziona tutto finchè inserisco esplicitamente l'intervallo di date come
> criterio di Query1, ma
> ho bisogno di inserirlo da tastiera con un box di dialogo. Ho quindi
pensato
> di usare un
> parametro ed è qui che iniziano i problemi: infatti al momento di aprire
il
> report appare il seguente
> messaggio:"Errore di run-time '3061': Parametri insufficienti. Previsto
1".
> Le guide, in linea e cartacea, non mi sono state di nessun aiuto.
> Scusate la prolissità e grazie per l'attenzione.
>
Se stai operando con una query a campi incrociati parametrica o con una
query a campi incrociati basata su una query di selezione parametrica,
affinché tutto funzioni e per non ricevere da Access l'errore 3061 è
INDISPENSABILE esplicitare il tipo dati di tutti i parametri della query.
Per fare questo apri la struttura della query che contiene i parametri; dal
menu Query seleziona il comando Parametri... ; nella finestra di dialogo
Parametri query che si apre, per ogni parametro della query digita il
parametro nella colonna Parametro e seleziona il Tipo dati del parametro
nella relativa colonna.
Se vuoi operare direttamente sul codice SQL della query che contiene i
parametri, fai iniziare il codice SQL con la dichiarazione PARAMETERS (vedi
help). La dichiarazione PARAMETERS precede tutte le altre istruzioni,
inclusa l'istruzione SELECT.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Errore di runtime 3061

text:
Grazie a tutti per l'aiuto. Sono riuscito a risolvere il problema via
codice.



title: Proposta collaborazione

author: Fabrizio Di Mattei

text:
Attenzione il presente messaggio sarà pubblicato una sola volta e non verrà
più ripetuto.
Ho un progetto interessantissimo da discutere con chi di Voi ha intenzione
di impegnare un pò del proprio tempo per creare software per varie aziende
sparse su tutto il territorio nazionale.
Ovviamente in Access !
Chi di Voi sia interessato può scrivermi al seguente indirizzo evitando di
rispondere sul server newsgroup:
fabrizio...@libero.it
A risentirci.


title: Proposta collaborazione

text:
Fabrizio Di Mattei ha scritto:
>
> Attenzione il presente messaggio sarà pubblicato una sola volta e non verrà
> più ripetuto.
e meno male
[cut]
> Chi di Voi sia interessato può scrivermi al seguente indirizzo evitando di
> rispondere sul server newsgroup:
si badrone ma duo servo un po' maledugado risbonde su nusgrup.Ma se
badrone esbone suo brogetto e sobraduddo guando denaro dare me essere
disbonibile.Esglusa pizza di fango del Cameroun.
Zio Dom
(a.cara)


title: Proposta collaborazione

author: Michele Amato

text:
Alessandro Cara <
al...@blunet.it
> wrote in message
3A8487E7...@blunet.it...

:-)))))))


title: [?] Stampa Unione automatica

text:
Volevo avviare la stampa unione da Access (97 con Word 97) con
    DoCmd.runCommands acCmdMailMarge
Ma:
1) Non funziona (in calce l'errore che mi da)
2) Come mai non ci sono parametri? Non è possibile selezionare il .doc da
usare e la tabella da passargli?
Grazie e ciao
ERRORE:
Comando o azione 'StampaUnioneWord' non disponibile.
* È possibile che il database sia di sola lettura o sia un database non
convertito creato in una versione precedente di Socrates Organizer - Client
Manager.
* Il tipo di oggetto al quale si riferisce l'azione non è selezionato o non
si trova nella visualizzazione attiva.
Utilizzare solo i comandi e le azioni di macro disponibili per il database


title: [?] Stampa Unione automatica

text:
Risolto il tutto creando un obj Word e aprendo il documento già impostato
come MailMerge del DB
"Bovac@Work" <
bo...@libero.it
> wrote in message
news:p2Y07.5743$D03.2...@news.infostrada.it...



title: Creare mde da a2000 per a97

author: Paolo

text:
Ciao a tutti,
Per convertire un file mdb (creato con A2000) in file mde per A97 devo
obbligatoriamente avere una licenza anche di A97?
Grazie a tutti


title: Creare mde da a2000 per a97

author: Alessandro Baraldi

text:
"Paolo" <
paolo...@tiscali.it
> wrote in message
news:2rNjb.44998$
e6.15...@twister2.libero.it

SI.
@Alex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Controllo campo vuoto su apertura maschera con sottomaschera

author: leonardo esposito

text:
salve a tutti gli amici del ng,
ho db di Access 2003 per la compilazione di documenti di trasporto,
con maschera e sottomaschera (collegate da un campo Numero), in cui
c'è una macro su apertura della maschera che fa andare il numero su
Nuovo per poter inserire un nuovo documento. Ora accade che inserendo
i dati solo nella maschera senza mettere i prodotti nella
sottomaschera, se si chiude il db e si rientra in automatico va a
prendersi un nuovo numero lasciando incompleto quello precedente. E'
possibile creare una riga di codice che consenta alla riapertura del
db di aprire il numero rimasto incompleto invece di andare su quello
nuovo,ed in caso contrario di andare normalmente sul nuovo numero?
grazie molte per l'attenzione e l'aiuto.
Leo


title: Aggiornare tab in tempo reale con una query

author: Valerio

text:
esiste un modo per far si che una query aggiorni la tab su cui lavora in
tempo reale ?
questo perchè se la query aggiorna dei campi con altri appena modificati,
questi non contengono ancora il valore giusto ...
grazie mille


text:
"Valerio" <
priv...@libero.it
> ha scritto nel messaggio
news:ekm6lj$1pu$1...@aioe.org...

Il problema è che ogni volta che aggiorni dati che stai "guardando" li devi
"ricaricare"; utilizza il metodo Requery della form;
es.
Me.Requery
Per una sottomaschera:
Me!nomeSottomaschera.Form.Requery
Dopo aver eseguito la query di aggiornamento...
Ciao.
--
Sergio MAZZA


title: Per non dover riscrivere lo stesso dato

text:
Ciao,
per non dover riscrivere lo stesso dato è possibile fare in modo che
una casella di testo copi il dato da un'altra maschera o da un'altra
tabella?
Es: sono nella maschera ORDINI e c'è la casella di testo DATA CONSEGNA
da questa maschera, tramite un pulsante di comando apro un'altra
maschera nel quale devo inserire altri dati e anche la DATA CONSEGNA,
è possibile fare in modo che in questa maschera, la casella di
controllo nella quale c'è la DATA CONSEGNA copi il dato dalla maschera
ORDINI?
Grazie in anticipo.
Ciao
Miki


title: Per non dover riscrivere lo stesso dato

text:
<
m...@hotmail.it
> ha scritto nel messaggio
news:1176393287.5...@q75g2000hsh.googlegroups.com...

[risposta]
Dopo l'openForm puoi fare:
Forms!nomeForm!dataConsegna = me!dataConsegna
Ciao.
--
Sergio MAZZA


title: Per non dover riscrivere lo stesso dato

text:
<
m...@hotmail.it
> ha scritto nel messaggio
news:1176393287.5...@q75g2000hsh.googlegroups.com...

nel codice evento click del pulsante fai
docmd.openform tuaform ecc..
forms![tuaformaperta]![nomecontrollodata]=forms![formordini]![nomecontrollodata]
tutto li ciao


title: Per non dover riscrivere lo stesso dato

text:
Perfetto, grazie mille a entrambi.
Ciao
Miki


title: Per non dover riscrivere lo stesso dato

text:
Scusate...nel caso in cui il valore da copiare si trovasse invece in
una sottomaschera?
Grazie
Miki


title: Per non dover riscrivere lo stesso dato

text:
Niente, risolto, era sufficiente scivere il nome della sottosaschera
dopo quello della maschera.
forms![tuaformaperta]![nomecontrollodata]=forms![formordini]!
[nomesottomaschera]![nomecontrollodata]
byebye
Miki


title: Per non dover riscrivere lo stesso dato

text:
<
m...@hotmail.it
> ha scritto nel messaggio
news:1176454907.9...@q75g2000hsh.googlegroups.com...

Indichi il percorso dove trovare il valore:
Forms!nomeForm!nomeSubForm!nomeControllo
Ciao.
--
Sergio MAZZA


title: Per non dover riscrivere lo stesso dato

text:
tank's ...
Miki


title: Uso Tasti  funzionali

text:
E' possibile usare i tasti funzionali (F1,F2,...) in access? Poteste dirmi
dove posso trovare un esempio ?
Grazie per l'aiuto
Nicola
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Uso Tasti  funzionali

author: Massimo Piubelli

text:
Nicola47 wrote:
> E' possibile usare i tasti funzionali (F1,F2,...) in access? Poteste
> dirmi dove posso trovare un esempio ?
Devi creare una macro Autokeys
trovi parecchi esempi se cerchi con "San"
groups.google.com
> Grazie per l'aiuto
> Nicola
Prego
Max


title: file xml

author: Marisa Ceparano

text:
Ho esportato un database (creato credo con vb), come xml. Ho aperto il file
che era automaticamente zippato ed ho notato che il db era stato esportato
in tanti (circa 500) file xml diversi. In access posso importarli uno per
volta, ho anche iniziato a farlo ed ho aperto alcune tabelle, erano vuote.
C'è un modo più agevole per esportare dati da un database ed importarli in
access?
Ciao


title: file xml

author: TheMax

text:

Non fornisci un'informazione essenziale, vb solitamente non crea database,
in che formato è il file di origine?
Se puoi collegarti via odbc, potresti provare con delle tabelle collegate.
Quindi creare delle query di creazione tabella.
Ciao,
Massimo


title: Completamento casella di testo.

author: computer valley

text:
Salve a tutto il NG
navigando sul sito comune ho trovato un'esempio di completamento di casella
di testo più pratico e veloce della casella combinata;
solo che applicato al mio db non va.
In pratica ho una maschera anagrafica, con un campo "Cognome" e la query con
lo stesso nome del campo, però niente.
Chi saprebbe aiutarmi?
Grazie.
Lucio


title: Completamento casella di testo.

text:
"computer valley" <
c.va...@tin.it
> ha scritto nel messaggio
news:C0%ga.33814$i26.8...@news2.tin.it...

Mi pare un pò pochino per aiutarti, ci vorrebbe la sfera di
cristallo....!!!!
Azzardo che non hai i Riferimenti alle librerie DAO in quanto usi una
versione di Access superiore a A97........!!!
@Alex.


title: Esosa richiesta di parametri

author: E. Delacroix

text:
Ho questo codice che crea una Query parametrica di nome "Provvisoria"
(I parametri sono presi da una form  "Miaform")
Dim dbs As DAO.Database
Dim qdfTemp As DAO.QueryDef
Dim rst As DAO.Recordset
Dim strSQL as string
Set dbs = CurrentDb

strSQL = "SELECT Movimenti.IDMovimento," ecc.
"FROM ecc.
"WHERE ecc. (tre parametri)
"ORDER BY ecc.
Set qdfTemp = dbs.CreateQueryDef("Provvisoria", strSQL)
La Query fa il suo dovere e popola Elenco19 attraverso:
Forms![Miaform]!Elenco19.RowSourceType = "Table/Query"
Forms![Miaform]!Elenco19.RowSource = "Provvisoria"
Ma quando apro il seguente Recordset:
Set rst = qdfTemp.OpenRecordset
Mi da errore di run-time '3061'
Parametri insufficienti.
Naturalmente se apro direttamente la Query dal pannello del db mi vengono
restituiti regolarmente gli stessi record filtrati che trovo nella form.
Come mai questo comportamento perverso e come è possibile aggirarlo?
Ho provato pure con una Query di creazione Tabella. Viene creata una
confortante tabella che corrisponde alla Query filtrata ma se tento di
ottenere da questa il corrispondente Recordset la risposta è sempre quella:
"Parametri insufficienti"
Grazie per le cortesi risposte.
--
E.Delacroix
_  _
o  o;
@--


title: Esosa richiesta di parametri

author: Karl Donaubauer

text:
E. Delacroix wrote:
> Ho questo codice che crea una Query parametrica di nome
> "Provvisoria" (I parametri sono presi da una form  "Miaform")
>
> Dim dbs As DAO.Database
> Dim qdfTemp As DAO.QueryDef
> Dim rst As DAO.Recordset
> Dim strSQL as string
>
> Set dbs = CurrentDb
>
> strSQL = "SELECT Movimenti.IDMovimento," ecc.
> "FROM ecc.
> "WHERE ecc. (tre parametri)
Purtroppo hai ommesso la parte decisiva, cioè da dove vengono
i parametri e come esattamente li passi alla string.
> "ORDER BY ecc.
>
> Set qdfTemp = dbs.CreateQueryDef("Provvisoria", strSQL)
>
> La Query fa il suo dovere e popola Elenco19 attraverso:
>
> Forms![Miaform]!Elenco19.RowSourceType = "Table/Query"
> Forms![Miaform]!Elenco19.RowSource = "Provvisoria"
>
> Ma quando apro il seguente Recordset:
>
> Set rst = qdfTemp.OpenRecordset
>
> Mi da errore di run-time '3061'
> Parametri insufficienti.
> ...
 Parametri insufficienti

www.donkarl.com/it?FAQ6.4
 Aprire una query parametrica da VBA

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


title: Esosa richiesta di parametri

text:
Il Tue, 10 Aug 2010 23:51:57 +0200, Karl Donaubauer ha scritto:
> Purtroppo hai ommesso la parte decisiva, cioè da dove vengono
> i parametri e come esattamente li passi alla string.
I parametri vengono da tre controlli della form e sono passati così:
WHERE ((([Movimenti.DataMovimento]) Between
([Forms]![formProdotti].[Calendar1].[Value]) AND
([Forms]![formProdotti].[Calendar2].[Value])) AND
((Prodotti.Prodotto)=[Forms]![formProdotti].[Elenco0]))
>  Parametri insufficienti
>
www.donkarl.com/it?FAQ6.4
>
>  Aprire una query parametrica da VBA
>
www.donkarl.com/it?FAQ6.16
Accidenti! Pensare che poco prima di decidermi a porre la questio sul ng
sono andato a guardare proprio sul tuo sito lasciandomi sfuggire queste
FAQ. Non ho parole.
Un saluto e ... grazie.



title: Esosa richiesta di parametri

text:
E. Delacroix wrote:
> Karl Donaubauer ha scritto:
>
>> Purtroppo hai ommesso la parte decisiva, cioè da dove vengono
>> i parametri e come esattamente li passi alla string.
>
> I parametri vengono da tre controlli della form e sono passati così:
>
> WHERE ((([Movimenti.DataMovimento]) Between
> ([Forms]![formProdotti].[Calendar1].[Value]) AND
> ([Forms]![formProdotti].[Calendar2].[Value])) AND
> ((Prodotti.Prodotto)=[Forms]![formProdotti].[Elenco0]))
> ...
In questo caso basta escludere i parametri dalla stringa SQL
e invece passare i valori dei parametri.
Se non riesci, incolla il tuo vero codice invece di scrivere
un esempio senza virgolette ecc. e indica il tipo del campo
"Prodotto".



title: Esosa richiesta di parametri

author: Bruno Campanini

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> wrote in message
news:8cf6tr...@mid.individual.net...
>> I parametri vengono da tre controlli della form e sono passati così:
>>
>> WHERE ((([Movimenti.DataMovimento]) Between
>> ([Forms]![formProdotti].[Calendar1].[Value]) AND
>> ([Forms]![formProdotti].[Calendar2].[Value])) AND
>> ((Prodotti.Prodotto)=[Forms]![formProdotti].[Elenco0]))
>> ...
E sono passati male, almeno il primo, la data!
"...
WHERE [Movimenti.DataMovimento] Between #" & _
     Forms!formProdotti![Calendar1] & "# And #" & _
     Forms!formProdotti![Calendar2] & "# And '" & _
     Forms!formProdotti![ElencoO] & "'
... "
Bruno
PS
Dovresti mostrare l'intera stringa SQL, non come la scrivi tu
ma come la vede il programma...


title: Esosa richiesta di parametri

text:
Bruno Campanini wrote:
>
>>> I parametri vengono da tre controlli della form e sono passati così:
>>>
>>> WHERE ((([Movimenti.DataMovimento]) Between
>>> ([Forms]![formProdotti].[Calendar1].[Value]) AND
>>> ([Forms]![formProdotti].[Calendar2].[Value])) AND
>>> ((Prodotti.Prodotto)=[Forms]![formProdotti].[Elenco0]))
>>> ...
>
> E sono passati male, almeno il primo, la data!
>
> "...
> WHERE [Movimenti.DataMovimento] Between #" & _
>     Forms!formProdotti![Calendar1] & "# And #" & _
>     Forms!formProdotti![Calendar2] & "# And '" & _
>     Forms!formProdotti![ElencoO] & "'
> ... "
No. In principio si puo includere i parametri nella stringa come
l'ha fatto. In questo caso non è necessario di scrivere # ecc.
Però così funziona solo per metodi di Access come
DoCmd.RunSQL o per un CreateQueryDef come qui dove
Access (o meglio l'Expression Service di JET/ACE) puo evaluare
i parametri e si occuppa dei tipi di dati.
Invece non funziona con metodi di DAO.
Questo è il suo problema col Recordset o Execute ecc.
Se invece si vuole passare i valori, come l'hai suggerito tu, non
bastano i # per un parametro di tipo data, ma ci vuole più lavoro
(
www.donkarl.com/it?FAQ6.8
).
--
Ciao
Karl
*********
Access FAQ:
www.donkarl.com/it


title: Esosa richiesta di parametri

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> wrote in message
news:8cfvnb...@mid.individual.net...
[...]
> Se invece si vuole passare i valori, come l'hai suggerito tu, non
> bastano i # per un parametro di tipo data, ma ci vuole pių lavoro
> (
www.donkarl.com/it?FAQ6.8
).
Sė, giusto, dimenticavo:
le date in formato YYYY/MM/DD.
Bruno


title: Esosa richiesta di parametri

text:
Il Wed, 11 Aug 2010 10:56:27 +0200, Karl Donaubauer ha scritto:
>
> Se non riesci, incolla il tuo vero codice invece di scrivere
> un esempio senza virgolette ecc. e indica il tipo del campo
> "Prodotto".
Il vero codice è:
Public Sub Elenco0_AfterUpdate()
    Dim dbs As DAO.Database
    Dim qdfTemp As DAO.QueryDef
    Dim rst As DAO.Recordset
    Dim strSQL As String

'--------Passa alla form giacenza e livello di riordino--------
Forms![formProdotti]!Elenco21.RowSourceType = "Table/Query"
Forms![formProdotti]!Elenco21.RowSource = "Prodotti Query"
'-------------------------------------------------------------------------------
Set dbs = CurrentDb
strSQL = "SELECT Movimenti.IDMovimento," & _
"Movimenti.DataMovimento, Movimenti.Prodotti_IDProdotto," & _
"Movimenti.Quantità," & _
"Movimenti.Quantità as Giacenza_Relativa " & _
"FROM Prodotti INNER JOIN Movimenti ON " & _
"Prodotti.IDProdotto = Movimenti.Prodotti_IDProdotto " & _
"WHERE (((Movimenti.DataMovimento) Between " & _
"(Forms!formProdotti!Calendar1) AND " & _
"(Forms!formProdotti!Calendar2)) AND ((Prodotti.Prodotto)=" & _
"(Forms!formProdotti.Elenco0))) " & _
"ORDER BY Movimenti.DataMovimento, Movimenti.IDMovimento;"
Nota: "Prodotto" è tipo string ricavato dalla tabella Prodotti
Set qdfTemp = dbs.CreateQueryDef("P", strSQL)
Nota: la stringa  strSQL contine il campo "Quantità" due volte; la seconda
volta è rinominato come "Giacenza_Relativa" in quanto nel recordset qui di
seguito tramite Edit e Update dovrebbe cambiare il valore nel totale
progressivo.
Set rst = qdfTemp.OpenRecordset
Nota: qui dovrebbe esservi  il codice per ottenere il totale progressivo,
ma l'esecuzione si ferma prima per via dell'errore 3061.
dbs.QueryDefs.Delete qdfTemp.Name
Dunque io ho provato ad usare Eval nella stringa SQL senza ottenere
alcunchè. Credo che Eval non funzioni con Between.
Perchè voglio fare tutto ciò? Perchè non sono riuscito a far funzionare
come vorrei nessuno dei metodi suggeriti sul sito comune per ottenere il
totale progressivo. Ed inoltre ormai sono intestardito nel voler verificare
la potenza dell'oggetto Recordset, però se già va in difficoltà con gli
oggetti di Access ...
Si tratta di una maschera in cui una casella di riepilogo mostra tra due
date i movimenti di un determinato prodotto e la giacenza relativa
movimento per movimento (altre due caselle di testo mostrano invece la
giacenza alla data odierna ed il livello di riordino).
Un saluto.
