author: francesco

text:
 io ho lo stesso problema. se chiudo la maschera cliccando sul pulsante di
chiusura va tutto bene.
se invece clicco sul pulsante che ha come codice :
docmd.close acForm, "nome maschera"
allora mi compare una finestra di valore immissione parametro.
nella maschera in questione ho un elenco il quale come origine dati ha una
query con il seguente filtro :
Like (IIf(IsNull([forms]![nome
maschera]![casellacombinata37]);"*";([forms]![nome
maschera]![casellacombinata37]))).
ho provato ad eliminare il filtro e tutto sembra funzionare bene. (?)
ma la cosa che non capisco è che usando il db con un pc ove è installato win
me e office xp non succede nulla di tutto cio. tutto funziona bene.
su un altro pc dove è installato win xp pro con lo stesso office xp invece
da i problemi.
qualcuno sa dirmi come fare??
grazie ciao francesco

--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: ADO & MySQL

author: Luciano (DOC)

text:
Non riesco a connettermi ad un DB. Come da help uso:
CNstring =
"Provider:MySQLProv;Location:xxx.xxx.xxx.xxx;User:pippo;Password:pippo;Data
Source:test;"
ma ottengo:
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC Driver Manager] Data source name not found and no default
driver specified
(fra l'altro non capisco perche la seconda riga mi dice ODBC quando io non
lo nomino neanche.
Ovviamente con MyODBC nessun problema.
Saluti.
Luciano


title: ADO & MySQL

author: TheMax

text:
"Luciano (DOC)" <
XXXlucia...@sitocomune.com
> ha scritto nel messaggio
news:2q5ib5F...@uni-berlin.de...
> Non riesco a connettermi ad un DB. Come da help uso:
> CNstring =
>
"Provider:MySQLProv;Location:xxx.xxx.xxx.xxx;User:pippo;Password:pippo;Data
> Source:test;"
Giusto per curiosità, hai notato che nel tuo post usi i : invece che gli =
Non è che sia quello?
Per il resto la stringa mi sembra corretta.
> Saluti.
> Luciano
Ciao,
Massimo
--
web:
www.piubelli.net
Ciò che oggi è facoltativo domani sarà necessario.
Perchè non prepararci per tempo al futuro?
Vuoi il mio indirizzo? Togli _cut_ per rispondermi


title: ADO & MySQL

text:
"TheMax" <
massim...@accessgroup.it
> ha scritto nel messaggio
news:chkeri$v59$1...@domitilla.aioe.org...
> Giusto per curiosità, hai notato che nel tuo post usi i : invece che gli =
> Non è che sia quello?
Si l'ho notato, ma e' pari pari la stringa che sta nell'help di myoledb. Ho
anche provato ad usare '='.
> Per il resto la stringa mi sembra corretta.
Anche a me:-(
Cmq il programmino che crea un DB di esempio funziona, quindi e' solo un
problema di sintassi della stringa di connessione.
Saluti.
Luciano


title: ADO & MySQL

author: giorgio rancati

text:
"Luciano (DOC)" <
XXXlucia...@sitocomune.com
> ha scritto nel messaggio
news:2q6e44F...@uni-berlin.de...
>
> "TheMax" <
massim...@accessgroup.it
> ha scritto nel messaggio
> news:chkeri$v59$1...@domitilla.aioe.org...
>
> Cmq il programmino che crea un DB di esempio funziona, quindi e' solo un
> problema di sintassi della stringa di connessione.
> Saluti.
Ciao Luciano,
prova l'esempio proposto da questo link
http://www.connectionstrings.com/index.asp
-------------------
"Provider=MySQLProv;Data Source=mydb;User Id=UserName;Password=asdasd;"
-------------------
Ciao Giorgio


title: ADO & MySQL

text:
"giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
messaggio news:chl0b8$l4p$1...@lacerta.tiscalinet.it...
> "Provider=MySQLProv;Data Source=mydb;User Id=UserName;Password=asdasd;"
E l'host come glie lo passo?
Saluti.
Luciano


title: ADO & MySQL

text:
"Luciano (DOC)" <
XXXlucia...@sitocomune.com
> ha scritto nel messaggio
news:2q7v7dF...@uni-berlin.de...

Data Source è il nome del server
Ciao Giorgio


title: ADO & MySQL

text:
"giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
messaggio news:chmhes$hms$1...@lacerta.tiscalinet.it...

E il nome del db allora?
Teoricamente servirebbe un initial catalog come in Sql giusto? (visto che,
se non sbaglio, anche mysql può ospitare molti db)
> Ciao Giorgio



title: ADO & MySQL

text:
"TheMax" <
massim...@accessgroup.it
> ha scritto nel messaggio
news:chmimn$bba$1...@domitilla.aioe.org...
> "giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
> messaggio news:chmhes$hms$1...@lacerta.tiscalinet.it...
> >
> > Data Source è il nome del server
>
> E il nome del db allora?
> Teoricamente servirebbe un initial catalog come in Sql giusto? (visto che,
> se non sbaglio, anche mysql può ospitare molti db)
Ho trovato un Database=...
http://www.coveryourasp.com/Snippet.asp?snip=16
Prova a vedere se funzia.
Ciao,
Massimo


title: ADO & MySQL

text:
"giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
messaggio news:chmhes$hms$1...@lacerta.tiscalinet.it...
> Data Source è il nome del server
Scusa, ma non e' come dici tu. La stringa che porti ad esempio presume che
l'host sia localhost, cosa che nel mio caso non e'. I parametri necessari
all'identificazione del DB sono 2, il nome del DB e l'host che lo ospita.
Non solo MyOLEDB ma anche con MyODBC funziona in questo modo.
Saluti.
Luciano


title: ADO & MySQL

text:
"TheMax" <
massim...@accessgroup.it
> ha scritto nel messaggio
news:chmimn$bba$1...@domitilla.aioe.org...
> Teoricamente servirebbe un initial catalog come in Sql giusto? (visto che,
> se non sbaglio, anche mysql può ospitare molti db)
Si certo. Con MyODBC si passa una cosa del genere:
"Driver={mySQL};Server=xx.xxx.xxx.xxx;OPTION=16386;Uid=pippo;Pwd=pippo;Datab
ase=ilmiodatabase;"
Server e' un parametro opzionale, se non presente viene assunto come
localhost.
Saluti.
Luciano


title: ADO & MySQL

text:
"TheMax" <
massim...@accessgroup.it
> ha scritto nel messaggio
news:chmimn$bba$1...@domitilla.aioe.org...
> "giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
> messaggio news:chmhes$hms$1...@lacerta.tiscalinet.it...
> >
> > "Luciano (DOC)" <
XXXlucia...@sitocomune.com
> ha scritto nel
messaggio
> > news:2q7v7dF...@uni-berlin.de...
> > >
> > > "giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto
nel
> > > messaggio news:chl0b8$l4p$1...@lacerta.tiscalinet.it...
> > >
> > > > "Provider=MySQLProv;Data Source=mydb;User
> Id=UserName;Password=asdasd;"
> > >
> > > E l'host come glie lo passo?
> > > Saluti.
> >
> > Data Source č il nome del server
>
> E il nome del db allora?
> Teoricamente servirebbe un initial catalog come in Sql giusto?
per analogia sě, visto che la sintassi č identica e sempre per analogia se
non si indica il nome del database dovrebbe assegnare quello predefinito per
lo User che accede.
Comunque non conosco MySql, ho suggerito il link in quando affidabile in
altri ambiti
>(visto che, se non sbaglio, anche mysql puň ospitare molti db)
certamente.
Ciao Giorgio


title: ADO & MySQL

text:
"Luciano (DOC)" <
XXXlucia...@sitocomune.com
> ha scritto nel messaggio
news:2q81liF...@uni-berlin.de...

vedi risposta data a TheMax
Ciao Giorgio


title: ADO & MySQL

text:
"giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
messaggio news:chmjsr$lge$1...@lacerta.tiscalinet.it...
>
> "TheMax" <
massim...@accessgroup.it
> ha scritto nel messaggio
> news:chmimn$bba$1...@domitilla.aioe.org...
> > "giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
> > messaggio news:chmhes$hms$1...@lacerta.tiscalinet.it...
> > >
> > > "Luciano (DOC)" <
XXXlucia...@sitocomune.com
> ha scritto nel
> messaggio
> > > news:2q7v7dF...@uni-berlin.de...
> > > >
> > > > "giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto
> nel
> > > > messaggio news:chl0b8$l4p$1...@lacerta.tiscalinet.it...
> > > >
> > > > > "Provider=MySQLProv;Data Source=mydb;User
> > Id=UserName;Password=asdasd;"
> > >
> > > Data Source è il nome del server
> >
> > E il nome del db allora?
> > Teoricamente servirebbe un initial catalog come in Sql giusto?
>
> per analogia sì, visto che la sintassi è identica e sempre per analogia se
> non si indica il nome del database dovrebbe assegnare quello predefinito
per
> lo User che accede.
> Comunque non conosco MySql, ho suggerito il link in quando affidabile in
> altri ambiti
Purtroppo io lo conosco mooolto poco, comunque è molto interessante il link
(che avevo già trovato in altri contesti)
> Ciao Giorgio
Ciao,
Massimo


title: ADO & MySQL

text:
"Luciano (DOC)" <
XXXlucia...@sitocomune.com
> ha scritto nel messaggio
news:2q81s7F...@uni-berlin.de...
>
> Si certo. Con MyODBC si passa una cosa del genere:
>
"Driver={mySQL};Server=xx.xxx.xxx.xxx;OPTION=16386;Uid=pippo;Pwd=pippo;Datab
> ase=ilmiodatabase;"
> Server e' un parametro opzionale, se non presente viene assunto come
> localhost.
> Saluti.
>
> Luciano
Hai letto l'altro mio post con il link alla connessione con MySql?
Mi sembrava molto interessante.
"
Ho trovato un Database=...
http://www.coveryourasp.com/Snippet.asp?snip=16
"
Ciao,



title: ADO & MySQL

text:
"TheMax" <
massim...@accessgroup.it
> ha scritto nel messaggio
news:chmpnp$ndp$1...@domitilla.aioe.org...
> Hai letto l'altro mio post con il link alla connessione con MySql?
Certamente, ma non diceva nulla che non avessi tentato gia'. Grazie
comunque.
Saluti.
Luciano


title: report

author: Alessandro

text:
Devo fare un report in cui in funzione del valore assunto da un controllo mi
si attivano solo determinate voci.
Si può fare?
Ciao e grazie


title: report

text:
"Alessandro" <
lond...@inwind.it
> ha scritto nel messaggio
news:fSWZ8.5753$s74.1...@twister1.libero.it...
> Devo fare un report in cui in funzione del valore assunto da un controllo
mi
> si attivano solo determinate voci.
> Si puň fare?
>
> Ciao e grazie
>
certo con vba
if valorecontrollo=1 then
    reports![nome]![controllo1].visible=true
    reports![nome]![controllo2].visible=true
    reports![nome]![controllo3].visible=false
elseif valorecontrollo=2 then
    reports![nome]![controllo1].visible=false
    reports![nome]![controllo2].visible=true
    reports![nome]![controllo3].visible=false
ecc....
end if


title: Metodo per cercare file e cartelle

author: ciro esposito

text:
Salve,
ho la necessità di fare delle ricerche sia sul nome del file che sul
nome delle cartelle e, successivamente, aprire il file o la cartella.
Per la ricerca e l'apertura per 'nome file', ho risolto attraverso il
metodo Application.filesearch, ma per le Cartelle, no.
Qualcuno ha già qualcosa che possa aiutarmi ?
Grazie.


title: Numero progressivo fatture

author: Catlory

text:
Salve a tutti!ho usato il generatore di numeri progressivi per fatture
presente sul sito comune e mi è sorto il seguente problema:il
generatore funziona a meraviglia ma solo su una maschera di quelle
usate per le fatture!mi spiego:ho tre possibili maschere per generare
fatture,una per quelle in acconto legate a commessa,una per quelle a
saldo legate sempre a commessa e una per quelle non legate da
commessa(qui tutto funziona).Se creo una nuova fattura dei primi due
tipi il contatore non fa vedere nulla e nella tabella rimane il campo
vuoto.c'è un modo per farlo funzionare anche nelle altre maschere?
grazie per l'aiuto.


title: Numero progressivo fatture

author: Roberto dalla campagna

text:
"Catlory" <
cat...@libero.it
> ha scritto nel messaggio
news:1126023878....@g14g2000cwa.googlegroups.com...

A mio avviso è sufficiente che nelle prime due maschere fai lo stesso
intervento nella maschera in cui la soluzione del Sito omune funziona.
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Numero progressivo fatture

text:
ho riportato nel valore predefinito del controllo lo stesso codice
fornitomi dal generatore e funziona solo nella solita maschera.Non è
che c'è da settare qualche altro parametro?grazie


title: Numero progressivo fatture

text:
"Catlory" <
cat...@libero.it
> ha scritto nel messaggio
news:1126098668.0...@o13g2000cwo.googlegroups.com...
>ho riportato nel valore predefinito del controllo lo stesso codice
>fornitomi dal generatore e funziona solo nella solita maschera.Non è
>che c'è da settare qualche altro parametro?grazie
No che io sappia, d'altra parte tutto è basata su una IIf e due DMax.



title: Numero progressivo fatture

text:
può dipendere dal fatto che le maschere in questione creano la fattura
non direttamente sulla tabella ma uso ujn recordset con Add new dei
parametri inseriti?continua a lasciarmi il valore vuoto!non capisco....
:-(


title: Numero progressivo fatture

text:
"Catlory" <
cat...@libero.it
> ha scritto nel messaggio
news:1126108017.5...@g47g2000cwa.googlegroups.com...
>può dipendere dal fatto che le maschere in questione creano la fattura
>non direttamente sulla tabella ma uso ujn recordset con Add new dei
>parametri inseriti?continua a lasciarmi il valore vuoto!non capisco....
Certamente che dipenda da quello; la soluzione proposta nel Sito Comune
modifica il valore predefinito della casella di testo associata al campo
della tabella, ma visto che la maschera (e quindi la casella di testo) non è
associata, quel sistema non può funzionare; non ha significato tale
proprietà per controlli non associati.
Nessuno ti vieta di determinare il numero fattura usando le funzioni If e
DMax in VBA, subito prima della riga dell'Add new.
>:-(



title: report per fatture personalizzato

author: CrCAj

text:
A2000 W2000
ho questo problema:
avevo creato un report per stampare le fatture che funzionava
perfettamente...il problema è che ora mi trovo a dover mettere in alcune
fatture più di 200 voci.
Vorrei quindi modificare questo report facendo precedere l'elenco degli
"articoli" (in realtà si tratta di certificati di analisi è per questo
che devo elencarli) ottenendo una sorta di elenco continuo del tipo:
Ns Rapp. di prova n° : [16],[17],[18],[19],etc... etc..o ancora meglio
Ns Rapp di prova da [valore del primo record nella query] al [valore
dell'ultimo record nella query]    (1)
in questo modo posso poi accorpare le 200 voci in  gruppi mettendo
quantità e prezzo unitario
Quindi le mie domande sono 2:
- come faccio a creare la situazione (1)
-quale è il comando che mi permette di contare tra i recor della query
origne  del report quanti siano i record stessi che rispettano la
condizione = analisi x
scusate e grazie in anticipo


title: report per fatture personalizzato

author: @Arold [             ]

text:
> -quale è il comando che mi permette di contare tra i recor della query
Dcount usando where guarda la guida in linea ciao.



title: come trovo una stringa di codice..

author: JOE

text:
ciao a tutti mi spiego..
in una maschera ho un pulsante di comando che pigiandolo
mi esce una finestrella di immissione valore parametro
"digita comune da escludere"...
siccome avrei intenzione di apportare una modifica a questa
routine (con il Vs aiuto naturalmente) non riesco a trovarla da nessuna
parte..
certo ho visto nei codici SQL delle query...oppure anche aprendole
direttamente
 ma non trovo nulla...come fare ??
Giuseppe
ps.. in sostanza la routine dovrebbe finzionare cosě : i Comuni in
questione sono
8 ed io se inserisco di escludere Milano funziona....
ma se vorrei stampare solo Milano ed esludere Torino, Genova e Roma non
funziona..
ciao e grazie a tutti per un eventuale aiuto...


title: come trovo una stringa di codice..

text:
"JOE" <
to...@invalid.it
> ha scritto nel messaggio
news:58yUj.304691$%k.40...@twister2.libero.it...
> in una maschera ho un pulsante di comando che pigiandolo
> mi esce una finestrella di immissione valore parametro
> "digita comune da escludere"...
> siccome avrei intenzione di apportare una modifica a questa
> routine (con il Vs aiuto naturalmente) non riesco a trovarla da
> nessuna parte..
> certo ho visto nei codici SQL delle query...oppure anche aprendole
> direttamente
> ma non trovo nulla...come fare ??
> Giuseppe
>
> ps.. in sostanza la routine dovrebbe finzionare così : i Comuni in
> questione sono
> 8 ed io se inserisco di escludere Milano funziona....
> ma se vorrei stampare solo Milano ed esludere Torino, Genova e Roma
> non funziona..
------------------
scusate tutti l'ho trovata....
...a dir la verità nel Db non ho alcuna query ma ho la
stringa del codice nell'origine record... e vorrei sapere se è possibile
apportare una
modifica....
intanto ecco la parte finale della stringa....:
HAVING (((Anagrafe.TxtComResidenza) Not In ([digita comuni da
escludere])))
ORDER BY Anagrafe.TxTCognome, Anagrafe.TxTNome, Max
(Tabprodotti.data_erogazione);
a me interesserebbe poter esludere + Comuni contemporaneamente.. mi
spiego..
in tutto i Comuni sono 8 e se digito solo 1 Comune me lo esclude...
ma se digito esempio: Milano, Roma, Torino non funziona e mi stampa
tutti i record..
se la cosa non si può automatizzare...
mi starebbe bene anche agire manualmente prima della stampa modificando
il codice
a mano..
grazie a tutti


title: come trovo una stringa di codice..

author: Karl Donaubauer

text:
JOE wrote:
>> in una maschera ho un pulsante di comando che pigiandolo
>> mi esce una finestrella di immissione valore parametro
>> "digita comune da escludere"...
>> siccome avrei intenzione di apportare una modifica a questa
>> routine (con il Vs aiuto naturalmente) non riesco a trovarla da
>> nessuna parte..
>> certo ho visto nei codici SQL delle query...oppure anche aprendole
>> direttamente
>>
>> ps.. in sostanza la routine dovrebbe finzionare così : i Comuni in
>> questione sono
>> 8 ed io se inserisco di escludere Milano funziona....
>> ma se vorrei stampare solo Milano ed esludere Torino, Genova e Roma
>> non funziona..
> ....
> ...a dir la verità nel Db non ho alcuna query ma ho la
> stringa del codice nell'origine record... e vorrei sapere se è possibile
> apportare una
> modifica....
> intanto ecco la parte finale della stringa....:
>
> HAVING (((Anagrafe.TxtComResidenza) Not In ([digita comuni da
> escludere])))
Sei sicuro che la condizione è giusto nel HAVING?
Di solito è inteso un WHERE per escludere record non gruppi.
> ORDER BY Anagrafe.TxTCognome, Anagrafe.TxTNome, Max
> (Tabprodotti.data_erogazione);
>
> a me interesserebbe poter esludere + Comuni contemporaneamente.. mi
> spiego..
> in tutto i Comuni sono 8 e se digito solo 1 Comune me lo esclude...
> ma se digito esempio: Milano, Roma, Torino non funziona e mi stampa
> tutti i record..
> ...
Non è possibile con l'immissione valore parametro perché puoi
solo scrivere un solo testo senza separatori.
Se invece puoi usare una casella di riepilogo (a molti selezione)
per selezionare le città da escludere vedi l'esempio qui:
http://groups.google.com/group/it.comp.appl.access/browse_thread/thread/f34bfbb4f971fe1e/bafd2bf620aa5a10?lnk=st&q=#bafd2bf620aa5a10
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: come trovo una stringa di codice..

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio >>>
>>CUT >>
>> HAVING (((Anagrafe.TxtComResidenza) Not In ([digita comuni da
>> escludere])))
>
> Sei sicuro che la condizione è giusto nel HAVING?
> Di solito è inteso un WHERE per escludere record non gruppi.
>
>> ORDER BY Anagrafe.TxTCognome, Anagrafe.TxTNome, Max
>> (Tabprodotti.data_erogazione);
>>
>> a me interesserebbe poter esludere + Comuni contemporaneamente.. mi
>> spiego..
>> in tutto i Comuni sono 8 e se digito solo 1 Comune me lo esclude...
>> ma se digito esempio: Milano, Roma, Torino non funziona e mi stampa
>> tutti i record..
>> ...
>
> Non è possibile con l'immissione valore parametro perché puoi
> solo scrivere un solo testo senza separatori.
> Se invece puoi usare una casella di riepilogo (a molti selezione)
> per selezionare le città da escludere vedi l'esempio qui:
>
>
http://groups.google.com/group/it.comp.appl.access/browse_thread/thread/f34bfbb4f971fe1e/bafd2bf620aa5a10?lnk=st&q=#bafd2bf620aa5a10
>
-----------
Ciao Karl.. grazie per avermi risposto... sono andato a vedere l'esempio
da te citato, ma perdonami,
ci capisco ben poco in Access...
in sostanza, per semplificare il tutto potrei usare un WHERE ??
ti posto l'intero codice presente in Origine controllo del Report in
questione...
SELECT Anagrafe.ID_Anagrafe, Anagrafe.TxTCognome, Anagrafe.TxTNome,
Anagrafe.TxTCodiceFiscale, Anagrafe.TxtComResidenza,
Anagrafe.data_ritiro, Anagrafe.Indirizzo, Tabprodotti.ID,
Tabprodotti.Prodotto, Tabprodotti.CodASL, Tabprodotti.CodEsenzione,
Tabprodotti.data_scadenza, Tabprodotti.quantità,
Max(Tabprodotti.data_erogazione) AS MaxDidata_erogazione,
Min(DateDiff("d",[data_erogazione],Date())) AS gg,
IIf(Min(DateDiff("d",[data_erogazione],Date()))>60 And
Min(DateDiff("d",[data_erogazione],Date()))<91,3,0) AS gg6090,
(DateAdd("d",[MaxDidata_erogazione],80)) AS Scad FROM Anagrafe INNER
JOIN Tabprodotti ON Anagrafe.ID_Anagrafe=Tabprodotti.IdAnagrafica GROUP
BY Anagrafe.ID_Anagrafe, Anagrafe.TxTCognome, Anagrafe.TxTNome,
Anagrafe.TxTCodiceFiscale, Anagrafe.TxtComResidenza,
Anagrafe.data_ritiro, Anagrafe.Indirizzo, Tabprodotti.ID,
Tabprodotti.Prodotto, Tabprodotti.CodASL, Tabprodotti.CodEsenzione,
Tabprodotti.data_scadenza, Tabprodotti.quantità HAVING
(((Anagrafe.TxtComResidenza) Not In ([digita comuni da escludere])))
ORDER BY Anagrafe.TxTCognome, Anagrafe.TxTNome,
Max(Tabprodotti.data_erogazione);
se non si può usare il WHERE... mi spieghi passo passo dove dovrei
andare per creare
una casella di riepilogo (a molti selezione)...
grazie


title: Query Access con funzioni utente: "select .. from .. where MiaF( ) and ..." : esperimenti e applicazioni

author: radicale 004

text:
Forse sono banali, non so.
Grazie al bravo Geppo (che anzi approfitto dell' occasione per
ringraziare e salutare) ho visto che e' possibile, per ora nel
query builder di access (ma Geppo dice che funziona anche
con i recordset, e gli credo) scrivere query di questo tipo :
select c1,c2, ... ,cn from T
where
miafunc_01(cj,ck, ...) and
miafunc_02(cj,ck, ...);
Dove miafunc_XX e' una funzione che restituisce true
se (qualcosa in funzione del valore dei campi dati ad
essa come parametri) o false in caso contrario.
Tanto per cominciare accade questo :
"domina" la funzione piu' a destra, la miafunc_02.
Nel senso che se questa restituisce false, la
miafunc_01 non viene valutata nemmeno e il record
corrispondente viene SCARTATO.
Invece la miafunc_02 viene eseguita per ogni record.
Se assume true, allora viene eseguita anche la miafunc_01.
Se restituisce true anche quella, il record non viene scartato.
Il fatto che la miafunc_02 venga effettivamente eseguita
*per ogni* record significa che la cosa si potrebbe sfruttare
ad esempio cosi' :
se la miafunc_02 prende i valori dei campi immessi, li
manipola e lii confronta nei modi piu' disparati, poi il
risultato lo mette in un file di testo (passato come variabile
globale o dato in pasto alla funzione stessa come parametro)
Per cui a query eseguita noi avremmo GIA' caricati in un file
di testo i risultati. Oppure in un file excel, oppure in una altra
tabella, oppure in un VETTORE ... O in una lista, in un albero
... ! Quello che volete. E tali risultati possono essere
semplicemente
i record della tabella messi in un altro formato. E tutti.
Nulla poi impedisce che le elaborazioni vengano fatte dalla
miafunc_01, per cui avremmo una elaborazione condizionata
al fatto che la miafunc_02 abbia restituito true.
... Mi date qualche commento ?


author: Pablitomf (da casa)

text:
> Tanto per cominciare accade questo :
> "domina" la funzione piu' a destra, la miafunc_02.
perchč il recordset lo farai diretto...
se invece lo passi per una variabile testo, la cosa non accade...
Dim wow as String
wow="Select c1,c2.......mifunc_01, ecc....."
Set rs = db.openrecordset(wow)
> Invece la miafunc_02 viene eseguita per ogni record.
> Se assume true, allora viene eseguita anche la miafunc_01.
> Se restituisce true anche quella, il record non viene scartato.
>
>
> Il fatto che la miafunc_02 venga effettivamente eseguita
> *per ogni* record significa che la cosa si potrebbe sfruttare
> ad esempio cosi' :
> se la miafunc_02 prende i valori dei campi immessi, li
> manipola e lii confronta nei modi piu' disparati, poi il
> risultato lo mette in un file di testo (passato come variabile
> globale o dato in pasto alla funzione stessa come parametro)
a prň di che?
> Per cui a query eseguita noi avremmo GIA' caricati in un file
> di testo i risultati. Oppure in un file excel, oppure in una altra
> tabella, oppure in un VETTORE ... O in una lista, in un albero
> ... ! Quello che volete. E tali risultati possono essere
> semplicemente
> i record della tabella messi in un altro formato. E tutti.
Si ma allora la funzione a che ti serve se poi dei risultati te ne fai
altro?
> Nulla poi impedisce che le elaborazioni vengano fatte dalla
> miafunc_01, per cui avremmo una elaborazione condizionata
> al fatto che la miafunc_02 abbia restituito true.
>
>
> ... Mi date qualche commento ?
Certo che ti diamo un commento... il mio č :
non ci ho capito nulla...
l'obbiettivo qual'č?


author: Antonio Biso

text:
"radicale 004" <
radica...@gmail.com
> ha scritto nel messaggio
news:4d102667-ae96-46cc...@f25g2000yqc.googlegroups.com...
> Forse sono banali, non so.
>
> select c1,c2, ... ,cn from T
> where
> miafunc_01(cj,ck, ...) and
> miafunc_02(cj,ck, ...);
>
>
> Dove miafunc_XX e' una funzione che restituisce true
> se (qualcosa in funzione del valore dei campi dati ad
> essa come parametri) o false in caso contrario.
>
>
> Tanto per cominciare accade questo :
> "domina" la funzione piu' a destra, la miafunc_02.
Ma tu sei sicuro di quello che dici?
> Nel senso che se questa restituisce false, la
> miafunc_01 non viene valutata nemmeno e il record
> corrispondente viene SCARTATO.
Sei sicuro sicuro?
> Invece la miafunc_02 viene eseguita per ogni record.
> Se assume true, allora viene eseguita anche la miafunc_01.
> Se restituisce true anche quella, il record non viene scartato.
Mi sai che sei sicuro, ma non mi pare che sei sulla buona strada.
Hai due espressioni in AND.
E' OVVIO che se una delle due vale FALSE l'AND da false.
Quindi il record è scartato.
Il record è preso se entrambe sono true, per semantica dell'AND
Non è una questione di funzione che prevale, è che se quella da false, tutto
da false e buonanotte ai (record) suonatori...
> Il fatto che la miafunc_02 venga effettivamente eseguita
> *per ogni* record significa che la cosa si potrebbe sfruttare
> ad esempio cosi' :
> se la miafunc_02 prende i valori dei campi immessi, li
> manipola e lii confronta nei modi piu' disparati, poi il
> risultato lo mette in un file di testo (passato come variabile
> globale o dato in pasto alla funzione stessa come parametro)
> ... Mi date qualche commento ?
Non è chiaro dove vuoi arrivare.
Mi sembrano speculazioni eccessive e troppo aleatorie.
Fa dei casi particolari e vediamo se quello che intendi fare è utile o ci
sono altre soluzioni...
Antonio


text:
> Certo che ti diamo un commento... il mio č :
> non ci ho capito nulla...
> l'obbiettivo qual'č?
Aggiungo...
L'uso di Access come qulunque altro linguaggio prevede 2 punti fondamentali
:
1) un problema da risolvere
2) i modi con cui risolverlo
In questo, come spesso in tanti altri tuoi quesiti, non si capisce da cosa
parti e soprattutto per arrivare dove.
;) te lo dico giusto per capire insieme a te come aiutarti...


text:
On 2 Ott, 17:59, "Antonio Biso" <
ab...@libero.it
> wrote:
(omissis)
Miiiii ... Ma quanto sei acido ! :D
Sei talmente acido da risultare simpatico ! :D
> Hai due espressioni in AND.
> E' OVVIO che se una delle due vale FALSE l'AND da false.
> Quindi il record è scartato.
> Il record è preso se entrambe sono true, per semantica dell'AND
> Non è una questione di funzione che prevale, è che se quella da false, tutto
> da false e buonanotte ai (record) suonatori...
Si certo. tu hai ragione, non mi sono spiegato.
Se tu scrivi :
select ... from ... where f1( ) and f2( ) ;
accade questo :
PRIMA viene valutata la f2 (  ).
SE questa dà true allora viene valutata la f1 ( )
Altrimenti no. OVVIAMENTE il record viene
scartato comunque SE anche una sola delle
fx ( ) e' falsa ! Mi segui ?
Me ne sono accorto perche' dentro la f2 ( )
c' ho messo (apposta !) una cosa del tipo :
p = p + 1
e nella f1 ( ) una cosa del tipo
c = c + 1
Aaaaaaaattenzione :
I record erano in totale 3, ma solo 1 soddisfava
la f2 ( )
Allora alla fine veniva p = 3 e c = 1
QUINDI : la f2 ( ) la valutava *per ogni* record, mentre
la f1 ( ) SOLTANTO quando la f2 ( ) dava true.
Mettendo prima la f2 ( ) e poi la f1( ) nella query,
accadeva esattamente l' inverso :
c = 3, p = 1
Quindi ...
> Non è chiaro dove vuoi arrivare.
Sto studiando come funziona il sistema e cerco di
coinvolgervi, tutto qui. Non ho un obiettivo particolare.
Bisogna averlo per forza ? No ... Chiedo eh !
> Mi sembrano speculazioni eccessive e troppo aleatorie.
Ma io so' matematico pazzo !  Non posso andare contro
la mia natura ! :D
>Fa dei casi particolari e vediamo se quello che intendi fare
>è utile o ci sono altre soluzioni...
*utile* ! Che parola grossa !
Giustamente Alessandro Cara mi disse che dopotutto il
polimorfismo c'e' sempre stato ! Basta considerare i variant !
Eh ! Cos' e' "utile" ? Dai sii un po' aperto, che ti costa ?
Comunque volevo dire questo :
siccome la fx ( ) viene (parlando in generale) valutata per
ogni record, allora se ad esempio uno vuole fare una
query che dopo la ricerca gli spari tutti i dati diciamo
dentro un file excel, allora basta che scriva :
select ... from ... where spara_in_excel( elenco dei campi)
Ma questo e' SOLO *una* applicazione.
Ok ?


text:
On 2 Ott, 17:55, "Pablitomf \(da casa\)" <
pablit...@hotmail.it
> wrote:
> Dim wow as String
> wow="Select c1,c2.......mifunc_01, ecc....."
> Set rs = db.openrecordset(wow)
(omissis)
E grazie che non accade, ce ne' una sola di funzione
nella tua stringa ! :D
Vedi la risposta (si intende : con calma e per favore eh !)
che ho dato all' ACIDISSIMO Antonio Biso :D
Forse la si capisce meglio. Vedi un po' ...


text:
Il 02/10/2010 18.41, radicale 004 ha scritto:
CUT
  allora se ad esempio uno vuole fare una
> query che dopo la ricerca gli spari tutti i dati diciamo
> dentro un file excel, allora basta che scriva :
> select ... from ... where spara_in_excel( elenco dei campi)
>
CUT
oppure usa il
DoCmd.TransferSpreadsheet Method


text:
> Non è chiaro dove vuoi arrivare.
Sto studiando come funziona il sistema e cerco di
coinvolgervi, tutto qui. Non ho un obiettivo particolare.
Bisogna averlo per forza ? No ... Chiedo eh !
---------------
Ma vaaaaaaaaaaaaaa! :D tutto sto papiello per "studio"? :D e io (in verità
non solo io) che pensavo che ti servisse per qualcosa di specifico! :D
Ok... quindi "studio"... capito... ;)


author: radicale 003

text:
On 3 Ott, 00:19, "Pablitomf \(da casa\)" <
pablit...@hotmail.it
> wrote:
> Ma vaaaaaaaaaaaaaa! :D tutto sto papiello per "studio"? :D e io (in verità
> non solo io) che pensavo che ti servisse per qualcosa di specifico! :D
> Ok... quindi "studio"... capito... ;)
,.. Non capisco.
Siccome in fondo e' da poco che scrivo qui, per favore spiegami :
c'e' una sorta di (come dire ...) "regola non scritta" per la quale
qui si deve soltanto chiedere soluzioni di problemi specifici ?
Sto chiedendo, eh !


