Newsgroup: it.comp.appl.access
Titolo: Peso db

a seguito di un post precedente si era entrati in tema di peso db e mediante 
la funzione seguente pubblicata da RobertoA sono riuscito a capire dove il 
mio db prendeva parecchio peso.
ora chiedo una cosa
tutte le maschere che ho le ho create con il tema sabbia di access ma mi sa 
che facendo cosě in ogni maschera c'č incorporata l'immagine.
dove posso prendere il file sabbia per collegare lo sfondo in apertura e 
secondo voi č meglio collegarle le immagini di sfondo delle maschere o 
lasciarle incorporate?
grazie mille
poi passerň a fare quanto descritto in
v.a. 
http://www.donkarl.com/it?FAQ1.22
che mi ha consigliato Karl
Ciapa ki:
'====================================================================
' Name:    DocDatabase
' Purpose: Documents the database to a series of text files
'
' Author:  Arvin Meyer
' Date:    June 02, 1999
' Comment: Uses the undocumented [Application.SaveAsText] syntax
'          To reload use the syntax [Application.LoadFromText]
'      Modified to set a reference to DAO 8/22/2005
'====================================================================
Public Sub Documenta_Database()
10    On Error GoTo Err_DocDatabase
      Dim dbs As DAO.Database
      Dim cnt As DAO.Container
      Dim doc As DAO.Document
      Dim i As Integer
20    nome_dir = Application.CurrentProject.Path & "\PRG_ESP_TXT_" &
Format$(Now, "yyyy_mm_dd_hh_nn_ss")
30    If Len(Dir(nome_dir, vbDirectory)) < 1 Then
40        MkDir nome_dir
50        End If
60    Set dbs = CurrentDb() ' use CurrentDb() to refresh Collections
70    Set cnt = dbs.Containers("Forms")
80    For Each doc In cnt.Documents
90        Debug.Print "FORM ==> " & doc.Name
100       Application.SaveAsText acForm, doc.Name, nome_dir & "\" & doc.Name
& ".txt"
110       Next doc
120   Set cnt = dbs.Containers("Reports")
130   For Each doc In cnt.Documents
140       Debug.Print "REPORT ==> " & doc.Name
150       Application.SaveAsText acReport, doc.Name, nome_dir & "\" &
doc.Name & ".txt"
160       Next doc
170   Set cnt = dbs.Containers("Scripts")
180   For Each doc In cnt.Documents
190       Debug.Print "MACRO ==> " & doc.Name
200       Application.SaveAsText acMacro, doc.Name, nome_dir & "\" &
doc.Name & ".txt"
210       Next doc
220   Set cnt = dbs.Containers("Modules")
230   For Each doc In cnt.Documents
240       Debug.Print "MODULO ==> " & doc.Name
250       Application.SaveAsText acModule, doc.Name, nome_dir & "\" &
doc.Name & ".txt"
260       Next doc
270   For i = 0 To dbs.QueryDefs.Count - 1
280       Debug.Print "QUERY ==> " & dbs.QueryDefs(i).Name
290       Application.SaveAsText acQuery, dbs.QueryDefs(i).Name, nome_dir &
"\" & dbs.QueryDefs(i).Name & ".txt"
300       Next i
310   Set doc = Nothing
320   Set cnt = Nothing
330   Set dbs = Nothing
Exit_DocDatabase:
340       Exit Sub
Err_DocDatabase:
350       Select Case Err
          Case Else
360           MsgBox Err.Description
370           Resume Exit_DocDatabase
380       End Select
End Sub
-- 
Negrinelli Walter

scusate magari sono stato troppo lungo prima e qualcuno non ha letto la 
domanda
secondo voi è meglio collegarle le immagini di sfondo delle maschere o
 lasciarle incorporate?
questo vale sia per il peso del db ma anche per la sua utilizzabilità non è 
che dopo mi impieghi troppo a caricare una mascera perchè deve caricare 
l'immagine di sfondo
fatemi sapere per piacere un vostro parere
grazie mille

 fatemi sapere per piacere un vostro parere
Ciao Fausto.
Secondo me č molto meglio collegarle: l'mdb č piů snello e non noto alcun 
rallentamento nel caricare le immagini ogni volta.
Non so in che cartella Access abbia le immagini di sfondo predefinite (tipo 
sabbia).
Ciao
Silvio 

 delle maschere o lasciarle incorporate?
1. Lascarle perdere
2. Lascarle perdere
3. Devi sapere tu cos'è più importante: il peso o un momento
per scaricare l'immagine.
Con queste immagini ottimizzate di solito la differenza nel peso
è <100 kb/oggetto, ma certo se ci sono molti oggetti...
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it