text:
"TheMax" <
massim...@accessgroup.it
> ha scritto nel messaggio
news:chrn1f$3de$1...@domitilla.aioe.org...
> "Pablitomf" <
maurizio...@accessgroup.it
> ha scritto nel messaggio
> news:chrl3h$8cm$1...@news.newsland.it...
>
> [MEGACUT]
> (tanto sappiamo di cosa si sta parlanto)
>
[CUT]
>
> IMHO č corretto che sitocomune punti verso l'alto (č quello che io cerco
da
> questo sito, e spererei un giorno di incontrare Alex perchč mi spieghi
> quello che lui ha capito degli abitanti degli alveari...) ma č anche
> corretto dare una "prima base" di partenza per chě parte (spiegargli un
> minimo di che cosa sono le relazioni per capirsi).
Penso che il vero problema sia di rendere meno ermetici e quindi piů
comprensibili le soluzioni pubblicate sul Sito Comune, rendendole utili cosě
anche a scopo didattico e non buone solo per risolvere dei problemi a
scatola chiusa tramite un brutale copia/incolla.
Io mi sono sempre sforzato di spiegare il piů possibile le soluzioni che ho
pubblicato, ma magari possono ancora non essere abbastanza comprensibili
specie ai meno esperti di codice VBA e/o SQL.
E' pertanto auspicabile che gli insersionisti in futuro non siano troppo
avari di informazioni su quanto pubblicano e dovrebbero commentare il codice
VBA nel modo piů dettagliato possibile: so che da sempre la documentazione č
stata ed č il punto dolente di quasi tutti i programmatori, ma potrebbe
essere la vera chiave di volta per aiutare le nuove leve a formarsi, senza
per questo affrontare troppo i problemi di livello 1: questo potrebbe
allontanare per noia i frequentatori piů capaci, con conseguente danno anche
per coloro che hanno ancora molto da imparare. Insomma occorre che il
livello del NG e del Sito Comune siano tali da interessare anche i piů
esperti, permettendo allo stesso tempo un buon grado di comprensione anche
per i meno esperti, che perň non debbono trovarsi al livello 0 (zero) di
Access, VBA e SQL ma almeno al livello 1.
Per quanto č giŕ pubblicato, l'opera di commento a ciň che puň risultare
poco comprensibile per i principianti puň essere fatto anche a posteriori e
da frequentatori che non siano gli autori originari dell'articolo.
[CUT]
>
> Questa la mia modesta opinione.
>
> Ciao,
> Massimo
--



title: Re: [OT] Proposta x Sito Comune [LUCIANO]

author: Roberto dalla campagna

text:
"namor" <
do...@spam.me
> ha scritto nel messaggio
news:chrn7a$vah$1...@news.newsland.it...
[CUT]
>
>
> Che per imparare sia indispensabile studiare è sicuro. Solo che non tutti
> hanno voglia/bisogno di imparare access a quel livello. Chi ne ha bisogno
> per studio o per lavoro si affiderà sicuramente a dei corsi o a un buon
> libro, ma a qualcuno potrebbe interessare solo farsi un'idea di come
> funziona access e a cosa serve, dato che non è intuitivo come word o
> excel, e l'idea di dover spendere 50 o 100 euro potrebbe dissuaderlo. Un
> tutorial gratuito ben fatto potrebbe dare le basi ed invogliare
> all'acquisto di qualche manuale che anch'io ritengo indispensabile per chi
> voglia approfondire l'argomento (io ne ho avuti tre), acquisto che
> sicuramente verrebbe caldamente consigliato all'interno dello stesso
> tutorial.
Se non fosse che solo un esile "file rouge" separa gli esperti dai
principianti, direi che è logico tenere su due siti separati i tutolrial per
principianti da le soluzioni più avanzate.
Ho dei dubbi (ma non delle certezze) che questo comporterebbe una
dispersione di forse; non credo che chi è interessato ai tutorial al
livello1 sia anche interessato a funzioni in VBA piuttosto avanzate e
viceversa.
Frequentando il NG ho preso coscienza che i frequentatori del NG non
appartengono solo a due categorie: i pù esperti e coloro che sono agli inizi
e che hanno voglia/necessità di imparare. Ho la certezza che c'è un nutrito
numero di frequentatori che vuole programmare e fare cariera programmando
Access, ma senza per questo studiarlo in maniera professionale, sfruttando
al massimo la disponibilità di coloro che forniscono loro su richiesta
soluzioni chiavi in mano: questo è dimostrato, fra l'altro, anche dal fatto
che si incavolano se non ricevono la risposta sperata ed insistono per
averla velocemente, anche perché non possono ammettere con il loro capo di
non essere "esperti".
>
> Parlo per esperienza personale: a me per hobby piacerebbe sapere un po' di
> tutto nel campo informatico e mi fa piacere imparare argomenti nuovi, ma
> non mi va di comprarmi e impegnarmi a leggere un librone, per esempio sul
> Perl, Linux, Photoshop, networking, ecc... prima ancora di sapere cos'è e
> se mi servirà. Così mi cerco qualcosa di gratuito in rete, mi faccio
> un'idea e se mi piace, mi interessa o ritengo che possa essermi utile mi
> prenderò il manuale per approfondire, altrimenti mi dedicherò ad altro ma
> almeno ne saprò qualcosina in più su ciascuno degli argomenti.
Basta andare si Google per avere a portata di mano tutti i tutolrial
gratuiti del caso a qualsiasi livello servano e mi sembra non produttivo
rifare quello che già esiste; ritengo che entro certi limiti sarebbe bene
mantenere l'originalità del Sito Comune.
>
[CUT]
> Facciamo poche cose ma facciamole bene.
Perfettamente d'accordo, e comunque facciamole all'interno di un progetto
ben definito e delimitato.
> Namor



author: namor

text:
Pablitomf ha scritto:
> Come da oggetto propongo all'interno del Sito Comune una sezione dedicata
> a vere e proprie "lezioni Access" divise per argomentazioni
> Es.
> * Tabelle *
> Cos'è una tabella
> Funzione del campo Chiave
> Cosa sono i campi
> Cos'è un record
> Relazioni
> Aspetto commenti
Ottimo. Volevo proporlo io. Se fatto bene può diventare un testo sacro per
chi vuole imparare access partendo da zero, e una volta imparate le basi
ci si può affinare sul sito e sul ng.
Namor
--
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito



author: SunRex

text:
"namor" <
do...@spam.me
> ha scritto nel messaggio
news:chp4ip$f7q$1...@news.newsland.it...
> Pablitomf ha scritto:
>
> > Come da oggetto propongo all'interno del Sito Comune una sezione
dedicata
> > a vere e proprie "lezioni Access" divise per argomentazioni
> > Es.
> > * Tabelle *
> > Cos'è una tabella
> > Funzione del campo Chiave
> > Cosa sono i campi
> > Cos'è un record
> > Relazioni
> > Aspetto commenti
>
> Ottimo. Volevo proporlo io. Se fatto bene può diventare un testo sacro per
> chi vuole imparare access partendo da zero, e una volta imparate le basi
> ci si può affinare sul sito e sul ng.
> Namor
>
Per me sarebbe più utile una sezione dedicata all'uso di VBA con access,
dove spiegare bene cosa è una variabile ,passare argomenti a
variabili,matrici
,routine sub routine function creazione di classi esempi di utilizzo di
codice con funzioni tipo Mid etc etc.
SunRex



author: Io [Lavoro]

text:
"namor" <
do...@spam.me
> ha scritto nel messaggio
news:chpfdu$vf8$1...@news.newsland.it...
> Roberto dalla campagna ha scritto:
> > "Pablitomf" <
maurizio...@accessgroup.it
> ha scritto nel messaggio
> > news:chp305$r04$1...@news.newsland.it...
>
> > > Come da oggetto propongo all'interno del Sito Comune una sezione
dedicata
> > > a vere e proprie "lezioni Access" divise per argomentazioni
> > > Es.
> > > * Tabelle *
> > > Cos'è una tabella
> > > Funzione del campo Chiave
> > > Cosa sono i campi
> > > Cos'è un record
> .....
> > > Pablitomf (Maurizio Facciuti)
>
>
> > Io non ho mai pensato che il Sito Comune e/o il NG debbano essere
scambiati
> > per un corso per corrispondenza.
> > Quelli nominati da te sono i concetti fondamentali di Access e non credo
che
> > riusciremmo mai a fare di meglio di una buona guida cartacea all'uso di
> > Access, specie se il libro durante la spiegazione si appoggia ad un CD
di
> > esempi.
> > A mio avviso i primi tempi avere un libro su cui studiare e al quale
fare
> > riferimento è molto importante ed insostituibile per imparare.
> > Penso che il SitoComune e il NG debbano considerarsi strumenti paralleli
e
> > non sostitutivi dei manuali e dell'help in linea.
> > Natualmente questo è solo il mio punto di vista, che a quanto pare non
> > incontra quello di molti altri frequentatori.
>
> Nei libri che ho letto si usano sempre definizioni e concetti
> correttissimi ma inadatti ai principianti. Faccio un esempio:
> "La chiave primaria è un valore che identifica un record in una tabella in
> modo univoco."
> Giusto e chiaro, per me, per te e per tanti altri, ma sicuramente non per
> chi non aveva mai visto prima un db.
> Non ho mai trovato un testo adatto a principianti che spieghi veramente
> bene e in parole semplici cos'è, a cosa serve, quando e come usare o non
> usare una chiave primaria o l'integrità referenziale.
> Ritengo che potrebbe essere utile avere una cosa simile sul
>
www.sitocomune.com
, che così com'è è adatto a utenti di livello intermedio
> e avanzato ma non a chi vuole iniziare da zero.
> Namor
Concordo in pieno (dato che ho da poco iniziato da zero!) ed un tutorial
pratico con un gestionale (come proposto) non può che aiutare a capire come
si apllica la teoria nella pratica, che secondo me è fondamentale!
Ciao
PS


author: ALESSANDRO Baraldi

text:
"Roberto dalla campagna" <
r.ma...@libero.it
> ha scritto nel messaggio
news:OFW%c.2278$6b4....@twister1.libero.it...
)
> >
>
> Io non ho mai pensato che il Sito Comune e/o il NG debbano essere
scambiati
> per un corso per corrispondenza.
> Quelli nominati da te sono i concetti fondamentali di Access e non credo
che
> riusciremmo mai a fare di meglio di una buona guida cartacea all'uso di
> Access, specie se il libro durante la spiegazione si appoggia ad un CD di
> esempi.
> A mio avviso i primi tempi avere un libro su cui studiare e al quale fare
> riferimento è molto importante ed insostituibile per imparare.
> Penso che il SitoComune e il NG debbano considerarsi strumenti paralleli e
> non sostitutivi dei manuali e dell'help in linea.
>
> Natualmente questo è solo il mio punto di vista, che a quanto pare non
> incontra quello di molti altri frequentatori.
>
> --
> Roberto
Sono esattamente della tua idea.
Ed esattamente come te lo ritengo un mio punto di vista
non vincolante.
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


text:
"Io [Lavoro]" <I...@Io.it> ha scritto nel messaggio
news:2qb3emF...@uni-berlin.de...
[CUT]
>
> Concordo in pieno (dato che ho da poco iniziato da zero!) ed un tutorial
> pratico con un gestionale (come proposto) non può che aiutare a capire
come
> si apllica la teoria nella pratica, che secondo me è fondamentale!
Toglimi una curiosità.
Ma tu una bella guida all'uso di Access te la sei mai compreta e studiata.
Ho paura di no e speri che venga creato un surrogato di quella, più veloce
da leggere e meno costoso.
Le ultime guide sono corredate di CD pieni di tanti database di esempi; la
logica di apprendimento è basata su metodi deduttivi e non induttivi: quindi
prima gli esempi e poi la teoria su cui sono basati: insomma, magari dopo la
pratica, ma studiare la teoria è necessario.
> Ciao
> PS



author: Luciano (DOC)

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:chq4vj$2nb$1...@lacerta.tiscalinet.it...
> Mi pare si respiri aria di "Anarchia decisionale", il chè e spesso
> distruttivo.
E' solo una proficua fase di brainstorming:-)
Saluti.
Luciano


text:
"Luciano (DOC)" <
XXXlucia...@sitocomune.com
> ha scritto nel messaggio
news:2qbml9F...@uni-berlin.de...

Non ne dubito, e sono sicuro della tua impronta decisionale.
Ciao buon lavoro.



title: Creare un Database

author: Iceman

text:
Ciao a tutti!
E' possibile creare un database Access mediante un file di dump SQL?
Grazie in anticipo.
Ciao,
Alfonso.


title: Creare un Database

author: yQy

text:
On Thu, 30 Oct 2003 17:53:15 +0100, "Iceman" <
ice...@ice.net
> wrote:
>Ciao a tutti!
>E' possibile creare un database Access mediante un file di dump SQL?
>Grazie in anticipo.
>
no, puoi fare qualcosa con Windows Scripting Host (wsh) e il
FileSystemObject credo...ma null'altro


title: Creare un Database

text:
Iceman ha scritto:

Dovresti scrivere una sub che legga dal file i comandi SQL uno per uno e
li esegua con currentdb.execute o docmd.runsql.
Ma potresti ricevere degli errori dovuti al fatto che la sintassi dell'SQL
che hai nel file non è compatibile al 100% con Jet.
Se individui le tipologie di errori, puoi usare in un editor di testi la
funzione Trova/Sostituisci per correggere la sintassi dell'SQL e poi
rilanciare l'importazione.
Namor
--

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


title: [info] ci voleva anche il virus di Avril Lavigne

author: oizirbaF

text:
Per tutti gli amanti di Kaza ( ma non solo): andare a vedere il sito
della symantec (
http://securityresponse.symantec.com/
 ) sulla nuova
