title: Apertura file Word

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:4jPA9.29819$Zn2.8...@twister1.libero.it...

Ho provato e questo è il risultato:
"Impossibile aprire C:\Ordinanze\GestioneOrdinanze.mdb001.doc.
Impossibile aprire il file specificato"
Ho pure rifato la maschera di sanapianta ma niente.
e mi chiedevo, perchè nell'errore mi dice, tra l'altro, che ricerca pure il
DB origine mischiandolo con il nome del file.doc


title: Apertura file Word

author: Claudio

text:
Thu, 14 Nov 2002 15:46:51 GMT, treglesa ha scritto ben 52 righe per
dire:
>
>"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
>news:4jPA9.29819$Zn2.8...@twister1.libero.it...
>>
>> "treglesa" <
treg...@yahoo.it
> ha scritto nel messaggio
>> news:GWOA9.11853$Yw.4...@news2.tin.it...
>> >
>> >
>> > > Me!ApriOrdinanze.HyperlinkAddress = _
>> > > Left(CurrentDb.Name, Len(CurrentDb.Name) - _
>> > > Len(Dir(CurrentDb.Name))) & Me!NOrdinanza & ".doc"
>>
>> Sono più propenso a pensare che dipenda dal fatto che il DB in ufficio sia
>> allocato in un server e pertanto non funziona adeguatamente la funzione
>Dir;
>> infatti è come se Len(Dir(CurrentDb.Name)) avesse lunghezza zero.
>> Prova  a spostare momentaneamente il database in locale sul tuo PC e vedi
>> cosa succede.
>
>Ho provato e questo è il risultato:
>"Impossibile aprire C:\Ordinanze\GestioneOrdinanze.mdb001.doc.
>Impossibile aprire il file specificato"
>Ho pure rifato la maschera di sanapianta ma niente.
>e mi chiedevo, perchè nell'errore mi dice, tra l'altro, che ricerca pure il
>DB origine mischiandolo con il nome del file.doc
Chiedo scusa per l'intrusione, ma sembrano esserci gli spiriti.
Potresti per favore aggiungere le seguenti righe di codice, e dirci che
cosa viene fuori?
MsgBox CurrentDb.Name
MsgBox Len(CurrentDb.Name)
MsgBox Dir(CurrentDb.Name)
MsgBox Len(Dir(CurrentDb.Name))
MsgBox Me!NOrdinanza
MsgBox Len(Me!NOrdinanza)
Ciao. Claudio.


title: Apertura file Word

author: treglesa

text:
CUT
> Chiedo scusa per l'intrusione, ma sembrano esserci gli spiriti.
> Potresti per favore aggiungere le seguenti righe di codice, e dirci che
> cosa viene fuori?
>
> MsgBox CurrentDb.Name
C\Ordinanze\GestioneOrdinanze.mdb
> MsgBox Len(CurrentDb.Name)
34
> MsgBox Dir(CurrentDb.Name)
nulla, cioč solo la finestrella con OK
> MsgBox Len(Dir(CurrentDb.Name))
0
> MsgBox Me!NOrdinanza
001
> MsgBox Len(Me!NOrdinanza)
3
in attesa


title: Apertura file Word

text:
Mi scuso se da adesso e fino a domani non potrň rispondere ad eventuali
post.
Grazie e a presto, ciao


title: Apertura file Word

author: Roberto da casa

text:
"treglesa" <
treg...@yahoo.it
> ha scritto nel messaggio
news:B8QA9.8980$744.3...@news1.tin.it...
> CUT
> > Chiedo scusa per l'intrusione, ma sembrano esserci gli spiriti.
> > Potresti per favore aggiungere le seguenti righe di codice, e dirci che
> > cosa viene fuori?
> >
> > MsgBox CurrentDb.Name
> C\Ordinanze\GestioneOrdinanze.mdb
> > MsgBox Len(CurrentDb.Name)
> 34
????
> > MsgBox Dir(CurrentDb.Name)
> nulla, cioè solo la finestrella con OK
????
> > MsgBox Len(Dir(CurrentDb.Name))
> 0
????
Ha ragione Claudio: ci sono gli spiriti!!!
Prima di chiamare un esorcista, prova a verificare se al database
dell'ufficio manca qualche riferimento.
Però in quel caso dovrebbe darti un altro tipo di errore.
Prova in ufficio a crearti con A2000 un database vuoto ed ad importarci
tutti gli oggetti del database che hai portato da casa.
> > MsgBox Me!NOrdinanza
> 001
> > MsgBox Len(Me!NOrdinanza)
> 3
>
> in attesa
--



title: Apertura file Word

text:
Thu, 14 Nov 2002 16:26:09 GMT, treglesa ha scritto ben 24 righe per
dire:

Provo a fare una supposizione. Secondo me si comporterebbe cosě se il
per esempio il file avesse l'attributo hidden attivo.
Per completare l'analisi (almeno spero) dovresti ancora dirmi che cosa
ti dice la seguente funzione:
MsgBox GetAttr(CurrentDb.Name)
Ciao. Claudio.


title: Apertura file Word

text:
"Claudio" <c...@NOSPAMandCOsupereva.it> ha scritto nel messaggio
news:64m7tu4tdakt93sjr...@4ax.com...

Sono rientrato adesso a casa e senz'altro domattina, dall'ufficio, proverň
ad eseguire i Vostri suggerimenti.
Ciao, Gianfranco


title: Apertura file Word

text:
"Claudio" <c...@NOSPAMandCOsupereva.it> ha scritto nel messaggio
news:64m7tu4tdakt93sjr...@4ax.com...
> Thu, 14 Nov 2002 16:26:09 GMT, treglesa ha scritto ben 24 righe per
> dire:
>
> >CUT
> >> Chiedo scusa per l'intrusione, ma sembrano esserci gli spiriti.
> >> Potresti per favore aggiungere le seguenti righe di codice, e dirci che
> >> cosa viene fuori?
> >>
> >> MsgBox CurrentDb.Name
> >C\Ordinanze\GestioneOrdinanze.mdb
> >> MsgBox Len(CurrentDb.Name)
> >34
> >> MsgBox Dir(CurrentDb.Name)
> >nulla, cioè solo la finestrella con OK
> >> MsgBox Len(Dir(CurrentDb.Name))
> >0
> >> MsgBox Me!NOrdinanza
> >001
> >> MsgBox Len(Me!NOrdinanza)
> >3
>
> Provo a fare una supposizione. Secondo me si comporterebbe così se il
> per esempio il file avesse l'attributo hidden attivo.
> Per completare l'analisi (almeno spero) dovresti ancora dirmi che cosa
> ti dice la seguente funzione:
>
> MsgBox GetAttr(CurrentDb.Name)
Nel file che da errore risulta 34
Ma, come consigliato da Roberto, e cioè importando in un nuovo DB quello
"posseduto" da chissà quali demoni, ho risolto il problema. Ad onor del
vero, importando solo la tabella e la maschera interessata tralasciando
tutto il resto.
Evidentemante c'è qualcosa che va in conflitto.
Grazie ancora
ciao, Gianfranco


title: Apertura file Word

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:yzQA9.30113$Zn2.8...@twister1.libero.it...

Il tuo suggerimento è stato provvidenziale.
Hai sconfitto i "demoni"
Ti spiego:
Se importo tutti gli oggetti, continua a dare errore.
Se importo solo la tabella e la maschera collegata funziona.
Quindi con pazienza importerò ad uno ad uno tutti gli oggetti finchè non
avrò trovato quello che va in conflitto.
Boo! misteri di qualche mia azione maldestra
Grazie ancora, Roberto.
Ciao, Gianfranco


title: Apertura file Word

text:
Fri, 15 Nov 2002 08:40:24 GMT, treglesa ha scritto ben 42 righe per
dire:
>"Claudio" <c...@NOSPAMandCOsupereva.it> ha scritto nel messaggio
>news:64m7tu4tdakt93sjr...@4ax.com...
>> Thu, 14 Nov 2002 16:26:09 GMT, treglesa ha scritto ben 24 righe per
>> dire:
>> Provo a fare una supposizione. Secondo me si comporterebbe così se il
>> per esempio il file avesse l'attributo hidden attivo.
>> Per completare l'analisi (almeno spero) dovresti ancora dirmi che cosa
>> ti dice la seguente funzione:
>>
>> MsgBox GetAttr(CurrentDb.Name)
>
>Nel file che da errore risulta 34
>
>Ma, come consigliato da Roberto, e cioè importando in un nuovo DB quello
>"posseduto" da chissà quali demoni, ho risolto il problema. Ad onor del
>vero, importando solo la tabella e la maschera interessata tralasciando
>tutto il resto.
>Evidentemante c'è qualcosa che va in conflitto.
A questo punto sono più propenso per la mia ipotesi. inserisci la
seguente funzione:
SetAttr CurrentDb.Name, vbArchive
MsgBox GetAttr(CurrentDb.Name)
E' sufficiente che tu la esegua una sola volta. Dimmi che cosa ti
restituisce. Se ti restituisce 32 come deve, togli queste funzioni che
ti ho fatto inserire, chiudi e riapri il database, e prova.
Se non dovesse ancora funzionare, riprova ad eseguire una
MsgBox GetAttr(CurrentDb.Name)
Se ti dovesse restituire di nuovo 34, evidentemente da qualche parte del
database hai una funzione che ti risetta l'attributo hidden ogni volta
che lo apri. Fai un "cerca" per la parola SetAttr in tutto il progetto.
Informami dei risultati ed eventualmente proseguiamo.
Ciao. Claudio.


title: Apertura file Word

text:
>cut
> A questo punto sono più propenso per la mia ipotesi. inserisci la
> seguente funzione:
>
> SetAttr CurrentDb.Name, vbArchive
> MsgBox GetAttr(CurrentDb.Name)
>
> E' sufficiente che tu la esegua una sola volta. Dimmi che cosa ti
> restituisce. Se ti restituisce 32 come deve, togli queste funzioni che
> ti ho fatto inserire, chiudi e riapri il database, e prova.
>Cut
Ho eseguito quanto sopra e mi ha restituito 32.
Dopo, riaprendo il DB e cancellato le due righe di visual basic, funziona
come se nulla fosse successo.
????????????????
Boo! non ho capito nulla ......o quasi, ma poco importa visto il risultato
ottenuto.
Grazie, Claudio.
Il tuo è stato un intervento preciso e minuzioso.
Con simpatia, Gianfranco


title: [OT] ma non troppo. TextFrame.AutoSice = msoAutoSizeTextToFitShape non funziona!

author: OneEDP

text:
Buon giorno,
da un modulo di access "piloto" delle slide in powerpoint e dinamicamente cambio il testo di alcune caselle impostando che il font size venga modificato adattandosi alle dimensioni frefissate del frame. Ma nun funziona correttamente.
L'assegnazione della proprietà avviente con un codice del tipo:

ActivePresentation.Slides(1).Shapes(1).TextFrame2.AutoSize = msoAutoSizeTextToFitShape

Il problema è che quando modifico il testo

ActivePresentation.Slides(1).Shapes(1).TextFrame2.TextRange.Text = "Qui ci scrivo quello che voglio"

Il font size non si adatta per niene A MENO CHE manualmente ci clicco all'interno del file powerpoint e il testo MAGICAMENTE si adatta.

Ho provato anche ad eseguire il metodo Select esposto dall'oggetto TextFrame2 ma niente da fare.

A qualcuno di voi è capitato di imbattersi in questo bug?

Ho provato con workaround con DoEvents ma non va, non va e non va! Accidenti!

Access 2010 - Powerpoint 2010

Devo empiricamente impostare manualmente il font size sulla base della lunghezza della stringa?

Spero in vostro aiuto.
Grazie
Daniele


author: pfm

text:
prova a vedere

http://www.vbaexpress.com/forum/showthread.php?53117-Looping-through-selected-presentations-and-fitting-text-to-shapes


text:
Il giorno mercoledì 4 ottobre 2017 11:13:20 UTC+2, pfm ha scritto:
> prova a vedere
>
>
http://www.vbaexpress.com/forum/showthread.php?53117-Looping-through-selected-presentations-and-fitting-text-to-shapes

Niente alla fine del thread si conclude con un "I don't know why, sorry"
Anche io ho fatto le stesse prove di cambiare il Text di impostare l'autosize a valore 0 e poi al valore necessario.
Nessun risultato.
Grazie cmq.


text:

Prova a leggere quì:
http://www.vbaexpress.com/forum/showthread.php?44977-Textframe2-autowrap-amp-AutoSize

@Alex


text:

Anche qui dicono "non so perché accade questo".
Un warkaround o meglio conosciuto come tappabuchi è quello di fare lo sporco lavoro con una funzione che incollo dal thread.

In pratica la funzione fitMe riduce il fontsize di 1 finché boundheight (presumo l'altezza effettiva del testo) non raggiunge l'altezza della casella di testo.

Mi "repelle" usare questa funzione ma non credo di avere alternative.

Sarà fantastico quando il powerpoint sarà salvato (inavvertitamente) e il fontsize non è più quello originale! Per cui dovrò preoccuparmi di partire da un font size che devo conoscere a priori per ogni casella di testo!
Un bel divertimento! :)

Grazie Alex!!

Daniele

Sub getText()
With ActivePresentation.Slides(1).Shapes("Slide-Title")
.TextFrame2.WordWrap = msoTrue
.TextFrame2.AutoSize = msoAutoSizeTextToFitShape
.TextFrame2.TextRange.Text = "mega long string of text goes here instead of the Excel TexT. Make it longer if you want!" 'XLBookL.Sheets(NameOfTab).Range(cCats & CStr(CurrentQST + CatNum + 1)) & ": " & _
XLBookL.Sheets(NameOfTab).Range(cQsTxt & CStr(CurrentQST + CatNum + 1)) ' Enter category + current Qs. Text
Call fitMe(.TextFrame2.TextRange, ActivePresentation.Slides(1).Shapes("Slide-Title"))
End With
End Sub
Function fitMe(otxtR As Variant, oshp As Shape)
While otxtR.BoundHeight > oshp.Height
otxtR.Font.Size = otxtR.Font.Size - 1
Wend
End Function