text:
> Ma vaaaaaaaaaaaaaa! :D tutto sto papiello per "studio"? :D e io (in verità
> non solo io) che pensavo che ti servisse per qualcosa di specifico! :D
> Ok... quindi "studio"... capito... ;)
,.. Non capisco.
Siccome in fondo e' da poco che scrivo qui, per favore spiegami :
c'e' una sorta di (come dire ...) "regola non scritta" per la quale
qui si deve soltanto chiedere soluzioni di problemi specifici ?
Sto chiedendo, eh !
---------------------
No, in realtà no... però in tutti questi anni (leggi bene, "ANNI") sei il
primo che scrive sull'NG con questo tipo di spirito... di solito è sempre
funzionato "mi serve questo, per fare s'altro, come posso fare?"... e giù
soluzioni e consigli... quindi scusaci tu, non siamo preparati a usare
usenet come cattedra... però (ovviamente parlo per me), mi piace sta cosa...
consiglio, dillo prima quando parli giusto per (nel senso di "studio" non a
"vanvera"), e quando hai invece un problema da risolvere, almeno uno si
proietta sulla cosa diversamente, partecipandovi come il tema prevede ;)


text:
On 3 Ott, 19:57, "Pablitomf \(da casa\)" <
pablit...@hotmail.it
> wrote:
>No, in realtà no... però in tutti questi anni (leggi bene, "ANNI") >sei il primo che scrive sull'NG con questo tipo di spirito...
>di solito è sempre funzionato "mi serve questo, per fare s'altro, >come posso fare?"... e giù soluzioni e consigli... quindi scusaci >tu, non siamo preparati a usare usenet come cattedra... però
>(ovviamente parlo per me), mi piace sta cosa...
>consiglio, dillo prima quando parli giusto per (nel senso >di "studio" non a "vanvera"), e quando hai invece un problema da >risolvere, almeno uno si proietta sulla cosa diversamente, >partecipandovi come il tema prevede ;)
Capito. Ok, benissimo. Come sempre accetto il consiglio e
porto a casa.
Comunque non c'e' nulla di cui scusarti, non e' che uno qui
debba rispondere "per forza", intendiamoci.
Concludo dicendo : ma allora, se la cosa ti piace, come mi
pare d' aver capito, perche' non fai qualche prova pure tu
e mi dici ? (seeeempre con calma e per piacere, s' intende)
(t' avverto e' LUNGO) :-))
Per tua comodita' riepilogo qui l' esperimento :
------------------------------------------------
nel query builder di access ho scritto
select c1,c2, ...cN from T where
MyF1(c1,c2, ..., cN) and
MyF2(c1,c2, ..., cN);
dove MyF1 e MyF2 sono due funzioni pubbliche fatte
cosi' (ovviamente non e' detto che debbano ricevere
in input *tutti* i  campi della T, ma per maggiore
generalita' io li scrivo tutti)
public MyF1(byref c1 as string, _
            byref c2 as string, _
            ...
            byref cN as string)