variante del virus lirva.
Guarda caso , appena preso sul computer dalla ragioneria ( ma si sa
che non č mai colpa di nessuno, neanche di chi va su e giů per lo
spazio internettiano alla cazzo ).
Ciao. Fabrizio.
(Access XP (sp2), Win ME, P4 1Ghz, 320 RAM)


author: All Eyez On me

text:
"oizirbaF" <fabrizio...@SPAMtiscalinet.it> ha scritto nel messaggio
news:in9r1v0ugvb33j032...@4ax.com...

niente in confronto al nuovo opaserv.k
AEOM


text:
On Thu, 09 Jan 2003 17:42:09 GMT, "All Eyez On me"
<
nospambf...@libero.it
> wrote:
>
>
>"oizirbaF" <fabrizio...@SPAMtiscalinet.it> ha scritto nel messaggio
>news:in9r1v0ugvb33j032...@4ax.com...
>> Per tutti gli amanti di Kaza ( ma non solo): andare a vedere il sito
>> della symantec (
http://securityresponse.symantec.com/
 ) sulla nuova
>> variante del virus lirva.
>>
>> Guarda caso , appena preso sul computer dalla ragioneria ( ma si sa
>> che non è mai colpa di nessuno, neanche di chi va su e giù per lo
>> spazio internettiano alla cazzo ).
>>
>> Ciao. Fabrizio.
>>
>> (Access XP (sp2), Win ME, P4 1Ghz, 320 RAM)
>
>niente in confronto al nuovo opaserv.k
Spero di non doverli confrontare : ho già avuto modo di dover
combattere con una versione recente di opaserv ( più di un giorno di
lavoro per toglierlo sul portatile, e altri per toglierlo dagli altri
computer )
 'Sto livra non ho lasciato che si scaricasse sul computer della
ragioneria (in rete anche col mio ), per cui forse sono riuscito a
scamparla ( e ad evitare che si salutassero e si confrontassero i
muscoli tra di loro).



text:
"oizirbaF" <fabrizio...@SPAMtiscalinet.it> ha scritto nel messaggio
news:akdr1vcggthp2cjpa...@4ax.com...

non so se hai letto cosa combina opaserv.k
le altre versioni di opaserv in confronto sono barzellette
occhi e firewall sull'attenti!!
ciao
AEOM


text:
On Thu, 09 Jan 2003 17:56:52 GMT, "All Eyez On me"
<
nospambf...@libero.it
> wrote:
>
>
>"oizirbaF" <fabrizio...@SPAMtiscalinet.it> ha scritto nel messaggio
>news:akdr1vcggthp2cjpa...@4ax.com...
>> On Thu, 09 Jan 2003 17:42:09 GMT, "All Eyez On me"
>> <
nospambf...@libero.it
> wrote:
>>
>> >
>> >
>> >"oizirbaF" <fabrizio...@SPAMtiscalinet.it> ha scritto nel messaggio
>> >news:in9r1v0ugvb33j032...@4ax.com...
>> >> Per tutti gli amanti di Kaza ( ma non solo): andare a vedere il sito
>> >> della symantec (
http://securityresponse.symantec.com/
 ) sulla nuova
>> >> variante del virus lirva.
>>cut
>
>non so se hai letto cosa combina opaserv.k
>le altre versioni di opaserv in confronto sono barzellette
>
>occhi e firewall sull'attenti!!
>
So che sei molto sensibile all'argomento. ;-)
Cmq, la mia intenzone era di avvertire su questo nuovo virus perchè è
molto recente ( tanto che si prevede una nuova definizione per il
15/01), non tanto per la sua pericolosità.
Rimane il fatto che mi aggiungo al tuo appello: tenete Antivirus e
Firewall sempre sotto occhio e ben affilati.
p.s. come nota aggiuntiva alle persone che hanno ricevuto da me un
e-mail: io non metto mai allegati alle mie e-mail , a meno che non mi
sia  stato espressamente chiesto , per cui cestinate subito miei
eventuali messaggi con allegati non richiesti ( e poi avvertitemi ).



title: Interpretare espressioni

author: Alessandro Zambelli

text:
Ciao a tutti
ho un problema di questo tipo:
ho realizzato un piccolo db per la gestione dei costi e alcuni di questi
derivano da formule matematiche
predefinite, vorrei scrivere una procedura che mi riconosca le espressioni
matematiche di questo tipo:
(a+b+c)/2+(a-b)^1/2
Deve poter riconoscere le variabili (a , b , c) dai segni matematici e dalle
costanti.
Non so proprio come fare o se esiste qualcosa di gia fatto da poter
collegare al mio programma
Avevo pensato di memorizzare le formule in una tabella con due campi: "Nome
formula" e "Espressione"
se poi richiamavo questa tabella il programma leggendo il campo espressione
poteva riconoscere le variabili e
richiedere la valorizzazione e quindi darmi il risultato della formula.
Non so se mi sono spiegato bene.
Grazie comunque a chi può aiutarmi.
Ciao Ale


title: Interpretare espressioni

author: Alessandro Cara

text:

> Grazie comunque a chi puņ aiutarmi.
>
> Ciao Ale
guardati la funzione "Eval"
--
a.cara
Togli qualcosa dall'email


title: Update difficle varianti per Turturro

text:
Ciao,
In un precedente post scrivevo:
E' possibile aggiornare il valore del campo codcon al valore
contenuto in desart (nel mio esempio 1 o 2, ma potrebbero essere
3,4,5,6,oppure qualsiasi altro testo.)
quando cod art=d.
docrig.numdoc   numrig  codart         desart         codcon
1                        0001   ATF            scatola
1                        0004   AF             anta
1                        0005   AS             scarpa
1                        0006   d                1.
2                        0001   ATF            scatola
2                        0004   AF             anta
2                        0005   AS             scarpa
2                        0006   d                2.
per giungere a:
docrig.numdoc   numrig  codart         desart         codcon
1                        0001   ATF            scatola
1                        0004   AF             anta
1                        0005   AS             scarpa
1                        0006   d                1.
2                        0001   ATF            scatola
2                        0004   AF             anta
2                        0005   AS             scarpa
2                        0006   d                2.


title: Problema con query di aggiornamento

author: JBad

text:
Ho una query di selezione con raggruppamento e calcoli vari (sulla
tabella fatture).
Devo aggiornare un campo della tabella fatture (non utilizzato per i
calcoli) con un valore calcolato in questa query, ma mi da' l'errore
"recordset non aggiornabile".
Penso che sia dovuto al fatto che voglio aggiornare la stessa tabella
utilizzata per effettuare i calcoli.
Qualcuno ha idea di come risolvere il problema ? (a parte l'utilizzo di
una tabella temporanea).
Grazie e ciao
--
JBad


title: Problema con query di aggiornamento

author: Roberto

text:
JBad <**jbad**@
ats.it
> wrote in message
MPG.13bc4868...@news.tin.it...

Pochi minuti fa ho risposto al tuo stesso quesito posto ieri o l'altro ieri;
avrai risposta ai tuoi quesiti quando è possibile e se qualcuno conosce la
risposta.
Roberto


title: Problema con query di aggiornamento

author: Sib

text:
"JBad" <**jbad**@
ats.it
> ha scritto
> Ho una query di selezione con raggruppamento e calcoli vari (sulla
> tabella fatture).
> Devo aggiornare un campo della tabella fatture (non utilizzato per i
> calcoli) con un valore calcolato in questa query, ma mi da' l'errore
> "recordset non aggiornabile".
> Penso che sia dovuto al fatto che voglio aggiornare la stessa tabella
> utilizzata per effettuare i calcoli.
Bisogna dire, effettivamente, che anche senza fare ricerche approfondite ti
saresti accorto che due giorni fa c'era una domanda simile.
Il ng e' pubblico proprio per questo. Per questo non vengono mai date
risposte in e-mail.
Comunque e' ovvio (come dicevamo due giorni fa) che una query "che
raggruppa" non puo' essere aggiornabile perche', "raggruppando", ogni record
della query si riferisce a piu' di un record della tabella, e quindi non e'
chiaro quale record della tabella dovrebbe essere aggiornato, indi ragion
per cui, una query di raggruppamento e' un "Recordset non aggiornabile".
Per il tuo problema ci sono varie strade, ma tu hai pensato a quale record
della tabella si dovrebbero riferire le modifiche che vuoi fare?
Ciao, Sib


title: Collegamneto ipertestuale e Colore di sfondo

author: franco

text:
Salve a tutti,
su delle immagini usati come pulsanti, utilizzo il collegamento
ipertestuale inserendo semplicemente uno spazio vuoto per ottenere
l'aspetto della mano che indica "cliccabile".
Oltre ad avere l'effetto voluto, si ottiene naturalmente anche la
eventuale scritta inserita che nel mio caso è solamente uno spazio
vuoto ma su sfondo giallo.
Domanda: è possibile ottenere lo sfondo trasparente anzichè giallo?
Grazie da Franco


title: Riallegare tabelle e Pagine Dinamiche.

author: COMANDO VIGILFUOCO BIELLA

text:
Pongo due quesiti allo spettabile NewsGroup.
Il primo riguarda il codice di Vincenzo Turturro per riallegare le tabelle
presente sul sito comune. All'interno del codice, si fa riferimento ad una
sub (BrowseFolder) menzionandola come presente sul sito comune, ma che non
sono stato in grado di reperire. Qualcuno puņ aiutarmi ??
La seconda domanda č rivolta a chi ha esperienza nella pubblicazione di
pagine ASP utilizzando Access 97 per la generazione di suddette pagine e NT
Server 4.0 e IIS 4 come web server. Non riesco a generare le suddette
pagine. Sbaglio io (probabile) o c'č qualche bachetto ??
Grazie anticipatamente. VP Maurizio C.


title: Riallegare tabelle e Pagine Dinamiche.

author: Lbo da casa

text:
>La seconda domanda è rivolta a chi ha esperienza nella pubblicazione di
>pagine ASP utilizzando Access 97 per la generazione di suddette pagine e NT
>Server 4.0 e IIS 4 come web server. Non riesco a generare le suddette
>pagine. Sbaglio io (probabile) o c'è qualche bachetto ??
allora, la pubblicità di microsoft ti fa surrettiziamente credere che
sia possibile tradurre le maschere di access in applicazioni asp.
questo non è semplicemente vero.
va rifatto tutto da capo.
quello che al massimo riesci ad ottenere è un active-x che funziona, e
male, solo su explorer.
--
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


title: Riallegare tabelle e Pagine Dinamiche.

author: VT @ home

text:
Il Tue, 26 Sep 2000 11:42:27 +0200, "COMANDO VIGILFUOCO BIELLA"
<
vfco...@TOGLI.POMPIERIDIVIGGIU.interbusiness.it
> ha scritto:
>(.....)
>Pongo due quesiti allo spettabile NewsGroup.
>Il primo riguarda il codice di Vincenzo Turturro per riallegare le tabelle
>presente sul sito comune. All'interno del codice, si fa riferimento ad una
>sub (BrowseFolder) menzionandola come presente sul sito comune, ma che non
>sono stato in grado di reperire. Qualcuno può aiutarmi ??
>(.....)
>
Sono costernato: ero straconvinto che la funzione BrowseFolder fosse
sul sito comune, invece, chissà dove l'ho presa !
Forse sul sito di Dev Ashish (
http://www.mvps.org/access/
)
In ogni caso, ecco qui quello che dovrebbe servirti: fai attenzione,
perchè il codice qui sotto l'ho estratto da un modulo dove ci sono una
valanga di Declare e non sono sicuro di avere preso tutte quelle che
servono.
Se hai problemi fatti risentire, anche via e-mail.
Private Type BROWSEINFO
  hOwner As Long
  pidlRoot As Long
  pszDisplayName As String
  lpszTitle As String
  ulFlags As Long
  lpfn As Long
  lParam As Long
  iImage As Long
End Type
Private Declare Function SHGetPathFromIDList Lib "shell32.dll" Alias _
            "SHGetPathFromIDListA" (ByVal pidl As Long, _
            ByVal pszPath As String) As Long
Private Declare Function SHBrowseForFolder Lib "shell32.dll" Alias _
            "SHBrowseForFolderA" (lpBrowseInfo As BROWSEINFO) _
            As Long
Private Const BIF_RETURNONLYFSDIRS = &H1
Public Function BrowseFolder(szDialogTitle As String) As String
  Dim x As Long, bi As BROWSEINFO, dwIList As Long
  Dim szPath As String, wPos As Integer
    With bi
        .hOwner = hWndAccessApp
        .lpszTitle = szDialogTitle
        .ulFlags = BIF_RETURNONLYFSDIRS
    End With
    dwIList = SHBrowseForFolder(bi)
    szPath = Space$(512)
    x = SHGetPathFromIDList(ByVal dwIList, ByVal szPath)
    If x Then
        wPos = InStr(szPath, Chr(0))
        BrowseFolder = Left$(szPath, wPos - 1)
    Else
        BrowseFolder = ""
    End If
End Function
Vincenzo Turturro
---------------------------------------------------------
Se no diventiamo tutti **** dai portatili o peggio ancora
provetti poeti fiorentini come vturturro.
(Così disse
ivan....@tiscalinet.it
 Ven 25 Aug 2000 09:34:52 +0200)


title: Creare e modificare tabelle da codice

author: Enzo

text:
Ciao a tutti.
con l'istruzione seguente :
    MyConnection.Execute "ALTER TABLE nometabella ADD COLUMN nomecampo CHAR
(20)"
aggiungo un campo ad una tabella esistente in un database Access 2000
1) primo problema non riesco ad impostare la proprietą del campo Consenti
Lunghezza Zero
2) secondo problema il nuovo campo viene aggiunto alla fine dell'elenco dei
campi, a me invece
    occorrerebbe inserirlo in una posizione intermedia.
Ringrazio anticipatamente.


title: Creare e modificare tabelle da codice

author: Karl Donaubauer