text:
Ciao Daniele, come sai i WorkAround sono un po un MUST... in ogni caso... metti un DoEvents in quel While...Wend mi pare pericoloso così...

Hai provato a fare semplicemente(spesso queste ridefinizioni forzano il REPAINT):
otxtR.Font.Size = otxtR.Font.Size

@Alex


text:

Una cosa del genere ....Text = ....Text
Solo cliccandoci su si risveglia il ppt addormentato
Niente da fare
Thanks


title: imparare access

author: Claudio Caon

text:
Ciao ragazzi,
sono un novellino in ambiente Access-VBA e volevo sapere dove posso trovare
delle guide o delle istruzioni "passo-passo " per principianti per imparare
ad usare e creare Dbase di  Access.
Grazie
			Claudio
--
Posted from IDENT:qmailr@[217.57.8.100]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: imparare access

author: Luigi - R

text:
""Claudio Caon"" <
ca...@ascogroup.it
> ha scritto nel messaggio
news:000001c065b6$6b6358a0$8c00...@ascogroup.it...

In libreria.


title: imparare access

author: Giuseppe

text:
""Claudio Caon"" <
ca...@ascogroup.it
> ha scritto nel messaggio
news:000001c065b6$6b6358a0$8c00...@ascogroup.it...
> Ciao ragazzi,
> sono un novellino in ambiente Access-VBA e volevo sapere dove posso
trovare
> delle guide o delle istruzioni "passo-passo " per principianti per
imparare
> ad usare e creare Dbase di  Access.
> Grazie
> Claudio
>
oltre che in libreria come suggerito da Luigi - R :
http://www.microsoft.com/italy/access/access_pratica/
http://www.microsoft.com/office/access/
giuseppe


title: imparare access

author: Pietro Crincoli

text:
Puoi provare

http://mis.bus.sfu.ca/tutorials/MSAccess/tutorials.html

Auguri
Pietro Crincoli


title: Origine dati in casella combinata

author: Pippo

text:
Ho una casella combinata che prende i dati da una query.
Se ai dati cosi' elencati nella casella volessi aggiungere
un altro valore non presente in tabella, come dovrei fare?
Dovrebbe essere una sorta di SELECT Nome FROM tblNomi UNION
SELECT "Nessun Nome". Cosi' mi verrebbero fuori tutti i nomi
della tabella piu' il valore Nessun nome.


title: Origine dati in casella combinata

author: Alessandro Baraldi

text:
"Pippo" <
miae...@miaemail.it
> wrote in message
news:435fbb5a$0$20502$
4faf...@reader4.news.tin.it

Vado molto a memoria, e non ne ho....!
"'Pippo' UNION SELECT Nomi From NomeTabella"
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: [OT]Migrare Access su web Oracle database

author: Carlo Costarella

text:
Interessante questa possibilità offerta da Oracle 10g Express Edition (XE),
completamente free e che include Oracle HTML DB.
http://www.ecohmedia.com/index.php?option=content&task=view&id=228&Itemid=108
Certo che se ne inventano di tutti i colori...
Ciao, Carlo


text:
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:43a1414c$0$16199$4faf...@reader3.news.tin.it...
>
Aggiungo il link principale
http://www.oracle.com/technology/products/database/xe/index.html
e il blog di Spendolini
http://spendolini.blogspot.com/2005/11/oracle-10g-express-edition.html
Ciao, Carlo


author: Gaspare

text:
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:43a14972$0$16200$4faf...@reader3.news.tin.it...

Ciao Carlo,
inizi a parlare da solo? c'è da preoccuparsi? ;-)
Buon lavoro :-)


author: MA

text:

 Ciao Carlo
in pratica è abbandonare Access e usare Oracle + un linguaggio tipo ASP o
PHP
Interessante invece sarebbe (ma non mi sembra di aver capito)
Io ho un db online, o un client del db da me e mi linko in odbc con access
A quel punto ho risolto i problemi di lan geografica
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:dnrkfk$abd$1...@area.cu.mi.it...
>
> Carlo Costarella wrote:
>> "Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
>> news:43a1414c$0$16199$4faf...@reader3.news.tin.it...
>>>
>> Aggiungo il link principale
>>
http://www.oracle.com/technology/products/database/xe/index.html
>> e il blog di Spendolini
>>
http://spendolini.blogspot.com/2005/11/oracle-10g-express-edition.html
>>
> Ciao Carlo
> in pratica è abbandonare Access e usare Oracle + un linguaggio tipo ASP o
> PHP
Mai al mondo!!
> Interessante invece sarebbe (ma non mi sembra di aver capito)
> Io ho un db online, o un client del db da me e mi linko in odbc con access
> A quel punto ho risolto i problemi di lan geografica
> --
Credo sia così.
Forse potrebbe anche servire ai programmatori che hanno necessità di migrare
parte del lavoro in oracle mantenendo le maschere Access. Queste, a quel che
ho capito seguendo l'esempio online, manterrebbero il loro aspetto.
...è tutto da valutare, almeno per me.
> Ciao
> MAssimiliano Amendola
Ciao, Carlo


text:
"Gaspare" <
em...@rpovider.it
> ha scritto nel messaggio
news:43a15001$0$13260$4faf...@reader2.news.tin.it...
>
>
> Ciao Carlo,
> inizi a parlare da solo? c'è da preoccuparsi? ;-)
>
> Buon lavoro :-)
Ormai siete diventati parte di me!
...megalomane? No, puro distillato d'affetto.
Ciao, Carlo


text:
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:43a161e8$0$16207$4faf...@reader3.news.tin.it...

;-)


text:

Vista l'ora spero il distillato sia solo d'affetto
>
> Ciao, Carlo



title: stringa SQL in codice Visual

author: MarcoB

text:
Vorrei sapere come si va capo in una stringa SQL
Grazie
Marco
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: stringa SQL in codice Visual

author: Nick

text:
"MarcoB" <
produ...@pica.it
> ha scritto nel messaggio news:cmdbt9$144$1...@news.newsland.it...

in che senso?
sql è un'istruzione non ha +righe....
se è solo per visualizzazione premi invio le istruzioni sono separate da " " <spazio>
se per Visual intendi VBA basta terminare la riga così: " _
e riprendere la riga dopo con &
ciao
Nick


title: Info su utilizzo del Newsgroup con OutLook express

author: Carmelo Di Rosa

text:
Buon giorno a tutti,
    Io utilizzo outlook express per leggere i messaggi del newsgroup, però
mi visualizza un numero di messaggi limitato, per esempio oggi non leggo già
più i messaggi di venerdì. E' possibile aumentare la capienza dei messaggi
che mantiene attivi autlook, se non fose possibile, come posso dare una
risposta ad un messaggio che non leggo facendo in modo di tenerlo allegato
al gruppo di messaggi originali?
Grazie per il suggerimento.


author: namor

text:
Carmelo Di Rosa ha scritto:

Prova a giocare un po' con i settaggi che trovi in:
Strumenti - Opzioni, schede "Lettura" e "Manutenzione"
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: Aggiornamento maschera dopo doppio click su controllo

author: Roberto Spinella Esteban

text:
Ho una maschera con delle caselle combinate che prendono valori da tabelle.
Se clicco 2 volte sulla casella, tramite una 2a maschera posso
aggiungere/cancellare/modificare i valori delle tabelle.
Una volta che chiudo la 2a maschera però i valori non vengono aggiornati
nella casella combinata a meno che non clicchi su Record/aggiorna
Come posso automatizzare da codice il refresh dei valori della casella
combinata ?
Grazie anticipatamente
Roberto Spinella


author: Roberto da casa

text:
"Roberto Spinella Esteban" <
rs...@polispin.it
> ha scritto nel messaggio
news:42833f4f$0$2186$5fc...@news.tiscali.it...

Alla chiusura della 2a maschera fai un requery della casella combinata di
cui hai aggiornato la tabella su cui è basata la sua origine riga.
> Grazie anticipatamente
> Roberto Spinella
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Id ultimo record inserito in sql server 2005

author: Luigi

text:
Salve a tutti,
dopo un pò di tempo ho deciso di migrare un'applicazione che comincia
ad avere una quantità di dati consistente a sql server o mysql:
deciderò in seguito e la cosa non credo sia di vitale importanza dal
momento che utilizzerò odbc per collegare le tabelle e visto che siamo
in rete locale.
Il problema che non riesco a risolvere è quello (già ampiamente
discusso in questo ng) relativo al fatto di avere a disposizione il
valore di un campo contatore (identity in sql server) solo dopo
l'uscita dal record.
La mia situazione è la seguente: maschera padre con sottomaschera.
Nella sottomaschera una casella combinata in cui scelgo un codice.
Dopo l'aggiornamento di questa casella combinata gli altri campi del
record vengono valorizzati automaticamente e in più richiamo una sub
che inserisce altri dati in un'altra tabella. Ovviamente a questa sub
devo passare il codice scelto e l'id del record appena inserito che
però sarà disponibile solo dopo essere uscito da questo stesso record.
C'è qualcuno che si è ritrovato nella mia stessa situazione? Come
avete risolto? C'è la possibilità di salvare il record subito dopo
l'aggiornamento della casella combinata in modo da avere a
disposizione l'id e poi richiamare la sub passando la pk richiesta?
Ciao e grazie,
Luigi


author: Oscar Manfredini

text:
"Luigi" <




----------------------------------------------------------------------------
--
Dai un'occhiata a questa risorsa:
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=281
Trovi delle strategie di carattere generale (che sono essenzialmente la
prop. DAO  LastModified, oppure la SP di sistema di SQL Svr  @@Identity).
Dovresti poter applicare una di queste situazioni al tuo caso (al
recordesetclone della subform, direi).
Ciao: Oscar


text:
> --
>
> Dai un'occhiata a questa risorsa:
>
>
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=281
>
> Trovi delle strategie di carattere generale (che sono essenzialmente la
> prop. DAO  LastModified, oppure la SP di sistema di SQL Svr  @@Identity).
>
> Dovresti poter applicare una di queste situazioni al tuo caso (al
> recordesetclone della subform, direi).
>
> Ciao: Oscar
Ciao e grazie mille per la risorsa indicata! Davvero utile. Scendendo
nel pratico io ho questa sitazione: una casella combinata dove
l'utente inserisce un codice e subito dopo vengono chiamate due sub
che a partire da quel codice inserisco dati in un altre tabelle.
Ovviamente per legare queste informazioni uso l'id del record appena
inserito (cioè quello della sottomaschera in  cui l'utente ha digiato
il codice). Una versione semplificata del codice è questa:
Private Sub CodicePrestazione_AfterUpdate()
If (ControllaDuplicati(Me.Parent.IdRicetta, Me.CodicePrestazione) =
False) Then
      Me.Undo
  Exit Sub
End If
    ScriviAnalisi Me.CodicePrestazione, True, False,
Me.Parent.Tariffario
    RiempiRisultati Me.CodicePrestazione, Me.Parent!Riferimento,
Me.Parent!IdRicetta, Me.IdPrestazione, Me.NomePrestazione
bla bla bla....
Il problema è in quel Me.IdPrestazione che mi serve passare alla
seconda sub e che non è disponibile al momento della digitazione del
codice.
Potresti suggerirmi come adattare il codice proposto nel documento a
questa situazione? Ho una discreta esperienza con VBA ma mai prima
d'ora mi sono cimentato con sql server.
Ciao e grazie,
Luigi


text:
"Luigi" <
> Dovresti poter applicare una di queste situazioni al tuo caso (al
> recordesetclone della subform, direi).
>
> Ciao: Oscar
Ciao e grazie mille per la risorsa indicata! Davvero utile. Scendendo
nel pratico io ho questa sitazione: una casella combinata dove
l'utente inserisce un codice e subito dopo vengono chiamate due sub
che a partire da quel codice inserisco dati in un altre tabelle.
Ovviamente per legare queste informazioni uso l'id del record appena
inserito (cioč quello della sottomaschera in  cui l'utente ha digiato
il codice). Una versione semplificata del codice č questa:
Private Sub CodicePrestazione_AfterUpdate()
If (ControllaDuplicati(Me.Parent.IdRicetta, Me.CodicePrestazione) =
False) Then
      Me.Undo
  Exit Sub
End If
    ScriviAnalisi Me.CodicePrestazione, True, False,
Me.Parent.Tariffario
    RiempiRisultati Me.CodicePrestazione, Me.Parent!Riferimento,
Me.Parent!IdRicetta, Me.IdPrestazione, Me.NomePrestazione
bla bla bla....
Il problema č in quel Me.IdPrestazione che mi serve passare alla
seconda sub e che non č disponibile al momento della digitazione del
codice.
Potresti suggerirmi come adattare il codice proposto nel documento a
questa situazione? Ho una discreta esperienza con VBA ma mai prima
d'ora mi sono cimentato con sql server.
>
Beh, nel tuo caso dovrebbe bastare forzare il salvataggio Record su
AfterUpdate()
Private Sub CodicePrestazione_AfterUpdate()
If (ControllaDuplicati(Me.Parent.IdRicetta, Me.CodicePrestazione) =
False) Then
      Me.Undo
  Exit Sub
End If
'
DoCmd.RunCommand acCmdSaveRecord
'



title: criterio

author: Flavio

text:
Dovrei fare una ricerca mediante una query su un campo data_ins mettendo
come criterio >#01/01/& yer(date()) & # praticamente concatenare una data
all'anno corrente
come si fà?
Un saluto


title: criterio

text:
Flavio ha scritto:

Dim strDate As String
Dim strSQL As String
strDate = Format("01/01/" & year(Now()), "\#yyyy\-mm\-dd\#")
strSQL = "SELECT * FROM Tabella WHERE Tabella.Campo > " & strDate & ";"
@Alex


title: Richiesta vostro parere su proposta

