title: Ripristina finestra

text:
"COSIMO LENZA" <
cosi...@tin.it
> ha scritto nel messaggio
news:EVMF9.8144$fa.2...@news1.tin.it...
> Allo scopo di non consentire per una FORM:
>  - il ridimensionamento
>  - la riduzione
>  - la chiusura
> corrispondenti ai tre pulsanti sul margine sinistro della finestra,
Margine SINISTRO della finestra???
> su che cosa
> bisogna agire ?
>
> Ho già provato provato ad impostare le proprietà della FORM :
> [Pulsanti ingrandimento/riduzione]
> [Pulsanti chiusura]
>
> ma il Pulsante "Ripristina Finestra" rimane sempre attivo.
Pulsante "Ripristina Finestra" ??
Comunque prova ad impostare a No la proprietà della maschera Casella menu
controllo e imposta a Sottile oppure a Nessuno la proprietà Stile bordo.
>
> Grazie per l'aiuto
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Ripristina finestra

author: COSIMO LENZA

text:
Roberto da casa <
r.ma...@libero.it
> wrote in message
jkNF9.37306$3l.10...@twister1.libero.it...

> Ti ringrazio per la risposta ... e mi scuso dopo il tempo passato davanti
al
monitor confondo la destra con la sinistra.
Purtroppo avevo già provato anche le soluzioni da te suggerite senza
avere risultati . Il pulsante "Ripristina finestra" rimane ancora.
Lo scopo di tutto questo è, non consentire il ridimensionamento o la
chiusura casuale della FORM, che deve avvenire tramite opportuni pulsanti.
Ti ringranzio di nuovo
>


title: Ripristina finestra

author: Roberto da casa

text:
"COSIMO LENZA" <
cosi...@tin.it
> ha scritto nel messaggio
news:lTNF9.11805$qF1.5...@news2.tin.it...
[CUT]
>
> Purtroppo avevo già provato anche le soluzioni da te suggerite senza
> avere risultati . Il pulsante "Ripristina finestra" rimane ancora.
>
Scusami, ma cosa è il pulsante "Ripristina finestra"?



title: Ripristina finestra

text:
Roberto da casa <
r.ma...@libero.it
> wrote in message
EfOF9.38898$2B1.1...@twister2.libero.it...

Mi riferisco al pulsante centrale tra la "X" di chiusura e "_" di riduci a
icona sulla estrema dx
Cosimo


title: Ripristina finestra

text:
"COSIMO LENZA" <
cosi...@tin.it
> ha scritto nel messaggio
news:spOF9.8555$fa.2...@news1.tin.it...
[CUT]
> Mi riferisco al pulsante centrale tra la "X" di chiusura e "_" di riduci a
> icona sulla estrema dx
>
> Cosimo
Dopo aver impostato a Nessuno la proprietą Pulsanti ingrand./riduzione della
tua maschera quel pulsante ti compare ancora?
Mi sembra veramente strano!!
Ma che versione di Access usi?



title: gruppo di opzione e report

author: luigionofrio

text:
in una maschera ho un gruppo di opzioni - tipo1 = 1   e tipo2 = 2
associato al campo tipo della tabella archivio.
Vado a fare un report, nel corpo dello stesso devo inserice anche il
controllo opzioni, ma alla vista o stampa dello stesso mi da il valore
memorizzato 1  o 2, mentre a me interessa che esca invece del valore, il
suo riferimento : tipo1  o tipo2 .
Come diavolo posso fare?
un grazie č poco! lo so!
luigi
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: gruppo di opzione e report

author: MA

text:
luigionofrio wrote:
> in una maschera ho un gruppo di opzioni - tipo1 = 1   e tipo2 = 2
> associato al campo tipo della tabella archivio.
> Vado a fare un report, nel corpo dello stesso devo inserice anche il
> controllo opzioni, ma alla vista o stampa dello stesso mi da il valore
> memorizzato 1  o 2, mentre a me interessa che esca invece del valore,
> il suo riferimento : tipo1  o tipo2 .
> Come diavolo posso fare?
> un grazie è poco! lo so!
> luigi
Creati un controllo calcolato
="Tipo " & quello che vuoi
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access
Segrate (MI), 7-8 giugno 2007


title: gruppo di opzione e report

text:
MA ha scritto:
> luigionofrio wrote:
> > in una maschera ho un gruppo di opzioni - tipo1 = 1   e tipo2 = 2
> > associato al campo tipo della tabella archivio.
> > Vado a fare un report, nel corpo dello stesso devo inserice anche il
> > controllo opzioni, ma alla vista o stampa dello stesso mi da il valore
> > memorizzato 1  o 2, mentre a me interessa che esca invece del valore,
> > il suo riferimento : tipo1  o tipo2 .
> > Come diavolo posso fare?
> > un grazie č poco! lo so!
> > luigi
> Creati un controllo calcolato
> ="Tipo " & quello che vuoi
ti puoi esprimere con un esempio pratico? non ho la bravura giusta per
capirti al volo. tank



title: gruppo di opzione e report

text:
MA ha scritto:
> luigionofrio wrote:
> > in una maschera ho un gruppo di opzioni - tipo1 = 1   e tipo2 = 2
> > associato al campo tipo della tabella archivio.
> > Vado a fare un report, nel corpo dello stesso devo inserice anche il
> > controllo opzioni, ma alla vista o stampa dello stesso mi da il valore
> > memorizzato 1  o 2, mentre a me interessa che esca invece del valore,
> > il suo riferimento : tipo1  o tipo2 .
> > Come diavolo posso fare?
> > un grazie č poco! lo so!
> > luigi
> Creati un controllo calcolato
> ="Tipo " & quello che vuoi
Rileggendo bene il tuo post, non credo di avere il risultato cercato,
a me interessa stampare l'etichetta del valore assegnato al gruppo di
opzioni .
es.
opzione 1  etichetta giamaica  valore assegnato 1
opzione 2  etichetta germania  valore assegnato 2
Naturalmente nella tabella archivio al campo "tipo" abbinato al gruppo di
opzione, vengono memorizzati i valori assegnati : 1  o 2
Quindi , ricapitolando, nel report devono uscire giamaica o germania a
secondo del valore assegnato al campo tipo della tabella "archivio"
spero di avermi spiegato bene.



title: Re: inviare dati da maschera a report per stampa...

author: ciroteo