text:
Enzo ha scritto:
> con l'istruzione seguente :
>
>     MyConnection.Execute "ALTER TABLE nometabella ADD COLUMN nomecampo
> CHAR (20)"
>
> aggiungo un campo ad una tabella esistente in un database Access 2000
Sai che CHAR (in contrario a VARCHAR) crea un campo a lunghezza fissa?
> 1) primo problema non riesco ad impostare la proprietà del campo Consenti
> Lunghezza Zero
Non è possibile con SQL. Solo con DAO o ADOX.
Vedi <F1> AllowZeroLength
> 2) secondo problema il nuovo campo viene aggiunto alla fine dell'elenco
> dei campi, a me invece
>     occorrerebbe inserirlo in una posizione intermedia.
Non è possibile con SQL. Solo con DAO.
Vedi <F1> OrdinalPosition
--
HTH
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


title: per Antonio Biso

author: Alfonso Carfora

text:
ho provato la tua funzione per riallegare le tabelle di un database ma mi da
il seguente messaggio di errore dopo che mi ha permesso di trovare il
database con le tabelle allegate:
Errore di run time 3078
Il modulo di gestione di database Microsoft Jet non è in grado di
trovare la tabella o la query di input 'tbl_tabelle'. Verificare che esista
e che il nome sia stato digitato correttamente.
come pensi possa risolvere ?
 grazie in anticipo
Alfonso


title: per Antonio Biso

author: Antonio Biso

text:
Alfonso Carfora <
alfonso...@libero.it
> wrote in message
IXwP7.247212$sq5.11...@news.infostrada.it...

Che cosa è questa tabella? Una di quelle che tu alleghi? O è locale? O
magari tu hai tabelle allegate da diversi database remoti?
Antonio


title: Scusate comè che si faceva a leggere tutti i nomi dei drivers installati ?

text:
Col vba ovviamente

Ossia tutte le lettere (C:, X:, ...) con le quali il SO mappa
i drivers e (eventualmente) i percorsi di rete.

Non mi ricordo più, si faceva col filesystem mi pare ...

Grazie


text:
Salve,

Radicale 001 ha scritto:

Meglio che intendi "drives" ("drivers" sarebbe vastissimo):
http://access.mvps.org/access/api/api0003.htm

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


text:
Personalmente userei WMI che non risnete di 64Bit o Versioning...

In particolare la Classe: Win32_DiskDrive

http://stackoverflow.com/questions/9346320/wmi-to-get-drive-letter-association-with-physical-drive-path-misses-cdroms

http://p2p.wrox.com/access-vba/33933-reading-hardware-parameters-vba-code.html

@Alex


text:

rispondo a me stesso per ringraziarvi tutti


text:
Il giorno martedì 15 marzo 2016 15:09:19 UTC+1, Karl Donaubauer ha scritto:
> Salve,
>
> Radicale 001 ha scritto:
> > Col vba ovviamente
> >
> > Ossia tutte le lettere (C:, X:, ...) con le quali il SO mappa
> > i drivers e (eventualmente) i percorsi di rete.
> >
> > Non mi ricordo più, si faceva col filesystem mi pare ...
>
> Meglio che intendi "drives" ("drivers" sarebbe vastissimo):
>
http://access.mvps.org/access/api/api0003.htm

certo, drives :-)


author: Bruno Campanini

text:
radica...@gmail.com
 has brought this to us :

> rispondo a me stesso per ringraziarvi tutti
Così dicendo immagino tu abbia già risolto...

Comunque:

Dim FSO As New FileSystemObject, i
For Each i In FSO.Drives
    MsgBox FSO.GetDriveName(i)
Next

Bruno


text:
Il giorno mercoledì 16 marzo 2016 03:23:54 UTC+1, Bruno Campanini ha scritto:
>
radica...@gmail.com
 has brought this to us :
>
> > rispondo a me stesso per ringraziarvi tutti

> Così dicendo immagino tu abbia già risolto...

Per forza ! Con quel po po di link uno meglio dell' altro !
:-)

... Uno dovrebbe essere scemo per non risolvere
:-)

> Comunque:
>
> Dim FSO As New FileSystemObject, i
> For Each i In FSO.Drives
>     MsgBox FSO.GetDriveName(i)
> Next
>
> Bruno

Grazie anche a te. Ho l' imbarazzo della scelta :-)


title: Report Numerazione Progressiva

author: Nox

text:
Ciao,
scusa te per la ripetizione del post ma ho bisogno del Vs. aiuto
Devo creare un report per poter stampare delle etichette (10 x ogni foglio
A4); queste etichette hanno bisogno di essere numerate come in
quest'esempio: se stampo 1 pagine ho bisogno di avere una numerazione
progressiva per etichetta
da 1 a 10 (10 etichette x1 fogli);  se stampo 2 pagine ho bisogno di avere
una numerazione progressiva per etichetta
da 1 a 20 (10 etichette x2 fogli)Come posso fare? se io ho il
campo "Numero" duplicato 10 volte nel solito foglio, come lo faccio avanzare
progressivamente di uno in funzione delle stampe che lancio?
Spero di essermi spiegato
Grazie per l'aiuto


title: Report Numerazione Progressiva

author: Carlo Costarella

text:
"Nox" <
no...@ngi.it
> ha scritto nel messaggio
news:diibkb$s59$1...@news.ngi.it...

La numerazione puoi già metterla nella tabella aggiungendo un campo
numerico.
100 record numerazione da 1 a 100. Sarà il report a mostrare i numeri di 10
in 10 visto che ne visualizza e stampa 10 per foglio.
Ho capito bene? E' una buona idea?
Se invece le etichette (recordset) provengono da una query allora ti sarà
utile la funzione che puoi trovare su
www.sitocomune.com
 su come dare un
progressivo ad un campo in una query.
Ancora, se le etichette provengono da una query, puoi accodare i record in
una tabella di appoggio che provvederai a numerare da codice.
Ciao, Carlo


title: Report Numerazione Progressiva

author: namor

text:
Nox ha scritto:

Inserisci nel report, all'interno dell'etichetta, una casella di testo non
associata. Poi vai sulle proprietą della casella, scheda Dati, e imposti
Origine controllo '=1' e Somma parziale 'Su tutto'.
Ciao.
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: Report Numerazione Progressiva

text:
"namor" <
do...@spam.me
> ha scritto nel messaggio
news:dij5oj$870$1...@news.newsland.it...
> Inserisci nel report, all'interno dell'etichetta, una casella di testo non
> associata. Poi vai sulle proprietà della casella, scheda Dati, e imposti
> Origine controllo '=1' e Somma parziale 'Su tutto'.
fatto... ma anche stampando + pagine appare solo il numero "1"
bho non ci capisco nulla:(


title: formattazzione condizionale + di 3 ?

author: Xymôx

text:
Per la prima volta mi servirebbe dare piů di 4 colori tramite la
formattazzione condizionale.
Volevo chiedervi se tramite codice č possibile superare questo limite?
Se sě, mi date un esempio?
grazie
--
bye marco
www.marcosanti.it


title: formattazzione condizionale + di 3 ?

author: CIDI

text:
"Xymôx" <marco...@togliQUESTOpeople.it> ha scritto nel messaggio
news:743phdF...@mid.individual.net...
> Per la prima volta mi servirebbe dare più di 4 colori tramite la
> formattazzione condizionale.
> Volevo chiedervi se tramite codice è possibile superare questo limite?
> Se sì, mi date un esempio?
> grazie
> --
> bye marco
>
www.marcosanti.it
>
vedi l'esempio di Karl
http://tinyurl.com/d62egm
ciao
Daniele


title: formattazzione condizionale + di 3 ?

text:
"CIDI" <
dado...@spamtin.it
> ha scritto
> vedi l'esempio di Karl
>
http://tinyurl.com/d62egm
grazie 1000, ora me lo studio
--
bye marco
www.marcosanti.it


title: formattazzione condizionale + di 3 ?

author: Alessandro Baraldi

text:
On 8 Apr, 16:09, "Xymôx" <marcosa...@togliQUESTOpeople.it> wrote:
> Per la prima volta mi servirebbe dare più di 4 colori tramite la
> formattazzione condizionale.
> Volevo chiedervi se tramite codice è possibile superare questo limite?
> Se sì, mi date un esempio?
> grazie
> --
> bye
marcowww.marcosanti.it
Più di 3 dal Wizzard non è possibile, ma da codice puoi addirittura
metterne mille.... basta condizionarli...
@Alex


title: formattazzione condizionale + di 3 ?

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto
Più di 3 dal Wizzard non è possibile, ma da codice puoi addirittura
metterne mille.... basta condizionarli...
**********
è quello che ho fatto con una semplice serie di if nella formattazzione del
Report. Alcune volte le cose sono più semplici di quanto uno si immagina :-)



title: formattazzione condizionale + di 3 ?

author: Roberto da Parma

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:fb93586d-b45f-473a...@e21g2000yqb.googlegroups.com...


@Alex
Correggimi se sbaglio però Alex...ma su form continue il problema rimane.
Ciao
--
Roberto da Parma


title: Access 2000 e pagine Web...

author: Alberto

text:
Ciao a tutti!
Quasi per gioco, oggi, dopo aver creato un'applicazioncina in Access 2000 su
una particolare tabella, quella delle Ditte ho creato con i Wizard di Access
una pagina Web molto semplice, ma simpatica. La mia domanda è questa: dal
cliente è possibile portare il solo file ".mdb" contente la tabella e il
file ".html", oppure ci vogliono tutta una serie di ".dll" per farlo
funzionare?!?? Se purtroppo sì... quali?
Grazie a chi vorrà rispondermi...
Alberto


title: Access 2000 e pagine Web...

author: Paolo AT Home

text:
Alberto <
al...@freemail.it
> wrote in message 828amt$8b5$1...@pinco.nettuno.it...
> Ciao a tutti!
> Quasi per gioco, oggi, dopo aver creato un'applicazioncina in Access 2000
su
> una particolare tabella, quella delle Ditte ho creato con i Wizard di
Access
> una pagina Web molto semplice, ma simpatica. La mia domanda č questa: dal
> cliente č possibile portare il solo file ".mdb" contente la tabella e il
> file ".html", oppure ci vogliono tutta una serie di ".dll" per farlo
> funzionare?!?? Se purtroppo sě... quali?
I requisiti richiesti sono IE5, ADO 2.x e Jet 4.0.
Se dal tuo cliente gira un MDB creato con la versione 2000 di Access deve
avere per forza quanto serve.
Ciao
Paolo


title: Access 2000 e pagine Web...

author: Enrico T.S.

text:
Alberto ha scritto nel messaggio <828amt$8b5$
1...@pinco.nettuno.it
>...
>Ciao a tutti!
>Quasi per gioco, oggi, dopo aver creato un'applicazioncina in Access 2000
su
>una particolare tabella, quella delle Ditte ho creato con i Wizard di
Access
>una pagina Web molto semplice, ma simpatica. La mia domanda č questa: dal
>cliente č possibile portare il solo file ".mdb" contente la tabella e il
>file ".html", oppure ci vogliono tutta una serie di ".dll" per farlo
>funzionare?!?? Se purtroppo sě... quali?
>Grazie a chi vorrŕ rispondermi...
>Alberto
>
>
Se il cliente ha installato l' A2000 si
altrimenti te lo puoi scordare anche provando a
trasferire dll e ocx e exe vari.
Bye :o)


title: Access 2000 e pagine Web...

text:
Grazie per la risposta...
Mi sai dire però quali sono le dll, ocx, ... relativi ad ADOo 2.x e Jet
4.0???
Alberto
Paolo AT Home <
pa...@ospiti.it
> wrote in message
828p9t$nrn$1...@serv1.iunet.it...
> Alberto <
al...@freemail.it
> wrote in message
828amt$8b5$1...@pinco.nettuno.it...
> > Ciao a tutti!
> > Quasi per gioco, oggi, dopo aver creato un'applicazioncina in Access
2000
> su
> > una particolare tabella, quella delle Ditte ho creato con i Wizard di
> Access
> > una pagina Web molto semplice, ma simpatica. La mia domanda è questa:
dal
> > cliente è possibile portare il solo file ".mdb" contente la tabella e il
> > file ".html", oppure ci vogliono tutta una serie di ".dll" per farlo
> > funzionare?!?? Se purtroppo sì... quali?



title: Access 2000 e pagine Web...

text:
Alberto <
al...@freemail.it
> wrote in message 82fst3$aj7$1...@pinco.nettuno.it...
> Grazie per la risposta...
> Mi sai dire però quali sono le dll, ocx, ... relativi ad ADOo 2.x e Jet
> 4.0???
Non mi stupirei se l'elenco esatto degli elementi strettamente necessari non
lo conoscano nemmeno in Microsoft. Cmq quasi tutto quello che serve è
installato con IE5.
Ciao
Paolo


title: Access 2000 e pagine Web...

text:
Ti ringrazio tanto! Farò come dici tu.......
Ciao
Alberto
Paolo AT Home <
pa...@ospiti.it
> wrote in message
82g2dp$jvc$1...@serv1.iunet.it...



title: Problemi di date su versioni non italiane

author: Carlo Ve

text:
Saluti a tutti e ben ritrovati
Dovendo consegnare un prg su un pc con sistema operativo windows e Access
diverso da quello italiano
ci troviamo alle prese con il sistema di configurazione delle date che al
posto dei tradizionali "/"
hanno il . (punto) per la separazione, e questo a quanto sembra manda in
crisi il  codice sql
C'e' qualcuno che ha gia' affrontato questi problemi e/o gentilmente ha
qualche suggerimento da fornirmi ?
Anticipatamente ringrazio
Carlo Ve


author: Luciano

text:
Carlo Ve <
xp...@libero.it
> wrote in message
Daix5.37939$XZ4.4...@news.infostrada.it...
> hanno il . (punto) per la separazione, e questo a quanto sembra manda in
> crisi il  codice sql
> C'e' qualcuno che ha gia' affrontato questi problemi e/o gentilmente ha
> qualche suggerimento da fornirmi ?
Format puo' aiutarti?
Saluti.
Luciano
(DOC)