text:
Mi hanno fatto una proposta commerciale, ovvero io dovrei sviluppare un
programma per conto di un azienda che potrebbe poi piazzarne varie copie nel
settore.
Dalla mia parte metto lo sviluppo del programma, e l'installazione in sede
dell' acquirente, quando necessario.
Dalla loro parte viene messo il compito di testare e darmi gli input del
settore necessari ad un corretto sviluppo e a cercare acquirenti per il
programma.
Condizioni proposte:
ricavo costo programma diviso a metà.
io non posso vendere il programa senza di loro e loro non possono venderlo
senza di me.
Voi che ne pensate? forse avete più esperienza di me in merito? Grazie.


title: Richiesta vostro parere su proposta

author: Antonio Biso

text:
"Simba883" <
simb...@libero.it
> ha scritto nel messaggio
news:b0q1b7$d3u$1...@lacerta.tiscalinet.it...

Se le condizioni sono rispettate secondo me non è male.
Tieni presente che il problema principale chi fa SW è quello di avere un
mercato ampio su cui piazzarlo.
Infatti il costo per la sua realizzazione è una tantum, poi si ha il ricavo
per ogni copia venduta.
Se questa ditta ha gli agganci per farti piazzare il SW su un mercato sempre
più ampio ben venga!
Certo, se tu ritieni di essere in grado di crearti un mercato per conto tuo,
allora no, ma ripeto, è proprio quella la difficoltà.
Non sarebbe male se riesci ad aggiungere all'accordo, un contratto di
manutenzione o comunque devi accordarti per le eventuali chiamate successive
all'installazione per problemi o richieste di personalizzazioni.
Magari qui la percentuale in tuo favore dovrebbe essere superiore!
Antonio


title: Richiesta vostro parere su proposta

author: stefano

text:
"Simba883" <
simb...@libero.it
> ha scritto nel messaggio
news:b0q1b7$d3u$1...@lacerta.tiscalinet.it...

Per esperienza prima di firmare un contratto fallo vedere ad un legale:
Dovresti chiarire che vuoi una percentuale anche sull'assistenza annua e
sugli aggiornamenti eventuali.
dovresti inoltre farti garantire un minimo (da te deciso) indipendente dalle
vendite del programma.
Stefano


title: Ricerca campo

author: Cogo R.

text:
Dovendo modificare un campo , vorrei avre in evidenza tutte le volte che è
usufruito e dove nell'ambito di un prodotto mdb.
In che modo posso attivare questa ricerca?.
Saluti
Cogo R.


title: Report: Please, HELP ME!

author: Puppons

text:
Di nuovo salve a tutti.
Ho un report che al suo interno ha altri 3 sottoreport.
Alla fine del report principale devo inserire una casella di testo che mi
faccia la somma dei totali dei 3 sottoreport.
ESEMPIO:
Il report generale contiene:
Sottoreport1 con casella  TOT1 = 50.000
Sottoreport2 con casella  TOT2 = 20.000
Sottoreport3 con casella  TOT3 = 70.000
Alla fine del report generale metto la casella TOTGenerale con la seguente
origine dati:
"=[Sottoreport1].Report![TOT1]+[Sottoreport2].Report![TOT2]+[Sottoreport3].R
eport![TOT3]".
Tutto funziona bene solo se in tutti i sottoreport ci sono dei valori. Se
per esempio nel Sottoreport2 non ci sono dati (e quindi non viene
visualizzato nel report generale) ottengo "#ERRORE".
Spero che qualcuno capisca il mio problema e mi possa aiutare.....
Thankz a lot.


title: Report: Please, HELP ME!

text:
"Puppons" <
pup...@galactica.it
> ha scritto nel messaggio
news:p9ql8EU...@newsmst.mcis.galactica.it...

Già! perchè 50.000 + 70.000 + Null = errore!!
potresti fare in modo che anche se uno dei 3 sottoreports non contiene dati,
ma che
contenga come valore di default 0 che quindi non influenzi il totale, ma
perlomeno
non dia errore in quanto lo 0 è accettato nelle somme al contrario di Null!
Tosto73!


title: Report: Please, HELP ME!

author: Lbo da casa

text:
>"=[Sottoreport1].Report![TOT1]+[Sottoreport2].Report![TOT2]+[Sottoreport3].R
>eport![TOT3]".
>Tutto funziona bene solo se in tutti i sottoreport ci sono dei valori. Se
>per esempio nel Sottoreport2 non ci sono dati (e quindi non viene
>visualizzato nel report generale) ottengo "#ERRORE".
prova con:
=nz([Sottoreport1].Report![TOT1], 0)+nz([Sottoreport2].Report![TOT2],
0)+nz([Sottoreport3].Report![TOT3], 0)
vedi nz sull'help per altri dettagli.
--
non studio non lavoro non guardo la tv
non vado al cinema non faccio sport
----------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access


title: Report: Please, HELP ME!

author: AntonioM

text:
Di ogni report devi testare la proprietà
HasData,

poi eventualmente settare i valori restituiti

(TOT1 oppure TOT2 oppure TOT3) a

zero nel caso in cui HasData restituisca
false.

AntonioM


title: collegamenti ipertestuali

author: fuoco

text:
Cari Amici,
aiutatemi a risolvere un problema, sono sicuro che è di piccola entità per
voi e di grande per me.
Nella creazione di un db ho creato un campo in cui ci sono dei collegamenti
ipertestuali e fin qui nessun errore.
Il mio problema è sorto quando ad un collegamento ho cercato di far aprire
un file di excel e il relativo foglio.
Ad esempio se il file excel di nome pippo contiene tre fogli di calcolo "A1,
B1,
C2, al momento che clicco sul "collegamento ipertestuale" si dovrà aprire il
file pippo ed il foglio B1.
Come dovrò scrivere la sintassi?
(C:\pippo..........
Sicuro di una Vs. valida risposta in anticipo ringrazio.


title: collegamenti ipertestuali

author: Alessandro

text:
"fuoco" <
pe...@libero.it
> wrote in message
news:S8R78.23007$nI1.6...@twister1.libero.it...
> Ad esempio se il file excel di nome pippo contiene tre fogli di calcolo "A1,
> B1,
> C2, al momento che clicco sul "collegamento ipertestuale" si dovrà aprire il
> file pippo ed il foglio B1.
>
> Come dovrò scrivere la sintassi?
> (C:\pippo..........
I collegamenti HyperLink hanno una sintassi propria: e non sono sicuro
di ricordarla ma mi pare così:
TuoFile.Xls#C:\Programmi\TuoFile.Xls#
Quindi se devi salvare il nuovo Link devi ricostruire la sintassi
sopradescritta.
Alessandro.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: esportare in excel testo restituito da query

author: dario

text:
Salve a tutti, sono alle prese con un problema che non riesco a risolvere.
Partendo da un foglio di excel genero una query in Access con tre parametri.
Ci riesco!
Il risultatoottenuto č in formato testo che spesso supera i 255 caratteri.
Ci riesco!
Devo poter incollare nella cella attiva di un foglio di Excel tale
risultato.
NON CI RIESCO!
Sapete dirmi come fare
grazie
dario


author: Sergio MAZZA

text:
"dario" <
v...@tin.it
> ha scritto nel messaggio
news:Bkxmc.155498$hc5.6...@news3.tin.it...

Metodo TransferSpreadsheet (vedi help)...
Ciao.
--
Sergio MAZZA


title: Eseguire query su evento

text:
ho un problemino che sicuramente risolverò con la  lettura delle vs
risposte...
Da evento uscita in una combobox volevo eseguire una query di
accodamento che mi serve per aggiungere determinati record ad una
tabella del database, se fosse possibile ve ne sono grato.
A presto


title: Eseguire query su evento

author: 'Roccia' Max

text:
On 29 Nov, 19:05, "
collaborazi...@gmail.com
"
<
collaborazi...@gmail.com
> wrote:

currentdb.querydefs("nomequery").execute?
cia'
Max


title: Eseguire query su evento

text:

Non riesco, io ho questo codice
Private Sub Stato_AfterUpdate()
If Me.Stato = 2 Then Me.Data_Stato_InviatoHUB = Date ()
If Me.Stato = 2 Then Me.IDDipendente = 4
if Me.Stato = 3 .....  * qui volevo mettere l'esecuzione della query
al verificarsi di una condizione
End Sub


title: Eseguire query su evento

text:
On 30 Nov, 22:29, "
collaborazi...@gmail.com
"
> Non riesco, io ho questo codice
>
> Private Sub Stato_AfterUpdate()
> If Me.Stato = 2 Then Me.Data_Stato_InviatoHUB = Date ()
> If Me.Stato = 2 Then Me.IDDipendente = 4
> if Me.Stato = 3 .....  * qui volevo mettere l'esecuzione della query
> al verificarsi di una condizione
Perdonami, ma non vedo il problema...
if Me.Stato=3 then currentdb.querydefs("NomeQuery").execute
se e' una query d comando, o
if Me.Stato=3 then docmd.openquery "NomeQuery"
se si tratta di una query di selezione.
cia'
Max


title: Eseguire query su evento

text:

La query in pratica mi fa un accodamento in una tabella del record
attivo.
Faccio la prova....
Grazie di tutto...


title: Eseguire query su evento

text:
On 1 Dic, 08:41, "'Roccia' Max" <
rocciamax...@email.it
> wrote:

Grazie Max, come previsto... Funge perfettamente... ma ti chiedo
un'altra cosa..
Come faccio ad eliminare i messaggi di errore nel caso il record da
accodare è già presente nella tabella (non devono esserci dei
duplicati).
Vorrei poter dare semplicemente un "alert" all'avvenuto inserimento,
evitando i due messaggi di errore.
Grazie ancora a presto.


title: selezionare da un elenco

author: DBN

text:
Non per essere tedioso ma ripeto la domanda.
Se inserisco in una maschera di imputazione un elenco riepilogativo delle
imputazioni faccio, fome posso fare per poter scegliere il recod da variare
selezionandolo direttamente dall'elenco?
Grazie ancora .


title: selezionare da un elenco

text:
"DBN" <
dbo...@dalbosco.com
> ha scritto nel messaggio
news:bf0sc3$9sedm$1...@ID-91233.news.uni-berlin.de...

Se la casella di riepilogo si chiama Elenco.
Se la Colonna associata della casella di riepilogo č quella che contiene la
chiave primaria della tabella che č sia origine record della maschera che
origine riga della casella di riepilogo.
Se la chiave primaria di quella tabella č un campo numerico o contatore e si
chiama ID.
A fronte dell'evento "Su clic" della casella di riepilogo genera il seguente
codice VBA:
Private Sub Elenco_Click()
Me.Filter = "ID=" & Me!Elenco
Me.FilterOn = True
End Sub
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Run-Time e Developer Kit. Dove? Come? Quando? Help!!!

author: Mercurio

text:
Sto cercando di capire come fare ad acquistare il developer kit di access ma
nessun negoziante sa darmi informazioni precise.
Io ho già Office 2000 Premium pagato 1.3000.000. Possibile che, per avere il
developer Kit, debba acquistare per forza Office 2000 Developer Kit?
Al suo interno c'è già Office 20000 Premium. Ma io che mene faccio?
E perché devo spendere 2.450.000 per poi ritrovarmi con un pacchetto
duplicato?
Possibile che non ci sia la possibilità di acquistare solo il developer kit?
Possibile che non ci sia un sistema per acquistare solo il run time?
Insomma...
I negozianti ai quali mi sono rivolto, forse per incompetenza, forse perché
è un prodotto che ha una richiesta veramente bassissima, o forse perché non
glie ne frega niente, non sanno cosa rispondermi.
C'è qualcuno che può darmi delle informazioni "Chiare e precise"?
Magari qualcuno che l'ha acquistato?
Grazie a tutti :-)


author: Luigi Bechini

text:
Io ho acquistato direttamente Office 2000 Developer, per cui non saprei se
la parte developer viene venduta anche separatamente. In ogni caso, se non
lo hai già fatto, ti consiglio di chiamare direttamente la Microsoft: loro
sapranno sicuramente qualcosa...
Ciao ciao,
Luigi
--
Posted from [212.239.0.40]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


author: Axel

text:
How much, praticamente quanto l'hai pagato?
Axel
"Luigi Bechini" <
luigib...@tin.it
> wrote in message
000501c0e381$fedda9c0$0200...@gecaonline.it...



author: Mad® Milox

text:
"Mercurio" <
nau...@wappi.com
> ha scritto nel messaggio
news:9eg65q$gnq$1...@nreadA.inwind.it...

Io ho telefonato direttamente in Microsoft (02-70398398 servizio clienti) e
mi hanno detto che se hai gia' l'office 2000 premium puoi comprare solo il
developer tool kit  1.5 al prezzo indicativo di 800.000 carte ..
trovi le specifiche ..compreso il codice microsoft direttamente nel sito
microsoft.com
.
Il che sembra facile se non fosse per i negozianti maledetti che non te lo
vendono e ti fanno un sacco di storie per ordinartelo. Poi se riesci a
trovare qualcuno che te lo ordina .. aspetti .. aspetti.. ed aspetti ancora
finche non arriva  ...
Mi spiace .. ho cercato nel mio HD se trovavo le pagine html che mi ero
salvato quando lo cercavo .. ma non le trovo piuì' .. probabile che le abbia
archivite :)
Ciao ,
--
(^o^))~    Lorenzo   (^o^))~
"Preimaginare e' lo imaginare le cose che saranno..."
"Postimaginare e' imaginare le cose passate ..."
(Leonardo Da Vinci)


author: sdamy

text:
Mercurio <
nau...@wappi.com
> wrote in message
9eg65q$gnq$1...@nreadA.inwind.it...

Io ho acquistato solo i developer tool kit  1.5 a Lit. 1.100.000 + iva.
Ho aspettato circa 10 giorni per la consegna
saluti
sdamy