text:
"danieleuff" <
cbo...@gmail.com
> ha scritto nel messaggio
news:copiaf$qic$1...@news.newsland.it...
> voglio che venga compilato un report con i dati scritti nella maschera
>
> --
>
> questo articolo e` stato inviato via web dal servizio gratuito
>
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it
>
>
creazione guidata report e lo basi sull'origine dati della maschera.
hai mai fatto un report?


author: danieleuff

text:
non va, mi elenca tutti i records.. a me interessa solamente quello scelto
sulla maschera



text:
"Daniele" <
cbo...@gmail.com
> ha scritto nel messaggio
news:98a37e2.04120...@posting.google.com...
> ho risolto tutti i miei vecchi problemi.. mi manca solo questo.. sono
> in ufficio aspetto risposte plis
Che significa? Cosa vuoi fare?
MAssimiliano


author: Daniele


text:
voglio che venga compilato un report con i dati scritti nella maschera



author: TANNHAUSER

text:
danieleuff ha scritto:
> non va, mi elenca tutti i records.. a me interessa solamente quello scelto
> sulla maschera
Nella maschera inserisci un pulsante e sull'azione TuoPulsanteCLick
inserisci il codice:
    Dim stNomeDoc As String
    Dim stCriteriCollegamento As String
    stNomeDoc = "TuoReport"
    stCriteriCollegamento = "IDReport = Forms!TuaForm!IDTabella"
    DoCmd.OpenReport stNomeDoc, acViewPreview, , stCriteriCollegamento
Dove IDReport= controllo nel report che identifica univocamente il record
e IDTabella= controllo nella tabella associato al record che vuoi stamapre.
TANNHAUSER



title: Amnesia madornale sblocco maschera

author: RobertOne

text:
Ciao a tutti.
Stamattina mi sono alzato male...
Come faccio a sbloccare quei db che aprono automaticamente la maschera
iniziale e non lasciano nessuna barra di access eccetto quella
personalizzata? Mi sembrava con F11 ma vedo che non si sblocca...
Grazie e scusate.
Rob.


title: Amnesia madornale sblocco maschera

author: Ungi

text:
"RobertOne" <
robe...@robort.it
> ha scritto nel messaggio
news:efatou$lb2$1...@fata.cs.interbusiness.it...

Shift


title: Amnesia madornale sblocco maschera

text:
"Ungi"  ha scritto nel messaggio ...
> Shift
>
Ho provato con Shift ma la maschera principale non si sblocca e non riesco a
vedere le tabelle le query etc.
Grazie.
Rob.


title: Amnesia madornale sblocco maschera

author: Sergio MAZZA

text:
"RobertOne" <
robe...@robort.it
> ha scritto nel messaggio
news:efb9ob$mpq$1...@carabinieri.cs.interbusiness.it...
>
> Ho provato con Shift ma la maschera principale non si sblocca e non riesco
> a vedere le tabelle le query etc.
>
> Grazie.
>
> Rob.
Lo shift(sinistro) devi tenere premuto fino all'apertura dell'mdb; oppure
dopo l'apertura dell'mdb premi F11 (finestra database).
Oppure ti ricordi di come hai protetto l'mdb...
Ciao.
--
Sergio MAZZA


title: Amnesia madornale sblocco maschera

text:
"Sergio MAZZA"  ha scritto nel messaggio ...
>
> Lo shift(sinistro) devi tenere premuto fino all'apertura dell'mdb; oppure
> dopo l'apertura dell'mdb premi F11 (finestra database).
>
> Oppure ti ricordi di come hai protetto l'mdb...
>
> Ciao.
> --
> Sergio MAZZA
Grazie Sergio per la dritta ma non riesco ancora ad aprirlo. Il db non č una
mia creatura ma l'ho scaricato dal Sito Comune e si tratta di Agenda2k. Non
riesco a bloccarlo per risalire alle Tabelle etc. etc.
Roberto


title: Amnesia madornale sblocco maschera

text:
"RobertOne" <
robe...@robort.it
> ha scritto nel messaggio
news:efb1u6$4am$1...@balena.cs.interbusiness.it...
>
> Grazie Sergio per la dritta ma non riesco ancora ad aprirlo. Il db non è
> una mia creatura ma l'ho scaricato dal Sito Comune e si tratta di
> Agenda2k. Non riesco a bloccarlo per risalire alle Tabelle etc. etc.
>
>
> Roberto
Allora chiedilo al maghetto!
Ciao.
--
Sergio MAZZA


title: Amnesia madornale sblocco maschera

text:
"Sergio MAZZA"  ha scritto nel messaggio ...
>
>
> Allora chiedilo al maghetto!
>
> Ciao.
> --
> Sergio MAZZA
Chiedo venia...! Dopo aver scritto il precedente post, ho trovato il
problema ma dovevo andare al lavoro e non ce la facevo a ripostare.
Grazie
Roberto


title: Amnesia madornale sblocco maschera

text:
"RobertOne" <
robe...@robort.it
> ha scritto nel messaggio
news:efc44r$g75$1...@carabinieri.cs.interbusiness.it...
>
>
> Chiedo venia...! Dopo aver scritto il precedente post, ho trovato il
> problema ma dovevo andare al lavoro e non ce la facevo a ripostare.
Ovviamente il maghetto era l'ideatore dell'applicazione, ma se hai risolto
sarei curioso di sapere come; tanto per la cronaca...
> Grazie
>
> Roberto
Ciao.
--
Sergio MAZZA


title: Amnesia madornale sblocco maschera

text:
"Sergio MAZZA"  ha scritto nel messaggio ...
>
> Ovviamente il maghetto era l'ideatore dell'applicazione, ma se hai risolto
> sarei curioso di sapere come; tanto per la cronaca...
> Ciao.
>
>
> --
> Sergio MAZZA
Sergio Sergio... vuoi proprio che metta a nudo la mia imbranataggine sulla
pubblica piazza...! Ebbene si! Non ho problemi a dirlo, tanto quando uno è
imbranato, tale rimane...
Mi ostinavo fin prima di postare col Alt+F11, poi la saga ha continuato ma
cambiando attori; Alt+Shift... Poi solamente con Shift...
Probabilmente ieri non era giornata...!
Ciao e grazie.
Roberto.


title: Amnesia madornale sblocco maschera

text:
"RobertOne" <
robe...@robort.it
> ha scritto nel messaggio
news:efder1$d6s$1...@carabinieri.cs.interbusiness.it...
>
> Sergio Sergio... vuoi proprio che metta a nudo la mia imbranataggine sulla
> pubblica piazza...! Ebbene si! Non ho problemi a dirlo, tanto quando uno è
> imbranato, tale rimane...
Ero solo curioso come una scimmia...
> Mi ostinavo fin prima di postare col Alt+F11, poi la saga ha continuato ma
> cambiando attori; Alt+Shift... Poi solamente con Shift...
>
> Probabilmente ieri non era giornata...!
Capita, e non sai a me quante volte ...
> Ciao e grazie.
>
> Roberto.
Ciao.
--
Sergio MAZZA


title: Protezione a livello utente Access 2003

author: michele

text:
Salve
Qualcuno potrebbe segnalarmi una FAQ che riporta la procedura da utilizzare
per poter proteggere a livello utente un db in Access 2003 considerato che,
perdonatemi se mi sbaglio, sul sitocomune non č presente?
grazie
un saluto alla news
Michele
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Protezione a livello utente Access 2003

author: Roberto da Parma

text:
"michele" <
mi...@inwind.it
> ha scritto nel messaggio
news:217Z175Z54Z62Y...@usenet.libero.it...
> Salve
> Qualcuno potrebbe segnalarmi una FAQ che riporta la procedura da
> utilizzare
> per poter proteggere a livello utente un db in Access 2003 considerato
> che,
> perdonatemi se mi sbaglio, sul sitocomune non è presente?
> grazie
> un saluto alla news
> Michele
>
>
> --------------------------------
> Inviato via
http://arianna.libero.it/usenet/
E chè esiste solo il
www.sitocomune.com
?
Hai guardato
Su
www.accessgroup.it
 ?
Su
www.alessandrobaraldi.it/
 ?
Su
http://www.donkarl.com/
 ?
Su ...
Hai fatto una micro ricerca su google ?
http://www.google.it/search?source=ig&hl=it&rlz=&=&q=access+protezione+a+livello+utente&btnG=Cerca+con+Google&meta=&aq=o
http://office.microsoft.com/it-it/access/HA101662271040.aspx
Che metodo vorresti usare?
Personalmente uso un file .mdw ma non è la soluzione più semplice e rapida.
C'è chi comunque gestisce tutto all'interno del db.
In ogni caso devi armarti di pazienza perchè se vuoi fare restrizioni a
livello utente sulle maschere o sui controlli ti occorreranno molti clicli e
tag da inserire...
Di informazioni ce ne sono a volontà...prova a percorrere una strada che per
te sembra più congeniale...l'NG ti aiuterà poi se ti blocchi...gli spunti
per partire già ce li hai :-)
Ciao
--
Roberto da Parma


title: Impossibile trovare ISAM installabile

author: Gianfri

text:
Salve a tutti,
ho un problema: volevo capire se l'errore che mi compare aprendo una query
di selezione:"Impossibile trovare ISAM installabile" è dovuto ad un problema
del Registro di sistema (ho guardato nel sito della Microsoft
http://support.microsoft.com/default.aspx?scid=kb;it;209805
 e ho seguito le
istruzioni: è configurato in modo esatto ma il problema persiste) o ad una
dicitura inesatta dell'SQL. Dovete sapere che i campi che vado ad estrarre
sono in una tabella di un database Notes (*.nsf): ho già installato il
NotesSQL(ODBC) per poterla collegare a un database Access ma mi crea un
collegamento dove sia i campi testo sia i memo molto lunghi mi vengono
troncati a 254 caratteri (molto vicini al limite di 256 del campo testo ma
non ai 32k del memo). Per ovviare a questo problema ho pensato ad una query
di accodamento che mi va appunto ad estrarre i campi nella tabella nel
database Notes e poi me li accoda in una tabella vuota in Access dove al
posto di settare i campi a memo e a testo li ho messi a Oggetto OLE(così mi
è stato suggerito nel ng Notes). La select è la seguente:"SELECT *
FROM
[dsn=<nomedbNotes>;database=<nomecartella>\<nomedbNotes>.nsf;].[<nometabella>]",
ma mi da l'errore sopracitato. Il percorso l'ho copiato dalla Gestione
tabelle collegate:è quello della tabella ODBC. Qulcuno saprebbe aiutarmi a
risolvere il problema o a trovare altre soluzioni per importare
integralmente i campi.
Gianfri
--------------------------------
Inviato via
http://usenet.libero.it


title: Impossibile trovare ISAM installabile

author: steffy

text:
Ciao,
Non è mica che il problema si verifichi dopo che hai installato versioni
diverse di Access e/o hai reinstallato Office? In questo caso forse ti posso
aiutare.
Ciao,
Stefano
"Gianfri" <
gia...@yahoo.it
> ha scritto nel messaggio
news:81Z74Z117Z47Y1...@usenet.libero.it...



title: Telefonare da access

author: Federico

text:
ho un'applicazione per selezionare dei supplenti da una lista
gli debbo chiamare telefonicamente, ho messo alla rutine evento del
pulsante la stringa appllication.Run"utility.wlib_AutoDial" ,stDialStr
ma non riesco a farlo funzionare la telefonata parte ma non sento nessuna
voce il modem è un data faxvoice cosa sbaglio, c'è qualcuno che ha
esperienza sul settaggio delle impostazioni o mi può suggerire l'uso di
qualche altro metodo?
USANDO L'UTILITà HIPER TERMINAL DI XP RIESCO A SENTIRE LA VOCE DEL
CHIAMATO ,MA NON FUNZIONA IL MICROFONO.
GRAZIE
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Telefonare da access

author: yQy

text:
On Thu, 03 Apr 2003 22:11:48 +0200,
federico...@libero.it
(Federico) wrote:
>ho un'applicazione per selezionare dei supplenti da una lista
>gli debbo chiamare telefonicamente, ho messo alla rutine evento del
>pulsante la stringa appllication.Run"utility.wlib_AutoDial" ,stDialStr
>ma non riesco a farlo funzionare la telefonata parte ma non sento nessuna
>voce il modem è un data faxvoice cosa sbaglio, c'è qualcuno che ha
>esperienza sul settaggio delle impostazioni o mi può suggerire l'uso di
>qualche altro metodo?
sirio
>USANDO L'UTILITà HIPER TERMINAL DI XP RIESCO A SENTIRE LA VOCE DEL
>CHIAMATO ,MA NON FUNZIONA IL MICROFONO.
>GRAZIE
attivalo da access
e cmq.....newsgroup di hardware o windows
qualcosa c'era


title: Filtrare una maschera con date inserite in un controllo

author: TT

text:
Ciao
eppure mi sembrava che il problema fosse già stato trattato.Forse mi
sbaglio!
Io devo filtrare una maschera con delle date che inserisco in due caselle di
testo (con il calendario del
www.sitocomune.com
).
Non saprei se è corretto fare una query  tipo
select * from pippo
where Data between forms!maschera!DaData AND forms!maschera!AData;
e metterla come origine record della maschera.
Ho provato a farlo ma mi appare la finestra "immissione valore parametro".
Allora ho aggiunto un pulsante  e sull'evento onclick
me.requery
Ma fa lo stesso.
E' ovvio che sbaglio ma non capisco dove.Forse devo usare la priprietà
filter  e poi  alla pressione del pulsante
fare un bel filteron=true?
Grazie 1000
TT


text:
"TT" <
tere...@libero.it
> ha scritto nel messaggio
news:dwAbc.109139$FJ6.4...@twister1.libero.it...

Scusatemi ho combinato.
Ogni tanto mi demoralizzo per le stupidaggini che scrivo senza accorgermi
    Me.Filter = ""
    Me.Filter = "InsDate beetween " & Forms![mDettagli]![DaData] & " AND " &
Forms![mDettagli]![AData]
    FilterOn = True
    Me.Requery
Grazi lo stesso
Ciao
TT


text:
"TT" <
tere...@libero.it
> ha scritto nel messaggio
news:dwAbc.109139$FJ6.4...@twister1.libero.it...

No non capisco aveva filtrato giustamente ed adesso diventa scura la
maschera, perchè?
Ho usato
Me.Filter = "DATE BETWEEN " & Forms![mDettagli]![DaData] & " AND " &
Forms![mDettagli]![AData]
Me.Filteron = true
Preciso che il campo DATE è in formato Data/Ora.Ho provato anche a mettere i
# prima e dopo la data  ottenendo #12/03/2002# AND #...#...
ma senza successo.
Qualcuno sa dirmi cosa posso fare?


text:
"TT" <
tere...@libero.it
> ha scritto nel messaggio
news:fSEbc.109518$FJ6.4...@twister1.libero.it...

Prova con:
Me.Filter = "DATE BETWEEN CDate('" & Forms![mDettagli]![DaData] & "') AND
CDate('" & Forms![mDettagli]![AData] & "')"
Ciao.
--
Sergio MAZZA


text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:iyGbc.15919$rM4.7...@news4.tin.it...

Dio bonino, fa lo stesso.
Non capisco!
Se riuscissi a farlo funzionare potrei usare lo stesso tipo di approccio
sulla SSM!
Forse che ci siamo altre proprietà da settare? Ho fatto come diceva Roberto.
Il succo era "Butta via e rifai" ma non va.
Se non sbaglio DATE fà riferimento al controllo non al campo della cueri,
giusto?
Grazie
TT


author: Roberto da casa

text:
"TT" <
tere...@libero.it
> ha scritto nel messaggio
news:fSEbc.109518$FJ6.4...@twister1.libero.it...

Per prima cosa ti ricordo che DATE è un nome riservato di Access e se lo usi
come nome di un tuo oggetto aspettati inspiegabili errori e/o comportamenti
anomali dell'applicativo.
Se DATE è un campo di tipo Data/Ora dell'oggetto che è origine record della
maschera, la sintassi giusta per impostare il filtro della maschera è la
seguente:
Me.Filter = "DATE Between #" & _
Format(Forms!mDettagli!DaData, "mm/dd/yyyy") _
& "# AND #" & Format(Forms!mDettagli!AData, _
"mm/dd/yyyy") & "#"
Me.FilterOn = True
Fermo restando che ti invito, nel tuo bene a cambiare il nome al campo DATE.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:KUVbc.110315$FJ6.4...@twister1.libero.it...

OK funzia!
Grazie ad entrambi
TT


title: ordinamento dei record tramite codice

author: Giancarlo

text:
Salvea tutti.
In A97 tramite una maschera (visualizzazione maschere continue) visualizzo
il contenuto di una tabella. E' possibile ordinare i record visualizzati in
ordine crescente, selezionando ad esempio una check box?
Es. se visualizzo i campi data_inizio, data_aggiornamento, data_fine, vorrei
poter, spuntando una chekbox, ordinare i record visualizzati per
data_inizio, oppure spuntando 2 check box ordinarli, prima per data_inizio,
quindi per data_aggiornamento.
Grazie a tutti in anticipo.
Giancarlo


title: ordinamento dei record tramite codice

author: namor

text:
Giancarlo ha scritto:

Si, devi lavorare con le proprietą .OrderBy e .OrderByOn della maschera
(vedi help). Guarda se c'č qualche esempio sul
www.sitocomune.com
, sennņ
se vuoi te ne mando uno io.
Namor
--
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: ordinamento dei record tramite codice

text:
"namor" <
do...@spam.me
> ha scritto nel messaggio
news:bpkti1$b1d$1...@news.newsland.it...

Grazie.
ho scritto questo:
'mio' č la chek
'registro_bdn' č il nome della maschera
'dataingr_bdn' č una data che utilizzo per l'ordinamento.
Private Sub mio_Click()
If Me.mio = True Then
Forms!registro_bdn.OrderBy = "DATAINGR_BDN"
End If
End Sub
funziona.
c'č un altro campo 'datauscita_bdn'.
se metto un'altra chek 'tuo', vorrei far sģ che i record vengano ordinati
anche per questo campo.
E' possibile fare in modo che spuntando entrambe le chek i record vengano
ordinati prima per 'datatingr_bdn', quindi per 'datauscita_bdn'?
Ho provato a con un evento click anche sulla check 'tuo', ma non funziona
bene.
Ho provato anche a nidicare gli if in mio_lick, ma non va.
Mi puoi dare una mano?
Intanto grazie per il suggerimento.
Giancarlo


title: ordinamento dei record tramite codice

text:
Giancarlo ha scritto:
> "namor" <
do...@spam.me
> ha scritto nel messaggio
> news:bpkti1$b1d$1...@news.newsland.it...
> > Giancarlo ha scritto:
> > > Salvea tutti.
> > > In A97 tramite una maschera (visualizzazione maschere continue)
> visualizzo
> > > il contenuto di una tabella. E' possibile ordinare i record visualizzati
> in
> > > ordine crescente, selezionando ad esempio una check box?
> > > Es. se visualizzo i campi data_inizio, data_aggiornamento, data_fine,
> vorrei
> > > poter, spuntando una chekbox, ordinare i record visualizzati per
> > > data_inizio, oppure spuntando 2 check box ordinarli, prima per
> data_inizio,
> > > quindi per data_aggiornamento.
> > > Grazie a tutti in anticipo.
> > > Giancarlo
> > Si, devi lavorare con le proprietą .OrderBy e .OrderByOn della maschera
> > (vedi help). Guarda se c'č qualche esempio sul
www.sitocomune.com
, sennņ
> > se vuoi te ne mando uno io.
> > Namor
> Grazie.
> ho scritto questo:
> 'mio' č la chek
> 'registro_bdn' č il nome della maschera
> 'dataingr_bdn' č una data che utilizzo per l'ordinamento.
> Private Sub mio_Click()
> If Me.mio = True Then
> Forms!registro_bdn.OrderBy = "DATAINGR_BDN"
> End If
> End Sub
> funziona.
> c'č un altro campo 'datauscita_bdn'.
> se metto un'altra chek 'tuo', vorrei far sģ che i record vengano ordinati
> anche per questo campo.
> E' possibile fare in modo che spuntando entrambe le chek i record vengano
> ordinati prima per 'datatingr_bdn', quindi per 'datauscita_bdn'?
> Ho provato a con un evento click anche sulla check 'tuo', ma non funziona
> bene.
> Ho provato anche a nidicare gli if in mio_lick, ma non va.
> Mi puoi dare una mano?
> Intanto grazie per il suggerimento.
> Giancarlo
Per ottenere un ordinamento multiplo basta inserire nella proprietą
OrderBy i nomi dei campi nell'ordine desiderato, separati da virgole.
La tecnica che si usa č simile a quella che usi per creare un filtro da
una listbox a selezione multipla:
strOrd=""
if me.check1 then strOrd = strOrd & "cognome, "
if me.check2 then strOrd = strOrd & "nome, "
if me.check3 then strOrd = strOrd & "data, "
'questo toglie l'ultima virgola:
if len(strOrd)>0 then strOrd = left(strOrd,len(strOrd)-2)
Me.Orderby=strOrd
Me.orderbyon=true



title: ordinamento dei record tramite codice

text:
"namor" <
do...@spam.me
> ha scritto nel messaggio
news:bpl1tj$c84$1...@news.newsland.it...

Scusa, ma non capisco. Il codice che hai scritto va messo su quale evento?
Io ho inserito il codice sull'evento clik della check box, ma non credo che
vada lģ.
> Namor
>
> --
> namor at inwind punto it
>
> questo articolo e` stato inviato via web dal servizio gratuito
>
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it
>
>
Giancarlo


