title: OT:  SITO COMUNE aggiornato (replica)

text:
"Sergio MAZZA"
> Capisco quello che vuoi dire; questo discorso l'ho affrontato parecchio
> tempo fa. Sembrerŕ strano ma quando c'erano (solo) i linguaggi compilati,
la
> frustrazione mia e del cliente era quella di dovermi chiamare per
risolvere
> 'na strunzata che mi ero scordato di fare (o si era scordato di dirmi) e
> chiaramente per intervenire dovevo andare lě; portarmi tutto l'occorrente
> (editor di testo, compilatore, eventuali altre librerie di terzi etc.
> etc.)... Che palle!
> Era anche difficile far digerire il costo d'intervento per la strunzata...
>
> Per questo preferisco un ambiente "aperto" (non completamente, certo!) di
> facile intervento.
>
> Tu dici "...l'utente smanettone..."; io sono uno di quelli, smanazzo nel
> programma e cerco subito di trovare qualche errorino; ma questo perché io
> non ci devo lavorare con quel programma. Mentre chi ti commissiona il
> lavoro, sě, ci perderŕ tempo all'inizio; ti sbomballa i report o maschere,
> poi quando capisce che č solo una perdita di tempo (e soldi), stai sicuro
> che non lo fa piů.
> La cosa importante č un sicuro backup dei dati e applicazione, poi se
vuole
> anche cancellare tutto sono affari suoi, non posso certo limitare le
azioni
> degli altri...
Cosa devo dire Sergio ... prendo atto della tua opinione, pur non
condividendola.
Esistono scelte di sviluppo che minimizzano i problemi, altre che li
moltiplicano: questa li moltiplica.
Magari si potrŕ forzare qualche utente a non giocherellare con
l'interfaccia, ma se gli utilizzatori sono tanti, lontani e anonimi la
situazione diventa inaccettabile.
La semplice impostazione di un filtro sull'interfaccia, o la modifica di un
parametro di stampa (situazioni diffuse e legittime) rischiano di creare
problemi o rendere inutilizzabile una maschera/Report.
Ma esistono anche altre motivazioni che rendono sconsigliabile (eufemismo)
distribuire files .MDB:
- Allocano molte piů memoria rispetto alle versioni P-Compilate: basta usare
Task Manager per apprezzare la differenza.
- Eventuali errori non gestiti nel codice bloccano l'esecuzione
dell'applicazione, con ritorno al sistema operativo se č installato Access
Runtime.
- Il passaggio "silente" a modalitŕ Design durante la chiusura degli oggetti
Forms/Reports comporta la continua scrittura di Access nella struttura
dell'oggetto: questo non solo rallenta le prestazioni di chiusura ma espone
i Front-Ends al rischio (sebbene non frequente) di corruzioni d'interfaccia.
In un .MDE, in casi assai rari, puň corrompersi la parte "database" ma non
l'interfaccia/progetto VBA.
(Quanto scrivo non vale per i files .ADE che vengono eseguiti sempre a sola
lettura).
Quindi, concludendo, ribadisco il consiglio di evitare assolutamente la
distribuzione di Front-Ends in formato "sorgente" .MDB.
Ciao.


title: OT:  SITO COMUNE aggiornato (replica)

author: Sergio MAZZA

text:
"Oscar Manfredini" <
X...@tiscalinet.it
> ha scritto nel messaggio
news:e_rFd.1778$GU.4...@twister1.libero.it...

Di tutto questo che scrivi ne faccio tesoro per quando ne avrň bisogno e
capisco il virgolettato sulla parola sorgente; ma sono un "controcorrente"
per natura e non perché non "capisco o non voglio capire", ma ho pesato le
"rogne" e per ora mi conviene cosě...
Ciao.
P.S. Ah! Io non utilizzo (ne possiedo) il Runtime di Access.
--
Sergio MAZZA


title: OT:  SITO COMUNE aggiornato (replica)

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:1ddece200745eb06d0...@mygate.mailgate.org...
>
> Si potresti farlo, ma so che sei un Signore, e se non vuoi
> diventare una Signorina farai meglio a recuperare...!!!
>
> ;-)
>
> Ciao
> @Alex
>
Scusa ma è stato un Clone a scrivere, non io...
Ciao.
P.S. Ho recuperato?
--
Sergio MAZZA


title: OT:  SITO COMUNE aggiornato (replica)

author: Alessandro Baraldi

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> wrote in message
news:cs5mcr$f4l$
1...@canarie.caspur.it
[CUT]
> >
>
> Scusa ma è stato un Clone a scrivere, non io...
>
> Ciao.
>
> P.S. Ho recuperato?
Un RecordsetClone...?



title: OT:  SITO COMUNE aggiornato (replica)

author: Oscar Manfredini

text:
"Sergio MAZZA"
> Di tutto questo che scrivi ne faccio tesoro per quando ne avrò bisogno e
> capisco il virgolettato sulla parola sorgente; ma sono un "controcorrente"
> per natura e non perché non "capisco o non voglio capire", ma ho pesato le
> "rogne" e per ora mi conviene così...
Ok   :-)
Ciao.
> P.S. Ah! Io non utilizzo (ne possiedo) il Runtime di Access.
PS:  Beh, ma allora come fai a distribuire le applicazioni?


title: OT:  SITO COMUNE aggiornato (replica)

author: namor

text:
Oscar Manfredini ha scritto:
> "Sergio MAZZA"

> Ok   :-)
> Ciao.


Probabilmente dà gli mdb e mde ai clienti che già possiedono una loro
copia di access, come faccio io.
Ciao.
Namor
--
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: OT:  SITO COMUNE aggiornato (replica)

text:
"Oscar Manfredini" <
X...@tiscalinet.it
> ha scritto nel messaggio
news:VJtFd.1940$GU.5...@twister1.libero.it...
>
>> P.S. Ah! Io non utilizzo (ne possiedo) il Runtime di Access.
>
> PS:  Beh, ma allora come fai a distribuire le applicazioni?
Si compra la licenza di Office Pro; tanto un pacchetto di applicazioni che
comprende (minimo) elaboratore di testi e foglio elettronico serve sempre a
chiunque. Ci aggiungi qualche euro e ci inserisci anche il gestore di
archivi...
Semplice no? (Eh! Eh!)
Ciao.
--
Sergio MAZZA


title: OT:  SITO COMUNE aggiornato (replica)

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:f25fe089507c6d1883...@mygate.mailgate.org...
> "Sergio MAZZA" <
sergi...@tiscali.it
> wrote in message
> news:cs5mcr$f4l$
1...@canarie.caspur.it
>
> [CUT]
>> >
>>
>> Scusa ma è stato un Clone a scrivere, non io...
>>
>> Ciao.
>>
>> P.S. Ho recuperato?
>
> Un RecordsetClone...?
>
> Ciao
> @Alex
AHAHAHAHAHAHAH!
Ciao.
--
Sergio MAZZA


title: OT:  SITO COMUNE aggiornato (replica)

text:
"Sergio MAZZA" <
> > PS:  Beh, ma allora come fai a distribuire le applicazioni?
> Si compra la licenza di Office Pro; tanto un pacchetto di applicazioni che
> comprende (minimo) elaboratore di testi e foglio elettronico serve sempre
a
> chiunque. Ci aggiungi qualche euro e ci inserisci anche il gestore di
> archivi...
>
> Semplice no? (Eh! Eh!)
Eh, eh, eh ... certo che è semplice  :-)
Però in questo modo dipendi dalla versione di Access che il cliente deve (e
deve proprio) comprare.
Se hai un'applicativo sviluppato (per ex.) col 97 che può interessare a un
cliente recente, devi:
1) Convertirlo per Access 2003 (e magari acquistare pure te Access 2003)
2) Pregare che tutto funzioni senza dover modificare qualcosa dopo la
conversione.
3) Eventuali modifiche fatte sulla versione vecchia devono essere rifatte
per quella in possesso del cliente nuovo.
Ciao.


title: OT:  SITO COMUNE aggiornato (replica)

text:
"Oscar Manfredini" <
X...@tiscalinet.it
> ha scritto nel messaggio
news:youFd.2029$GU.5...@twister1.libero.it...
>
> Eh, eh, eh ... certo che è semplice  :-)
>
> Però in questo modo dipendi dalla versione di Access che il cliente deve
> (e
> deve proprio) comprare.
Certo, non ci sono dubbi.
> Se hai un'applicativo sviluppato (per ex.) col 97 che può interessare a un
> cliente recente, devi:
>
> 1) Convertirlo per Access 2003 (e magari acquistare pure te Access 2003)
> 2) Pregare che tutto funzioni senza dover modificare qualcosa dopo la
> conversione.
> 3) Eventuali modifiche fatte sulla versione vecchia devono essere rifatte
> per quella in possesso del cliente nuovo.
>
> Ciao.
No, è quì che casca l'asino; non ho nulla di pronto perché faccio prima a
rifare tutto che riadattare qualcosa fatto per un altro che aveva tutto un
suo modo di vedere la sua attività.
Immagino che ti si siano rizzati i capelli, ma non ti è mai capitato di
trovarti una persona che ti dice: "... Ho comprato quel programma da quella
Ditta che fa quella tal cosa, ma non mi soddisfa perché mi piacerebbe che
facesse così, cosà..."; io dico che la forza di chiunque lavori in questo
campo è proprio questa, la possibilità di creare l'applicazione proprio come
vuole lui...
Altrimenti basterebbe andare dal giornalaio e spendere 50 euri, cosa che
dico sempre a chiunque mi chieda qualcosa a "poco prezzo".
Ciao.
P.S. Oh! Se ti annoia la discussione dillo eh? Non farti scrupoli...
--
Sergio MAZZA


title: OT:  SITO COMUNE aggiornato (replica)

author: TheMax

text:
"giorgio" <
georgeNO-S...@libero.it
> ha scritto nel messaggio
news:34fbidF...@individual.net...
> Con queste premesse, ritengo che chi pubblica OGGI una soluzione, un
lavoro,
> una demo, lo debba fare funzionante innanzitutto con il software del
> momento, nello specifico Access 2003 di Office 11, e successivamente o
> contemporaneamente renderlo campatibile con le versioni precedenti,
politica
> seguita la data casa produttrice, Microsoft. (scelta che in alcuni casi si
è
> rivelata più dannosa per il software in generale rispetto alla
progettazione
> ex novo dello stesso, ma che porta agli utillizzatori anche alcuni
> vantaggi).
Hai perfettamente ragione, sono d'accordo al 100% con te.
Soprattutto quando usi il termine che una persona lo "debba fare". Qui tutti
prendiamo circa 20.000 euri da M$ per offrire supporto, e che caspita,
possibile che nessuno lo abbia ancora fatto!!!!
E aggiungo anche che ci sono centinaia di post nel ng che richiedono aiuto
sulle varie conversioni e nessuno abbia mai risposto picche
Tanto per citarne una:
http://groups.google.it/groups?hl=it&lr=&threadm=hk9Qb.174264%24_P.6129248%4
0news4.tin.it
&rnum=13&prev=/groups%3Fq%3Desempio%2Bsito%2Bcomune%2Baccess%2B
xp%26hl%3Dit%26lr%3D%26group%3Dit.comp.appl.access%26start%3D10%26sa%3DN
> Per quanto riguarda invece le risposte di un Webmaster, più che
> argomentazioni, le considero come reiterate offese personali e del tutto
> gratuite.
Cerca di moderare un tantino i toni, nessuno penso volesse offendere, qui
nessuno piglia soldi, e nessuno "deve" fare qualcosa
> distinti saluti giorgio
Ciao,
Massimo


title: OT:  SITO COMUNE aggiornato (replica)

text:
"Sergio MAZZA"
> No, è quì che casca l'asino; non ho nulla di pronto perché faccio prima a
> rifare tutto che riadattare qualcosa fatto per un altro che aveva tutto un
> suo modo di vedere la sua attività.
> Immagino che ti si siano rizzati i capelli, ma non ti è mai capitato di
> trovarti una persona che ti dice: "... Ho comprato quel programma da
quella
> Ditta che fa quella tal cosa, ma non mi soddisfa perché mi piacerebbe che
> facesse così, cosà..."; io dico che la forza di chiunque lavori in questo
> campo è proprio questa, la possibilità di creare l'applicazione proprio
come
> vuole lui...
> Altrimenti basterebbe andare dal giornalaio e spendere 50 euri, cosa che
> dico sempre a chiunque mi chieda qualcosa a "poco prezzo".
> P.S. Oh! Se ti annoia la discussione dillo eh? Non farti scrupoli...
:-)
Ciao.


title: OT:  SITO COMUNE aggiornato (replica)

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> wrote in message
news:cs5sir$gr9$
1...@canarie.caspur.it
[CUT]
>
> P.S. Oh! Se ti annoia la discussione dillo eh? Non farti scrupoli...
Io non mi faccio scrupoli di solito...!!!
Ma non mi annoia.
Io sono a metà strada, non uso/posseggo ODE ma uso MDE.
Portarsi appresso un MDB per lavorarci per convertirlo
è il minore dei problemi, dato che l'utente anche nel
mio caso ha Office...!
La chiavetta ora è una delle cose più belle...!
Noiosi.



title: "Memoria insufficiente" e funzione suggeritami : KO !!!

author: Staba Raimondo

text:
Ciao a tutti. Ringrazio infinitamente Goose e tutti
per le tempestive risposte riguardo al problema
della "Memoria insufficiente" quando apro il codice
visual basic.
Purtroppo a me il problema sussiste anche con
l'aggiunta della funzione closeallmodules (ma se non
viene richiamata, come funziona? eppoi il problema
appare subito all'apertura del codice, non si puo'
mica intercettare ?).
Raramente riesco ad aprire il codice, ma piu' spesso
no, sigh....
Uno sviluppatore triste vi saluta e vi fara' sapere se
scoprira' l'arcano...
Ancora un salutone a tutti voi, siete in gamba e
disponibili ...
__________________________________________________
Do You Yahoo!?
Make international calls for as low as $.04/minute with Yahoo! Messenger
http://phonecard.yahoo.com/
--
Posted from
web12507.mail.yahoo.com
 [216.136.173.199]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