text:
"sdamy"  ha scritto
> Io ho acquistato solo i developer tool kit  1.5 a Lit. 1.100.000 + iva.
> Ho aspettato circa 10 giorni per la consegna
>
ma avevi già office 2000 premium o un pacchetto microsoft o te lo hanno
fatto acquistare senza chiederti null'altro?
E l'hai acquistato da un tuo rivenditore di fiducia o da internet/riviste?
Ti sarei davvero grato se tu potessi spiegarmi più in dettaglio l'iter che
hai seguito perché qui da me i negozianti e i rivenditori sono delle vere
CAPRE e se non hanno un percorso precisissimo da seguire non sanno che pesci
prendere e ti portano avanti con delle lungaggini che io non posso
permettermi.
Mi accontenterei anche semplicemente del numero di riferimento del prodotto
in modo da poter telefonare direttamente alla Microsoft Italia e chiedere
dettagli.
Grazie in anticipo
MErcurio


text:
Mercurio <
nau...@wappi.com
> wrote in message
9eiqf2$nsd$1...@nreadB.inwind.it...

Avevo già Office 2000 Premium..... i miei rivenditori non mi hanno chiesto
nulla. Ho semplicemente ordinato il pacchetto aggiuntivo (developer tool kit
1.5 )...
Se li da tè ti fanno storie puoi acquistarlo dai miei rivendotori.... e
fartelo spedire in contrassegno
CORMAS INFORMATICA
Telefono 0442.320476
chiedi di Massimo e digli che vorrresti il software che ha preso Damiano....
ciao ciao
sdamy


author: David

text:
sdamy <
sd...@tiscalinet.it
> wrote in message
bp9P6.6085$VT1....@news1.tin.it...

Ciao,
    per la versione "scontata" trattasi di un upg (upgrade) nessuno ti
chiedera' niente se non per il fatto che mamma MS richiede la presenza della
licenza originale del proprio programma (in questo caso office pro o
premium)!
Per quanto rigurda il tempo, ammetto che si puo' perdere qualche giorno,
visto che si tratta di un programma poco richiesto, e quindi non tutti i
distributori (coloro da cui si acquista - mamma MS non ha magazzino) lo
tengono a stock!
Eventualmente fammi sapere la zona e ti posso aiutare....... (io sono della
categoria dei negozianti........)
Ciao
--
* David *


author: gianfire

text:
il ADT che hai acquistato è in italiano?
io ho un 1.0 in inglese che differenza c'e'?
il tuo setupwizard ti permette di dire se un file deve essere rimpiaziato
dal nuovo nel caso di una reinstallazione?
e hanno corretto il bug che non ti mette l'icona da te scelta nel menù delle
applicazioni?
grazie
gianfire
"sdamy" <
sd...@tiscalinet.it
> ha scritto nel messaggio
news:VQ3P6.3621$8Y1....@news2.tin.it...



title: copia database

author: carlo

text:
Esiste qualche documentazione che spieghi come copiare le relazioni da un
database ad un'altro?
le tabelle e i dati li so copiare
posto le tre funzioni che uso per la copia delle relazioni:
(funzionavano con il vecchio office ma con il 2000 mi danno messaggio
d'errore quando cerco di accodare la relazione
dbsDest.Relations.Append relDest
nella prima funzione)
Function CopiaRelazioni(dbsSrc As Database, dbsDest As Database)
     ' This routine copies all the relationships to a new database.
     ' There is no properties collection on a relation, and all the
     ' properties can be set at the time of creating the new relation.
     Dim relSrc As Relation, relDest As Relation
     For Each relSrc In dbsSrc.Relations
     Set relDest = dbsDest.CreateRelation(relSrc.Name, _
        relSrc.Table, relSrc.ForeignTable, relSrc.Attributes)
          CopyFields relSrc, relDest
          MsgBox relDest.Fields("IDCategoria").Name
          dbsDest.Relations.Append relDest
     Next
End Function
Function CopyProperties(objSrc As Object, objDest As Object)
     Dim prpProp As Property, temp As Variant
     On Error GoTo errCopyProperties
     For Each prpProp In objSrc.Properties
          objDest.Properties(prpProp.Name) = prpProp.Value
     Next
     On Error GoTo 0
     Exit Function
errCopyProperties:
     Resume Next
End Function
Function CopyFields(objSrc As Object, objDest As Object)
    Dim fldSrc As Field, fldDest As Field
    For Each fldSrc In objSrc.Fields
        If TypeName(objDest) = "TableDef" Then
              Set fldDest = objDest.CreateField(fldSrc.Name, fldSrc.Type,
fldSrc.Size)
        Else
              Set fldDest = objDest.CreateField(fldSrc.Name)
        End If
        CopyProperties fldSrc, fldDest
        objDest.Fields.Append fldDest
    Next
End Function


title: copia database

author: Sib dall'ufficio

text:
"carlo" <
tecnolo...@isco-srl.com
> ha scritto nel messaggio
news:Lbk27.27928$cd.1...@news1.tin.it...
> Esiste qualche documentazione che spieghi come copiare le relazioni da un
> database ad un'altro?
>
> le tabelle e i dati li so copiare
> posto le tre funzioni che uso per la copia delle relazioni:
Se intendi quando importi le tabelle manualmente, basta spuntare l'apposita
casellina.
Guarda bene nella finestrella
Sib


title: copia database

text:
intendo da VB
"Sib dall'ufficio" <cerrise...@SPAMtiscalinet.it> ha scritto nel
messaggio news:9ickol$ehu$1...@serv1.iunet.it...



title: Refresh dopo una PopUp

text:
Salve a tutti,
Ho una maschera continua (chiamata UNO)dove posso selezionare + record,
tramite un pulsante attivo una popup la quale attraverso una query aggiorna
i dati della maschera (UNO).
Quando chiudo la PopUp la maschera (UNO) non si aggiorna automaticamente ma
lo fa solamente o se esco e rientro oppure se seleziono Aggiorna dal menu
record.
In che modo è possibile fare si che il refresh avvenga dopo la chiusura
della PopUp?
Grazie per l'aiuto
Massimo Pallavicini


title: Refresh dopo una PopUp

author: Alessandro Baraldi

text:
Apri la Popup in modalità acDialog quindi metti un Me.Requery subito
dopo
la funzione OpenForm.
Ciao
@Alex


title: Refresh dopo una PopUp

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:1148936460.2...@j55g2000cwa.googlegroups.com...

Ciao
@Alex
Sei un mito ......!!!!
Grazie
Posso chiederti dove e come hai imparato ad usare così bene access?!?!?
Ciao


title: Refresh dopo una PopUp

text:
[CUT]
Posso chiederti dove e come hai imparato ad usare così bene
access?!?!?
[Risposta]
Sono circa 10 anni che lo uso, se non avessi imparato qualcosa mi sarei
posto
io qualche domanda...!
@Alex


title: maschere: inserire variabile nel nome controllo

author: Eirinn

text:
ciao a tutti. avrei la necessità di inserire una variabile nel nome di
un controllo.
mi spiego meglio
ho una serie di controlli (checkbox) che si chiamano:
x01, x02, x03, etc...
devo renderle invisibili nel caso i corrispondenti record su un'altra
tabella non abbiano flaggato il campo "visibile"
es.
nome visibile
x01 si
x02 si
x03 no
i controlli invece si riferiscono ad un'altra tabella.
riesco ad ottenere quanto voluto se non che non so come inserire una
variabile nel nome del controllo.
tipo:
Me.x01.visible = false
Me.x02.visible = false
dovrebbero essere generati da una cosa tipo Me." & Var &".visible =
false
dove var è = a x01, x02, x03 etc.
si può fare? oppure devo cambiare strada?


text:
"Eirinn" <
eir...@libero.it
> ha scritto nel messaggio news:1147180946.2...@e56g2000cwe.googlegroups.com...







[risposta]
Es.
Dim nomeControllo as string
nomeControllo = "a1"
Me.Controls(nomeControllo).visible = false
Ciao.
--
Sergio MAZZA


text:
perfetto!
risolto.
grazie 1000 :)


title: Colorare una casella di testo in una maschera

author: IVAN

text:
Ciao a tutti. Ho un piccolo (credo ... e spero risolvibile) problema. Ho una
maschera visualizzata come "Maschere continue" e avrei bisogno di colorare
una casella di testo a seconda di alcuni parametri, ma mettendo il codice
sul current della form mi colora le caselle di testo di tutti i record.
È possibile colorare solo quelle che mi interessano?
È necessario farlo sul current oppure è possibile colorarle già tutte sul
load della maschera?
Grazie a tutti.
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


author: Cinzia

text:
"IVAN" <
ivan...@libero.it
> ha scritto nel messaggio
news:83Z211Z201Z12Y1...@usenet.libero.it...

Ciao IVAN,
se usi A2000 o superiore puoi usare la Formattazione Condizionale
altrimenti guardati
www.sitocomune.com
 sezione Forms 3.117 e 3.26
--
Cinzia
---------------------------------------
|
http://www.riolab.org
  |
---------------------------------------


title: Somma parziale in un report

author: Simone Lucesoli

text:
Ciao a tutti,
non riesco a fare una somma parziale in report, relativa ad un gruppo.
Ho raggiunto questo risultato: la somma parziale č relativa a solo il primo
record del gruppo
es:
gruppo 1
                                    A   10
                                    B   20
SOMMA = 10
gruppo 2
                                   A 15
                                   B 20
SOMMA = 35
grazie


title: Errore 2486-Impossibile eseguire l'azione adesso

author: Roberto Spinella Esteban

text:
Cari Guru del forum
sono disperato e mi appello alla vostra maggior esperienza
Il mio programma sviluppato con a2k  su WinXp funzionava tutto ok fino a
settimana scorsa. poi le continue modifiche e correzioni hanno fatto sì che
ora mi viene generato questo errore del quale non riesco a fare un debug.
Ho una maschera basata su una tabella, contenente 2 sottomaschere.
Se la richiamo mi appare il primo rec, la chiudo tutto OK.
Ma se scorro al record seguente e poi provo a chiuderla niente da fare. Il
tasto di ciusura della maschera non fà nulla.
Qualsiasi altra cosa Io faccia nel programma mi viene generato l'errore in
oggetto e posso chiudere l'applicazione solo con ALT-CTRL-CANC il quale
genera un errore grave che ho già inviato a microsoft (senza avere mai
risposta ma penso nessuno l'abbia mai avuta) lasciandomi aperta la finestra
del codice senza niente dentro che devo chiudere con alt-ctrl-canc
Ho provato a togliere tutti gli eventi della FORM
Ho provato, lasciando l'evento form_current a fare il debug passo passo e
tutto funziona OK fino alla function end.
Ho cercato su internet riguardo all'errore. In italiano niente. In Inglese
ho trovato un post di un tipo support microsoft che chiede alcune prove
perchè la soluzione dell'errore varia a secondo di queste.
L'unico risultato incoraggiante l'ho avuto togliendo una delle 2
sottomaschere dalla form. Allora scorre i records e poi si chiude
normalmente.
Questa sottomaschera però è chiaramente vitale, ha formattazioni
condizionali e mi genera il problema anche se completamente vuota.
Io intanto continuo ma nessuno di voi ha mai avuto a che fare con questo
dannato 2486?
Avete comunque una via da seguire per arrivarne a capo ?
Potrebbe dipendere da un Service Pack ?
Grazie in anticipo.
Roberto Spinella Esteban


author: Carlo Costarella

text:
"Roberto Spinella Esteban" <
rs...@polispin.it
> ha scritto nel messaggio
news:42862cae$0$2178$5fc...@news.tiscali.it...

Deve essersi corrotto il modulo vba.
Prova a fare così: crea un database vuoto e importa tutti gli oggetti del
vecchio db; compila e prova.
Ciao, Carlo


text:
"Carlo Costarella" <
carloantoni...@virgilio.it
> ha scritto nel
messaggio news:vprhe.897087$b5.39...@news3.tin.it...

Ora provo anche questa soluzione Carlo ma Io intanto ho scoperto qualcosa
che somiglia molto ad un Bug.
Togliendo la formattazione condizionale impostata sulla 2a sottomaschera il
problema sparisce.
Rimettendola, anche una sola condizione il problema riappare.
Tieni conto che sulla prima sottomaschera c'è una formattazione condizionale
identica ma non crea problema.
Se così fosse pubblico il codice così vediamo se si tratta  veramente di un
bug di o di un eccesso di complessità nel calcolo delle varie condizioni.
A presto   Roberto


author: MA

text:

Oppure che si è corrotta proprio quella sottomaschera
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa1 - I° Conferenza Italiana per Sviluppatori Access Arezzo 4+5
Giugno 2005 Sono aperte le iscrizioni  Info:
www.donkarl.com/it


title: autorizzazioni

author: Enrico

text:
Un bel giorno lanciando Access ho ottenuto ilseguente messaggio:
Impossibile avviare MS access. non è stata concessa la licenza d'uso su
questo computer!
Ma fino a ieri? Chi mi ha rubato la licenza?
Scherzia a parte, come mai?
Grazie Enrico


title: autorizzazioni

author: Terry Plast sas

text:
Lo stesso problema č capitato anche a me, avevo Access 97 poi ho caricato
Access 2000 sopra alla versione precedente, non contento l'ho disinstallata
e ho ricaricato Access 97, non l'avessi mai fatto, non ho potuto piů
utilizzare Access 97 su quel computer.
Funzionava tutto office 97 tranne Access, cosě ho caricato di nuovo la
versione 2000 e ha ripreso a funzionare.
Probabilmente c'č qulache conflitto con le 2 versioni, perchč per poter far
fizionare di nuovo il 97 bisogna ricaricare Windows!
La stessa cosa č capitata ad un paio di miei amici, negativo anche per loro
quando esce questo messaggio non c'č piů niente da fare.
Spiacente, noi non siamo riusciti a risolvere il problema.
Ciao Ivan
Enrico <
el.ca...@flashnet.it
> wrote in message
8li47u$be7$1...@news.flashnet.it...
> Un bel giorno lanciando Access ho ottenuto ilseguente messaggio:
> Impossibile avviare MS access. non č stata concessa la licenza d'uso su



title: autorizzazioni

author: Lissoni s.a.s.

text:
Dovete scaricare la pacth dal sito microsoft, non ricordo bene il nome  mi
sembra che l'eseguibile da dover lanciare fosse AClicense.exe e di 17 k se
non riuscite a trovarlo fatemi sapere.
"Terry Plast sas" <
terry...@tin.it
> ha scritto nel messaggio
news:8li5fl$jba$1...@nslave2.tin.it...



title: autorizzazioni

author: Roberto

text:
Enrico <
el.ca...@flashnet.it
> wrote in message
8li47u$be7$1...@news.flashnet.it...
> Un bel giorno lanciando Access ho ottenuto ilseguente messaggio:
> Impossibile avviare MS access. non è stata concessa la licenza d'uso su
> questo computer!
> Ma fino a ieri? Chi mi ha rubato la licenza?
> Scherzia a parte, come mai?
> Grazie Enrico
>
>
E' una bug nota, normalmente capita disistallando e reistallando Access;
come accennato da Lissoni si risolve tutto lanciando un eseguibile
(AcLicens.exe) che risistema i register; anche a me è successo e tutto è
tornato a funzionare, senza riformattare l'HD e reistallare Windows ed
Office; non mi ricordo il sito dal quale ho scaricato l'eseguibile, ma me lo
sono conservato e se vuoi te lo invio al tuo indirizzo e-mail (nel NG mi
sembra che non si possono inviare allegati).
Fammi sapere
Roberto


title: autorizzazioni

author: bruce

text:
Salve a tutti !!!
Innanzitutto, non riesco a trovare nel sito microsoft aclicense.exe, quindi
sono dispiaciuto di rompere le scatole ma se Roberto mi invii il prg alla
mai e-mail sarei molto molto grato.
Inoltre, per chi avesse problemi con i permessi per l'uso degli activex,
questo è dovuto a nuove versioni che non aggiornano il relativo file .dep. A
tal scopo la microsoft mette a disposizione un prg ODELIC.exe che risolve il
problema. Per trovarlo andate al sito
support.microsoft.com
 e cercate
nell'articolo q172859
Ciao e grazie a tutti.
--
SeveStamps vi propone:
----------
Provesano, un paese da conoscere:
digilander.iol.it/Provesano
Giza Informatica, non sai cosa ti perdi:
digilander.iol.it/GizaInformatica
----------


title: autorizzazioni

author: Roberto dal portatile

text:
"bruce" <
gas...@iol.it
> ha scritto nel messaggio
news:S2cf5.43858$sE5.4...@news.infostrada.it...
> Salve a tutti !!!
>
> Innanzitutto, non riesco a trovare nel sito microsoft aclicense.exe,
quindi
> sono dispiaciuto di rompere le scatole ma se Roberto mi invii il prg alla
> mai e-mail sarei molto molto grato.
>
> Inoltre, per chi avesse problemi con i permessi per l'uso degli activex,
> questo č dovuto a nuove versioni che non aggiornano il relativo file .dep.
A
> tal scopo la microsoft mette a disposizione un prg ODELIC.exe che risolve
il
> problema. Per trovarlo andate al sito
support.microsoft.com
 e cercate
> nell'articolo q172859
>
> Ciao e grazie a tutti.
>
>
> --
> SeveStamps vi propone:
> ----------
> Provesano, un paese da conoscere:
digilander.iol.it/Provesano
> Giza Informatica, non sai cosa ti perdi:
digilander.iol.it/GizaInformatica
> ----------
>
Ho appena inviato l'eseguibile al tuo indirizzo e-mai
Roberto


title: autorizzazioni

text:
potrei averlo anch'io?
Grazie Enrico
"Roberto dal portatile" <
r.ma...@libero.it
> ha scritto nel messaggio
news:eckf5.46613$sE5.4...@news.infostrada.it...



title: autorizzazioni

text:
"Enrico" <
el.ca...@flashnet.it
> ha scritto nel messaggio
news:8lmvcu$r2v$1...@news.flashnet.it...
> potrei averlo anch'io?
> Grazie Enrico
>
L'ho appena inviato al tuo indirizzo e-mail
Roberto


title: autorizzazioni

author: Federico Luciani

text:
Roberto dal portatile wrote:
> "Enrico" <
el.ca...@flashnet.it
> ha scritto nel messaggio
> > potrei averlo anch'io?
> > Grazie Enrico
> L'ho appena inviato al tuo indirizzo e-mail
> Roberto
Non per farmi i fatti tuoi, ma non viziarli ;-)
Basta poco per cercarlo e scaricarlo dal sito MS
--
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------


