title: Date() & Now()

text:
qualcuno che non conosco ha scritto:
> ...Date non posso avere un argomento
ed io *puo* avere un altro corso di lingua.
--
*§$%&*



title: Date() & Now()

author: ema

text:
Mio cugino mi ha detto che Karl Donaubauer <
ad...@donkarl.com
> scrisse:
> qualcuno che non conosco ha scritto:
>> ...Date non posso avere un argomento
>
> ed io *puo* avere un altro corso di lingua.
>
:-)
--
Emanuele Cesena        <
ece...@penguinpowered.com
>
http://www.penguinpowered.com/~ecesena
La grandi storie d'amore si dividono in 2 grandi categorie: quelle
sfortunate e quelle infelici.
		-- Da it.hobby.umorismo


title: Date() & Now()

text:
Mio cugino mi ha detto che Karl Donaubauer <
ad...@donkarl.com
> scrisse:
> ema <ece...@NOSPAMpenguinpowered.com> ha scritto:
>>...
>> nuovo_campo: Date(campo)
>>
>> criteri: Date()
>>
>> il problema e` che il campo data/ora e` un numero reale che nella aprte
>> intera salva la data, nella parte decimale l'ora.
>> La funzione date restituisce solo la parte intera (cioe` solo una data),...
>
> É differente nel'Access Italiano? Da noi e in Inglese Date non posso
> avere un argomento. Per questo dobbiamo usare: DateValue(campo)
>
giaggia`, hai ragione. Date() non accetta argomenti.
Perdonate lo svarione. :-)
bye!
P.S: comunque *spero* che almeno sulle funzioni, tutte le versioni di
Access siano uguali :-)
--
Emanuele Cesena        <
ece...@penguinpowered.com
>
http://www.penguinpowered.com/~ecesena
Cioe', uno dei fini ultimi e' questa cavolo di serenita' martoriata.  Il
ragionamento e' cosi'.  Non ci vuole un genio.  E allora, perche' dovrei
sacrificare i momenti di serenita' che mi vengono incontro
/spontaneamente/ lungo la strada?  [...]
La realta' e' che mi trovo costretto a sacrificare il me diciassettenne
felice di oggi pomeriggio a un eventuale me stesso calvo e sovrappeso,
cinquantenne soddisfatto, che apre la porta del garage col comando a
distanza e dentro c'ha una bella macchina, una moglie che probabilmente
gli fa le corna col commercialista e due figli gemelli con i capelli a
caschetto identici in tutto ai bambini nazisti della kinders.
		-- Enrico Brizzi, Jack Frusciante e' uscito dal gruppo


title: superare la protezione macro di access

author: Access

text:
Buonasera a tutti.
Un quesito:
è possibile impostare in qualche modo a "basso" la protezione delle macro di
access direttamente da codice appositamente creato in un db?
Insomma io vorrei che quando apro un db, la protezione macro si spostasse
sul livello "BASSO", questo per avitare di dover andare su ogni pc ed
impostare manualmente l'opzione.
Grazie ciao


title: superare la protezione macro di access

author: Gigi

text:


sulla guida  on line digita :
Risoluzione dei problemi relativi alla protezione macro e agli avvisi
non so se può essetri utile


title: sicurezza artelle di NT

author: dav

text:
sono l'amm,re di rete di una mini ditta...sistema NT4.0.
ho costruito in access una piccola applicazione in grado di svolgere
piccole mansioni. mi rimane però insoluta una questione:
come diavolo faccio a permettere ad access di aprire una cartella che
solo io posso aprire come
amm.re
 di rete e pescare dati se un altro
utente è loggato con la propria password. In altre parolequando apro
la cartella in esame per pescare o infilare dei file se sono loggato
io come
amm.re
 ok ma se mi loggo come un user qualsiasi ho la
possibilità di spedire da access il mio nome utente e la pwd da una
routine VBA per aprire la cartella? insomma un pò come quando si
connettono le tabelle di un db con password di accesso e si manda la
password aggiungendola in coda quando si richiama il metodo di
connessione.
mi rendo conto che qui entrano in gioco oggetti di sistema e se la
cosa non è prevista in una possibile api non ci riuscirò mai ......se
qualcuno sa come (sempreche mi sia espresso chiaramente) e me lo dice
è un amico.
ciao
david


title: sicurezza artelle di NT

author: Sergio MAZZA

text:
"dav" <
eli....@tiscalinet.it
> ha scritto nel messaggio
news:3b71986...@news.tiscalinet.it...

Il tuo problema sembra simile ad un altro già trattato; io avevo suggerito
di mapparsi la risorsa come disco locale e poi disconnetterla quando non
serviva più; se può esserti utile ecco le routine:
'--------------
Sub wshMapDrive()
Dim WshNet
Set WshNet = CreateObject("Wscript.Network")
WshNet.MapNetworkDrive "Z:", "\\NomeServer\NomeRisorsa", , "Administrator",
"Password"
Set WshNet = Nothing
End Sub
'--------------
'--------------
Sub wshUnMapDrive()
Dim WshNet
Set WshNet = CreateObject("Wscript.Network")
WshNet.RemoveNetworkDrive "Z:"
Set WshNet = Nothing
End Sub
'--------------
Ciao.


title: Utilizzo di report posto in un altro db Access

author: Roberto La Forgia

text:
Salute al tutto il NG,
e complimenti per le persone che vi scrivono (sto imparando tante cose
semplicemente leggendo!)
Ho un quesito cui spero di avere risposta positiva.
E' possibile da un database access di nome A accedere (o meglio far
eseguire un report) posto in un secondo database di nome B?
Grazie in anticipo,
Roberto
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


author: Gaspare

text:
"Roberto La Forgia" <
robertol...@virgilio.it
> ha scritto nel messaggio
news:2d295ef6f9c874c456d...@mygate.mailgate.org...

Si è possibile tramite scrivendo del codice che apra il db, il report etc..


text:
"Roberto La Forgia" <
robertol...@virgilio.it
> ha scritto nel messaggio
news:2d295ef6f9c874c456d...@mygate.mailgate.org...

http://www.donkarl.com/it/AccessFAQ.htm?/it/FAQ/FAQ9Link.htm
1.13 Apertura di un altro DB


author: Karl Donaubauer

text:
Roberto La Forgia wrote:
> E' possibile da un database access di nome A accedere (o meglio far
> eseguire un report) posto in un secondo database di nome B?
www.donkarl.com/it
 FAQ 1.14 Usare oggetti da altri database
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it
 + iscriviti alla prima Conferenza
Italiana per Sviluppatori di Access (CISA 1), Arezzo, 4+5/6/2005


text:
"Karl Donaubauer" <
NoS...@donkarl.com
> wrote in message
news:3bpd35F...@individual.net
> Roberto La Forgia wrote:
> > E' possibile da un database access di nome A accedere (o meglio far
> > eseguire un report) posto in un secondo database di nome B?
>
>
www.donkarl.com/it
 FAQ 1.14 Usare oggetti da altri database
Ottimo!!!
Grazie 1000,



title: ripristo del menù strumenti di un database

author: marco

text:
Ciao sono Marco,
ho progettato un database l'ho protetto da password( non quella di access,
ma tramite una form VB):fin quì tutto bene; il problema è sorto dopo aver
cambiato le proprietà delle maschere in visualizzazione e le impostazioni di
visualizzazione all'avvio del Database, in maniera che l'utente non potesse
apportare nessun tipo di modifica alle tabelle ed alle maschere. Problema:
ora se io voglio fare delle modifiche al database, non posso ripristinare le
proprietà di visualizzazione/modifica all'origine?
Spero mi aiutate, perchè non riesco in alcun modo! Grazie.
--------------------------------
Inviato via
http://usenet.libero.it


author: Carlo Costarella

text:
"marco" <
m.prio...@libero.it
> ha scritto nel messaggio
news:62Z110Z170Z50Y1...@usenet.libero.it...
> Ciao sono Marco,
> ho progettato un database l'ho protetto da password( non quella di access,
> ma tramite una form VB):fin quì tutto bene; il problema è sorto dopo aver
> cambiato le proprietà delle maschere in visualizzazione e le impostazioni
di
> visualizzazione all'avvio del Database, in maniera che l'utente non
potesse
> apportare nessun tipo di modifica alle tabelle ed alle maschere. Problema:
> ora se io voglio fare delle modifiche al database, non posso ripristinare
le
> proprietà di visualizzazione/modifica all'origine?
> Spero mi aiutate, perchè non riesco in alcun modo! Grazie.
>
>
Apri il db tenendo premuto il tasto maiuscolo e apporta le modifiche al menù
Avvio.
Ciao, Carlo


author: Marco

text:
Ti ringrazio immensamente!!
Marco
Il 22 Gen 2003, 11:40, "Carlo Costarella"
<
carloantoni...@virgilio.it
> ha scritto:

--------------------------------
Inviato via
http://usenet.libero.it


title: Errore creazione MDE

author: Happy

text:
Cordialità a tutti,
come da oggetto, appena cerco di creare un file .MDE in formato 2002-2003,
mi da' il seguente errore:
"Impossibile creare il database MDE" visualizza guida >>>>
"Questo errore è in genere correlato alla compilazione di un database di
grandi dimensioni in un file MDE.  A causa del metodo utilizzato per la
compilazione del database, per ogni tabella viene creato un numero
considerevole di riferimenti TableID.  Il modulo di gestione di database
Microsoft Jet versione 4.0 supporta la creazione contemporanea di un massimo
di 2048 riferimenti TableID aperti. L'esportazione di un database come file
MDE può comportare potenzialmente il superamento di questo limite se il
database include numerosi oggetti (tabelle, macro, maschere, report e così
via).
Non è disponibile un metodo preciso per stimare il numero di riferimenti
TableID utilizzati dal modulo di gestione di database Jet durante il
processo di compilazione di un database come file MDE. Tuttavia, ogni modulo
VBA e ogni maschera utilizza un riferimento TableID e ne consegue che, se il
database include 500 maschere e la proprietà Possiede modulo di ogni
maschera è impostata su Sì, verranno utilizzati 1.000 riferimenti TableID."
Ma quando maiiiiii! il file ha 5 tabelle, 8 query, 5 maschere e 4 report.-
peso totale M. 1,29
E' vero che non sono un geniaccio  :O))   ma mi pare esagerato.   Dove
sbaglio??
Grazie a tucci e ciao
Antonio


title: Errore creazione MDE

author: Alessandro Baraldi

text:
"Happy" <
orso...@virgilio.it
> wrote in message
news:R4Oae.1284087$
35.47...@news4.tin.it
> Cordialità a tutti,
> come da oggetto, appena cerco di creare un file .MDE in formato 2002-2003,
> mi da' il seguente errore:
> "Impossibile creare il database MDE" visualizza guida >>>>
[CUT]
> Ma quando maiiiiii! il file ha 5 tabelle, 8 query, 5 maschere e 4 report.-
> peso totale M. 1,29
>
> E' vero che non sono un geniaccio  :O))   ma mi pare esagerato.   Dove
> sbaglio??
>
> Grazie a tucci e ciao
>
> Antonio
Se hai inserito codice VBA verifica che non ci siano errori di
sintassi o assegnazioni variabili.
Per essere sicuro inserisci nei Moduli "Option Explicit" al
fine di scrivere codice decente.
Saluti
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: apparizioni scomparizioni.. magia siori e siore