author: oliones

text:
Staba Raimondo <
fcr_c...@yahoo.com
> wrote in message
2001072720384...@web12507.mail.yahoo.com...
> Ciao a tutti. Ringrazio infinitamente Goose e tutti
> per le tempestive risposte riguardo al problema
> della "Memoria insufficiente" quando apro il codice
> visual basic.
> Purtroppo a me il problema sussiste anche con
> l'aggiunta della funzione closeallmodules (ma se non
> viene richiamata, come funziona? eppoi il problema
> appare subito all'apertura del codice, non si puo'
> mica intercettare ?).
ma sta cacchio de funzione (post R: Aiuto vi prego : Memoria insufficiente e
limiti di Access ) parte da sola o non parte proprio ?????
e se parte come ?
ciao


author: Arturo

text:
"> ma sta cacchio de funzione (post R: Aiuto vi prego : Memoria
insufficiente e
> limiti di Access ) parte da sola o non parte proprio ?????
> e se parte come ?
> ciao
Non ho voluto insistere ma, a mio modestissimo parere, nessuna funzione
parte da sola (a che pro?). Per farla partire occorre richiamarla
nell'autoexec e poi viene eseguita una (e una sola) volta a meno di altri
richiami specifici.
Riguardo il codice in eccesso ci può essere del codice appartenente a dei
controlli eliminati che è ancora vivo. Bisogna controllare maschera per
maschera (io faccio così), con un modulo della scheda aperto si seleziona
nel menù a casellacombinata in alto a destra "generale", e si clicca sui
codici dal primo in poi, se resta la scritta "generale" vuol dire che quel
codice non è più associato a un controllo e può essere cancellato,
altrimenti sempre nella casella suddetta compare il controllo a cui è
associato il codice.
Comunque quel "memoria insufficiente" sa molto di un errore nel database, si
potrebbe provare a creare un database nuovo e importare tutto il vecchio, a
volte in questo modo scompaiono quegli errori che con il compattamento non
vengono scovati.
Ciao
Arturo


author: Federico Luciani

text:
Arturo wrote:
> "> ma sta cacchio de funzione (post R: Aiuto vi prego : Memoria
> insufficiente e
> > limiti di Access ) parte da sola o non parte proprio ?????
> > e se parte come ?
> > ciao
>
> Non ho voluto insistere ma, a mio modestissimo parere, nessuna funzione
> parte da sola (a che pro?). Per farla partire occorre richiamarla
> nell'autoexec e poi viene eseguita una (e una sola) volta a meno di altri
> richiami specifici.
nel caso specifico non ha senso farla partire con l'autoexec, visto che
all'apertura del mdb tutti i moduli sono sicuramente chiusi. ;-)
se proprio serve, basta farla partire inserendo una voce di menu.
naturalmente a lavoro ultimato va eliminata, sia la funzione che il
menu.
--
Federico
----------------------------------
Rimuovi paperino. per e-mail
----------------------------------
Tutte le richieste che arrivano
in privato, vengono cestinate.
----------------------------------
Sito Comune di it.comp.appl.access
http://www.sitocomune.com
mailto:
webm...@sitocomune.com
----------------------------------


title: Aiuto ! Come si fa a fare una query cosi ????

author: radicale 001

text:
Ho una tabella con le date di nascita delle persone.
Devo fare una query che estrae tutti quelli e solo quelli
il cui *compleanno* cade tra due date note, diciamo
di e df, che non sono fisse, ma vengono date esogenamente.
Con di < df.
Il problema e' quando di appartiene ad un certo anno e df a
quello successivo (al massimo un anno di differenza).
Ho paura di dover fare una query diversa a seconda se
di e df appartengono allo stesso anno oppure no.
Se appartengono allo stesso anno dovro' fare :
select * from ... where
(di <= cdate(dx))  and (cdate(dx) <= df)
dove :
dx = cdate(day(dt_nascita) & "/"  _
         & month(dt_nascita) & "/"  _
         & year (date)
Se invece non appartengono allo stesso anno dovro spezzare
in due periodi :
di , dy , df
con dy = cdate("31/12/" & year(date) )
e poi fare :
select * from ... where
(di <= cdate(dx) and cdate(dx) <= dy) OR
(dy < cdate(dz) and cdate(dz) <= df)
dove ancora
dx = cdate(day(dt_nascita) & "/"  _
          & month(dt_nascita) & "/" _
          & year (date)
ma invece :
dz = cdate(day(dt_nascita) & "/"  _
         & month(dt_nascita) & "/"  _
         & (year (date) + 1)
Dovrebbe funzionare, ma non c'e' un modo piu' semplice e diretto ?
Grazie !


author: Pablitomf (da casa)

text: Between.... And...


text:
On 29 Set, 23:40, "Pablitomf \(da casa\)" <
pablit...@hotmail.it
>
wrote:
> Between.... And...
Eh ?


author: Antonio Biso

text:
"radicale 001" <
radica...@gmail.com
> ha scritto nel messaggio
news:459a69ac-3e52-4ad2...@26g2000yqv.googlegroups.com...
ma soprattutto come si fa a fare un post con un subject così poco
significativo???
Antonio


text:
On 30 Set, 00:19, "Antonio Biso" <
ab...@libero.it
> wrote:
> ma soprattutto come si fa a fare un post con un subject così poco
> significativo???
E' perche' sono un po' stupido, scusami tanto.


text:
"radicale 001" <
radica...@gmail.com
> ha scritto nel messaggio
news:e32f72a3-832f-466f...@k10g2000yqa.googlegroups.com...

SELECT
    Nome_Colonna
FROM
     Nome_Tabella
WHERE
    Nome_Colonna BETWEEN valore1 AND valore2


text:
On 30 Set, 00:38, "Pablitomf \(da casa\)" <
pablit...@hotmail.it
>
wrote:
> SELECT
>     Nome_Colonna
> FROM
>      Nome_Tabella
> WHERE
>     Nome_Colonna BETWEEN valore1 AND valore2
Ah ... Ok. Grazie.


author: pablitomf

text:
On 30 Set, 00:19, "Antonio Biso" <
ab...@libero.it
> wrote:
> "radicale 001" <
radicale....@gmail.com
> ha scritto nel messaggionews:459a69ac-3e52-4ad2...@26g2000yqv.googlegroups.com...
>
> ma soprattutto come si fa a fare un post con un subject così poco
> significativo???
>
> Antonio
Antò, dai tempi del nostro primo "raduno" Salernitano ne è passata di
acqua sotto ai ponti... tu stai ancora a spaccà er capello? :D :D


text:
"pablitomf" <
pabl...@virgilio.it
> ha scritto nel messaggio
news:74110ade-e716-43e9...@m15g2000yqm.googlegroups.com...


Chi si ritira dalla lotta...
e poi ogni anno c'è il corso nuovo, vanno istruite le nuove leve
Antonio


text:
On 30 Set, 08:16, "Antonio Biso" <
ab...@libero.it
> wrote:
> "pablitomf" <
pablit...@virgilio.it
> ha scritto nel messaggionews:74110ade-e716-43e9...@m15g2000yqm.googlegroups.com...
> On 30 Set, 00:19, "Antonio Biso" <
ab...@libero.it
> wrote:
>
> > "radicale 001" <
radicale....@gmail.com
> ha scritto nel
> > messaggionews:459a69ac-3e52-4ad2...@26g2000yqv.googlegroups.com...
>
> > ma soprattutto come si fa a fare un post con un subject così poco
> > significativo???
>
> > Antonio
>
> Antò, dai tempi del nostro primo "raduno" Salernitano ne è passata di
> acqua sotto ai ponti... tu stai ancora a spaccà er capello? :D :D
>
> Chi si ritira dalla lotta...
> e poi ogni anno c'è il corso nuovo, vanno istruite le nuove leve
...il progetto "palestra" ti ha reso nuovamente personal trainer, o ti
stai "inGELMINIando" ? :D
bentornato Antò...


title: Tariffa programmi

author: Dome

text:
Ciao a tutti,
devo realizzare un db per un negozio e non ho nessuna idea riguardo a quanto
devo chiedere come compenso.
Il proprietario mi ha proposto di iniziare il lavoro e continuarlo un pò per
volta, insomma non ha la necessità di avere il prodotto finito subito.
Se dovessi farmi pagare a ora, quanto dovrei chiedere?
Grazie per l'attenzione,
Dome


title: Tariffa programmi

author: Carlo Ve

text:
Dome <
bell...@yahoo.com
> wrote in message
98rglu$hdi$1...@serv1.albacom.net...

da L. 1.000 a L. 110.000 ora
non esiste un tariffario "nazionale" degli sviluppatori di Access
le variabili possono essere diverse
* dalla qualita' del lavoro che fai
* da quanto bravo sei a lavorare e a risolvergli i problemi
   (che magari altri  programmi non riescono a farlo)
* da quanto interessa a te fare quel lavoro magari per farti esperienza
* dal fatto che il programma lo potresti vendere anche ad altri
e altro ancora
Carlo Ve


title: Arrestare esecuzione query su Access 2003

author: Leonardo

text:
Buongiorno amici,
avrei bisogno che al momento di fare clic sul pulsante "Mod_Dep" mi
uscisse un messaggio di avviso che mi dice "Attenzione, vuoi
modificare il codice deposito?" con l'opzione si/no, e nel caso di Si
la macro deve partire e lanciare la query di esecuzione, nel caso di
No la macro di deve interrompere.
Grazie sempre per l'aiuto.
Leo


author: max

text:
"Leonardo" <
esposi...@gmail.com
> ha scritto nel messaggio
news:bfcfafe1-96b9-4579...@m38g2000yqd.googlegroups.com...

sul click del pulsante
If MsgBox("Attenzione, vuoi modificare il codice deposito?" vbYesNo) = vbYes
Then
esegui macro
else
msgbox "hai deciso di non modificare il codice deposito"
end if
ciao
max


text:
On 10 Dic, 10:29, "max" <
pi...@pippo.it
> wrote:
> "Leonardo" <
esposito.l...@gmail.com
> ha scritto nel messaggionews:bfcfafe1-96b9-4579...@m38g2000yqd.googlegroups.com...

grazie Max
ciao


title: =IIf(Date()>#31/12/2004#;[D04];" ") =  Errore

text:
Tutto questo in una casella di testo di un report
perchè ???
--
-------------------------------------------------------------
se vuoi scrivermi sostituisci tiscali con yahoo
ciao


author: Sergio MAZZA

text:
"Aristotele64" <
aristo...@tiscali.it
> ha scritto nel messaggio
news:2ga2kr...@uni-berlin.de...
> Tutto questo in una casella di testo di un report
>
>
> perchè ???
>
1) controlla che il nome della casella di testo (non associata) non
corrisponda ad un nome di campo;
2) prova con: =IIf(Date()>CDate("31/12/2004");[D04];Null) sperando che [D04]
sia una data;
3) scrivi un oggetto descrittivo del problema, non il codice; grazie.
Ciao.
--
Sergio MAZZA


text:
>
> 1) controlla che il nome della casella di testo (non associata) non
> corrisponda ad un nome di campo;
> 2) prova con: =IIf(Date()>CDate("31/12/2004");[D04];Null) sperando che
[D04]
> sia una data;
grazie
> 3) scrivi un oggetto descrittivo del problema, non il codice; grazie.
ok !
> Ciao.
ciao


title: Scelta dell cassetto stampante da VB

author: MICHELE

text:
Salve,
in un programma di stampe grafiche per as400 quando ricevo una
richiesta di stampa da un utente individuo il nome della stampante e
la rendo la stampante predefinita, poi lancio normlamente la stampa
nel seguente modo:
Dim stDocName As String
stDocName = nomereport
DoCmd.OpenReport stDocName, acNormal
Vi è la possibilità di scegliere il cassetto dal quale prelevare la
carta?
Non vorrei creare 4 REPORT identici uno per il cassetto 1 , uno per il
cassetto 2 , uno per il cassetto 3 e uno per il bypass
Grazie per l'attenzione


title: Scelta dell cassetto stampante da VB

author: sv

text:
MICHELE ha scritto:
> Salve,
> in un programma di stampe grafiche per as400 quando ricevo una
> richiesta di stampa da un utente individuo il nome della stampante e
> la rendo la stampante predefinita, poi lancio normlamente la stampa
> nel seguente modo:
> Dim stDocName As String
> stDocName = nomereport
> DoCmd.OpenReport stDocName, acNormal
> Vi � la possibilit� di scegliere il cassetto dal quale prelevare la
> carta?
> Non vorrei creare 4 REPORT identici uno per il cassetto 1 , uno per il
> cassetto 2 , uno per il cassetto 3 e uno per il bypass
> Grazie per l'attenzione
Vedi:
www.donkarl.com/it?FAQ5.1
--
sv
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Scelta dell cassetto stampante da VB

text:
>
www.donkarl.com/it?FAQ5.1
Ti ringrazio,
ho provato nel seguente modo
1) ho creato la funzione:
Sub setPaperSource(rptName As String, CASSETTO As Integer)
   Dim Rpt As Report
   Dim dm As zwtDeviceMode
   Dim DevString As zwtDevModeStr
   Dim DevModeExtra As String
    DoCmd.SetWarnings False
   ' Set Paper Tray for page 1
   DoCmd.OpenReport rptName, acViewDesign
   Set Rpt = Reports(rptName)
   DevModeExtra = Rpt.PrtDevMode
   DevString.RGB = DevModeExtra
   LSet dm = DevString
   dm.dmDefaultSource = CASSETTO                     ' è la variavile