author: Lorenzo Coronati

text:
Scrisse "Carlo Ve" <
xp...@libero.it
>:
>ci troviamo alle prese con il sistema di configurazione delle date che al
>posto dei tradizionali "/"
>
>hanno il . (punto) per la separazione, e questo a quanto sembra manda in
>crisi il  codice sql
Beh, ma i campi sono di tipo data, no?
Allora
public function datasql(d as date) as string
datasql = "#" & format(d,"yyyy-mm-dd") & "#"
end function
select datasql(campodata)...
--
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)
--


text:
Lorenzo Coronati ha scritto nel messaggio
<
39c67696...@news.libero.it
>...
>Scrisse "Carlo Ve" <
xp...@libero.it
>:
>>ci troviamo alle prese con il sistema di configurazione delle date che al
>>posto dei tradizionali "/"
>>
>>hanno il . (punto) per la separazione, e questo a quanto sembra manda in
>>crisi il  codice sql
>
>Beh, ma i campi sono di tipo data, no?
>Allora
>public function datasql(d as date) as string
>datasql = "#" & format(d,"yyyy-mm-dd") & "#"
>end function
>
>select datasql(campodata)...
>
>--
>Lorenzo Coronati
Grazie Lorenzo sembra sia OK
A proposito, per la cena di Roma se per caso vai in macchina
e hai posto fammi pure  un fischio
Carlo Ve


text:
Scrisse "Carlo Ve" <
xp...@libero.it
>:
>A proposito, per la cena di Roma se per caso vai in macchina
>e hai posto fammi pure  un fischio
No problem, ma prima vediamo anche se i friulani arrivano
con la accessmobile...



author: Federico Luciani

text:
Lorenzo Coronati wrote:
> Scrisse "Carlo Ve" <
xp...@libero.it
>:
> >A proposito, per la cena di Roma se per caso vai in macchina
> >e hai posto fammi pure  un fischio
> No problem, ma prima vediamo anche se i friulani arrivano
> con la accessmobile...
direi che possiamo incontrarci tutti a PD e ridurre al minimo il numero di
macchine.
cmq, e' una cosa che possiamo decidere all'ultimo momento
--
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
--------------------------------------


text:
Scrisse Federico Luciani <
fluc...@paperino.libero.it
>:
>direi che possiamo incontrarci tutti a PD e ridurre al minimo il numero di
>macchine.
Ottimo.
>cmq, e' una cosa che possiamo decidere all'ultimo momento
Infatti :-)



title: [OT] Stampante per Etichette

author: Simone

text:
Scusate l'OT mi server una risposta da qualcuno che ha già affrontato
il problema e probabilmente qui lo trovo.
Mi occorre una stampante che stampi etichette su rullo.
L'utilizzo è quello più consueto: dopo la catalogazione (con un
applicativo access) di un documento devo stampare un etichetta (da
attaccarci sopra) con un po' di dati e un codice a barre.
La stampante occorre con connessione USB e facilmente pilotabile da
access.
Possibilmente che non costi un fracasso di soldi.
Qualcuno mi aiuta?


title: [OT] Stampante per Etichette

text:
[cut]
http://global.zebra.com/it/products.asp
io gli ho utilizzati e mi sono trovato bene!
--
strano...mavero
mail: mauro . chiarello @ gmail . com
ICQ: 292-118-822
Web: Under Construction
"Un'idea che non sia pericolosa non merita affatto di essere chiamata idea"
Oscar Wilde


title: Problemi con totali di submaschere

author: Paolo

text:
Chiedo aiuto da neofita per un problema relativo all' aggiornamento di una
maschera  in cui ho creato una submaschera con origine da una tabella che
contiene tra gli altri i seguenti  campi:
            Importo    tipo valore
            Notificato  tipo  SI/NO
            Iniziato      tipo  SI/NO
            Ultimato    tipo  SI/NO
avendo la necessità di calcolare la somma del campo importi per tutti i
record e le somme dello stesso campo corispondenti al caso in cui nel record
il campo notificato sia vero come pure stessa vale per i campi iniziato e
ultimato come segue:.
es:                importo      notif     iniz     ultim
                        10            x
                        30            x        x
                        20            x        x        x
                        60            60        50    20
allo scopo ho creato 4 query si somma con i vari criteri  di scelta,  il
problema sta nel poter far apparire nella maschera i totali che si
aggiornino automaticamente al modificare dello stato di ogni campo SI/NO
della submaschera
                                    Ringrazio per l'aiuto
                                            Paolo Gori


title: Problemi con totali di submaschere

author: Roberto dal portatile

text:
"Paolo" <
gp....@tiscalinet.it
> ha scritto nel messaggio
news:9uii5o$db2$1...@fe2.cs.interbusiness.it...

Nel piè di pagina della sottomaschera inserisci 4 caselle di testo non
associate.
Nell'origine controllo della prima scrivi:
=Somma([Importo])
Nell'origine controllo della seconda scrivi:
=Somma(IIf([Notif]=Vero;[Importo];0))
Nell'origine controllo della terza scrivi:
=Somma(IIf([Iniz]=Vero;[Importo];0))
Nell'origine controllo della quarta scrivi:
=Somma(IIf([Ultim]=Vero;[Importo];0))
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: qry di estrazione

author: MarcoBa

text:
Buongiorno a tutti
Ho una tabella con i seguenti campi:
prodotti
data
qualita (numero)
devo estrarre i prodotti scartando i due peggiori risultati di qualità,
come devo fare la mia qry ?
Grazie x l'eventuale collaborazione
Marco
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: qry di estrazione

author: Roberto dalla campagna

text:
"MarcoBa" <
produ...@pica.it
> ha scritto nel messaggio
news:d8ounu$d68$1...@news.newsland.it...
> Buongiorno a tutti
> Ho una tabella con i seguenti campi:
> prodotti
> data
> qualita (numero)
> devo estrarre i prodotti scartando i due peggiori risultati di qualità,
> come devo fare la mia qry ?
> Grazie x l'eventuale collaborazione
> Marco
Se la tabella che contiene i dati si chiama Tabella1, prova con una query
che abbia il seguente codice SQL:
SELECT Tabella1.*
FROM Tabella1
WHERE (((Tabella1.qualita)<>DMin("qualita","Tabella1") And
(Tabella1.qualita)<>DMin("qualita","Tabella1","qualita <>" &
Val(DMin("qualita","Tabella1")))));
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: qry di estrazione

text:
Roberto dalla campagna ha scritto:
> "MarcoBa" <
produ...@pica.it
> ha scritto nel messaggio
> news:d8ounu$d68$1...@news.newsland.it...
> > Buongiorno a tutti
> > Ho una tabella con i seguenti campi:
> > prodotti
> > data
> > qualita (numero)
> > devo estrarre i prodotti scartando i due peggiori risultati di qualità,
> > come devo fare la mia qry ?
> > Grazie x l'eventuale collaborazione
> > Marco
> Se la tabella che contiene i dati si chiama Tabella1, prova con una query
> che abbia il seguente codice SQL:
> SELECT Tabella1.*
> FROM Tabella1
> WHERE (((Tabella1.qualita)<>DMin("qualita","Tabella1") And
> (Tabella1.qualita)<>DMin("qualita","Tabella1","qualita <>" &
> Val(DMin("qualita","Tabella1")))));
questa qry funziona se il prodotto è unico, se i prodotti sono n no.
Per ogni prodotto deve scartare i due peggiori risultati.



title: qry di estrazione

author: Alex NSB

text:
> Ho una tabella con i seguenti campi:
> prodotti
> data
> qualita (numero)
> devo estrarre i prodotti scartando i due peggiori risultati di
> qualità, come devo fare la mia qry ?
Io imposterei il problema nel seguente modo.
Una query che seleziona il penultimo peggiore risultato per ogni prodotto
(chiamiamola, ad esempio, Prod_Minimi):
SELECT P1.prodotti, (SELECT MIN(P2.qualita) AS Minimo2 FROM Tabella1 P2
WHERE P2.Prodotti=P1.Prodotti AND P2.Qualita>(SELECT MIN(P3.qualita) FROM
Tabella1 P3 WHERE P3.Prodotti=P1.Prodotti)) AS Penultimo FROM Tabella1 AS P1
GROUP BY prodotti;
Quindi la query da te richiesta:
SELECT P.* FROM Tabella1 P, Prod_Minimi M WHERE P.prodotti=M.prodotti AND
P.qualita>M.Penultimo;
Tieni però presente che, in questo modo, non verranno visualizzati i
prodotti con meno di tre valori diversi nel campo qualita.
HTH.
Alessandro


title: qry di estrazione

