Newsgroup: it.comp.appl.access
Titolo: Compattazione archivi, proprietà tabelle, query,etc...

ciao a tutti
spero che qlc di voi riesca ad aiutarmi a trovare la soluzione migliore a
questi quesiti
Dispongo di office 2000 dvl kit
****************************************************************************
cominciamo dalla compattazione
1) DoCmd.RunCommand acCmdCompactDatabase
Come si fa ad usare questo comando se mi genera sempre un errore che non può
essere eseguito ne da codice ne da macro non posso neanche usare il comando
"DoCmd.Quit" per chiuderlo perchè ovviamente una volta chiuso tutto è
impossibile farlo, essendo questo database collegato ad un'altro che
contiene le tabelle come posso dirgli il nome dell'altro database????
2) DBEngine.CompactDatabase "nome db", "nome dest db"
oppure JetEngine.
Ho già visto sul sito comune ma quello che vorrei sapere è "possibile che
non si possa compattare il DB senza dargli un nome di destinazione?" ogni
volta devo per forza cancellare quello vecchio e rinominare quello nuovo?
3) non è possibile usare un comando o un Vb tipo "strumenti-->utilità
db-->compatta" che è quello che voglio
potrei usare il metodo 2 ma siccome il db andrà in mano a persone asciutte
totali  come posso esser sicuro che le operazioni siano andate tutte bene
senza errori magari il programma si blocca prima di rinominare il file nuovo
ma dopo aver cancellato quello vecchio morale non funge + niente.
****************************************************************************
proprietà
questa è una vera spina nel fianco dover ogni volta cliccare sul tasto dx
chiedere le proprietà e poi nascondere tutte cose ad una ad una così mi è
venuta la genialità di creare una routine che permettesse di farlo in
automatico
mi selezione il mio bel DB tramite Vb trovo in automatico tutti i nomi delle
tabelle, query, maschere, etc.. (in maniera che lo si possa usare con qlc BD
di Access) e poi dovrei nasconderle e quì cominciano i problemi:
tramite questa procedura:
<For Each prp In .TableDefs(intCiclo).Properties
<contamitutto = contamitutto + 1
<Debug.Print contamitutto & " " & prp.Name & " = " & prp.Value
<Next
riesco ad avere alcune delle proprietà ma non quella che serve a me che
dovrebbe esser questa ma mi da sempre zero
<TableDefs(intCiclo).Attributes
oppure con questo comando:
DoCmd.RunCommand acCmdProperties
mi si apre la maschera ma devo esser io a cliccar su soluzioni???
scusate se mi sono dilungato ma spero di esser stato almeno chiaro nelle mie
richieste.
Grazie a tutti per evermi letto e spero che possiate aiutarmi
ciao
Alex Caponetto


Non ho capito che vuoi fare...
Antonio
P.S.
Una cuGGinetta di nome Samantha non ce l'hai?

 Una cuGGinetta di nome Samantha non ce l'hai?
come ti ho risp nell'altro mex  e si ma è di tuo gradimento???? hehehheheheh
saluti e grazie per l'aiuto
Alex Caponetto

 questo una procedura che mi nasconda tutte le tabelle le query etcc..
Ma ti basta nascondere la finestra database no?
Antonio

 Ma ti basta nascondere la finestra database no?
no ma tra le varie cose che faccio c'è anche questa e siccome e tra le più
lunghe e snervanti vorrei creare appunto una procedura ad ok

Non funge sigh sigh!!!
mi da questo errore
Il componente ActiveX non può creare l'oggetto: "Scripting.fileSystemObject"
ho provato anche a chiudere access e poi da prompt lanciare questo comando:
wscript.exe "C:\Documenti\Programmi Alex\Millenium\"Compact_chiudi.vbs
"C:\Documenti\Programmi Alex\Millenium\Millenium Gold.mdb"
e mi da lo stesso errore sono andato anche sul sito comune a verificare lo
script che è identico
non capisco bisogna registrare qualche dll
la cosa strana è che prima con il norton script block mi diceva che non
poteva cancellare i file e mi bloccava tutto ho rinominato il block e
riavviato la macchina (nav dalle opzioni mi diceva che non  poteva
disabilitarlo) ma mi creava il file temporaneo "rad268BC.tmp" oppure
"rad639B9.tmp" ma adesso non +
che faccio mi continuo a frustare o cambio lavoro??????