contenente il numero del cassetto dal quale prelevare la carta.
   LSet DevString = dm
   Mid$(DevModeExtra, 1, 68) = DevString.RGB
   Rpt.PrtDevMode = DevModeExtra
   DoCmd.Save acReport, Rpt.Name
   DoCmd.SelectObject acReport, Rpt.Name, True
   DoCmd.PrintOut acPages, 1, 1
   DoCmd.Close
End Sub
2) ho creato un pulsante
Private Sub Comando0_Click()
Call setPaperSource("PROVA CASSETTO", 2)
End Sub
Funziona correttamente ma con il run-time  dà errore e si chiude
l'applicazione,
perchè non ha la possibilità di andare in modalità struttura del
report.
C'è un modo per modificare il codice leggermete senza andare in
modalità struttura.
Grazie per l'attenzione


title: Scelta dell cassetto stampante da VB

text:
MICHELE ha scritto:
> >
www.donkarl.com/it?FAQ5.1




> End Sub


Non hai detto qual'è la tua versione di Access.
Da XP in poi c'è l'oggetto Printer..
Vedi:
http://support.microsoft.com/?kbid=284286



title: Scelta dell cassetto stampante da VB

text:
> Non hai detto qual' la tua versione di Access.
> Da XP in poi c' l'oggetto Printer..
>
> Vedi:
http://support.microsoft.com/?kbid=284286
Ti ringrazio ancora,
E' la seconda volta che leggo il tuo messaggio quando sono arrivato
alle tue conclusioni ...:-)
Non avevo letto l'articolo ma cercando nei vari post sono arrivato a
questo codice:
Sub SCEGLI_CASSETTO_E_STAMPA(rptName As String, CASSETTO As Integer)
Dim Rpt As Report
DoCmd.OpenReport rptName, acViewPreview, , , acHidden
Set Rpt = Reports(rptName)
    With Rpt.Printer
        .PaperBin = CASSETTO
    End With
    DoCmd.OpenReport rptName, acViewNormal
    DoCmd.Close acReport, rptName, acSaveNo
End Sub
Private Sub Comando0_Click()
Call SCEGLI_CASSETTO_E_STAMPA("PROVA CASSETTO", 2)
End Sub
Questa funzione in una prima analisi sembra funzionare correttamente,
e verrà inserita in
un motorino di stampe grafiche per as400.
Vi è un modo per evitare che il report venga aperto o che venga aperto
in modo nascosto?
acHidden doveva nascondere il report..invece si apre e si chiude..
Ti ringrazio molto per la tua attenzione


title: Scelta dell cassetto stampante da VB

author: Carlo Costarella

text:
"MICHELE" <
mpa...@sis.it
> ha scritto nel messaggio
news:4f753b94-44e0-4f4b...@b35g2000yqi.googlegroups.com...
> Non hai detto qual' la tua versione di Access.
> Da XP in poi c' l'oggetto Printer..
>
> Vedi:
http://support.microsoft.com/?kbid=284286
Ti ringrazio ancora,
E' la seconda volta che leggo il tuo messaggio quando sono arrivato
alle tue conclusioni ...:-)
Non avevo letto l'articolo ma cercando nei vari post sono arrivato a
questo codice:
Sub SCEGLI_CASSETTO_E_STAMPA(rptName As String, CASSETTO As Integer)
Dim Rpt As Report
DoCmd.OpenReport rptName, acViewPreview, , , acHidden
Set Rpt = Reports(rptName)
    With Rpt.Printer
        .PaperBin = CASSETTO
    End With
    DoCmd.OpenReport rptName, acViewNormal
    DoCmd.Close acReport, rptName, acSaveNo
End Sub
Private Sub Comando0_Click()
Call SCEGLI_CASSETTO_E_STAMPA("PROVA CASSETTO", 2)
End Sub
Questa funzione in una prima analisi sembra funzionare correttamente,
e verr� inserita in
un motorino di stampe grafiche per as400.
Vi � un modo per evitare che il report venga aperto o che venga aperto
in modo nascosto?
acHidden doveva nascondere il report..invece si apre e si chiude..
Ti ringrazio molto per la tua attenzione
-------------------------------------------
Prova solo ad iconizzare il report:
DoCmd.OpenReport rptName, acViewPreview, , , acIcon
Ciao, Carlo


title: Scelta dell cassetto stampante da VB

text:
> Prova solo ad iconizzare il report:
> DoCmd.OpenReport rptName, acViewPreview, , , acIcon
>
> Ciao, Carlo
Purtroppo non cambia nulla... fa il solito lampo...( apre e chiude
rapidamente)
Grazie


title: eliminare i record senza figli

author: Paolo stambecco

text:
Scrivo per chiedere come si fa ad eliminare da una tabella solo i record che
non hanno figli quando questa fa parte di un DB in cui è collegata con
integrità referenziale con le altre tabelle e quindi ogni volta che faccio
una query non mi appaiono tali record.
Grazie a chi mi può aiutare.


title: eliminare i record senza figli

author: principiante

text:
"Paolo stambecco" <
mie...@libero.it
> ha scritto nel messaggio
news:ogyP7.247878$sq5.12...@news.infostrada.it...

> Se hai impostato "EliminaRecordCorrelatiACatena" a no sulla proprietà del
Join,
 se selezioni tutti i record e premi "canc" ti elimina solo quelli che non
hanno figli
Paolo


title: eliminare i record senza figli

author: Roberto dal portatile

text:
"Paolo stambecco" <
mie...@libero.it
> ha scritto nel messaggio
news:ogyP7.247878$sq5.12...@news.infostrada.it...

Nella query dove metti in join la tabella del lato uno con la tabella del
lato molti, scegli come tipo di join INNER o RIGHT.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Maschere diverse all'avvio in funzione del gruppo di utenti

author: MagicRat

text:
Il mio database richiede di poter aprire in automatico all'avvio una
daterminata maschera in funzione dell'utente che richiede il login.
Ho impostato la sicurezza di Access, quindi ho tre gruppi (utenti,
analisti, amministratori). L'utente che esegue il login appartiene ad
uno di questi tre gruppi, e in funzione del suo gruppo ha una sua
maschera per accesso dati. Come risolvo il problema?
Grazie mille x l'aiuto


title: Re: mantenere disponibili le office library 10.0

author: BFS

text:
Il 19/09/2013 00:09, tmtube ha scritto:
> mi capita di essere da un cliente con office xp e in quel caso nei
> riferimenti del db includo le microsoft office library 10.0
> poi da me ho solo le 14.0 e allora includo quelle poi copiando il db di
> nuovo dal cliente non trova le 14.0 e allora devo rimodificare
> i riferimenti mettendo le 10.0
>
> non c'è un modo per avere entrambe sul pc e quindi selezionare quelle
> che ha il cliente finale e cioè le 10.0?
>
> grazie a tutti.

usa il late binding per svincolarti dalla versione delle librerie office

http://msofficefun.wordpress.com/2011/02/26/early-binding-vs-late-binding-in-office-vba/

ciao!


author: tmtube

text:
>usa il late binding per svincolarti dalla versione delle librerie office

>
http://msofficefun.wordpress.com/2011/02/26/early-binding-vs-late-binding-in-office-vba/

>ciao!

grazie, non ho capito molto, anche per il mio scarso inglese, qualcuno sa
spiegarmi di cosa si tratta e come modificare il mio db per svincolarmi
definitivamente dalla versione delle office library?

grazie anticipatamente a tutti.


text:
 LATEBINDING Vs EARLYBINDING

    Ci sono 2 modi per sfruttare OLE Automation al fine di controllare applicazioni esterne(che ovviamente espongono un'interfaccia OLE)

    1) LATE BINDING (Associazione Tardiva) che sfruttando il metodo CreateObject(per istanziare un oggetto nuovo)
    o GetObject(per usare l'istanza di un'oggetto già aperto).

    Questo metodo non fa esplicito riferimento ad una Libreria, ma lascia l'autonomia al
    sistema di istanziare il riferimento più recente di quel SERVER di Automazione.
    NON SERVONO RIFERIMENTI A LIBRERIE ESTERNE.

    Esempio di codice in modalità LATEBINDING per istanziare un'oggetto EXCEL:
    codice:

            Dim xlApp As Object
            Set xlApp = CreateObject("Excel.Application")
            xlApp.Workbooks.Open "c:\NomeFile.xls"

    Oppure apriamo l'istanza di Excel già in esecuzione:
    codice:

            Dim xlApp As Object
            Set xlApp = GetObject("c:\NomeFile.xls")

    La variabile Oggetto [xlApp] ora contiene un'istanza di Excel nuova o preesistente.
    Chiaramente se si cerca di usare il GetObject e non esiste nessuna istanza del Server di Automazione(EXCEL in questo caso) verrà
    restituito un'errore Err=429, gestendo il quale si prevengono inceppamenti, in quanto si tenta di usare GETOBJECT, si intercetta l'errore 429 ed in tal caso si
    ricorre al CREATEOBJECT.

    VANTAGGI:
    Non richiedendo riferimenti fissi, su qualsiasi macchina venga eseguito il codice, anche se presenti VERSIONI di SERVER OLE diverse.
    Il LATEBINDING è definito VERSION INDIPENDENT.
    Notevole miglioria soprattutto per distribuzioni MDE che non richiederà lo scroll della collection REFERENCES con il Check della propery
    ISBROKEN o BROKENREFERENCE membro di Application per poi caricarle RUNTIME, ma questo richiede la selezione del File SERVER OLE, quindi altro Codice.

    SVANTAGGI:
    Gli oggetti dichiarati in LATEBINDING non consentono di esporre gli EVENTI, quindi se si devono intercettare EVENTI dell'oggetto EXCEL da Access
    è impossibile con questa tecnica.
    Gli oggetti dichiarati in LATEBINDING non consentono l'elenco di Metodi/Proprietà come in VBEditor è normale vedere con l'uso dell'Intellisense.
    Gli oggetti dichiarati in LATEBINDING non consentono di usare le costanti appartenenti a quella Application in quanto non inseriti.
    Gli oggetti dichiarati in LATEBINDING non consentono l'accesso all'HELP specifico della Libreria.

    2) EARLY BINDING (Associazione Preventiva)
    Questo metodo invece richiede l'esplicito riferimento al SERVER di AUTOMAZIONE, che dovrà essere inserito nelle LIBRERIE di riferimento del progetto.
    Esempio di codice in modalità EARLYBINDING per istanziare un'oggetto EXCEL:
    codice:

            Dim xlApp As New Excel.Application
            Set xlApp = New Excel.Application
            xlApp.Workbooks.Open "c:\NomeFile.xls"

    VANTAGGI:
    E' leggermente più veloce l'istanza dell'oggetto in quanto non serve la ricerca del SERVER OLE, che è già definito
    Possiamo ereditare EVENTI.
    Possiamo accedere all'uso delle Costanti.
    Possiamo avere, tramite Intellisense da VBeditor, l'elenco di Metodi/Proprietà/Eventi.
    Possiamo accedere all'HELP della libreria.

    SVANTAGGI:
    Il più grosso svantaggio, che però pesa a tal punto da rendere sconveniente questo metodo nonostante i numerosi vantaggi, è il
    fatto che proprio per essere VERSION DIPENDENT, è come avere le mani legate, quindi le librerie del PC di sviluppo dovranno
    essere le stesse di quelle del PC di destinazione, cosa non sempre possibile.

    In conclusinoe, se non si devono ereditare eventi, il suggerimento è di far riferimento SEMPRE alla tecncia LATEBINDING, ma, in fase di sviluppo
    è stupido rinunciare ai VANTAGGI di EARLYBINDING, quindi il mio consiglio è di sviluppare inserendo i RIFERIMENTI, e prima di distribuire
    toglierli, inserendo la parte di codice per l'istanza in LATEBINDING sostituendo l'assegnazione delle Variabili da esplicito ad Object.

@Alex


title: record maggiori zero...

author: ^alex^

text:
Buongiorno a Tutti!!!!!
Ho un db composto come segue:
- Id
- data (gg/mm/aa)
- Campo 1
- Campo 2
- Campo 3
devo visualizzare,attraverso una query solamente i valori di campo 1,2
e 3 maggiori di zero
es.
- data 03/10/02
- Campo 1: 5
- Campo 2: 0
- Campo 3: 6
risultato query:
data 03/10/02
Campo 1:5
Campo 2:6
-----------------------------------------------
Ho già provato a mettere nei criteri Is Not Null ma non ha dato i
rislutati sperati...
grazie...


title: record maggiori zero...

author: Valerio Valentini

text:
"^alex^" <
alex...@yahoo.it
> ha scritto nel messaggio
news:b2283554.02100...@posting.google.com...

Ma un semplice >0 non era più facile?
Ciao Valerio


title: record maggiori zero...

author: Maurizio Borrelli

text:
> "^alex^" news:b2283554.02100...@posting.google.com...:

    Apparentemente la tua domanda non ha senso.
    Perche' la visualizzazione di una query ha una forma tabellare, caselle
disposte in righe e colonne, e non e' possibile *non visualizzare* alcune
caselle.
    Cio' che desideri fare e' invece possibile mediante una maschera.
Intendevi forse questo?
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


title: query - where mettere risultato altra query

author: pfm

text:
SALVE

da un elenco dei codici postali estraggo un elenco

Select cap from TabCAP where Like "12*"

ora vorrei estrapolare dalla tabella RUBRICA quelli che hanno il campo CAP = al gruppo di record della select precedente

SELECT CAP , COGNOME , NOME FROM RUBRICA WHERE CAP = "Select cap from TabCAP where Like "12*"

COME POSSO mettere nel criterio la prima query ?

grazie


text:

Si può usare la CLAUSOLA IN...

VEdi questo:
http://www.sqlitetutorial.net/sqlite-in/

Traducendo...:

SELECT *
FROM RUBRICA
WHERE CAP IN (Select cap from TabCAP where Like "12*")
ORDER BY [Elenco Campi Se serve][DESC se serve]

@Alex


text: Grazie molto gentile