title: autorizzazioni

text:
"Federico Luciani" <
fluc...@paperino.libero.it
> ha scritto nel messaggio
news:39804066...@paperino.libero.it...
> Roberto dal portatile wrote:
> > "Enrico" <
el.ca...@flashnet.it
> ha scritto nel messaggio
> > > potrei averlo anch'io?
> > > Grazie Enrico
> > L'ho appena inviato al tuo indirizzo e-mail
> > Roberto
>
> Non per farmi i fatti tuoi, ma non viziarli ;-)
> Basta poco per cercarlo e scaricarlo dal sito MS
>
> --
> Federico
>
Obbedisco!
Roberto


title: Coesistenza Office 2016 e Access 2000 (Office pro plus retail)

author: scaronic

text:
Buongiorno,
Per ragioni di compatipilità ho sviluppato varie applicazioni in Access 2000 e le varie modifiche continuo ad effettuarle da Access2000.
Su altri PC ho Access 2003 e Access 2007 ed effettuo i test per verificare la compatibilità.
Da due mesi circa ho installato Office 2016 pro plus retail.
Ho continuato ad utilizzare Access 2000  senza problemi .

Da un paio di settimane  se apro un qualsiasi DB con access 2000 ottengo
'espressione su apertura immessa come impostazione della proprietà di evento ha generato l'errore seguente: l'oggetto o la classe non supporta il gruppo di eventi".

Se apro un qualsiasi db con access 2016  tutto funziona correttamente .

Ho provato da access 2000 ad effetture compilazione e compattazione .  ma non cambia nulla.

Purtroppo ho saputo che non è possibile effettuare una installazione selettiva di OFFICE 2016  ad esempio eliminando Access 2016 ,  per provare a vedere se riprende a funzionare Access 2000

Qualcuno ha qualche idea
Grazie


author: CIDI

text:

Il problema è nei riferimenti.
nel pc con W10 ho, al momento, 2 versioni di Office XP e 2007.

prima avevo installato anche Office 16, che invece se non ricordo male,
aggiunge: Microsoft Access 14.0 Object Library

aprendo un qualsiasi modulo di A2007 nei riferimenti trovi:

Microsoft Access 12.0 Object Library di Office 2007.

avviando access 2007 configura anche la versione più vecchia con questa
versione, sostituendo:Microsoft Access 10.0 Object Library
di AXP nel mio caso.
quando devo fare una modifica ad applicazione fatta con AXP ripristino
AXP.
dal pannello di controllo-> disinstalla programmi->office XP-> Ripristina.
rimettendo nei riferimenti:Microsoft Access 10.0 Object Library

Ciao scaronic

Daniele


title: confronto date

author: acquarello

text:
Avrei la necessità di far funzionare questa semplice istruzione :
-
If  me.datatessera < 01/01/08 00.00.00 Then
MsgBox "CONSEGNARE TESSERA !!!!"
End If
-
dove il formato data tessera è ad esempio (13/06/08 18.25.20)
Qualcuno mi può gentilmente aiutare!?
Grazie in anticipo.
daba


title: confronto date

text:
Ciao "acquarello" <
davideb...@tiscali.it
> ha scritto nel messaggio
news:484eb388$0$17947$5fc...@news.tiscali.it...
> Avrei la necessità di far funzionare questa semplice istruzione :
> -
Prova cosi:
  If  me.datatessera < #01/01/08 00.00.00# Then
> MsgBox "CONSEGNARE TESSERA !!!!"
> End If
>
> -
> dove il formato data tessera è ad esempio (13/06/08 18.25.20)
> Qualcuno mi può gentilmente aiutare!?
> Grazie in anticipo.
> daba
--
Ciao
Geppo


title: confronto date

author: 'Roccia' Max

text:
On 10 Giu, 19:02, "acquarello" <
davidebarbe...@tiscali.it
> wrote:
> If  me.datatessera < 01/01/08 00.00.00 Then
me.datatessera<dateserial(2008,1,1) then
cia'
Max


title: confronto date

text:
Grazie ragazzi per la collabarazione ora tutto ok!
Daba
"'Roccia' Max" <
roccia...@email.it
> ha scritto nel messaggio
news:93669b45-c717-4900...@a70g2000hsh.googlegroups.com...



title: Evento associato a nuovo record

author: giaconet

text:
Ciao a tutti.
Ho una maschera in modalità immissione dati (DataEntry = True).
Vorrei riuscire a intercettare l'evento associato al fatto che l'utente
lascia il record corrente per uno nuovo. Di solito questo avviene quando
l'utente lascia l'ultimo campo (e quindi potrei intercettare l'evento Exit
di questo campo) ma in realtà potrebbe premere il pulsantino Nuovo Record e
mi frega.
In alcuni casi ho anche usato il trucco di impostare la proprietà
AllowAdditions della maschera a False subito dopo l'inserimento di un valore
nel primo campo, ma qualcuno ha fatto in tempo ad inserire qualche dato in
altri campi ed ad aggiungere nuovi record (in questo caso mi sono chiesto se
esista un evento associato al fatto che l'utente immetta qualsiasi dato in
qualsiasi campo di una maschera).
Thanx
giaconet


title: Evento associato a nuovo record

author: Paj

text:
"giaconet" <
giac...@nospam.it
> ha scritto nel messaggio
news:nkbf8.20751$_u5.6...@news1.tin.it...

Nel codice puoi sapere se sei a nuovo record con
if me.newrecord then
Puo' essere utile anche vedere l'help sulla proprietà Sequenza in inglese
Cycle
Nelle proprietà della form vedi sequenza
Paj


title: Evento associato a nuovo record

text:
"Paj" <
p...@libero.it
> ha scritto nel messaggio
news:gfcf8.37485$v7.13...@twister1.libero.it...

Grazie. L'ultima che hai detto è proprio la cosa che mi serviva!!!
Thanx
giaconet


title: Sempre per i più esperti..........(questa volta di funzioni matematiche)....Forse OT!

author: Polpo Muschio (Ufficio)

text:
Ciao di nuovo. 'Jabba The Hut' mi ha postato il listato a fondo pagina per
un decremento particolare di un Array (Vedi Thread "Per i più
esperti......almeno credo" del 17.05.01).
Il tutto funziona egregiamante ma vorrei sapere a priori qual'è il numero di
combinazioni che andrò ad elaborare. Esiste un modello matematico per
calcolarlo?
Vi ricordo che il numero delle caselle dell'Array che verranno utilizzate è
variabile :))
Saluti
Polpo Muschio
---------------------
Option Explicit
Dim A(1 To 5) As Integer
Private Sub Form_Load()
  Dim i As Integer
  For i = 1 To 5
    A(i) = 4
  Next i
  While A(5) > 1
    recurse 1
  Wend
  dumpArray
End Sub
Sub recurse(j As Integer)
  dumpArray
  A(j) = A(j) - 1
  If A(j) = 1 Then
    If j < 5 Then
      recurse j + 1
      A(j) = A(j + 1)
    Else
      A(j) = A(j) - 1
    End If
  End If
End Sub
Sub dumpArray()
  Dim i As Integer
  Dim s As String
  s = ""
  For i = 1 To 4
    s = s & A(i) & " - "
  Next i
  s = s & A(5)
  Debug.Print s
End Sub
Qui c'e' la prova di esecuzione...
4 - 4 - 4 - 4 - 4
3 - 4 - 4 - 4 - 4
2 - 4 - 4 - 4 - 4
1 - 4 - 4 - 4 - 4
3 - 3 - 4 - 4 - 4
2 - 3 - 4 - 4 - 4
1 - 3 - 4 - 4 - 4
2 - 2 - 4 - 4 - 4
1 - 2 - 4 - 4 - 4
1 - 1 - 4 - 4 - 4
3 - 3 - 3 - 4 - 4
2 - 3 - 3 - 4 - 4
1 - 3 - 3 - 4 - 4
2 - 2 - 3 - 4 - 4
1 - 2 - 3 - 4 - 4
1 - 1 - 3 - 4 - 4
2 - 2 - 2 - 4 - 4
1 - 2 - 2 - 4 - 4
1 - 1 - 2 - 4 - 4
1 - 1 - 1 - 4 - 4
3 - 3 - 3 - 3 - 4
2 - 3 - 3 - 3 - 4
1 - 3 - 3 - 3 - 4
2 - 2 - 3 - 3 - 4
1 - 2 - 3 - 3 - 4
1 - 1 - 3 - 3 - 4
2 - 2 - 2 - 3 - 4
1 - 2 - 2 - 3 - 4
1 - 1 - 2 - 3 - 4
1 - 1 - 1 - 3 - 4
2 - 2 - 2 - 2 - 4
1 - 2 - 2 - 2 - 4
1 - 1 - 2 - 2 - 4
1 - 1 - 1 - 2 - 4
1 - 1 - 1 - 1 - 4
3 - 3 - 3 - 3 - 3
2 - 3 - 3 - 3 - 3
1 - 3 - 3 - 3 - 3
2 - 2 - 3 - 3 - 3
1 - 2 - 3 - 3 - 3
1 - 1 - 3 - 3 - 3
2 - 2 - 2 - 3 - 3
1 - 2 - 2 - 3 - 3
1 - 1 - 2 - 3 - 3
1 - 1 - 1 - 3 - 3
2 - 2 - 2 - 2 - 3
1 - 2 - 2 - 2 - 3
1 - 1 - 2 - 2 - 3
1 - 1 - 1 - 2 - 3
1 - 1 - 1 - 1 - 3
2 - 2 - 2 - 2 - 2
1 - 2 - 2 - 2 - 2
1 - 1 - 2 - 2 - 2
1 - 1 - 1 - 2 - 2
1 - 1 - 1 - 1 - 2
1 - 1 - 1 - 1 - 1