if (serie di controlli sui cj) then
   MyF1 = true
endif
' NOTARE L' ISTRUZIONE :
G_My_01 = G_My_01 + 1
end function
public MyF2(byref c1 as string, _
            byref c2 as string, _
            ...
            byref cN as string)
if (serie di controlli sui cj) then
   MyF2 = true
endif
' NOTARE L' ISTRUZIONE :
G_My_02 = G_My_02 + 1
end function
G_My_01 e G_My_02 sono due variabili pubbliche
alquanto paracule, perche' CONTANO le volte che
MyF1 e  MyF2 vengono eseguite, come puoi vedere.
Ritorniamo alla :
select c1,c2, ...cN from T where
  MyF1(c1,c2, ..., cN) and
  MyF2(c1,c2, ..., cN);
Eseguendola  su una tabella di due
campi c1 e c2 e 3 record accade esattamente questo :
PRIMO
la G_My_02 assume valore 3. Quindi la G_My_02 viene
eseguita 3 volte, una per ogni record.
Attenzione : ma la G_My_02 ( ... ) e' stata da me
costruita in modo che UN SOLO record della T e'
tale da fargli restituire true.
E guarda caso, dopo l' esecuzione della query la
G_My_01 e' impostata a 1.
Se pero' scrivo la query invece che cosi' :
select c1,c2, ...cN from T where
MyF1(c1,c2, ..., cN) and
MyF2(c1,c2, ..., cN);
Cosi', invertendo l' ordine delle funzioni come
vedi :
select c1,c2, ...cN from T where
MyF2(c1,c2, ..., cN) and
MyF1(c1,c2, ..., cN);
osservo che la G_My_01 e' ora impostata a TRE,
e G_My_02 a TRE anch' essa.
E guarda caso la G_My_01 e' costruita in modo
da restituire sempre true.
Ne segue (incontrovertibilmente, azzarderei) che
il sistema testa ed esegue SEMPRE, PRIMA la funzione
piu' a "destra", E SOLO SE questa restituisce il valore
true allora va a testare la funzione piu' a sinistra.
(... poteva anche cominciare da quella a sinistra,
invece no).
Ovviamente :
Se ambedue le funzioni danno true, allora il record e'
aggiunto al risultato della query. Altrimenti no.
In generale quindi per ogni record R il sistema e' come
se facesse questo (funzionalmente parlando) :
   if funzione_piu_a_destra( ... ) then
      if prima_funzione_a_sinistra_della_precedente( ... ) then
         if prima_funzione_a_sinistra_della_precedente( ... ) then
               ...
               aggiungi record
         else
      else
   else
In pratica dice : inutile testare tutte le altre funzioni
essendo in AND : se l' ultima a destra e' false, esco
subito ! Ottimizza insomma.
Credo che (ma dovrei verificare) avvenga l' esatto contrario
se al post dell' AND ci fosse l' OR (a connettere le funzioni)
: buona la prima a destra, buono tutto.
Detto questo vediamo le applicazioni pratiche.
Abbiamo visto che le funzioni utente possono tranquillamente
eseguire una serie di controlli sul valore che i campi
della tabella assumono per ogni record.
(come se chiamassi le funzioni tante volte quanti sono
i record passandogli ogni volta parametri diversi : i
valori dei campi)
Ma possono eseguire anche istruzioni di lettura e
scrittura ! Insomma : possono fare tutto.
Quindi noi con questo sistema abbiamo costruito
implicitamente un meccanismo che, mentre preleva record
da una tabella normalmente producendo un risultato, al
contempo chiama le funzioni utente le quali per ogni
record possono, per esempio, aggiornare un file excel,
un vettore, un file di testo, mandare una email ...
O tutte quelle cose insieme.
Il tutto, con una semplice query . :-)
E cosi' via, perche' SE (come immagino, ma vorrei chiederti
di fare la prova) quel modo di scrivere le query (con funzioni
utente dentro) funzionasse anche in fase di apertura di un
recordset, si potrebbe immaginare di fare funzioni utente
che a loro volta emettono query (con diverse funzioni utente
dentro) creando a loro volta report ecc ecc,  a cascata.
SE cioe' fosse possibile scrivere questo :
dim RC           as new adodb.recordset
dim QUERY_UTENTE as string
QUERY_UTENTE = _
"select c1,c2, ...cN from T where " & _
"MyF1(c1,c2, ..., cN) and         " & _
"MyF2(c1,c2, ..., cN)            ;"
' dopodiche' :
RC.open QUERY_UTENTE, Cnn
le cose fattibili sarebbero davvero molte,
a quel punto.
Fammi sapere.