author: Karl Donaubauer

text:
Salve,

@Alex:
> pfm ha scritto:
>>
>> da un elenco dei codici postali estraggo un elenco
>>
>> Select cap from TabCAP where Like "12*"
>>
>> ora vorrei estrapolare dalla tabella RUBRICA quelli che hanno il campo CAP = al gruppo di record della select precedente
>>
>> SELECT CAP , COGNOME , NOME FROM RUBRICA WHERE CAP = "Select cap from TabCAP where Like "12*"
>>
>> COME POSSO mettere nel criterio la prima query ?
>
> Si può usare la CLAUSOLA IN...
> ...
> SELECT *
> FROM RUBRICA
> WHERE CAP IN (Select cap from TabCAP where Like "12*")
> ...
Suppongo che la domanda è una "parafrasi". Altrimenti certo si farebbe:

SELECT CAP... FROM RUBRICA WHERE CAP Like "12*"

Dipende da come lontano la parafrasi è dalla realtà, ma se possibile
tenta di evitare IN a favore di un più veloce JOIN:

SELECT CAP... FROM RUBRICA AS A
    INNER JOIN (Select CAP FROM TabCAP WHERE CAP Like "12*") AS B
	ON A.CAP = B.CAP

--
Ciao
Karl
*********
http://www.AccessDevCon.com

Access FAQ:
http://www.donkarl.com/it


text:
Karl Donaubauer:
> ...
> Dipende da come lontano la parafrasi è dalla realtà, ma se possibile
> tenta di evitare IN a favore di un più veloce JOIN:
>
> SELECT CAP... FROM RUBRICA AS A
>     INNER JOIN (Select CAP FROM TabCAP WHERE CAP Like "12*") AS B
>      ON A.CAP = B.CAP
>

Ah, dovrebb'essere

SELECT A.CAP... FROM RUBRICA AS A...

per evitare amgibuità.


text:
Ciao Karl,
Non so se sia parafrasi o meno... ma se non ha modo di usare lo stesso criterio evidentemente spero ci sia un motivo... altrimenti sarebbe strano...

Sul Join convengo con te... ma se il criterio dei CAP è gestito allora mi chiedo perché non ha usabile la prima ipotesi ...?

Lascio i miei dubbi...

@Alex


text:
Grazie leggo solo adesso tutto il thread.
In effetti ho fatto un esempio ma il tema é più complesso.
In effetti mi serve IN


title: Rowsource di grafico in report [A97]

author: Vulcanbrain

text:
Chiedo scusa perchè sto ripostando una domanda di una settimana fa alla
quale ho ricevuto una risposta di Karl. Forse ora, rispiegando il tutto,
potrete aiutarmi più facilmente!
Dunque, in una maschera sono presenti due grafici, che visualizzano
rispettivamente la precisione e l'accuratezza di una specifica analisi
di laboratorio.
Il rowsource dei due grafici si genera in funzione delle scelte
impostate sulla maschera in vari controlli.
Io ho la necessità di avere un report i due grafici, così ho pensato
di aprire in struttura un report, di copiare-incollare i due grafici
senza indicare il loro rowsource.
Per passare dinamicamente il rowsource ora come devo fare? Ho provato
a mettere del codice in apertura del report in cui assegna il
rowsource (pescato dai 2 grafici sulla maschera) ai due grafici sul
report, ma non mi permette di operare.
Karl suggeriva di mettere il codice nell'evento Su formattazione e....
In effetti ci ho provato, ma ti spiego:
ci sono due grafici e, per farli 'disegnare' tutti e due, li ho messi in due
sezioni differenti (anche se li vorrei affiancati nel corpo del report), e
nell'evento 'su formattazione', dalla maschera delle proprietà dell'oggetto,
ho scritto
=Origin()
e
=OriginPr()
che sono due funzioni su un modulo che prendono il rowsource dai grafici
sulla maschera e li sparano a quelli sul report.
Ora il problema è che la cosa funge, ma a singhiozzo! Ovvero, aprendo il
report dalla maschera, 9 volte su 10 almeno uno dei due grafici è in bianco,
se non tutti e due.
Il bello è che non restituisce alcun errore, e non c'è alcuna gestione
dell'errore nelle due funzioni di cui sopra...
Ti allego una delle due:
Public Function Origin()
Dim ssQl
ssQl = Forms![mskAccuIns]![grf].RowSource
Origin = ssQl
End Function
Grazie per la collaborazione!


title: Rowsource di grafico in report [A97]

text:
Vulcanbrain wrote:
> ...
> ci sono due grafici e, per farli 'disegnare' tutti e due, li ho messi
> in due sezioni differenti (anche se li vorrei affiancati nel corpo
> del report), e nell'evento 'su formattazione', dalla maschera delle
> proprietà dell'oggetto, ho scritto
> =Origin()
> e
> =OriginPr()
> che sono due funzioni su un modulo che prendono il rowsource dai
> grafici sulla maschera e li sparano a quelli sul report.
> Ora il problema è che la cosa funge, ma a singhiozzo! Ovvero, aprendo
> il report dalla maschera, 9 volte su 10 almeno uno dei due grafici è
> in bianco, se non tutti e due.
> Il bello è che non restituisce alcun errore, e non c'è alcuna gestione
> dell'errore nelle due funzioni di cui sopra...
> Ti allego una delle due:
>
> Public Function Origin()
> Dim ssQl
> ssQl = Forms![mskAccuIns]![grf].RowSource
> Origin = ssQl
> End Function
Non credo che ho capito tutto. p.e. non so in quale tipo di sezione
si trovano i tuoi grafici, se sono presente solo una volta nel
risultato o si ripetano con i record o gruppi, come sono i
RowSource in detaglio, quali e dove sono i campi o valori
riferite ecc.
Sembra un po' come un problema di sincronizzazione.
Cose che puoi provare:
Invece delle due funzioni su formattazione prova direttamente
Me!TuoGrafico.RowSource = Forms![mskAccuIns]![grf].RowSource
e/o
dopo l'assegnazione di un RowSource puoi provare
Me!TuoGrafico.Requery
o
Se i tuoi RowSource sono statement SQL puoi crearti
due query salvate. Il contenuto non importa molto.
Puo essere p.e. un RowSource tipico per il grafico.
Nella proprietà RowSource dei grafici scrivi fissamente il
nome della query salvata e in un evento giusto cambia l'SQL
delle query:
CurrentDb.QueryDefs("TuaQuery").SQL = _
                Forms![mskAccuIns]![grf].RowSource
L'evento giusto dipende delle domande soppra p.e.
di quando sai tutte le valore necessarie, dove si trovano
i grafici nel report, si ripetano o no... Forse è possibile
di cambiare l'SQL delle query già prima di aprire il report
p.e. con il bottone nella maschera che lancia il report.
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: Rowsource di grafico in report [A97]

text:
CUT
> Non credo che ho capito tutto. p.e. non so in quale tipo di sezione
> si trovano i tuoi grafici,
ho provato a metterne uno in Corpo e uno in Piè di Pagina etc... variando
ogni volta
> se sono presente solo una volta nel
> risultato o si ripetano con i record o gruppi, come sono i
> RowSource in detaglio, quali e dove sono i campi o valori
> riferite ecc.
>
> Sembra un po' come un problema di sincronizzazione.
> Cose che puoi provare:
>
> Invece delle due funzioni su formattazione prova direttamente
> Me!TuoGrafico.RowSource = Forms![mskAccuIns]![grf].RowSource
in questa situazione mi restituisce:
Errore di run-time '2455':
Riferimento non valido alla proprietà RowSource nell'espressione.
La proprietà non esiste o non è applicabile all'oggetto specificato.
E premendo debug mi si posiziona alla riga
Me!TuoGrafico.RowSource = Forms![mskAccuIns]![grf].RowSource
> e/o
> dopo l'assegnazione di un RowSource puoi provare
> Me!TuoGrafico.Requery
si blocca prima, dando l'errore di run-time di cui sopra
> o
> Se i tuoi RowSource sono statement SQL puoi crearti
> due query salvate. Il contenuto non importa molto.
> Puo essere p.e. un RowSource tipico per il grafico.
>
> Nella proprietà RowSource dei grafici scrivi fissamente il
> nome della query salvata e in un evento giusto cambia l'SQL
> delle query:
> CurrentDb.QueryDefs("TuaQuery").SQL = _
>                Forms![mskAccuIns]![grf].RowSource
>
ECCO LA SOLUZIONE SEI TROPPO MITICO KARL!!!!!!!!!
POSSO VENIRE A BACIARTI L'UNGHIA DEL POLLICIONE SINISTRO?????
DOVE STAI DI CASA, IN TIROLO?
ARRIVO ASPETTAMI...........................................................


title: Rowsource di grafico in report [A97]

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:2t4fe6F...@uni-berlin.de...
> Vulcanbrain wrote:
>> ...
>> POSSO VENIRE A BACIARTI L'UNGHIA DEL POLLICIONE SINISTRO?????
>> DOVE STAI DI CASA, IN TIROLO?
>
> Vienna
Sei Viennese? Ma hai origini italiane o cosa?
>
>> ARRIVO
> ASPETTAMI...........................................................
>
> Saro a Trieste per qualche giorno nella settimana prossima.
> Ma lě mi nascondero per non essere baciato dagli uomini
> sconosciuti.
>
> --
> :-)



title: formato del contatore

text:
ioa a tutti, sto creando un database con access 2002, premetto che le
mie conoscenze di VB sono scarse, ho creato una tabella che come chiave
primaria ha un campo che si chiama numero progressivo, vorrei che questo
campo avesse questo formato 00000/2004 e al passaggio di anno 3455/2005.
Spero di essermi spiegato bene.
                                               Andrea


title: formato del contatore

author: Gianni

text:
"The_Crow" <the_c...@SPAMieee.org> ha scritto nel messaggio
news:3B%pd.35977$B06....@news.edisontel.com...