title: come passare il valore di una variabile

text:
ciao a tutti

come faccio a passare il volore di una variabile
ad un'altra procedura dello stesso modulo di una maschera?

In pratica ho una sql filtrata, me!miaCbo.RowSource
e devo verificare se il filtro nella query e' vuoto oppure no.

grazie.


title: come passare il valore di una variabile

author: Alessandro Cara

text:

Tremila modi.
1) Metti il filter che hai definito in una variabile pubblica
(in questo caso non devi neanche passare il parametro, metodo che
aborro) e tra l'altro in una form e sue subordinate il Me e' il Me
2) Passi alla funzione il parametro
3) Passi alla funzione il contenitore (oggetto) del parametro e poi sai
tu cosa pescare
4) Potrei inventarmi la bicicletta con gli sportelli ma mi sebra fuori luogo

--
ac (x=y-1)
Aborro il Killfile
(La violenza e' l'ultimo rifugio degli incapaci -Salvor Hardin-)

---
Questa e-mail è stata controllata per individuare virus con Avast antivirus.
https://www.avast.com/antivirus


title: come passare il valore di una variabile

text:

grazie Alessandro

dove posso trovare degli esempi per i i punti 2 e 3?


title: come passare il valore di una variabile

text:
Il 12/12/2015 09:28,
francodel...@gmail.com
 ha scritto:
> Il giorno venerdì 11 dicembre 2015 23:54:18 UTC+1, Alessandro Cara ha scritto:
>> Il 11/12/2015 21:23,
francodel...@gmail.com
 ha scritto:
>>> ciao a tutti
>>>
>>> come faccio a passare il volore di una variabile
>>> ad un'altra procedura dello stesso modulo di una maschera?
>>>
>>> In pratica ho una sql filtrata, me!miaCbo.RowSource
>>> e devo verificare se il filtro nella query e' vuoto oppure no.
>>>
>>> grazie.
>>>
>>
>> Tremila modi.
>> 1) Metti il filter che hai definito in una variabile pubblica
>> (in questo caso non devi neanche passare il parametro, metodo che
>> aborro) e tra l'altro in una form e sue subordinate il Me e' il Me
>> 2) Passi alla funzione il parametro
>> 3) Passi alla funzione il contenitore (oggetto) del parametro e poi sai
>> tu cosa pescare
>> 4) Potrei inventarmi la bicicletta con gli sportelli ma mi sebra fuori luogo
>>

>
> dove posso trovare degli esempi per i i punti 2 e 3?
>

2)  call pippo(Me.filter)
.....
  function pippo(par as string)
      x=par

3)  call pippo(me)
......
     function pippo(frm as Form)
         x=frm.filter

4) call pippo()
........
   function pippo()
       x=me.filter

Se sei all'interno del form /vedi/  l'oggetto Me e lo puoi usare

Diverso se la funzione e' in un modulo esterno  allora quello che
prediligo e' il metodo 3



title: come passare il valore di una variabile

text:

grazie Alessandro


title: ciclare controlli in un report

text:
salve!
ho 8 controlli in un report.
tutti iniziano per "evento" come nome
evento1
evento2
ecc....
dovrei colorare di rosso quelli che hanno come valore 0
e di verde quelli che hanno come valore -1
è possibile con un ciclo sui controlli succitati?
mi fate un esempio?
grazie
ciao


title: ciclare controlli in un report

author: Roberto da casa

text:
"@Roberto" <
Tas...@libero.it
> ha scritto nel messaggio
news:auXwd.307945$b5.14...@news3.tin.it...

Se quelli sono gli unici controlli il cui nome inizia con "evento", a fronte
dell'evento "Su formattazione" della sezione del report che contiene gli 8
controlli genera il seguente codice VBA:
Dim Ctr As Control
For Each Ctr In Me
    If Left(Ctr.Name, 6) = "evento" Then
        If Ctr.Value = 0 Then
            Ctr.BackColor = 255
        Else
            If Ctr.Value = -1 Then
                Ctr.BackColor = 65280
            End If
        End If
    End If
Next
> grazie
>
>
> ciao
--
Roberto
------------------------------------------------
il Sito Comune di it.comp.appl.access
www.sitocomune.com
-----------------------------------------------


title: Gestione Documentale in Access 2007

author: Pisinho

text:
Salve,
qualcuno ha avuto a che fare con questo tipo di programmi ?
Se avete qualche esempio da dove partire, siti, help e quant'altro ve ne
sarei grato.
Grazie mille.


title: Gestione Documentale in Access 2007

author: Davide

text:
"Pisinho" <
pis...@gmail.com
> ha scritto nel messaggio

Per qualche esempio vedi sul sito comune (
www.sitocomune.com
)
La gestione documentale può essere fatta fondamentalmente in due modi:
1. Salvi i documenti direttamente all'interno del database in formato
binario
2. Salvi i documenti in una cartella organizzata appositamente e nel
database memorizzi i percorsi e tutte le informazioni relative al documento
archiviato.
Ognuna delle due soluzioni ha pro e contro che dipendono soprattutto dal
tipo di documenti che devi memorizzare e dalla loro quantità e dimensione.
Ciao
Davide (Sib)


title: invio di email

author: Remigio

text:
A03
Buongiorno,
ho un db con una tabella verbale_generale che contiene i seguenti campi relativi ai pazienti visitati:

cognome;
nome;
data_visita;
esito;
email; (del medico curante)

la tabella viene svuotata e aggiornata di volta in volta, dopo ogni sessione di visite.
Su di una maschera vorrei inserire un pulsante per mezzo del quale inviare una mail ad ogni indirizzo email contenuto nella tabella, con oggetto e corpo tipo:

to: email n. 1
oggetto: "commissione del" & data_visita
corpo: "Gentile dottore, le comunichiamo che in data " & data_visita & "abbiamo visitato" & cognome & nome & "con il seguente esito" & esito

inviando una singola mail per ogni medico.
A volte il campo email può essere vuoto quindi può provocare errori.
Ho provato qualcosa con docmd.sendobject ma non sono riuscito.
Mi dareste una mano per favore?
Grazie e saluti

Remigio


title: invio di email

author: Bruno Campanini

text:
Remigio formulated on Friday :

Per provarla avrei dovuto creare la tabella, cosa che non ho fatto.
Access 2013, con Reference:
Microsoft Outlook 15.0 Object Library
==============================================================
Public Sub SendMail()
Dim db As Database, RS As Recordset
Dim OutlookApp As Object, NewMail As MailItem

Set db = CurrentDb
Set RS = db.OpenRecordset("verbale_generale", dbOpenDynaset)
Set OutlookApp = CreateObject("Outlook.Application")
Set NewMail = OutlookApp.CreateItem(olMailItem)

Do Until RS.EOF
    With NewMail
        .To = RS![Email]
        '.CC = "xxx"
        '.BCC = "yyy"
        .Subject = "Commissione del " & RS![data_visita]
        .Body = "Gentile dottore, le comunichiamo che in data " & _
             RS![data_visita] & " abbiamo visitato " & _
             RS![Cognome] & " " & RS![Nome] & _
             " con il seguente esito " & RS![esito]
        .ReadReceiptRequested = True
        .Send
    End With
    DoEvents
    RS.MoveNext
Loop
OutlookApp.Quit

End Sub
=====================================
Se Outlook non invia tutte le email,
tienilo aperto finché non ha finito...

Bruno


title: invio di email

author: BFS

text:
Il 03/10/2014 11:13, Bruno Campanini ha scritto:
> Remigio formulated on Friday :
>> A03
>> Buongiorno,
>> ho un db con una tabella verbale_generale che contiene i seguenti
>> campi relativi ai pazienti visitati:
>>
>> cognome; nome;
>> data_visita;
>> esito;
>> email; (del medico curante)
>>
>> la tabella viene svuotata e aggiornata di volta in volta, dopo ogni
>> sessione di visite. Su di una maschera vorrei inserire un pulsante per
>> mezzo del quale inviare una mail ad ogni indirizzo email contenuto
>> nella tabella, con oggetto e corpo tipo:
>>
>> to: email n. 1
>> oggetto: "commissione del" & data_visita
>> corpo: "Gentile dottore, le comunichiamo che in data " & data_visita &
>> "abbiamo visitato" & cognome & nome & "con il seguente esito" & esito
>>
>> inviando una singola mail per ogni medico.
>> A volte il campo email puï¿œ essere vuoto quindi puï¿œ provocare errori.

> tienilo aperto finchï¿œ non ha finito...
>
> Bruno

se usa MS outlook come programma di posta puï¿œ anche andar bene come
soluzione...
nel caso usi windows live mail, thunderbird o altri no.

cmq argomento trito e ritrito con svariate soluzioni
basta googlare

ciao
BFS


title: invio di email

text:
...
>
> Dim OutlookApp As Object, NewMail As MailItem
>
>

Da errore di compilazione a questa riga, "tipo definito dall'utente non definito" ed evidenzia NewMail As MailItem
Grazie molte per l'aiuto

Remigio


title: invio di email

text:
Mi rispondo da solo,
ho selezionato la libreria Microsoft Outlook 11.0
effettivamente la procedura si avvia ma poi da errore di runtime:

"l'elemento è stato spostato o eliminato"
alla riga
        .To = RS![EMail]
Ciao e grazie

Remigio


title: invio di email

text:
...

ho scoperto inoltre che viene inviata la mail solo al primo indirizzo della tabella, poi c'è l'errore di runtime

Saluti

Remigio


title: invio di email

text:
Remigio formulated on Friday :

Se avessi precisato quale versione di Access stai usando...
Cambia il Dim di MailItem: MailItem As Object.

Ti avevo precisato che Outlook non invia tutte le email
se non lo tieni aperto.
Il che significa porre un REM alla penultima riga del codice.

Bruno


title: invio di email

text:
BFS laid this down on his screen :
> Il 03/10/2014 11:13, Bruno Campanini ha scritto:
>> Remigio formulated on Friday :
>>> A03
>>> Buongiorno,
>>> ho un db con una tabella verbale_generale che contiene i seguenti
>>> campi relativi ai pazienti visitati:
>>>
>>> cognome; nome;
>>> data_visita;
>>> esito;
>>> email; (del medico curante)
>>>
>>> la tabella viene svuotata e aggiornata di volta in volta, dopo ogni
>>> sessione di visite. Su di una maschera vorrei inserire un pulsante per
>>> mezzo del quale inviare una mail ad ogni indirizzo email contenuto
>>> nella tabella, con oggetto e corpo tipo:
>>>
>>> to: email n. 1
>>> oggetto: "commissione del" & data_visita
>>> corpo: "Gentile dottore, le comunichiamo che in data " & data_visita &
>>> "abbiamo visitato" & cognome & nome & "con il seguente esito" & esito
>>>
>>> inviando una singola mail per ogni medico.
>>> A volte il campo email può essere vuoto quindi può provocare errori.

>> tienilo aperto finché non ha finito...
>>
>> Bruno
>
>
> se usa MS outlook come programma di posta può anche andar bene come
> soluzione...
> nel caso usi windows live mail, thunderbird o altri no.
L'ho anche scritto che occorre la libreria di Outlook!
Occorreva la tua perspicacia per arguirne la non
funzionabilità con altri mailer...
>
> cmq argomento trito e ritrito con svariate soluzioni
> basta googlare
Dillo a Remigio... non son io quello che doveva "googlare".

Bruno

PS
Era bianco o rosso?


title: invio di email

text:
...

IO vi ringrazio per l'aiuto, posso immaginare che queste cose sono di una noia incredibile per chi come voi è un esperto di codice. Io di certo non lo sono e cerco di imparare, almeno per quello che nel mio ambito può servire.
Quello dei recordset per me è un argomento sconosciuto di cui voglio approfondire l'utilizzo, ho trovato una delle tante guide online
http://www.utteraccess.com/wiki/index.php/Recordsets_for_Beginners

che mi sembra semplice e chiara, ora me la leggo e faccio anche qualche esercizio, così almeno so di cosa stiamo parlando.
Giusto per puntualizzare, ma avevo cercato su google, ma le soluzioni sono così tante e di verse fra loro, ne ho provate alcune senza riuscirvi.
Un saluto e grazie ancora.

Remigio


title: invio di email

text:
...
Bruno,
guarda la prima riga del mio messaggio
A03


title: invio di email

author: RobertoA

text:
"Remigio" <
lino...@gmail.com
> ha scritto nel messaggio
news:86687054-0a19-4db3...@googlegroups.com...

---------------------------------------------

Se devi inviare email puoi usare Blat
http://www.blat.net/194/

E' un programma che, dopo aver impostato una riga di testo contenente i
comandi, fa tutto lui, compreso il log di eventuali errori su file di testo
La cosa importante e' che non ti leghi ad un client di posta, nel senso che
devi dare i dati del server di posta e l'account col quale autenticarti
Cosi' facendo elimini tutti quei problemi del tipo "sul mio va e sull'altro
pc no"


title: invio di email

text:
Grazie Roberto,
credo che terrò questa come ultima soluzione.
Un saluto cordiale.

Remigio


title: invio di email

text:

ricordo male o blat non supporta l'autenticazione in uscita?
oppure non permette di settare il protocollo smtp rendendolo quindi
inutilizzabile quando va usato con SSL etc?

ciao
BFS


title: invio di email

text:
...
> Cambia il Dim di MailItem: MailItem As Object.

Non so se ho fatto bene:

    Dim db As Database
    Dim RS As Recordset
    Dim OutlookApp As Object
    Dim mailitem As Object

    Set db = CurrentDb
    Set RS = db.OpenRecordset("prova", dbOpenDynaset)
    Set OutlookApp = CreateObject("Outlook.Application")
    Set NewMail = OutlookApp.CreateItem(olMailItem)

    Do Until RS.EOF
        With NewMail
            .To = RS![EMail]