text:
"MarcoBa" <
produ...@pica.it
> ha scritto nel messaggio
news:d8pejj$irp$1...@news.newsland.it...
> Roberto dalla campagna ha scritto:
>
> > "MarcoBa" <
produ...@pica.it
> ha scritto nel messaggio
> > news:d8ounu$d68$1...@news.newsland.it...
> > > Buongiorno a tutti
> > > Ho una tabella con i seguenti campi:
> > > prodotti
> > > data
> > > qualita (numero)
> > > devo estrarre i prodotti scartando i due peggiori risultati di
qualità,
> > > come devo fare la mia qry ?
> > > Grazie x l'eventuale collaborazione
> > > Marco
>
> > Se la tabella che contiene i dati si chiama Tabella1, prova con una
query
> > che abbia il seguente codice SQL:
>
> > SELECT Tabella1.*
> > FROM Tabella1
> > WHERE (((Tabella1.qualita)<>DMin("qualita","Tabella1") And
> > (Tabella1.qualita)<>DMin("qualita","Tabella1","qualita <>" &
> > Val(DMin("qualita","Tabella1")))));
>
> questa qry funziona se il prodotto è unico, se i prodotti sono n no.
> Per ogni prodotto deve scartare i due peggiori risultati.
> Marco
La cosa non mi era chiara.
Se il campo [prodotti] è di tipo testo, prova con una query che abbia il
seguenet codice SQL:
SELECT Tabella1.*
FROM Tabella1
WHERE (((IIf([qualita]= Val(DMin("qualita", "Tabella1", "prodotti= '" &
[prodotti] & "'")), 1, IIf([qualita]=Val(DMin("qualita", "Tabella1",
"prodotti = '" & [prodotti] & "' And qualita <>" & Val(DMin("qualita",
"Tabella1", "prodotti = '" & [prodotti] & "'")))), 1, 0)))=0));
Se invece [prodotti] è un campo di tipo numerico, prova con una query che
abbia il seguente codice SQL:
SELECT Tabella1.*
FROM Tabella1
WHERE (((IIf([qualita]= Val(DMin("qualita", "Tabella1", "prodotti= " &
[prodotti])), 1, IIf([qualita]=Val(DMin("qualita", "Tabella1", "prodotti ="
& [prodotti] & " And qualita <>" & Val(DMin("qualita", "Tabella1", "prodotti
= " & [prodotti])))), 1, 0)))=0));



title: qry di estrazione

text:






grazie Mille



title: installare ITALC

author: alex

text:
Ciao a tutti, devo installare ITALC V.1.0.4 in rete. Ma trovo qualche
problema con l'importazione della chiave pubblica sui client. Qualcuno mi
puņ aiutare?
Alex


title: installare ITALC

author: Gabriele Bertolucci

text:
> Ciao a tutti, devo installare ITALC V.1.0.4 in rete. Ma trovo qualche
> problema con l'importazione della chiave pubblica sui client. Qualcuno mi
> può aiutare?
Cos'è ITALC?
Ha qualche attinenza con le tematiche discusse in questo gruppo?
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution


title: installare ITALC

author: Carlo Costarella

text:
"alex" <
ubi...@tiscali.it
> ha scritto nel messaggio
news:476e8bcf$0$36444$4faf...@reader5.news.tin.it...

Mi sa che hai sbagliato NG.
Forse vuoi servirti di ITALC per mostrare un database agli alunni?
Qui trovi del materiale:
http://www.google.it/search?hl=it&q=ITALC&meta=
Ciao, Carlo


title: installare ITALC

text:
Ok! Visitato il collegamento, grazie e Buon Natale a tutto il NG. Alex
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:fknugp$ogf$1...@tdi.cu.mi.it...



title: Problema su query

author: Franz

text:
Su Access XP, in una query con richiesta di parametro che "peschi" da un
campo testo che č formato da piů parole, alla richiesta del parametro č
necessario inserire gli asterischi?
Ad esempio, nel campo [DESCRIZIONE FOTO], la stessa č composta da una frase
(es: Pantelleria con la neve). In una query con parametro di ricerca, alla
richiesta del medesimo devo inserire *neve* o neve?
Grazie
Franz


title: Problema su query

author: ALESSANDRO Baraldi

text:
"Franz" <
effemi...@yahoo.it
> ha scritto nel messaggio
news:IKTic.143159$rM4.5...@news4.tin.it...
> Su Access XP, in una query con richiesta di parametro che "peschi" da un
> campo testo che è formato da più parole, alla richiesta del parametro è
> necessario inserire gli asterischi?
> Ad esempio, nel campo [DESCRIZIONE FOTO], la stessa è composta da una
frase
> (es: Pantelleria con la neve). In una query con parametro di ricerca, alla
> richiesta del medesimo devo inserire *neve* o neve?
>
> Grazie
> Franz
Non hai provato la differenza....!!!
Fortunatamente il Database non si autodistrugge e questi TEST
sono fondamentali per capire...!
In ogni caso poichè si tratta di Uguaglianza in senso stretto
se metti solo "neve" non troverà nulla, sei obbligato a mettere
gli "*", ma non nel Parametro mettili direttamente nella QRY.
Poi l'uguaglianza la fai con "=" o con LIKE......!! ;-)
Ciao.
@Alex.


title: Generazione codice articoli

author: Stefano Zen

text:
Dopo aver avuto un aiuto prezioso un po di tempo fa, per la realizzazione di
un mio piccolo DB per la gestione dei clienti, sono a chiedervi un altro
consiglio:
Ho una tabella prodotti ( TProdotti ) con i seguenti campi: IdProdotto,
CodiceProdotto, Descrizione, PrezzoListino.
I miei codici sono cosi composti: XXXYY-ZZZ Dove XYZ possono essere sia
lettere che numeri.
Quindi del tipo XXX= Modello YY=Taglia ZZZ=Colore
Le regole da rispettare sono:
Diversi ZZZ per diversi YY ( nel senso che per diverse Taglie ho diversi
colori,, quindi la taglia S e' nera e rossa, la taglia M e' verde e blu )
Una volta trovate le combinazioni di YY-ZZZ, devono essere combinate ai
modelli.
Mi servirebbe quindi un qualcosa che mi permetta di inserire i codici di
tutti i modelli, tutte le taglie disponibili con una relazione ai colori per
ogni taglia. Sto qualcosa mi deve quindi creare il codice giusto e passarlo
con un clic alla tabella TProdotti, generando automaticamente tutti gli
articoli con i relativi ID.
Spero di essere stato chiaro e spero inoltre che qualche anima pia, mi possa
aiutare, altrimenti, come quest'anno mi smeno una settimana a inserire
qualche centinaio di articoli.
Grazie
Stefano Zen


title: Generazione codice articoli

author: MA

text:
"Stefano Zen" <
stefa...@libero.it
> ha scritto nel messaggio
news:bq2tvh$1uuoaq$1...@ID-155079.news.uni-berlin.de...

Vai con calma.
Prima ti devi fare delle tabelle di appoggio in cui trovi
modello  sigla
Pippo     pip
Pluto      plut
etc.
Poi risposta il problema che lo affrontiamo a step
MAssimiliano


title: Generazione codice articoli

text:
> Vai con calma.
> Prima ti devi fare delle tabelle di appoggio in cui trovi
> modello  sigla
> Pippo     pip
> Pluto      plut
> etc.
> Poi risposta il problema che lo affrontiamo a step
> MAssimiliano
Ok, creata la tabella TModelli con ID ( chiave primaria ), Modello ( il nome
del modello, es Tucson, Aizona ), Sigla ( ossia il codice tucson 25, arizona
24.
Poi... :-)
Stefano


title: problema di calcolo con combo

author: Ryc

text:
ciao a tutti
ho creato una combo per inserire la percentuale di sconto
ma il conteggio è in base all'ID.
Come devo fare affinchè vengano presi in considerazione
i valori inseriti?
es:
id  percentuale
1       0
2       4
ecc.
Grazie


title: problema di calcolo con combo

text:

Dove viene usato il riferimento...?
Se in una Query serve un WorkAround... se in una Form basta fare
riferimento alla Colonna(1) del controllo combo...!!!
@Alex


title: problema di calcolo con combo

text:

grazie Alex
puoi dirmi di più su WorkAround?


title: problema di calcolo con combo

text:

EVAL(Forms!NomeForm!NomeCombo.Column(index))
@Alex


title: problema di calcolo con combo

text:
?"Ryc"  ha scritto nel messaggio
news:517b7fbb-a1d6-499d...@g26g2000vba.googlegroups.com...


Ryc, WorkAround significa stratagemma, pezzotto, non è una funzione di VBA
MA


title: problema di calcolo con combo

text:

grazie


title: problema di calcolo con combo

text:
On 12 Gen, 09:35, "MA" <
mas...@massimilianoamendola.it
> wrote:
> ?"Ryc"  ha scritto nel messaggionews:517b7fbb-a1d6-499d...@g26g2000vba.googlegroups.com...

scusatemi per eventuali domande (per Voi) banali


title: problema di calcolo con combo

text:

ho fatto:
Espr1: Eval(Forms!MFattura!Perc_Sconto.culumn([index]))
ma non va bene.
Dove sbaglio?
in più in "Formula" cosa devo mettere?
Grazie


title: problema di calcolo con combo

text:

In tutto...!
Nemmeno il copia/incolla ti è riuscito bene...!
Ma quello che proprio non sopporto è che tu non abbia minimamente
aperto l'Help per leggere le istruzioni della proprietà usata, perchè
ti saresti accorto dei 2 ENORMI e BANALI errori che hai commesso.
Io non ti dico nulla... ora datti da fare.
@Alex


title: problema di calcolo con combo

text:

grazie Alex
ora ci riprovo.


title: problema di calcolo con combo

text:

ciao Alex
sono arrivato a questa che credevo fosse corretta:
 Eval("[Forms]![MFattura]![Perc_Sconto].Column(1)")
ma ho  errore.
Ma ci sono quasi. Vero?


title: problema di calcolo con combo

text:
....
> sono arrivato a questa che credevo fosse corretta:
>  Eval("[Forms]![MFattura]![Perc_Sconto].Column(1)")
>
> ma ho  errore.
> Ma ci sono quasi. Vero?
Si ...quasi... togli quello che non serve e funziona.
@Alex


title: problema di calcolo con combo

text:

Grande Alex


title: help di access ?!?

author: Nemo

text:
Ciao.
Ho un problema, probabilmente mio, non riesco a capire come 'ragiona'
l'help di access , esempio, cerco nell'help "recordset" con annessi e
connessi (openrecordset ecc...), dall'help di MSA riesco solo a farmi
mostrare la PROPRIETA' recordset, anche se e' listata a sinistra la voce
"metodo openrecordset" , anche se clicko, non succede nulla, e questo su
2 pc, presumo quindi non sia un bug di installazione o altro.
La stessa cosa capita anche con molte altre voci...
Qualcuno mi spiega ?
Grazie....
--
Stefano
Strip "NEVER" from my email before replying
Togliete "NEVER" dalla mia email prima di rispondere


title: help di access ?!?

author: Crivella

text:
Mi capita la stessa cosa, per moltissime voci.
E altre volte mi dice se voglio "riparare la funzionalità della guida"
perché risulta corrotta...
Credo che sia un bug, io sto provando a reinstallarlo ma mi sa che nn va ...
:(
Quanlcuno sa qualcosaaaaa?  :)
ps.: sto parlando di access 2000 =)
"Nemo" <
sztras...@libero.it
> ha scritto nel messaggio
news:MPG.150d735aa...@News.CIS.DFN.DE...



title: help di access ?!?

text:
In article <oAKo6.80794$
Y93.2...@news.infostrada.it
>, crivell4
@
libero.it
 says...
> Mi capita la stessa cosa, per moltissime voci.
> E altre volte mi dice se voglio "riparare la funzionalità della guida"
> perché risulta corrotta...
> Credo che sia un bug, io sto provando a reinstallarlo ma mi sa che nn va ...
> :(
> Quanlcuno sa qualcosaaaaa?  :)
inoltre guardando online su msdn.ecc... i link funzionano e le cose si
trovano....
manovra ms per farci abbonare per $199 alla sua library ? ;-)
> ps.: sto parlando di access 2000 =)
idem



title: Refresh query adp

author: Pisciotta Fabio

text:
Salve a tutti,
Sto realizzando un software in AccessXP che collega tabelle di access (mdb)
in un progetto di access (adp) aggiornando in itinere i dati nell'adp.
per collegare le tabelle utilizzo:
    DoCmd.RunSQL "CREATE VIEW " & str_NomeTabella & " AS SELECT * " & _
                     "FROM OPENDATASOURCE ('Microsoft.Jet.OLEDB.4.0', 'Data
Source=" & strSelezionato & ";')...[Ax_T1N1] Rowset_1"
il problema è che non visualizza subito la View allegata, praticamente non
aggiorna l'adp, questo mi impedisce di utlizzare subito la tabella
collegata. Ho si chiude l'applicazione e la si riapre oppure si utilizza il
metodo RefreshDatabaseWindow che aggiorna la finestra del database, in quel
momento selezionata, dopo la creazione, l'eliminazione o la ridenominazione
di un oggetto di database.
Esiste un metodo per aggiornare tutto l'adp a prescindere dalla finestra di
database.
Grazie


title: Refresh query adp

author: giorgio rancati

text:
"Pisciotta Fabio" <
pisciot...@email.it
> ha scritto nel messaggio
news:dpqvc5$31d$1...@area.cu.mi.it...
> Salve a tutti,
>
> Sto realizzando un software in AccessXP che collega tabelle di access
(mdb)
> in un progetto di access (adp) aggiornando in itinere i dati nell'adp.
>
> per collegare le tabelle utilizzo:
>
>     DoCmd.RunSQL "CREATE VIEW " & str_NomeTabella & " AS SELECT * " & _
>                      "FROM OPENDATASOURCE ('Microsoft.Jet.OLEDB.4.0',
'Data
> Source=" & strSelezionato & ";')...[Ax_T1N1] Rowset_1"
>
> il problema č che non visualizza subito la View allegata, praticamente non
> aggiorna l'adp, questo mi impedisce di utlizzare subito la tabella
> collegata. Ho si chiude l'applicazione e la si riapre oppure si utilizza
il
> metodo RefreshDatabaseWindow che aggiorna la finestra del database, in
quel
> momento selezionata, dopo la creazione, l'eliminazione o la
ridenominazione
> di un oggetto di database.
> Esiste un metodo per aggiornare tutto l'adp a prescindere dalla finestra
di
> database.
Ciao Fabio,
tu chiedi di aggiornare tutto l'ADP, si potrebbe chiudere la connessione per
poi riaprirla ma non ne vale la pena.
In AccessXp tutti i tipi di oggetti residenti nel server sono visualizzati
in tre sezioni
1) Tabelle
2)Viste/Stored procedure/Funzioni
3)Diagrammi
Se vuoi aggiornarli tutti e tre puoi fare cosě
----
'Aggiorno la sezione Viste/Sp/Funzioni
Docmd.RunCommand acCmdViewViews
Application.RefreshDatabaseWindow
'Aggiorno la sezione tabelle
Docmd.RunCommand acCmdViewTables
Application.RefreshDatabaseWindow
'Aggiorno la sezione diagrammi
Docmd.RunCommand acCmdViewDiagrams
Application.RefreshDatabaseWindow
----
il refresh di una sezione comporta l'invio al server di svariate
interrogazioni, quindi č meglio evitare quelle inutili e aggiornare solo la
sezione che ti interessa.
Ciao
--
Giorgio Rancati
[Office Access MVP]


title: Refresh query adp

text:
"giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
messaggio news:43c12590$0$341$5fc...@news.tiscali.it...

Ciao Giorgio,
Ho fatto alcune prove e mi sono accorto che eliminando un collegamento si
aggiorna in automatico. Cosě ho pensato un approccio poco ortodosso, dopo il
collegamento, copio un oggetto rinominadolo e subito dopo lo cancello a
questo punto il database viene aggiornato.
Comunque provando il tuo suggerimento mi da un errore a run-time 2046 -
Comando o azione 'VisualizzaVisualizzazioni' non disponibile. Strano perchč
il 'DoCmd.RunCommand acCmdSizeToFitForm' non mi genera nessun errore.
Ciao
Fabio Pisciotta


title: Refresh query adp

text:
"Pisciotta Fabio" <
pisciot...@email.it
> ha scritto nel messaggio
news:dprefd$m8f$1...@area.cu.mi.it...
[CUT]
> Comunque provando il tuo suggerimento mi da un errore a run-time 2046 -
> Comando o azione 'VisualizzaVisualizzazioni' non disponibile. Strano
perchè
> il 'DoCmd.RunCommand acCmdSizeToFitForm' non mi genera nessun errore.
forse c'è apreta una maschera o un report, il comando funziona se la form
del database è in primo piano.
Se hai trovato una soluzione alternativa eviti di mettere in primo piano la
form del database :-)



title: Inserimento descrizione maggiore di 255 caratteri.

author: RobertOne

text:
Buon giorno a tutto il n.g.
Sto tentando di costruire un db per la gestione delle ricette della mia
fidanzata. Ho creato due tabelle relazionate tra di loro; Nella prima
immetto nome ricetta,  categoria ricetta e procedimento. Nella seconda
immetto ingredienti, unità di misura e quantità.
Ho la necessità di immettere nel procedimento, una descrizione superiore ai
255 caratteri consentiti. Come potrei fare?
Grazie per l'attenzione.
Roberto


author: Sergio MAZZA

text:
"RobertOne" <
robe...@robort.it
> ha scritto nel messaggio news:436e0e83$0$1500$4faf...@reader2.news.tin.it...

Campo MEMO...
Ciao.
--
Sergio MAZZA


text: utilizza campo memo anzichè testo


text:
Grazie ragazzi per la dritta...
Siete omnipresenti anche la domenica...! La mia futura moglie mi ha
minacciato di disdire il matrimonio già fissato per giugno 2006 se non la
smetto di smanettare anche oggi col pc...!
Roberto


text:
"RobertOne" <
robe...@robort.it
> ha scritto nel messaggio news:436e4e32$0$1483$4faf...@reader2.news.tin.it...

E tu ribatti che per quella data riuscirai a finire il compilatore per access (anche per la versione '97) e diventerai così ricco
che di Bill non né rimarrà traccia...
Ciao.
--
Sergio MAZZA


author: fid

text:
Ne ho già uno con un numero infinito di ricette.
Se lo vuoi te lo posso inviate, obbligo però di assaggio di almeno una
pietanza!
Bye
RobertOne ha scritto:



> Grazie per l'attenzione.
> Roberto
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: passaggio valore a query

author: mino

text:
TipoEstrazione = 6
Beep
TipoEstrazione = MsgBox("Vuoi stampare tutte i verbali non archiviati? Se
scegli Sì verrà stampato tutto se scegli No verrà stampato un solo
progressivo per volta. ", 36)
If TipoEstrazione = 6 Then
TipoEstrazione = (">0")
    Else
    Beep
    TipoEstrazione = ProgressivoDaRistampare
End If
volevo usare questa funzione per passare un parametro a una query. se la
scelta è NO inserendo un valore tutto OK se devo estrarre tutto non va in
nessun modo. come posso risolvere il problema?
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: passaggio valore a query

author: Antonio Biso

text:
"mino" <
news...@libero.it
> ha scritto nel messaggio
news:bdgq6e$tcf$1...@news.newsland.it...
> TipoEstrazione = 6
> Beep
> TipoEstrazione = MsgBox("Vuoi stampare tutte i verbali non archiviati? Se
> scegli Sì verrà stampato tutto se scegli No verrà stampato un solo
> progressivo per volta. ", 36)
>
> If TipoEstrazione = 6 Then
> TipoEstrazione = (">0")
>     Else
>     Beep
>     TipoEstrazione = ProgressivoDaRistampare
> End If
>
> volevo usare questa funzione per passare un parametro a una query. se la
> scelta è NO inserendo un valore tutto OK se devo estrarre tutto non va in
> nessun modo. come posso risolvere il problema?
Hai scritto tutto tranne come è fatta la query, dove sta, se è da codice o
querydef e come stai passando i parametri!!!
Antonio


title: passaggio valore a query

text:
Antonio Biso ha scritto:


> Antonio
hai ragione davo un pò di cose come scontate. Ecco l'sql
SELECT [R verbale udienza - dati per word 01].progressivo
FROM [R verbale udienza - dati per word 01]
WHERE ((([R verbale udienza - dati per word
01].progressivo)=tipoestrazione()));
praticamente gli passo la funzione come parametro sul campo che mi
interessa.
ciao e per ora grazie



title: passaggio valore a query

text:
"mino" <
news...@libero.it
> ha scritto nel messaggio
news:bdgr82$5bj$1...@news.newsland.it...

Ci credo che non funziona: il risultato sarebbe
01].progressivo)=">0"));
che non ha senso!
Un modo, ma non sono sicuro che vada, testalo, è questo:
01].progressivo) Like tipoestrazione()));
Nel caso di nessuna scelta il risultato della funzione deve essere "*",
altrimenti "Progressivo".
Io comunque farei tutto da codice e mi costruirei la stringa SQL e la
eseguirei da codice. Poi la usi dove ti serve...
Antonio