potresti usare questo formato:
="" & Format(Date();"aaaa") & "/" &
Format(IIf(IsNull(DMax("[NumProgressivo]";"[Tabella1]";"[NumProgressivo]
like '" & Format(Date();"aaaa") &
"/????'"));1;Right(DMax("[NumProgressivo]";"[Tabella1]";"[NumProgressivo]
like '" & Format(Date();"aaaa") & "/????'");4)+1);"0000")
dove...Tabella1=tua tabella
ciaociao
Gianni


title: formato del contatore

author: MA

text:
"Gianni" <
giann...@hotmail.com
> ha scritto nel messaggio
news:AL%pd.53425$Ni.18...@twister1.libero.it...

Ciao Gianni, unica cosa cita le fonti.
MAssimiliano
>
>


title: Riallegare tb a BE

author: Napoleone

text:
Buongiorno,
mi auguro che in questo week end, riuscirò a ricollegare le tb "da codice"
al BE.
...
Parto dall'esempio del sito comune:
1.28 Riallegare tabelle Access (4) di  Alessandro Baraldi
...
Ho creato un Nuovo modulo LINKARE_TB
Ho creato una nuova macro che ho chiamato Autoexec.
Domanda:
Come faccio ad eseguire il codice VBA (del modulo) all'Avvio, tramite la
macro Autoexec?
Ciao e grazie
Napoleone


title: Riallegare tb a BE

author: Alessandro Baraldi

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:c6_Ef.76668$
eD5.1...@twister2.libero.it

Hai creato anche la Tabella "_LinkedTables"....?
Su macro auto exec puoi eseguire una funzione LinkTbl()
che erroneamente però è dichiarata Private(cambia in Public)
Quindi dalla macro Autoexec seleziona "EseguiCodice" quindi
scrivi sotto "=LinkTbl()"
Ricorda anche di riempire la tabella con il nome delle Tabelle
da Linkare..!
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Riallegare tb a BE

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:40daebfb00b1153058...@mygate.mailgate.org...
> "Napoleone" <
napole...@libero.it
> wrote in message
> news:c6_Ef.76668$
eD5.1...@twister2.libero.it
>
>> Buongiorno,
>> mi auguro che in questo week end, riuscirò a ricollegare le tb "da
>> codice"
>> al BE.
>> ...
>> Parto dall'esempio del sito comune:
>> 1.28 Riallegare tabelle Access (4) di  Alessandro Baraldi
>> ...
>> Ho creato un Nuovo modulo LINKARE_TB
>> Ho creato una nuova macro che ho chiamato Autoexec.
>> Domanda:
>> Come faccio ad eseguire il codice VBA (del modulo) all'Avvio, tramite la
>> macro Autoexec?
>>
>> Ciao e grazie
>> Napoleone
>
> Hai creato anche la Tabella "_LinkedTables"....?
>
> Su macro auto exec puoi eseguire una funzione LinkTbl()
> che erroneamente però è dichiarata Private(cambia in Public)
ho cambiato
...
Public Const fQuery = "Queries"
Public Const cLnkTbl As String = "_LinkedTables"
Public Function LinkTbl() As Boolean
   On Error GoTo Err_LinkTbl
...
> Quindi dalla macro Autoexec seleziona "EseguiCodice" quindi
> scrivi sotto "=LinkTbl()"
>
> Ricorda anche di riempire la tabella con il nome delle Tabelle
> da Linkare..!
> @Alex
>
Ciao Alex
sto creando la tb "_LinkedTables", come campi, bastano nometbella=testo e
Link=testo?
Napoleone


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:F8%Ef.76742$
eD5.1...@twister2.libero.it
> ho cambiato
> ...
> Public Const fQuery = "Queries"
>
> Public Const cLnkTbl As String = "_LinkedTables"
Queste costanti devono rimanere PRIVATE, l'unica cosa
da rendere Public era la Funzione, questa sotto:
> Public Function LinkTbl() As Boolean
>    On Error GoTo Err_LinkTbl
> >
> Ciao Alex
> sto creando la tb "_LinkedTables", come campi, bastano nometbella=testo e
> Link=testo?
>
> Napoleone
Perchč 2 campi, ne basta solo 1, il nome tabella, il PATH
lo devi passare alla funzione sotto:
DoCmd.TransferDatabase acLink, "Microsoft Access", _
      mPathBE, acTable, S, S
mPathBE deve contenere l'origine del BE.
Ciao



title: Riallegare tb a BE

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:cf952ea3224c58992c...@mygate.mailgate.org...
> "Napoleone" <
napole...@libero.it
> wrote in message
> news:F8%Ef.76742$
eD5.1...@twister2.libero.it
>
>
>> ho cambiato
>> ...
>> Public Const fQuery = "Queries"
>>
>> Public Const cLnkTbl As String = "_LinkedTables"
>
> Queste costanti devono rimanere PRIVATE, l'unica cosa
> da rendere Public era la Funzione, questa sotto:
>
>> Public Function LinkTbl() As Boolean
>>    On Error GoTo Err_LinkTbl
>
>
>
>> >
>> Ciao Alex
>> sto creando la tb "_LinkedTables", come campi, bastano nometbella=testo e
>> Link=testo?
>>
>> Napoleone
>
>
> Perchč 2 campi, ne basta solo 1, il nome tabella, il PATH
> lo devi passare alla funzione sotto:
>
> DoCmd.TransferDatabase acLink, "Microsoft Access", _
>      mPathBE, acTable, S, S
Supponiamo che il BE sia in C:\GECARD_BE, dovrei modificare
DoCmd.TransferDatabase acLink, "Microsoft Access", _
>      C:\GECARD_BE, acTable, S, S
> mPathBE deve contenere l'origine del BE.
>
> Ciao
> @Alex
>
..
Mentre leggevo, ho notato questa funzione, ma serve per inserire i nomi
nella tabella??
O la prima volta, lo debbo fare a mano :-))
..
Public Function FillTableName()
'  '_LinkedTable č da eliminare a mano.
'   Dim rs As DAO.Recordset
'   Dim rsTable As DAO.Recordset
'   Dim strSQL As String
'   CurrentDb.Execute "DELETE * FROM _LinkedTables;", dbFailOnError
'   strSQL = "SELECT MsysObjects.Name FROM MsysObjects " & _
'          "WHERE ((Left$([Name], 4) <> 'Msys') And (MsysObjects.Type = 6))"
'   Set rs = CurrentDb.OpenRecordset(strSQL, dbReadOnly)
'   Set rsTable = CurrentDb.OpenRecordset("_LinkedTables", dbOpenTable)
'   rs.MoveFirst
'   Do Until rs.EOF
'      rsTable.AddNew
'      rsTable.Fields(0) = rs.Fields(0)
'      rsTable.Update
'      rs.MoveNext
'   Loop
'   rs.Close
'   rsTable.Close
'   Set rs = Nothing
'   Set rsTable = Nothing
'End Function
Napoleone


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> ha scritto nel messaggio
news:c6_Ef.76668$eD5.1...@twister2.libero.it...

All'avvio del DB mi restituisce un msg:
Microsoft Office Access
Impossibile connettersi al server
Napoleone


title: Riallegare tb a BE

author: Bruno Campanini

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:kD%Ef.159857$65.44...@twister1.libero.it...
> All'avvio del DB mi restituisce un msg:
> Microsoft Office Access
> Impossibile connettersi al server
Ma tu lo stai vedendo il server?
Se dalla finestra CommandPrompt esegui Ping NomeServer
ottieni il collegamento col server?
Bruno


title: Riallegare tb a BE

text:
"Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
news:43e4c347$0$5996$4faf...@reader2.news.tin.it...

Attualmente le prove le sto facendo a casa, quindi il percorso è LOCALE:
C:\GECARD_BE\LINK.MDB
..Non va bene cosi?
Napoleone


title: Riallegare tb a BE

text:
"Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
news:43e4c347$0$5996$4faf...@reader2.news.tin.it...

ho creato, per meglio simulare, una nuova unitą di rete: K
cioč
Gecard_be (la mia cartella) in cui ho link.mdb
ma mi da sempre lo stesso errore.
Napoleone


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:_%3Ff.160242$65.44...@twister1.libero.it...
>> Bruno
> ho creato, per meglio simulare, una nuova unità di rete: K
>
> cioè
> Gecard_be (la mia cartella) in cui ho link.mdb
>
> ma mi da sempre lo stesso errore.
> Napoleone
Quindi nella circostanza il server non dovrebbe essere parte
in causa. Sei sicuro di aver il codice corretto?
Bruno


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> wrote in message
[CUT]
> Supponiamo che il BE sia in C:\GECARD_BE, dovrei modificare
> DoCmd.TransferDatabase acLink, "Microsoft Access", _
> >      C:\GECARD_BE, acTable, S, S
>
Ricorda che il percorso č una stringa e servono gli apici,
prova cosě:
DoCmd.TransferDatabase acLink, "Microsoft Access", _
    "C:\GECARD_BE", acTable, S, S
> ..
> Mentre leggevo, ho notato questa funzione, ma serve per inserire i nomi
> nella tabella??
> O la prima volta, lo debbo fare a mano :-))
Quella funzione serve soloi la PRIMA volta per non riempire la
Tabella a mano..., poi non la devi piů eseguire.
Io la eseguo dalla finestra immediata, poi la REMMO.
> Napoleone



title: Riallegare tb a BE

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:24aedce35929fc9629...@mygate.mailgate.org...
> "Napoleone" <
napole...@libero.it
> wrote in message
> [CUT]
>> Supponiamo che il BE sia in C:\GECARD_BE, dovrei modificare
>> DoCmd.TransferDatabase acLink, "Microsoft Access", _
>> >      C:\GECARD_BE, acTable, S, S
>>
>
> Ricorda che il percorso č una stringa e servono gli apici,
> prova cosě:
>
> DoCmd.TransferDatabase acLink, "Microsoft Access", _
>    "C:\GECARD_BE", acTable, S, S
Li avevo messi, adesso perň, ho cambiato in questo modo:
"K:\GECARD_BE\LINK.MDB", acTable, S, S
--- vorrei chiarto: In questo percorso, debbo mettere quello del db.BE o del
db che contiene le tabelle con i nomi delle tabelle da linkare, o soltanto
la cartella in cui č posizionato l'uno o l'atro?
>> ..
> Ciao
> @Alex
>
Napoleone


title: Riallegare tb a BE

text:
CUT
> Quindi nella circostanza il server non dovrebbe essere parte
> in causa. Sei sicuro di aver il codice corretto?
>
> Bruno
Ciao Bruno, per maggior chiarezza, ti allego il codice del modulo
-------------------------
Option Compare Database
Option Explicit
Public Const fForm = "Forms"
Public Const fReport = "Reports"
Public Const fMacro = "Scripts"
Public Const fModulo = "Modules"
Public Const fTabella = "Tables"
Public Const fQuery = "Queries"
Private Const cLnkTbl As String = "_LinkedTables"
Public Function LinkTbl() As Boolean
   On Error GoTo Err_LinkTbl
   Dim rs As DAO.Recordset
   Dim strSQL As String
   Dim dbCurr As DAO.Database
   Dim S As String
   LinkTbl = False
   Set dbCurr = CurrentDb
   strSQL = cLnkTbl
   dbCurr.TableDefs.Refresh
   Set rs = CurrentDb.OpenRecordset(strSQL)
   rs.MoveFirst
   Do Until rs.EOF
      S = rs.Fields(0).Value
      If Esiste_Oggetto(S, fTabella) Then _
            CurrentDb.TableDefs.Delete S
      DoCmd.TransferDatabase acLink, "Microsoft Access", _
      "K:\GECARD_BE\LINK.MDB", acTable, S, S
      rs.MoveNext
     MsgBox "ciao"
   Loop
   LinkTbl = True
Exit_Here:
   rs.Close
   Set rs = Nothing
   Exit Function
Err_LinkTbl:
   LinkTbl = False
   MsgBox "Impossibile connettersi al Server"
   Resume Exit_Here
End Function
Public Function Esiste_Oggetto(ByVal Nome_Ogg As String, _
                               Typ_Ogg As String, Optional ByVal Nome_Dbs As
String = "") As Boolean
'*****************************************************************
'Name      : Esiste_Oggetto (Function)
'Purpose   : Verifie if Database Object(Table, Query, Form or ...) Exist
'Author    : Alessandro Baraldi
'Web_Site  :
http://digilander.iol.it/ik2zok/
'E.Mail    :
ik2...@libero.it
'Date      : 23 gennaio 2002
'Called by :
'Calls     :
'Inputs    : String=Object Name
'          : Type="Tables" or "Forms" or "Queries"
'          :      "Scripts" or "Reports" or "Modules"
'          : Nome_Dbs=Database.mdb (Source where Function search)
'Output    : True if Object Exist
'*****************************************************************
   Dim dbs As Database
   Dim tdf As TableDef
   Dim qdf As QueryDef
   Dim X, num_ogg As Integer
   If Nome_Dbs = "" Then
      Set dbs = CurrentDb
   Else
      Set dbs = OpenDatabase(Nome_Dbs)
   End If
   Select Case Typ_Ogg
      Case fTabella
         For Each tdf In dbs.TableDefs
            If tdf.Name = Nome_Ogg Then
               Esiste_Oggetto = True
               dbs.Close
               Set dbs = Nothing
               Exit Function
            End If
         Next tdf
      Case fQuery
         For Each qdf In dbs.QueryDefs
            If qdf.Name = Nome_Ogg Then
               Esiste_Oggetto = True
               dbs.Close
               Set dbs = Nothing
               Exit Function
            End If
           Next qdf
      Case fForm, fModulo, fMacro, fReport
        num_ogg = dbs.Containers(Typ_Ogg).Documents.Count
        For X = 0 To num_ogg - 1
           If dbs.Containers(Typ_Ogg).Documents(X).Name = Nome_Ogg Then
             Esiste_Oggetto = True
             dbs.Close
             Set dbs = Nothing
             Exit Function
           End If
        Next
   End Select
Esci:
   Esiste_Oggetto = False
   dbs.Close
   Set dbs = Nothing
End Function
--------------------------------fine------------------
codice della macro AUTOEXEC
esegui codice > =LinkTbl()
-----------------------------------
...speriamo bene!
Napoleone


title: Riallegare tb a BE

text:
Nella mia maschera Util, sul click del bottone, ho inserito il codice che mi
dovrebbe popolare la tabella con i nomi delle tabelle da linkare, ma non lo
fà.
Mi segnala operazione non valida
-----------------------------------------
Private Sub Comando107_Click()
On Error GoTo Err_Comando107_Click
 Dim rs As DAO.Recordset
   Dim rsTable As DAO.Recordset
   Dim strSQL As String
   CurrentDb.Execute "DELETE * FROM _LinkedTables;", dbFailOnError
   strSQL = "SELECT MsysObjects.Name FROM MsysObjects " & _
          "WHERE ((Left$([Name], 4) <> 'Msys') And (MsysObjects.Type = 6))"
   Set rs = CurrentDb.OpenRecordset(strSQL, dbReadOnly)
   Set rsTable = CurrentDb.OpenRecordset("_LinkedTables", dbOpenTable)
   rs.MoveFirst
   Do Until rs.EOF
      rsTable.AddNew
      rsTable.Fields(0) = rs.Fields(0)
      rsTable.Update
      rs.MoveNext
   Loop
   rs.Close
   rsTable.Close
   Set rs = Nothing
   Set rsTable = Nothing
Exit_Comando107_Click:
    Exit Sub
Err_Comando107_Click:
    MsgBox Err.Description
    Resume Exit_Comando107_Click
End Sub
-----------------------------------
Napoleone


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:aD6Ff.77420$
eD5.1...@twister2.libero.it
> Nella mia maschera Util, sul click del bottone, ho inserito il codice che mi
> dovrebbe popolare la tabella con i nomi delle tabelle da linkare, ma non lo
> fà.
>
> Mi segnala operazione non valida
Senti Napoleone mi pare che tu no ti stia nemmeno sforzando
per capire quello che stai facendo ma ti stia limitando
a buttare del codice nel tuo applicativo con la speranza
che tutto funzioni.....!
Alla base di tutto c'è un Help fantastico in Access ed
un pò di nosioni BASE non ti farebbero malissimo.
Ovviamente poi se non sei chiaro ed esplicito, vista la
difficoltà che hai, anche riuscire ad aiutarti diventa
oltre che impossibile scarsamente efficace.
Se non funziona deve esserci un errore di certo, a partire dalle
Librerie DAO che sicuramente hai già controllato....???
Poi se non fai una diagnosi un pò più dettagliata direi che
non ce ne saltiamo fuori.
Sforzati ad imparare da questi demo aiuta te ed aiuta noi quando
poni i quesiti...!



title: Riallegare tb a BE

text:
Premetto che conosco il tuo pensiero sulla "pappa pronta" e di quelli che a
NAtale "hanno avuto in regalo un PC col pacchetto office", ma sai anche che
seguo il NG + sitocomune da un pò, per cui quando segui una discussione
interessante, o ti scarichi un demo interessante, la prima cosa che pensi...
è quella di applicarlo al proprio db.
Non sempre però si hanno le capacità di apprendere l'argomento, quindi il
copia-incolla risulta la soluzione più immediata, anche se a volte, neanche
questo risolve il problema.
> Senti Napoleone mi pare che tu no ti stia nemmeno sforzando
> per capire quello che stai facendo ma ti stia limitando
> a buttare del codice nel tuo applicativo con la speranza
> che tutto funzioni.....!
questo è vero :-(
> Alla base di tutto c'è un Help fantastico in Access ed
> un pò di nosioni BASE non ti farebbero malissimo.
Mi riesce meglio apprendere da un libro,
credimi molte volte consulto l'help ma con scarsi risultati.
> Ovviamente poi se non sei chiaro ed esplicito, vista la
> difficoltà che hai, anche riuscire ad aiutarti diventa
> oltre che impossibile scarsamente efficace.
se leggi la risposta data a Bruno alle ore 16,19
credo di essere stato più chiaro.
> Se non funziona deve esserci un errore di certo, a partire dalle
> Librerie DAO che sicuramente hai già controllato....???
Era già spuntata la DAO 3.6
> Poi se non fai una diagnosi un pò più dettagliata direi che
> non ce ne saltiamo fuori.
Me lo auguro!
> Sforzati ad imparare da questi demo aiuta te ed aiuta noi quando
> poni i quesiti...!
Sono un'autodidatta, la maggior parte di cio che ho appreso (access
parlando), l'ho appreso seguendo questo NG, ma anche con GRANDI e LUNGHE
sforzature.
> @Alex
Napoleone


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:kx6Ff.77414$eD5.1...@twister2.libero.it...
> Ciao Bruno, per maggior chiarezza, ti allego il codice del modulo
[...]
Funzionerà senz'altro ma percorre una via che, per la circostanza,
non mi piace (DoCmd.TransferDatabase acLink.....).
Se vuoi provare un altro sistema ti mando il codice che uso io.
È più semplice e più breve; ma son certo non dipende dal codice...
Bruno