ma a questa riga da il seguente errore:

metodo "to" dell'oggetto "_mailitem" non riuscito

Ricordo che uso Access 2003
Ciao e grazie

Remigio


title: invio di email

text:
Remigio pretended :

Come dicevo non l'ho provato...

.To = CHR(34) & RS![EMail] & CHR(34)

Vuole una stringa, dovrebbe andare.
Se cosï¿œ non fosse prova con:
.To = "
brun...@libero.it
"

e dimmi quel che succede.

Bruno


title: invio di email

text:
...
> e dimmi quel che succede.
> Bruno

Ciao Bruno,
ho provato come sotto

        With NewMail
            .To = "
lin...@gmail.com
"

ma l'errore persiste,

"l'elemento è stato spostato o eliminato"

anche con il chr(34)
Comunque il messaggio a
lin...@gmail.com
 è stato inviato, come prima veniva inviato il messaggio solo al primo destinatario dell'elenco
Se hai tempo potresti fare una prova su un pulsantino?
Grazie infinite.

Remigio


title: invio di email

text:
Remigio laid this down on his screen :

Questo nel Command Button di una Form:
=========================================
Private Sub Command2_Click()
Dim RS As Recordset, eMail As String, Subject As String, Message As
String

Set RS = CurrentDb.OpenRecordset("Verbale_Generale", dbOpenDynaset)
Do Until RS.EOF
    eMail = RS![eMail]
    Subject = "Commissione del " & RS![data_visita]
    Message = "Gentile Dottore, Le comunichiamo che in data " & _
              RS![data_visita] & " abbiano visitato " & RS![Cognome] &
_
              " " & RS![Nome] & " con il seguente esito " & RS![esito]
& "."
    SendMail_1 eMail, Subject, Message
    RS.MoveNext
Loop

End Sub
==========================================

Questo in un Modulo:
==========================================
Public Sub SendMail(eMailAddr As String, Subject As String, Message As
String)
Dim olApp As Object, NewMail As Object

Set olApp = CreateObject("Outlook.Application")
Set NewMail = olApp.CreateItem(olMailItem)

With NewMail
    .To = eMailAddr
    '.CC = "
xxx.it
"
    '.BCC = "yyy"
    .Subject = Subject
    .Body = Message
    .ReadReceiptRequested = True
    .Send
End With
DoEvents
olApp.Quit

End Sub
=========================================

Creato da Access 2013/64 bit col quale funziona perfettamente.
L'ho convertito in Access 2003, senza però riuscire a farlo
funzionare perché A2013/64 non mi carica più la Reference
Microsoft DAO 3.6 Object Library.

Adegua tutte le Reference alla tua versione A203.

Bruno


title: Problema con sql

author: Prolog Informatica

