Newsgroup: it.comp.appl.access
Titolo: Problema su Riallega tabelle (routine di Alex)

Applicando l'esempio che è sul sito comune (Tabelle:1.16 Riallegare tabelle
(3) ( Funziona anche se il Backend e' protetto da password),Se il database
di back end ha un nome diverso da quello di esempio (DB_Back-END.mdb) non mi
funziona il ricollegamento:  Alex, help me....

 funziona il ricollegamento:  Alex, help me....
Quello č un Demo abbastanza vecchio e direi solo dimostrativo.
La procedura di Link delle tabelle č banale e semplice qualora
il BE sia solo 1, e ti sconsiglio di usare quel Demo, ma di
ricostruirti la stringa di connessione con la PWD.
In pratica creati una Tabella nel FE in cui salvi NomeTabella(da
Linkare)
Percorso e PWD, quindi se non trovi il BE apri il CmdDialog.
Se distribuisci l'applicazione il Percorso potrebbe essere semplicemente
il nome del BE, in quanto il Percorso parziale lo potresti salvare in
un Registro con l'installazione.
Vedi tu come preferisci.
@Alex 
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 @Alex
Ciao Alex e grazie per aver risposto.
Ho pensato di fare "da me" , anche per cercare di crescere...., facendo
eseguire una macro all'apertura della form di avvio che mi colleghi una o
più tabelle, e ci sono riuscito. Ho solo la necessità di capire come fare
per costringere l'utente a chiudere l'applicazione usando un pulsante di
comando da me predisposto sulla form del menu iniziale, anzichè chiudere
Access dal modo di default (crocettino in alto a destra), giacchè sul click
del pulsante da me predisposto, eseguo un'altra macro che cancella le
tabelle collegate all'apertura. (Perchè si creerebbero tanti collegamenti
alle stesse  tabelle con i nomi tipo  xxxxxx1, xxxxxx2, xxxxxx3, che non
servono a niente. Vedi se puoi aiutarmi. Ti ringrazio e Ti saluto

 servono a niente. Vedi se puoi aiutarmi. Ti ringrazio e Ti saluto
Diciamo che questo problema ti succede perchè usi una Macro, se
avessi realizzato la procedura via Codice sfruttando DAO
non sarebbe successo.
In ogni caso per evitare di chiudere Access puoi fare in 2 modi
semplici:
1)Usare una Form(Hidden nascosta, o meglio Visible=False) nella
quale sfrutti l'evento Unload, e forzi il Cancel=True nel caso
non sia richiesto dall'utente.
Questo impedirebbe la chiusura di Acccess.
2)Il metodo è sempre lo stesso, ma dovresti spalmarlo su tutte
le Form, nel caso tu non voglia usare una Form Nascosta.
Ci sono altri metodi ma sono molto complessi, ed in ogni caso
non così efficaci.


 ha scritto nel messaggio
news:a15bea29ad787a5535...@mygate.mailgate.org...

Alex sei gentilissimo!
Senti, io utilizzerei il tuo consiglio, non ho però caoito bene come
metterlo in pratica: Mi puoi fare un esempio?
La form nascosta chiamiamola Frm_nascosta, ponendo Visible a True, ma poi
cosa dovrei ancora scriverci di codice sull'evento Unload della form di
avvio?
Un picolo esempio, ti prego....
Ciao e grazie ancora...

 Ciao e grazie ancora...
Diciamo che la Form Nascosta la devi aprire su macro AutoExec
chiamado una Funzione così:
Public Function StartUp()
  DoCmd.OpenForm "NomeFormNascosta", , , , ,acHidden
  ' Se hai una Form di Presentazione metti anche questo
  DoCmd.OpenForm "NomeFormPrincipale"
End Function
Ora nella Form Nascosta metti:
Public AllowClose as Boolean
Private Sub Form_Unload(Cancel As Integer)
   ' Questo normalmente impedisce di chiudere
   ' Access in quanto la variabile istanziata
   ' avrà valore FALSE
   Cancel=Not AllowClose
End Sub
Ora serve qualcosa che metta quella variabile a TRUE
prima di Chiudere Access.
Dal punto che intendi gestire la chiusura di Access, supponiamo
sia un cmdButton, fai una cosa del genere:
Private cmdButtonClose_Click()
   Forms!NomeFormNascosta.AllowClose=True
   Docmd.Quit
End Sub
Ora io ho usato una dichiarazione Public in una form
per rendere visibile all'esterno la proprietà AllowClose
ma la tecnica più corretta sarebbe stata quella di usare
in modo appropriato la dichiarazione Property Let così:
Private mAllowClose as Boolean
Public Property Let AllowClose(value as Boolan)
  mAllowClose=Value
End Property
Ma questo è un sofismo di pignoleria....!


 ha scritto nel messaggio
news:8d566d9156cfce585f...@mygate.mailgate.org...

Ok Alex, ci siamo!
Grazie mille!
Ciao.