title: Riallegare tb a BE

text:
"Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
news:43e53571$0$12596$4faf...@reader3.news.tin.it...

Perchè no, lo guarderò con piacere ed attenzione.
Napoleone


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:kx6Ff.77414$eD5.1...@twister2.libero.it...
1 - Crea nel database esterno una tabella (t_DefaultLinks)
     contenente un campo denominato TableName
    (Data Type: Text).
     In tale tabella elenca tutte le tabelle di detto database
     esterno che dovranno essere collegate al FrontEnd.
2 - Definisci nella procedura che segue il valore
      personalizzato di RemoteDB_FileName.
3 - Esegui la procedura da un Button.
     Essendo una Sub non potrà essere eseguita da una macro
     Autoexec se prima non verrà cambiata in Function
     (semplice sostituzione del nome Sub con Function)
     ed inserita a livello di Modulo.
     (Perché poi eseguirla ad ogni apertura del FrontEnd?
     I collegamenti vengono conservati fra le sessioni!)
Naturalmente i nomi definiti al punto 1) possono venire
sotituiti a condizione che se ne faccia analoga sostituzione
nella procedura.
-----------------------------------------------------------
Public Sub TableLink()
Dim RemoteDb As Database, LocalDB As Database
Dim RS As Recordset, Esiste As Boolean
Dim NewLinkedTable As TableDef, i As TableDef
Dim RemoteDB_FileName As String
RemoteDB_FileName = "C:\Paragon_C\TR\Paragon_T.TR2"
Set LocalDB = CurrentDb
Set RemoteDb = OpenDatabase(RemoteDB_FileName)
' Controlla l'esistenza in RemoteDB della tabella t_DefaultLinks
' contenente il campo TableName (Text) nel quale sono indicate
' le singole tabelle da collegare.
'
DoCmd.Hourglass True
Esiste = False
For Each i In RemoteDb.TableDefs
    If i.Name = "t_DefaultLinks" Then
        Esiste = True
        Exit For
    End If
Next i
If Esiste = False Then
    MsgBox "t_DefaultLinks  non esiste in  " & _
    RemoteDB_FileName & vbCrLf & "Collegamenti non aggiornati."
    GoTo StartUp_Exit
End If
' Se t_DefaultLinks esiste in RemoteDB, controlla che la
' tabella non sia vuota
Set RS = RemoteDb.OpenRecordset("t_DefaultLinks")
    If RS.RecordCount = 0 Then
        MsgBox "t_DefaultLinks  in  " & RemoteDB_FileName & _
        "  è vuota." & vbCrLf & "Collegamenti non aggiornati."
        GoTo StartUp_Exit
    End If
' Elimina tutte le tabelle correntemente collegate
For Each i In LocalDB.TableDefs
    If i.Connect <> "" Then
        DoCmd.DeleteObject acTable, i.Name
    End If
Next i
' Collega tutte le tabelle elencate in (remote) t_DefaultLinks
Do Until RS.EOF
    Set NewLinkedTable = LocalDB.CreateTableDef(RS![TableName])
    On Error GoTo Link_Err
    NewLinkedTable.Connect = ";DATABASE=" & RemoteDB_FileName
    NewLinkedTable.SourceTableName = RS![TableName]
    LocalDB.TableDefs.Append NewLinkedTable
Link_Continua:
    On Error GoTo 0
    RS.MoveNext
Loop
RemoteDb.Close
' ===================================================
StartUp_Exit:
    DoCmd.Hourglass False
    Exit Sub
RemoteDB_Err:
    MsgBox "1 - Module_Contabilità: TableLink" & vbCrLf & Err.Number & _
    " - " & Err.Description & vbCrLf & "Database non valido."
    Resume StartUp_Exit
Link_Err:
    MsgBox "2 - Module_Contabilità: TableLink" & vbCrLf & Err.Number & _
    " - " & Err.Description & vbCrLf & "Continua il collegamento"
    On Error GoTo 0
    Resume Link_Continua
End Sub
------------------------------------------------------------------------------
Dimmi come è andata.
Bruno


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:g8aFf.160657$
65.44...@twister1.libero.it
[CUT]
> Sono un'autodidatta, la maggior parte di cio che ho appreso (access
> parlando), l'ho appreso seguendo questo NG, ma anche con GRANDI e LUNGHE
> sforzature.
Questa osservazione la stai facendo alla persona sbagliata, non
regge, sono anch'io autodidatta in tutto e per tutto, inoltre
non sviluppo nemmeno per lavoro, o meglio non mangio con quanto
sviluppo....!
Questo per dirti che l'inizio c'è per tutti, io ho iniziato nel
95 ed ho letto post per più di un'anno prima di postare i miei...!
Non vuole essere altro che un'incentivo a perseguire lo scopo.
> > @Alex
>
> Napoleone
In ogni caso prova a seguire anche quanto ti stà indicando Bruno
con una tecnica che è equivalente, direi che la prima che funziona
è quella che vince.



title: Riallegare tb a BE

text:
"Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
news:43e5e84d$0$28069$4faf...@reader1.news.tin.it...

Prima di cominciare, vorrei premettere che il BE è protetto da PW, cambia
qualche cosa?
Napoleone


title: Riallegare tb a BE

text:
...cut
> Non vuole essere altro che un'incentivo a perseguire lo scopo.
certo! non mi arrendo.
> In ogni caso prova a seguire anche quanto ti stà indicando Bruno
> con una tecnica che è equivalente, direi che la prima che funziona
> è quella che vince.
>
> @Alex
Sia la tua tecnica, che quella di Bruno funzionano già e quindi entrambe
vincenti;
adesso sta a me saperle applicare, altrimenti pazienza,
vorrà dire che me le collego ogni volta manualmente :-(
Napoleone


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:pFoFf.161282$
65.45...@twister1.libero.it
[CUT]
> Prima di cominciare, vorrei premettere che il BE è protetto da PW, cambia
> qualche cosa?
>
> Napoleone
Mannaggia a te e quando non dici le cose....!!!!!!!
Cambia tutto ovviamente, il mio metodo così com'è non
potrà mai andare, serve aprire il DB(BE) con la PWD che
non è indicata.
Mentre con il metodo di Bruno serve mettere nella Stringa
di connessione la PWD...!!!
ZZZZZZZZZOOOOOOOOOOOO
;-)
Ciao Napo



title: Riallegare tb a BE

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:150f6639195728b50a...@mygate.mailgate.org...
> "Napoleone" <
napole...@libero.it
> wrote in message
> news:pFoFf.161282$
65.45...@twister1.libero.it
>
> [CUT]
>> Prima di cominciare, vorrei premettere che il BE è protetto da PW, cambia
>> qualche cosa?
>>
>> Napoleone
>
>
> Mannaggia a te e quando non dici le cose....!!!!!!!
Mica lo faccio apposta!!!
> Cambia tutto ovviamente, il mio metodo così com'è non
> potrà mai andare, serve aprire il DB(BE) con la PWD che
> non è indicata.
> Mentre con il metodo di Bruno serve mettere nella Stringa
> di connessione la PWD...!!!
>
RemoteDB_FileName = "C:\GECARD_BE\LINK.MDB"
quindi se la password è: abc
come cambierebbe il RemoteDB_FileName =...??
@Alex
Napoleone


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:pFoFf.161282$65.45...@twister1.libero.it...
> Prima di cominciare, vorrei premettere che il BE è protetto da PW, cambia
> qualche cosa?
Ti risparmio le robacce che ti avrei detto al posto di Alessandro,
avessi impazzito come lui nel cercare di avviarti le cose per
il verso giusto...
Sostituisci la prima parte della procedura con la seguente che
va ovviamente personalizzata anche nella definizione della password..
=========================================
Dim RemoteDb As Database, LocalDB As Database
Dim RS As Recordset, Esiste As Boolean
Dim NewLinkedTable As TableDef, i As TableDef
Dim RemoteDB_FileName As String
Dim LocalPassword As String
RemoteDB_FileName = "C:\Paragon_C\TR\Paragon_T.TR2"
Set LocalDB = CurrentDb
'Set RemoteDb = OpenDatabase(RemoteDB_FileName)
LocalPassword = "brunocam"
Set RemoteDb = OpenDatabase(RemoteDB_FileName, _
               False, False, ";PWD=" & LocalPassword)
==========================================
Ciao
Bruno


title: Riallegare tb a BE

text:
"Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
news:43e624a1$0$5991$4faf...@reader2.news.tin.it...
> "Napoleone" <
napole...@libero.it
> wrote in message
> news:pFoFf.161282$65.45...@twister1.libero.it...
>
>> Prima di cominciare, vorrei premettere che il BE č protetto da PW, cambia
>> qualche cosa?
>
> Ti risparmio le robacce che ti avrei detto al posto di Alessandro,
Ma solo perchč oggi č domenica..... e siamo tutti piů buoni :-)
> avessi impazzito come lui nel cercare di avviarti le cose per
> il verso giusto...
Pardon
> Sostituisci la prima parte della procedura con la seguente che
> va ovviamente personalizzata anche nella definizione della password..
Alla GRANDE!!
Mi ci sono giocato un fine settimana, ma alla fine č OK!!!!
Adesso lo sto usando in locale, domani lo proverň al lavoro e per dovere, ne
darň comunicazioni in merito.
Grazie Alex,
Grazie Bruno
Con grande riconoscimento
Napoleone


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> ha scritto nel messaggio
news:VqqFf.161442$65.45...@twister1.libero.it...
>
> "Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
> news:43e624a1$0$5991$4faf...@reader2.news.tin.it...
>> "Napoleone" <
napole...@libero.it
> wrote in message
>> news:pFoFf.161282$65.45...@twister1.libero.it...
>>
>>> Prima di cominciare, vorrei premettere che il BE è protetto da PW,
>>> cambia qualche cosa?
>>
>> Ti risparmio le robacce che ti avrei detto al posto di Alessandro,
>
> Ma solo perchè oggi è domenica..... e siamo tutti più buoni :-)
>
>> avessi impazzito come lui nel cercare di avviarti le cose per
>> il verso giusto...
>
> Pardon
>
>> Sostituisci la prima parte della procedura con la seguente che
>> va ovviamente personalizzata anche nella definizione della password..
>
> Alla GRANDE!!
> Mi ci sono giocato un fine settimana, ma alla fine è OK!!!!
> Adesso lo sto usando in locale, domani lo proverò al lavoro e per dovere,
> ne darò comunicazioni in merito.
>
> Grazie Alex,
> Grazie Bruno
>
> Con grande riconoscimento
> Napoleone
>
Come pensavo, nel relink in locale alle tabelle in C:\... tutto ok
quando tento il collegamento all'unita K:\... non la riesce a trovare.
Sia nel primo che nel secondo caso, la cartella in cui risiede il BE, è
sempre la stessa.
Napoleone


title: Riallegare tb a BE

text:
> Come pensavo, nel relink in locale alle tabelle in C:\... tutto ok
> quando tento il collegamento all'unita K:\... non la riesce a trovare.
>
> Sia nel primo che nel secondo caso, la cartella in cui risiede il BE, è
> sempre la stessa.
>
> Napoleone
Il messaggio è il seguente:
"K:\gecard\gecard_BE.mdb" non è un percorso valido. Assicurarsi che il nome
del percorso sia corretto e di essere collegati al server in cui si trova il
file. (3044)
Napoleone


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> ha scritto nel messaggio
news:wR%Ff.165540$65.46...@twister1.libero.it...

Dopo aver rivisto il percorso... mi segnala
Il modulo di gestione di database Microsoft Jet non è in grado di aprire il
file <nome>. Il file è già aperto con accesso esclusivo da un altro utente o
è necessario disporre dell'autorizzazione per visualizzare i dati. (3051).
Ciao
Napoleone


title: Riallegare tb a BE