text:
Una cosa che mi capita spesso con access e che nuoce gravemente alla
mia salute è ritrovarmi di colpo con ore di lavoro buttate, perché
senza un apparente motivo scompaiono intere fette di modifiche fatte al
codice, alle maschere..
Arrivando al caso specifico di poco fa: m'è appena scomparso tutto il
codice VBA di una maschera. Se apro la finestra di vba a sinistra vedo
quello relativo alle altre maschere, ma non questa. Provo a cliccare
gli eventi "on qualcosa" della proprietà della maschera per entrare in
vba e riscrivere codice da capo, niente, nemmeno questo!
Se clicco sui puntini di fianco all'evento non succede nulla
Sono l'unico sfigato a cui capitano di continuo problemi simili? Io non
ne posso più, fortuna che sto per cominciare a sviluppare su
vb.net
,
sono stanco dell'apparente mancanza di logica in alcuni problemi di
access.
Per carità, una logica ci sarà, ma non è di umana comprensione, non
la mia.
Domattina dev'essere consegnata la nuova release al cliente, stavo per
finire ed andarmene a casa, ora non so che ore farò.. :(


author: Alessandro Cara

text:
dai...@gmail.com
 wrote:
Pensavo di trovare qualcosa che riguardasse i miracoli ed invece si
scrive di accees.
Non e' giusto trarre in errore l'ignaro lettore
Fortunatamente access ha un cuore e ci vendica con furore
--
ac
email: w+1=x


text:
"Alessandro Cara" <alessandro.cara@aw+
1asistemi.it
> ha scritto nel messaggio
news:Z0J4h.2515$GM5...@tornado.fastwebnet.it...

Eheee... E' lunga per arrivare alle 19:00...
Ciao.
--
Sergio MAZZA


text:
<
dai...@gmail.com
> ha scritto nel messaggio
news:1163090734.0...@e3g2000cwe.googlegroups.com...




[risposta]
Non è che cambi causalmente l'associazione all'evento da [routine evento] a
qualcos'altro?
Ciao.
--
Sergio MAZZA


author: OneEDP

text:
<
dai...@gmail.com
> ha scritto nel messaggio
news:1163090734.0...@e3g2000cwe.googlegroups.com...




R:
Yes, è capitato anche a me ma solo in caso di "esportazioni" e
"importazioni" di una o più maschere da un db ad un altro utilizzato per
update parziali.
E' una prassi che ho abbandonato perché ha avuto più volte questi effetti
collaterali, nonché il famigarto "fuori rete" o cosa del genere.
Dopo parecchio codice preferisco chiudere access e riaprirlo dopo aver
effettuato una copia del lavoro.
Scomodo ma preventivo
Ciao


author: Pierpaolo D'Aimmo

text:
OneEDP ha scritto:
> R:
> Dopo parecchio codice preferisco chiudere access e riaprirlo dopo aver
> effettuato una copia del lavoro.
> Scomodo ma preventivo
Si io faccio spesso copie di backup per questo motivo, infatti ho perso
ore di lavoro invece che giorni, visto che faccio minimo 2 backup al
giorno
quasi quasi automatizzo un backup ogni 30 minuti
è necessario chiudere access per il backup ? al momento lo sto
facendo, ma per scrupolo
ovvio che un backup automatizzato rischia di prendere versioni in cui
ho salvato parziali modifiche, però meglio di niente


text:
Sergio MAZZA ha scritto:
> Non è che cambi causalmente l'associazione all'evento da [routine evento] a
> qualcos'altro?
no niente di così elaborato.. stavo lavorando normalmente
l'unica cosa strana che è successa è stato questo:
la maschera si chiama "risultato"
al ctrl+s da dentro VBA invece che salvare come di consueto, m'è
comparsa la popup "salvare come "risultato" ?" io commentavo "è pazzo,
perché me lo chiede".. provo a salvare e mi dice "impossibile
sovrascrivere".. mi pare giusto
chiudo la finestra di vba.. e da allora non riesco + ad entrarci, per
quella maschera
con le altre si, ma nel menu di vba a sx "risultato" è scomparsa


text:
"Pierpaolo D'Aimmo" <
dai...@gmail.com
> ha scritto nel messaggio
news:1163093806.0...@m73g2000cwd.googlegroups.com...
OneEDP ha scritto:
> R:
> Dopo parecchio codice preferisco chiudere access e riaprirlo dopo aver
> effettuato una copia del lavoro.
> Scomodo ma preventivo
Si io faccio spesso copie di backup per questo motivo, infatti ho perso
ore di lavoro invece che giorni, visto che faccio minimo 2 backup al
giorno
quasi quasi automatizzo un backup ogni 30 minuti
č necessario chiudere access per il backup ? al momento lo sto
facendo, ma per scrupolo
ovvio che un backup automatizzato rischia di prendere versioni in cui
ho salvato parziali modifiche, perň meglio di niente
R:
Sai bene che "salva" ha effetto soltanto dopo la chiusura di Access per
effetto delle cache e del limbo tra memoria e disco nonché alle "policy"
mirate ad un desktop db.
Prova infatti a terminare Access dai task dopo aver fatto salva e vedrai il
lavoro perso in ogni caso.
Dico sempre agli utenti dall'epoca di Win 2.0: cliccate con calma e
aspettate che il disco smetta di frullare. Ma tanto pochi prendono sul
serio, specialmente con gli ultimi processori che danno l'impressione di
eseguire tutto e di piů... ma tanto si impallano lo stesso... se stressati
con qualche click di troppo... a nulla valgono tonnellate di Gb di RAM.
Ciao
Daniele


title: Impedire lo scorrere i record con rotellina mouse

author: giro

text:
Ciao a tutti, sono Giro e vi chiedo ancora aiuto.
Come posso inibire lo scorrere dei record quando muovo la rotellina del
mouse?
Un grosso grazie.
Inviato da
www.mynewsgate.net


text:
"giro" <46...@mynewsgate.ned.invalid> wrote in message
news:200402191...@mynewsgate.net

Se hai Access2000 o XP trovi un esempio quì:
http://www.mantuanet.it/alessandro.baraldi/
Ciao.
@Alex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


author: Davide Spagnoli

text:
E se uno ha ACCESS 97?
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:9bb4971d297649a06f...@mygate.mailgate.org...



author: cidi

text:
"Davide Spagnoli" <
spag...@spagnoli.it
> ha scritto nel messaggio
news:c12gp9$25m$1...@lacerta.tiscalinet.it...
> E se uno ha ACCESS 97?
...sta fermo un giro! :)
poi riparte scrivendo correttamente dopo il quoting....ossia dopo il testo a
cui si sta rispondendo.
Questa č una delle poche regole di questo NG, le altre le trovi nel post di
Roberto da casa: come ci si dovrebbe comportare in un newsgroup - Istruzioni
per l'uso.
Daniele
> "Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
> news:9bb4971d297649a06f...@mygate.mailgate.org...
> > "giro" <46...@mynewsgate.ned.invalid> wrote in message
> >
news:200402191...@mynewsgate.net
> >
> > > Ciao a tutti, sono Giro e vi chiedo ancora aiuto.
> > > Come posso inibire lo scorrere dei record quando muovo la rotellina
del
> > > mouse?
> > > Un grosso grazie.
> > >
> > > Inviato da
www.mynewsgate.net
> >
> >
> > Se hai Access2000 o XP trovi un esempio quě:



text:
"Davide Spagnoli" <
spag...@spagnoli.it
> wrote in message
news:c12gp9$25m$
1...@lacerta.tiscalinet.it
> E se uno ha ACCESS 97?
>
>
Ti passo questa sera la revisione per A97...!



author: ALESSANDRO Baraldi

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:acc1b951826561a6e0...@mygate.mailgate.org...
> "Davide Spagnoli" <
spag...@spagnoli.it
> wrote in message
> news:c12gp9$25m$
1...@lacerta.tiscalinet.it
>
> > E se uno ha ACCESS 97?
> >
> >
>
> Ti passo questa sera la revisione per A97...!
>
> Ciao.
> @Alex.
Trovi quì la versione A97
http://web.tiscali.it/giorgiorancati/msaccess.htm
@Alex.


title: Server OLE

author: Maurizio

text:
Molto probabilmente il messaggio è già stato postato, ma non riesco a
troverne traccia. Nel tentativo di inserire un grafico, mi dà questo
messaggio: "Server OLE non registrato.Per registrarlo, rieseguire
l'operazione" già effettuata ma senza risultato, qualcuno sa come risolvere
il problema??. Dipende dal fatto che ci sono installate diverse versioni??
Grazie a tutti
Maurizio
--
     Di solito gli uomini
disprezzano le cose
    che non capiscono
                  Johann Wolfgang von Goethe


title: Server OLE

author: Emyr

text:
On Sat, 12 Jan 2002 20:04:30 GMT, "Maurizio" <
cal...@libero.it
>
wrote:
>Molto probabilmente il messaggio è già stato postato, ma non riesco a
>troverne traccia. Nel tentativo di inserire un grafico, mi dà questo
>messaggio: "Server OLE non registrato.Per registrarlo, rieseguire
>l'operazione" già effettuata ma senza risultato, qualcuno sa come risolvere
>il problema??. Dipende dal fatto che ci sono installate diverse versioni??
>Grazie a tutti
>Maurizio
vedi se sui riferimenti hai inserito il microsoft graph e se è
installato sul computer
Saluti.
Emanuele.


title: Server OLE

author: Adriana

text:
Ho avuto un problema simile. Mi compare lo stesso messaggio.
Tu come hai fatto ad eseguire la registrazione del server Ole?
Saluti.
"Maurizio" <
cal...@libero.it
> ha scritto nel messaggio
news:iF008.17215$cU4.5...@twister1.libero.it...



title: operazioni su stringhe

author: Tecnoship

text:
Allora io ho un campo [campo1] composta da un codice alfanumerico di 14
caratteri. come posso far creare in automatico 14 campi nella stessa tabella
rispettivamente [cifra1] [cifra2] eccc. contenenti le rispettive cifre del
codice. Ossia il campo [cifra1] deve contenere il primo carattere del
codice, il campo [cifra2] il secondo ecc.
grazie
---------------------------------------------
Tecnoship s.n.c.
Impianti Navali e Industriali
Mestre - Venezia
tel./FAX +39 (0)41 5312883
e-mail:
tecn...@tin.it
---------------------------------------------


title: operazioni su stringhe

author: Fabio Montagner

text: Funzioni right,mid e left


title: Evitare "#Errore" su Report o evitare report vuoto

author: CiPiStO

text:
Salve a tutti,
in una form ho un bottone che apre un report il quale prende i dati da una
query che deve fare un calcolo di differenza mesi tra la data corrente e
quella del record. Il mio problema è che fin quando nella tabella c'è un
record che hai come data sei mesi di differenza con quella odierna va tutto
bene ma se invece non dovesse esserci quando mi apro il report mi esce vuoto
invece io vorrei che desse un msg che non ci sono dati. Posto il codice
forse mi capite meglio:
Query:
SELECT * FROM tblAblazioni WHERE
datediff("m",tblablazioni.data_ablazione,Now())=6;
Codice del pulsante di stampa:
Private Sub cmdStampa_Click()
On Error GoTo Err_cmdStampa_Click
    Dim stDocName As String
    stDocName = "rptAblazioni"
    DoCmd.OpenReport stDocName, acPreview
Exit_cmdStampa_Click:
    Exit Sub
Err_cmdStampa_Click:
    Dim Messaggio
    Messaggio = MsgBox("Non ci sono Dati da Stampare!!", vbOKOnly +
vbCritical, "Gestione Ablazioni")
    Resume Exit_cmdStampa_Click
End Sub
Poi nel reporto ho una casella di testo che ha come origine di controllo:
=(Format([data_ablazione];"mmmm")) che quindi nel caso non dovessero esserci
recod da stampare mi compare #Errore
Grazie
CiPiStO


text:
"CiPiStO" <
cip...@hotmail.com
> ha scritto nel messaggio
news:QJE0d.236305$OR2.10...@news3.tin.it...

Scusate ho ragionato poco ..... ho risolto in questo modo:
Private Sub Report_NoData(Cancel As Integer)
    Dim Messaggio
    Messaggio = MsgBox("Non ci sono Dati da Stampare!!", vbOKOnly +
vbCritical, "Gestione Ablazioni")
    Cancel = True
End Sub
CiPiStO


title: Problemi di visualizzazione dati su report

author: Cabras

text:
         Salve, ho dei problemi a far visualizzare in un report i dati correttamente
consequenze sia orizzontali che verticali dei dati inseriti.
Devo comporre un documento che riepiloghi i dati come nell'esempio
sottoriportato:
                   (valori campo 3 con sequenza orizzontale)
                   1 Luglio 19xx 2 Luglio 20xx 3 Luglio 20xx ecc.
(valori
con 8 (=valore) 0 0 (campo 1)
seque.
orizz.)
                         0 2 1 (campo 2)
                          1 0 2 (campo 4)
ecc.
Spero di essere stata chiara.
Attendo un Vostro aiuto,
Saluti, Cristina
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Spostare immagine in primo piano con codice VBA

author: Robibg

text:
Ciao a tutti,
chi sa come spostare in primo piano una immagine in un report tramite
codice VBA?
grazie


author: Carlo Costarella

text:
"Robibg" <
rob...@gmail.com
> ha scritto nel messaggio
news:1169789455.1...@p10g2000cwp.googlegroups.com...

Non credo che per i report si possa fare....
il comando, è acCmdBringToFront.
Se il controllo che sta davanti l'immagine non ti serve puoi sempre renderlo
invisibile e avrai la sensazione che l'immagine si trovi in primo piano:
Me.Controllo.Visible = False
Ciao, Carlo


title: Dove trovare cosa

author: Ciccio Family

text:
Buongiorno a tutti,
sto cercando di creare una sorta di Diario Giornaliero in Access ma
incontro notevoli difficolta` vista la mia scarsa dimestichezza con
Access. Qualcuno di Voi sa dove posso trovare qualcosa ??
Grazie a tutti, vi auguro una buona giornata.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Dove trovare cosa

author: Maurizio Borrelli

text:
"Ciccio Family" <
toc...@vizzavi.it
> wrote in message
news:e6e0ceaf401967438de...@mygate.mailgate.org...
> Buongiorno a tutti,
> sto cercando di creare una sorta di Diario Giornaliero in Access ma
> incontro notevoli difficolta` vista la mia scarsa dimestichezza con
> Access. Qualcuno di Voi sa dove posso trovare qualcosa ??
        File > Nuovo...
        Modelli
        Database
    C'e' niente che faccia al caso tuo fra le autocomposizioni di questa
finestra? Magari non esattamente uguale ma quasi... Per iniziare potrebbe
andar bene lo stesso. Visita anche:

http://office.microsoft.com/italy/TemplateGallery/default.aspx
--
    (Facci sapere se ed eventualmente come hai risolto. Grazie.)
Ciao :o)
Maurizio
--------
?SPQR(C)
 X
--------


title: Dove trovare cosa

text:
Ciao Maurizio,
grazie per la tua risposta, pero' non sono riuscito a reperire nessuna
informazione da quel link. Hai altre fonti in merito ??
Grazie Ciccio.



title: Dove trovare cosa

text:
"Ciccio Family" <
toc...@vizzavi.it
> wrote in message
news:4af5e40d511edafc98c...@mygate.mailgate.org...
> Ciao Maurizio,
> grazie per la tua risposta, pero' non sono riuscito a reperire nessuna
> informazione da quel link. Hai altre fonti in merito ??
    Hai visitato anche il link al sito USA?
--



title: Errore in un campo calcolato

author: Romana Serafini

text:
 Il problema è questo ho una query che da una tabella in cui ho due campi di
tipo datatime (APERTURA e CHIUSURA) me li sottrae --> ottengo un
campo con la DURATA in  hh:mm:ss ora vorrei sommare tutte le durate in una
casella di testo a piè di pagina reaport =somma(durata) ma continuo
a visualizzarmi errore?!!!
Il messaggio preciso di errore è questo:
"Data type of the child for Sum, Average,or Standard Deviation aggregate
column (__agg0) must be numeric."
Qualcuno sa che cosa significa?!!
ciao grazie a tutti