title: passaggio valore a query

text:
Antonio Biso ha scritto:





> Antonio
funziona perfettamente sei stato molto gentile. l'idea di scrivere l'sql
l'avevo presa in considerazione ma per ragioni di comodità l'avevo poi
scartata. ciao e grazie mille



title: msgbox: pulsante Cancel e pulsantino di chiusura

author: Ammammata

text:
Avevo in testa di nascondere o disabilitare il pulsantino rosso con la X in
alto a destra ma, leggendo qui e là, sembra che sia impossibile

provo a girare la domanda in un'altra forma:

ho un MsgBox che si attiva cliccando su una voce qualsiasi di un List Box,
posso scegliere di attivarla o di NON arrivarla o di cancellarla; qui sotto
c'è il codice:

'=========================================
Private Sub OPTION_AfterUpdate()
Dim i As Integer
Dim Prompt As String

Prompt = "Confirm Switching to " & Me.OPTION & " DataBase?" & Chr(13) &
Chr(10) & Chr(13) & Chr(10) & "Yes=Change, No=Do NOT change, Cancel=DELETE
file"

i = MsgBox(Prompt, 259, "Request")

'No
If i = 7 Then
    Me.OPTION = Me.OPTION.OldValue
    Me.Recalc
    Exit Sub
End If

'Yes
If i = 6 Then
If Not IsNull(Me.OPTION) Then MDBRefresh (CurrentProject.PATH & "\" &
Me.OPTION)
End If

'Cancel = Delete file
If i = 2 Then
If Not IsNull(Me.OPTION) Then Kill (CurrentProject.PATH & "\" & Me.OPTION)
End If

DoCmd.Close acForm, "START"
DoCmd.OpenForm "START"

End Sub
'=========================================

posso fare in modo che cliccando sulla croce rossa di chiusura form possa
avere il vaore del NO (7) invece che del CANCEL (2) ?

oppure mi devo fare un piccolo form personalizzato e quindi gestirmelo come
meglio credo?

--
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
-=- -=- -=- -=- -=- -=- -=- -=- - -=-
>>>>>
http://www.bb2002.it
 :)  <<<<<
........... [ al lavoro ] ...........


text:
Il giorno Tue 03 Feb 2015 12:11:50p, *Ammammata* inviava su
it.comp.appl.access il messaggio
news:XnsA4367C158C6EBam...@46.4.82.189
. Vediamo cosa
scrisse:

> qui sotto
> c'è il codice:
>
>

ehm... il codice originale non è mio, ci sono alcune cose che non mi
piacciono e che vedrò di sistemare ;)



title: requery elenchi

author: Giovo

text:
Ciao
access 2002
maschera per gestire richerche in due diverse tabelle (clienti e prodotti)
due pulsanti permettono di far apparire solo un elenco o l'altro
unica casella di testo dove digitare il campo ricerca
1)è possibile fare in modo che l'elenco venga aggiornato (con una requery)
man mano che la parola viene scritta nel campo di ricerca e non solo dopo
aver digitato invio?
2)se dopo aver effettuato una ricerca sui clienti si vuole farne una nuova
sui prodotti (premendo il pulsante prodotti scompaiono gli elenchi clienti e
vengono sostituiti da quelli sui prodotti) per quanto imposti a * il campo
ricerca con [cerca].value = "*" e forzi la requery con docmd.requery
([elenco_prodotti]) mi appare l'elenco filtrato con il vecchio valore.
Grazie


title: requery elenchi

author: omnitow

text:
"Giovo" <
g...@gio.it
> ha scritto nel messaggio
news:2yhEa.67814$Ny5.2...@twister2.libero.it...

1) puoi inserire TuaListBox.Requery a fronte dell'evento KeyPress della casella di testo,
io però te lo sconsiglierei, forzeresti il db ad un notevole carico di lavoro, e nel caso
di db in multiutenza potrebbe darti problemi, immaginiamo che, fra due anni quando il tuo
db avra raggiunto una certa dimensione, 10 utenti esaguano contemporaneamente una ricerca
prova ad immaginare quante volte, alla pressione di ogni tasto, il motore del tuo db debba
caricare i dati...
2) prova a sostituire il docmd.requery, che sinceramente non so cosa vada a ricaricare, se
il form oppure il controllo attivo, con un TuaListBox.Requery. se ancora hai problemi
prova a postare la query di origine della listbox.
Ciao
            omnitow


title: Trova record corrispondente

author: Giuseppe

text:
Ciao a tutti
Con questa routine trovo il record corrispondente al controllo
Private Sub ElencoArticoli_AfterUpdate()
    ' Trova il record corrispondente al controllo
    Dim rs As Object
    Set rs = Me.Recordset.Clone
    rs.FindFirst "[Code] = '" & Me![ElencoArticoli] & "'"
    Me.Bookmark = rs.Bookmark
    ElencoArticoli.Requery
    ElencoArticoli.SetFocus
End Sub
come posso fare per inserire un messaggio se non viene trovato
alcun record per il controllo Code ?
Grazie anticipato
Giuseppe


title: Trova record corrispondente

author: Roberto da casa

text:
"Giuseppe" <
amrma...@tin.it
> ha scritto nel messaggio
news:3Txhc.84598$hc5.3...@news3.tin.it...

Prova cosě:
Private Sub ElencoArticoli_AfterUpdate()
    ' Trova il record corrispondente al controllo
    Dim rs As Object
    Set rs = Me.Recordset.Clone
    rs.FindFirst "[Code] = '" & Me![ElencoArticoli] & "'"
    If rs.NoMatch Then
        MsgBox "Articolo " & Me![ElencoArticoli]  & " non trovato"
    Else
        Me.Bookmark = rs.Bookmark
    End If
    ElencoArticoli.Requery
    ElencoArticoli.SetFocus
End Sub
>
>
> Grazie anticipato
> Giuseppe
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: HELP!!! non riesco più ad aprire un file

text:
Trasferendo dei dati da un foglio elettronico excel ad una tabella access
tramite una procedura in VBA di access, devo aver interrotto la procedura in
modo anomalo.
Problema ora non riesco più ad aprire il file excel, mi dice che è in uso
(da me, del resto), se provo ad aprirlo in sola lettura mi esce il seguente
messaggio:
<<l'istruzione a "0x3004c359" ha fatto riferimento alla memoria a
"0xfffffffc". La memoria non poteva essere "read".>>
Se riuscissi a recuperare il file sarebbe una giornata di lavoro
risparmiata....
Grazie!!!
Simone


text:

Hai provato a lanciare il file tenendo premuto shift?
cerca nei precedenti post su questo NG credo con la parola chiave "written"
ci dovrebbe essere il link all'articolo che ti interessa.
ciao MAssimiliano
--------------------------------
Inviato via
http://usenet.libero.it


title: Ordinare casella di riepilogo

author: Michele

text:
Ciao a tutti,
Ho il seguente problema:
ES. N° fattura - Data - Società, sono i dati visualizzati nella
casella di riepilogo che ha come origine dati una query.
E' possibile ordinare per data o per società in base a dei criteri
scelti con un pulsante o con gruppo di opzioni nella casella di
riepilogo?
Grazie
Ciao Michele


title: Ordinare casella di riepilogo

text:

è possibile ordinare tutto quello che vuoi ma ad esempio con un gruppo di
opzioni posizionato in una maschera e non nella caselle di riepilogo. per
ordinare devi fare una query che a secondo di quello che hai selezionato ti
esegue l'ordinamento oppure se ti risulta complicato 3 query diverse (poco
carino).
ciao
--------------------------------
Inviato via
http://usenet.libero.it


title: Ordinare casella di riepilogo

text:
news...@libero.it
 (mino) wrote in message news:<
80Z16Z45Z126Y1...@usenet.libero.it
>...

Grazie per la risposta ma volevo evitare troppe query per fare questa
operazione, se era possibile volevo inserire all'interno dell'unica
query dove prelevo i dati un'istruzione anche in sql che mi opermetta
di fare l'ordinamento dei dati.
Grazie a risentirci
Michele



title: Ordinare casella di riepilogo

author: Roberto dalla campagna

text:
Michele <
mike...@tiscali.it
> wrote in message
803dba50.03060...@posting.google.com...

Creati dinamicamente con VBA la stringa SQL che imposterai come origine riga
della casella di riepilogo: nel far questo imposta opportunamente i campi
della proposizione ORDER BY a seconda del valore del gruppo di opzioni che
sarà contenuta nella maschera e non nella casella di riepilogo come tu
scrivi.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Ordinare casella di riepilogo

text:
"Roberto dalla campagna" <
r.ma...@libero.it
> wrote in message news:<43nEa.69001$
lK4.2...@twister1.libero.it
>...
> Michele <
mike...@tiscali.it
> wrote in message
> 803dba50.03060...@posting.google.com...
> > Ciao a tutti,
> > Ho il seguente problema:
> > ES. N° fattura - Data - Società, sono i dati visualizzati nella
> > casella di riepilogo che ha come origine dati una query.
> > E' possibile ordinare per data o per società in base a dei criteri
> > scelti con un pulsante o con gruppo di opzioni nella casella di
> > riepilogo?
> > Grazie
> > Ciao Michele
>
> Creati dinamicamente con VBA la stringa SQL che imposterai come origine riga
> della casella di riepilogo: nel far questo imposta opportunamente i campi
> della proposizione ORDER BY a seconda del valore del gruppo di opzioni che
> sarà contenuta nella maschera e non nella casella di riepilogo come tu
> scrivi.
Scusami Roberto ma il Messaggio non l'avevo Visto si la soluzione che
mi proponi era quella che ensavo io, il problema e che no so come
mettere la stringa SQL.
La stinga SQL è la seguente:
SELECT Tab_Fatture.IDFattura, Tab_Fatture.N_Fattura, Tab_Fatture.Data,
Format$(([totimponibile]+[iva]),"#,###.00",0) AS Totale,
Tab_Fatture.AliquotaIVA, ([Q_ta]*[prezzo]) AS importo,
Sum(([importo])) AS imponibile, [TotImponibile]*[AliquotaIVA] AS iva,
([imponibile]-[sconto_euro])-([imponibile]-[Sconto_euro])*[sconto_per]
AS TotImponibile, Tab_Fatture_Righe.Q_ta, Tab_Fatture_Righe.Prezzo,
Tab_Fatture.Sconto_Per, Tab_Fatture.Sconto_Euro,
Tab_Fatture.AliquotaIVA
FROM (Tab_Clienti INNER JOIN Tab_Fatture ON Tab_Clienti.IdCliente =
Tab_Fatture.IDCliente) INNER JOIN Tab_Fatture_Righe ON
Tab_Fatture.IDFattura = Tab_Fatture_Righe.IDFattura
GROUP BY Tab_Fatture.IDFattura, Tab_Fatture.N_Fattura,
Tab_Fatture.Data, Tab_Fatture.AliquotaIVA, Tab_Fatture_Righe.Q_ta,
Tab_Fatture_Righe.Prezzo, Tab_Fatture.Sconto_Per,
Tab_Fatture.Sconto_Euro, Tab_Fatture.AliquotaIVA,
Tab_Clienti.IdCliente
HAVING (((Tab_Fatture.N_Fattura)=([Tab_Fatture].[N_Fattura])) AND
((([Q_ta]*[prezzo]))>"") AND
((Tab_Clienti.IdCliente)=[Forms]![Mas_Anagrafica]![Mas_Clienti].[Form]![IdCliente]))
ORDER BY Tab_Fatture.N_Fattura;
Come posso inserirla in VBA???
Scusate ancora per la svista.
Michele


title: Ordinare casella di riepilogo

text:
"Michele" <
mike...@tiscali.it
> ha scritto nel messaggio
news:803dba50.03061...@posting.google.com...