text:
Napoleone wrote:
> Nella mia maschera Util, sul click del bottone, ho inserito il codice
> che mi dovrebbe popolare la tabella con i nomi delle tabelle da
> linkare, ma non lo fà.
>
> Mi segnala operazione non valida
Allora un pò di calma, analizziamo questa routine
>
> -----------------------------------------
> Private Sub Comando107_Click()
> On Error GoTo Err_Comando107_Click
>
>  Dim rs As DAO.Recordset
>    Dim rsTable As DAO.Recordset
Se hai copia incollato dal tuo codice la funzione, il fatto che DAO sia in
maiuscolo e con la premessa che non l'hai scritto
tu così possiamo credere che i riferimenti dao sono a posto
>    Dim strSQL As String
>    CurrentDb.Execute "DELETE * FROM _LinkedTables;", dbFailOnError
Con questa tu cancelli la l'elenco delle tabelle a cui vuoi linkarti.
E' in più poiche tu questa tabella la riempi leggendo l'elenco del
MsysObject
quindi trova la nuova tabella se tu l'hai collegata, altrimenti lui non lo
sa che c'è una tabella da collegare.
>    strSQL = "SELECT MsysObjects.Name FROM MsysObjects " & _
>           "WHERE ((Left$([Name], 4) <> 'Msys') And (MsysObjects.Type
>    = 6))"
>    Set rs = CurrentDb.OpenRecordset(strSQL, dbReadOnly)
Con questa vai a leggere l'elenco delle tabelle
>    Set rsTable = CurrentDb.OpenRecordset("_LinkedTables", dbOpenTable)
Poi ti apri la tabella *locale* (non collegata) delle tabelle da rilinkare
E qui ti riempi nuovamente la tabella temporanea con l'elenco delel tabelle
collegate.
bene.
>    rs.MoveFirst
>    Do Until rs.EOF
>       rsTable.AddNew
>       rsTable.Fields(0) = rs.Fields(0)
>       rsTable.Update
>       rs.MoveNext
>    Loop
Con questa funzione abbiamo però solo preparato l'elenco,
qui ti basta lanciare prima questa funzione (se lo vuoi fare ogni fare)
>    rs.Close
>    rsTable.Close
>    Set rs = Nothing
>    Set rsTable = Nothing
>
>
> Exit_Comando107_Click:
>     Exit Sub
>
> Err_Comando107_Click:
>     MsgBox Err.Description
>     Resume Exit_Comando107_Click
>
> End Sub
> -----------------------------------
> Napoleone
Poi lanci l'altra funzione così com'è, dopo averla messa in un modulo a
parte
Dovrebbe andare
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: Riallegare tb a BE

text:

Rileggendo un pò il tutto, la procedura è corretta, bisogna solo vedere che
permessi hai
sull'unità k:
Ma perchè rilinki ad ogni apertura del db?



title: Riallegare tb a BE

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:dsa2vp$v0t$1...@area.cu.mi.it...

Scusami MAssimiliano,
alla fine ero riuscito a far funzionare, il suggerimento di Bruno,
quindi dovresti fare riferimento al codice degli ultimi post.
Me ne scuso per non aver precisato.
Napoleone


title: Riallegare tb a BE

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:dsa3ad$vpl$1...@area.cu.mi.it...

NO, ad ogni aggiornamento del/dei  FE
> _ _
> Ciao
> MAssimiliano Amendola
Napoleone


title: Riallegare tb a BE

text:
Napoleone wrote:
>> Rileggendo un pò il tutto, la procedura è corretta, bisogna solo
>> vedere che
>> permessi hai
>> sull'unità k:
>> Ma perchè rilinki ad ogni apertura del db?
>>
> NO, ad ogni aggiornamento del/dei  FE
>
Ma se tu copi incolli i FE non c'è bisogno che li rilinki ogni volta
Se il percorso non cambia ti basta un copia incolla
--
_ _
Ciao



title: Riallegare tb a BE

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:dsa3hd$bs$1...@area.cu.mi.it...
> Napoleone wrote:
>
>>> Rileggendo un pò il tutto, la procedura è corretta, bisogna solo
>>> vedere che
>>> permessi hai
>>> sull'unità k:
>>> Ma perchè rilinki ad ogni apertura del db?
>>>
>> NO, ad ogni aggiornamento del/dei  FE
>>
> Ma se tu copi incolli i FE non c'è bisogno che li rilinki ogni volta
> Se il percorso non cambia ti basta un copia incolla
>
> --
> _ _
> Ciao
> MAssimiliano Amendola
Siccome alcuni FE li collego a C, altri a K quindi mi sono creato una form
con due bottoni,
uno mia collega a C, uno mi collega a K, dipende dalla postazione!
Napoleone


title: Riallegare tb a BE

text:

Anche dalla postazione server puoi connettere l'unità K
--
_ _
Ciao



title: Riallegare tb a BE

text:
> Anche dalla postazione server puoi connettere l'unitā K
.....
Si lo so, ma sarebbe certamente pių lenta la trasmissione dei dati;
vuoi che legge in locale, vuoi che si va a girare tutta la rete.
In che termini di rallentamenti potrebbe influire?
.....
... e proprio quando voglio collegare a K:\... non funziona!
> Ciao
> MAssimiliano Amendola
Ciao
Napoleone


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:Gm2Gf.165895$65.46...@twister1.libero.it...
>> Anche dalla postazione server puoi connettere l'unità K
> .....
> Si lo so, ma sarebbe certamente più lenta la trasmissione dei dati;
> vuoi che legge in locale, vuoi che si va a girare tutta la rete.
> In che termini di rallentamenti potrebbe influire?
> .....
> ... e proprio quando voglio collegare a K:\... non funziona!
K:\ è una risorsa di rete mappata sul computer dal quale
attivi la routine o è un HD o partizione di pertinenza
dello stesso computer?
Bruno


title: Riallegare tb a BE

text:
Napoleone wrote:
>> Anche dalla postazione server puoi connettere l'unità K
> .....
> Si lo so, ma sarebbe certamente più lenta la trasmissione dei dati;
> vuoi che legge in locale, vuoi che si va a girare tutta la rete.
> In che termini di rallentamenti potrebbe influire?
> .....
Non noti la differenza
> ... e proprio quando voglio collegare a K:\... non funziona!
Il probelma è questo ma non dipende dalla routine
>
>
>> Ciao
>> MAssimiliano Amendola
>
> Ciao
> Napoleone
--



title: Riallegare tb a BE

text:
"Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
news:43e8b38f$0$5991$4faf...@reader2.news.tin.it...

Ciao Bruno,
K:\ è una risorsa di rete mappata sul computer,
la routine la attivo da una maschera in C:\...
Saluti
Napoleone


title: Riallegare tb a BE

text:
>> .....
>> Si lo so, ma sarebbe certamente più lenta la trasmissione dei dati;
>> vuoi che legge in locale, vuoi che si va a girare tutta la rete.
>> In che termini di rallentamenti potrebbe influire?
>> .....
> Non noti la differenza
Allora vada tutto da K..
>> ... e proprio quando voglio collegare a K:\... non funziona!
>
> Il probelma è questo ma non dipende dalla routine
quindi?
> Ciao
> MAssimiliano Amendola
Napoleone


title: Riallegare tb a BE

text:

Nap dimentica c: (se lo intendi come backend)
parla solo di FE



title: Riallegare tb a BE

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:dsacht$lis$1...@area.cu.mi.it...
> Napoleone wrote:
>> "Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
>> news:43e8b38f$0$5991$4faf...@reader2.news.tin.it...
>>> "Napoleone" <
napole...@libero.it
> wrote in message
>>> news:Gm2Gf.165895$65.46...@twister1.libero.it...
>>>>> Anche dalla postazione server puoi connettere l'unità K
>>>> .....
>>>> Si lo so, ma sarebbe certamente più lenta la trasmissione dei dati;
>>>> vuoi che legge in locale, vuoi che si va a girare tutta la rete.
>>>> In che termini di rallentamenti potrebbe influire?
>>>> .....
>>>> ... e proprio quando voglio collegare a K:\... non funziona!
>>>
>>> K:\ è una risorsa di rete mappata sul computer dal quale
>>> attivi la routine o è un HD o partizione di pertinenza
>>> dello stesso computer?
>>>
>>> Bruno
>> Ciao Bruno,
>> K:\ è una risorsa di rete mappata sul computer,
>> la routine la attivo da una maschera in C:\...
>>
>> Saluti
>> Napoleone
> Nap dimentica c: (se lo intendi come backend)
> parla solo di FE
>
Appunto, tutti i FE sono in C:\..
> _ _
> Ciao
> MAssimiliano Amendola
www.accessgroup.it
> Cisa - Conferenza Italiana per Sviluppatori Access
> Info:
www.donkarl.com/it
>
Napoleone


title: Riallegare tb a BE

text:
Napoleone wrote:
>>>>>> Anche dalla postazione server puoi connettere l'unità K
>>>>> .....
>>>>> Si lo so, ma sarebbe certamente più lenta la trasmissione dei
>>>>> dati; vuoi che legge in locale, vuoi che si va a girare tutta la
>>>>> rete. In che termini di rallentamenti potrebbe influire?
>>>>> .....
>>>>> ... e proprio quando voglio collegare a K:\... non funziona!
>>>>
>>>> K:\ è una risorsa di rete mappata sul computer dal quale
>>>> attivi la routine o è un HD o partizione di pertinenza
>>>> dello stesso computer?
>>>>
>>>> Bruno
>>> Ciao Bruno,
>>> K:\ è una risorsa di rete mappata sul computer,
>>> la routine la attivo da una maschera in C:\...
>>>
>>> Saluti
>>> Napoleone
>> Nap dimentica c: (se lo intendi come backend)
>> parla solo di FE
>>
>
> Appunto, tutti i FE sono in C:\..
bene allora no nparlarne più, parla solo di FE
--



title: Riallegare tb a BE

text:
>> Appunto, tutti i FE sono in C:\..
> bene allora no nparlarne più, parla solo di FE
il problema è del FE??
> Ciao
> MAssimiliano Amendola
Napoleone


title: Riallegare tb a BE

text:

Io continuo a credere che sia un problema di permessi nella rete



title: Riallegare tb a BE

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:dsaemu$qr7$1...@area.cu.mi.it...
> Napoleone wrote:
>>>> Appunto, tutti i FE sono in C:\..
>>> bene allora no nparlarne più, parla solo di FE
>>
>> il problema è del FE??
>>
>>> Ciao
>>> MAssimiliano Amendola
>>
>> Napoleone
> Io continuo a credere che sia un problema di permessi nella rete
>
Sto verificando, manualmente riesco a collegarle.
> _ _
> Ciao
> MAssimiliano Amendola
Napoleone


title: Riallegare tb a BE

text:
Napoleone wrote:
> "MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
> news:dsaemu$qr7$1...@area.cu.mi.it...
>> Napoleone wrote:
>>>>> Appunto, tutti i FE sono in C:\..
>>>> bene allora no nparlarne più, parla solo di FE
>>>
>>> il problema è del FE??
>>>
>>>> Ciao
>>>> MAssimiliano Amendola
>>>
>>> Napoleone
>> Io continuo a credere che sia un problema di permessi nella rete
>>
>
> Sto verificando, manualmente riesco a collegarle.
Tu stai usando quella di Bruno, vero?
>
>> _ _
>> Ciao
>> MAssimiliano Amendola
>
> Napoleone
--
_ _
Ciao



title: Riallegare tb a BE

text:
>
> Tu stai usando quella di Bruno, vero?
Si
>>> _ _
>>> Ciao
>>> MAssimiliano Amendola
>>
>> Napoleone
>
> --
> _ _
> Ciao
> MAssimiliano Amendola
Nap


title: Riallegare tb a BE

text:

Perchè non mi mandi il tutto?
--
_ _
Ciao



title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:Ox2Gf.165931$65.46...@twister1.libero.it...
> Ciao Bruno,
> K:\ è una risorsa di rete mappata sul computer,
> la routine la attivo da una maschera in C:\...
Hai provato ad assegnare il net path in luogo di K:\?
(   \\NetServer\C ...)
Bruno


title: Riallegare tb a BE

text:
"Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
news:43e8cb8c$0$12601$4faf...@reader3.news.tin.it...

non va nemmeno
<Percorso> non è un percorso valido. Assicurarsi che il nome del percorso
sia corretto e di essere collegati al server in cui si trova il file. (3044)
> Bruno
Napoleone


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:r86Gf.166339$65.46...@twister1.libero.it...
> non va nemmeno
> <Percorso> non è un percorso valido. Assicurarsi che il nome del percorso
> sia corretto e di essere collegati al server in cui si trova il file.
> (3044)
>> Bruno
> Napoleone
Beh ma allora non "vedi" il server!
Eseguendo Ping NomeServer ovvero Ping il-suo-ip-address
che cosa ottieni?
Bruno


title: Riallegare tb a BE

text:
"Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
news:43e8f90c$0$28063$4faf...@reader1.news.tin.it...

Ciao Bruno,
(supponiamo di voler linkare le tabelle dal FE dello stesso server/client al
BE)
praticamente la cartella mappata come K:\gecard\gecard_be.mdb si trova su
C:\gecard\..
dunque
se il FE lo collego a C:\gecard\gecard_Be.mdb FUNZIONA
se il FE lo collego a K:\gecard\gecard_Be.mdb NON FUNZIONA
cosa cambia?
Napoleone


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:AE7Gf.83512$eD5.1...@twister2.libero.it...
> Ciao Bruno,
> (supponiamo di voler linkare le tabelle dal FE dello stesso server/client
> al BE)
>
> praticamente la cartella mappata come K:\gecard\gecard_be.mdb si trova su
> C:\gecard\..
>
> dunque
> se il FE lo collego a C:\gecard\gecard_Be.mdb FUNZIONA
> se il FE lo collego a K:\gecard\gecard_Be.mdb NON FUNZIONA
>
> cosa cambia?
Napoleone!!!
Quando dalle risorse del computer fai DblClick su K:
che cosa ti appare? In che directory ti trovi?
Bruno


title: Riallegare tb a BE

text:
"Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
news:43e90c5f$0$28061$4faf...@reader1.news.tin.it...

In K:\
> Bruno
Napoleone


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:q38Gf.166543$65.46...@twister1.libero.it...
>> Napoleone!!!
>> Quando dalle risorse del computer fai DblClick su K:
>> che cosa ti appare? In che directory ti trovi?
>
> In K:\
Stavo pensando male, scusa.
E qual è il path di K:\?
Bruno


title: Riallegare tb a BE

text:
"Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
news:43e90ea8$0$28061$4faf...@reader1.news.tin.it...

K:\gecard\gecard_be.mdb
> Bruno
Napoleone


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:vb8Gf.83549$eD5.1...@twister2.libero.it...
>> Stavo pensando male, scusa.
>> E qual è il path di K:\?
>
> K:\gecard\gecard_be.mdb
>
>> Bruno
>
> Napoleone
Ma non hai detto che K: è una risorsa di rete mappata sul
tuo computer?
Dunque qual è il nome del server e a quali suoi (del server)
HD e directory si riferisce K?
Bruno