author: Alessandro Cara

text:
Il 04/10/2010 12.56, radicale 004 ha scritto:
[cut]
> In pratica dice : inutile testare tutte le altre funzioni
> essendo in AND : se l' ultima a destra e' false, esco
> subito ! Ottimizza insomma.
Sta roba la fanno tutti i sistemi/linguagi (o quasi tutti)
In qualsiasi espressione che e' unita da AND e' inutile proseguire se un
termine restituisce *False* poiche' il risultato  finale sara' comunque
*False*
con la OR dovrebbe essere l'esatto contrario al primo risultato *True*
il risultato finale sara' *True*
--
ac


author: pablitomf

text:
On 4 Ott, 13:26, Alessandro Cara <
alessandro.c...@ay-1anetwork.it
>
wrote:

Già.


text:
On 4 Ott, 13:26, Alessandro Cara <
alessandro.c...@ay-1anetwork.it
>
wrote:
>Sta roba la fanno tutti i sistemi/linguagi (o quasi tutti)
Si lo so, ma non sapevo che l' Access li faceva da destra
verso sinistra.
E per il resto, che mi dite ?


text:
Il 04/10/2010 14.17, radicale 004 ha scritto:
> On 4 Ott, 13:26, Alessandro Cara<
alessandro.c...@ay-1anetwork.it
>
> wrote:
>
>> Sta roba la fanno tutti i sistemi/linguagi (o quasi tutti)
>
> Si lo so, ma non sapevo che l' Access li faceva da destra
> verso sinistra.
Io non mi fiderei di basare la logica su questa (presunta) regola.
Che io sappia i piani di applicazione dell'sql derivano dalla
valutazione di diverse variabili. Mai sentita la necessita' di
approfondire l'argomento.
--
ac


text:
On 4 Ott, 14:30, Alessandro Cara <
alessandro.c...@ay-1anetwork.it
>
wrote:

Basta mettere funzioni che ti restituiscono msgbox "1", 2, n... così
conosci l'ordine di lettura... fai decisamente prima se ti interessa
sapere sta cosa.


text:
"pablitomf" <
pabl...@virgilio.it
> ha scritto nel messaggio
news:280bddac-dc9a-45b8...@l6g2000yqb.googlegroups.com...


E cmq non riesco a capire perchè legare al lancio di una funzione dentro una
query l'esecuzione di altre attività di programmazione
Antonio


author: Paolo opg

text:
"Antonio Biso" <
ab...@libero.it
> wrote in
news:7Fkqo.103000$
Ua.2...@twister2.libero.it
:
[cut]
>
> E cmq non riesco a capire perchè legare al lancio di una funzione
> dentro una query l'esecuzione di altre attività di programmazione
>
> Antonio
>
UCAS
Ufficio Complicazione Affari Semplici
:-)
--
Paolo opg
BE AWARE that this post uses a fake reply-to address
to contact me write to:
janickg ( at ) hotmail ( dot ) com
--


text:
"Paolo opg" <
spamc...@tiscali.it
> ha scritto nel messaggio
news:Xns9E079EB38F4E0sp...@193.43.96.1...
> "Antonio Biso" <
ab...@libero.it
> wrote in
> news:7Fkqo.103000$
Ua.2...@twister2.libero.it
:
>
> [cut]
>>
>> E cmq non riesco a capire perchè legare al lancio di una funzione
>> dentro una query l'esecuzione di altre attività di programmazione
>>
>> Antonio
>>
>
>
> UCAS
>
> Ufficio Complicazione Affari Semplici
>
> :-)
>
>
> --
> Paolo opg
Ah ecco appunto, non ero io il rincoglionito!!!
:-D
Il lancio di una funzione da query è molto utile quando è fondamentale
testare come parametro i valori di uno o più campi di ogni record e quindi
far lavorare il programma di conseguenza.
Ma se poi quello che si fa con la funzione è qualcosa che prescinde dalla
query, ma perchè complicarmi la vita???
Ciao Pà
Antonio


text:
On 4 Ott, 15:42, "Antonio Biso" <
ab...@libero.it
> wrote:
> "Paolo opg" <
spamcatc...@tiscali.it
> ha scritto nel messaggionews:Xns9E079EB38F4E0sp...@193.43.96.1...

Perchè "è per studio"... lui è curioso, e vuole sapere il perchè delle
cose... che poi non servano ai più, questo è un altro paio di
maniche. :)


text:
On 4 Ott, 15:42, "Antonio Biso" <
ab...@libero.it
> wrote:
> Ah ecco appunto, non ero io il rincoglionito!!!
> :-D
No guarda,
qui *nessuno* e' rincoglionito.
Ognuno le cose le apprende a modo suo, al massimo.
Se poi condividere riflessioni ed esperimenti (come
vedi non banali, visto che c' avete messo un po' per
capire) su questo NG significa provocare reazioni
stizzite, di "perculamento", o addirittura BASITE,
la prossima volta me le tengo per me, e amici come
prima. Anzi, de piu'. ;-)
Ma secondo me ci rimettiamo tutti, cosi' facendo.
Parere mio, ovviamente. Ma non perche' io sono un
genio ! Oh ! Non mi fraintendere ! Ma solo perche'
si taglia un possibile ramo di discussione che tutti
possono *iniziare*, non solo io, e che puo' dare
frutti.
>Il lancio di una funzione da query è molto utile quando è >fondamentale testare come parametro i valori di uno o più
>campi di ogni record e quindi far lavorare il programma di >conseguenza.
Esatto.
E nello stesso tempo, la stessa funzione puo' scaricare
i record della query selezionando campi ecc ecc in un
formato diverso : un file excel, per esempio.
Oppure aggiornare una struttura complessa come un albero.
Ti pare un vantaggio da poco fare tutto questo emettendo
una sola query ?
Chiaramente :
se *serve*, se fa parte della logica della applicazione.
Dunque trovo un po' ...  Come dire ?
"Ozioso" ? "peregrino" ?
dire poi :
>Ma se poi quello che si fa con la funzione è qualcosa
>che prescinde alla query ma perchè complicarmi la vita???
In modo ridanciano risponderei :
E grazie al kaiser. ;-)


text:
On 4 Ott, 16:11, pablitomf <
pablit...@virgilio.it
> wrote:
>Perchè "è per studio"... lui è curioso, e vuole sapere il
>perchè delle cose... che poi non servano ai più, questo è
>un altro paio di maniche.
Ntz.
Non puoi sapere a *priori* quello che potra' servire.
Inoltre, il concetto di utilita' e' alquanto sfumato.
Dunque sempre meglio esplorare, studiare, condividere.
Poi, si decide in liberta' cosa applicare e cosa no.


text:
On 5 Ott, 11:06, radicale 004 <
radicale....@gmail.com
> wrote:
> On 4 Ott, 16:11, pablitomf <
pablit...@virgilio.it
> wrote:
>
> >Perchè "è per studio"... lui è curioso, e vuole sapere il
> >perchè delle cose... che poi non servano ai più, questo è
> >un altro paio di maniche.
>
> Ntz.
>
> Non puoi sapere a *priori* quello che potra' servire.
bhè certo, a priori no, ma visto che questo concetto varrebbe per
tutto, non è che mi metto a studiare il diametro dei fusilli solo
pensando che un giorno potrebbe servire... lo faccio se ho un azienda
che ha necessità che il fusillo debba costare eventualmente di meno
senza magari cambiare esteticamente (o se da questa azienda sono
incaricato a trovare una soluzione a questo problema)... quindi ecco
che una cosa pseudo-inutile oggi potrebbe esser utile domani... è il
problema che rende utili gli studi, non il contrario... nel caso
dell'informatica... questo ovviamente imho.
Per cui secondo me, è si bello ciò che stai facendo, ma giusto come
"conoscenza personale", non come utilità intrinseca... cosa mi
interessa sapere se una funct lanciata in una query da codice inizia
dando priorità a quelle esterne a destra se con condizione AND o
iniziando da quella a sinistra se ha condizione OR? Per i motivi che
hai indicato?... no, per quelli ci sono metodi diversi e più
diretti... che poi io sia con te, che saper certi meccanismi è
comunque interessante, questo va al di là della mera utilità, nel
senso di utilizzo concreto e pratico del mezzo.
(Ovviamente si fa per discutere costruttivamente... lungi da me
perculare nessuno)
> Dunque sempre meglio esplorare, studiare, condividere.
Pienamente daccordo, ma non puoi non ammettere che questo non faccia
parte dei più come dicevo prima... i ricercatori sono nettamente meno
dei risolutori.
Il concetto è : 100 scrivono Access, 1 miliardo di milioni lo
utilizzano. Tu nel caso potresti far parte di quei 100. ;)
> Poi, si decide in liberta' cosa applicare e cosa no.
Ovvissimo...


text:
On 5 Ott, 13:03, pablitomf <
pablit...@virgilio.it
> wrote:
> è il problema che rende utili gli studi, non il contrario...
Ma il contrario sarebbe :
"lo studio rende utile il problema", che non ha senso.
Ed inoltre :
di quante innovazioni oggi si avvale l' informatica che
hanno origine nella ricerca di base matematica, fisica,
logica ?
Seguire il tuo ragionamento equivarrebbe autoimporci
una gravissima limitazione ! Devastante limitazione.
>... cosa mi interessa sapere se una funct lanciata in una query
> da codice inizia dando priorità a quelle esterne a destra se con
> condizione AND
Ma vedi sopra.
Comunque se scrivi
select a,b, ... n from T where
          f1(a,b, ...n) and
          f2(a,b, ...n) and
          f3(a,b, ...n) and
          f4(a,b, ...n) and
          ...
          fN(a,b, ...n)    ;
e vuoi che la fN sia eseguita con certezza PER OGNI record,
( perche' magari devi scrivere una elaborazione del record R,
diciamo G(R), sul supporto X ) ora sai che la devi mettere per
ultima. Prima non lo sapevi.
E vedrai che col tempo qualche altra idea mi esce.
> (Ovviamente si fa per discutere costruttivamente... lungi da me
> perculare nessuno)
Lo so, lo so ... !
Ma poi diciamo la verita' : una perculata ogni tanto fa bene,
e' il modo piu' gentile per riportare le persone alla realta'.
Anche sul resto quoto tutto.


text:
"radicale 004" <
radica...@gmail.com
> ha scritto nel messaggio
news:c88fd682-1286-465c...@i13g2000yqd.googlegroups.com...











L'atteggiamento basito che ha ricevuto è legato al fatto che non ti sei
spiegato molto bene.
Io riassumo il tutto di nuovo:
se tu stai speculando sulle funzioni nelle query sviscerandone il
funzionamento, per fare qualcosa che abbia come parametro i record è un
conto e va benissimo.
Se lo devi fare lanciando applicazioni che non c'entrano nulla con i record
della query (e ti assicuro che questo sembrava) allora mi sembra una pazzia.
E quindi lo era anche tutti i ragionamenti teorici
Antonio


text:
On 5 Ott, 22:40, "Antonio Biso" <
ab...@libero.it
> wrote:
>L'atteggiamento basito che ha ricevuto è legato al fatto che
>non ti sei spiegato molto bene.
A beh ... Quello puo' essere.
Anzi,
debbo dire che in genere non sono molto bravo a spiegarmi.


title: Nuovo campo su tabella collegata

author: pabel

text:
Ciao a tutti.
Ho gia fatto questa domanda, ma formulata in maniera diversa, le risposte
sono state molto esaurienti ma al di sopra delle mie capacità.
Scusatemi se tento nuovamente di farvi capire quello che intenderei fare
sperando di ricevere una risposta alla mia portata.
Ho un DB che ho chiamato "Motore.mdb", questo motore gestisce delle tabelle
che si trovano come tabelle allegate in un altro DB che ho chiamato
"DatiMotore.mdb".
La mia domanda è questa, posso con un pulsante nel file Motore.mdb, andare a
creare un nuovo campo nel file DatiMotore.mdb, con queste caratteristiche:
Tabella "clienti"
Nome campo: ImportoOre
Tipo dati: Numerico
Dimensione campo: Intero lungo
E' importante che sappiate che non mastico per niente il vba, ma riesco a
modificare in qualche modo quella fatto da altri, pertanto considerate
questa mia lacuna.
Un grazie anticipato a tutti quelli che mi potranno aiutare e anche a tutto
il NG che fin d'ora mi è stato di grande aiuto.
Pabel


title: Nuovo campo su tabella collegata

author: Salvatore

text:
"pabel" <
gio...@hotmail.com
> ha scritto nel messaggio
news:I60wb.7605$up5.6...@news1.tin.it...

Ciao, Pabel
non vorrei sbagliare, ma credo che, essendo la tabella collegata, access non
ti consenta di salvare le modifiche eventualmente apportate alla sua
struttura.
Ciao
Salvatore.


title: Nuovo campo su tabella collegata

text:
"Salvatore" <
sal...@tiscali.it
> ha scritto nel messaggio
news:bpq38c$2f9$1...@lacerta.tiscalinet.it...

Questo lo so, ma a me serve poter, con un bottone o pulsate, aprire il file
"datiMotore.mdb e inserire il nuovo campo nella tabella "clienti"
Grazie
Pabel


title: Nuovo campo su tabella collegata

author: sunrex

text:
"pabel" <
gio...@hotmail.com
> ha scritto nel messaggio
news:em0wb.78325$hV.30...@news2.tin.it...

Prova a masticare questo
Sub CreaTabella()
Dim dbs As Database
Dim tdfMiaTabella As TableDef
Dim fldMioCampo As Field
Set dbs = OpenDatabase(".\.datiMotore.mdb ")
Set tdfMiaTabella = dbs.CreateTableDef("clienti")
Set fldMioCampo = tdfMiaTabella.CreateField("ImportoOre", dbInteger)
tdfMiaTabella.Fields.Append fldMioCampo
dbs.TableDefs.Append tdfMiaTabella
dbs.Close
End Sub
SunRex


title: Nuovo campo su tabella collegata