Per semplicità ipotizziamo che il codice SQL della query fosse:
SELECT IDFattura, N_Fattura, Data
FROM Tab_Fatture;
Se il nome della casella di riepilogo è Elenco.
Se il nome del gruppo opzioni è Scelta, ed esso assume il valore 1 o 2 a
seconda che si voglia ordinare la casella di riepilogo per N_Fattura o per
Data.
A fronte dell'evento su clic del pulsante di comando pigiando il quale vuoi
effettuare l'ordinamento genera il seguente codice VBA:
Dim strSQL As String
strSQL = "SELECT IDFattura, N_Fattura, Data FROM Tab_Fatture "
If Me!Scelta = 1
    strSQL = strSQL & "ORDER BY N_Fattura;"
Else
    strSQL = strSQL & "ORDER BY Data;"
End If
Me!Elenco.RowSource = strSQL
Me!Elenco.Requery



title: Ordinare casella di riepilogo

text:
"Roberto da casa" <
r.ma...@libero.it
> wrote in message news:<NkIFa.80744$
lK4.2...@twister1.libero.it
>...

Soluzione perfettamente funzionante, ti ringrazio Roberto e a tutto il NG.
Michele


title: SQL 7 Gratuito?????

author: Annalu

text:
Ciao NG
é vero che la versione 7 di SQL é di uso gratuito?


title: SQL 7 Gratuito?????

author: MA

text:
> Ciao NG
>
> é vero che la versione 7 di SQL é di uso gratuito?
>
Non mi risulta.
MSDE è gratuito ma hai limitazioni sugli accessi contemporanei
MAssimiliano


title: SQL 7 Gratuito?????

author: Giorgio Prx

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:f%3vb.6765$i_5....@news.edisontel.com...

Ciao Ma
E' vero che ha il limite di 2Gb per Db e limita le prestazioni con più di 5
batch contemporanei ma sembra che fino a 25 utenti la cosa non dovrebbe
essere drastica (fino a 7 utenti io non ho rilevato rallentamenti).
Prova a dare un'occhiata
http://www.microsoft.com/sql/msde/default.asp
Ciao Giorgio


title: SQL 7 Gratuito?????

text:
> > > Ciao NG
> > >
> > > é vero che la versione 7 di SQL é di uso gratuito?
> > >
> > Non mi risulta.
> > MSDE č gratuito ma hai limitazioni sugli accessi contemporanei
> > MAssimiliano
> >
>
> Ciao Ma
> E' vero che ha il limite di 2Gb per Db e limita le prestazioni con piů di
5
> batch contemporanei ma sembra che fino a 25 utenti la cosa non dovrebbe
> essere drastica (fino a 7 utenti io non ho rilevato rallentamenti).
>
> Prova a dare un'occhiata
>
http://www.microsoft.com/sql/msde/default.asp
>
> Ciao Giorgio
L'ho seguito il 3d in cui si diceva che era un modo per spingere il
passaggio a Sql
Entrando in quel merito mi chiedo se ne vale la pena viste le rinuncie che
ti impongono gli ADP.
O rimango in mdb collegato in ODBC? A quel punto uso Mysql.
MAssimiliano


title: SQL 7 Gratuito?????

author: ALESSANDRO Baraldi

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:JZ4vb.6866$i_5....@news.edisontel.com...
[CUT]
> L'ho seguito il 3d in cui si diceva che era un modo per spingere il
> passaggio a Sql
> Entrando in quel merito mi chiedo se ne vale la pena viste le rinuncie che
> ti impongono gli ADP.
> O rimango in mdb collegato in ODBC? A quel punto uso Mysql.
> MAssimiliano
A quale rinunce ti riferisci............?
Ciao.
@Alex.


title: SQL 7 Gratuito?????

text:
> [CUT]
>
> > L'ho seguito il 3d in cui si diceva che era un modo per spingere il
> > passaggio a Sql
> > Entrando in quel merito mi chiedo se ne vale la pena viste le rinuncie
che
> > ti impongono gli ADP.
> > O rimango in mdb collegato in ODBC? A quel punto uso Mysql.
> > MAssimiliano
>
>
> A quale rinunce ti riferisci............?
>
> Ciao.
> @Alex.
Primo fra tutti Dao.
MAssimiliano


title: SQL 7 Gratuito?????

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:fl7vb.6958$i_5....@news.edisontel.com...

He.....He.....ma dai non serve a nulla con ADP ADO batte DAO 3-1....!
Sei un nostalgico....?
Poi 2°.......!
Ti sto mettendo in difficoltà....?? ;-)
@Alex.


title: SQL 7 Gratuito?????

author: yQy

text:
On Thu, 20 Nov 2003 21:07:33 +0100, "ALESSANDRO Baraldi"
<
ik2...@libero.it
> wrote:
>
>He.....He.....ma dai non serve a nulla con ADP ADO batte DAO 3-1....!
>
DAO e ADO non servono a nulla se poi decidi di usare Mysql (credo)
visto che ADO nn lo supporta affatto...
quindi o usi SQL server full (con ado) o mysql con dao?
Correggetemi se sbaglio


title: SQL 7 Gratuito?????

text:
"yQy" <
fabrizi...@tin.it
> ha scritto nel messaggio
news:l4hqrv42gp76s5rda...@4ax.com...

Ma tutti gli OleDB per MySQL allora li fanno per ridere.....?????
MMMmmmmmmmmm!!!!!!!
Con cosa credi di collegarti a MySQL con la fata turchina...!!
Se usi ODBC usi DAO se usi OLEdB usi ADO.
@ALex.


title: SQL 7 Gratuito?????

text:
On Fri, 21 Nov 2003 00:17:06 +0100, "ALESSANDRO Baraldi"
<
ik2...@libero.it
> wrote:
>
>> DAO e ADO non servono a nulla se poi decidi di usare Mysql (credo)
>> visto che ADO nn lo supporta affatto...
>>
>> quindi o usi SQL server full (con ado) o mysql con dao?
>>
>> Correggetemi se sbaglio
>
>Ma tutti gli OleDB per MySQL allora li fanno per ridere.....?????
>
>MMMmmmmmmmmm!!!!!!!
>
>Con cosa credi di collegarti a MySQL con la fata turchina...!!
>Se usi ODBC usi DAO se usi OLEdB usi ADO.
>
>@ALex.
>
Mi hai corretto! :)
Thanx!


title: SQL 7 Gratuito?????

author: Gabriele Bertolucci

text:
> He.....He.....ma dai non serve a nulla con ADP ADO batte DAO 3-1....!
>
> Sei un nostalgico....?
A parte i nostalgici, visto che secondo te DAO è da dimenticare, mi risolvi
il seguente problema con ADO?
Voglio modificare la dimensione di un campo di una tabella.
Fammi sapere.
--
Gabriele Bertolucci
PBsoft
www.pbsoft.it


title: SQL 7 Gratuito?????

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:fl7vb.6958$i_5....@news.edisontel.com...

A mio parere se decidi di passare a SqlServer devi spostare la logica di
programmazione sul server utilizzando il linguaggio T-SQL, a questo punto
DAO o ADO verranno usati in casi molto rari o per creare funzioni di
supporto che utilizzi sistematicamente. Ho trasformato sub che erano molto
complesse da DAO+VBA in T-Sql ottenendo una notevole semplificazione del
codice e un incremento della velocità oltre alle aspettative.
L'unico punto dolente è l'investimento (in tempo) da affrontare,
praticamente devi buttare via i progetti sviluppati con DAO.
Ciao Giorgio


title: SQL 7 Gratuito?????

text:
"Gabriele Bertolucci" <CANCEL...@ELIMINApbsoft.TOGLIit> ha scritto nel
messaggio news:%Pkvb.51902$9_.20...@news1.tin.it...
> > He.....He.....ma dai non serve a nulla con ADP ADO batte DAO 3-1....!
> >
> > Sei un nostalgico....?
>
> A parte i nostalgici, visto che secondo te DAO č da dimenticare, mi
risolvi
> il seguente problema con ADO?
>
> Voglio modificare la dimensione di un campo di una tabella.
>
> Fammi sapere.
>
Non puoi farlo utilizzando il modello a oggetti come con DAO, ma in modo piů
semplice ....
-------------------------------
Dim Cn As ADODB.Connection
Sel Cn = New ADODB.Connection
Cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
        "Data Source=C:\Documenti\1.mdb;" & _
        "ecc.ecc"
Cn.Execute "ALTER TABLE TuaTb ALTER Column Col1 nvarchar(100)"
-------------------------------
Ciao Giorgio


title: SQL 7 Gratuito?????

author: Alessandro Baraldi

text:
"Giorgio Prx" <
giorgio...@nospamtiscalinet.it
> wrote in message
news:bplc9r$ke6$
1...@lacerta.tiscalinet.it
> > A parte i nostalgici, visto che secondo te DAO č da dimenticare, mi
> risolvi
> > il seguente problema con ADO?
> >
> > Voglio modificare la dimensione di un campo di una tabella.
> >
> > Fammi sapere.
> Non puoi farlo utilizzando il modello a oggetti come con DAO, ma in modo piů
> semplice ....
> -------------------------------
> Dim Cn As ADODB.Connection
> Sel Cn = New ADODB.Connection
>
> Cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
>         "Data Source=C:\Documenti\1.mdb;" & _
>         "ecc.ecc"
> Cn.Execute "ALTER TABLE TuaTb ALTER Column Col1 nvarchar(100)"
> -------------------------------
> Ciao Giorgio
A parte che uso A97 e di conseguenza non posso aver abbandonato
DAO, ho solo detto che c'č, per chi usa ADP una alternativa
piů valida.
Come ti ha suggerito Giorgio č una soluzione....!
Ma dove non risolvi con ADO in generale usi DAO, l'unione fa la
forza.....!
@Alex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: SQL 7 Gratuito?????

text:
"Giorgio Prx" <
giorgio...@nospamtiscalinet.it
> wrote in message
news:bpks4j$1hq$
1...@lacerta.tiscalinet.it
[CUT]
>
> A mio parere se decidi di passare a SqlServer devi spostare la logica di
> programmazione sul server utilizzando il linguaggio T-SQL, a questo punto
> DAO o ADO verranno usati in casi molto rari o per creare funzioni di
> supporto che utilizzi sistematicamente. Ho trasformato sub che erano molto
> complesse da DAO+VBA in T-Sql ottenendo una notevole semplificazione del
> codice e un incremento della velocità oltre alle aspettative.
>
> L'unico punto dolente è l'investimento (in tempo) da affrontare,
> praticamente devi buttare via i progetti sviluppati con DAO.
>
> Ciao Giorgio
Si Giorgio hai ragione, ma tu sei qualche Km + avanti, ed io
fatico a raggiungerti.....!
Ho iniziato da qualche mese l'utilizzo di T-SQL, ma devi convenire
che ADO con ADP non puoi dire che non serve, certo l'utilizzo
è più limitato....!



title: SQL 7 Gratuito?????

author: Matteo Cevanton

text:
"Giorgio Prx"
> A mio parere se decidi di passare a SqlServer devi spostare la logica di
> programmazione sul server utilizzando il linguaggio T-SQL, a questo punto
> DAO o ADO verranno usati in casi molto rari o per creare funzioni di
> supporto che utilizzi sistematicamente. Ho trasformato sub che erano molto
> complesse da DAO+VBA in T-Sql ottenendo una notevole semplificazione del
> codice e un incremento della velocità oltre alle aspettative.
> L'unico punto dolente è l'investimento (in tempo) da affrontare,
> praticamente devi buttare via i progetti sviluppati con DAO.
Fosse quello l'unico punto dolente ... lavorare pesantemente in TSQL
significa dover mantenere due applicazioni: una sul Client (tutta la
struttura visuale di maschere/reports e parte del codice VB) e l'altra, la
logica business, sul Server con un linguaggio povero di strumenti di Debug e
lontano da un'impostazione tradizionale.
Se tu avessi collaboratori o dipendenti staresti ben a larga da un approccio
del genere  :-)
Ciao.


title: SQL 7 Gratuito?????

text:
"Matteo Cevanton" <
matteo....@tiscalinet.it
> ha scritto nel messaggio
news:30vvb.133521$vO5.5...@twister1.libero.it...
>
> "Giorgio Prx"
>
[CUT]
>
> Fosse quello l'unico punto dolente ... lavorare pesantemente in TSQL
> significa dover mantenere due applicazioni: una sul Client (tutta la
> struttura visuale di maschere/reports e parte del codice VB) e l'altra, la
> logica business, sul Server con un linguaggio povero di strumenti di Debug
e
> lontano da un'impostazione tradizionale.
Un suo Debug c'è,  anche se non è al livello di quello presente in VBA, per
quanto riguarda l'impostazione del linguaggio lo trovo affascinante.
> Se tu avessi collaboratori o dipendenti staresti ben a larga da un
approccio
> del genere  :-)
Devo darti ragione, non è un approccio adatto a una programmazione di
gruppo, come non lo è Access anche se Microsoft ha messo a disposizione
Visual SourceSafe :-)
Ciao Giorgio


title: SQL 7 Gratuito?????

text:
"Giorgio Prx" <
> > Se tu avessi collaboratori o dipendenti staresti ben a larga da un
> approccio
> > del genere  :-)
> Devo darti ragione, non è un approccio adatto a una programmazione di
> gruppo,
> come non lo è Access anche se Microsoft ha messo a disposizione
> Visual SourceSafe :-)
Questa è un'affermazione discutibile :-)
Se Access (con o senza VSSafe) non è adatto alla programmazione di gruppo
... non lo è alcuno strumento cosiddetto RAD.
Saluti.


title: RunSql  e codici di ritorno

author: Red Wolf

text:
se in VBA access eseguo una RunSql di inserimento mi appare il messaggio
che mi avvisa dell'inserimento di X righe in tabella
Come leggo da VBA il numero X?
Grazie
--
Grazie
Red Wolf
--
“Di recente ho letto la Bibbia... Non male, ma il personaggio principale
è poco credibile.” (Woody Allen)


title: RunSql  e codici di ritorno

author: Karl Donaubauer