title: ordinamento dei record tramite codice

text:
Giancarlo ha scritto:
> "namor" <
do...@spam.me
> ha scritto nel messaggio
> news:bpl1tj$c84$1...@news.newsland.it...
> > Giancarlo ha scritto:
> > > > > Salvea tutti.
> > > > > In A97 tramite una maschera (visualizzazione maschere continue)
> > > visualizzo
> > > > > il contenuto di una tabella. E' possibile ordinare i record
> visualizzati
> > > in
> > > > > ordine crescente, selezionando ad esempio una check box?
> > > > > Es. se visualizzo i campi data_inizio, data_aggiornamento,
> data_fine,
> > > vorrei
> > > > > poter, spuntando una chekbox, ordinare i record visualizzati per
> > > > > data_inizio, oppure spuntando 2 check box ordinarli, prima per
> > > data_inizio,
> > > > > quindi per data_aggiornamento.
> > > > > Grazie a tutti in anticipo.
> > > > > Giancarlo
[cut]
> > Per ottenere un ordinamento multiplo basta inserire nella proprietà
> > OrderBy i nomi dei campi nell'ordine desiderato, separati da virgole.
> > La tecnica che si usa è simile a quella che usi per creare un filtro da
> > una listbox a selezione multipla:
> > strOrd=""
> > if me.check1 then strOrd = strOrd & "cognome, "
> > if me.check2 then strOrd = strOrd & "nome, "
> > if me.check3 then strOrd = strOrd & "data, "
> > 'questo toglie l'ultima virgola:
> > if len(strOrd)>0 then strOrd = left(strOrd,len(strOrd)-2)
> > Me.Orderby=strOrd
> > Me.orderbyon=true
> > Namor
> Scusa, ma non capisco. Il codice che hai scritto va messo su quale evento?
> Io ho inserito il codice sull'evento clik della check box, ma non credo che
> vada lì.
> Giancarlo
Non lo metti negli eventi, perchè dovresti duplicarlo per ogni checkbox.
Lo metti in una private sub che poi richiamerai negli eventi After_Update
di tutte le checkbox interessate.
Private Sub Filtra()
Dim strOrd as string
  strOrd=""
  .....
  .....
End Sub



title: ordinamento dei record tramite codice