title: Riallegare tb a BE

text:
> Ma non hai detto che K: è una risorsa di rete mappata sul
> tuo computer?
con K ho mappato la cartella GECARD, posizionata in C:\GECARD\
del computer che funge da server (per stasera) "Portatile"
> Dunque qual è il nome del server e a quali suoi (del server)
> HD e directory si riferisce K?
Preciso, K è solo una Cartella in cui ho il file gecard_BE.mdb
> Bruno
Napoleone


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:1j8Gf.166562$65.46...@twister1.libero.it...

Hai detto:
>> se il FE lo collego a C:\gecard\gecard_Be.mdb FUNZIONA
>> se il FE lo collego a K:\gecard\gecard_Be.mdb NON FUNZIONA
ma se K: = C:\GECARD il FE dovrà essere collegato
a K:\GECARD_BE.mdb.
Prova!
Bruno


title: Riallegare tb a BE

text:
"Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
news:43e91364$0$28059$4faf...@reader1.news.tin.it...

Precisazione:
Il BE si trova (e parliamo solo di server, per il momento lasciamo perdere i
client)
in C:\GECARD\gecard_BE.mdb
Il FE si trova in C:...\Documenti\AMB_EST\Amb_Est.mdb
Spero di essere stato più chiaro
Napoleone


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:Rz8Gf.83586$eD5.1...@twister2.libero.it...
> Precisazione:
> Il BE si trova (e parliamo solo di server, per il momento lasciamo perdere
> i client)
> in C:\GECARD\gecard_BE.mdb
>
> Il FE si trova in C:...\Documenti\AMB_EST\Amb_Est.mdb
>
> Spero di essere stato più chiaro
Eri stato chiaro anche prima.
Dove si trovano i FE non ha importanza.
Fa' la prova che ti ho indicato prima.
Bruno


title: Riallegare tb a BE

text:
"Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
news:43e91622$0$28072$4faf...@reader1.news.tin.it...

Mi restituisce questo msg:
Il modulo di gestione di database Microsoft Jet non è in grado di aprire il
file <nome>. Il file è già aperto con accesso esclusivo da un altro utente o
è necessario disporre dell'autorizzazione per visualizzare i dati. (3051).
Napoleone


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:FI8Gf.166604$65.46...@twister1.libero.it...
> Mi restituisce questo msg:
>
> Il modulo di gestione di database Microsoft Jet non è in grado di aprire
> il file <nome>. Il file è già aperto con accesso esclusivo da un altro
> utente o è necessario disporre dell'autorizzazione per visualizzare i
> dati. (3051).
>
> Napoleone
Quindi ha "visto" il server che prima non vedeva.
Quandi dice che non può aprire il file ti dà dello stesso
il nome corretto?
Se sì fa' quest'altra prova:
Crea un file mdb nella dir in cui si trova il BE, crea una tabella
qualunque, inserisci un record e vedi se quella, mutatis mutandis,
viene collegata.
Bruno


title: Riallegare tb a BE

text:
"Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
news:43e91bb3$0$28065$4faf...@reader1.news.tin.it...

Per meglio capirci, ti ho inviato uno zip
.. provo e ti faccio sapere
Nap


title: Riallegare tb a BE

text:
> Se sì fa' quest'altra prova:
> Crea un file mdb nella dir in cui si trova il BE, crea una tabella
> qualunque, inserisci un record e vedi se quella, mutatis mutandis,
> viene collegata.
Se lo faccio manualmente è OK,
da codice NON VA'
Il modulo di gestione di database Microsoft Jet non è in grado di aprire il
file <nome>. Il file è già aperto con accesso esclusivo da un altro utente o
è necessario disporre dell'autorizzazione per visualizzare i dati. (3051).
> Bruno
Napoleone


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:h39Gf.166634$65.46...@twister1.libero.it...

Va bene.
Mandami il file che mi hai promesso: hai dimenticato di
allegarlo alla e-mail.
Bruno


title: Riallegare tb a BE

text:
"Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
news:43e91f01$0$28070$4faf...@reader1.news.tin.it...

da risorse di rete, non riesco a copiare nulla in K:\gecard\
come mai?
Nap


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:Cr9Gf.166659$65.46...@twister1.libero.it...
> da risorse di rete, non riesco a copiare nulla in K:\gecard\
>
> come mai?
>
> Nap
Non ne hai l'accesso, l'avessi ti saresti già collegato.
Il perché non so...
Hai verificato che la dir non sia read-only?
Ho ricevuto il tuo file.
In locale funziona tutto.
Ora mi creo la dir in altro computer, mappo qui
la risorsa con K... etc.
Poi ti racconto
Ma son sicuro che funziona.
Bruno


title: Riallegare tb a BE

text:
"Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
news:43e9245e$0$28071$4faf...@reader1.news.tin.it...

la cartella è di sola lettura, tolgo la spunta, riguardo le proprità e la
ritrovo di sola lettura.
da cosa dipende??
> Bruno
Nap


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:Cr9Gf.166659$65.46...@twister1.libero.it...
> da risorse di rete, non riesco a copiare nulla in K:\gecard\
>
> come mai?
>
> Nap
Da me funziona tutto regolarmente:
K: = \\Carla\C\GECARD
RemoteDB_FileName = "K:\GECARD_BE.MDB"
Nessun problema.
Se tu non hai accesso in scrittura a K: il problema č lě.
Ti vorrei dire di eliminare la mappatura di K, eliminare
la directory C:\GECARD e rifarla nuova, magari
temporaneamente con altro nome.
Ma se non hai accesso in scrittura non potrai nemmeno
cancellarla.
Č cosě?
Bruno


title: Riallegare tb a BE

text:
"Napoleone" <
napole...@libero.it
> wrote in message
news:nx9Gf.83662$eD5.1...@twister2.libero.it...
> la cartella è di sola lettura, tolgo la spunta, riguardo le proprità e la
> ritrovo di sola lettura.
>
> da cosa dipende??
È capitato qualche volta anche a me.
Reboot, Scandisk, Reboot e se non giova martello e
scalpello sul registro!
Procedi coi primi tre.
Bruno
PS
Salvati il contenuto della dir, se puoi...


title: Riallegare tb a BE

text:
"Bruno Campanini" <
bruno.c...@tin.it
> ha scritto nel messaggio
news:43e927ba$0$28071$4faf...@reader1.news.tin.it...

Mi pare strano che come amministratore, accada ciň..
Sono proprio cotto, forse č meglio ritornarci domani.
Grazie e Buona Notte
Napoleone


title: aiuto x realizzare una Query

author: badush

text:
Ciao amici del news,
considerando le seguenti query, Query Moliture Query Olio prodotto, relative
alla gestione di un frantoio cosi composte:
Query moliture composta dai seguenti campi:
Data;
Cliente;
Quantita olive;
Data Molitura (uguale alla Data);
N°Fattura;
OliodaMolitura
SansadaMolitura
Query olio prodotto composta dai seguenti campi:
Data;
Cliente;(proveniente dalla stessa tabella del campo Cliente sopra indicato)
Quantita olive;
N°Autofattura;
OlioProdotto
SansaProdotta
Vorrei creare una query, sulla base delle due precedenti, cosi composta:
Data (unico campo sia per la molitura che Olio prodotto);
Quantita olive (unico campo sia per la molitura che Olio prodotto);
Data Molitura;
Cliente; (unico campo sia per la molitura che Olio prodotto);
N° Fattura; (solo x la molitura)
OliodaMolitura
olioprodotto;
Sansa;(unico campo sia per la molitura che Olio prodotto);
Ho provato a fare un query d'unione ma ho combinato solo pasticci.
Come posso fare?
Grazie


title: aiuto x realizzare una Query

author: Roberto da casa

text:
"badush" <
bad...@martucci.com
> ha scritto nel messaggio
news:mUctb.119760$e6.42...@twister2.libero.it...

Prova con una query unione che abbia il seguente codice SQL:
SELECT [Query moliture].Data, [Query moliture].[Quantità olive], [Query
moliture].[Data Molitura], [Query moliture].Cliente, [Query
moliture].[N°Fattura], [Query moliture].OlioMolitura, 0 AS OlioProdotto,
[Query moliture].SansaMolitura As Sansa
FROM [Query moliture]
UNION SELECT [Query olio].Data, [Query olio].[Quantità olive], Null As [Data
Molitura], [Query olio].Cliente, Null As [N°Fattura], 0 As OlioMolitura,
[Query olio].OlioProdotto, [Query olio].SansaProdotta As Sansa
FROM [Query olio];
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: aiuto x realizzare una Query

text: Grazie Roberto


title: Repeat:  problemi con recordset

author: Gigi

text:
Salve
scusatemi se ripongo la domanda
in maniera forse piů ortodossa
Non so come leggere da codice i record in
elenco in una form in modalitŕ
visualizzazione maschere multiple
Qualcuno půň aiutarmi?
Grazie
Gigi
#chi va con lo zoppo
 cammina piano piano # anomino del '600
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Repeat:  problemi con recordset

text:
Il 21 Mag 2004, 10:46, "George" <
giorgio.ben...@libero.it
> ha
scritto:
> > Non so come leggere da codice i record in
> > elenco in una form in modalità
> > visualizzazione maschere multiple
>
> Maschere continue forse?
>
> Nel codice della maschera...
>
> Dim rs as dao.recordset
> Set rs=me.recordsetclone
> rs.movefirst
> do while not rs.eof
> <faiquelloche vuoi>
> rs.movenext
> loop
>
> Giorgio
Si, volevo proprio dire Maschere continue
;-))
Fatto ma c'è un errore che ti posto di seguito
## Errore di run-time 7951 ##
## Riferimento alla proprietà recordsetclone non valido ##
significa che c'è qualcosa che non ho caricato
(o settato) ?
Grazie
Gigi



title: Repeat:  problemi con recordset

text:

Il codice che mi hai dato
l'ho inserito al on_click di un pulsante
va bene oppure lo devo inserire in un punto preciso?



title: Repeat:  problemi con recordset

author: George

text:
> > ## Errore di run-time 7951 ##
> > ## Riferimento alla proprietà recordsetclone non valido ##
> >
> > significa che c'è qualcosa che non ho caricato
> > (o settato) ?
Controlla nei riferimenti alle librerie di avere il riferimento alla
libreria Microsoft DAO 3.51 (oppure 3.6 meglio)
> Il codice che mi hai dato
> l'ho inserito al on_click di un pulsante
> va bene oppure lo devo inserire in un punto preciso?
Va bene anche lì purchè il pulsante sia nella form.


title: Repeat:  problemi con recordset

text:
Il 21 Mag 2004, 11:48, "George" <
giorgio.ben...@libero.it
> ha
scritto:
> > > ## Errore di run-time 7951 ##
> > > ## Riferimento alla proprietà recordsetclone non valido ##
> > >
> > > significa che c'è qualcosa che non ho caricato
> > > (o settato) ?
>
> Controlla nei riferimenti alle librerie di avere il riferimento alla
> libreria Microsoft DAO 3.51 (oppure 3.6 meglio)
 Si il riferimento ci sta
c'e' forse qualche altra cosa da controllare?



title: Repeat:  problemi con recordset

text:
>  Si il riferimento ci sta
> c'e' forse qualche altra cosa da controllare?
no, assicurati di aver digitato correttamente il tutto.
Deve andare...


title: Repeat:  problemi con recordset

text:
Il 21 Mag 2004, 11:57, "George" <
giorgio.ben...@libero.it
> ha
scritto:

Private Sub Comando6_Click()
   Dim rs As DAO.Recordset <----------- Qui mi si blocca
   Set rs = Me.RecordsetClone
   rs.MoveFirst
    Do While Not rs.EOF
    MsgBox (rs(Testo0))
      rs.MoveNext
   Loop
End Sub
Questo è il codice che ho inserito
E se ho inserito librerie di riferimento contrastanti?



title: Repeat:  problemi con recordset

text:
Il 21 Mag 2004, 12:03,
myuse...@email.it
 (Gigi) ha scritto:
> Il 21 Mag 2004, 11:57, "George" <
giorgio.ben...@libero.it
> ha
> scritto:
> > > Si il riferimento ci sta
> > > c'e' forse qualche altra cosa da controllare?
> >
> > no, assicurati di aver digitato correttamente il tutto.
> > Deve andare...
> >
>
Scusa
  ho sbagliato il riferimento
 Private Sub Comando6_Click()
    Dim rs As DAO.Recordset
    Set rs = Me.RecordsetClone <----------- Qui mi si blocca



title: Repeat:  problemi con recordset

text:
[Cut]
>  Questo è il codice che ho inserito
>
>  E se ho inserito librerie di riferimento contrastanti?
GIGIIIIIIIIIIIIIII
DEVI ASSOCIARE LA MASCHERA A UNA TABELLA O A UNA QUERY.
Una maschera non associata non ha il RecordSetClone.
Ciao.
Eh eh eh


title: Repeat:  problemi con recordset

text:
"Gigi" <
myuse...@email.it
> ha scritto nel
messaggio
news:192Z107Z81Z37Y...@usenet.libero.it...

DAo 3.6 è messo prima di ADO 2.1?
MAssimiliano


title: Repeat:  problemi con recordset

text:
> GIGIIIIIIIIIIIIIII
> DEVI ASSOCIARE LA MASCHERA A UNA TABELLA O A UNA QUERY.
> Una maschera non associata non ha il RecordSetClone.
> Ciao.
>
> Eh eh eh
:-(
Si questo è andato bene.
ma se ho dei campi di testo non legati a nessuna tabella
e alla fine voglio leggerli tutti dalla prima all'ultima
maschera?
Devo creare una tabella finta?
( E non ti inca...re) ;-))