text:
CUT
> Prova a masticare questo
>
> Sub CreaTabella()
> Dim dbs As Database
> Dim tdfMiaTabella As TableDef
> Dim fldMioCampo As Field
>
> Set dbs = OpenDatabase(".\.datiMotore.mdb ")
> Set tdfMiaTabella = dbs.CreateTableDef("clienti")
> Set fldMioCampo = tdfMiaTabella.CreateField("ImportoOre", dbInteger)
>
> tdfMiaTabella.Fields.Append fldMioCampo
> dbs.TableDefs.Append tdfMiaTabella
> dbs.Close
> End Sub
>
> SunRex
>
>
Niente da fare, continuerň con gli omogeneizzati.
Grazie ugualmente
Pabel


title: Nuovo campo su tabella collegata

author: namor

text:
pabel ha scritto:

Si può fare da vba o con una query "ALTER TABLE" (vedi help) che è più
semplice.
Set dbs="path\DatiMotore.mdb"
dbs.execute "ALTER TABLE .....;"
Namor
--
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Nuovo campo su tabella collegata

text:
"namor" <
do...@spam.me
> ha scritto nel messaggio
news:bpsibi$j2b$1...@news.newsland.it...

OK Grazie a tutti, ci sono riuscito in questo modo:
Private Sub Comando4_Click()
 Dim dbs As Database
 Set dbs = OpenDatabase("C:\aaa\datiMotore.mdb ")
 dbs.Execute "ALTER TABLE clienti " _
         & "ADD COLUMN ImportoOre MONEY; "
 dbs.Close
 End Sub
PS: il massimo sarebbe poter annullare il tutto se il campo "ImportoOre"
esistesse già, ora ci provo, nel frattempo di nuovo 1000 grazie.
Pabel


title: Nuovo campo su tabella collegata

text:
pabel ha scritto:
[cut]
> OK Grazie a tutti, ci sono riuscito in questo modo:
> Private Sub Comando4_Click()
>  Dim dbs As Database
>  Set dbs = OpenDatabase("C:aaadatiMotore.mdb ")
>  dbs.Execute "ALTER TABLE clienti " _
>          & "ADD COLUMN ImportoOre MONEY; "
>  dbs.Close
>  End Sub
> PS: il massimo sarebbe poter annullare il tutto se il campo "ImportoOre"
> esistesse già, ora ci provo, nel frattempo di nuovo 1000 grazie.
> Pabel
Se il campo esiste già viene generato un errore, e non viene creato nessun
nuovo campo quindi non serve annullare niente, basta gestire l'errore.
Oppure puoi controllare prima di eseguire la query se il campo esiste o no.
Aggiungi un "set dbs=nothing" dopo il dbs.close sennò ti resta in memoria
il riferimento all'oggetto dbs.



title: Inviare file pdf alla stampante

author: Fabio Fucci

text:
Buongiorno,
ho una procedura che mi crea n file in pdf; alcuni li invio a mezzo mail mentre altri ho la necessità di stamparli ma non so il comando da utilizzare.
Vi ringrazio tutti


title: Inviare file pdf alla stampante

text:

Spiega come crei quel FILE PDF, perchè se è da Report la risposta è banale... se interagisci con Word/Excel o altri Server di Automaizone, la risposta è altrettanto banale... li mandi in Stampa con il metodo di stampa del Documento...!
In tutti gli altri casi segreti... serve capire cosa fai.

Altrimenti chiami una API(ShellExecute passando il parametro "Print") che EMULA il RightClick sul File e lo manda in stampa...

@Alex


title: Inviare file pdf alla stampante

text:
Il giorno martedì 27 febbraio 2018 08:10:02 UTC+1, Fabio Fucci ha scritto:

Il codice che utilizzo è il seguente:

    Dim sPDFName As String
    Dim sPDFPath As String
    Dim sReportName As String
    Dim sPrinterName As String
    Dim lPrinters As Long
    Dim lPrinterCurrent As Long
    Dim lPrinterPDF As Long
    Dim prtDefault As Printer
    Dim NomeFileAlleg As String
    Dim RSElenco As ADODB.Recordset
    Dim Quota As String
    Dim NomeFile As String

    Set RSElenco = New ADODB.Recordset
    RSElenco.ActiveConnection = CurrentProject.Connection
    RSElenco.CursorType = adOpenKeyset
    RSElenco.LockType = adLockOptimistic
    RSElenco.Open "Estratto_conto_riepilogo"
    MsgBox RSElenco.RecordCount
Do Until RSElenco.EOF
    Naziende = Naziende + 1
    Codice = RSAllevatori.Fields(0).Value
    Mail = RSAllevatori.Fields(1).Value
    Quota = RSAllevatori.Fields(2).Value

    sReportName = "Estratto_conto"
    sPDFName = "Estratto conto.pdf"
    sPDFPath = "c:\Estratto_Conto\"
    NomeFile = sPDFPath & sPDFName
    DoCmd.OutputTo acOutputReport, sReportName, acFormatPDF, NomeFile
' dovrei quindi stampare il file pdf che ho creato nella variabile Nomefile e il file presente su hard disk che è definito nella variabile Quota
    RSAllevatori.MoveNext
Loop

Quindi per ogni record presente nella query "estratto_conto_riepilogo" devo stampare 2 file (il percorso ed il nome dei file sono presenti nelle 2 variabili Nomefile e Quote
Grazie ancora.


title: Inviare file pdf alla stampante

author: RobertoA

text:

Supponiamo di voler usare il metodo simile a quando da file manager
Windows si 'dragga' il file pdf (o xls o doc o altro file conosciuto da
Windows) e lo si 'droppa' sopra la schermata che si apre andando su
Stampanti/NomeStampante  e doppio click
Credo sia il sistema piu' astruso che esista per stampare
Ma fa niente, e' per imparare qualcosa di nuovo
E' una semplice copia di file come da sistema operativo, oppure e'
un'operazione diversa?


title: Inviare file pdf alla stampante

author: BFS

text:
Il 27/02/2018 10:22, Fabio Fucci ha scritto:

chiaramente il codice non l'hai scritto tu
anyway

>
>      sReportName = "Estratto_conto"

DoCmd.OpenReport sReportName

>      sPDFName = "Estratto conto.pdf"
>      sPDFPath = "c:\Estratto_Conto\"
>      NomeFile = sPDFPath & sPDFName

ciao
BFS


title: Inviare file pdf alla stampante

text:

Scusami ma che significa che il codice non l'ho scritto io.....
E poi mi serve sapere come stampare un file PDF presente su hard disk e non stampare un report.
Grazie ancora


title: Inviare file pdf alla stampante

text:

il tuo codice prende un report, lo converte in pdf e lo salva sul disco
se devi anche stamparlo che senso ha stampare il pdf e non il report da
cui deriva?
Forse ci sono terze applicazioni che modificano in qualche modo il pdf
prima che tu lo stampi da renderlo differente dal relativo report?

forse non  hai esposto bene la tua esigenza


title: Inviare file pdf alla stampante

text:
Il 27/02/2018 10:59, Fabio Fucci ha scritto:

se hai acrobat nel pc e vuoi per forza stampare il pdf

Sub one()
print_pdf ("percorsofilechevuoistampare")

End Sub

Sub print_pdf(XsomeFile As String)
     DoEvents
     Shell "C:\Program Files (x86)\Adobe\Acrobat Reader
DC\Reader\AcroRd32.exe /p /h " & XsomeFile, vbHide
End Sub

adatta ovviamente il percorso di acrord32.exe ed eventuali opzioni di
riga di comando

ciao
BFS


title: Inviare file pdf alla stampante

text:

L'ha esposta al mellio possibbole
Vuole mandare in stampa dei pdf
E mi sembra gia' esauriente come descrizione
Per quanto mi riguarda proverei con
-----------------------------------------
Private Declare Function ShellExecute Lib "shell32.dll" Alias
"ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation As String,
ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory
As String, ByVal nShowCmd As Long) As Long

Dim lRet As Long
lRet = ShellExecute(0&, "Print", nome_completo_file, vbNullString,
vbNullString, 1)
-----------------------------------------

Ci facci sapere


title: Inviare file pdf alla stampante

text:

Perfetto!!!!!!!
Va benissimo.
Grazie ancora.


title: Inviare file pdf alla stampante

author: Bruno Campanini

text:
BFS pretended :

> se hai acrobat nel pc e vuoi per forza stampare il pdf
>
> Sub one()
> print_pdf ("percorsofilechevuoistampare")
>
> End Sub
>
> Sub print_pdf(XsomeFile As String)
>      DoEvents
>      Shell "C:\Program Files (x86)\Adobe\Acrobat Reader
> DC\Reader\AcroRd32.exe /p /h " & XsomeFile, vbHide
> End Sub
>
> adatta ovviamente il percorso di acrord32.exe ed eventuali opzioni di riga di
> comando

Troppo semplice!
La semplicità si vende solo ai poveri di spirito.

Bruno


title: Inviare file pdf alla stampante

text:
Il giorno martedì 27 febbraio 2018 10:22:44 UTC+1, Fabio Fucci ha scritto:

> DoCmd.OutputTo acOutputReport, sReportName, acFormatPDF, NomeFile

Scusate se mi intrometto

servirebbe anche a me generare pdf da codice, purtroppo uso ancora office 97 (perché è l'unico legale, perché l'azienda usa ancora XP ecc. ecc.) e la sintassi "acFormatPDF" non funziona ("variabile non definita").

Quindi adesso risolvo con un accrocco stampando su una stampante virtuale (PDFCreator).

Che voi sappiate, si potrebbe in qualche modo aggiungere qualche libreria a Access97, in modo che venga aggiunta la variabile acFormatPDF?


title: Inviare file pdf alla stampante

text:

Ci sono le "mitiche" dll di lebans che funzionano alla meraviglia
vedi qui

http://www.lebans.com/reporttopdf.htm

su Access 97 mai testate

ciao
BFS


title: Inviare file pdf alla stampante

text:
Il giorno giovedì 1 marzo 2018 17:07:58 UTC+1,
anacleto...@gmail.com
 ha scritto:

> Che voi sappiate, si potrebbe in qualche modo aggiungere qualche libreria
> a Access97, in modo che venga aggiunta la variabile acFormatPDF?

Mi rispondo da solo, pare che acFormatPDF sia stato introdotto da Access 2007 in poi.

da Access 2007 come add-in
da Access 2010 come built-in


title: HTML Help Workshop

author: Rob

text:
Tempo addietro chiesi se esiste qualche manualetto che spieghi qualche
cosuccia su come io possa utilizzare qualche funzione di 'sto programma per
creare qualche Help in linea per la mia applicazione.
Qualcuno ha capito qualcosa?
L'help del programma è in inglese: troppo sforzo mentale! tradurre mentre
leggo  mi ruba troppi cicli di processore!
Rob


title: HTML Help Workshop

author: Roberto dal portatile

text:
"Rob" <dg.rob"NOSPAM"@
tiscalinet.it
> ha scritto nel messaggio
news:90ollp$aav$1...@lacerta.tiscalinet.it...

Prova anche a dare uno sguardo sul Sito Comune, Sezione FAQ, "Interfacciare
i file help, creati co HTML help workshop, con le forms di MSAcces" di
Calogero Di Lorenzo.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------


title: HTML Help Workshop

author: oliones

text:
Rob <dg.rob"NOSPAM"@
tiscalinet.it
> wrote in message
90ollp$aav$1...@lacerta.tiscalinet.it...
> Tempo addietro chiesi se esiste qualche manualetto che spieghi qualche
> cosuccia su come io possa utilizzare qualche funzione di 'sto programma
per
> creare qualche Help in linea per la mia applicazione.
> Qualcuno ha capito qualcosa?
> L'help del programma č in inglese: troppo sforzo mentale! tradurre mentre
> leggo  mi ruba troppi cicli di processore!
>
> Rob
>
>
se trovi un manuale fammi sapere


title: HTML Help Workshop

author: Giuseppe

text:
"Rob" <dg.rob"NOSPAM"@
tiscalinet.it
> ha scritto nel messaggio
news:90ollp$aav$1...@lacerta.tiscalinet.it...
> Tempo addietro chiesi se esiste qualche manualetto che spieghi qualche
> cosuccia su come io possa utilizzare qualche funzione di 'sto programma
per
> creare qualche Help in linea per la mia applicazione.
> Qualcuno ha capito qualcosa?
> L'help del programma è in inglese: troppo sforzo mentale! tradurre mentre
> leggo  mi ruba troppi cicli di processore!
>
> Rob
>
>
dalla ricerca da me effettuata ho trovato in internet un testo scritto in
inglese ma il italiano nulla
giuseppe


title: Tipo dati timestamp in MYQL e ACCESS

author: Frank Adim Costa

text:
Ho un archivio in MySQL con alcue date salvate in fomato INT(10),
presumo che siano di tipo TIMESTAMP. Qual'e' il tipo corrispondente in
access ? O meglio con quale funzioni posso convertire da / a data ?
Date serial ?


title: Tipo dati timestamp in MYQL e ACCESS

author: MA

text:

          Prova a mettere now() nel valore predefinito di un campo con formato data:
evita di chiamare "data" il campo, è una parola riservata e Access a volte
si comporta come le formiche di Gino e Michele
MAssimiliano
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Tipo dati timestamp in MYQL e ACCESS

text:
m...@accessgroup.it
 (MA) wrote:
>                    Il 18 Ago 2004, 10:37, Frank Adim Costa <
fr...@dadoservice.it
> ha scritto:
>> Ho un archivio in MySQL con alcue date salvate in fomato INT(10),
>> presumo che siano di tipo TIMESTAMP. Qual'e' il tipo corrispondente in
>> access ? O meglio con quale funzioni posso convertire da / a data ?
>> Date serial ?
>>
>
Mi sono spiegato male. Il problema non è settare now() (Ci pensa il
server MySQL con TIMESTAMP)
iI problema è che ho eredidatato un database MySQL gestito via Web con
PHP che memorizzava le date in formato INT(10) e INT(11). Andando a
vedere il codice PHP ho visto che usa istruzioni che gestiscono la
data come timestamp. (presumo come data numerica).
Ma access come puo' leggere tali valori ?
GRAZIE