title: Errore in un campo calcolato

author: Roberto da casa

text:
"Romana Serafini" <
rom...@radaimpianti.it
> ha scritto nel messaggio
news:43b178a8$0$1082$4faf...@reader3.news.tin.it...

Dovresti dirci come hai relaizzato il campo calcolato DURATA.
> ciao grazie a tutti
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: Errore in un campo calcolato

text:
"Roberto da casa" <
r.masso...@libero.it
> ha scritto nel messaggio
news:DUksf.19110$eD5.3...@twister2.libero.it...

Ho creato un report basato sulla query in cui vengono elencate APERTURA
CHIUSURA e DURATA
a piè di pagina reaport  ho inserito una casella di testo non associata
nell'Origine controllo =Somma([DURATA])
quando lancio il report compare il messaggio sopra riportato.
Ciao e a disposizione per ulteriori chiarimenti
Grazie!


title: Errore in un campo calcolato

text:
"Romana Serafini" <
rom...@radaimpianti.it
> ha scritto nel messaggio
news:43b292c8$0$1068$4faf...@reader3.news.tin.it...
>
> "Roberto da casa" <
r.masso...@libero.it
> ha scritto nel messaggio
> news:DUksf.19110$eD5.3...@twister2.libero.it...
> >
> > "Romana Serafini" <
rom...@radaimpianti.it
> ha scritto nel messaggio
> > news:43b178a8$0$1082$4faf...@reader3.news.tin.it...
> >>
> >>  Il problema è questo ho una query che da una tabella in cui ho due
campi
> > di
> >> tipo datatime (APERTURA e CHIUSURA) me li sottrae --> ottengo un
> >> campo con la DURATA in  hh:mm:ss ora vorrei sommare tutte le durate in
> >> una
> >> casella di testo a piè di pagina reaport =somma(durata) ma continuo
> >> a visualizzarmi errore?!!!
> >>
> >> Il messaggio preciso di errore è questo:
> >>
> >> "Data type of the child for Sum, Average,or Standard Deviation
aggregate
> >> column (__agg0) must be numeric."
> >>
> >> Qualcuno sa che cosa significa?!!
> >
> > Dovresti dirci come hai relaizzato il campo calcolato DURATA.
> >
> >> ciao grazie a tutti
> >
> > --
> > Roberto
> >
> >
>
> Ho creato un report basato sulla query in cui vengono elencate APERTURA
> CHIUSURA e DURATA
> a piè di pagina reaport  ho inserito una casella di testo non associata
> nell'Origine controllo =Somma([DURATA])
> quando lancio il report compare il messaggio sopra riportato.
>
> Ciao e a disposizione per ulteriori chiarimenti
Tutto ciò mi era chiaro anche dai post precedenti: quello che dovresti
postare è il codice SQL della query per vedere come calcoli il campo DURATA,
che a quanto sembra risulta non essere un campo numerico o Data/ora.
> Grazie!
Prego.



title: Errore in un campo calcolato

text:
"Roberto da casa" <
r.masso...@libero.it
> ha scritto nel messaggio
news:RVOsf.20665$eD5.3...@twister2.libero.it...

La tabella su cui eseguo la query è una tabella esterna denominata
Templa1___TEMLAV
Il codice della query è:
SELECT *, DATCH-DATAP AS DURATA
FROM Templa1...TEMLAV TEMLAV_1
ciao sabrina


title: Errore in un campo calcolato

text:
"Romana Serafini" <
rom...@radaimpianti.it
> ha scritto nel messaggio
news:43b57929$0$1068$4faf...@reader3.news.tin.it...
[CUT]
> >> Ho creato un report basato sulla query in cui vengono elencate APERTURA
> >> CHIUSURA e DURATA
> >> a piè di pagina reaport  ho inserito una casella di testo non associata
> >> nell'Origine controllo =Somma([DURATA])
> >> quando lancio il report compare il messaggio sopra riportato.
> >>
> >> Ciao e a disposizione per ulteriori chiarimenti
> >
> > Tutto ciò mi era chiaro anche dai post precedenti: quello che dovresti
> > postare è il codice SQL della query per vedere come calcoli il campo
> > DURATA,
> > che a quanto sembra risulta non essere un campo numerico o Data/ora.
> >
> >> Grazie!
> >
> > Prego.
> >
> > --
> > Roberto
> >
> >
>
> La tabella su cui eseguo la query è una tabella esterna denominata
> Templa1___TEMLAV
Cosa intendi per tabella esterna?
> Il codice della query è:
> SELECT *, DATCH-DATAP AS DURATA
> FROM Templa1...TEMLAV TEMLAV_1
Se i campi DATCH e DATAP sono di tipo Data/ora non dovresti avere alcun
problema
>
> ciao sabrina



title: Errore in un campo calcolato

text:
"Roberto da casa" <
r.masso...@libero.it
> ha scritto nel messaggio
news:Vyftf.105498$65.30...@twister1.libero.it...

La tabella è fisicamente in un altro database e siccome
io sto lavorando su un progetto ADP la tabella non la vedo come tabella ma
come query.
Forse è questo il problema??!!
Perchè io continuo ad avere l'errore sopra citato.
Ciao Sabrina


title: Errore in un campo calcolato

text:
"Romana Serafini" <
rom...@radaimpianti.it
> ha scritto nel messaggio
news:43b63f9a$0$1076$4faf...@reader1.news.tin.it...

A mio avviso il problema è che i campi DATCH e DATAP non sono di tipo
Data/ora; ma il valore del campo DURATA viene calcolato esattamente oppure
no?
> Perchè io continuo ad avere l'errore sopra citato.
Ma l' "altro database" è Access?
> Ciao Sabrina
Ciao e Buon Anno.



title: Errore in un campo calcolato

author: dato

text:
"Roberto da casa" <
r.masso...@libero.it
> ha scritto nel messaggio
news:rVttf.23488$eD5.3...@twister2.libero.it...

Il campo durata è calcolato esattamente
>
> > Perchè io continuo ad avere l'errore sopra citato.
>
> Ma l' "altro database" è Access?
e l'altro database è access97



title: Errore in un campo calcolato

text:
"dato" <
ra...@radaimpianti.it
> ha scritto nel messaggio
news:dpbt5j$o62$1...@carabinieri.cs.interbusiness.it...
[CUT]
> >
> > A mio avviso il problema è che i campi DATCH e DATAP non sono di tipo
> > Data/ora; ma il valore del campo DURATA viene calcolato esattamente
oppure
> > no?
> Il campo durata è calcolato esattamente
> >
> > > Perchè io continuo ad avere l'errore sopra citato.
> >
> > Ma l' "altro database" è Access?
> e l'altro database è access97
Stanti così le cose, mi dispiace ma non sono in grado di dirti il motivo per
cui non riesci nel report a fare la somma dei campi DURATA.
Ho provato a simulare la tua situazione in un database di prova, ma io non
ho i tuoi problemi e la somma dei campi DURATA avvengono regolarmente.
> Ciao Sabrina
Ciao



title: Errore in un campo calcolato

text:
"Roberto da casa" <
r.masso...@libero.it
> ha scritto nel messaggio
news:fyruf.26563$eD5.4...@twister2.libero.it...

Dopo svariate prove sono arrivata alla conclusione che
il problema è nel collagamento della tabella.
Infatti se la tabella che uso la collego ad un db access normale (.mdb)
riesco a fare quello che voglio; mentre
quando il collegamento lo facio con il mio progetto (.adp)
compare l'errore sopra citato.
Comunque grazie per l'aiuto ora vedo se qualcuno sa come mai succede quello
che ti ho descritto; per ora ho
aggirato il problema utilizzando un db mdb.
ciao e alla prossima


title: visualbasic

author: roby

text:
Sto leggendo un manuale per imparare qualche cosa
 ol manuale mi fa creare una form creare due caselle di testo che le nomina
com txtprima e txtseconda
mi fa inserire questo codice sul gotfocus della txtseconda
Private Sub TXTSECONDA_GotFocus()
If IsNull(Me.TXTPRIMA) Then
MsgBox "ATTENZIONE, è NECESSARIO IMMETTERE UN VALORE " & "NELLA PRIMA
CASELLA"
Me.TXTPRIMA.SetFocus
Exit Sub
End If
End Sub
e funziona
allora per curiosità provo ad aprire visualbasic 6 e faccio la medesiima
cosa ma non funziona.
Esiste una differenza???


title: visualbasic

text:
"roby" wrote in message
news:f7Yik.5523$
0N....@tornado.fastwebnet.it
:
Ciao roby.
> Sto leggendo un manuale per imparare qualche cosa
Esattamente cosa? Cioe`, qual e` l`argomento trattato dal manuale?
>  ol manuale mi fa creare una form creare due caselle di testo che le nomina
> com txtprima e txtseconda
> mi fa inserire questo codice sul gotfocus della txtseconda
> Private Sub TXTSECONDA_GotFocus()
> If IsNull(Me.TXTPRIMA) Then
> MsgBox "ATTENZIONE, è NECESSARIO IMMETTERE UN VALORE " & "NELLA PRIMA
> CASELLA"
> Me.TXTPRIMA.SetFocus
> Exit Sub
> End If
> End Sub
> e funziona
Non mi fiderei troppo di un manuale che ti abitua a usare le proprieta`
di default. Prova cosi`:
Private Sub txtSeconda_GotFocus()
    If IsNull(Me.txtPrima.Value) Then
      MsgBox "ATTENZIONE, è NECESSARIO IMMETTERE UN VALORE " _
           & "NELLA PRIMA CASELLA"
	Me.txtPrima.SetFocus
      Exit Sub
    End If
End Sub
> allora per curiosità provo ad aprire visualbasic 6 e faccio la medesiima
> cosa ma non funziona.
Questo e` appunto l`effetto collaterale dell`uso della proprieta` di
default: non avverti che stai operando con due proprieta` diverse. Tra
l`altro di due oggetti diversi.
> Esiste una differenza???
Certo. La vedi per mezzo del visualizzatore Oggetti (Tasto F2).
Access:
Property Value As Variant
    Membro predefinito di Access.TextBox
Visual Basic (Classic):
Property _Default As String
    Membro predefinito di VB.TextBox
-ovvero-
Property Text As String
    Membro di VB.TextBox
    Restituisce o imposta il testo contenuto nel controllo.
Noti il differente tipo (AC:Variant, VB:String) della proprieta`?
Pertanto con VB(Classic) dovrai scrivere:
Private Sub txtSeconda_GotFocus()
    If Len(Me.txtPrima.Text) = 0 Then
      MsgBox "ATTENZIONE, è NECESSARIO IMMETTERE UN VALORE " _
           & "NELLA PRIMA CASELLA"
	Me.txtPrima.SetFocus
      Exit Sub
    End If