text:
Buongiorno, sto cercando di costruire una istruzione sql.
'SELECT A,B,CX FROM TABELLA1 UNION SELECT A,B,'''' AS CX FROM TABELLA2'
il problema (almeno credo) deriva dal fatto che CX e' un campo
calcolato.l'errore che mi viene segnalato e' "parametri
insufficienti.previsto 1"
Qualcuno sa darmi una spiegazione?


title: Problema con sql

author: OneEDP

text:

Prova con
SELECT
     A,
     B,
    Str(CX) As CY
FROM TABELLA1
UNION
SELECT
     A,
    B,
    '' AS CY
FROM TABELLA2


title: Problema con sql

author: Marco Pizzamiglio

text:
Prolog Informatica ha scritto:

Messo cos� non � calcolato, manca la formula. Jet si aspetta di trovare in
tabella un campo CX che manca, e ti chiede di inserire il valore.
Devi usare la sintassi
  SELECT A, B, <espressione> AS CX FROM ...
il resto va bene.
Esempi:
  SELECT A, B, A & " - " & B AS CX FROM ...
  SELECT A, B, (A + B)/10 AS CX FROM ...
Ciao.
-Marco-
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Problema con sql

text:
E' un campo calcolato.lavoro su delphi con componente TAdoQuery dove viene
definito.Faro' altri tentativi.
Grazie


title: Problema con sql

author: MarcoVR

text:

Prova a dichiarare come parametri della query le variabili su cui si
basa il calcolo
Ciao
MArco


title: Problema con sql

author: CinziaPagani

text:
"Prolog Informatica" <
in...@prologinformatica.it
> ha scritto nel
messaggio news:CrhIm.89714$1s6....@twister2.libero.it...

Perch� Jet capisca quell'istruzione CX deve essere un campo di
Tabella1, se � calcolato da qualcun altro, Jet non pu� conoscerne il
significato e quindi ti da l'errore di richiesta parametro.
--
Cinzia [Office Access MVP]
_______________________

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


title: AGGIUNGERE/ELIMINARE CAMPI all'interno di una tabella. MM

author: MM

text:
Ciao,
volevo sapere come posso fare nel caso che io debba
aggiungere/eliminare/modificare  dei campi all'interno di una tabella
contenuta nel backend di un db.
Ovviamente il db è presso il cliente e quindi dovrei spedire tramite email
un aggiornamento
al cliente (l'aggiornamento può essere un file in VB o un piccolo DB di
access che mi faccia le opportune modifiche).
Come posso fare tutto cio' ?
Per favore, se non chiedo troppo fatemi un esempio. Non sono praticissimo di
VB, ma posso sempre ingegnarmi.
Grazie.


author: ramblers

text:
"MM" <
mar...@libero.it
> ha scritto nel messaggio
news:7B%%8.3208$n04....@twister2.libero.it...
> Ciao,
>
> volevo sapere come posso fare nel caso che io debba
> aggiungere/eliminare/modificare  dei campi all'interno di una tabella
> contenuta nel backend di un db.
se specifichi che modalità di accesso ai dati usi è meglio......
l'aggiunta e/o l'eliminazione dei cmpi è una cosa abbastanza semplice.
Con DAO hai a disposizione l'oggetto TableDef che contiene tutte le
informazioni sui campi (insieme Fields di oggetti Field)
e sul quale puoi agire con metodi Delete e Append.
La modifica di un campo è un pò più una rogna, in quanto non è consentita
(se non per alcune proprietà), per cui devi crearti un nuovo campo (A),
copiarci dentro il contenuto di quello vecchio(B), eliminare quello che non
ti serve(B), ricrearlo con le nuove caratterisitiche(C), riscriverci quello
che ti eri salvato (A).
ciao.
--
e` inutile versare ruhm...
nu strunz nun addiventa babba'


title: Protezione a livello utente

author: Access

text:
Buonasera a tutti nel NG.
Io ho seguito le istruzioni che ci sono sul sitocomune nella sezione
general, circa l'impostazione della protezione a livello utente.
Ebbene, io sono riuscito a creare due utenti ed effettivamente con uno
potevo modificare i dati nel database e con l'altro potevo solo viualizzarli
ma non modificarli.
Il problema è che una volta reimpostato il file di protezione di default, il
database che doveva essere protetto si è aperto regolarmente. ma non mi
doveva dire che non avevo le autorizzazioni sufficienti per visualizzare il
db?
ciao


title: Protezione a livello utente

text:
"Access" <
c...@tin.it
> ha scritto nel messaggio
news:a%UPh.44158$zG1.4...@twister2.libero.it...

hai tolto tutte le autorizzazioni a UTENTI-AMMINISTRATORE?
ciao
thomas.az


title: Protezione a livello utente

text:
"
thomas.az
" <
thomas.a...@alice.it
> ha scritto nel messaggio
news:4610ba99$0$17948$4faf...@reader1.news.tin.it...

Mi sembra proprio di si, anche perchè ho seguito le indicazioni alla
lettera.
Ma, forse mi è comunque sfuggito qualcosa? Ci riprova e ti faccio sapere.
> ciao
>
thomas.az
Ciao Grazie
>


title: Protezione a livello utente

author: paolo

text:
On Apr 2, 12:20 pm, "Access" <
c...@tin.it
> wrote:
> "
thomas.az
" <
thomas.azzare...@alice.it
> ha scritto nel messaggionews:4610ba99$0$17948$4faf...@reader1.news.tin.it...

Ciao,
  mi ero trovato nella stessa situazione, se vuoi essere sicuro mi
permetto di consigliarti la procedura wizard, non è raffinatissima, ma
credo che tu riesca ad ottenere quello di cui hai bisogno. Poi ti
guardi il risultato e così impari a farlo anche senza wizards.
ciao
paolo


title: Protezione a livello utente

text:
"paolo" <
dap...@gmail.com
> ha scritto nel messaggio
news:1175520988.3...@p15g2000hsd.googlegroups.com...

Ciao,

ciao
paolo
Ok grazie, terrò presente il to consiglio.


title: Come fareste?

author: Gerardo Santarpia

text:
Vorrei creare un db di case costruttrici,
ogni casa ha la sua famiglia personale (tipo elettrico, idrico,ecc..) e la
sua categoria.
Vorrei automatizzare in modo che ricercando con vari parametri mi escono le
case, o viceversa.
Voi, come creereste le tabelle di famiglia e categoria?
Pare ovvio che ogni famiglia ha le proprie categorie


title: Come fareste?

author: Arold

text:
"Gerardo Santarpia" <
gerar...@libero.it
> ha scritto nel messaggio
news:nm5Da.57755$Ny5.1...@twister2.libero.it...

tabella categorie con campo categoria
tabella famiglie con campo categoria e campo famiglia
il campo categoria lo relazioni uno a molti
tabella case nome casa categoria famiglia
poi crei una maschera in visualizzazione continua e con i filtri e delle
combo visualizzi solo i record che ti interessano.
fammi sapere.


title: Divisione per zero

author: Ale

text:
Ciao a tutti,
ho un problemino con un report: all'interno c'e' un campo ottenuto dalla
divisione di altri due presenti sullo stesso report. Accade che questa % a
volte dia #errore in quanto risultato di una divisione per zero. Nessun
problema finchè non ho provato ad ordinare il report per quel campo: durante
la fase di elaborazione mi dà "Divisione per zero" e si blocca. Come posso
risolvere il problemino?
Grazie a tutti,
Alessandro


title: Divisione per zero

author: SunRex

text:
"Ale" <
alessa...@hotmail.com
> ha scritto nel messaggio
news:IuCdc.3324$eR5....@tornado.fastwebnet.it...

Secondo me ho intercetti l'errore oppure controlli priam di effettuare la
divisione se un campo è 0.Se si non effettui la divisione.
Il tutto da VBA naturalmente.
SunRex


title: Divisione per zero

author: Clabat

text:
"SunRex" <
sunrexs...@hotmail.it
> ha scritto nel messaggio
news:MOCdc.51379$rM4.2...@news4.tin.it...

IIF (B=0;0; A/B)
Ciao


title: Form senza barra del titolo

author: Thunder

text:
Ciao,
è possibile, tramite VBA, evitare che all'apertura di una maschera la barra
del titolo non venga visualizzata?
Grazie
Thunder


title: Form senza barra del titolo

author: ALESSANDRO Baraldi

text:
"Thunder" <##
roma...@freesurf.ch
> ha scritto nel messaggio
news:cjoate$sg5$1...@newshispeed.ch...

Se intendi quella della Maschera è impostabile da proprietà:
Stile Bordo Nessuno.
Poi gli metti un Rettangolo(Shape) in rilievo che ne delimita il perimetro
ed il gioco è quasi fatto.
Il problema è che Access applica alla Barra del Titolo la possibilità
di Spostarla, quindi Niente Barra ---> Niente Spostamento.
In realtà anche quì si può come sempre fare tutto via Codice, ma
non sapendo cosa vuoi di più concreto non sò che dirti...!
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: Opzioni in automazione word (continuo)

text:
Ciao,
siccome non ho più ricevuto risposta nell'altro post, provo a
riformulare la domanda.
Per inviare dei dati ad un file di word con un percorso prestabilito,
uso il seguente codice:
DoCmd.OutputTo acOutputReport, "Mio_Report", _
acFormatRTF, "C:\Users\Nome_Computer\Documenti\Mia_Cartella\" & "/" &
[Mia_Caselladitesto] & ".doc", True
dove "Mia_Caselladitesto" è una casella di testo non associata dove
inserisco il nome da dare al file di word.
La domanda è questa:
dovendo consegnare il db ad una persona che a sua volta girerà ad
altre persone, c'è un modo per aggirare il percorso del file sotto la
voce "Nome_Computer" che chiaramente non posso sapere?
ps
Per chi ha voglia di andarsi a leggere l'altro post, c'è un
suggerimento di Carlo Costarella; purtroppo non sono stato in grado di
metterlo a frutto.
Ciao Vladimiro.


title: Opzioni in automazione word (continuo)

author: antonio

text:
<
vlad...@alice.it
> ha scritto nel messaggio
news:f8434edb-86b2-49ff...@a12g2000pro.googlegroups.com...



--------  RISPOSTA  --------------
Se da quel comando ometti tutta la parte iniziale del nome file, ovvero se
il comando diventa semplicemente DoCmd.OutputTo acOutputReport,
"Mio_Report", acFormatRTF, [Mia_Caselladitesto] & ".doc", True il file dove
viene salvato ? Credo nella cartella dove c'è l'mdb. Se così è, nella
maschera in cui valorizzi Mia_Caselladitesto puoi anche inventarti un altro
campo in cui fai memorizzare all'utente un percorso alternativo alla
semplice cartella di default.
Scusa, forse non ho capito bene il problema, ma non avevdo avuto ancora
nessun suggerimento ho creduto opportuno dire la mia, anche con la
possibilità che sia "di fuori" rispetto al problema stesso.
Ciao
Antonio


title: Opzioni in automazione word (continuo)

author: Carlo Costarella

text:
<
vlad...@alice.it
> ha scritto nel messaggio
news:f8434edb-86b2-49ff...@a12g2000pro.googlegroups.com...



-------------------------------------
Il punto importante da capire è che serve conoscere il percorso dove salvare
il file.
Come già ti dicevo, questo percorso è bene memorizzarlo in una tabella, in
modo che l'utente possa scegliere una sola volta il percorso di salvataggio.
Le tecniche per ricavare il percorso sono diverse e prevedono sia l'uso di
ocx, API o altro.
Qui ti propongo due tecniche:
Su
http://www.sitocomune.com
sezione modules, indice 5.42 trovi un esempio in A97, eventualmente da
portare in altra versione di Access.
Di seguito un secondo esempio da inserire in un nuovo modulo pubblico:
Option Compare Database
Option Explicit
'************** Code Start **************
'This code was originally written by Terry Kreft.
'It is not to be altered or distributed,
'except as part of an application.
'You are free to use it in any application,
'provided the copyright notice is left unchanged.
'
'Code courtesy of
'Terry Kreft
Private Type BROWSEINFO
  hOwner As Long
  pidlRoot As Long
  pszDisplayName As String
  lpszTitle As String
  ulFlags As Long
  lpfn As Long
  lParam As Long
  iImage As Long
End Type
Private Declare Function SHGetPathFromIDList Lib "shell32.dll" Alias _
            "SHGetPathFromIDListA" (ByVal pidl As Long, _
            ByVal pszPath As String) As Long
Private Declare Function SHBrowseForFolder Lib "shell32.dll" Alias _
            "SHBrowseForFolderA" (lpBrowseInfo As BROWSEINFO) _
            As Long
Private Const BIF_RETURNONLYFSDIRS = &H1
Public Function BrowseFolder(szDialogTitle As String) As String
  Dim X As Long, bi As BROWSEINFO, dwIList As Long
  Dim szPath As String, wPos As Integer
    With bi
        .hOwner = hWndAccessApp
        .lpszTitle = szDialogTitle
        .ulFlags = BIF_RETURNONLYFSDIRS
    End With
    dwIList = SHBrowseForFolder(bi)
    szPath = Space$(512)
    X = SHGetPathFromIDList(ByVal dwIList, ByVal szPath)
    If X Then
        wPos = InStr(szPath, Chr(0))
        BrowseFolder = Left$(szPath, wPos - 1)
    Else
        BrowseFolder = vbNullString
    End If
End Function
'*********** Code End *****************
Come si usa questo secondo esempio:
dichiari una variabile string:
Dim MioPercorso as String
MioPercorso = BrowseFolder("Scegli un percorso di salvataggio.")
A questo punto MioPercorso restituisce il path completo della cartella
scelta, per esempio
\\192.168.1.12\User\PippoUser\Documenti oppure
C:\User\NomeUser\Documenti
In ogni caso devi memorizzare il percorso in una tabella...lo sai fare?
Il resto viene da se.
Ciao, Carlo


title: Opzioni in automazione word (continuo)

text:
On 24 Gen, 07:55, "antonio" <
antoa...@tiscali.it
> wrote:
> <
vladil...@alice.it
> ha scritto nel messaggionews:f8434edb-86b2-49ff...@a12g2000pro.googlegroups.com...

In questo modo il file viene salvato nella cartella Documenti mentre
io ho bisogno di salvarlo in una cartella predeterminata con
all'interno lo stesso db.
Comunque grazie della risposta.
Ciao Vladimiro.


title: Opzioni in automazione word (continuo)

text:
On 24 Gen, 08:29, "Carlo Costarella"
<
carloantoniocostare...@gmail.com
> wrote:
> <
vladil...@alice.it
> ha scritto nel messaggionews:f8434edb-86b2-49ff...@a12g2000pro.googlegroups.com...

> Suhttp://
www.sitocomune.com

Mille grazie per la disponibilità.
Ciao Vladimiro.


title: Opzioni in automazione word (continuo)

author: Cinzia

text:
<
vlad...@alice.it
> ha scritto nel messaggio
news:0b529d9b-92c8-49f1...@n33g2000pri.googlegroups.com...


Ciao Vladimiro,
se la cartella dove devi salvare il documento è la stessa in  cui si
trova l'MDB, basta:
DoCmd.OutputTo acOutputReport, "Mio_Report",
acFormatRTF,CurrentProject.Path  & "/" & [Mia_Caselladitesto] &
".doc", True
--
Cinzia [Office Access MVP]
_______________________

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


title: Opzioni in automazione word (continuo)

text:
On 24 Gen, 17:55, "Cinzia" <
cinziapagani-no-spam_ple...@tiscali.it
>
wrote:
> <
vladil...@alice.it
> ha scritto nel messaggionews:0b529d9b-92c8-49f1...@n33g2000pri.googlegroups.com...

> ----------------------------------------- Nascondi testo citato
>
> - Mostra testo citato -
Ciao Cinzia, scusa se ti rispondo in ritardo, ma oggi non ci sono
stato.
Inizialmente era quello che cercavo (infatti mi sono accorto che nel
rispondere ad Antonio, ho espresso quello che tu mi hai indicato), poi
ho pensato, dovendo gestire 45 files di word, che sarebbe stato meglio
racchiuderli tutti dentro un'unica cartella, all'interno della stessa
cartella dove c'è l'MDB.
Resta comunque il fatto che mi hai dato, come sempre,  un prezioso
suggerimento.
Ciao Vladimiro.


title: Opzioni in automazione word (continuo)

text:
On 24 Gen, 08:29, "Carlo Costarella"
<
carloantoniocostare...@gmail.com
> wrote:
> <
vladil...@alice.it
> ha scritto nel messaggionews:f8434edb-86b2-49ff...@a12g2000pro.googlegroups.com...

> Suhttp://
www.sitocomune.com

Ciao Carlo, ho usato il tuo secondo esempio e funziona alla grande.
Mille grazie Vladimiro.


title: Tracciati Lemco:Esportazioni dati nel software Zucchetti

author: Dino

text:
Ciao a tutti volevo sapere se qualcuno di voi ha avuto modo di
preparare del codice per esportare i dati contabili dal proprio DB
(seguendo i tracciati Lemco) ad un gestionale Zucchetti.

Grazie in anticipo

Dino


text: Ciao Dino, leggevo il tuo post anche se datato. Per caso hai i tracciati per l'export verso il gestionale zucchetti?


author: BFS

text:
Il 16/12/2015 15:27,
marr...@gmail.com
 ha scritto:
> Ciao Dino, leggevo il tuo post anche se datato. Per caso hai i tracciati

per l'export verso il gestionale zucchetti?
>

se vuoi li ho io...ho da poco fatto un export di dati dal mio gestionale
verso lo studio del commercialista che usa tale formato per l'import.
se mi dai una mail te li mando
ciao
BFS


text:
Ciao BFS la mia mail è marrek05 (ovviamente account
gmail.com
).
Magari ci sentiamo! Attendo tue grazie!!



text:

meglio tardi che mai :-)
te li ho inviati
ciao
BFS


text:
Il giorno giovedì 17 dicembre 2015 08:23:23 UTC+1, BFS ha scritto:

Ciao BFS
Hai la possibiltà di madarli anche a me?


author: RobertoA

text:

E che so io 'el fio de la serva' ?
E' possibbole mandarli pure ammia ?
O pubblicarli, visto che saranno interessanti per molti


text:
Ciao, io ci sono alle prese adesso. Gentilmente... non è che condivideresti il tracciato anche con me? Ci conto e ringrazio anticipatamente.



text:
Gentile BFS,
servirebbe pure a me il tracciato, ti ringrazierei infinitamente visto che sto combattendo inutilmente con il commercialista per usare tutto in via digitale.
grazie
ah: niky.of.allstar89 (gmail... of course)


text:

Riuscireste a mandarlo anche a me?

mail: clinicacroceazzurrabari at
gmail.com

Grazie mille davvero


author: pfm

text: Effettivamente potrebbero interessare a molti anche a me


text:
Pfmarro ..... google

Grazie


text:
Il 30/05/2017 11:48, pfm ha scritto:
> Pfmarro ..... google
>
> Grazie
>

inviati
ciao


text:

fatto
ciao


text:
Per cortesia anche a me
svegliapc(gmail)
Grazieeeee


text:

Essendo documenti di grande interesse generale se potessi pubblicarli su
qualche sito ti eviteresti l'onere della spedizione in privato
Nel caso non potessi pubblicarli, ti pregherei di inviarli pure a me, grazie


text:
Qualcuno puo' testare il mio lavoro di esportazione verso Zucchetti?  Sto aspettando che il distributore me lo provi...ma aspetta e spera....
Mi invento 3 fatture, faccio il file di esportazione e...forza!!!.... qualcuno che me lo testi!!!! Grazieeeee anticipatamente
svegliapc(gmail)


text:

te li ho inviati in privato.
non saprei dove pubblicarti se non sul mio ftp aziendale

ciao


text:

Puoi inviarli cortesemente anche a me enzotoc(gmail) , grazie


text:
Ciao,
posso chiederti l'alternanza dei record D10-D11-D30-D31-D33 e relative testate per una estrazione di 2/3 clienti e 3/4 fatture? Dalle specifiche non riesco a capirlo
grazie mille!

Il giorno giovedì 17 dicembre 2015 08:23:23 UTC+1, BFS ha scritto:



text:
Il giorno venerdì 11 novembre 2011 11:32:07 UTC+1, Dino ha scritto:



text:
Il giorno venerdì 11 novembre 2011 11:32:07 UTC+1, Dino ha scritto:

Ho fatto un programma per esportare un file di excel con fatture e anagrafiche verso il gestionale Omnia Zucchetti ed ho in preparazione l'esportazione da Danea TeamSystem sempre verso Omnia Zucchetti.....se avete bisogno di esportare/importare dati possiamo parlarne


author: mario rossi

text:

un mio collega ne aveva bisogno, in che modo possiamo parlarne?


text:
Cortesemente potresti invialo anche a me, nsolaroli(at)
hotmail.com
.

grazie mille


text:
Anche io ne parlerei volentieri. come fare?



text:
Messaggio per BFS, potresti cortesemente inviare i tracciati anche a me, nsolaroli(at)
hotmail.com
.

Grazie mille

Il giorno giovedì 1 giugno 2017 09:26:50 UTC+2, BFS ha scritto:



author: an

text:
Il giorno giovedì 17 dicembre 2015 08:23:23 UTC+1, BFS ha scritto:
> se vuoi li ho io...ho da poco fatto un export di dati dal mio gestionale
> verso lo studio del commercialista che usa tale formato per l'import.
> se mi dai una mail te li mando
> ciao
> BFS

Servirebbero anche a me, grazie (acolombodev, account gmail)


text:
Il giorno giovedì 17 dicembre 2015 08:23:23 UTC+1, BFS ha scritto:

farebbero comodo anche a me... la mia mail è  matteo.orighi (su gmail)

Grazie in anticipo!


text: Salve dovrei esportare dei dati da danea sul programma del mio commercialista che segue il tracciato lemco . Potete aiutarmi ?


text:
Il giorno giovedì 17 dicembre 2015 08:23:23 UTC+1, BFS ha scritto:
> Il 16/12/2015 15:27, ha scritto:
> > Ciao Dino, leggevo il tuo post anche se datato. Per caso hai i tracciati
>
> per l'export verso il gestionale zucchetti?
> >
>
> se vuoi li ho io...ho da poco fatto un export di dati dal mio gestionale
> verso lo studio del commercialista che usa tale formato per l'import.
> se mi dai una mail te li mando
> ciao
> BFS

Ciao BFS, avresti un esempio completo del tracciato LEMCO per l'importazione dati in Zucchetti? La mia mail è meeeko.sara(gmail)
Grazie!
Sara


text:
Il giorno giovedì 17 dicembre 2015 08:23:23 UTC+1, BFS ha scritto:
> Il 16/12/2015 15:27, marrek05 ha scritto:
> > Ciao Dino, leggevo il tuo post anche se datato. Per caso hai i tracciati
>
> per l'export verso il gestionale zucchetti?
> >
>
> se vuoi li ho io...ho da poco fatto un export di dati dal mio gestionale
> verso lo studio del commercialista che usa tale formato per l'import.
> se mi dai una mail te li mando
> ciao
> BFS

Potresti mandarli anche a me? Grazie mille :)
netzapping at
gmail.com


text:

Ciao BFS, potresti mandarli anche a me? Grazie!

pedrouceda92 at
gmail.com


author: Graziano

text:
Il giorno venerdì 11 novembre 2011 11:32:07 UTC+1, Dino ha scritto:
> Ciao a tutti volevo sapere se qualcuno di voi ha avuto modo di
> preparare del codice per esportare i dati contabili dal proprio DB
> (seguendo i tracciati Lemco) ad un gestionale Zucchetti.
>
> Grazie in anticipo
>
> Dino

farebbero comodo anche a me... la mia mail è  franchi.graziano (su gmail)

1000 Grazie


author: Daniele Serino

text:
Il giorno giovedì 17 dicembre 2015 08:23:23 UTC+1, BFS ha scritto:
> Il 16/12/2015 15:27,
marr...@gmail.com
 ha scritto:
> > Ciao Dino, leggevo il tuo post anche se datato. Per caso hai i tracciati
>
> per l'export verso il gestionale zucchetti?
> >
>
> se vuoi li ho io...ho da poco fatto un export di dati dal mio gestionale
> verso lo studio del commercialista che usa tale formato per l'import.
> se mi dai una mail te li mando
> ciao
> BFS

Ciao potresti inviarli anche alla mia mail?
seri...@gmail.com

Ti ringrazio e spero di poter ricambiare....


text:
Ciao a tutti, qualcuno potrebbe gentilmente inviare anche a me i tracciati LEMCO per favore?
La mia mail è stefano.mogavero93(at)
gmail.com

Grazie a tutti!


text:

Ciao a tutti, qualcuno potrebbe gentilmente inviare anche a me i tracciati LEMCO meglio sarebbe un file di esempio per favore? grazie in anticipo.
La mia mail è
mas...@sintassisrl.it


text:
Anche io avrei bisogno dei tracciati.....   lucreziasancilio (at) gmail. Com

Grazie