title: query

author: italo palanza

text:
come posso fare che in una query riesco a prendere solo il mese di una
data x fare una ricerca?!?
uso datepart ?!?


title: query

author: Alessandro Baraldi

text:
italo palanza ha scritto:
> come posso fare che in una query riesco a prendere solo il mese di una
> data x fare una ricerca?!?
>
> uso datepart ?!?
L'italiano lascia molto a desiderare......nella richiesta.
Mese:Month(TuaData)
@Alex


title: creare tabella da un'altra che contiene decimali.

author: Valerio

text:
Avendo l'esigenza di memorizzare dei dati espressi in euro, ho creato una
tabella con il campo euro che contiene  le proprietà seguenti:
dimensione campo ---> precisione doppia
formato                 ---> standard
posizioni decimali  ----> 2
Fino a qui all'atto dell'inserimento funziona tutto bene, ma se decido di
creare una tabella di appoggio con l'istruzione "SELECT INTO......", la
tabella di destinazione non riporta nel campo euro le proprietà di quella di
origine, mettendomi la proprieta posizioni decimali impostate in
automatiche.
Ringrazio in anticipo chi può darmi un aiuto.
Valerio


author: Sergio MAZZA

text:
"Valerio" <
valeri...@fsmrt.nettuno.it
> ha scritto nel messaggio
news:8s17t6$7q6$1...@pinco.nettuno.it...

Dovresti "trasformare" il euro con la funzione CDbl()...
Ciao.


text:
Forse non mi sono spiegato bene, ma il problema è che se vuoi avere una
struttura di una tabella con campi decimali ben definiti, l'istruzione
"Select into" non ti crea una corrispondente tabella   con le posizioni dei
decimali definiti, bensì ti riporta il criterio "automatiche".
Grazie
   Valerio



text:
"Valerio" <
valeri...@fsmrt.nettuno.it
> ha scritto nel messaggio
news:8s1euo$a1d$1...@pinco.nettuno.it...
> Forse non mi sono spiegato bene, ma il problema è che se vuoi avere una
> struttura di una tabella con campi decimali ben definiti, l'istruzione
> "Select into" non ti crea una corrispondente tabella   con le posizioni
dei
> decimali definiti, bensì ti riporta il criterio "automatiche".
> Grazie
>
>
Non sono sicuro (mai fatto) ma credo che dovresti mettere mano al VBA per
modificare le proprietà della formattazione dei campi; sempre se ho capito
cosa ti serve...
Ciao.


author: Paolo A.

text:
Valerio wrote:
> Forse non mi sono spiegato bene, ma il problema è che se vuoi avere una
> struttura di una tabella con campi decimali ben definiti, l'istruzione
> "Select into" non ti crea una corrispondente tabella   con le posizioni dei
> decimali definiti, bensì ti riporta il criterio "automatiche".
> Grazie
>    Valerio
>
prova con questa routine, a me funziona.
le proprietà DecimalPlaces, Format, ed altre, non vengono impostate
dall'istruzione SQL, in quanto, credo non fanno parte di quelle proprietà
'fisse' dell'oggetto field;
infatti bisogna intervenire nell'insieme Proprieties del campo e crearle.
Sub CreaTabella(ByVal TabOrigine As String, ByVal TabDestinazione As String)
'dato il nome della tabella di origine ne crea una uguale di destinazione
    Dim DBS As Database
    Dim Tdef_Dest As TableDef, Tdef_Orig As TableDef
    Dim Fld_Orig As Field, Fld_Dest As Field
    Dim P_Dest As Property, P_Orig As Property
    Dim Criterio As String, x As Integer, y As Integer
    Set DBS = CurrentDb
    Criterio = "SELECT * INTO " & TabDestinazione & " FROM " & TabOrigine
    DBS.Execute Criterio
    ' setta le definizioni per le tabelle di origine e di destinazione
    Set Tdef_Orig = DBS.TableDefs(TabOrigine)
    Set Tdef_Dest = DBS.TableDefs(TabDestinazione)
    'ciclo su tutti i campi della tabella di origine
    For Each Fld In Tdef_Orig.Fields
        Set Fld_Dest = Tdef_Dest.Fields(Fld.Name)
        ' ciclo su tutte le proprietà del campo della tabella di origine
        For x = 0 To Fld.Properties.Count - 1
            Set P_Orig = Fld.Properties(x)
            ' cerca se la proprietà è già presente tra le proprietà del campo
di destinazione
            For y = 0 To Fld_Dest.Properties.Count - 1
                If P_Orig.Name = Fld_Dest.Properties(y).Name Then
                    Exit For
                End If
            Next y
            If y > Fld_Dest.Properties.Count - 1 Then
                ' se non trova la proprietà la crea
                Set P_Dest = Fld_Dest.CreateProperty(P_Orig.Name, P_Orig.Type,
P_Orig.Value)
                Fld_Dest.Properties.Append P_Dest
            End If
         Next x
    Next Fld
    Set Tdef_Orig = Nothing
    Set Tdef_Dest = Nothing
    Set DBS = Nothing
End Sub


text:
"Paolo A." wrote:
nella routinedi prima, riadattandola, ho fatto un errore, così dovrebbe esssere
giusta:
>     Dim DBS As Database
>     Dim Tdef_Dest As TableDef, Tdef_Orig As TableDef
>     Dim Fld_Orig As Field, Fld_Dest As Field
>     Dim P_Dest As Property, P_Orig As Property
>     Dim Criterio As String, x As Integer, y As Integer
>
>     Set DBS = CurrentDb
>     Criterio = "SELECT * INTO " & TabDestinazione & " FROM " & TabOrigine
>     DBS.Execute Criterio
>     ' setta le definizioni per le tabelle di origine e di destinazione
>     Set Tdef_Orig = DBS.TableDefs(TabOrigine)
>     Set Tdef_Dest = DBS.TableDefs(TabDestinazione)
>     'ciclo su tutti i campi della tabella di origine
>     For Each Fld_Orig In Tdef_Orig.Fields
>         Set Fld_Dest = Tdef_Dest.Fields(Fld.Name)
>         ' ciclo su tutte le proprietà del campo della tabella di origine
>         For x = 0 To Fld_Orig.Properties.Count - 1
>             Set P_Orig = Fld_Orig.Properties(x)



title: Perchè non mi riconosce il tipo FIELD?

author: FrIGOR

text:
Inserisco questo codice copiato dall'help sull'evento onclick di un pulsante
...
    Dim dbs As Database, tdf As TableDef, fld As Field
    ' Restituisce il riferimento al database corrente.
    Set dbs = CurrentDb
    ' Crea il nuovo oggetto TableDef.
    Set tdf = dbs.CreateTableDef("Contatti")
    ' Crea il nuovo oggetto Field.
    Set fld = tdf.CreateField("NomeContatto", dbText, 30)  <<<<<<<<<<<<  si
ferma qui!
    ' Accoda i nuovi oggetti.
    tdf.Fields.Append fld
    dbs.TableDefs.Append tdf
    Set dbs = Nothing
Si blocca dove ho indicato dando l'errore: Tipo non corrispondente.
Perchč?
Grazie per l'aiuto
Frigor


title: Perchè non mi riconosce il tipo FIELD?

author: Federico Luciani

text:
FrIGOR wrote:
> Inserisco questo codice copiato dall'help sull'evento onclick di un pulsante
>
>     Dim dbs As Database, tdf As TableDef, fld As Field
>     ' Restituisce il riferimento al database corrente.
>     Set dbs = CurrentDb
>     ' Crea il nuovo oggetto TableDef.
>     Set tdf = dbs.CreateTableDef("Contatti")
>     ' Crea il nuovo oggetto Field.
>     Set fld = tdf.CreateField("NomeContatto", dbText, 30)  <<<<<<<<<<<<  si
> ferma qui!
>     ' Accoda i nuovi oggetti.
>     tdf.Fields.Append fld
>     dbs.TableDefs.Append tdf
>     Set dbs = Nothing
>
> Si blocca dove ho indicato dando l'errore: Tipo non corrispondente.
> Perchč?
> Grazie per l'aiuto
> Frigor
strano, il codice e' corretto.
che versione di Access usi?
--
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------


title: Perchè non mi riconosce il tipo FIELD?

text:
 > Inserisco questo codice copiato dall'help sull'evento onclick di un
pulsante
> >
> >     Dim dbs As Database, tdf As TableDef, fld As Field
> >     ' Restituisce il riferimento al database corrente.
> >     Set dbs = CurrentDb
> >     ' Crea il nuovo oggetto TableDef.
> >     Set tdf = dbs.CreateTableDef("Contatti")
> >     ' Crea il nuovo oggetto Field.
> >     Set fld = tdf.CreateField("NomeContatto", dbText, 30)  <<<<<<<<<<<<
si
> > ferma qui!
> >     ' Accoda i nuovi oggetti.
> >     tdf.Fields.Append fld
> >     dbs.TableDefs.Append tdf
> >     Set dbs = Nothing
> >
> > Si blocca dove ho indicato dando l'errore: Tipo non corrispondente.
> > Perchč?
> > Grazie per l'aiuto
> > Frigor
>
> strano, il codice e' corretto.
> che versione di Access usi?
>
> --
> Federico
Access 2000 (9.0.2812)


title: Perchè non mi riconosce il tipo FIELD?

author: Frigor

text:
Ho risolto il problema da solo in questo modo:
Ho aumentato la priorità del riferimento DAO3.6 nella tabella dei
riferimenti.
Sono felice!
Frigor


title: Perchè non mi riconosce il tipo FIELD?

text:

Perfetto.



title: cambiare l'aspetto delle txtbox in corsa ?

author: bc

text:
Posto il quesito per la seconda volta  perchè la prima mi sono evidentemente
spiegato male.. e perchè dopo alcuni giorni era divenuto pressocchè
introvabile .
Scusate ancora l'nsistenza
Tento, quindi,  di rispiegare (scusate se sono contorto..)
.. in una form ho diverse txtbox .
le txtbox sono bloccate da codice per evitare l'immissione o la modifica dei
dati collegati.
Con un pulsante vorrei ' trasformare" le suddette txtbox in caselle
combinate perchè i dati da immettere sono delle tabelle che ho già ( p. es.
l'elenco dei comuni italiani , l'elenco dei medici di famiglia...)
perciò:  una form che da codice, quando ho dati da consultare mi mostra
txtbox, e quando devo immettere dati (sempre da codice) mi fa vedere caselle
combinate che sono agganciate a tbl già possedute ...
Ho provato a fare delle repliche: per ogni txtbox ho creato una casella
combinata con lo stesso campo collegato e mostro una o l'altra a seconda del
momento...
E' possibile invece evitare tutti quasti controlli e modificarne SOLO
l'aspetto?
grazie


author: Lbo da casa

text:
>Posto il quesito per la seconda volta  perchè la prima mi sono evidentemente
>spiegato male.. e perchè dopo alcuni giorni era divenuto pressocchè
>introvabile .
leggi i newsgroup con outlook?  no freeagent?
ahiahiahiahiahiahiahiahi....
>Con un pulsante vorrei ' trasformare" le suddette txtbox in caselle
>combinate perchè i dati da immettere sono delle tabelle che ho già ( p. es.
>l'elenco dei comuni italiani , l'elenco dei medici di famiglia...)
locka le combo.
--
non studio non lavoro non guardo la tv
non vado al cinema non faccio sport
----------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access


text:
"Lbo da casa " <
l...@NOSPAM.blunet.it
> ha scritto nel messaggio
news:39df56ef...@news.interbusiness.it...

Scusate ancora ...se ho iniziato a scrivere in questo ng è stato perchè ho
sempre trovato gente competente alla quale ho chiesto, ed in tutta umiltà ho
ricevuto aiuto che è stato per me, dilettante , preziosissimo.
Se ho posto questo problema, è perchè nella mia incompetenza, per me è
grande.
Per favore... se usate il ng solo per fare sfoggio della vs preparazione o
per dare risposte modello sibilla cumana, per favore ...astenetevi dal dare
risposte.
Non voglio la ' pappa scodellata e pronta' ma neanche risposte del
genere...............................................


text:
>Per favore... se usate il ng solo per fare sfoggio della vs preparazione o
>per dare risposte modello sibilla cumana, per favore ...astenetevi dal dare
>risposte.
senti fratello, se io faccio una certa fatica a darti uan risposta
come quella che ho dato al tuo primo mex, e poi vedo che tu dici "ah,
non riesco a trovare il mio mex e le risposte" (cazzo, un mex di
quache giorno fa!  ma dove vuoi che sia?), la mia prima reazione č di
dire "ma guarda questo il tempo che mi ha fatto perdere, chiede le
cose, uno gli risponde, e poi si perde i mex", ma me la tengo per me.
la seconda č quella di buttarla in battuta e consigliarti di usare un
lettore di newsgroup che ti semplifichi la vita, ad esempio freeagent
e non outlook che siccome te lo sei trovato nel piccě allora per te
non esiste altro.
secondo: tu parli di combo, vuoi fare certe operazioni non banali.
bene, mi aspetto che del tutto coglione e impreparato tu non sia,
sennň questo tipo di problemi non te li saresti posti.  tu mi dici che
ti ho sopravvalutato?  dai, non buttarti giů da solo.
ti ho sentito parlare di rendere visibili e non visibili le combo e le
textbox, bene, vuol dire che la cazzo di tabella delle proprietŕ dei
controlli di una maschera l'avrai aperta un paio di volte no?  c'č la
proprietŕ visibile, ce ne saranno altre che ti possono interessare...
l'help l'avrai consultato un altro paio di volte, no?  non ti viene in
mente che lock vuol dire blocca?  ok, ma se cerchi sull'help lock,
invece di scrivere messaggi vittimisti, vedrai che risolvi molto
prima.
>Non voglio la ' pappa scodellata e pronta' ma neanche risposte del
>genere...............................................
avrei fatto meglio a non risponderti?  lo terrň da conto per i tuoi
prossimi messaggi.
un'altra cosa visto che sei un principiante (niente di male, tutti lo
siamo stati - sai, con i vittimisti bisogna sempre andarci cauti,
anche se io li manderebbe a quer paese subito tutti).  quando si
risponde ad un messaggio conviene tagliare le parti di testo non
indispensabili.
lo so che per voi giovincelli che conoscono solo i modem da 56.7k
trasmettere 2 byte o trasmettere 200k č la stessa identica cosa, ma
per i poveri vecchierelli come me che hanno cominciato con le bbs 1 ad
1, i modem a 300 e gli hd da 10 M non lo č...