End Sub
ma io prenderei in considerazione l`uso di:
Event Validate(ByRef Cancel As Boolean)
    Membro di VB.TextBox
    Viene generato quando un controllo perde lo stato attivo a favore di
un controllo che provoca la convalida.
Volendo scrivere codice che possa essere eseguito indifferentemente nei
due ambienti (perche' mai?!? ma ammettiamo pure) dovresti scrivere:
Private Sub txtSeconda_GotFocus()
    If Len("" & Me.txtPrima) = 0 Then
      MsgBox "ATTENZIONE, è NECESSARIO IMMETTERE UN VALORE " _
           & "NELLA PRIMA CASELLA"
	Me.txtPrima.SetFocus
      Exit Sub
    End If
End Sub
--
Ciao!
Maurizio Borrelli [Microsoft MVP Office System]
http://www.riolab.org/


title: visualbasic

text:
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:g6hmvg$n16$1...@tdi.cu.mi.it...

sei un mago
Il manuale è ACCESS 2002 USO AVANZATO MARCO DE MAGGIO


title: Sito su ACCESS

author: Speed

text:
Salve a tutti,
vi segnalo questo sito che tratta l'argomento dei DataBase e in particolare
su Access.
Il sito è ben fatto (anche vista l'affluenza dei visitatori) e tratta per
sezioni,
tutti i vari argomenti (Tabelle, Maschere, Report, Query, Macro e Moduli) di
Access.
Inoltre vengono trattati anche gli argomenti su SQL e Visual Basic for
Applications.
Il sito è esente da pubblicità, quindi si può navigare molto velocemente.
Sono presenti anche delle sezioni riguardanti le FAQ ed è presente anche una
pagina in cui,
è possibile chiedere aiuto e informazioni su i DataBase.
Inoltre il sito è stato recensito dalla rivista informatica PC WORLD ITALIA.
Se non altro vi consiglio di visitarlo.
L'indirizzo è
http://web.tiscalinet.it/programmazione/
Grazie per aver letto.
Cordiali saluti.


title: Sito su ACCESS

author: Ronny

text:
Se andassero i link ....
Speed <
carm...@libero.it
> wrote in message
Ag2t7.884$C15....@news.infostrada.it...



title: Problema con import dati da AS400

author: Graziano

text:
Salve a tutti, sto provando ad importarmi un file residente su AS400 (SO
V4R3M0) ad excel (lo stesso problema mi si presenta se tento il collegamento
con access, mentre se importo funziona benissimo), ma al momento di
restituirmi i dati mi appare il seguente
errore: SQL0104 TOKEN * WAS NOT VALID. Le ho provate un po tutte lascio solo
campi alfanumerici che contengono almeno un carattere, niente sempre lo
stesso errore. La versione che utilizzo de ODBC č CLIENT ACCESS ODBC
Driver(32-Bit) 5.00.00.00 5/5/98 la versione del SO del PC č W98SE mentre
quella del client access č 3.2.0. Qualcuno ha avuto lo stesso problema??? Sa
darmi un dritta per risolverlo???


title: Problema con import dati da AS400

author: Andrea

text:
Graziano wrote:

Non so darti informazioni sull'errore pero' potresti vedere 2 cose:
1) i file AS spesso contengono campi compressi prova a controllare se
il tuo file e' uno di questi.
2) in una cartella dell'AS ci dovrebbe essere la versione di Client
Access 4.3.0 con le versioni aggiornate del driver ODBC
per saperne di piu' sul lato AS prova a postare su it.comp.as400 la ci
sono i guru che ti sapranno dire di piu' e anche la cartella corretta.
Ci sino delle FAQ su
http://www.faq400.com/
--
Ciao
Andrea Malfatti


title: Problema con import dati da AS400

author: Mauro&Giusi

text:
Graziano <
in...@studiogamma-ct.it
> wrote in message
ambsn1$jsj$1...@fe1.cs.interbusiness.it...
>
> Salve a tutti, sto provando ad importarmi un file residente su AS400 (SO
> V4R3M0) ad excel (lo stesso problema mi si presenta se tento il
collegamento
> con access, mentre se importo funziona benissimo), ma al momento di
> restituirmi i dati mi appare il seguente
> errore: SQL0104 TOKEN * WAS NOT VALID. Le ho provate un po tutte lascio
solo
> campi alfanumerici che contengono almeno un carattere, niente sempre lo
> stesso errore. La versione che utilizzo de ODBC è CLIENT ACCESS ODBC
> Driver(32-Bit) 5.00.00.00 5/5/98 la versione del SO del PC è W98SE mentre
> quella del client access è 3.2.0. Qualcuno ha avuto lo stesso problema???
Sa
> darmi un dritta per risolverlo???
>
>
>
>
>
>
>
>
>
>
>
>
>
Ho usato regolarmente ODBC su AS400 e non ho avuto grossi problemi ad
acquisire i dati da AS400. Ho effettuato la connessione ODBC ed una volta
ottenuto il link dell'archivio tramite query mi sono gestito il tutto. Sia
creando un nuovo archivio in access che creando uno esterno in EXCEL. Il
problema è riesci a vedere e a leggere la tabella importata da AS400 su
access ? Secondo me se non riesci su questo primo punto devi concentrare la
tua attenzione sulla connessione ODBC. Problemi ne ho invece riscontrati con
il flusso opposto (da PC as AS400). La tecnica è più complessa perchè
bisogna costruire prima il tracciato su AS400 e poi scaricare i dati
successivamente con una semplice query. Sulle versioni non posso darti
indicazioni perchè è molto che non ci lavoro più.


title: Dateserial, formula errata.

author: montanaro®

text:
Ciao, non capisco cosa c'è di errato, sono arrugginito ma l'ho sempre
usata;
scritta così mi da errore (l'ho fatto x provare):
Espr1: DateSerial(2005;12;10)
e anche così:
DateSerial(Year(data.tabella); Month(data.tabella)+1;1)-1 (cerco
l'ultimo gg del mese).
i punto e virgola sono corretti, ho usato l'autocomposizione x la
formula.
Grazie


title: Dateserial, formula errata.

author: Marco Pizzamiglio

text:
montanaroŽ ha scritto:
> Ciao, non capisco cosa c'č di errato, sono arrugginito ma l'ho sempre
> usata;
> scritta cosě mi da errore (l'ho fatto x provare):
> Espr1: DateSerial(2005;12;10)
> e anche cosě:
> DateSerial(Year(data.tabella); Month(data.tabella)+1;1)-1 (cerco
> l'ultimo gg del mese).
> i punto e virgola sono corretti, ho usato l'autocomposizione x la
> formula.
> Grazie
Vedi se risolvi con
http://www.donkarl.com/it/
7.1 - Riferimenti.
Ciao.
-Marco-
--
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: Dateserial, formula errata.

text:
On 6 Mar, 11:30,
marco.pizzamig...@gmail.com
 (Marco Pizzamiglio)
wrote:
> montanaro® ha scritto:
>
> > Ciao, non capisco cosa c'è di errato, sono arrugginito ma l'ho sempre
> > usata;
> > scritta così mi da errore (l'ho fatto x provare):
> > Espr1: DateSerial(2005;12;10)
> > e anche così:
> > DateSerial(Year(data.tabella); Month(data.tabella)+1;1)-1 (cerco
> > l'ultimo gg del mese).
> > i punto e virgola sono corretti, ho usato l'autocomposizione x la
> > formula.
> > Grazie
>
> Vedi se risolvi conhttp://
www.donkarl.com/it/
> 7.1 - Riferimenti.
> Ciao.
> -Marco-
>
Ciao, rispondo con ritardo.....non riuscendo in altro modo ho provato
a creare un altro DB ed importare tutto nel DB nuovo.
Non va, però la cosa è strana, la stessa formula in un altro DB
funziona, avete idee?
Grazie.


title: includere la calcolatrice nei propri db

text:
siccome non so se il db andrà su win98 o xp ecc.... il file calc.exe non
sempre ha la stessa posizione
secondo voi posso inlcuderlo in una mia cartella e poi richiamarlo ed essere
in regola? visto che c'è in tutte le versioni di windows io non faccio altro
che richiamarla da un altro posto.
secondo voi?


title: includere la calcolatrice nei propri db

author: George

text:

Bah... usa:
shell "calc.exe", vbNormalFocus
che funziona sempre...
Poi vedi tu se ti conviene impazzire a fare altre cose astruse.


title: includere la calcolatrice nei propri db

author: Paolo opg

text:
"Simba883" <
simb...@libero.it
> wrote in
news:c6tlae$sla$
1...@lacerta.tiscalinet.it
:

per la licenza, non so dirti...
se però l'applicativo girerà anche su macchine 9x, fai qualche prova per
decidere se inserire la calcolatrice di win2k/xp oppure quella di win9x,
dato che la prima, potrebbe non funzionare sui sistemi 9x.
a me era capitato un problema simile con paint: il problema era una dll,
che la versione di paint per nt richiede e che ovviamente su win9x non
c'è...
--
+-------
| Paolo opg
|
| janickg ( at ) hotmail ( dot ) com
| (fake address in reply-to field!)
+-------


title: Euro

author: Miro

text:
Ciao a tutti
Ho una tabella con diversi campi in valuta devo convertirli in euro come
posso fare?
grazie e ciao.


title: Euro

author: norica

text:
be....la maniera piů semplice č una query di aggiornamento...
costruisciti un semplice query di selezione, con l'autocomposizione guidata,
scegliendo la tabella ove andrai a modificare i valori che ti interessano...
nella struttura della query fai un click col tasto destro del mouse nella
"parte grigia dove stanno le tabelle utilizzate per la query" e scegli
tipoquery: di aggiornamento...
mettiti sul campo che devi aggiornare e in corrispondenza di "aggiorna a"
scrivi una semplice formula del genere:
([nomedelcampochedeviaggiornare]/1936,27)
e lancia la query
ciaoooooooooo
--
Posted from
smtp5.libero.it
 [193.70.192.55]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Euro

author: Pleiadi

text:
""norica"" <
nor...@libero.it
> ha scritto nel messaggio
news:000301c09417$485d3300$ee02a8c0@ev...
> be....la maniera piů semplice č una query di aggiornamento...
>
> costruisciti un semplice query di selezione, con l'autocomposizione
guidata,
> scegliendo la tabella ove andrai a modificare i valori che ti
interessano...
> nella struttura della query fai un click col tasto destro del mouse nella
> "parte grigia dove stanno le tabelle utilizzate per la query" e scegli
> tipoquery: di aggiornamento...
> mettiti sul campo che devi aggiornare e in corrispondenza di "aggiorna a"
> scrivi una semplice formula del genere:
> ([nomedelcampochedeviaggiornare]/1936,27)
>
...e alla fine di tutto ciň aggiorna la data del tuo computer..........
Alfio


title: Euro

text:
"Pleiadi" <
za...@libero.it
> ha scritto nel messaggio
news:Jbah6.31243$GM6.1...@news.infostrada.it...
>
> ""norica"" <
nor...@libero.it
> ha scritto nel messaggio
> news:000301c09417$485d3300$ee02a8c0@ev...
> > be....la maniera più semplice è una query di aggiornamento...
> >
> > costruisciti un semplice query di selezione, con l'autocomposizione
> guidata,
> > scegliendo la tabella ove andrai a modificare i valori che ti
> interessano...
> > nella struttura della query fai un click col tasto destro del mouse
nella
> > "parte grigia dove stanno le tabelle utilizzate per la query" e scegli
> > tipoquery: di aggiornamento...
> > mettiti sul campo che devi aggiornare e in corrispondenza di "aggiorna
a"
> > scrivi una semplice formula del genere:
> > ([nomedelcampochedeviaggiornare]/1936,27)
> >
>
> ...e alla fine di tutto ciò aggiorna la data del tuo computer..........
> Alfio
Grazie ragazzi per la vostra disponibilità ciao


title: attivazione evento

author: paoloalbino

text:
buongiorno a tutti.
Scrivo per il seguente quesito.
Ho un PC con un applicativo di ricezione dati sempre attivo (24H su
24).   Questo applicativo salva i dati in un database access.
Vorrei ora realizzare, sempre in access, un database che possa far
partire una serie di eventi all'arrivo di una nuova trasmissione
(aprire maschera - allarme audio).
Io lascerei sempre aperto il database access; ho la tabella che si
arricchisce di una riga all'arrivo della trasmissione; CHE COMANDO
POSSO UTILIZZARE PER RICONOSCERE IN AUTOMATICO QUESTO EVENTO?
Spero di essere riuscito a spiegare correttamente il problema; grazie
per l'aiuto.
PAOLO CARRARA


title: attivazione evento

author: Sergio MAZZA

text:
"paoloalbino" <
paolo...@hotmail.com
> ha scritto nel messaggio news:1156036601.3...@i3g2000cwc.googlegroups.com...

Se nč parlato pochi giorni fa su microsoft.public.it.office.access (server:
news.microsoft.com
); l'oggetto č: Protocollo seriale-2
del: 10/08/2006 inviato da lucio...
Ciao.
--
Sergio MAZZA


title: attivazione evento

text:
grazie, adesso ci provo.
  PAOLO


title: curiosità personale...

author: ringo

text:
Salve a tutti,
tabella:
prodotto A    prodottoB    prodottoC
125                    254            2254
voi che tecnica usereste per trasformare la tabella cosě:
prodotto    valore
prodottoA    125
prodottoA    254
prodottoA    2254
grazie!
ringo


title: curiosità personale...

author: stefano (kabisa)

text:
"ringo" <
ri...@tiscali.it
> ha scritto nel messaggio
news:b3fucl$fl4$1...@newsread.albacom.net...

Scusa non ho capito, tu vuoi che tutti diventino prodotto A
ho ai sbagliato a scrivere?
stefano


title: curiosità personale...

text:
"stefano (kabisa)" <
stl...@tin.it
> ha scritto nel messaggio
news:29L6a.231437$0v.65...@news1.tin.it...

opssssssss ho sbagliato :
> > prodotto    valore
> >
> > prodottoA    125
> > prodottoB    254
> > prodottoC    2254
> >


title: curiosità personale...

author: Roberto da casa

text:
"ringo" <
ri...@tiscali.it
> ha scritto nel messaggio
news:b3fucl$fl4$1...@newsread.albacom.net...

Io userei una query unione.
Se la tabella si chiama Tabella1 la query unione dovrebbe avere un codice
SQL simile a questo:
SELECT "prodottoA" As Prodotto, [prodotto A] As Valore
FROM Tabella1
UNION SELECT "prodottoB" As Prodotto, [prodotto B] As Valore
FROM Tabella1
UNION SELECT "prodottoC" As Prodotto, [prodotto C] As Valore;
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: recodset in loop lunghetto

author: elisa

text:
Salve a tutti
devo fare dei file excel, da una query1 devo estrarre dei centri di
costo e da ogni centro di costo mandare in esterno un excel con i dati
a lui riferiti alla query2
con questo scritto speravo di mandare tutta la query2 a tutti quelli
della query1 ma continua ad mandare in continuazione oltre al numero
selezionato da query1
qualche consiglio?
strSQL1 = "SELECT * FROM [query1] "
strSQL1 = strSQL1 & " ORDER BY [ID1] "
strSQL = "SELECT * FROM [query2] "
strSQL = strSQL & " ORDER BY [ID2] "
Set db = CurrentDb
Set rst1 = db.OpenRecordset(strSQL1, dbOpenSnapshot)
'primo ciclo
Do Until rst1.EOF
Set rst = db.OpenRecordset(strSQL, dbOpenSnapshot)
intRow = 5
appExcel.Application.Visible = True
appExcel.WindowState = xlMaximized 'Massimizza la finestra
Set appWorkBook = appExcel.Workbooks.Add
Set wskWorkBook = appWorkBook.Worksheets(2)
    With wskWorkBook
         Do Until rst.EOF'secondo ciclo
            .Cells(intRow, 3).Value = rst!mission
            .Cells(intRow, 4).Value = rst!politiche
            .Cells(intRow, 5).Value = rst!strategie
            rst.MoveNext
            intRow = intRow + 1
        Loop
    End With
  wskWorkBook.SaveAs FileName:="C:\Documenti\Prova.xls",
FileFormat:=xlNormal

 rst1.MoveNext
  Loop


title: recodset in loop lunghetto

author: Alessandro Baraldi

text:
"elisa" <
elisaf...@email.it
> wrote in message
news:13e66d48.0405...@posting.google.com

Premesso che nel tuo caso devi fare un JOIN tra le 2 Query
non ha senso fare quel lavoro.
Prova acomporti la NUOVA Query inserendo QRY1 e QRY2 unite
in JOIN dove le proprietà del JOIN saranno =1.
Quì ora devi avere perforza quello che serve.
Poi come gestire il tutto io ti allego una semplificazione
di quello che hai fatto tu(sostanzialmente è uguale, ma tecnicamente
più raffianto e sopprattutto FLESSIBILE)
Se devi cambiare WorkSheet ti basta inserirlo nel Ciclo
ad incremento....!!!
In EXCEL le Celle possono essere Battezzate, cioè puoi dargli
un Nome.
Questo nome se "Casualmente" è = al nome del Field del Recordset
ti semplifica enormemente la vita in quanto non devi sapere dov'è
ma basta chiamarla.
Ti passo una Routine che ho fatto per compilare i campi
con Dati estratti da un RECORDSET DAO.
Ovviamente se devi limitare il numero di Campi(Fields da passare
ti basta esplicitarli nella "SELECT Campo1,Campo2,Campo3 FROM...."
Public Sub Compila()
    On Error GoTo Err_Compila
    Dim rs As DAO.Recordset
    Dim fld As DAO.Field
    Dim nme As Excel.Name
    DoCmd.Hourglass True
    Set rs = CurrentDb.OpenRecordset("SELECT * FROM tuaTABELL WHERE
[IDX]=" & IDPROGR)
    Set xlsApp = CreateObject("Excel.Application")
    xlsApp.Application.Workbooks.Open FileName:=txtNomeFile,
Editable:=True
    Set xlsActiveWkb = xlsApp.Application.ActiveWorkbook

    For Each fld In rs.Fields             ' Ciclo sull'insieme Fields
del recordset
      For Each nme In xlsActiveWkb.Names  ' Ciclo sull'insieme Names
della cartella attiva
        If fld.Name = nme.Name Then       ' Se il nome campo è uguale al
nome di Name
           With xlsActiveWkb.Worksheets(1).Range(nme.Name)
            '.Select                      'Seleziono la cella
            .Value = fld.Value            'Ci scrivo il Value del field
del recordset
          End With
        End If
      Next nme
    Next fld
    xlsActiveWkb.Save
    xlsApp.Application.Visible = True
    rs.close
    Set rs = Nothing
Exit_Here:
   DoCmd.Hourglass False
   Exit Sub
Err_Compila:
   MsgBox "E' avvenuto il seguente Errore: " & vbCrLf & _
            err.Description, vbCritical, "OLE Error!"
   Resume Exit_Here
Ciao.
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: recodset in loop lunghetto

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:e53651f7cdb6283bf7...@mygate.mailgate.org...

Ehmm.. Io ci aggiungerei:
... (dichiarazioni)
Dim xlsApp As Exel.Application, xlsActiveWkb As Excel.Workbook
... (codice)
Exit_Here:
   DoCmd.Hourglass False
    xlsActiveWkb.Save '<-- l'ho spostato qui
    xlsApp.Application.Visible = True '<-- l'ho spostato qui
    rs.close  '<-- l'ho spostato qui
    Set rs = Nothing '<-- l'ho spostato qui
    set fld = nothing
    set nme = nothing
   Exit Sub
Ciao.
--
Sergio MAZZA


title: recodset in loop lunghetto

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> wrote in message
news:c8fqgv$rd5$
1...@canarie.caspur.it
[CUT]
> Ehmm.. Io ci aggiungerei:
> ... (dichiarazioni)
> Dim xlsApp As Exel.Application, xlsActiveWkb As Excel.Workbook
> ... (codice)
> Exit_Here:
>    DoCmd.Hourglass False
>     xlsActiveWkb.Save '<-- l'ho spostato qui
>     xlsApp.Application.Visible = True '<-- l'ho spostato qui
>     rs.close  '<-- l'ho spostato qui
>     Set rs = Nothing '<-- l'ho spostato qui
>     set fld = nothing
>     set nme = nothing
>    Exit Sub
>
> Ciao.
Che devo dire non fà na piega.... ma da me in caso d'errore
non deve salvare(ANZI)...il RECORDSET confermo è proprio una bella
svista
la dichiarazione dell'Oggetto è esterna alla Function
e viene chiuso in caso d'errore quindi non mi serve renderlo
Visibile....!!
Ciao.
@Alex.



title: recodset in loop lunghetto

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:2ff14a1ef51426efa5...@mygate.mailgate.org...

Hai reso invisibile anche dove lo indicavi? O mi cala la palpebra?
> Ciao.
> @Alex.
Vabbé va, uno pari palla al centro...
Ciao.
--
Sergio MAZZA


title: recodset in loop lunghetto

author: ALESSANDRO Baraldi

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:c8fsjp$rsq$1...@canarie.caspur.it...
> "Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
> news:2ff14a1ef51426efa5...@mygate.mailgate.org...
> > "Sergio MAZZA" <
sergi...@tiscali.it
> wrote in message
> > news:c8fqgv$rd5$
1...@canarie.caspur.it
> >
> > [CUT]
>
> Hai reso invisibile anche dove lo indicavi? O mi cala la palpebra?
No, almeno mi pare, questa applicazione non la uso da un anno..., ma
se non ricordo male riguardando il tutto lo rendo visibile solo dopo averlo
salvato e questo avviene se non ho incontrato errori...!!
Forse sbaglio.....!
> > Ciao.
> > @Alex.
>
> Vabbé va, uno pari palla al centro...
>
> Ciao.
> Sergio MAZZA
No, hai visto bene tu, è sicuramente da ottimizzare....!
@Alex.


title: recodset in loop lunghetto

text:
premesso che sono rimasta stupita della mole di lavoro e suggerimenti
che mi avete mandato, non posso měnascondre he mi  č voluta tutta la
sera per leggere con un pň di attenzione tutto...e sicuramente tutto
domani srň impegnata a provarlo vi farň sapere i risultati grazie di
cuore e buona notte
elisa


title: recodset in loop lunghetto

text:
"elisa" <
elisaf...@email.it
> ha scritto nel messaggio
news:13e66d48.04051...@posting.google.com...
> premesso che sono rimasta stupita della mole di lavoro e suggerimenti
> che mi avete mandato, non posso mìnascondre he mi  è voluta tutta la
> sera per leggere con un pò di attenzione tutto...e sicuramente tutto
> domani srò impegnata a provarlo vi farò sapere i risultati grazie di
> cuore e buona notte
> elisa
Eddai Alessà, pure stavolta avemo fatto colpo!
Hi! Hi! Due settimane così e il Biso è detronizzato...
Ciao.
--
Sergio MAZZA


title: recodset in loop lunghetto

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> wrote in message
news:d4Yqc.215212$
hc5.9...@news3.tin.it

Non gridarlo troppo o inveisce e ci manda ANATEMI...!!!
Sai che ha 100 occhi per queste faccende di "CODICE".



title: Importare dati

author: Michele

text:
Salve a tutto il NG
ho la necessità di importare dati da un database access in un altro.
I due DB hanno però struttura diversa. C'è un modo per farlo comunque??
Grazie mille in anticipo
Michele


title: Importare dati

author: MA

text:

certo che puoi devi però fare delle query che adattino la struttura di
partenza a quella di invio
Il tutto è però fattibilissimo lavorandoci su
NOn si può dare una risposta risolutiva, cmq
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: una matrice in una tabella

text:
domanda facile facile (per voi)
tramite una sub ho creato una matrice i cui dati dovrebbero essere riversati
in una tabella: come fare?
Grazie
Diego


title: una matrice in una tabella

text:
"Diego_one" <
yoko...@freemail.it
> ha scritto nel messaggio
news:bqi3ma$nm0$1...@news.unina.it...

Apri un recordset sulla tua tabella e con un ciclo scorri la tua matrice e
per ogni elemento della matrice registra un record nella tua tabella.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: una matrice in una tabella

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:5s1zb.162612$e6.59...@twister2.libero.it...
>
> "Diego_one" <
yoko...@freemail.it
> ha scritto nel messaggio
> news:bqi3ma$nm0$1...@news.unina.it...
> > domanda facile facile (per voi)
> >
> > tramite una sub ho creato una matrice i cui dati dovrebbero essere
> riversati
> > in una tabella: come fare?
> >
> > Grazie
> > Diego
>
> Apri un recordset sulla tua tabella e con un ciclo scorri la tua matrice e
> per ogni elemento della matrice registra un record nella tua tabella.
>
> --
> Roberto
>
Anzitutto, grazie per la risposta.
Potresti essere un pò più dettagliato:
la mia matrice è numerica ed è 5 x 20
Grazie ancora
Diego


title: una matrice in una tabella

text:
"Diego_one" <
yoko...@freemail.it
> ha scritto nel messaggio
news:bqi7ee$oqs$1...@news.unina.it...
>
> "Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
> news:5s1zb.162612$e6.59...@twister2.libero.it...
> >
> > "Diego_one" <
yoko...@freemail.it
> ha scritto nel messaggio
> > news:bqi3ma$nm0$1...@news.unina.it...
> > > domanda facile facile (per voi)
> > >
> > > tramite una sub ho creato una matrice i cui dati dovrebbero essere
> > riversati
> > > in una tabella: come fare?
> > >
> > > Grazie
> > > Diego
> >
> > Apri un recordset sulla tua tabella e con un ciclo scorri la tua matrice
e
> > per ogni elemento della matrice registra un record nella tua tabella.
> >
> > --
> > Roberto
> >
> Anzitutto, grazie per la risposta.
>
> Potresti essere un pň piů dettagliato:
> la mia matrice č numerica ed č 5 x 20
>
> Grazie ancora
> Diego
Se nella tabella devi registrare un record per ogni riga della matrice.
Se la dichiarazione della matrice č la seguente:
Dim MiaMatrice (4, 19) As Long
Creati una tabella chiamata Tabella1 e che ha la seguente struttura:
Riga              Numerico e chiave primaria
Campo0       Numerico
Campo1       Numerico
Campo2       Numerico
Campo3       Numerico
Campo4       Numerico
Campo5       Numerico
Campo6       Numerico
Campo7       Numerico
Campo8       Numerico
Campo9       Numerico
Campo10     Numerico
Campo11     Numerico
Campo12     Numerico
Campo13     Numerico
Campo14     Numerico
Campo15     Numerico
Campo16     Numerico
Campo17     Numerico
Campo18     Numerico
Campo19     Numerico
Per scaricare nella Tabella1 la matrice MiaMatrice (un record di tabella per
ogni riga di matrice), esegui il seguente codice VBA:
Dim rs As DAO.Recordset
Dim ContaR As Integer
Dim ContaC As Integer
DoCmd.SetWarnings False
DoCmd.RunSQL "DELETE * FROM Tabella1;"
Set rs = CurrentDb().OpenRecordset("Tabella1")
DoCmd.SetWarnings True
For ContaR = 0 To 4
rs.AddNew
rs!Riga = ContaR
For ContaC = 0 To 19
rs("Campo" & Trim(ContaC)) = MiaMatrice(ContaR, ContaC)
Next ContaC
rs.Update
Next ContaR
Set rs = Nothing
La routine VBA di cui sopra fa riferimento alla libreria Microsoft DAO
quindi, se usi una versione di Access successiva ad Access 97, aggiungi tale
libreria ai riferimenti del tuo database.



title: una matrice in una tabella

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:_R2zb.158252$vO5.6...@twister1.libero.it...
>
> "Diego_one" <
yoko...@freemail.it
> ha scritto nel messaggio
> news:bqi7ee$oqs$1...@news.unina.it...
> >
> > "Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
> > news:5s1zb.162612$e6.59...@twister2.libero.it...
> > >
> > > "Diego_one" <
yoko...@freemail.it
> ha scritto nel messaggio
> > > news:bqi3ma$nm0$1...@news.unina.it...
> > > > domanda facile facile (per voi)
> > > >
> > > > tramite una sub ho creato una matrice i cui dati dovrebbero essere
> > > riversati
> > > > in una tabella: come fare?
> > > >
> > > > Grazie
> > > > Diego
> > >
> > > Apri un recordset sulla tua tabella e con un ciclo scorri la tua
matrice
> e
> > > per ogni elemento della matrice registra un record nella tua tabella.
> > >
> > > --
> > > Roberto
> > >
> > Anzitutto, grazie per la risposta.
> >
> > Potresti essere un pò più dettagliato:
> > la mia matrice è numerica ed è 5 x 20
> >
> > Grazie ancora
> > Diego
>
> Se nella tabella devi registrare un record per ogni riga della matrice.
> Se la dichiarazione della matrice è la seguente:

Grazie, è perfetto!
Diego :o)


title: codice per numerazione progressiva decrescente.

author: MaxMattia

text:
Buongiorno
(la faccio in breve )
 ho una tabella anagrafica con campo nome e cognome e numeroP §(progressivo)
e numeroI (inverso)

tramite questo codice, popolo il progressivo quando l'anagrafica è sempre
uguale, azzzerando il contatore al cambio anagrafica :

   Do Until ana.EOF

                    If ana.nome <> strPrecedente Then Y = 0
                    ana.Edit
                    Y = Y + 1
                    ana.NumP = Y
                    ana.Update
                    strPrecedente = ana.nome
                    ana.MoveNext
      Loop

Adesso nella tabella ho aggiunto un altro campo, numP che dovrei popolare
con una numerazione descrescente,

riesco a prendere il totale dei record per la singola anagrafica :

X = Dcount("[nome]", "[Ana]",  "[Ana]=" & ana.nome

ma come lo decremento al record successivo ?

Grazie


text:
Il giorno giovedì 18 maggio 2017 10:37:15 UTC+2, MaxMattia ha scritto:
> Buongiorno
> (la faccio in breve )
>  ho una tabella anagrafica con campo nome e cognome e numeroP §(progressivo)
> e numeroI (inverso)
>
> tramite questo codice, popolo il progressivo quando l'anagrafica è sempre
> uguale, azzzerando il contatore al cambio anagrafica :
>
>
>    Do Until ana.EOF
>
>                     If ana.nome <> strPrecedente Then Y = 0

                      If ana.nome <> strPrecedente Then
                         X = Dcount("[nome]", "[Ana]",  "[Ana]=" & ana.nome
                      else
                         X=X-1
                      end if

>                     ana.Edit
>                     Y = Y + 1
>                     ana.NumP = Y

                      ana.NumI = X

>                     ana.Update
>                     strPrecedente = ana.nome
>                     ana.MoveNext
>       Loop
>
> Adesso nella tabella ho aggiunto un altro campo, numP che dovrei popolare
> con una numerazione descrescente,
>
> riesco a prendere il totale dei record per la singola anagrafica :
>
>
> X = Dcount("[nome]", "[Ana]",  "[Ana]=" & ana.nome
>
> ma come lo decremento al record successivo ?
>
> Grazie

 Prova così... dovrebbe andare bene


title: Funzione DIR che non obbedissie ai Jolly

author: RobertoA

text:
Dalla directory con le mie fatture, e filemetadati, e file firmati,
vorrei filtrare e leggere solo le fatture, quelli con estensione xml e
prima dell'estensione finale un underscore e cinque caratteri qualsiasi

IT01234567890A_00001.XML
IT01234567890A_00001_MT_001.XML
IT01234567890ABCDEF_00051.XML
IT01234567890ABCDEF_00051_MT_001.XML
IT01234567890ABCDEF_00051.XML.P7M

il primo ed il terzo files sono fatture, il secondo e quarto sono i
files metadati
Per leggere solo i files fatture eseguo del codice di questo tipo:

-----------------------------------------------
file_corrente=DIR(dir_coi_file_fattura & "\*_?????.XML", vbNormal)

Do while file_corrente<>""
	debug.print file_corrente
	file_corrente=DIR
	loop
----------------------------------------------

Ma li mostra sempre tutti i primi quattro
Non come mi attenderei solo il primo ed il terzo
Allora che sappia io, il carattere * indica la presenza di 0 o piu'
caratteri qualsiasi, poi' c'e' l'undescore, poi ci sono cinque caratteri
qualsiasi e poi  .XML
Sto riguardando questa istruzione da migliaia di secondi, ma non riesco
a trovarci niente di anomalo rispetto a quanto desidero ottenere
Induvele' che sballio ?


text:

Infatti devi mettere nel Ciclo:

    IF file_corrente LIKE "*[_?????].XML" Then

    End if

Verifica meglio il PATTERN non ho cercato ma è componibile...

@Alex


text:

No, quello che volevo fare e' partire da un set gia' filtrato
Non selezionare dentro al ciclo
E' la DIR iniziale che vorrei 'piegare ai miei voleri'
Nel ciclo scorreranno i file listati dalla dir iniziale
Quindi quello che vorrei capire e' se sia possibile eseguire una DIR che
visualizzi solamente i file:
- che abbiano estensione .xml
- dove il deci-ultimo carattere sia _
- dove i 5 caratteri seguenti il deci-ultimo siano 5 caratteri qualsiasi
Ho provato anche a fare una dir via finestra dos, che immagino
restituisca gli stessi file della dir via vba
Niente, nun se piega


text:
Puoi provare a spingere per piegarlo... ho pero paura delle conseguenze... perchè pare... dico "pare"... non sia flessibile.

Se troverai una soluzione sarà interesante conoscerla...

@Alex


text:
Valuta questa soluzione, che poi era quello che dicevo...

https://stackoverflow.com/questions/17176904/vba-dir-function-filtering-to-avoid-files

@Alex


text:

Ringrazio per l'aiuto
Ma il problema contingente e' gia' stato risolto usando il ciclo e la
funzione Like come hai consigliato tu
Resta la curiosita' di capire come mai la DIR non funzioni


title: Problemi di importazione file txt con ISAM + SCHEMA.ini

author: Gatti

text:
Vi segnalo questi 2 problemi che purtroppo non riesco a risolvere:
1) Devo importare un file di testo (delimitato dal Tab) in una nuova tabella
ACCESS.
Se eseguo l'importazione guidata manuale va tutto bene.
Se automatizzo il tutto inserendo un file SCHEMA.INI nella stessa directory
del file .txt mi importa tutti i record ma per alcuni record
vedendo nella tabella di access tutti i campi contengono la scritta
#Eliminato.
Guarda a caso questi record nella colonna 3 contengono delle virgolette "
che se vado eliminare (manualmente) nel file txt mi risolvono il problema.
Non potendo eliminarle automaticamente (importazione da Oracle) vi chiedo
cosa devo correggere nel seguente file .INI per ovviare il problema:
[codice.txt]
format = tabdelimited
character set = ansi
column1 = Data_ricezione
column2 = Codice
column3 = SUBSTR(ANNOTAZIONI,1,200)
Conoscete delle risorse in rete che spiegano come scrivere schema ISAM (se
non bestemmio ...) come quello usato da me sopra?
2)Se volessi accodare (in maniera automatica, cioè con un click dell'utente)
ad una tabella access già presente come dovrei variare il mio codice (su
Access 97).
Vi elenco il codice che uso per creare una tabella
Private Sub Comando0_Click()
Dim dbs As Database
Dim tdf As TableDef
Dim a As Integer
Set dbs = CurrentDb
Set tdf = dbs.CreateTableDef("prova")
tdf.Connect = "TEXT;DATABASE=D:\CODICE\"
tdf.SourceTableName = "codice.txt"
dbs.TableDefs.Append tdf
Set dbs = Nothing
End Sub
IO pensavo di aprire la tabella come recordset e poi fare lo stesso ma non
funziona:
sapete illuminarmi?
Grazie mille
Stefano Gatti
mailto:
sfg...@libero.it


text:
"Gatti" <
sfg...@libero.it
> ha scritto nel messaggio
news:FmlC6.21084$s93.1...@news.infostrada.it...
> Vi segnalo questi 2 problemi che purtroppo non riesco a risolvere:
>
> 1) Devo importare un file di testo (delimitato dal Tab) in una nuova
tabella
> ACCESS.
> Se eseguo l'importazione guidata manuale va tutto bene.
> Se automatizzo il tutto inserendo un file SCHEMA.INI nella stessa
directory
> del file .txt mi importa tutti i record ma per alcuni record
> vedendo nella tabella di access tutti i campi contengono la scritta
> #Eliminato.
> Guarda a caso questi record nella colonna 3 contengono delle virgolette "
> che se vado eliminare (manualmente) nel file txt mi risolvono il problema.
> Non potendo eliminarle automaticamente (importazione da Oracle) vi chiedo
> cosa devo correggere nel seguente file .INI per ovviare il problema:
>
> [codice.txt]
> format = tabdelimited
> character set = ansi
> column1 = Data_ricezione
> column2 = Codice
> column3 = SUBSTR(ANNOTAZIONI,1,200)
>
>
> Conoscete delle risorse in rete che spiegano come scrivere schema ISAM (se
> non bestemmio ...) come quello usato da me sopra?
>
> 2)Se volessi accodare (in maniera automatica, cioč con un click
dell'utente)
> ad una tabella access giŕ presente come dovrei variare il mio codice (su
> Access 97).
>
> Vi elenco il codice che uso per creare una tabella
>
> Private Sub Comando0_Click()
>
> Dim dbs As Database
> Dim tdf As TableDef
> Dim a As Integer
>
> Set dbs = CurrentDb
> Set tdf = dbs.CreateTableDef("prova")
>
> tdf.Connect = "TEXT;DATABASE=D:\CODICE\"
> tdf.SourceTableName = "codice.txt"
> dbs.TableDefs.Append tdf
>
> Set dbs = Nothing
> End Sub
>
>
> IO pensavo di aprire la tabella come recordset e poi fare lo stesso ma non
> funziona:
>
> sapete illuminarmi?
>
> Grazie mille
>
> Stefano Gatti
> mailto:
sfg...@libero.it
>
Hai provato a salvare tutta l'operazione che esegui manualmente e
richiamarla poi in vba?
Es.
'-------------
DoCmd.TransferText acImportDelim, "nome specifica di importazione",
"nomeTabella", "d:\varie\sergio\ng\nomeFile.txt", True
'-------------
Questo per importare il file; se devi crearti solo il collegamento cambi la
costante "acImportDelim" in "acLinkDelim"...
Ciao.


title: somma di durata

author: Ema

text:
salve a tutti
vorrei calcolare il totale delle durate in una query con i seguenti
campi:
Ora_Inizio: campo data/ora
Ora_Fine: campo data/ora
Durata: Format$(IIf([Ora fine]-[Ora inizio]>0;[Ora fine]-[Ora
inizio];1+[Ora fine]-[Ora inizio]);"hh:nn:ss")
non riesco a sommare il campo durata. Come faccio??  Qualcuno mi può
dare una dritta??


title: somma di durata

author: Gabriele Bertolucci

text:
> vorrei calcolare il totale delle durate in una query con i seguenti
> campi:
> Ora Inizio: campo data/ora
> Ora Fine: campo data/ora
> Durata: Format$(IIf([Ora fine]-[Ora inizio]>0;[Ora fine]-[Ora
> inizio];1+[Ora fine]-[Ora inizio]);"hh:nn:ss")
> non riesco a sommare il campo durata. Come faccio??  Qualcuno mi può
> dare una dritta??
SELECT
  tbl01.ID,
  tbl01.OraInizio,
  tbl01.OraFine,
  IIf([OraInizio]>[OraFine],FormatDateTime(1+[OraFine]-[OraInizio],3),FormatDateTime([OraFine]-[OraInizio],3))
AS Differenza
FROM tbl01;
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it


title: R:Dsum

author: Vilcoyote

text:
Mi spiego meglio.
Ho una tabella [Articoli] con i seguenti campi:
[Codice]    [Esistenza]
     C1                0
     C2                0
     C3                0
     C4                0
     C5                0
     C6                0
Ho anche una tabella [Carichi] con i seguneti campi:
[Codice Articolo]      [Quantità]
         C3                           2
         C1                         95
         C3                           8
         C5                     1102
         C3                           6
Se eseguo una query con i campi [Codice Articolo] ed
Esistenza:DSum(nz([Carichi]![Quantità]);"Carichi";"[Codice Articolo]=" &
Chr(34) &[Articoli]![Codice] & Chr(34))
con join [Articoli]--[Carichi] mi risulta
[Codice Articolo] [Esistenza]
       C3                       6
       C1                     95
       C3                     24
       C5                 1102
       C3                     18
io invece vorrei risultasse
[Codice Articolo] [Esistenza]
       C3                     16
       C1                     95
       C3                     16
       C5                 1102
       C3                     16
se join [Articoli]->[Carichi] mi risulta
[Codice Articolo] [Esistenza]
       C1                     95
       C2                     #Errore
       C3                     18
       C3                     24
       C3                       6
       C4                     #Errore
       C5                  1102
       C6                     #Errore
Grazie comunque per la risposta.
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:%xU38.5243$Mj4.1...@twister2.libero.it...
>
> Vilcoyote <
v...@tiscaline.it
> wrote in message
> m1T38.4330$vh.1...@twister1.libero.it...
> Il join deve esterno rispetto alla tabella articoli, cioè con la freccia
> rivolta verso la tabella carichi. In questo modo prendi tutti i record di
> articoli, e quelli di carichi che sono agganciati dal join
>
> Antonio
>
>


title: R:Dsum

author: Antonio Biso

text:
Vilcoyote <
v...@tiscaline.it
> wrote in message
sbX38.6155$Mj4.1...@twister2.libero.it...
> Mi spiego meglio.
PRIMO: SCRIVI DOPO IL QUOTING, PRIMO!
> "Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
> news:%xU38.5243$Mj4.1...@twister2.libero.it...
> >
> > Vilcoyote <
v...@tiscaline.it
> wrote in message
> > m1T38.4330$vh.1...@twister1.libero.it...
> > Il join deve esterno rispetto alla tabella articoli, cioè con la freccia
> > rivolta verso la tabella carichi. In questo modo prendi tutti i record
di
> > articoli, e quelli di carichi che sono agganciati dal join
> >
> > Antonio
> Ho una tabella [Articoli] con i seguenti campi:
> [Codice]    [Esistenza]
>      C1                0
>      C2                0
>      C3                0
>      C4                0
>      C5                0
>      C6                0
> Ho anche una tabella [Carichi] con i seguneti campi:
> [Codice Articolo]      [Quantità]
>          C3                           2
>          C1                         95
>          C3                           8
>          C5                     1102
>          C3                           6
>
> Se eseguo una query con i campi [Codice Articolo] ed
> Esistenza:DSum(nz([Carichi]![Quantità]);"Carichi";"[Codice Articolo]=" &
> Chr(34) &[Articoli]![Codice] & Chr(34))
Mi spieghi prima di continuare perchè parli di query e poi mi scrivi Dsum?
Antonio


title: R:Dsum

text:
Non capisco che significhi scrivi dopo il quoting e comunque per qualsiasi
cosa se ti ha offeso mi dispiace.
In secondo luogo non capisco la domanda sulla query e dsum: non lo so ma č
forse vietato usare dsum in una query ?


title: R:Dsum

text:
Vilcoyote <
v...@tiscaline.it
> wrote in message
Kki48.5968$6e5.1...@twister2.libero.it...
> Non capisco che significhi scrivi dopo il quoting e comunque per qualsiasi
> cosa se ti ha offeso mi dispiace.
Il quoting č quello che stavolta non hai lasciato per niente. E si risponde
scrivendo in mezzo o DOPO il quoting!!!
> In secondo luogo non capisco la domanda sulla query e dsum: non lo so ma č
> forse vietato usare dsum in una query ?
La Dsum č una funzione di aggregazione sui domini e normalmente si usa nel
codice o nelle espressioni dentro maschere o report. Gią di per la dsum
esegue un'operazione di query, senzxa fare una query vera e propria. Non ha
senso pertanto usarla dentro la query. A quel punto si esegue una query di
raggruppamento e si usa la funzione somma.
Forse dovresti spiegare meglio il contesto in cui ti trovi, cosa vuoi fare
senza dare la tua soluzione...
Antonio


title: Barra degli strumenti

author: NF

text:
E' possibile far sparire la barra degli strumenti 'Visualizzazione maschera'
di una sola maschera?
Grazie
Un saluto
Francesco


title: Barra degli strumenti

author: <Andrea Asioli>

text:
Si è possibile:
- Apri la maschera interessata
- Seleziona 'Personalizza' dal menu 'Strumenti'
- Nella scheda 'Barre degli strumenti' togli il segno di spunta dalle barre
che NON vuoi che vengano visualizzate e viceversa.
- In questa finestra puoi anche creare delle barre degli strumenti
personalizzate ed addirittura creare tu l'immagine dei pulsanti ed assegnare
loro delle macro!
Spero di esserti stato utile.
Ciao
Andrea Asioli
NF <
nfr...@s.it
> wrote in message 6ap46.4539$FF1.3...@twister1.tin.it...



title: Barra degli strumenti

author: Bracca Services

text:
<Andrea Asioli> <
andrea...@tin.it
> wrote in message
FMu46.5291$jT6.2...@twister2.tin.it...
> Si è possibile:
> - Apri la maschera interessata
> - Seleziona 'Personalizza' dal menu 'Strumenti'
> - Nella scheda 'Barre degli strumenti' togli il segno di spunta dalle
barre
> che NON vuoi che vengano visualizzate e viceversa.
> - In questa finestra puoi anche creare delle barre degli strumenti
> personalizzate ed addirittura creare tu l'immagine dei pulsanti ed
assegnare
> loro delle macro!
>
> Spero di esserti stato utile.
> Ciao
> Andrea Asioli
Grazie, ma questo vale per tutte le maschere dell'applicazione in corso. A
me servirebbe eliminare la barra solo per un maschera.
Un saluto
Francesco


title: Barra degli strumenti

text:
Scusa se mi permetto di insistere, ma a me ha funzionato. Ti sei assicurato
di aver aperto la maschera interessata prima di richiamare la finestra
'Personalizza'?
Andrea
Bracca Services <
braccas...@tiscalinet.it
> wrote in message
92vna4$j8n$1...@lacerta.tiscalinet.it...



title: Barra degli strumenti

text:
"<Andrea Asioli>" <
andrea...@tin.it
> ha scritto nel messaggio
news:k0P46.6856$jT6.3...@twister2.tin.it...
> Scusa se mi permetto di insistere, ma a me ha funzionato. Ti sei
assicurato
> di aver aperto la maschera interessata prima di richiamare la finestra
> 'Personalizza'?
>
> Andrea
>
> Bracca Services <
braccas...@tiscalinet.it
> wrote in message
> 92vna4$j8n$1...@lacerta.tiscalinet.it...
> > Grazie, ma questo vale per tutte le maschere dell'applicazione in corso.
A
> > me servirebbe eliminare la barra solo per un maschera.
> >
> > Un saluto
> > Francesco
Ho riprovato più volte con una maschera aperta ed anche in struttura
seguendo le voci di menu che mi hai indicato ma il risultato è sempre lo
stesso: la barra di 'Visualizzazione Maschera' mi sparisce anche per le
altre maschere dell'applicazione in corso.
Ciao
Francesco


title: Barra degli strumenti

text:
Hai ragione (scusa), ho provato anch'io e fa la stessa cosa che a te. A
questo punto per far sparire la barra 'Visualizzazione maschera' non ti
rimane che mettere il segno di spunta su una barra (già esistente o creata
da te) che non dia fastidio alla tua applicazione (es. una barra che
dupplica alcuni comandi di menù (tipo Salva record; Filtro in base a
selezione; Filtro in base a maschera; Rimuovi Filtro ecc) ), in questo modo,
selezionando solo quest'ultima nella finestra 'Personalizza', sarà l'unica
barra che vedrai nella tua maschera.
Ciao
Andrea
NF <
nfr...@s.it
> wrote in message Fo456.8029$jT6.3...@twister2.tin.it...



title: Barra degli strumenti

author: Silvio Berruti

text:
"NF" <
nfr...@s.it
> ha scritto nel messaggio
news:6ap46.4539$FF1.3...@twister1.tin.it...
> E' possibile far sparire la barra degli strumenti 'Visualizzazione
maschera'
> di una sola maschera?
>
Vai sul Sito Comune (indirizzo + sotto) e tra le Tips & Tricks troverai
anche "Routine per togliere e rimettere la barra dei menu in Access 97" di
Giorgio Valsangiacomo
(
http://members.xoom.it/_XOOM/it_db_access/tips20.htm
 )
Dovrebbe fare al caso tuo.
--
Silvio
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access


title: Chiusura automatica maschera o tempo di inattività

author: Roberto Spinella Esteban

text:
E' possibile chiudere automaticamente una maschera dopo tot secondi che non
si verifica alcun evento  (Keyboard o mouse) ?
E' possibile abbinare un evento sulla pressione del tasto 1 o 2 della
tastiera (non F1 o F2) ?
Grazie in anticipo


author: stefano

text:
"Roberto Spinella Esteban" <
rs...@tiscali.it
> ha scritto nel messaggio
news:b0hc8t$osg$1...@lacerta.tiscalinet.it...

tecnicamente è tutto possibile ....
per il secondo quesito basta che sull'evento kypress controlli il tasto
premuto e se 1 o 2 fai quello che vuoi
stefano


text:
"Roberto Spinella Esteban" <
rs...@tiscali.it
> ha scritto nel messaggio
news:b0hc8t$osg$1...@lacerta.tiscalinet.it...

1)
Sfrutta l'Evento OnTimer di Form, inserisci una Variabile di totalizzazione
as Integer
e ad ogni evento OnTimer sommi 1 alla Variabile.
Se dimensioni il Time=1000(1 Sec.) e aggiungi un controllo sempre
nell'Evento OnTimer
prima di eseguire l'incremento generi quello che chiedi.
Private Sub TuaForm_OnTimer()
If TuaVariabile=300 Then Docmd.Close Me.Name 'In questo caso sono 5minuti
TuaVariabile=TuaVariabile+1
End Sub
2)Se vuoi che il controllo dei tasti sia esteso a tutte le finestre del DB
puoi usare la Macro AUTOKEYS
se invece è dedicato alla Form utilizzata inserisci il codice di controllo
su Evento KeyDown........!!!
@Alex.


author: Roberto da casa

text:
"Roberto Spinella Esteban" <
rs...@tiscali.it
> ha scritto nel messaggio
news:b0hc8t$osg$1...@lacerta.tiscalinet.it...
> E' possibile chiudere automaticamente una maschera dopo tot secondi che
non
> si verifica alcun evento  (Keyboard o mouse) ?
Vai sul Sito Comune (link qui sotto) e nella  Sezione Forms fai il download
del database di esempi allegato alla FAQ intitolata "Esempi di utilizzo
delle forms".
Apri il database scaricato e seleziona il Topic: intitolato How to Detect
User Idle Time or Inactivity; pigia il pulsante Show Example e ti verrą
mostrato un esempio di ciņ che vuoi realizzare.
Maggiori ragguagli su come realizzare ciņ che hai visto li puoi trovare al
seguente link:
http://support.microsoft.com/support/kb/articles/Q128/8/14.asp?PR=ACC
> E' possibile abbinare un evento sulla pressione del tasto 1 o 2 della
> tastiera (non F1 o F2) ?
Per questo problema ti ha risposto in maniera esaustiva @Alex
>
> Grazie in anticipo
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: [OT] Saluti e aggiornamenti ...

author: ciroteo

text:
Ciao a tutti, come state?
Sono stato latitante per diversi mesi ... ma vi tengo sempre nel
cuore!
Giusto per stare sul leggero ... volevo dire una cosa: una mia amica
ha chiamato il cane ADO ... boh ... in tempi in cui è tornato di moda
il DAO....
Spero che il caldo non vi sciolga le tastiere, buon lavoro a tutti.
Mat


title: [OT] Saluti e aggiornamenti ...

text:
ciroteo wrote:
> Ciao a tutti, come state?
> Sono stato latitante per diversi mesi ... ma vi tengo sempre nel
> cuore!
> Giusto per stare sul leggero ... volevo dire una cosa: una mia amica
> ha chiamato il cane ADO ... boh ... in tempi in cui è tornato di moda
> il DAO....
evidentemente non segue le mode,
lei è una trend setter o io per esempio sono un trend mastino napoletano!!!
>
> Spero che il caldo non vi sciolga le tastiere, buon lavoro a tutti.
credo che il caldo faciliti la fuga di cervelli... o almeno di quel poco che in molti casi trova
> Mat
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


title: [OT] Saluti e aggiornamenti ...

author: Sergio MAZZA

text:
"ciroteo" <
matteo...@gmail.com
> ha scritto nel messaggio
news:49cc5629-eb07-4f8d...@c9g2000yqm.googlegroups.com...
Ciao a tutti, come state?
Sono stato latitante per diversi mesi ... ma vi tengo sempre nel
cuore!
Giusto per stare sul leggero ... volevo dire una cosa: una mia amica
ha chiamato il cane ADO ... boh ... in tempi in cui � tornato di moda
il DAO....
[risposta]
Perch� ha visto che con ADO non ha problemi di riferimenti...
Risponde subito alla prima chiamata...
Spero che il caldo non vi sciolga le tastiere, buon lavoro a tutti.
[risposta]
Ma sentite tutto 'sto caldo? E ad Agosto che fate? Vi rintanate nel
frigorifero?
Mat
[risposta]
Ciao.
--
Sergio MAZZA


title: Gestire un interruttore in una maschera con campi associati

author: Pino

text:
Ho la necessita' di inserire degli interrutttori in una maschera della
mia applicazione che ha i campi associati a una query.
Il fatto e' che se inserisco un interruttore nella maschera questo si
comporta come un pulsante. Come posso fare in modo che l'interruttore
si comporti come tale...in una maschera associata a campi?
Grazie.


author: Karl Donaubauer

text:

Cosa intendi con "come un pulsante"?
Secondo me un interruttore si comporta sempre come un
interruttore, p.e. in contrario al pulsante resta incassato se
ha lo stato Vero.
Certo un controllo non associato ha lo stesso stato per tutti record.
Puoi descrivere meglio cosa vuoi ottenere?
--
Ciao
Karl
*********
Access FAQ:
www.donkarl.com/it


text:
On 28 Lug, 11:21, "Karl Donaubauer" <
NoS...@donkarl.com
> wrote:
> Cosa intendi con "come un pulsante"?
> Secondo me un interruttore si comporta sempre come un
> interruttore, p.e. in contrario al pulsante resta incassato se
> ha lo stato Vero.
Ecco appunto. Nella mia maschera l'interruttore NON resta incassato
quando lo si preme. Cio' e' dovuto al fatto che l'interruttore sta in
una maschera associata. Visivamente crea confusione perche' l'utente
non riesce a capire bene in che stato ci si trova...
Esiste un modo per rendere "visibile" gli stati dell'interruttore (a
meno di non ricorrere a label...)


text:
On 29 Lug, 13:37, Pino <
ngi...@yahoo.it
> wrote:
> Ecco appunto. Nella mia maschera l'interruttore NON resta incassato
> quando lo si preme. Cio' e' dovuto al fatto che l'interruttore sta in
> una maschera associata. Visivamente crea confusione perche' l'utente
> non riesce a capire bene in che stato ci si trova...
> Esiste un modo per rendere "visibile" gli stati dell'interruttore (a
> meno di non ricorrere a label...)
Aggiungo che non e' solo un problema di layout. Anche da codice gli
stati dell'interruttore non funzionano.


author: Geppo

text:
Ciao Pino wrote:
> On 29 Lug, 13:37, Pino <
ngi...@yahoo.it
> wrote:
>> Ecco appunto. Nella mia maschera l'interruttore NON resta incassato
>> quando lo si preme. Cio' e' dovuto al fatto che l'interruttore sta in
>> una maschera associata.
no, non è questo il problema.
>>Visivamente crea confusione perche' l'utente
>> non riesce a capire bene in che stato ci si trova...
>> Esiste un modo per rendere "visibile" gli stati dell'interruttore (a
>> meno di non ricorrere a label...)
puoi usare la proprietà "caption" dell'interruttore.
> Aggiungo che non e' solo un problema di layout. Anche da codice gli
> stati dell'interruttore non funzionano.
non dici se l'interruttore è associato.
Una causa può essere che l'interruttore sia associato ad un campo di query
non aggiornabile.
--
Ciao
Geppo
--
Ciao
Geppo


text:
On 29 Lug, 14:15, "Geppo" <c...@tin.it.invalid> wrote:
> puoi usare la proprietà "caption" dell'interruttore.
Non ho capito come...
> > Aggiungo che non e' solo un problema di layout. Anche da codice gli
> > stati dell'interruttore non funzionano.
>
> non dici se l'interruttore è associato.
No l'interruttore non e' associato.


text:
Ciao Pino wrote:
> On 29 Lug, 14:15, "Geppo" <c...@tin.it.invalid> wrote:
>> puoi usare la proprietà "caption" dell'interruttore.
>
> Non ho capito come...
if NomeInterruttore=true then
   NomeInterruttore.caption = "Attivo"
else
   NomeInterruttore.caption = "Disattivo"
end if
>>> Aggiungo che non e' solo un problema di layout. Anche da codice gli
>>> stati dell'interruttore non funzionano.
>>
>> non dici se l'interruttore è associato.
>
> No l'interruttore non e' associato.
Allora la maschera è in modalità sola lettura.
--
Ciao
Geppo


title: Chiudere la finestra principale del VB-Editor

author: Francesco G. Rizzoni

text:
Salve a tutti voi, gentilissimi amici,
Ho un problema dal quale non riesco a venir fuori e per il quale devo
chiedere il vostro prezioso supporto:
Ho creato una stampa (report) parametrica che viene generata da codice in
un altro file di Access .mdb .
Nella stampa genero un modulo VB con del codice che verrà eseguito nella
routine evento chiusura.
Una volta terminata la generazione della stampa non trovo modo di chiudere
la finestra generale di VB che si apre al momento della creazione del
modulo del report.
Utilizzo A2003 su W_XP in modalità A2000, ed ho le stesse difficoltà su
un'altro PC con A2000 su W_XP.
Di seguito presento le principali istruzioni che ho utilizzato nel
procedimento:
' Code Courtesy of Dev Ashish
Declare Function apiSetForegroundWindow Lib "user32" _
        Alias "SetForegroundWindow" (ByVal hwnd As Long) _
        As Long
Declare Function apiShowWindow Lib "user32" _
        Alias "ShowWindow" (ByVal hwnd As Long, ByVal nCmdShow As Long) _
        As Long
Sub CreaReport(...,SiglaRep As String, ...)
    Dim appAccess As Access.Application
    Dim strPath As String
    strPath = CurrentProject.Path & "\" 'Percorso del database
    Dim NomeRep As String, VecchioNome As String
    Dim mdlAppo As Module
    Dim NRiga As Long
    'Apertura del database su cui generare i report parametrici
    'in una nuova finestra di Access
    Set appAccess = CreateObject("Access.Application")
    appAccess.OpenCurrentDatabase strPath & "GAS_Stampe.mdb", False
    Const SW_NORMAL = 1
    Const SW_MAXIMIZE = 3
    Dim lngRet As Long
    lngRet = apiSetForegroundWindow(appAccess.hWndAccessApp)
    lngRet = apiShowWindow(appAccess.hWndAccessApp, SW_NORMAL)
    'Per visualizzare la finestra a tutto schermo, bisogna dare 2 volte
    'lo stesso comando
    lngRet = apiShowWindow(appAccess.hWndAccessApp, SW_MAXIMIZE)
    appAccess.DoCmd.Maximize
    NomeRep = "Report_" & SiglaRep
    appAccess.DoCmd.DeleteObject acReport, NomeRep 'Eliminazione del report
    'Creazione del report con il nome stabilito dal sistema
    Set repWork = appAccess.CreateReport
    repWork.HasModule = True 'crea il modulo Visual Basic del report
    Set mdlAppo = repWork.Module 'Variabile oggetto per il modulo
    NRiga = mdlAppo.CreateEventProc("Close", "Report") 'Crea routine evento
    NRiga = NRiga + 1
    mdlAppo.InsertLines NRiga, "Codice VB..............."
    ...

    'Compilazione e poi chiusura con salvataggio di tutti i moduli
    appAccess.RunCommand (acCmdCompileAndSaveAllModules)
    '***** QUESTO PUNTO DA ERRORE E NON SO COME SOSTITUIRLO *****
    appAccess.VBE.MainWindow.Close
    'Chiusura,memorizzazione e rinomina del report
    VecchioNome = repWork.Name
    appAccess.DoCmd.Close acReport, VecchioNome, acSaveYes
    'Assegna il nuovo nome al report creato
    appAccess.DoCmd.Rename NomeRep, acReport, VecchioNome
    'Apertura del report in anteprimA
    appAccess.DoCmd.OpenReport NomeRep, acViewPreview
    Set repWork = Nothing
    Set mdlAppo = Nothing
Exit Sub
Scusate la lunghezza del post ma l'ho ritenuta necessaria alla completezza.
Ringrazio fin d'ora chi avrà la pazienza di leggere ed eventualmente
consigliarmi.
Potrò leggere eventuali risposte solamente stasera al ritorno.
Ciao a tutti e buona giornata.


title: AIUTOOOO problema su somma in report

author: Cecilia

text:
come posso impostare direttamente sul report la somma del totale fatture di
ogni singola persona?
grazie 1000
Cecilia


title: AIUTOOOO problema su somma in report

author: Emyr

text:


supponendo che tu abbia il totale scritto in un campo raggruppi per
persona e  sommi il campo totalefattura...
Saluti.
Emanuele.


title: AIUTOOOO problema su somma in report

text:
> supponendo che tu abbia il totale scritto in un campo raggruppi per
> persona e  sommi il campo totalefattura...
> Saluti.
> Emanuele.
Si ho un campo con il totale ma il problema è che sono fatture diverse e nel
report devono rimanere dettagliate e NON raggruppate. Quindi creare una
casella totale fatture per quella persona.......
grazie
Cecilia


title: AIUTOOOO problema su somma in report

author: Giorgio

text:
crei un'intestazione gruppo con il "nome persona" e un pié di pagina con il
totale delle fatture di quella persona"
Giorgio
"Cecilia" <
alr...@tin.it
> ha scritto nel messaggio
news:Pkl5a.284820$AA2.10...@news2.tin.it...



title: AIUTOOOO problema su somma in report

text:


allora va bene la risposta di giorgio
Saluti.
Emanuele.


title: Aggiornamento dati in tabella.

author: Giuseppe

text:
Ciao a tutti,
ringrazio, innanzitutto, Gaspare e Alessandro Baraldi che mi hanno aiutato a
risolvere il mio problema relativo all'esportazione di dati da una tabella
di access in un file ASCII opportunamente spaziati grazie alle specifiche di
formattazione caratteri e spaziatura, ma ora ho un altro problema:
ho una tabella con questi campi: COGNOME, NOME, DATA INIZIO ATTIVITA', FINE
ATTIVITA', ANZIANITA' TOTALE.
Ho necessità di aggiornare i valori numerici con virgola contenuti nel campo
ANZIANITA' TOTALE, ottenuti dalla differenza fra i valori (date) dei campi
"data inizio attività" e "fine attività", arrotondati per difetto. Faccio un
esempio:
- 30,50 dev'essere ridotto a 30; 40,99 dev'essere ridotto 40 e così via per
tutti i valori contenuti in quel campo per ogni riga di record. Io ho
pensato ad una query di aggiornamento costruita sulla tabella di cui sopra,
ma non so come impostare i criteri, che cosa devo scrivere per aggiornare
quel determinato campo, non ho ancora fatto niente. Forse si può fare con
una funzione o una routine scritta in VBA. Grazie a tutti anticipatamente
per l'aiuto. Giuseppe.


title: Aggiornamento dati in tabella.

author: Alessandro Cara

text:

update tabella set campo = campo\1
--
a.cara


title: Aggiornamento dati in tabella.

text:
"Alessandro Cara" <
al...@puntablunet.it
> ha scritto nel messaggio
news:jeAqe.1250$bc....@tornado.fastwebnet.it...

Ciao,
scusa potresti essere più preciso ? Non  mi intendo molto di programmazione
e non ho capito quello che mi hai scritto.
Il valore numerico con virgola, di cui sopra, viene generato con una
espressione inserita nelle proprietà maschera di quel campo in questo modo:
[data_inizio_attività]-[fine_attivita]. A volte questo valore, non capisco
perchè succede, una volta generato con l'invio da tastiera, è visibile nella
maschera di inserimento dati, ma se guardo nella tabella sottostante in
modalità foglio dati, quel valore numerico non c'è, nel senso che il campo
non contiene nessun valore. Perchè succede questo ? E' possibile scrivere
una Routine evento, che mi aggiorna il campo togliendo i decimali,
attivabile subito dopo l'aggiornamento di quel campo con l'invio da tastiera
e fare in modo che il valore intero venga memorizzato nel campo
Anzianità_totale. Questo per evitare di dover aggiornare quel valore,
attraverso un'altra maschera di modifica dati basata però su una query che
mi seleziona tutti i dati della tabella sopra descritta. In questo modo il
valore viene effettivamente memorizzato nel suo campo, ma comporta una
perdita di tempo.
Ciao e grazie. Giuseppe.


title: Aggiornamento dati in tabella.

text:
Giuseppe wrote:
> "Alessandro Cara" <
al...@puntablunet.it
> ha scritto nel messaggio
> news:jeAqe.1250$bc....@tornado.fastwebnet.it...
>
>>Giuseppe wrote:
[cut]
>>
>>update tabella set campo = campo\1
>
> Ciao,
> scusa potresti essere più preciso ? Non  mi intendo molto di programmazione
> e non ho capito quello che mi hai scritto.
Non so se riesco ad essere piu' preciso.
Per aggiornare i dati gia' presenti e' sufficiente lanciare la query che
ti avevo suggerito dove *campo* e' il nome del campo che ti interessa e
*tabella* e' il nome della tabella.(la backslash e' giusta)
> Il valore numerico con virgola, di cui sopra, viene generato con una
> espressione inserita nelle proprietà maschera di quel campo in questo modo:
> [data_inizio_attività]-[fine_attivita]. A volte questo valore, non capisco
> perchè succede, una volta generato con l'invio da tastiera, è visibile nella
> maschera di inserimento dati, ma se guardo nella tabella sottostante in
> modalità foglio dati, quel valore numerico non c'è, nel senso che il campo
> non contiene nessun valore. Perchè succede questo ? E' possibile scrivere
> una Routine evento, che mi aggiorna il campo togliendo i decimali,
> attivabile subito dopo l'aggiornamento di quel campo con l'invio da tastiera
> e fare in modo che il valore intero venga memorizzato nel campo
> Anzianità_totale. Questo per evitare di dover aggiornare quel valore,
> attraverso un'altra maschera di modifica dati basata però su una query che
> mi seleziona tutti i dati della tabella sopra descritta. In questo modo il
> valore viene effettivamente memorizzato nel suo campo, ma comporta una
> perdita di tempo.
> Ciao e grazie. Giuseppe.
>
>
per far si che sulla tabella non ci siano virgole e sufficiente definire
il campo di tipo numerico intero o lungo fermo restando che un campo
calcolato', qualche volta puo' anche servire, ma non e' "normale"
metterlo sulla base dati . Perche' succedano le altre cose (campo non
visibile sulla base dati) non ne posso prevedere il motivo.
E' comunque un problema diverso da quello inizialmente postato. Potresti
farne oggetto di altro 3d.
--
a.cara


title: Password da Applicazione.MDB a Dati.MDB...

author: Andrea

text:
Sto lavorando ad un progetto che richiede applicazione e dati separati in
Access.
Ordunque... Il database 'Applicazione' (privo di password) gestisce le
tabelle del database 'Dati' nonostante la password che protegge il database
'Dati'. Ma se cerco di modificare la Password che ho immesso nel database
'Dati' dal database 'Applicazione' ho dei problemi per farmi riconoscere la
Password.
Premetto che si tratta di Password generica e non di Password legata a
diritti di Amministratore o altri tipi di Autorizzazioni. Il problema si
presenta sul metodo OpenDatabase() e genera un errore di Password Non
Valida.
Ringrazio anticipatamente chiunque voglia cimentarsi nel dare una soluzione
a questo problema.
PS: sarą mica che la Password č crittografata e il metodo OpenDatabase() lo
ignora?


author: Federico Luciani

text:
Andrea wrote:
> Sto lavorando ad un progetto che richiede applicazione e dati separati in
> Access.
> Ordunque... Il database 'Applicazione' (privo di password) gestisce le
> tabelle del database 'Dati' nonostante la password che protegge il database
> 'Dati'. Ma se cerco di modificare la Password che ho immesso nel database
> 'Dati' dal database 'Applicazione' ho dei problemi per farmi riconoscere la
> Password.
> Premetto che si tratta di Password generica e non di Password legata a
> diritti di Amministratore o altri tipi di Autorizzazioni. Il problema si
> presenta sul metodo OpenDatabase() e genera un errore di Password Non
> Valida.
Il codice per farlo e' il seguente:
Dim dbs As Database
Set dbs = OpenDatabase("mioDB.mdb", True, False, ";pwd=pippo")
dbs.NewPassword "pippo", "paperino"
Set dbs = Nothing
mioDB.mdb deve essere aperto in modalita' esclusiva, non sono sicuro che
funzioni nel tuo caso.
--
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:
Ringrazio per la dritta anche se avevo già provato gli stessi metodi tranne
che per le opzioni di SOLA LETTURA e di ACCESSO ESCLUSIVO.
devo segnalare a chiunque dovesse avere lo stesso problema che è necessario
specificare nella stringa di connessione (ultimo parametro del metodo
OpenDataBase()) anche il tipo di database ("MS Access;PWD=tuapassword") e
assicurarsi che nessuna tabella del database sia aperta in quel momento
nell'applicazione o da altri utenti. e FUNZIONAAAA!!!
Federico Luciani ha scritto nel messaggio
<
397453A5...@paperino.libero.it
>...
>Andrea wrote:
>> Sto lavorando ad un progetto che richiede applicazione e dati separati in
>> Access.
>> Ordunque...
>
>



title: [OT] Novità da queste parti..?(@Alex)

text:
Un saluto a tutti...
Sono vivo, ma mi dedico ad altro...!
Quì che si dice...?
@Alex


title: [OT] Novità da queste parti..?(@Alex)

text:
@Alex ha scritto:
> Un saluto a tutti...
> Sono vivo, ma mi dedico ad altro...!
>
> Qu� che si dice...?
Si nota la tua assenza. Ultimamente anche Sergio e' poco presente e non
c'e' piu' stato un litigio che si rispetti.
Ciao Alex
--
AC