text:
Red Wolf wrote:
> se in VBA access eseguo una RunSql di inserimento mi appare il
> messaggio che mi avvisa dell'inserimento di X righe in tabella
>
> Come leggo da VBA il numero X?
Devi usare Execute e RecordsAffected invece di RunSQL:
Dim db As DAO.Database
Set db = Currentdb
db.Execute "TuaQueryOStringaSQL", dbFailOnError
MsgBox "Record modificati: " & db.RecordsAffected
--
Ciao
Karl
*********
Access FAQ:
www.donkarl.com/it


title: RunSql  e codici di ritorno

text:
CUT
> Dim db As DAO.Database
> Set db = Currentdb
>
> db.Execute "TuaQueryOStringaSQL", dbFailOnError
> MsgBox "Record modificati: "&  db.RecordsAffected
>
non vorrei usare DAO
con runsql non è possibile?



title: RunSql  e codici di ritorno

text:
Red Wolf ha scritto:
>CUT
>> Dim db As DAO.Database
>> Set db = Currentdb
>>
>> db.Execute "TuaQueryOStringaSQL", dbFailOnError
>> MsgBox "Record modificati: "&  db.RecordsAffected
>>
>
>non vorrei usare DAO
>
>con runsql non è possibile?
>
E cos'hai contro DAO? tanto Jet usa quello comunque.....
--


title: RunSql  e codici di ritorno

text:
"Fair87"  ha scritto nel messaggio news:ingt18$g89$1...@news.nonsolonews.it...


--
Se usa ADO deve referenziarlo solo per questo
MA


title: RunSql  e codici di ritorno

text:
MA wrote:
> "Fair87"  ha scritto: Red Wolf ha scritto:
>> CUT
>>> Dim db As DAO.Database
>>> Set db = Currentdb
>>>
>>> db.Execute "TuaQueryOStringaSQL", dbFailOnError
>>> MsgBox "Record modificati: "&  db.RecordsAffected
>>
>> non vorrei usare DAO
>>
>> con runsql non Ã¨ possibile?
>>
>
> E cos'hai contro DAO? tanto Jet usa quello comunque.....
> --
Ah Massimiliano,  è un po' difficoltoso rispondere al tuo
messaggio se scrivi dopo il segno che taglia la tua sig.
> Se usa ADO deve referenziarlo solo per questo
Con ADO si puo usare il parametro RecordsAffected del
metodo Execute, p.e.
Dim db As ADODB.Connection
Set db = CurrentProject.Connection
Dim lngRecAff As Long
db.Execute "DELETE FROM Tabella WHERE Id>100", lngRecAff
Debug.Print lngRecAff
--
Ciao
Karl
*********
Access FAQ:
http://www.donkarl.com/it


title: RunSql  e codici di ritorno

text:
"Karl Donaubauer"  ha scritto nel messaggio
news:905c5g...@mid.individual.net...
MA wrote:
> "Fair87"  ha scritto: Red Wolf ha scritto:
>> CUT
>>> Dim db As DAO.Database
>>> Set db = Currentdb
>>>
>>> db.Execute "TuaQueryOStringaSQL", dbFailOnError
>>> MsgBox "Record modificati: "&  db.RecordsAffected
>>
>> non vorrei usare DAO
>>
>> con runsql non Ã¨ possibile?
>>
>
> E cos'hai contro DAO? tanto Jet usa quello comunque.....
> --
Ah Massimiliano,  è un po' difficoltoso rispondere al tuo
messaggio se scrivi dopo il segno che taglia la tua sig.
____Risposta:
Eh lo so Karl, io uso Live Mail come client dei NG ed è veramente pessimo
MA


title: RunSql  e codici di ritorno

text:
MA ha scritto:

Certo che si, ma ADO o DAO alla fine x Access sempre DAO è....no?
--


title: RunSql  e codici di ritorno

text:
"Fair87"  ha scritto nel messaggio news:ink3ci$rcr$1...@news.nonsolonews.it...


______Risposta:
Per un Access dislessico...
Per tutti gli altri Access ADO è ADO e DAO è DAO
MA


title: Query di conteggio

author: fid

text:
Buondě, sono bloccato su una query:Nella tbl Soci ho i campi
data_iscrizione e  data_dimissioni, dove mi segno le date appunto di
iscrizione/dimissioni da una associazione.
Mi servirebbe sapere il totale dei soci iscritti e dimissionari suddivisi
per anno, credo sia possibile ma non ci sto riuscendo. Consigli? Grazie
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Query di conteggio

text:
Cataldo Formaro ha scritto:
> "fid" <
fid...@libero.it
> ha scritto nel messaggio
> news:ghd8g7$636$1...@news.newsland.it...

> Ciao Fid,
> Nella tua query, potresti formattare il campo data_iscrizione cosi:
> ANNO: Format$(TblSoci.data_iscrizione ;'aaaa')
> e  data_dimissioni in:
> ANNO: Format$(TblSoci.data_dimissioni;'aaaa')
> Poi in criterio
> [Inserire l'anno]
> e dovrebbe andare.
> Ciao
Ottenere il totale degli iscritti e dimissionari suddivisi per anno ci
sono riuscito, ma con 2 query differenti
iscritti
SELECT Year([Data_Iscrizioni]) AS Iscritti, Count(Soci.IDAnag) AS
ConteggioDiIDAnag
FROM Soci
GROUP BY Year([Data_Iscrizioni]);
dimissioni
SELECT Year([Data_Dimissioni]) AS Dimissioni, Count(Soci.IDAnag) AS
ConteggioDiIDAnag
FROM Soci
GROUP BY Year([Data_Dimissioni])
HAVING (((Year([Data_Dimissioni])) Is Not Null));
ho provato
SELECT Year([Data_Dimissioni]) AS Dimissioni, Count(Soci.IDAnag) AS
SociDimissioni, Year([Data_iscrizioni]) AS Iscri, Count(Soci.IDAnag) AS
sociiscr
FROM Soci
GROUP BY Year([Data_Dimissioni]), Year([Data_iscrizioni]);
ma da quello voluto ovvero
anno      iscritti       dimissioni
2006         10              1
2005         22              2
sono ancora lontano
saluti



title: Query di conteggio

text:
fid wrote:
>>> Buondě, sono bloccato su una query:Nella tbl Soci ho i campi
>>> data_iscrizione e  data_dimissioni, dove mi segno le date appunto di
>>> iscrizione/dimissioni da una associazione.
>>> Mi servirebbe sapere il totale dei soci iscritti e dimissionari
>>> suddivisi per anno, credo sia possibile ma non ci sto riuscendo.
>>> Consigli? Grazie
> ...
> Ottenere il totale degli iscritti e dimissionari suddivisi per anno ci
> sono riuscito, ma con 2 query differenti
> iscritti
> SELECT Year([Data_Iscrizioni]) AS Iscritti, Count(Soci.IDAnag) AS
> ConteggioDiIDAnag
> FROM Soci
> GROUP BY Year([Data_Iscrizioni]);
> dimissioni
> SELECT Year([Data_Dimissioni]) AS Dimissioni, Count(Soci.IDAnag) AS
> ConteggioDiIDAnag
> FROM Soci
> GROUP BY Year([Data_Dimissioni])
> HAVING (((Year([Data_Dimissioni])) Is Not Null));
> ho provato
> SELECT Year([Data_Dimissioni]) AS Dimissioni, Count(Soci.IDAnag) AS
> SociDimissioni, Year([Data_iscrizioni]) AS Iscri, Count(Soci.IDAnag) AS
> sociiscr
> FROM Soci
> GROUP BY Year([Data_Dimissioni]), Year([Data_iscrizioni]);
>
> ma da quello voluto ovvero
> anno      iscritti       dimissioni
> 2006         10              1
> 2005         22              2
> sono ancora lontano
Una strada sarebbe usare 2 query:
prima query che p.e. si chiama "qryStatistica1"
SELECT Year(Data_Iscrizioni) AS Anno, Count(IDAnag) AS Iscritto, 0 AS
Dimissionato
FROM Soci
GROUP BY Year(Data_Iscrizioni)
UNION
SELECT Year(Data_Dimissioni) AS Anno, 0 AS Iscritto, Count(IDAnag) AS
Dimissionato
FROM Soci
WHERE Data_Dimissioni Is Not Null
GROUP BY Year(Data_Dimissioni);
seconda query:
SELECT Anno, Sum(Iscritto) AS Iscrizioni, Sum(Dimissionato) AS Dimissioni
FROM qryStatistica1
GROUP BY Anno
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: Query di conteggio

text:
Karl Donaubauer wrote:
>
> SELECT Year(Data_Iscrizioni) AS Anno, Count(IDAnag) AS Iscritto, 0 AS
> Dimissionato
> FROM Soci
> GROUP BY Year(Data_Iscrizioni)
> UNION
> SELECT Year(Data_Dimissioni) AS Anno, 0 AS Iscritto, Count(IDAnag) AS
> Dimissionato
> FROM Soci
> WHERE Data_Dimissioni Is Not Null
> GROUP BY Year(Data_Dimissioni);
Rivedendo cosa ho scritto la prima query potrebbe anche funzionare
(ed essere piů veloce) cosě:
SELECT Year(Data_Iscrizioni) AS Anno, 1 AS Iscritto, 0 AS Dimissionato
FROM Soci
UNION
SELECT Year(Data_Dimissioni) AS Anno, 0 AS Iscritto, 1 AS Dimissionato
FROM Soci
WHERE Data_Dimissioni Is Not Null
> seconda query:



title: Query di conteggio

author: CIDI

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:6q4mr1F...@mid.individual.net...
> Karl Donaubauer wrote:
>>
>> SELECT Year(Data_Iscrizioni) AS Anno, Count(IDAnag) AS Iscritto, 0 AS
>> Dimissionato
>> FROM Soci
>> GROUP BY Year(Data_Iscrizioni)
>> UNION
>> SELECT Year(Data_Dimissioni) AS Anno, 0 AS Iscritto, Count(IDAnag) AS
>> Dimissionato
>> FROM Soci
>> WHERE Data_Dimissioni Is Not Null
>> GROUP BY Year(Data_Dimissioni);
>
> Rivedendo cosa ho scritto la prima query potrebbe anche funzionare
> (ed essere piů veloce) cosě:
scusa Karl ... ma in questa query Statistica1 riveduta hai dimenticato il
Count?
> SELECT Year(Data_Iscrizioni) AS Anno, 1 AS Iscritto, 0 AS Dimissionato
> FROM Soci
> UNION
> SELECT Year(Data_Dimissioni) AS Anno, 0 AS Iscritto, 1 AS Dimissionato
> FROM Soci
> WHERE Data_Dimissioni Is Not Null
>
>> seconda query:
>>
>> SELECT Anno, Sum(Iscritto) AS Iscrizioni, Sum(Dimissionato) AS
>> Dimissioni FROM qryStatistica1
>> GROUP BY Anno
>
Ciao
Daniele


title: Query di conteggio

text:
CIDI wrote:
> "Karl Donaubauer ha scritto:
>>>
>>> SELECT Year(Data_Iscrizioni) AS Anno, Count(IDAnag) AS Iscritto, 0
>>> AS Dimissionato
>>> FROM Soci
>>> GROUP BY Year(Data_Iscrizioni)
>>> UNION
>>> SELECT Year(Data_Dimissioni) AS Anno, 0 AS Iscritto, Count(IDAnag)
>>> AS Dimissionato
>>> FROM Soci
>>> WHERE Data_Dimissioni Is Not Null
>>> GROUP BY Year(Data_Dimissioni);
>>
>> Rivedendo cosa ho scritto la prima query potrebbe anche funzionare
>> (ed essere più veloce) così:
>
> scusa Karl ... ma in questa query Statistica1 riveduta hai
> dimenticato il Count?
Ciao Daniele,
no, non è necessario perché la seconda query fa le somme di
tutti questi 1 e 0 della prima.
Però è buono che mi hai fatto guardare un altra volta sul enunciato
SQL perché invece del UNION bisogna UNION ALL. Altrimenti
JET farebbe un raggruppamento che non serve qui. Allora:
qryStatistica1
SELECT Year(Data_Iscrizioni) AS Anno, 1 AS Iscritto, 0 AS Dimissionato
FROM Soci
UNION ALL
SELECT Year(Data_Dimissioni) AS Anno, 0 AS Iscritto, 1 AS Dimissionato
FROM Soci
WHERE Data_Dimissioni Is Not Null
seconda query:
SELECT
Anno, Sum(Iscritto) AS Iscrizioni, Sum(Dimissionato) AS Dimissioni
FROM qryStatistica1
GROUP BY Anno
--
cu



title: Query di conteggio

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:6q558cF...@mid.individual.net...

Ciao  Karl
adesso è ok
Daniele


title: convertire in xls

author: fabry

text:
salve, ho bisogno di un'aiuto.
devo trasferire una tabella di access in un file xls.
il file di  destinazione in formato xls è un fle con campi formattati.Piu
precisamente il campo nome della tabella access deve essere trasferito nel
campo a7 della tabella excel, il campo citta della tabella access deve
essere trasferito nel campo b2 della tabella excel.
La tabella di destinazione xls e un modello e deve essere identico al file
esportato.
Grazie in anticipo


title: convertire in xls

author: AndreaPapi

text:

potresti prendere spunto nei precedenti post, Vedi la routine di Sergio
Mazza
http://groups.google.com/group/it.comp.appl.access/browse_thread/thread/3b1ef65aacc5bbde/3bc8bbbae930407c?q=creare+file+excell&rnum=10#3bc8bbbae930407c
potresti usare
  MyXL.Visible = False
per non visualizzare il foglio di Excel
per chiudere il file automaticamente usa:
    MyXL.ActiveWorkbook.SaveAs "nomeFile.xls" [, versioneExcel]
    MyXL.ActiveWorkbook.Close False
oppure
  MyXL.ActiveWorkbook.Save
  MyXL.ActiveWorkbook.Close False
ciao
Andrea Papi