text:
........................> per i poveri vecchierelli come me che hanno
cominciato con le bbs 1 ad
> 1, i modem a 300 e gli hd da 10 M non lo è...
----------------------------------------
...Scusa dello sfogo..(forse ho esagerato..)
Però, ti garantisco:
.non sono poi tanto giovincello (è che faccio un altro mestiere  ed il
computer  è per me il sistema di semplificare alcune cose e con il tempo è
divenuta una passione..)
. non conosco altri lettori di news perchè fin adesso ho sempre usato il
vecchio Outlook (forse per pigrizia o perchè non è che mi interessasse tanto
il come si legge ), però accetto ogni suggerimento...
. non è che mi butti giù, è che avendo fatto tutto nel modo sbagliato( cioè
non studiando programmazione in modo sistematico), mi trovo poi adesso nella
sgradevole sensazione di fare qualcosa con l'impressione di aver scordato
qualche elemento...
.quello che cerco di fare è di cambiare n textbox in una form in altrettante
caselle combinate (da programma) per permettermi alternativamente  la
consultazione dei dati (txtbox lockate) o l'inserimento degli stessi.
.........l'ho già fatto, però duplicando tutte le txtbox in altrettante
caselle comb. e  utilizzando pagine di codice per  renderle visibili o
nascoste  a seconda del momento.
Cercavo solo un sistema alternativo, più elegante e più semplice.
scusa ancora se ho esagerato .......


author: Silvio Berruti

text:
"Lbo da casa " <
l...@NOSPAM.blunet.it
> ha scritto nel messaggio
news:39e0bedf...@news.interbusiness.it...
... MegaCut...
> lo so che per voi giovincelli che conoscono solo i modem da 56.7k
> trasmettere 2 byte o trasmettere 200k è la stessa identica cosa, ma
> per i poveri vecchierelli come me che hanno cominciato con le bbs 1 ad
> 1, i modem a 300 e gli hd da 10 M non lo è...
Ah! Ma allora ne abbiamo di esperienze in comune... ;-)
Ciao
--
Silvio



text:
>.quello che cerco di fare è di cambiare n textbox in una form in altrettante
>caselle combinate (da programma) per permettermi alternativamente  la
>consultazione dei dati (txtbox lockate) o l'inserimento degli stessi.
ma allora, se blocchi le combo, ottieni lo stesso identico risultato
che vuoi ottenere con le textbox, solo che vedi ancora la freccetta
verso il basso sulla destra della combo.
se questo non è un problema ti basta semplicemente lockare la combo:
non ci scrivi e non la scrolli.
se è un problema, potresti rendere visibile o meno un rettangolo dello
stesso colore della maschera che si sovrapponga paro paro alla
freccia.  certo, suona proprio come una pecionata (e neanche so se
funziona perché quando il focus torna alla combo magari la freccetta
torna visibile), ma meglio gestire il visibile/nonvisibile di un
controllo (il rettangolo) che non di due controlli sovrapposti (txtbox
e combo).
--
non studio non lavoro non guardo la tv
non vado al cinema non faccio sport
----------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access


text:
>> 1, i modem a 300 e gli hd da 10 M non lo č...
>
>Ah! Ma allora ne abbiamo di esperienze in comune... ;-)
hd da 10 mega *esterni*, vero?  :-)



author: Lorenzo Coronati

text:
Scrisse
l...@NOSPAM.blunet.it
 (Lbo da casa ):
>hd da 10 mega *esterni*, vero?  :-)
mfm o rle?
:-))
--
Lorenzo Coronati
--
<<Si perché forse Ilbo (ed altri come lui) sono
convinti che noi poveri principianti (nel senso
ironico) scrivano le domande senza pensare.>>
(Ivan Lelli, 25/08/2000)
--
<<se il lavoro non me lo dai tu, me lo da
un'altro stronzo che non capisce una sega
di access e di informatica in generale>>
(Ivan dal lavoro, 30/09/2000)
--


text:
>>hd da 10 mega *esterni*, vero?  :-)
>
>mfm o rle?
mfm e se quando li formattavi li tenevi in verticale, poi in
orizzontale non funzionavano...



text:
"Lbo da casa " <
l...@NOSPAM.blunet.it
> ha scritto nel messaggio
news:39e1b46a...@news.interbusiness.it...
> >> 1, i modem a 300 e gli hd da 10 M non lo č...
> >
> >Ah! Ma allora ne abbiamo di esperienze in comune... ;-)
>
> hd da 10 mega *esterni*, vero?  :-)
> --
No solo interni, ma prima doppio floppy da 360K, cassette (sě proprio su
PC), 128 K di ram ...
--
Silvio



text:
"Lbo da casa " <
l...@NOSPAM.blunet.it
> ha scritto nel messaggio
news:39e332d1...@news.interbusiness.it...
> >>hd da 10 mega *esterni*, vero?  :-)
> >
> >mfm o rle?
>
> mfm e se quando li formattavi li tenevi in verticale, poi in
> orizzontale non funzionavano...
anzi, se provavi a metterli orizzontali ma ribaltandoli non funzionavano ed
emettevano strani rumori



title: ricerche

text:
Aiutatemi per favore,
sto cercando di fare una serie di statistiche da un database fatto con
access97.
Il problema è che mi sono imbattuto nella ricerca di date di nascita e
devo sapere il numero di persone di una serie di fasce di età.
Premettendo che il campo è fatto gg/mm/aaaa come posso fare?
Vi ringrazio
Enzo
-------------------------------------------------------
Messaggio inviato da
http://www.sandlab.org/newsgroup/
Accesso gratuito via web ai Newsgroup


title: ricerche

author: Roberto da casa

text:
"neho34" <
vincenz...@tin.it
> ha scritto nel messaggio
news:9sj81t$14078t$1...@ID-85028.news.dfncis.de...
> Aiutatemi per favore,
> sto cercando di fare una serie di statistiche da un database fatto con
> access97.
> Il problema è che mi sono imbattuto nella ricerca di date di nascita e
> devo sapere il numero di persone di una serie di fasce di età.
> Premettendo che il campo è fatto gg/mm/aaaa come posso fare?
> Vi ringrazio
> Enzo
>
E quale e dove è il tuo problema?
Come effettui la ricerca (query o filtri di maschere e/o report)?
I parametri della ricerca come vuoi immetterli?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: ricerche

author: bande

text:
"neho34" <
vincenz...@tin.it
> ha scritto nel messaggio
news:9sj81t$14078t$1...@ID-85028.news.dfncis.de...
> Aiutatemi per favore,
> sto cercando di fare una serie di statistiche da un database fatto con
> access97.
> Il problema è che mi sono imbattuto nella ricerca di date di nascita e
> devo sapere il numero di persone di una serie di fasce di età.
> Premettendo che il campo è fatto gg/mm/aaaa come posso fare?
> Vi ringrazio
> Enzo
>
Per calcolare l'eta' puoi utilizzare la funzione sul Sito Comune di Federico
Luciani:
Public Function Eta(DataNascita As Date)
   Dim varEta As Variant
   varEta = DateDiff("yyyy", DataNascita, Now)
   If Date < DateSerial(Year(Now), Month(DataNascita), Day(DataNascita))
Then
       varEta = varEta - 1
   End If
   Eta = varEta
End Function
Per quanto riguarda le fasce di eta', devi considerare l'ampiezza della
fascia (5 anni, 10 anni etc..) e dividere l'eta' per la fascia.
Vediamo: consideriamo l'ampiezza della fascia in 5 anni.
Supponiamo di avere una tabella persone che chiamiamo Tabella1 in cui per
semplicita' considero solo i campi:
IDPersona     testo    chiave primaria
datanascita   data/Ora formato gg/mm/aaaa
Esempio contenuto tabella:
IDPersona   datanascita
bbb         01/01/1971
ccc         02/05/1974
ddd         03/04/1965
dfdgd       04/08/1965
dfdndsd     21/07/1960
eee         14/01/1960
Creo la query QryFasceEta:
SELECT Tabella1.IDPersona, eta([Tabella1]![datanascita])\5 AS FasciaEta
FROM Tabella1;
ed ottieni
IDPersona FasciaEta
bbb             6
ccc             5
ddd             7
dfdgd           7
dfdndsd         8
eee             8
Adesso puoi calcolare le percentuali con la query di raggruppamento
QryPercFasce:
SELECT Count(*)/DCount("*","QryFasceEta") AS percentuale, [FasciaEta]*5 &
" - " & ([FasciaEta]+1)*5 & " anni" AS fascia
FROM QryFasceEta
GROUP BY QryFasceEta.FasciaEta
ORDER BY [FasciaEta]*5 & " - " & ([FasciaEta]+1)*5 & " anni";
Se nella query nella proprieta' formato del campo percentuale selezioni
percentuale ottieni:
percentuale fascia
16,67%     25 - 30 anni
16,67%     30 - 35 anni
33,33%     35 - 40 anni
33,33%     40 - 45 anni
Ciao
--
Andrea


title: Access e Excel

text:
Ho bisogno di recuperare da codice in programma in access o vb il numero
della riga in un dato momento selezionata in un foglio excel.
Grazie come sempre, Bobbit


title: Access e Excel

author: Giovanni Albertone

text:
On Thu, 03 Aug 2000 15:03:35 GMT, "bobbit_barton"
<
bobbit...@wappi.com
> wrote:
>Ho bisogno di recuperare da codice in programma in access o vb il numero
>della riga in un dato momento selezionata in un foglio excel.
Una volta che la tua applicazione Excel e' collegata, sa normalmente
la proprieta' Selection.Row per avere il numero di riga della prima
riga nell'area selezionata in quel momento.
Ciao,
Giovanni
---
Inferno e paradiso mi sembrano sproporzionati. Le azioni degli
uomini non meritano tanto - JLBorges


title: Access e Excel

text: provo! Grazie


title: Access e Excel

text:
Scivendo una macro in visual basic, come faccio a proteggerne il codice?
Ciao Bobbit
"Giovanni Albertone" <
giovanni_...@hotmail.com
> ha scritto nel
messaggio news:v83josc2m76gp92q0...@4ax.com...



title: option explicit non indicata

author: ciroteo

text:
Ciao a tutti, da oggi sto mettendo le mani su un programma fatto da
terzi ovviamente in access.
Mio compito è proseguire nello sviluppo e migliorare le cose rimaste
incompiute.
Mi si presenta subito questo scenario: in nessuna parte
dell'applicazione vi è la dichiarazione obbligatoria delle variabili,
la famosa option explicit.
Nessuna variabile quindi è dichiarata come tipo, questa cosa mi
disorienta un po'.
Cosa comporta questo fatto? Potrei renderle obbligatorie e pian piano
inserirle, ma al momento non ho la minima idea di quante variabili
siano state utilizzate, non vorrei fare un lavoro da certosino per
scoprire poi che è stato inutile.
Se andassi avanti con questo sistema a quali rischi potrei andare
incontro?
M


title: option explicit non indicata

author: Massimo Piubelli

text:

Vuoi un consiglio, mettila...
piano piano magari un modulo alla volta...
Ma i problemi a cui può andare in contro l'applicazione sono i classici di dichiarazione mancata di variabile, per cui lui si crea un'altra var con il nome sbalgiato.
tipo tu fai
pippo = 145
poi
x = 567 / pipo
e track... una bella division by zero ;-)
> M
M pure io ^__^


title: option explicit non indicata