text:
.........
> [cut]
>
> > > Per ottenere un ordinamento multiplo basta inserire nella proprietą
> > > OrderBy i nomi dei campi nell'ordine desiderato, separati da virgole.
> > > La tecnica che si usa č simile a quella che usi per creare un filtro
da
> > > una listbox a selezione multipla:
> > > strOrd=""
> > > if me.check1 then strOrd = strOrd & "cognome, "
> > > if me.check2 then strOrd = strOrd & "nome, "
> > > if me.check3 then strOrd = strOrd & "data, "
> > > 'questo toglie l'ultima virgola:
> > > if len(strOrd)>0 then strOrd = left(strOrd,len(strOrd)-2)
> > > Me.Orderby=strOrd
> > > Me.orderbyon=true
> > > Namor
>
>
> > Scusa, ma non capisco. Il codice che hai scritto va messo su quale
evento?
> > Io ho inserito il codice sull'evento clik della check box, ma non credo
che
> > vada lģ.
> > Giancarlo
>
>
> Non lo metti negli eventi, perchč dovresti duplicarlo per ogni checkbox.
> Lo metti in una private sub che poi richiamerai negli eventi After_Update
> di tutte le checkbox interessate.
>
> Private Sub Filtra()
> Dim strOrd as string
>   strOrd=""
>   .....
>   .....
> End Sub
>
> Namor
>
>
> --
> namor at inwind punto it
>
> questo articolo e` stato inviato via web dal servizio gratuito
>
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it
>
>
Grazie.
Giancarlo


title: Recordsource di una maschera

author: Alessandro Romeo

text:
Ciao a tutti...
piccolo quesito:
Ho una maschera in cui visualizzo i miei bei record (in modo non
aggiornabile) e fin qui tutto ok, ordinamento dovrebbe essere su
Tabella.campo1, Mid([Campo2],3) ma se gli passo come recordsource da codice
la tabella mi da un errore r.t. 2001 operazione precedente annullata(???)
allora ho pensato di passargli la query
select * from .....order by ...... funziona tutto ma risulta un tantino
pesante perche' va a processare ogni record per creare il mid del campo 2.
Voi appesantireste il db (creando immediatamente una copia della tabella
dove creo la mid del campo)
o lasciereste la query (impiega circa 4 min a caricare), tenedo conto che
poi questo db avra' il FE in Access ed il Be in Oracle.
Ciao a tutti grazie e spero di essere stato chiaro


title: Recordsource di una maschera

author: Emyr

text:
On Tue, 15 Jan 2002 14:58:57 GMT, "Alessandro Romeo"
<
alessand...@hotmail.com
> wrote:
>Ciao a tutti...
>piccolo quesito:
>
>Ho una maschera in cui visualizzo i miei bei record (in modo non
>aggiornabile) e fin qui tutto ok, ordinamento dovrebbe essere su
>Tabella.campo1, Mid([Campo2],3) ma se gli passo come recordsource da codice
>la tabella mi da un errore r.t. 2001 operazione precedente annullata(???)
>allora ho pensato di passargli la query
che codice usi?
>select * from .....order by ...... funziona tutto ma risulta un tantino
>pesante perche' va a processare ogni record per creare il mid del campo 2.
>
>Voi appesantireste il db (creando immediatamente una copia della tabella
>dove creo la mid del campo)
>o lasciereste la query (impiega circa 4 min a caricare), tenedo conto che
>poi questo db avra' il FE in Access ed il Be in Oracle.
>
>Ciao a tutti grazie e spero di essere stato chiaro
>
>
Saluti.
Emanuele.


title: Recordsource di una maschera

text:
"Emyr" <
fan...@lavoro.com
> ha scritto nel messaggio
news:dufa4u4bgiior5d90...@4ax.com...
> On Tue, 15 Jan 2002 14:58:57 GMT, "Alessandro Romeo"
> <
alessand...@hotmail.com
> wrote:
>
> >Ciao a tutti...
> >piccolo quesito:
> >
> >Ho una maschera in cui visualizzo i miei bei record (in modo non
> >aggiornabile) e fin qui tutto ok, ordinamento dovrebbe essere su
> >Tabella.campo1, Mid([Campo2],3) ma se gli passo come recordsource da
codice
> >la tabella mi da un errore r.t. 2001 operazione precedente annullata(???)
> >allora ho pensato di passargli la query
>
> che codice usi?
>
> Saluti.
> Emanuele.
nomemaschera.recordsource = "nomequery"


title: Recordsource di una maschera

text:
On Wed, 16 Jan 2002 10:15:50 GMT, "Alessandro Romeo"
<
alessand...@hotmail.com
> wrote:
>
>"Emyr" <
fan...@lavoro.com
> ha scritto nel messaggio
>news:dufa4u4bgiior5d90...@4ax.com...
>> On Tue, 15 Jan 2002 14:58:57 GMT, "Alessandro Romeo"
>> <
alessand...@hotmail.com
> wrote:
>>
>> >Ciao a tutti...
>> >piccolo quesito:
>> >
>> >Ho una maschera in cui visualizzo i miei bei record (in modo non
>> >aggiornabile) e fin qui tutto ok, ordinamento dovrebbe essere su
>> >Tabella.campo1, Mid([Campo2],3) ma se gli passo come recordsource da
>codice
>> >la tabella mi da un errore r.t. 2001 operazione precedente annullata(???)
>> >allora ho pensato di passargli la query
>>
>> che codice usi?
>>
>> Saluti.
>> Emanuele.
>
>nomemaschera.recordsource = "nomequery"
>
prova con
 me.recordsource="nomequery"
Saluti.
Emanuele.


title: Pulsante interruttore

author: F. Canova

text:
Altro quesito, questa volta sulle maschere.
Ho inserito in una maschera un pulsante ad interruttore.
Vorrei fare in modo che quando il pulsante č rilasciato, il
campo_di_destinazione sia abilitato (campo_di_destinazione.enabled= true),
mentre quando č premuto il campo_di_destinazione sia disabilitato
(campo_di_destinazione.enabled= true). ho inserito queste due righe di
codice in corrispondenza degli eventi rispettivamente "Tasto su" e "Tasto
giů", ma non succede nulla.
Come mai? Ho sbagliato evento? Eppure non mi pare che ci sia qualche altro
evento piů consono.
Grazie per le delucidazioni.
Fabio.


title: Pulsante interruttore

author: ALESSANDRO Baraldi

text:
"F. Canova" <
f.ca...@fabiocanova.it
> ha scritto nel messaggio
news:dau6df$iql$1...@area.cu.mi.it...

Evento DopoAggiornamento del controllo Interruttore:
Me!campo_di_destinazione.enabled=Me!NomeControlloInterruttore
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: Pulsante interruttore

text:
"ALESSANDRO Baraldi" <
NoSpam...@libero.it
> ha scritto nel messaggio
news:dau7dn$d3r$1...@domitilla.aioe.org...

Grazie per il consiglio. Ho anche visto che modificandolo con
Me!campo_di_destinazione.enabled=NOT(Me!NomeControlloInterruttore)
agisce al contrario (che č piů comodo).
Non č che č anche possibile gestire la caption del controllointerruttore?
Cioč fargli comparire "Abilitato" quando il pulsante č su e "Disabilitato"
quando č giů, quando l'impostazione č come l'ho modificata io?
Grazie ancora, Fabio


title: Pulsante interruttore

author: Alessandro Baraldi

text:
"F. Canova" <
f.ca...@fabiocanova.it
> wrote in message
news:davrk9$5gj$
1...@area.cu.mi.it
[CUT]
> Grazie per il consiglio. Ho anche visto che modificandolo con
> Me!campo_di_destinazione.enabled=NOT(Me!NomeControlloInterruttore)
> agisce al contrario (che č piů comodo).
> Non č che č anche possibile gestire la caption del controllointerruttore?
> Cioč fargli comparire "Abilitato" quando il pulsante č su e "Disabilitato"
> quando č giů, quando l'impostazione č come l'ho modificata io?
> Grazie ancora, Fabio
Ovviamente si.
If Me!NomeControlloInterruttore then
   Me!NomeControlloInterruttore.Caption="Abilitato"
Else
   Me!NomeControlloInterruttore.Caption="Disabilitato"
End if
o viceversa a seconda di come usi il Controllo.
Ciao.
@ALex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Sincronizzazione file

author: Giuliano P.

text:
Salve a tutti,
vorrei eseguire una semplice sincronizzazione dei file .mdb tra 2 miei pc.
Il problema però è che non voglio eseguire un aggiornamento di tutti i campi
all'interno del database,
m basterebbe appunto una copia del file (l'ultimo aggiornato).
Windows XP mi esegue la copia solo se il pc che esegue la sincornizzazione
non ha installato Access.
Se invece tale software è presente allora esegue la sincronizzazione dei
campi (che è ciò che voglio evitare)
Se ovviamente non copio i file .mdb sul pc portatile ed eseguo
l'aggiornamento degli altri file tutto si conclude con successo, peccato
però che questi file siano parte di un portale che sfrutta alcuni
database...
Grazie mille a chi vorrà aiutarmi
Giuliano


title: Come spedire email senza intervento dell'utente

author: eliop

text:
Ciao a tutti.
In un'applicazione A97 vengono inseriti
i problemi segnalati dai clienti, la data
e l'ora della segnalazione.
Un altra applicazione A97 viene lanciata ogni
10 minuti per controllare quanto tempo e'
passato dall'ora della segnalazione.
Se e' trascorso un tempo superiore a quello
concordato con il cliente il programma
dovrebbe spedire una email automatica
avvertendo i vari responsabili.
E necessario spedire l'email in modo automatico,
senza interventi da parte di nessuno.
Ho provato con il programma free Blat.exe
che consente, dopo aver preparato il testo
del messaggio in un file,  di inviare una email
direttamente da command line:
es.:
blat.exe c:\messaggio.txt -server
mail.uli.it
-f
in...@pippo.it
 -subject PROVA -to
giov...@tin.it
In effetti il programma, apre la connessione
(quella predefinita, e dopo aver impostato
il flag "Connetti automaticamente") di accesso
remoto, spedisce la posta ma lascia la
connessione attiva.
Invece avrei bisogno di una sequenza del tipo:
- apre la connessione
- spedisce la posta
- chiude la connessione
Qualcuno ha qualche idea su come chiudere la connessione ?
P.S. Ho visto gli esempi sul sito comune
ma ho pensato che utilizzando outlook
andrei a cozzare con problemi di versioni e release
varie (A97, A00, W98, W2000, NT, ecc.). Sbaglio?


author: Tonio

text:
Questo per connetterti.
Private Sub Form_Load()
'Replace connection_name with the internet connection you want to launch
'To see which internet connection you got on your computer, double click
'on 'My Computer' icon on your desktop, then double click on 'Dial-Up
NetWorking'
'icon. in the new window that will be opened you will see the list of your
internet connections.
Result = SHELL("rundll32.exe rnaui.DLL,RnaDial " & "connection_name", 1)
End Sub
Per disconnettersi
'Add a module to your project (In the menu choose Project -> Add Module,
Then click Open)
'Add 1 CommandButton to your form (named Command1).
'When you will press the button you will disconnect from the internet.
'Insert this code to the module :
Public Const RAS_MAXENTRYNAME As Integer = 256
Public Const RAS_MAXDEVICETYPE As Integer = 16
Public Const RAS_MAXDEVICENAME As Integer = 128
Public Const RAS_RASCONNSIZE As Integer = 412
Public Const ERROR_SUCCESS = 0&
Public Type RasEntryName
dwSize As Long
szEntryName(RAS_MAXENTRYNAME) As Byte
End Type
Public Type RasConn
dwSize As Long
hRasConn As Long
szEntryName(RAS_MAXENTRYNAME) As Byte
szDeviceType(RAS_MAXDEVICETYPE) As Byte
szDeviceName(RAS_MAXDEVICENAME) As Byte
End Type
Public Declare Function RasEnumConnections Lib "rasapi32.DLL" _
Alias "RasEnumConnectionsA" (lpRasConn As Any, lpcb As Long, _
lpcConnections As Long) As Long
Public Declare Function RasHangUp Lib "rasapi32.DLL" Alias _
"RasHangUpA" (ByVal hRasConn As Long) As Long
Public gstrISPName As String
Public ReturnCode As Long
'Insert the following code to your form:
Public Function ByteToString(bytString() As Byte) As String
Dim I As Integer
ByteToString = ""
I = 0
While bytString(I) = 0&
ByteToString = ByteToString & Chr(bytString(I))
I = I + 1
Wend
End Function
Private Sub Command1_Click()
Dim I As Long
Dim lpRasConn(255) As RasConn
Dim lpcb As Long
Dim lpcConnections As Long
Dim hRasConn As Long
lpRasConn(0).dwSize = RAS_RASCONNSIZE
lpcb = RAS_MAXENTRYNAME * lpRasConn(0).dwSize
lpcConnections = 0
ReturnCode = RasEnumConnections(lpRasConn(0), lpcb, lpcConnections)
If ReturnCode = ERROR_SUCCESS Then
For I = 0 To lpcConnections - 1
If Trim(ByteToString(lpRasConn(I).szEntryName)) = Trim(gstrISPName) Then
 hRasConn = lpRasConn(I).hRasConn
 ReturnCode = RasHangUp(ByVal hRasConn)
End If
Next I
End If
End Sub
Per mandare mail
'Add 1 CommandButton to your form (named Command1),
'Press the button to Launch your default e-mail program in Compose mode.
'Insert the following code to your form:
Private Sub Command1_Click()
'Replace
mye...@hotmail.com
 with the E-mail address you want to send the
message to.
'You can replace 'vbHide' with following settings, according to in which
state
'you want to open the default E-mail program:
'vbHide ; vbMaximizedFocus ; vbMinimizedFocus ;vbMinimizedNoFocus ;
'vbNormalFocus ; vbNormalNoFocus
RetVal = SHELL("Start.exe mailto:
mye...@hotmail.com
", vbHide)
End Sub
"eliop" <
el...@logical.it
> ha scritto nel messaggio
news:3af4eeb0...@news.libero.it...



title: Esportare un file

author: Marcello Dell'Anna

text:
Qualcuno sa dirmi come e' possibile esportare un report in un file di word,
ma inserendo tale report nella terza pagina di un file word gia' esistente?
Grazie


title: Esportare un file

author: Sergio MAZZA

text:
"Marcello Dell'Anna" <
mdel...@tin.it
> ha scritto nel messaggio
news:k9HY6.60201$Uo3.1...@news6.giganews.com...
> Qualcuno sa dirmi come e' possibile esportare un report in un file di
word,
Non si puň fare se non in formato rtf o html, ma perderesti comunque gran
parte degli oggetti o impostazioni grafiche;
> ma inserendo tale report nella terza pagina di un file word gia'
esistente?
Cioč?
> Grazie
Ciao.


title: Esportare un file

author: MarcoS

text:
Marcello Dell'Anna <
mdel...@tin.it
> wrote in message
k9HY6.60201$Uo3.1...@news6.giganews.com...
> Qualcuno sa dirmi come e' possibile esportare un report in un file di
word,
DoCmd.OutputTo acOutputReport, "NomeReport", acFormatRTF, "Offerta.rtf",
True                  'Spedisce a Word in formato rtf
> ma inserendo tale report nella terza pagina di un file word gia'
esistente?
Questo non so se può essere fatto :-(
--
Ciao Marco S.
http://digilander.iol.it/santimarco


title: Esportare un file

author: Marcello

text:
Lo so che viene esportato in formato rtf, ma io vorrei inserire il mio
report in un file di word che gia' esiste sul mio hd, e in particolare nella
terza pagina.
Attualmente agisco così: creo il file rtf del report, apro il mio file di
word e con il comando "inserisci file" inserisco nella terza pagina il mio
report.rtf.
Vorrei poterlo fare direttamente da access senza dover ricorrere a macro di
word.
Ciao e grazie
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:9gviv0$dn4$1...@canarie.caspur.it...
>
> "Marcello Dell'Anna" <
mdel...@tin.it
> ha scritto nel messaggio
> news:k9HY6.60201$Uo3.1...@news6.giganews.com...
> > Qualcuno sa dirmi come e' possibile esportare un report in un file di
> word,
>
> Non si può fare se non in formato rtf o html, ma perderesti comunque gran
> parte degli oggetti o impostazioni grafiche;
>
> > ma inserendo tale report nella terza pagina di un file word gia'
> esistente?
>
> Cioè?
>
> > Grazie
>
> Ciao.
>
>


title: Esportare un file

text:
"Marcello" <
mdel...@tin.it
> ha scritto nel messaggio
news:zxIY6.60423$Uo3.1...@news6.giganews.com...
> Lo so che viene esportato in formato rtf, ma io vorrei inserire il mio
> report in un file di word che gia' esiste sul mio hd, e in particolare
nella
> terza pagina.
> Attualmente agisco cosě: creo il file rtf del report, apro il mio file di
> word e con il comando "inserisci file" inserisco nella terza pagina il mio
> report.rtf.
> Vorrei poterlo fare direttamente da access senza dover ricorrere a macro
di
> word.
> Ciao e grazie
>
In questo NG ci sono delle regole
(
http://www.sitocomune.com/netiquette.htm
), una di queste č quella di
scrivere il testo della risposta dopo il messaggio precedente, come sto
facendo io; grazie.
Puoi provare con:
'-----------------
Sub apriWordEinserisciRTF()
Dim oApp As Word.Application
Set oApp = CreateObject("Word.application")
With oApp
    .Documents.Open ("nomeFileDOC.doc")
    .Selection.Goto What:=wdGoToPage, Which:=wdGoToNext, Name:="3"
    .Selection.Find.ClearFormatting
    With .Selection.Find
        .Text = ""
        .Replacement.Text = ""
        .Forward = True
        .Wrap = wdFindContinue
        .Format = False
        .MatchCase = False
        .MatchWholeWord = False
        .MatchWildcards = False
        .MatchSoundsLike = False
        .MatchAllWordForms = False
    End With
    .Selection.InsertFile FileName:="nomeFileRTF.rtf", Range:="",
ConfirmConversions:=False, Link:=False, Attachment:=False
End With
oApp.Visible = True
Set oApp = Nothing
End Sub
'-----------------
Ricordati di inserire i riferimenti alla libreria di Word; menů strumenti -
riferimenti...
Ciao.


title: Esportare un file

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:9gvlb2$fbs$1...@canarie.caspur.it...

Grazie e scusate per aver violato le norme (sono nuovo del NG).
Ho provato, ma non riesco a trovare i riferimenti per inserire quelli di
word.
Grazie


title: Esportare un file

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:9gvlb2$fbs$1...@canarie.caspur.it...

Scusami ho provato (ho trovato i riferimenti), ma mi da errore in quanto non
riesce a trovare il file doc, nonostante io abbia inserito ilpercorso
giusto:
>     .Documents.Open ("xxxxxx.doc")           ' xxxxx.doc č il file in cui
inserire il report
Grazie


title: Esportare un file

text:
"Marcello" <
mdel...@tin.it
> ha scritto nel messaggio
news:s_LY6.61203$Uo3.1...@news6.giganews.com...
>
> Scusami ho provato (ho trovato i riferimenti), ma mi da errore in quanto
non
> riesce a trovare il file doc, nonostante io abbia inserito ilpercorso
> giusto:
> >     .Documents.Open ("xxxxxx.doc")           ' xxxxx.doc è il file in
cui
> inserire il report
>
> Grazie
Se invii il pezzo di codice fai un'opera buona...
Ciao.


title: Esportare un file

text:
"Marcello" <
mdel...@tin.it
> ha scritto nel messaggio
news:s_LY6.61203$Uo3.1...@news6.giganews.com...

Sono ancora poco pratico del NG, scusami. Ti invio il precedente post.
E grazie ancora.
>


title: Esportare un file

text:
"Marcello" <
mdel...@tin.it
> ha scritto nel messaggio
news:8ckZ6.82012$Uo3.2...@news6.giganews.com...
>
>
> Sono ancora poco pratico del NG, scusami. Ti invio il precedente post.
> E grazie ancora.
> >
>
Grazie, ma intendevo il tuo di codice non il mio esempio, quello lo conosco
gią; oppure il tuo file si chiama veramente xxxxxx.doc? Ma anche se fosse
dovrai indicare la directory dove č memorizzato o č nella stessa posizione
dell'mdb? E poi controlla anche la posizione del file in formato rtf (che io
ho chiamato nomeFileRTF.rtf).
Conclusione: se i file (mdb, doc, rtf) sono nella stessa cartella non devi
indicare il percorso, basta solo il nome del file; in caso contrario devi
indicare il percorso per i doc e rtf...
Ciao.


title: Esportare un file

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:9h58aa$cic$1...@canarie.caspur.it...
>
> "Marcello" <
mdel...@tin.it
> ha scritto nel messaggio
> news:8ckZ6.82012$Uo3.2...@news6.giganews.com...
> >
> >
> > Sono ancora poco pratico del NG, scusami. Ti invio il precedente post.
> > E grazie ancora.
> > >
> >
>
> Grazie, ma intendevo il tuo di codice non il mio esempio, quello lo
conosco
> già; oppure il tuo file si chiama veramente xxxxxx.doc? Ma anche se fosse
> dovrai indicare la directory dove è memorizzato o è nella stessa posizione
> dell'mdb? E poi controlla anche la posizione del file in formato rtf (che
io
> ho chiamato nomeFileRTF.rtf).
> Conclusione: se i file (mdb, doc, rtf) sono nella stessa cartella non devi
> indicare il percorso, basta solo il nome del file; in caso contrario devi
> indicare il percorso per i doc e rtf...
>
> Ciao.
>
I file doc, rtf e mdb si trovano nella stessa directory, eppure non riesce a
trovare il file.
Mi chiedo: ma deve essere una Sub o una Private Sub???
D'altronde non sono un espertissimo di Access, ma ci sto  mettendo del mio
meglio.
Grazie Ciao


title: Esportare un file

text:
"Marcello" <
mdel...@tin.it
> ha scritto nel messaggio
news:2xGZ6.94306$Uo3.2...@news6.giganews.com...
>
> I file doc, rtf e mdb si trovano nella stessa directory, eppure non riesce
a
> trovare il file.
> Mi chiedo: ma deve essere una Sub o una Private Sub???
> D'altronde non sono un espertissimo di Access, ma ci sto  mettendo del mio
> meglio.
> Grazie Ciao
Sub o Private Sub poco importa; se vuoi crearti una Sub che viene chiamata
da qualsiasi maschera, ti crei un modulo e la scrivi lě:
'-------------
Sub nomeSub()
. . . codice VBA
End Sub
'-------------
Poi, per esempio, da un bottone, nell'evento "su clic" puoi richiamarla:
Es.
'-------------
Private Sub nomeBottone_onClick()
nomeSub
End Sub
'-------------
L'unico problema č sapere come hai chiamato i file, come hai scritto i loro
nomi nel codice VBA e dove li hai salvati; il "dove li hai salvati" l'hai
detto, se completi le informazioni con i nomi dei file e il codice che li
richiama il cerchio č chiuso (spero)...
Ciao.


title: Esportare un file

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:9h7d0g$qiq$1...@canarie.caspur.it...
>
> "Marcello" <
mdel...@tin.it
> ha scritto nel messaggio
> news:2xGZ6.94306$Uo3.2...@news6.giganews.com...
> >
> > I file doc, rtf e mdb si trovano nella stessa directory, eppure non
riesce
> a
> > trovare il file.
> > Mi chiedo: ma deve essere una Sub o una Private Sub???
> > D'altronde non sono un espertissimo di Access, ma ci sto  mettendo del
mio
> > meglio.
> > Grazie Ciao
>
> Sub o Private Sub poco importa; se vuoi crearti una Sub che viene chiamata
> da qualsiasi maschera, ti crei un modulo e la scrivi lì:
> '-------------
> Sub nomeSub()
> . . . codice VBA
> End Sub
> '-------------
>
> Poi, per esempio, da un bottone, nell'evento "su clic" puoi richiamarla:
> Es.
> '-------------
> Private Sub nomeBottone_onClick()
> nomeSub
> End Sub
> '-------------
>
> L'unico problema è sapere come hai chiamato i file, come hai scritto i
loro
> nomi nel codice VBA e dove li hai salvati; il "dove li hai salvati" l'hai
> detto, se completi le informazioni con i nomi dei file e il codice che li
> richiama il cerchio è chiuso (spero)...
>
> Ciao.
>
>
Spero di non fare troppa confusione. Cerco di ricapitolare:
In una maschera ho inserito il pulsante che dal report R_Elenco genera il
file R_Elenco.rtf ;
ho inserito un nuovo pulsante che inserisce questo file R_Elenco.rtf  come
terza pagina del un file doc di nome Scheda.doc .
I problemi sono due:
1) mi inserisce il file all'inizio della pagina uno, mentre io vorrei che lo
inserisse a partire dalla terza;
2) vorrei poter fare il tutto con un solo pulsante.
Questo è il codice (che mi hai inviato e da me modificato) con cui inserisco
il file rtf nel doc:
Private Sub Esporta_Click()
 Dim oApp As Word.Application
 Set oApp = CreateObject("Word.application")
 With oApp
     .Documents.Open ("Scheda.doc")       'questo e' il file di destinazione
     .Selection.Goto What:=wdGoToPage, Which:=wdGoToNext, Name:="3"
     .Selection.Find.ClearFormatting
     With .Selection.Find
         .Text = ""
         .Replacement.Text = ""
         .Forward = True
         .Wrap = wdFindContinue
         .Format = False
         .MatchCase = False
         .MatchWholeWord = False
         .MatchWildcards = False
         .MatchSoundsLike = False
         .MatchAllWordForms = False
     End With
                    ' questo il file rtf generato dal report
     .Selection.InsertFile FileName:="R_Elenco.rtf", Range:="",
ConfirmConversions:=False, Link:=False,
Attachment:=False
 End With
 oApp.Visible = True
 Set oApp = Nothing
End Sub
In attesa di una tua, ti ringrazio ancora tanto.
Ciao


title: Esportare un file

text:
"Marcello" <
mdel...@tin.it
> ha scritto nel messaggio
news:VVHZ6.96284$Uo3.2...@news6.giganews.com...
>
> Spero di non fare troppa confusione. Cerco di ricapitolare:
> In una maschera ho inserito il pulsante che dal report R_Elenco genera il
> file R_Elenco.rtf ;
Ah! Ora si ragiona;
> ho inserito un nuovo pulsante che inserisce questo file R_Elenco.rtf  come
> terza pagina del un file doc di nome Scheda.doc .
> I problemi sono due:
> 1) mi inserisce il file all'inizio della pagina uno, mentre io vorrei che
lo
> inserisse a partire dalla terza;
Ma allora lo legge il file!
Strano, ma di quante pagine è composto il documento word? Fai attenzione che
io ho dato per scontato che nel doc hai già tre pagine non che le devi
creare da codice...
> 2) vorrei poter fare il tutto con un solo pulsante.
Questo è un'altro discorso;
nel pulsante "Esporta" inserisci il codice prima di "With oApp":
'--------
DoCmd.OutputTo acOutputReport, "R_Elenco", acFormatRTF, "R_Elenco.rtf"
'--------
Vedi l'help del metodo OutputTo.

Ciao.


title: Esportare un file

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:9h7d0g$qiq$1...@canarie.caspur.it...
>
> "Marcello" <
mdel...@tin.it
> ha scritto nel messaggio
> news:2xGZ6.94306$Uo3.2...@news6.giganews.com...
> >
> > I file doc, rtf e mdb si trovano nella stessa directory, eppure non
riesce
> a
> > trovare il file.
> > Mi chiedo: ma deve essere una Sub o una Private Sub???
> > D'altronde non sono un espertissimo di Access, ma ci sto  mettendo del
mio
> > meglio.
> > Grazie Ciao
>
> Sub o Private Sub poco importa; se vuoi crearti una Sub che viene chiamata
> da qualsiasi maschera, ti crei un modulo e la scrivi lì:
> '-------------
> Sub nomeSub()
> . . . codice VBA
> End Sub
> '-------------
>
> Poi, per esempio, da un bottone, nell'evento "su clic" puoi richiamarla:
> Es.
> '-------------
> Private Sub nomeBottone_onClick()
> nomeSub
> End Sub
> '-------------
>
> L'unico problema è sapere come hai chiamato i file, come hai scritto i
loro
> nomi nel codice VBA e dove li hai salvati; il "dove li hai salvati" l'hai
> detto, se completi le informazioni con i nomi dei file e il codice che li
> richiama il cerchio è chiuso (spero)...
>
> Ciao.
>
>
Ti invio il codice che utilizzo cioe' quello tuo modificato.
Mi da errore di Run Time 5174 - impossibile trovare il file SCHEDA.DOC
Questo è il codice (che mi hai inviato e da me modificato) con cui inserisco
il file rtf nel doc:
Private Sub Esporta_Click()
 Dim oApp As Word.Application
 Set oApp = CreateObject("Word.application")
 With oApp
     .Documents.Open ("Scheda.doc")       'questo e' il file di destinazione
     .Selection.Goto What:=wdGoToPage, Which:=wdGoToNext, Name:="3"
     .Selection.Find.ClearFormatting
     With .Selection.Find
         .Text = ""
         .Replacement.Text = ""
         .Forward = True
         .Wrap = wdFindContinue
         .Format = False
         .MatchCase = False
         .MatchWholeWord = False
         .MatchWildcards = False
         .MatchSoundsLike = False
         .MatchAllWordForms = False
     End With
                    ' questo il file rtf generato dal report
     .Selection.InsertFile FileName:="R_Elenco.rtf", Range:="",
ConfirmConversions:=False, Link:=False,
Attachment:=False
 End With
 oApp.Visible = True
 Set oApp = Nothing
End Sub
In attesa di una tua, ti ringrazio ancora tanto.
Ciao


title: Esportare un file

text:
"Marcello" <
mdel...@tin.it
> ha scritto nel messaggio
news:D2MZ6.96583$Uo3.2...@news6.giganews.com...
>
> "Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
> news:9h7d0g$qiq$1...@canarie.caspur.it...
> >
> > "Marcello" <
mdel...@tin.it
> ha scritto nel messaggio
> > news:2xGZ6.94306$Uo3.2...@news6.giganews.com...
> > >
> > > I file doc, rtf e mdb si trovano nella stessa directory, eppure non
> riesce
> > a
> > > trovare il file.
> > > Mi chiedo: ma deve essere una Sub o una Private Sub???
> > > D'altronde non sono un espertissimo di Access, ma ci sto  mettendo del
> mio
> > > meglio.
> > > Grazie Ciao
> >
> > Sub o Private Sub poco importa; se vuoi crearti una Sub che viene
chiamata
> > da qualsiasi maschera, ti crei un modulo e la scrivi lě:
> > '-------------
> > Sub nomeSub()
> > . . . codice VBA
> > End Sub
> > '-------------
> >
> > Poi, per esempio, da un bottone, nell'evento "su clic" puoi richiamarla:
> > Es.
> > '-------------
> > Private Sub nomeBottone_onClick()
> > nomeSub
> > End Sub
> > '-------------
> >
> > L'unico problema č sapere come hai chiamato i file, come hai scritto i
> loro
> > nomi nel codice VBA e dove li hai salvati; il "dove li hai salvati"
l'hai
> > detto, se completi le informazioni con i nomi dei file e il codice che
li
> > richiama il cerchio č chiuso (spero)...
> >
> > Ciao.
> >
> >
> Ti invio il codice che utilizzo cioe' quello tuo modificato.
> Mi da errore di Run Time 5174 - impossibile trovare il file SCHEDA.DOC
>
> Questo č il codice (che mi hai inviato e da me modificato) con cui

In effetti un po di confusione la sto creando,ma spero nella tua pazienza:
l'ultimo post che ti ho inviato non devi considerarlo in quanto appena
modificato il codice, ha funzionato per una volta, poi niente piu', solo
errore run time che ti dicevo.
 Il problema di fare tutto con un pulsante l'ho risolto, ma ora resta il
problema che non riesce a trovare il file e mi da errore run-time 5174.
Tutti i files risiedono nella stessa directory, ma non lo trova comunque.
Grazie ancora


title: Esportare un file

text:
"Marcello" <
mdel...@tin.it
> ha scritto nel messaggio
news:iu_Z6.98814$Uo3.2...@news6.giganews.com...
>
> In effetti un po di confusione la sto creando,ma spero nella tua pazienza:
I capelli li ho persi da un bel pezzo;
> l'ultimo post che ti ho inviato non devi considerarlo in quanto appena
> modificato il codice, ha funzionato per una volta, poi niente piu', solo
> errore run time che ti dicevo.
Strano o funziona sempre o non funziona mai, questo al
99,999999999999999999999%... Poi si chiama sfiga.
>  Il problema di fare tutto con un pulsante l'ho risolto, ma ora resta il
> problema che non riesce a trovare il file e mi da errore run-time 5174.
> Tutti i files risiedono nella stessa directory, ma non lo trova comunque.
> Grazie ancora
Mandami tutto il codice da Sub a End Sub; non mi hai detto se il documento
word ha o no le tre (o più) pagine già create...
Ciao.


title: Esportare un file

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:9hc4g1$4d0$1...@canarie.caspur.it...

Ti confermo che funziona la prima volta...poi non mi trova piu' il file
Scheda.doc (che è composto da 3 pagine)
R_Generale.rtf è invece il file generato dal report.
Questo è il codice che associo al pulsante Esporta:
Private Sub Esporta_Click()
 Dim oApp As Word.Application
 Set oApp = CreateObject("Word.application")
 With oApp
    .Documents.Open ("Scheda.doc")                'qui mi da errore e lo
evidenzia di giallo!!!!
     .Selection.Goto What:=wdGoToPage, Which:=wdGoToNext, Name:="3"
     .Selection.Find.ClearFormatting
     With .Selection.Find
         .Text = ""
         .Replacement.Text = ""
         .Forward = True
         .Wrap = wdFindContinue
         .Format = False
         .MatchCase = False
         .MatchWholeWord = False
         .MatchWildcards = False
         .MatchSoundsLike = False
         .MatchAllWordForms = False
     End With
     .Selection.InsertFile FileName:="R_Generale.rtf", Range:="",
ConfirmConversions:=False, Link:=False, Attachment:=False
 End With
 oApp.Visible = True
 Set oApp = Nothing
 End Sub
A capelli siamo alla pari. Ti ringrazio. Ciao


title: Esportare un file

text:
"Marcello" <
mdel...@tin.it
> ha scritto nel messaggio
news:HSl_6.101331$Uo3.2...@news6.giganews.com...
>
> Ti confermo che funziona la prima volta...poi non mi trova piu' il file
> Scheda.doc (che č composto da 3 pagine)
> R_Generale.rtf č invece il file generato dal report.
>
> Questo č il codice che associo al pulsante Esporta:

Visto che ti si blocca iniziamo a inserire la gestione dell'errore:
'------------
Private Sub Esporta_Click()
On Error Goto Esporta_err
.
.codice VBA
.
Esporta_exit:
    Exit sub
Esporta_err:
    Set oApp = Nothing
    MsgBox Err.Description & ", " & Err.Number
Exit Sub
'------------
Poi proviamo cosě:
'----------
...
With oApp
     .Documents.Open "Scheda.doc"
...
'----------
Ciao.


title: Esportare un file

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:9hcqg9$k35$1...@canarie.caspur.it...

Caspita...ho provato in entrambi i modi, ma niente!!!!
Private Sub Esporta_Click()
On Error GoTo Esporta_err
 Dim oApp As Word.Application
 Set oApp = CreateObject("Word.application")
 With oApp
     .Documents.Open "Scheda.doc"
     .Selection.Goto What:=wdGoToPage, Which:=wdGoToNext, Name:="3"
     .Selection.Find.ClearFormatting
     With .Selection.Find
         .Text = ""
         .Replacement.Text = ""
         .Forward = True
         .Wrap = wdFindContinue
         .Format = False
         .MatchCase = False
         .MatchWholeWord = False
         .MatchWildcards = False
         .MatchSoundsLike = False
         .MatchAllWordForms = False
     End With
     .Selection.InsertFile FileName:="R_Generale.rtf", Range:="",
ConfirmConversions:=False, Link:=False, Attachment:=False
 End With
 oApp.Visible = True
 Set oApp = Nothing
Esporta_exit:
    Exit Sub
Esporta_err:
    Set oApp = Nothing
    MsgBox Err.Description & ", " & Err.Number
Exit Sub
 End Sub


title: Esportare un file

text:
"Marcello" <
mdel...@tin.it
> ha scritto nel messaggio
news:lom_6.101387$Uo3.2...@news6.giganews.com...
>
> Caspita...ho provato in entrambi i modi, ma niente!!!!
>
-------- omissis --------
>
Cavolo!
Allora prova ad inserire la directory
'---------
.Documents.Open "C:\MaDoveDiavoloStai\Scheda.doc"
'---------
E se non funziona cambiagli nome a sto' file; scherzo...
Ma che tipo di errore ti presenta?
Ciao.


title: Esportare un file

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:9hcqg9$k35$1...@canarie.caspur.it...

Ho provato in entrambi i modi, cambia l'avviso di errore, ma sempre lo
stesso e cioč che non riesce a trovare il file Scheda.doc oppure dice di
cambiare il nome del file.


title: Esportare un file

text:
"Marcello" <
mdel...@tin.it
> ha scritto nel messaggio
news:1Dm_6.101398$Uo3.2...@news6.giganews.com...
>
> Ho provato in entrambi i modi, cambia l'avviso di errore, ma sempre lo
> stesso e cioč che non riesce a trovare il file Scheda.doc oppure dice di
> cambiare il nome del file.
Mi dispiace ma a questo punto mi dovresti inviare il pc o almeno l'hd...
Solo tu sai cosa c'č in quella benedetta cartella. Una cosa non ho trovato
nel codice le istruzioni che esportano il report in rtf, ma credo che non
influisca sul risultato...
Ciao.


title: Esportare un file

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:9hctrv$mjb$1...@canarie.caspur.it...
>
> "Marcello" <
mdel...@tin.it
> ha scritto nel messaggio
> news:1Dm_6.101398$Uo3.2...@news6.giganews.com...
> >
> > Ho provato in entrambi i modi, cambia l'avviso di errore, ma sempre lo
> > stesso e cioè che non riesce a trovare il file Scheda.doc oppure dice di
> > cambiare il nome del file.
>
> Mi dispiace ma a questo punto mi dovresti inviare il pc o almeno l'hd...
> Solo tu sai cosa c'è in quella benedetta cartella. Una cosa non ho trovato
> nel codice le istruzioni che esportano il report in rtf, ma credo che non
> influisca sul risultato...
>
> Ciao.
>
>
In effetti le avevo tolte per fare una prova, ma ti assicuro che ci sono
nella versione definitiva.
Io continuero' nella mia lotta, soprattutto per capire perche' la prima
volta funziona e dopo no. Per ultima cosa volevo dirti che ho notato che
durante i miei innumerevoli tentativi mi ha aperto winword parecchie volte
e con Ctrl+alt+canc me ne sono ritrovato aperti ben 13.
Ho provato a far girare il tutto anche su un altro pc, ma niente.
Se ci riusciro' non esitero' a comunicartelo e spero che sul Ng, quando
vedrai il mio nome non lo cancellerai a priori!!!
Ciao e grazie


title: Esportare un file

text:
Marcello <
mdel...@tin.it
> wrote in message
dgn_6.101492$Uo3.2...@news6.giganews.com...
>
> In effetti le avevo tolte per fare una prova, ma ti assicuro che ci sono
> nella versione definitiva.
> Io continuero' nella mia lotta, soprattutto per capire perche' la prima
> volta funziona e dopo no. Per ultima cosa volevo dirti che ho notato che
> durante i miei innumerevoli tentativi mi ha aperto winword parecchie volte
> e con Ctrl+alt+canc me ne sono ritrovato aperti ben 13.
> Ho provato a far girare il tutto anche su un altro pc, ma niente.
> Se ci riusciro' non esitero' a comunicartelo e spero che sul Ng, quando
> vedrai il mio nome non lo cancellerai a priori!!!
Come minimo gli devi pagare una pinta di birra ;-)



title: Esportare un file

text:
"Marcello" <
mdel...@tin.it
> ha scritto nel messaggio
news:dgn_6.101492$Uo3.2...@news6.giganews.com...
>
> In effetti le avevo tolte per fare una prova, ma ti assicuro che ci sono
> nella versione definitiva.
> Io continuero' nella mia lotta, soprattutto per capire perche' la prima
> volta funziona e dopo no. Per ultima cosa volevo dirti che ho notato che
> durante i miei innumerevoli tentativi mi ha aperto winword parecchie volte
> e con Ctrl+alt+canc me ne sono ritrovato aperti ben 13.
> Ho provato a far girare il tutto anche su un altro pc, ma niente.
> Se ci riusciro' non esitero' a comunicartelo e spero che sul Ng, quando
> vedrai il mio nome non lo cancellerai a priori!!!
> Ciao e grazie
>
Lascia perdere la birra e riavvia il pc; che tutte le volte che ti andava in
errore ti č rimasta in memoria un'istanza dell'oggetto word.
Chiudi tutto e riparti, con la gestione degli errori l'oggetto word non
rimane piů aperto e se č quello l'errore (volesse il cielo!)... Me paghi na'
cena!!
Ciao.
P.S. Nella lista nera c'č solo un nominativo...


title: Esportare un file

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto nel messaggio
news:9hd1uh$p2s$1...@canarie.caspur.it...

....Calma, calma...forse ci siamo!!!!....ho inserito il controllo degli
errori, ho unito i due comandi (creazione del file rtf del report e
esportazione in un file di word) e sembra che funzioni.
Ho inserito l'intero percorso dei vari files.
Per ottimizzare l'operazione pero' (visto che ormai la cena deve uscire)
volevo chiederti se si puo' togliere l'avviso che mi permette di scegliere
il tipo di file da esportare, cioe' rtf, dos,html che mi esce fuori quando
chiedo l'esportazione del file ed eventualmente inserire nel codice stesso
il percorso che dovra' prendere il file word. Per info ti invio il codice
finale e che Dio mi salvi!!! Ancora grazie.
Private Sub Esporta_Click()
    'Crea file rtf del report
    Dim stDocName As String
    stDocName = "R_Generale"
    DoCmd.OutputTo acReport, stDocName
    'Inizio codice di esportazione file
On Error GoTo Esporta_err
 Dim oApp As Word.Application
 Set oApp = CreateObject("Word.application")
 With oApp
     .Documents.Open ("C:\WINDOWS\Desktop\Scheda.doc")
     .Selection.Goto What:=wdGoToPage, Which:=wdGoToNext, Name:="3"
     .Selection.Find.ClearFormatting
     With .Selection.Find
         .Text = ""
         .Replacement.Text = ""
         .Forward = True
         .Wrap = wdFindContinue
         .Format = False
         .MatchCase = False
         .MatchWholeWord = False
         .MatchWildcards = False
         .MatchSoundsLike = False
         .MatchAllWordForms = False
     End With
     .Selection.InsertFile FileName:="C:\WINDOWS\Desktop\R_Generale.rtf",
Range:="", ConfirmConversions:=False, Link:=False, Attachment:=False
 End With
 oApp.Visible = True
 Set oApp = Nothing
Esporta_exit:
    Exit Sub
Esporta_err:
    Set oApp = Nothing
    MsgBox Err.Description & ", " & Err.Number
Exit Sub
End Sub


title: copia record in altra maschera

author: Air Jordan

text:
ho una maschera in cui scrivo una serie di dati in diverse caselle
di testo. Vorrei far sě che questi dati venissero automaticamente
copiati in un'altra maschera che contiene parzialmente i dati della
prima. Credo che con VBA si possa fare, ma non sono molto pratico.
Grazie a tutti.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: copia record in altra maschera

text:
"Air Jordan" <
bartsi...@katamail.com
> ha scritto nel messaggio
news:bad2988ff6d32eb521a...@mygate.mailgate.org...

Non sono sicuro di aver capito, ma se le origini dati delle maschere sono in
qualche modo relazionate prova a guardare l'help di DLookup
Ciao,
Paolo


title: copia record in altra maschera

author: Salvatore

text:
"Air Jordan" <
bartsi...@katamail.com
> ha scritto nel messaggio
news:bad2988ff6d32eb521a...@mygate.mailgate.org...

La seconda maschera si basa su un'altra tabella? Se sě, esegui una query di
accodamento che, basandosi sulla prima maschera accodi i dati sulla tabella
in questione.
Ciao, Salvatore


title: orientamento sottomaschera

author: iperworld

text:
Ciao a tutti
la domanda è di quelle rapide:
è possibile avere una sottomaschera in formato
foglio dati con un orientamento del tipo basso - alto
(cioè con lo spazio per il nuovo record all'inizio
della serie di record già presenti in una sottomaschera)?
sarebbe qualcosa di speculare al comando
orientamento destra - sinistra (o sinistra - destra)
presente nelle proprietà della maschera.
grazie a tutti


title: orientamento sottomaschera

author: MA

text:
iperworld wrote:
> Ciao a tutti
>
> la domanda è di quelle rapide:
La risposta ancora più rapida:
NO
>
> è possibile avere una sottomaschera in formato
> foglio dati con un orientamento del tipo basso - alto
> (cioè con lo spazio per il nuovo record all'inizio
> della serie di record già presenti in una sottomaschera)?
Però puoi crearti dei controlli non associati e lavorare con quelli
e poi butti in sottomaschera orientata con l'id desc
>
> sarebbe qualcosa di speculare al comando
> orientamento destra - sinistra (o sinistra - destra)
> presente nelle proprietà della maschera.
>
> grazie a tutti
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


title: orientamento sottomaschera

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:fctj2g$4dt$1...@tdi.cu.mi.it...






grazie per la risposta precisa e concisa


title: come si tolgono tutte le barre dei Menù di access?

text:
sapete via codice come togliere tutte le barre dei menů di access visto che
anceh andando in strumenti\avvio e togliendo la spunta su barre dei menů,
quella di default resta comunque? grazie.


title: Numero Massimo di Controlli in una maschera di Access

author: Marsilio

text:
Salve,
č la prima volta che scrivo in un newsgroup, spero di non fare errori.
Io sto costruendo un progetto di Access (2003), collegato a un database
MSDE2000; creando piů di 700-800 controlli in una maschera (lo so che sono
tanti...),  esce un errore di runtime che mi avverte che non č possibile
inserire ulteriori controlli. E' un limite di Access? Sul sito Microsoft ho
trovato come limite (per Access 2007) il valore 754...
Maru


author: Karl Donaubauer

text:
Marsilio wrote:
> č la prima volta che scrivo in un newsgroup, spero di non fare errori.
>
> Io sto costruendo un progetto di Access (2003), collegato a un
> database MSDE2000; creando piů di 700-800 controlli in una maschera
> (lo so che sono tanti...),  esce un errore di runtime che mi avverte
> che non č possibile inserire ulteriori controlli. E' un limite di
> Access?
Sě, vedi
www.donkarl.com/it?FAQ1.4
.
> Sul sito Microsoft ho trovato come limite (per Access 2007)
> il valore 754...
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


author: Oscar Manfredini

text:
"Marsilio" <
.tin.it...

Potresti inserire parte dei controlli in una sottomaschera.
Ciao: Oscar


text:
Grazie mille!
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:66jnrlF...@mid.individual.net...



text:
Grazie del consiglio, in effetti è forse l'unico modo per risolvere il
problema, anche se questo mi complica un po' la vita con la programmazione,
visto che sia la maschera che le sottomaschere saranno costruite a runtime.
Ciao!
"Oscar Manfredini" <
oscar.ma...@libero.it
> ha scritto nel messaggio
news:4804abd1$0$35952$4faf...@reader2.news.tin.it...
>
> "Marsilio" <
>
> .tin.it...
>> Salve,
>>
>> è la prima volta che scrivo in un newsgroup, spero di non fare errori.
>>
>> Io sto costruendo un progetto di Access (2003), collegato a un database
>> MSDE2000; creando più di 700-800 controlli in una maschera (lo so che
>> sono
>> tanti...),  esce un errore di runtime che mi avverte che non è possibile



title: Principiante - report-

author: Fabio

text:
Salve a tutti,
ho un piccolo db con il quale mi stampo delle fatture.
Con questo evento rendo visibile una "X" su di una casella riferita al
trasporto.
Private Sub Report_Open(Cancel As Integer)
app = Forms("mas_vendite").trasporto
If app = "MITTENTE" Then
  XMITTENTE.Visible = True
ElseIf app = "DESTINATARIO" Then
  XDESTINATARIO.Visible = True
ElseIf app = "VETTORE" Then
  XVETTORE.Visible = True
End If
End Sub
Come posso fare ad aggiungere altri controlli...per es.
-se il cliente è "PIPPO" allora rendi visibile il controllo 1 e 2
- se il cliente è "PLUTO" rendi visibile il controllo 3 e 5.
Non so se mi son spiegato, speriamo.
Grazie a tutti


title: Principiante - report-

author: ziobill

text:

'quì nascondi tutti i controlli
xmittente.visible=0
xdestinatario.visible=0
...
...
pippo.visible=0
pluto.visible=0
'quì accendi quelli che ti servono
select case app
    case is = "Mittente"
            XMittente.visible=-1
   case is = "Destinatario"
            XDestinatario.visible=-1
   case is ....
           ..............
   case is = "pippo"
          controllo1.visible=-1
          controllo2.visible=-1
   case is = "pluto"
         controllo3.visibe=-1
         controllo5.visible=-1
end select
se ho capito quello che intendi questo potrebbe essere il sistema.
Ciao


title: Principiante - report-

text:
"ziobill" <
dimaio....@gmail.com
> ha scritto nel messaggio
news:98b01b8d-9d39-4935...@d19g2000yqb.googlegroups.com...
On 19 Mar, 22:14, "Fabio" <fabio> wrote:
> Salve a tutti,
> ho un piccolo db con il quale mi stampo delle fatture.
> Con questo evento rendo visibile una "X" su di una casella riferita al
> trasporto.
>
> Private Sub Report_Open(Cancel As Integer)
> app = Forms("mas_vendite").trasporto
> If app = "MITTENTE" Then
> XMITTENTE.Visible = True
> ElseIf app = "DESTINATARIO" Then
> XDESTINATARIO.Visible = True
> ElseIf app = "VETTORE" Then
> XVETTORE.Visible = True
>
> End If
>
> End Sub
>
> Come posso fare ad aggiungere altri controlli...per es.
> -se il cliente č "PIPPO" allora rendi visibile il controllo 1 e 2
> - se il cliente č "PLUTO" rendi visibile il controllo 3 e 5.
>
> Non so se mi son spiegato, speriamo.
>
> Grazie a tutti
'quě nascondi tutti i controlli
xmittente.visible=0
xdestinatario.visible=0
...
...
pippo.visible=0
pluto.visible=0
'quě accendi quelli che ti servono
select case app
    case is = "Mittente"
            XMittente.visible=-1
   case is = "Destinatario"
            XDestinatario.visible=-1
   case is ....
           ..............
   case is = "pippo"
          controllo1.visible=-1
          controllo2.visible=-1
   case is = "pluto"
         controllo3.visibe=-1
         controllo5.visible=-1
end select
se ho capito quello che intendi questo potrebbe essere il sistema.
Ciao
Ciao Grazie!!
Ci provo!
Fabio


title: Copia/Incolla su maschera con campi non visibili

author: Sandrobi

text:
Mi sono accorto per caso che se favvio Copia/Incolla di una riga su una
nuova riga, da maschera continua, i campi non visibili vengono lasciati
vuoti.
E' una cosa molto grave, a meno che non ho preso un abbaglio. Come si può
evitare?
--
Ciao, Sandrobi
------------------
Se la tua email è fasulla, ti invito a leggere qui:
http://wiki.news.nic.it/AntiSpam


author: maynard

text:
Perchè non lo gestisci via codice?
"Sandrobi" <
sand...@libero.it
> ha scritto nel messaggio
news:437f234a$0$13255$4faf...@reader2.news.tin.it...



text:
> "Sandrobi" <
sand...@libero.it
> ha scritto nel messaggio
> news:437f234a$0$13255$4faf...@reader2.news.tin.it...
> > Mi sono accorto per caso che se favvio Copia/Incolla di una riga su una
> > nuova riga, da maschera continua, i campi non visibili vengono lasciati
> > vuoti.
> > E' una cosa molto grave, a meno che non ho preso un abbaglio. Come si
può
> > evitare?
> >
> Perchè non lo gestisci via codice?
>
In che modo? Con Runcommand mi pare che faccia la stessa cosa!
Sandrobi


text:
Sandrobi wrote:
>> "Sandrobi" <
sand...@libero.it
> ha scritto nel messaggio
>> news:437f234a$0$13255$4faf...@reader2.news.tin.it...
>>> Mi sono accorto per caso che se favvio Copia/Incolla di una riga su
>>> una nuova riga, da maschera continua, i campi non visibili vengono
>>> lasciati vuoti.
>>> E' una cosa molto grave, a meno che non ho preso un abbaglio. Come
>>> si può evitare?
>>>
>
>> Perchè non lo gestisci via codice?
>>
Bravo per la correzione del quoting
> In che modo? Con Runcommand mi pare che faccia la stessa cosa!
No, caricando il rst peso con la pk messa in memoria
> Sandrobi
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


text:
> >>> Mi sono accorto per caso che se favvio Copia/Incolla di una riga su
> >>> una nuova riga, da maschera continua, i campi non visibili vengono
> >>> lasciati vuoti.
> >>> E' una cosa molto grave, a meno che non ho preso un abbaglio. Come
> >>> si può evitare?
> >>>
> >
> >> Perchè non lo gestisci via codice?
> >>
> Bravo per la correzione del quoting
Grazie
> > In che modo? Con Runcommand mi pare che faccia la stessa cosa!
> No, caricando il rst peso con la pk messa in memoria
Scusa, mi puoi spiegare meglio?
Grazie
Sandrobi


text:
Sandrobi wrote:
>>>>> Mi sono accorto per caso che se favvio Copia/Incolla di una riga
>>>>> su una nuova riga, da maschera continua, i campi non visibili
>>>>> vengono lasciati vuoti.
>>>>> E' una cosa molto grave, a meno che non ho preso un abbaglio. Come
>>>>> si puň evitare?
>>>>>
>>>
>>>> Perchč non lo gestisci via codice?
>>>>
>> Bravo per la correzione del quoting
>
> Grazie
>
>>> In che modo? Con Runcommand mi pare che faccia la stessa cosa!
>> No, caricando il rst peso con la pk messa in memoria
>
> Scusa, mi puoi spiegare meglio?
> Grazie
> Sandrobi
Creati una funzioncina che facci aquello che vuoi
vedi qual'č il record corrente, individui la primary key
ti apri il recordset e lo incolli dove vuoi
Se hai selezionato piů record puoi usare seltop



title: Memorizzare valore casella

author: Giorgio M

text:
Salve
Ho una maschera con al'interno una casella di testo denominata:
MESSAGGIO_POSTA
su click eseguo il seguente codice:
Dim DBS As Database, rst As Recordset
Set DBS = CurrentDb
Set rst = DBS.OpenRecordset("EVENTI", dbOpenDynaset)
With rst
    .AddNew
    ![UTENTE] = Environ("Username")
    ![DATA] = Now()
    ![MESSAGGIO] = me.MESSAGGIO_POSTA
    .Update
End With
rst.Close
va tutto bene ma mi segnala errore sulla riga :
![MESSAGGIO] = me.MESSAGGIO_POSTA
non riesco a passargli il valore della casella di testo....forse la
sintassi non č giusta.....
Grazie
Ciao
Giorgio
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Memorizzare valore casella

author: Cinzia

text:
"Giorgio M" <
giorg...@tiscalinet.it
> ha scritto nel messaggio
news:ge7hpp$3dp$1...@news.newsland.it...
> Salve
>
> Ho una maschera con al'interno una casella di testo denominata:
>
> MESSAGGIO_POSTA
>
> su click eseguo il seguente codice:
>
> Dim DBS As Database, rst As Recordset
> Set DBS = CurrentDb
> Set rst = DBS.OpenRecordset("EVENTI", dbOpenDynaset)
> With rst
>    .AddNew
>    ![UTENTE] = Environ("Username")
>    ![DATA] = Now()
>    ![MESSAGGIO] = me.MESSAGGIO_POSTA
>    .Update
> End With
> rst.Close
>
> va tutto bene ma mi segnala errore sulla riga :
>
> ![MESSAGGIO] = me.MESSAGGIO_POSTA
> non riesco a passargli il valore della casella di testo....forse la
> sintassi non è giusta.....
>
> Grazie
> Ciao
> Giorgio
>
>
>
>
Ciao Giorgio,
se questa routine si trova nel codice della maschera che contiene la
casella di testo MESSAGGIO_POSTA prova:
![MESSAGGIO] = me.MESSAGGIO_POSTA.text
se invece è da un'altra parte:
![MESSAGGIO] = Forms!NomeMaschera!MESSAGGIO_POSTA.text
non sarebbe male sapere anche l'errore segnalato.
--
Cinzia [Office Access MVP]
_______________________

www.riolab.org
http://accessdaziacin.spaces.live.com
---------------------------------------->


title: Memorizzare valore casella

text:
> >
> Ciao Giorgio,
> se questa routine si trova nel codice della maschera che contiene la
> casella di testo MESSAGGIO_POSTA prova:
> ![MESSAGGIO] = me.MESSAGGIO_POSTA.text
> se invece è da un'altra parte:
> ![MESSAGGIO] = Forms!NomeMaschera!MESSAGGIO_POSTA.text
> non sarebbe male sapere anche l'errore segnalato.
Ciao
la casella di testo si trova nella stessa maschera dove eseguo il codice
inserendo:
![MESSAGGIO] = me.MESSAGGIO_POSTA.text
Non funziona
l'errore che visualizza è :
ERRORE DI RUNTIME 8125
IMPOSSIBILE FARE RIFERIMENTO AD UNA PROPRIETA' O AD UN METODO
PER UN CONTROLLO A MENO CHE NON ABBIA LO STATO ATTIVO.



title: Memorizzare valore casella

text:
Giorgio M ha scritto:
> > >
> > Ciao Giorgio,
> > se questa routine si trova nel codice della maschera che contiene la
> > casella di testo MESSAGGIO_POSTA prova:
> > ![MESSAGGIO] = me.MESSAGGIO_POSTA.text
> > se invece è da un'altra parte:
> > ![MESSAGGIO] = Forms!NomeMaschera!MESSAGGIO_POSTA.text
> > non sarebbe male sapere anche l'errore segnalato.
> Ciao
> la casella di testo si trova nella stessa maschera dove eseguo il codice
> inserendo:
> ![MESSAGGIO] = me.MESSAGGIO_POSTA.text
> Non funziona
HO SBAGLIATO:
ERRORE DI RUNTIME 2185
Scusate
Ciao
Giorgio



title: Memorizzare valore casella

text:
"Giorgio M" <
giorg...@tiscalinet.it
> ha scritto nel messaggio
news:ge9gks$1ru$1...@news.newsland.it...
> Giorgio M ha scritto:
>
>> > >
>> > Ciao Giorgio,
>> > se questa routine si trova nel codice della maschera che contiene
>> > la
>> > casella di testo MESSAGGIO_POSTA prova:
>> > ![MESSAGGIO] = me.MESSAGGIO_POSTA.text
>
>> > se invece è da un'altra parte:
>> > ![MESSAGGIO] = Forms!NomeMaschera!MESSAGGIO_POSTA.text
>
>> > non sarebbe male sapere anche l'errore segnalato.
>
>> Ciao
>
>> la casella di testo si trova nella stessa maschera dove eseguo il
>> codice
>> inserendo:
>> ![MESSAGGIO] = me.MESSAGGIO_POSTA.text
>> Non funziona
>
> HO SBAGLIATO:
>
> ERRORE DI RUNTIME 2185
>
> Scusate
> Ciao
> Giorgio
>> l'errore che visualizza è :
>
>> ERRORE DI RUNTIME 8125
>> IMPOSSIBILE FARE RIFERIMENTO AD UNA PROPRIETA' O AD UN METODO
>> PER UN CONTROLLO A MENO CHE NON ABBIA LO STATO ATTIVO.
>
>
>
Ciao Giorgio,
prova con
![MESSAGGIO] =Me.MESSAGGIO_POSTA.value
--
Cinzia [Office Access MVP]
_______________________

www.riolab.org
http://accessdaziacin.spaces.live.com
---------------------------------------->
>
> --


title: Penna ottica - lettore

author: Luca

text:
orrei sapere dal NS se conoscete un modo per poter collegare ad una penna
ottica un DB di Access
Grazie.


title: Penna ottica - lettore

author: Sib dal portatile

text:
"Luca" <
cos...@iol.it
> ha scritto nel messaggio
> orrei sapere dal NS se conoscete un modo per poter collegare ad una penna
> ottica un DB di Access
Per quanto ne so, le penne ottiche piu' diffuse lavorano in emulazione
tastiera, per cui quando leggono un codice e come se tu lo digitassi.
Sib
--
----------------------------------------------------
la mia home:
http://digilander.iol.it/syb
----------------------------------------------------
il sito comune di it.comp.database.access:
http://www.sitocomune.com
----------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente


title: ODBC, MDB e multiutenza.

author: mauro

text:
Salve a tutti.
Ho letto qua e la' nel n.g. ma non ho trovato una risposta che mi
soddisfacesse.
Ho fatto un programma tipo registratore di cassa che utilizza un file
access 2000 (mdb) per registrare i pagamenti.
Mi si pone ora il problema di fornire due casse che registrano sullo
stesso file (sito in una della due casse).
Mi e' venuta in mente la soluzione ODBC su MDB.
Problema: finche' si tratta di interrogare il database per avere dei
resoconti tutto ok. Quando devo aggiungere un nuovo record la cassa che
arriva seconda si trova impossibilitata ad aggiungere la registrazione.
Errore comunicato ODBC: operazione non riuscita ( Errore '3146').
Potreste darmi qualche dritta al riguardo?
Per 'interagire' col DB utilizzo DAO e comandi diretti in SQL tramite il
metodo 'Execute'.
Grazie a tutto il n.g.
	Mauro


title: ODBC, MDB e multiutenza.

author: Carlo Costarella

text:
"mauro" <
mauro....@tin.it
> ha scritto nel messaggio
news:pan.2005.02.01....@tin.it...

Gestisci l'errore 3146.
Per esempio aumentanto di una unità l'ID.
Ciao, Carlo


title: ODBC, MDB e multiutenza.

text:
Nel giorno Tue, 01 Feb 2005 12:02:04 +0000 AD, Carlo Costarella scrisse:
>
> "mauro" <
mauro....@tin.it
> ha scritto nel messaggio
> news:pan.2005.02.01....@tin.it...
> Gestisci l'errore 3146.
> Per esempio aumentanto di una unità l'ID.
Intanto che aspettavo, ho riletto qua e la' tramite google.
Ho scoperto che ODBC con MDB apre il database in sola lettura.
Quando si deve modificare o aggiungere un record bisogna esplicitare tutti
i parametri di OpenRecordset assicurandosi che LockEdits di definito
secondo i valori richiesti.
Nel mio caso avevo:
  ...
  set DB = WKS.OpenConnection(...) ' nella funzione di apertura del DB
  ...
  ...
  set rs = DB.OpenRecordset("cariche") ' nella funzione di registrazione
  ...
Bastava mettere

   set rs = DB.OpenRecordset("cariche", dbOpenDynamic, 0, dbOptimistic)
e tutto va a posto.
L'unica cosa che mi dispiace e' non poter utilizzare direttamente lo
statement  INSERT INTO al posto del costrutto rs.AddNew...rs.Update
Indaghero'.
> Ciao, Carlo
Ciao
	Mauro


title: Problema con ASP e access

author: M & M

text:
Ho creato un applicativo utilizzando ASP e un DB Access. Ho pero' un
problema con i lock. Devo far in modo che se un utente sta modificando i
dati di un record, un altro utente non puo' a sua volta aggiornare lo stesso
record. Ho trovato in internet l' opzione che puo' essere assegnata ad un
recordset (pessimistic o 2) che dovrebbero fare al mio caso, ma non
funzionano. Due utenti riescono contemporaneamente ad accedere alla stessa
pagina e riescono a modificarla, viene memorizzata l'ultima modifica. Ho
notato che quando con ASP accedo al DB non mi viene creato il file .ldb
quello che si dovrebbe occupare dei lock. Nonso piu' cosa fare.
Ho win2000 professional con IIs.
Aiuto!!!


title: aiuto su report database access

text:
ciao a tutti, creo qui la mia discussione perchè non trovo una sezione apposita per access o sql.

dunque.. ho un database già pronto di access e io devo fare solo il report
il report è basato su una query e la query prende praticamente tutti i campi da una tabella: "TOTPRINC"

poi c'è una tabella "COMPENSI" con due campi: codice e descrizione
il problema consiste nel fatto che nella tabella "TOTPRINC" e quindi nella query e quindi nel report, c'è solo un campo con il codice del compenso, e io avrei bisogno anche della descrizione.
come faccio dunque a collegare la descrizione al codice (dato che esiste la tabella "COMPENSI") e inserirla nel report? credo che dovrei prima inserire questo campo nella tabella "TOTPRINC"..

so che è semplice ma sono a digiuno da troppo tempo di database..


title: aiuto su report database access

text: le due tabelle COMPENSI e TOTPRINC non sono relaionate


title: aiuto su report database access

text: mi spiego meglio.. la tabella COMPENSI è una tabella che non è relazionata con nessun'altra tabella. c'è il campo id e il campo descrizione. mentre la tabella TOTPRINC ha un campo a se stante che cita i codici che ci sono nel campo id della tabella COMPENSI, potrei nella query fare in modo che oltre al codice del compenso, ci sia un altro campo con la descrizione (presa dalla tabella COMPENSI) ?


title: aiuto su report database access

text: cioè vorrei fare in modo che la query mi mostri la descrizione corrispondente al codice del compenso, andando a vedere nella tabella COMPENSI, dove il campo id della tabella COMPENSI è uguale al campo codice compenso della tabella TOTPRINC


title: aiuto su report database access

text:
Magari prima di scrivere 4 Post... fai un ragionamento tra te e te più completo poi lo esponi in modo non frazionato ... altrimenti non ci aiuti.

In ogni caso le tabelle richiedono in un Database il LEGAME RELAZIONALE, che nel tuo caso non ci sia... lascio a te la valutazione in base alle tue conoscenze, che tuttavia non possono essere assenti su questo tema.

In ogni caso le Tabelle se messe in una QUery supportano i JOIN che consentono di accedere all'autoLockUp dei dati... quindi recuperare Valori di Campi sfruttando l'uguaglianza di valore dei campi specifici LEGATI... i JOIN.

Procedi facendo qualche prova mettendo in JOIN il tuo campo comune alle 2 Tabelle poi trascina nella query il Campo DESCRIZIONE e verifica...

@Alex


title: aiuto su report database access

text:
Il 21/11/2017 23:26, @Alex ha scritto:
> Magari prima di scrivere 4 Post... fai un ragionamento tra te e te più completo poi lo esponi in modo non frazionato ... altrimenti non ci aiuti.

OT
Assolutamente vero. Ho fatto una miriade di domande qui, ma molte di più
ne ho evitate perchè la risposta arrivava mentre cercavo di scrivere
chiaramente il quesito e spiegare per filo e per segno quello che avevo
fatto e quello che volevo ottenere.
A volte mi perdo nel progetto generale e non riesco a focalizzare come
montare la singola funzione, ma cercare di spiegare la questione a
qualcuno che non sa niente del mio progetto chiarisce le idee anche a me
e, a volte, il problema trova la sua soluzione in quello che già so.

ciao
--
Stefano


title: aiuto su report database access

author: GiorgioDaPrato

text:
> A volte mi perdo nel progetto generale e non riesco a focalizzare come
> montare la singola funzione, ma cercare di spiegare la questione a
> qualcuno che non sa niente del mio progetto chiarisce le idee anche a me
> e, a volte, il problema trova la sua soluzione in quello che già so.

> Stefano

solo un'aggiunta per parare un eventuale inghippo,
visto che dovresti aver già fatto la "query risolutiva"
e che hai "ereditato" una base dati:

la Join che hai inserito nella query risolutiva deve essere del tipo "esterno",
poiché comunque devi reperire TUTTI i record della tabella TOTPRINC
se poi il codice in COMPENSI non esiste (non inserito ?, cancellato ?),
pace e bene ...


title: Differenze istruzioni esecuzioneSQL

author: Ivan

text:
Salve a tutti
Vorrei sapere la differenza (in prestazioni e come portabilità del codice)
esistente tra
DoCmd.RunSQL
e
CurrentProject.Connection.Execute
quando è meglio utilizzare una piuttosto che l'altra tenendo presente che
alcune tabelle sono in un BE access ed altre sono collegate ad un database
esteno via ODBC.
Grazie a tutti.


title: Differenze istruzioni esecuzioneSQL

author: ALESSANDRO Baraldi

text:
"Ivan" <
bell_...@tin.it
> ha scritto nel messaggio
news:45c4e031$0$36013$4faf...@reader4.news.tin.it...

Partendo dal presupposto che non si può parlare di prestazioni in questo
caso...
e sapendo che nel caso di BE(JET) o di BE(connessi via ODBC) è meglio DAO
direi che
la scelta dovrebbe cadere su una 3° opzione.
Currentdb.Execute ....
Quando parli di portabilità del codice dovresti chiarire meglio... hai
intenzione di rendelo
scalabile su altre piattaforme di sviluppo...?
Se devi rimanere su Access puoi usare Execute membro dell'oggetto Database
DAO oppure
RunSQL, ma l'uso del metodo EXECUTE membro di Connection(ADO) forse potrebbe
essere
l'ultima scelta...!
Le differenze tra i 3 sistemi sono più che altro a livello di transazioni
non di prestazioni.
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------


title: Differenze istruzioni esecuzioneSQL

text:

Scusa la mia ignoranza ......
Mi spieghi la differenza fra CurrentProject.Connection.Execute e
Currentdb.Execute?
Grazie


title: Differenze istruzioni esecuzioneSQL

text:
[CUT]
> Scusa la mia ignoranza ......
> Mi spieghi la differenza fra CurrentProject.Connection.Execute e
> Currentdb.Execute?
>
> Grazie
ADO(per il 1°) e DAO(per il 2°) e sinceramente spiegarti la differenza č un
pň pesante...!



title: Cambio funzione su maschere e viceversa

text:
Ho creato una maschera con due sottomaschere che agiscono su rispettive
tabelle relazionali e la maschera master e le sottomaschere sono con
proprietą dati non modificabili (solo lettura) e mi stą bene.
Vorrei perņ da pulsante di comando potere cambiare la proprietą di ogni
singola maschera o anche di tutte e tre, da sola lettura a modifica dati e
poi uscendo tornare in solo lettura. E' possibile? Come, Grazie.


title: Cambio funzione su maschere e viceversa

author: Alessandro Baraldi

text:
"Pino35" <
ppi...@serenacom.net
> wrote in message
news:93O3e.3950$
aH3...@news.edisontel.com
> Ho creato una maschera con due sottomaschere che agiscono su rispettive
> tabelle relazionali e la maschera master e le sottomaschere sono con
> proprietà dati non modificabili (solo lettura) e mi stà bene.
> Vorrei però da pulsante di comando potere cambiare la proprietà di ogni
> singola maschera o anche di tutte e tre, da sola lettura a modifica dati e
> poi uscendo tornare in solo lettura. E' possibile? Come, Grazie.
Presumo ti basti accedere alla proprietà AllowEdit della
Maschera Master e delle Child.
I miei dubbi derivano dalla non conoscenza di come hai gestito
la cosa ad ora, ma ti basta un controllo Interruttore(On/Off)
e su DopoAggiornamento :
Me.AllowEdit=Me!Interruttore
Me!SubForm1.Form.Allowedit=Me!Interruttore
Me!SubForm2.Form.Allowedit=Me!Interruttore
Ovviamente ho forse un pò semplificato la cosa ma così funziona...!
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Cambio funzione su maschere e viceversa

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:8f25fffe26a5a2e13f...@mygate.mailgate.org...

Si mi basterebbe il codice per il pulsante della maschera master e delle
child rispettivamente, grazie.


title: Cambio funzione su maschere e viceversa

text:
"Pino35" <
ppi...@serenacom.net
> wrote in message
news:WQP3e.3969$
aH3...@news.edisontel.com
[CUT]
> Si mi basterebbe il codice per il pulsante della maschera master e delle
> child rispettivamente, grazie.
E' proprio quello che ti ho scritto....!!!
Provalo.
Ciao
@ALex



title: Conversione campo ascii numerico in data e controllo porta seriale.

author: PinoP

text:
Salve e buongiorno a tutti.
1^ domanda
Ho un record proveniente da terminali per rilevazione presenza con il campo
"orario" che č un ascii di 6 byte, come faccio a convertirlo in campo data
su access? Ho provato a farlo "bovinamente ma mi cancella tutto, un aiuto,
grazie.
2^ domanda
qualcuno sa se si puň scrivere sotto acces, righe di codice per accede ad
una porta seriale RS232 per comandare un terminale rilevazione presenze?
E se sě posso avere un aiuto? Grazie.


title: Stampa file Pdf 2^puntata

author: Enrico T.S.

text:
Riposto il Msg.
Qualcuno conosce la sintassi per stampare un file pdf da VBA. Mi spiego:
conoscendo il path del file da stampare vorrei eseguire la
funzione che solitamente si ottiene tramite il tasto destro del mouse
"stampa" che stampa direttamente il file senza aprirlo.
Un grazie anticipato a chi rispondera'.
(Ma vedo che siete pochini, i guru che dicono a proposito ?).
Bye :o)


title: Stampa file Pdf 2^puntata

author: Setec Astronomy

text:
"Enrico T.S." <
wlarom...@hotmail.com
> ha scritto nel messaggio
news:J_uz8.33715$8D3.9...@news1.tin.it...

Funzione PrintAll
Buon lavoro.


title: Stampa file Pdf 2^puntata

text:
"Setec Astronomy" <
se...@freemail.it
> ha scritto nel messaggio
news:zbDz8.37291$W9.8...@twister2.libero.it...

Ti ringrazio della risposta ma sfortunatamente per me
l'help da access non conosce la funzione Printall
saresti cosi' gentile da darmi qualche info in + ?
grazie.
bye :o)


title: Stampa file Pdf 2^puntata

text:
"Enrico T.S." <
wlarom...@hotmail.com
> ha scritto nel messaggio
news:19Fz8.120422$SR5.2...@twister1.libero.it...
[cut]
> > Funzione PrintAll
> > Buon lavoro.
> >>
>
> Ti ringrazio della risposta ma sfortunatamente per me
> l'help da access non conosce la funzione Printall
> saresti cosi' gentile da darmi qualche info in + ?
Aggiungi un controlla activex Acrobat su una form.
Imposta la proprietą src con il path del file pdf da stampare
utilizza il comando
CtlActiveX0.Object.printAll
per stampare, dove CtlActiveX0 č il nome del controllo activex aggiunto.
> grazie.
> bye :o)


title: AIUTO

author: Fabio

text:
Ciao Alberto! Grazie ancora per l'aiuto che mi hai dato nella creazione del
database di gestione costi che attualmente però mi hanno detto di
sospendere.
Scusa inoltre se non per il doppio post ma e’ da tanto che non ci sentiamo
quindi potresti non seguire + quel vecchio thread
Mi faccio sentire dopo molto tempo perche' ora devo creare un altro
database, il quale non dovrebbe essere molto complesso anche se ci sono
troppe cose che mi assillano.
E' necessario che io crei per questo DB una specie di tabella- calendario
attraverso la quale devo filtrare tutti i giorni lavorativi (devo escludere
cioè i giorni festivi come sabato e domenica e le festività come ad es: 1°
maggio ecc) e giungere quindi ad una tabella filtrata che sarà poi oggetto
di successive query.
La cosa so' come risolverla impostando una query sulla tabella calendario
non filtrata però qui nasce la mia domanda.
Il calendario che devo impostare dato che il DB potrebbe essere usato anche
tra 5/6 anni o più deve avere un automatismo (tramite VBA presumo) che mi
aggiorni il calendario a seconda del tempo che passa( e qui penso ci sia un
meccanismo legato all'orologio).................senza che io magari tra due
anni debba riaggiornare le date .
Detto in parole comprensibili quello che voglio è un record per ogni data
del calendario.......dato che x ogni data avro' degli importi di  Cash Flows
.
Quindi se oggi  è l'8 maggio e considero questa la data di partenza dei miei
record,  arrivati al 20 maggio io
mi dovrò aspettare 12 record con date progressive nella tabella e cosi' via
x le date successive.
E' possibile fare questo automaticamente o devo crearmi a priori una
struttura di calendario che magari comprenda ad esempio 1000 record in modo
da restare coperto x circa tre anni prima di riaggiornare il db?
Inoltre se e' possibile applicare questo automatismo vorrei che mi
aggiungesse record non dal giorno corrente ma dai 15-30 giorni successivi
Esempio: se oggi e' l'8 maggio vorrei avere nella mia tabella record
temporali che giungono fino a circa l'8 giugno.Il giorno successivo i record
si sposteranno avanti di uno ma al 9 giugno e cosi' via.
Non so' se sono stato chiaro...forse non molto e  me ne rendo conto data la
novità per me di questi cacoli...ma se sei in grado tu o anche altri utenti
esperti di Access di aiutarmi te ne sarei infinitamente grato.
Mi scuso per la lunghezza di questo mio messaggio ma avevo necessità di
spiegare in maniera quanto + comprensibile il mio problema, mi scuso x
eventuali disagi.
Grazie a te Alberto ed a tutti...ciao
P.S.
E’ possibile generare questo calendario stabilendo a priori di non generare
record per tutti i sabati e le domeniche e le festivita’ che l’utente potra’
definire a parte con una tabella? O  x fare questo devo filtrare il
calendario creato?