text:
On 20 Nov, 16:37, "Massimo Piubelli"
<massimo_to...@accessgroup.it.invalid> wrote:
> ciroteo wrote:
> > Ciao a tutti, da oggi sto mettendo le mani su un programma fatto da
> > terzi ovviamente in access.
> > Mio compito è proseguire nello sviluppo e migliorare le cose rimaste
> > incompiute.
> > Mi si presenta subito questo scenario: in nessuna parte
> > dell'applicazione vi è la dichiarazione obbligatoria delle variabili,
> > la famosa option explicit.
> > Nessuna variabile quindi è dichiarata come tipo, questa cosa mi
> > disorienta un po'.
> > Cosa comporta questo fatto? Potrei renderle obbligatorie e pian piano
> > inserirle, ma al momento non ho la minima idea di quante variabili
> > siano state utilizzate, non vorrei fare un lavoro da certosino per
> > scoprire poi che è stato inutile.
> > Se andassi avanti con questo sistema a quali rischi potrei andare
> > incontro?Vuoi un consiglio, mettila...
> piano piano magari un modulo alla volta...
>
> Ma i problemi a cui può andare in contro l'applicazione sono i classici di dichiarazione mancata di variabile, per cui lui si crea un'altra var con il nome sbalgiato.
> tipo tu fai
> pippo = 145
> poi
> x = 567 / pipo
> e track... una bella division by zero ;-)
>
> > MM pure io ^__^
eccolo chi ha esperienza di rimaneggiamenti ...
più vado avanti più vengon fuori magagne! ho già mal di testa.
:-(


title: option explicit non indicata

text:
- NOVITA'!
E' uscito 'Disco Arcano' di cui è possibile l'ascolto in streaming od
il download, cliccando qui:
http://tinyurl.com/t7wrh
- PRESENTAZIONE
Ciao, io sono lo SPAMMER ARCANO (uso un nome d'arte, non perché mi
vergogno, ma perché non voglio che si pensi che io sia un
esibizionista) di 37 anni a Follonica(GR) in via del Cassarello 131.
Vieni a pormi i tuoi quesiti/dubbi/pareri/commenti a:
http://tinyurl.com/y48fw4
- APPROFONDIMENTO ALLA PRESENTAZIONE
E' finita definitivamente la fase in cui parlavo a senso unico. Ora
rispondo solo alle domande  che mi vengono poste a:
http://tinyurl.com/y48fw4
 . Tuttavia, se ritenete giusto non venire su
tale sito a rivolgermi quesiti, credendo che ciò mi dia soddisfazione,
a me non importerà UNA SEGA, dato che io spammerò uguale godendoci
come un maiale alla faccia vostra e di FabMind (nick su Usenet di
Fabrizio Mindoli - Lungarno Gambacorti, 57 - Pisa).
Per fornirvi eventuali spunti per potenziali vostre domande, stilerò
sotto un breve elenco di brevi affermazioni dello SPAMMER ARCANO:
- L'uomo non ha alcun diritto (diritto al lavoro, alla vita, alla
famiglia, alla casa, alla pensione, ecc.);
- Nel Mondo non devono esserci regole e/o leggi;
- Quelli che pensano che le tasse servano a tutti sono degli imbecilli
ROSSI;
- Quelli che lottano per l'uguaglianza sociale sono dei gosti invidiosi
ROSSI;
- I pacifisti sono dei burattini senza cervello ROSSI;
- I soldi servono solo ai poveri dentro;
- La scuola (e l'istruzione in generale) serve solo a chi non ha
abbastanza cervello per imparare le cose da sè;
- Il lavoro non serve ad un CAZZO, a differenza di quello che credono i
burattini ROSSI;
- Io compro sempre dai cinesi e vado in CULO a tutti i
commercianti/produttori ladri (non me ne frega un CAZZO se tolgo lavoro
ai commercianti/produttori nazionali facendo del male all'economia del
Paese);
- Chi crede che per vivere degnamente servano più di 300 euro al mese,
non capisce una SEGA;
- Meglio essere SEGAIOLI che schiavo del sesso e delle donne;
- Chi teme la solitudine è  un essere debole e privo di personalità;
- IMPORTANTE!!!
Ho notato con profondo dispiacere, che non si è compreso a fondo il
tipo di domande che mi si dovrebbero porre all'interno del sito, forse
gli autori credeno di prendermi per il CULO... Se così fosse sarebbero
molto ROSSI ed infantili...Purtroppo la maggior parte di esse sono
domande IDIOTE tanto per scrivere qualcosa, oppure immesse solo
credendo di mettermi in difficoltà, in modo che io non sappia
rispondere (dato che pensano che io mi demoralizzi). Forse leggendo
'Risposte a tutte le tue domande' ci sarà stato  chi si è sentito
inferiore a me, pensando che io mi credessi omnisciente. Le domande a
cui posso rispondere sono solo quelle che nascono su di me, o tese a
criticare o esprimere disaccordo con le affermazioni contenute
all'interno dei miei pensieri (vedi sopra, alla voce 'APPROFONDIMENTO
ALLA PRESENTAZIONE'), o che comunque siano tese a farmene chiarire il
significato.
Ne possono tuttavia nascere anche altre. Per esempio si potrebbe
ascoltare il telegiornale per poi chiedermi come io risolverei un dato
problema. Io ho la soluzione definitiva per ogni problema mondiale!
- ELENCO SPONSOR
* Non conosci ancora Joe Natta??? Allora corri a:
www.joenatta.com
 !
* Gustati le gioiose melodie del 'Cantautore alla bona'! Visita:
www.lellovitello.it
 !
* Opinioni di tutti su tutto:
http://www.what-about.it
 !
* Lo SPAMMER ARCANO ti indica la fantastica opportunità, di dare una
svolta alla tua vita! Affrettati a visitare:
http://www.akuma.splinder.com
* Ecco a voi, il sito dell'unico ed inimitabile 'Eddie Van Halen'
pisano:
http://vanhalen.altervista.org
* 'Bar Everest' - Via Bicocchi, 17 - Follonica(GR) - (Unico locale
pubblico dove è possibile incontrare  nella realtà lo SPAMMER ARCANO,
da Lunedì a Venerdì alle ore 11 circa. In mancanza di lui rivolgersi
alla barista (Elena) che ricopre la carica di segretaria personale
dello SPAMMER ARCANO).
* 'Laservideo' - Noleggio DVD 24 h - Via Salceta, 37 - Follonica(GR)
N.B. Per essere pubblicizzato GRATUITAMENTE dallo SPAMMER ARCANO,
comunicagli il tuo indirizzo web o reale, facendo riferimento a:
spammer_arcano.libero.it
- ANNUNCIO ARCANO
In Gennaio (la data è ancora da decidere) lo SPAMMER ARCANO si
troverà in quel di Firenze (precisamente sarà alle 9.30 a.m. alla
stazione di Santa Maria Novella).
Il meeting durerà 10 minuti (quindi non impedirà di programmare altre
attività o di interferire con altre già decise in passato). Io vado a
Firenze, poi se nasce qualcosa di interessante con gli altri, bene,
altrimenti io da fa' lo trovo anche da solo. Ci si trova, ci si guarda,
ci s'annusa e poi quelli che non si stanno sui COGLIONI a vicenda, si
avvicinano l'un l'altro e decidono cosa fa'. Ripeto che io cosa fa' lo
trovo anche se 'un c'è 'na sega da fa', perciò "a me m'importa" 'na
sega se sto sui COGLIONI a tutti.
Avrei immenso piacere che anche Fabrizio Mindoli (FabMind di Usenet) si
unisse all'eventuale gruppo che potrebbe formarsi.
Premetto di non avere alcuna intenzione di litigare o di provocarlo, in
modo da istigarlo a compiere atti di violenza su un disabile (quale
sono io) per poi denunciarlo.
Lo prenderei solo delicatamente per il culo per i suoi atteggiamenti
verso di me, mentre sono sicuro che lui non riuscirebbe a spiccicare
parola, al contrario di come si comporta spavaldamente su Usenet.
Ribadisco che avrei immenso piacere che anche Fabrizio Mindoli (FabMind
di Usenet) si unisse all'eventuale gruppo che potrebbe formarsi,
perché lui sia in grado di smentire pubblicamente queste mie
affermazioni.
Il Mindoli, molto probabilmente, rifiuterà questo gentile invito
adducendo che non ha la minima intenzione di incontrarsi con me, dato
che non vuole fare a botte (rischiando di essere denunciato),
nascondendo il suo timore di confrontarsi realmente (e non su Usenet
dove tutti possono fare i grossi e cattivi) con me.
(Resta sottinteso che non presentandosi dimostrerà di essere un
BIMBETTO SENZA PALLE).


title: option explicit non indicata

text:
cut
come si evince dall'indirizzo mail del gentile spammatore non sono io a
postare . non so come sia stato possibile l'invio di un messaggio di
tal genere dal mio profilo.
saluti matteo


title: option explicit non indicata

text:
ciroteo wrote:
> eccolo chi ha esperienza di rimaneggiamenti ...
che può sembrare cosa brutta...
> più vado avanti più vengon fuori magagne! ho già mal di testa.
ed è solo l'inizio...
ah, consiglio, tieni copia del db originale e base dati.
Giusto che poi... ti di cono "prima funzionava"
e
a) prima funzionava davvero
b) prima non funzionava e non avevano controllato bene ;-)
>
> :-(


title: option explicit non indicata

text:

non è stato inviato dal tuo profilo...
ha solo usato il "nome", ma l'email è fasulla/forse reale o cosa, comunque una segnalazioncina all'abuse di google male non gli fa.
> saluti matteo
saluti a te e allo spammatore ;-)


title: Visualizzare date di inizio e fine ricerca in report da filtro maschera

author: Bruno - S95

text:
Per A97.
Ho creato una maschera di ricerca collegata ad una query, con la quale
filtro e apro il report con tutti i dati filtrati.
Tutto funziona perfettamente, ma a pié di pagina del report ho inserito una
casella di testo contenente
="Ricerca effettuata dal  " & [Forms]![S:RicVoli]![DataP] & "   Al  " &
[Forms]![S:RicVoli]![DataA], al fine di far visualizzare la "data di
partenza" e la "data di arrivo", purtroppo mi visualizza solamente la data
di partenza e arrivo dei record trovati. Quindi se io effettuo la ricerca
dal 01/01/03 al 30/06/03 e vengono trovati record solo fino al 28/02/03, mi
visualizza
Ricerca effettuata dal  " 01/01/03   Al   30/06/03, mentre io vorrei la data
Minima di ricerca e la data Massima di ricerca.
Ho provato anche con DMin() e DMax e ancora con Dlookup insieme a DMin() e
DMax , ma ho fatto un casotto. Inoltre ho provato anche a mettere la query
anzichè la Form, ma niente è apparso; solo pernacchie.
La necessità di avere le date di ricerca nasce dal fatto di poter verificare
le date anche se i record trovati non coprono tutto il periodo.
Qualcuno può aiutarmi ed eventualmente formulare l'espressione corretta con
Dmin() e Dlookup, perché mi sonperso.
Mille grazie a tutti ..Bruno


author: Ever

text:
"Bruno - S95" <
bruno...@tin.it
> ha scritto nel messaggio
news:ke3Db.93458$AX1.3...@news1.tin.it...
> Per A97.
>
> Ho creato una maschera di ricerca collegata ad una query, con la quale
> filtro e apro il report con tutti i dati filtrati.
>
> Tutto funziona perfettamente, ma a pié di pagina del report ho inserito
una
> casella di testo contenente
> ="Ricerca effettuata dal  " & [Forms]![S:RicVoli]![DataP] & "   Al  " &
> [Forms]![S:RicVoli]![DataA], al fine di far visualizzare la "data di
> partenza" e la "data di arrivo", purtroppo mi visualizza solamente la data
> di partenza e arrivo dei record trovati. Quindi se io effettuo la ricerca
> dal 01/01/03 al 30/06/03 e vengono trovati record solo fino al 28/02/03,
mi
> visualizza
> Ricerca effettuata dal  " 01/01/03   Al   30/06/03, mentre io vorrei la
data
> Minima di ricerca e la data Massima di ricerca.
> Ho provato anche con DMin() e DMax e ancora con Dlookup insieme a DMin() e
> DMax , ma ho fatto un casotto. Inoltre ho provato anche a mettere la query
> anzichč la Form, ma niente č apparso; solo pernacchie.
> La necessitŕ di avere le date di ricerca nasce dal fatto di poter
verificare
> le date anche se i record trovati non coprono tutto il periodo.
>
> Qualcuno puň aiutarmi ed eventualmente formulare l'espressione corretta
con
> Dmin() e Dlookup, perché mi sonperso.
>
> Mille grazie a tutti ..Bruno
>
Probabilmente ti sei perso da qualche parte. Questa stringa funziona:
="Dal " & [Forms]![ElencoEffetti]![DaData] & " al " &
[Forms]![ElencoEffetti]![DaData]
e di conseguenza anche la tua:
="Ricerca effettuata dal  " & [Forms]![S:RicVoli]![DataP] & "   Al  " &
[Forms]![S:RicVoli]![DataA]
se i riferimenti al form sono corretti.
Ciao
Ever


text:
"Ever" <
depr...@csgen.it
> ha scritto nel messaggio
news:pJ3Db.27148$5o6....@tornado.fastwebnet.it...
>
> "Bruno - S95" <
bruno...@tin.it
> ha scritto nel messaggio
> news:ke3Db.93458$AX1.3...@news1.tin.it...
> > Per A97.
> >
> > Ho creato una maschera di ricerca collegata ad una query, con la quale
> > filtro e apro il report con tutti i dati filtrati.
> >
> > Tutto funziona perfettamente, ma a pié di pagina del report ho inserito
> una
> > casella di testo contenente
> > ="Ricerca effettuata dal  " & [Forms]![S:RicVoli]![DataP] & "   Al  " &
> > [Forms]![S:RicVoli]![DataA], al fine di far visualizzare la "data di
> > partenza" e la "data di arrivo", purtroppo mi visualizza solamente la
data
> > di partenza e arrivo dei record trovati. Quindi se io effettuo la
ricerca
> > dal 01/01/03 al 30/06/03 e vengono trovati record solo fino al 28/02/03,
> mi
> > visualizza
> > Ricerca effettuata dal  " 01/01/03   Al   30/06/03, mentre io vorrei la
> data
> > Minima di ricerca e la data Massima di ricerca.
> > Ho provato anche con DMin() e DMax e ancora con Dlookup insieme a DMin()
e
> > DMax , ma ho fatto un casotto. Inoltre ho provato anche a mettere la
query
> > anzichè la Form, ma niente è apparso; solo pernacchie.
> > La necessità di avere le date di ricerca nasce dal fatto di poter
> verificare
> > le date anche se i record trovati non coprono tutto il periodo.
> >
> > Qualcuno può aiutarmi ed eventualmente formulare l'espressione corretta
> con
> > Dmin() e Dlookup, perché mi sonperso.
> >
> > Mille grazie a tutti ..Bruno
> >
> Probabilmente ti sei perso da qualche parte. Questa stringa funziona:
> ="Dal " & [Forms]![ElencoEffetti]![DaData] & " al " &
> [Forms]![ElencoEffetti]![DaData]
>
> e di conseguenza anche la tua:
> ="Ricerca effettuata dal  " & [Forms]![S:RicVoli]![DataP] & "   Al  " &
> [Forms]![S:RicVoli]![DataA]
>
> se i riferimenti al form sono corretti.
>
> Ciao
> Ever
--------
Mi son scordato di scrivere che nel campo [DataP] e [DataA], uso
rispettivamente gli operatori >= e <=, sarà per questo che non mi
restituisce le date inserite (non penso) ma mi restituisce le date dei
record.
Forse é necessario far leggere il valore minimo e massi mo fra tutte le date
filtrate ? Bho
Comunque ho riprovato e continua come prima.
Grazie lo stesso... Bruno
>