mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Calcoli in Access....come fare?

Mi sono creato un semplice database per registrare e tenere sotto
controllo le spese famigliari.
In pratica, ogni giorno registro le spese che vengono fatte in casa e le
attribuisco ad una determinata categoria di spesa.
Quello che vorrei fare è sommare le spese fatte in un mese (quindi un
solo mese) per ciascuna categoria di spesa oltre che il totale delle
spese fatte. Mi interesserebbe visualizzare questi risultati sia in una
maschera a video sia in fase di report di stampa.
Siccome inoltre voglio anche tenere sotto controllo l'accantonamento di
ogni mese, prevedo di inserire per ogni mese lo stipendio presunto. Ma
voglio farlo solo una volta per tutte ad inizio mese.
Come posso risolvere questi problemini?
Considerate che non sono un esperto di Access quindi chi sarà così
gentile da fornirmi risposte dovrebbe spiegarmi i passi uno per uno.
Grazie a tutti in anticipo.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Anch'io ho un problema molto simile al tuo..(guarda il mio treed) ..le somme
sono riuscito a farle per i campi numerici, ossia esempio per i costi di un
determinato prodotto venduto ho fatto la somma usando una casella di testo
non associata che ho introdotto nella maschera e poi sono andato nella
propietà del campo e alla voce Origine Controllo ho creato un espressione
che è =SOMMA ([NOMEDELCAMPODASOMMARE) così ho ottenuto la somma algebrica
del campo numerico NOMEDELCAMPODASOMMARE.
IO invece come te non riesco a fare la somma di un gruppo di dati che poi
credo che sia un conteggio...esempio io ho una casella combinata con tante
cattegorie Es: ANELLI BRACCIALI COLLANE....io vorrei riuscire a fare la
somma di quanti anelli di quanti bracciali ecc... ho venduto...e metterlo in
una sottomaschera all'interno di una maschera cliente...in modo da sapere
quanti tipi di oggetti ho venduto a quel cliente...per poi passare tutto ad
un report che mi crei un DDT (documento i trasporto) specivicando il numero
di anelli complessivo, di bracciali ecc....
Ciao ciao
Paolo

 ha scritto nel messaggio
news:EEbfb.5976$e6.1...@twister2.libero.it...

per le somme del gruppo usate le query:
create una query in creazione struttura
inserite la/le tabelle che servono con i relativi collegamenti tra le
tabelle
inserite i campi che vi servono
cliccate sul pulsante sommatoria del menù delle query
scegliete l'opzione raggruppamento per i campi che devono essere raggruppati
(ad esempio il gruppo)
e somma per i campi numerici
nella maschera principale inserite una sottomaschera con origine dati la
query che avete appena creato.
la stessa cosa  vale per i report (si può usare ovviamente la stessa query)
Newsgroup: it.comp.appl.access
Titolo: l'inserimento data  giornaliera in automatico

salve, per ragioni di lavoro devo programmare il servizio mensile ad
un gruppo di persone, ho realizzato un programma in access a mia
esigenza, fin quì tutto bene, ho due tabelle una con i nomi del
personale e una con, giorni ore e attività lavorativa, inserisco la
data di ogni giorno per tutto il mese per ogni singola persona;  il
tutto viene richiamato a mia richiesta con query, esiste un sistema
che la data mi venga impostata automaticamente per un anno intero su
ogni singolo dipendente? aggiungendo un nuovo dipendente la data deve
aver inizio da quel giorno. Non so, se ho illustrato bene il mio
broblema.
 Grazie a tutti Scossa.


Se ti basta mettere nella proprietà DEFAULTVAULE del campo Data
=Date() allora è semplice
se invece vuoi vedere generati i giorni come una sorta di Tabella
direi che la cosa si complica inquanto
devi proprio Generarli... anche se sinceramente non lo consiglio.
@Alex

scossa.

 wrote:

Ciao, come dice Alex, generare tutti i record per dipendente/giorno
per tutto l'anno può essere una bella rogna.
Essendo un'operazione quasi "una tantum" o meglio "semel in anno"
potresti crearti manualmente la tabella con Excel, utilizzando le
"comodità" del foglio elettronico, per poi copiarla in Access.
Ovviamente la cosa è ragionevole se i dipendenti interessati sono
relativamente pochi.
Altrimenti l'alternativa è una query di accodamento all'interno di una
doppia nidificazione
per ciclare i dipendenti e le date.
Ciao
Alberto


La cosa migliore è creare una tabella Temporanea apposita ed
associarla ad una Maschera in visualizzazione Continua... ma la
realizzazione non è banale e se non hai una sufficiente Autonomia nel
VBA rischi di intrappolarti in un lavoro che non riesci a gestire.
In sostanza dovresti avere di base 2 Tabelle relazionate 1-Molti
T1 Elenco Anagrafiche
IdUser
Ecc...
T2 DettagliAppuntamenti ' ho chiamato così per far capire che vengono
salvati i dati con le DATE di cui sopra.
IdAppuntamento
IdUser
La T2 relazionata 1-M come ovvio...!
Serve però una 3° Tabella TEMP da riempire in base all'esigenza che
dicevi, quindi sapendo che lasso temporale vuoi prendere in
considerazione devi creare un ciclo
per ogni USER della T1 e generare un Record in questa Tabella per ogni
giorno nell'intervallo desiderato verificando nella T2 eventuali
Appuntamenti già presenti e nel caso inserirli...!
A questo punto su ogni Modifica di Record in questa Maschera che
intercetterai con AfterUpdate e AfterInsert(per il NEW)... dovrai
andare a gestire via Codice
l'EDIT e l'ADDNEW della T2 che dovrai sincronizzare per i soli
Record...!
L'esigenza della T3 è solo per poter avere Graficamente tutti i giorni
e non solo quelli già impegnati nella T2, ed ovviamente per evitare di
riempire la T2 con Appuntamenti INUTILI solo per la visualizzazione.
Spero di essere stato chiaro... ora da quì lo sviluppo sta a te, e la
dove incontri specifici li vediamo uno per volta.
@Alex
Newsgroup: it.comp.appl.access
Titolo: Messaggi Access

Buongiorno a tutto il NG.
Sto lavorando su un database di access, e mi si presenta questo problema:
Access non mi da pi� i messaggi di avviso.
Ad esempio se apporto modifiche alla struttura di una maschera (o tabella, o 
report, ecc.), alla chiusura Access non mi chiede pi� se voglio salvare o 
meno le modifiche apportate.
Da cosa dipende? Come faccio a ripristinare questi messaggi?
Ho provato ad eseguire il codice "Docmd.SetWarnings True", a chiudere il 
database o ad eseguire "Compatta e Ripristina Database" ma non funziona.
In passato ho risolto il problema riavviando il computer.
Grazie
Davide 

 ha scritto nel messaggio 
news:4ae1795e$0$1105$4faf...@reader1.news.tin.it...

C'� un articolo interessante sull'interessantissimo sito di Karl Donaubauer 
(chiss� se l'ho scritto giusto). Le seguenti istruzioni eliminano gli 
avvisi, impostandole con True li ripristinano.
    Application.SetOption "Confirm Record Changes", False
    Application.SetOption "Confirm Document Deletions", False
    Application.SetOption "Confirm Action Queries", False
Ciao
Antonio

 ha scritto nel messaggio 
news:4ae1929b$0$694$5fc...@news.tiscali.it...

Ho provato ad eseguire il codice che mi hai consigliato 
(Application.SetOption...True ), ma non funziona.
Hai qualche altra soluzione?
Davide

 ha scritto nel messaggio 
news:4ae1989c$0$1108$4faf...@reader1.news.tin.it...

provato a vedere in strumenti -opzioni modifica/trova (su access 2003)
ciao
max 

 ha scritto nel messaggio 
news:hbs6ij$bto$1...@news.task.gda.pl...

Si, in Strumenti-->Opzioni-Modifica/Trova  ci sono tutti � tre i flag 
(Conferma Modifiche Record, Conferma Eliminazione Documenti, Conferma Query 
di comando).
Ma il problema rimane.
Per� ho appena provato, lasciando aperto il database, a terminare il 
processo MSACCESS.EXE dal Task Manager.
Ho riaperto il database e fortunatamente il problema non si presenta pi�. 
Gli avvisi ora compaiono correttamente.
Grazie per l'aiuto.
Davide
Newsgroup: it.comp.appl.access
Titolo: si può salvare un report in word?

Ciao,
� possibile salvare un report in formato word?
ho creato un report che mi compila una scheda, vorrei per� salvarla in
word (scheda per scheda). in modo che possa essere disponibile anche per i
posteri nel caso in cui si decidesse di smettere access...
� possibile?
devo ricorrere ad una stampa unione di word (e ricostruirmi il form che �
graficamente complesso?)
ciao!
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 graficamente complesso?)
le formattazioni di un report access, che io sappia, le perdi, esce un rtf 
scarno
ma esportare in PDF?
Antonio 

 Antonio
utilizzo access2003 e non mi pare che sia in grado di farlo... 
volendo su uno dei pc � installato acrobat distiller ma non so se sarei in
grado di integrare la cosa... (salvo non trattarlo come una comune
stampante, in questo caso dovrei dirgli di non stampare sulla predefinita
ma sull'acrobat e soprattutto sperare che tutto questogiri anche sotto
accesruntime2010... 


 accesruntime2010...
no no no...
segui bene i thread aperti da me recentemente
ci sono tutte le indicazioni per preparare un applicativo che esporta in PDF 
il report usando le dll di lebans
funziona che � una bellezza
ci potrebbe essere il problema della modifica nel codice del formato di 
output semmai se ne riparla, cmq c'era un suggerimento di karl a tale 
proposito
Antonio

Newsgroup: it.comp.appl.access
Titolo: Suddivisione Tagli Euro..

Ciao, non so se è il posto giusto ma....
Ho un problema, dovrei creare un report, contenente ad es. una cifra in euro
di 1.514,14 ? e dividerla per quanti tagli ha l'euro ... mi potresti aiutare
?

 ha scritto nel messaggio
news:0fLQb.185585$_P.65...@news4.tin.it...

Dipende tutto da quali siano i tagli che vuoi usare.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: controllo su checkbox: avviso di non compilazione

Salve al ng.
In una maschera "maschera1" che trae i dati dalla "tabella1" ci sono 20
checkbox, collegati ognuno a 20 campi di tabella, con le regioni italiane.
Per ogni record della maschera ho la possibilità di scegliere da 1 a tutti e
20 i checkbox, dunque non ho potuto usare il gruppo di opzioni.
Vorrei che, una volta completata l'immisione dei dati del singolo record, al
passaggio ad altro record (o chiusura della maschera) un msgbox avvisasse
l'utente nel caso in cui non fosse stato selezionato nessuno dei checkbox.
Non sono riuscito a trovare una soluzione trattando la questione con i tag
comuni perché in quel modo mi chiede di "spuntarli" tutti.
Insomma, dev'essere impossibile non spuntarne nemmeno uno; almeno una
regione deve essere selezionata.
Grazie
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

"serghej" <serg...@yahQQoQQo.iQQt> ha scritto nel messaggio 
news:81Z119Z165Z34Y1...@usenet.libero.it...

Bhè praticamente ti basta sapere che uno dei 20 è spuntato per rendere OK il 
record no?
e allora ti crei un ciclo del tipo :
Dim validazione as string
Dim conta as integer
    For conta=1 to 20
      If Me.Controls("Opzione"& conta).value = true
        validazione= "OK"
      Else
      End If
   Next conta
If validazione ="OK" then
    Msgbox "RECORD OK"
Else
    Msgbox "ERRORE !!! MANCANO DATI"
End If
-- 
-- 
Ciao
Pablitomf (Maurizio Facciuti)
-----------------------------------------------------------------
Access: 97 e 2000
ASP
-----------------------------------------------------------------
http://www.accessgroup.it/
-----------------------------------------------------------------
Il mio motto :
""Non mi fido molto delle statistiche, perchè un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media."
Newsgroup: it.comp.appl.access
Titolo: Smistamento stringhe, file testo, in due tabelle (help)

Ho un file di testo cosi composto:
Milano
    Rossini
    Bianchi
    Verdi
Mantova
    Braga
    Ferrari
    Martinelli
    Boldi
Varese
    Comincini
    Vivenzi
Vercelli
    Marini   ecc.....
La mia necessita e di importare il file preesistente in due tabelle dove
tbl1 sono
le citta e tbl2 sono i cognomi per poi poter creare una maschera che mi
permettera di visualizzare i cognomi relazionati alle citta.(scusate le
terminologie bizzarre ma sono nnneofita):-)
Grazie a chi mi puo fare un esempio dettagliato
Ciau;-]

 terminologie bizzarre ma sono nnneofita):-)
Se sei sicuro che i nomi sono sempre preceduti da spazi, puoi fare (a grandi
linee, potrai dovrai usare un po' di help per vedere il dettaglio) questo
procedimento.
Importi il file di testo in un'unica tabella. Avrai tanti record, uno per
nome e per città, però i nomi iniziano per spazi.
A questo punto, da codice, aprirai un recordset associato a questa tabella,
te la scorri tutta, e per ogni record, testerai quale sia il primo
carattere.
Se è uno spazio, allora è un nome e lo accoderai alla tabella dei nomi (lo
fai di nuovo con un recordset, con un addnew), altrimenti lo accodi alla
tabella delle città.
Quando accodi il nome accoderai trim(campo) così ti toglie gli spazi.
Manca il discorso del legame. Dovrai allora usare un contatore, che parta da
1. Alla prima città accodi oltre alla città anche il valore del contatore
(1), e userai lo stesso valore per tutti i nomi che incontri, fino alla
successiva città (valore senza spazi iniziali). A questo punto incrementi il
contatore e iteri il procedimento.
Alla fine le due tabelle saranno legate con il campo numerico.
Antonio

Newsgroup: it.comp.appl.access
Titolo: Record: ultimo, ma non ultimo...

Salve a tutti,
    ho la necessità di impostare una stringa SQL per selezionare da una
tabella l'ultimo record che può non essere l'ultimo in assoluto, ma l'ultimo
in cui era presente un certo valore in un campo. Grazie per gli eventuali
suggerimenti.
    Mauro.

 ma l'ultimo in cui era presente un certo valore in un campo.
[...]
    Consulta la Guida in linea di Microsoft Access alla pagina:
        Funzioni DFirst, DLast
ed alla pagina:
        Funzioni di aggregazione SQL
della sezione:
        Guida di riferimento di SQL per Microsoft Jet
    (Facci sapere se ed eventualmente come hai risolto. Grazie.)
--
Ciao :o)
Maurizio
--------
?SPQR(C)
 X
--------
Newsgroup: it.comp.appl.access
Titolo: Come costruire incrementalmente un recorset?

Salve, scusate i miei numerosi messaggi di richiesta aiuto ma per la prima
volta mi sto avventurando nella programmazione e mi vengono i dubbi tutti
contemporaneamnte
Adesso mi piacerebbe sapere come si costruisce un recordset
incrementalmente, aggiungendo un record alla volta, ed ovviamente anche come
si toglie un record dal recorset.
Mi servirebbe almeno un'idea per sfogliare l'help, ancora meglio un
pezzettino di codice in esempio.
Grazie
-------------------------------------
Umberto Turini
umbturin...@libero.it
     < NOTA: L'indirizzo è stato modificato!!

 wrote in message
9609044...@master.cdc.polimi.it...

Se per recordset intendi una tabella, cerca sull'help "Query di
accodamento".
Roberto

 wrote in message
6br15.181388$VM3.1...@news.infostrada.it...

Scusami, ma se si tratta di una tabella mi sono dimenticato dei due modi più
facili:
1) Aprendola in modalità Foglio Dati
2) Tramite una maschera
Roberto

 Roberto
ROTFL!
-- 
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------
Newsgroup: it.comp.appl.access
Titolo: prima di aggiornare

Su un controllo di una maschera e sull'evento prima di aggiornare per
evitare di salvare il record inserito ho messo una rutine che mi controlla i
dati inseriti e se sono già presenti con docmd.cancelevent mi ferma sul
controllo ma mi lascia i caratteri inseriti.Come faccio a eliminare i
caratteri inseriti precedentemente sul controllo, per un nuovo inserimento?
Ciao

XL ha scritto:

Lo imposti a null:
  Me.Nomecontrollo = Null
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

 ha scritto nel messaggio 
news:JFIQe.36510$HM1.1...@twister1.libero.it...

Se sei ancora in modifica e vuoi annullare tutti i dati inseriti nei 
controlli puoi utilizzare:
Me.Undo
Ciao.
-- 
Sergio MAZZA 


Non funziona in quanto l'evento è su prima di aggiornare mentre con Me.Undo
funziona ma mi svuota anche i dati inseriti nei controlli precedenti. Mi
servirebbe qualcosa che emuli il tasto Esc per me è l'unico che svuota il
controllo lasciando inalterati gli altri.
Graie per eventuali suggerimenti

 con Me.Undo funziona ma mi svuota anche i dati inseriti nei controlli
precedenti. Mi servirebbe qualcosa che emuli il tasto Esc per me è l'unico
che svuota il controllo lasciando inalterati gli altri.
Grazie per eventuali suggerimenti
Ciao

 Ciao
Te l'avevo scritto che Undo avrebbe annullato tutte le modifiche non salvate; l'escape annulla le modifiche solo sull'ultimo 
controllo dove sono stati inseriti i dati.
Quindi se vuoi annullare il valore ad un controllo ben specificato devi utilizzare il suggerimento di namor.
Es.
Private Sub Form_BeforeUpdate(Cancel As Integer)
If MsgBox("vuoi annullare il valore?") = vbYes Then
    Me!nomeControllo = Null
    Cancel = True
End If
End Sub
Ciao.
-- 
Sergio MAZZA

Newsgroup: it.comp.appl.access
Titolo: Month selezionare tutti i record di un mese

io ho una queri che mi somma i valori di una  mese  i campi che ho sono
questo
data                valore
01/01/2005     5
la queri l ho fatta cosi
SELECT data, sum(valore)
FROM tabella
GROUP BY data
HAVING (data = month(data2))
se in data2 metto il valore 1 non mi tira fuori niente se metto 01 nemmeno
cosa sbaglio? ho guradato nell help ma non mi dice nulla in +

 HAVING (Month(data) = [data2])
Cinzia
Newsgroup: it.comp.appl.access
Titolo: Spostamento su ultimo record inserito

Da una frm a pop up inserisco un record in una sottomaschera.Facendo
riferimento all'insieme Forms forzo l'aggiornamento della sottomaschera ma
vorrei anche che la sottomaschera si posizionasse sull'ultimo record
inserito.Ho provato con
         Forms!frmPrincipale!frmSottomaschera.Requery
         Forms!frmPrincipale!frmSottomaschera.RecordsetClone.MoveLast
Ma anche se si aggiorna non si posiziona sull'ultimo record.
Ma se po fa'?
Sunrex


Prova ad esplicitare il controllo dell'ultimo record che ricerverà il focus
-- 
_ _
Ciao
MAssimiliano Amendola
Cisa1 - I° Conferenza Italiana per Sviluppatori Access Arezzo 4+5
Giugno 2005 Sono aperte le iscrizioni  Info:  
www.donkarl.com/it

 ha scritto nel messaggio
news:ser9e.3023$TR5...@news.edisontel.com...

Cioè sposto il fuoco su un controllo della sottomaschera e poi parto col
recordsetclone.movelast?
SunRex

 Sunrex
-- 
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------

 Roberto
Ciao Roberto
La sintassi giusta č
         Forms!frmPrincipale!frmSottomaschera.Requery
         Forms!frmPrincipale!frmSottomaschera.Form.RecordsetClone.MoveLast
        Forms!frmPrincipale!frmSottomaschera.Form.Bookmark =
Forms!frmPrincipale!frmSottomaschera.Form.RecordsetClone.Bookmark
cioč oltre alla tua riga mi ero scordato il .Form sul MoveLast
Grazie
SunRex
Newsgroup: it.comp.appl.access
Titolo: Barra allineamento e ridimensionamento bug ?

Salve
Ho notato che la barra in oggetto anche se attivata ha i pulsanti che
non funzionano
qualcuno sa il perchè?
winXp acc2002 sp3
Alex

miciomao ha scritto:

bhè i pulsanti dovrebbo diventare 'ATTIVI' a seguito di una selezione di 
oggetti allineabili o da ridimensionare ....  non lo fa ?
IvanDaBologna

nain

tra l'altro ho notato un'altro fatto
se andate su Codice li vi sono altre barre
c'è nè una che si chiama UserForm
è identica a quella in ogetto e anche li non funzica
anche perchè....... dovrebbe li ? che ci sta a fare ?
forse c'era qualcuno che la spingeva ?
spingitori di barre al cioccolato su Access2002
bhà.....

miciomao ha scritto:

non saprei perchè e' presente anche questa barra criptica.
Certo è che funziona benissimo in Excel dove le Userforms si possono 
progettare solo dall'ambiente VBA .... lì i pulsanti si accendono al 
momento giusto!
Forse una compatibilità abbandonata per il fatto che esiste un editor di 
maschere molto più evoluto all'interno di Access...
Tentativi abbandonati sulla strada dell'efficienza !! ;))
IvanDaBologna

Newsgroup: it.comp.appl.access
Titolo: Stampa di un report

Ciao a tutti.
Una domanda forse scema, ma come faccio a stampare un report se l'ho
aperto in modalità preview?
Mi spiego meglio: nell'applicativo non è presente niente a livello di
barre degli strumenti o altre cose simili (eliminate da
strumenti/avvio...) e quindi quando clicco sul pulsante che mi apre il
report, il report è là bello e pronto ma senza che lo si possa stampare.
In realtà è presente ancora il menu classico File, Modifica, ecc. ma se
uso quel menu (File/Stampa) ciò che viene stampata è la maschera dove
era presente il pulsante per la stampa del report. Help me, please.
Thanx
giaconet

 ha scritto nel messaggio
news:art95a$lftsk$1...@ID-71483.news.dfncis.de...

Una volta aperta l'anteprima del report, con il tasto destro del mouse
clicca in un punto qualsiasi del preview del report; ti di aprirà un menu a
scelta rapida dal quale sceglierai il comando Stampa...
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:5dqE9.20467$2B1.5...@twister2.libero.it...

Forse ho un po' esagerato con le "protezioni" perché cliccando con il dx
sul preview non succede proprio niente. Forse ho messo mano a qualche
proprietà del report e l'ho settata in maniera troppo restrittiva (ma
non saprei dire quale).
Si vede che non ho molta confidenza con i report...
Grazie cmq, adesso ci "sbareo" un po' alla ricerca della soluzione.
Bye
giaconet


Ho risolto. L'impostazione "restrittiva" era il flag "Menu di scelta
rapida predefiniti" nella maschera di Avvio (che ho naturalmente
deselezionato).
Ma possibile che flaggando questa casella non sia più possibile stampare
un report in preview??
Bye
giaconet

 giaconet

Newsgroup: it.comp.appl.access
Titolo: Esportare dati da SQL server - Come ?

Ciao a tutti,
vi faccio una domanda forse idiota: un cliente ha un database con cui
raccoglie i dati dei propri clienti appoggiato su SQL server.
Personalmente non ho mai avuto occasione di operare su questo tipo di RDMS,
se volessi fare una esportazione dei dati in un file di testo , come dovrei
operare ?
Grazie
Fabio

"Fabietto" <fab...@NOSPAMsupereva.it> ha scritto nel messaggio
news:wC7J7.18259$5l.4...@news1.tin.it...

forse sei ot, comunque guardati DTS nei books on line di sql server

Newsgroup: it.comp.appl.access
Titolo: come cercare record specifici in una tabella correlata

Lavoro con Access 97 e sistema operativo Windows NT4.
Ho una tabella Anagrafica correlata ad una tabella "Avanzamenti di
qualifica" con la relazione uno a molti.
Ho la necessità di visualizzare in una Form, l'ultima qualifica acquisita
(campo Qualifica). La routine che segue, attivata "su apertura maschera
anagrafica", genera un errore di Run-Time 3070 " Il modulo di gestione di
Database Microsoft Jet non riconosce 'varX' come nome di campo o espressione
valida".
Private Sub Form_Open(Cancel As Integer)
    Dim varX As Integer
    'Sub TrovaRecord()
    Dim dbs As Database, rst As Recordset
    Dim strCriteri As String
    ' Restituisce il riferimento al database corrente.
    Set dbs = CurrentDb
    ' Definisce i criteri di ricerca.
    varX = AnagID
    strCriteri = "[DataAvanzamento] Is Not Null And [AnagId]= varX"
    ' Crea un oggetto Recordset di tipo dynaset in base alla tabella
Avanzamenti.
    Set rst = dbs.OpenRecordset("Avanzamenti", dbOpenDynaset)
    ' Trova l'ultimo record corrispondente.
    rst.FindLast strCriteri
' Controlla se il record è stato trovato.
    If rst.NoMatch Then
        'MsgBox "Impossibile trovare record "
        'Debug.Print rst.RecordCount
        Qualifica = " "
    Else
        Qualifica = rst!CodQual
    End If
    rst.Close
    Set dbs = Nothing
End Sub
Qualcuno può aiutarmi?
Ringrazio anticipatamente.   Agateno Turrisi

     strCriteri = "[DataAvanzamento] Is Not Null And [AnagId]= varX"
Senza aver controllato altro mi pare che debba essere
strCriteri = "[DataAvanzamento] Is Not Null And [AnagId]= " & varX
CUT
Ciao Nicola
--
email:sostituire inwind a NOSPAM

 [cut]
non capisco cos'e' AnagID
varX = AnagID
in ogni caso il criterio va scritto cosi':
se varX e' numerico:
strCriteri = "Not [DataAvanzamento] Is Null And [AnagId]=" &  varX
nel caso fosse un stringa:
strCriteri = "Not [DataAvanzamento] Is Null And [AnagId]='" &  varX & "'"
-- 
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
----------------------------------
Newsgroup: it.comp.appl.access
Titolo: Trasformare testo in numero

Salve a tutti,
esiste la possibilità di traformare un testo in numero
esempio:
testo : "004969"
numero = 4969
grazie
ringo

 ha scritto nel messaggio
news:b350d1$99d$1...@newsread.albacom.net...

usa la funzione val()
besos

numero = 4969
Usa la funzione val():
val("004969") ritorna il numero 4969
ciao

 ha scritto nel messaggio
news:b3513i$8l7$1...@lacerta.tiscalinet.it...

grazie 1000!

Newsgroup: it.comp.appl.access
Titolo: esportare query in foglio XLS

Ciao a tutti
ho un db con ua tabella collegata contenente i clienti di un'azienda,
attraverso delle query (esattamente 18) suddivido questi clienti in base ai
rappresentanti di zona
ho creato una macro che prende ad una ad una queste query e crea per ognuna
un file XLS con i dati filtrati (18 file XLS)
I file XLS ottenuti contengono un solo foglio che prende il nome dalla query
da cui hanno origine
quindi la mia richiesta è:
come faccio a far dare SEMPRE lo stesso nome a tali fogli per tutti i file
XLS generati?
grazie in anticipo a chiunque mi aiuti
Nicola


wrote:

posta il codice che usi, e vediamo di _ottimizzarlo_
Ciao :)

Newsgroup: it.comp.appl.access
Titolo: record successivo il terzo

In un codice c'è scritto:
Frm.RecordsetClone.MoveFirst
Frm.RecordsetClone.MoveNext
ovvero trova il primo record  e poi passa al successivo
la tabella è il ordine discendente quindi l'ultimo è il primo e il prossimo 
è il precedente.
Come posso scrivere che il next record non è il precedente ma tre prima ?
Frm.RecordsetClone.     +3?
grazie 

 ha scritto nel messaggio news:ejac25$dco$1...@tdi.cu.mi.it...

Vuoi posizionare il Recordsetclone sul terzultimo record?
Frm.RecordsetClone.Move(Frm.Recordsetclone.RecordCount - Frm.Recordsetclone.Absoluteposition - 3)
Vuoi posizionare il Recordsetclone sul quartultimo record?
Frm.RecordsetClone.Move(Frm.Recordsetclone.RecordCount - Frm.Recordsetclone.Absoluteposition - 4)
Vuoi posizionare il Recordsetclone sul penultimo record?
Frm.RecordsetClone.Move(Frm.Recordsetclone.RecordCount - Frm.Recordsetclone.Absoluteposition - 2)
Da qualunque record si trovi il cursore, e in un colpo solo. 


Nel mio caso si è posizionato nel tero record , ma  non è quello desiderato.
Tra quelli filtrati è andato nel terzo partendo dall'inizio e non dalla 
fine.
Come indico che il conteggio deve partire dalla fine : con movefist mi 
posiziono alla fine
grazie 


Frm.RecordsetClone.Move + o - n
-- 
ac
email: w+1=x

 grazie
Allora per il terzo record devi scrivere
Frm.RecordsetClone.Move (3 - (Frm.Recordsetclone.Absoluteposition + 1))

 email: w+1=x
ciao 


Perfetto.
Ho imparto un'ultra cosa utile.
ciao 

 mi dà errore di automazione
Frm.RecordsetClone.Move -3
Lo uso e "dovrebbe" funzionare
-- 
ac
email: w+1=x

 "Michele (Giò)"  wrote

Si, avrai notato che in qualsiasi posizione si trovi il cursore, questo va sempre a posizionarsi sul 
terzo. Problemi ci sarebbero invece se il cursore fosse posizionato su un record nuovo. in questo 
caso la proprietà absoluteposition perderebbe significato (-1) e la funzione non sarebbe in grado di 
funzionare correttamente.
Michele
Newsgroup: it.comp.appl.access
Titolo: Cambia Colore Record (HelPHelp!!) -II°post

Ciao 
mi sapete spiegare come posso cambiare il colore di un record che 
soddisfa ad una condizione ver/falso nel report?
Esempio
Ordine evaso colore nero
Ordine in attesa colore rosso
Grazie, ciao
-- 
B&B
Inviato da 
www.mynewsgate.net

 Grazie, ciao
Nel report:
Da mettere nell'intestazione del raggruppamento dove hai il controllo (se
č una textbox):
If [Me]![TUOCONTROLLOVEROFALSO].value = true Then
[Me]![TUOCONTROLLOCHEDEVECAMBIARECOLORE].forecolor= 255 (ROSSO)
else
[Me]![TUOCONTROLLOCHEDEVECAMBIARECOLORE].forecolor= 0 (NERO)
end if
Dovrebbe funzionare, ciao!
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Newsgroup: it.comp.appl.access
Titolo: Inserimento immagini JPEG in campo OLE ?

Con Access 97 vorrei poter inserire da codice delle immagini jpeg in un
campo Oggetto OLE (in ogni record c'è un'immagine differente) per poi
visualizzarle in un report. Qualcuno di voi sa come fare?
Grazie anticipatamente.

 ha scritto nel messaggio
news:oqEq8.114046$1S3.3...@twister1.libero.it...

Ci sono vari metodi per farlo, ma e' sconsigliabile.
Meglio seguire l'esempio del sitocomune sulla gestione delle immagini.
Se propio non puoi fare a meno degli ole prova con object.action =
acOlePaste dopo aver caricato nella clip l'immagine con un activex che
consente il caricamento del file e la copia nella clip  ( es :XImgEdit v3.0
www.softuarium.com
),
non sono sicurissimo se funzioni anche coi jpg, con i bmp sono sicuro.
Ciao.
Ale.

Newsgroup: it.comp.appl.access
Titolo: [OT] Augurisssssssssssimi

Tanti auguri a chiunque nel NG per l'anno nuovo, che sia sereno proficuo e 
pieno di novità.
-- 
Ciao
geppo 

"geppo" <c...@tin.it.invalid> ha scritto nel messaggio 
news:rDT6l.139221$Ca.2...@twister2.libero.it...

Buon 2009 a tutti...
Ciao.
-- 
Sergio MAZZA 

Ciao.
Ringrazio e contraccambio
-- 
Questo articolo e` stato inviato dal sito web 
http://www.nonsolonews.it

Newsgroup: it.comp.appl.access
Titolo: grafico pivot

Salve a tutti volevo chiedere come risolvere un problemino con un grafico
nella barra delle x ho data per trimestri
se lo uso con access tutto ok posso fare espandi comprimi in modo per 
esempio di vedere il fatturato annuo o mensile
se uso il run-time di access questo non � possibile
posso aggiungere qualcosa via codice che mi espanda e comprima questa 
funzione?
grazie in anticipo
Walter

 ha scritto nel messaggio 
news:4ae0776f$0$1094$4faf...@reader3.news.tin.it...

posso abbandonare l'idea o mi sono spiegato male grazie a tutti
Newsgroup: it.comp.appl.access
Titolo: stampa dei decimali...

ciao a tutti..
ho un piccolo problema che non so come risolvere..
in una maschera visualizzo un controllo con un numero con  2 decimali..
esempio 5,50... mentre quando lancio l'anteprima di stampa e poi 
successivamente la stampa
mi stampa 5,5 mentre vorrei 5,50....
ho controllato nel controllo ;.)) ed � impostato a 2 decimali..
come fare ??
grazie..
Giuseppe 

 Giuseppe
Devi applicare la formattazione testo ad un numero...!
Un numero inteso come DataType Numerico applica la soppressione degli
zeri.
Quindi devi convertire in Stringa usando FORMAT$(Valore,"#,00")
@Alex

 Giuseppe
Devi applicare la formattazione testo ad un numero...!
Un numero inteso come DataType Numerico applica la soppressione degli
zeri.
Quindi devi convertire in Stringa usando FORMAT$(Valore,"#,00")
----------------
grazie Alex... ma non sono molto pratico di Access (2003)... mi potresti 
dire
dove devo inserire o convertire la suddetta stringa ???
G
Newsgroup: it.comp.appl.access
Titolo: stampa di report stabilito da maschera

ciao,
ho realizzato una maschera che contiene alcuni campi:
cognome
nome
indirzzo
data
gara
...
io vorrei che quando l'utente si posiziona al''interno della maschera (ad
esempio su campo nome  cognome rispettivamente pico pallino) si possa
visualizzare e stampare il report di solo quel nome e cognome stabilito.
come posso fare
grazie  a tutti quelli che mi risponderanno Sara
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 grazie  a tutti quelli che mi risponderanno Sara
Vedi su help
docmd.openreport con particolare attenzione al parametro criterioWHERE
Antonio
Newsgroup: it.comp.appl.access
Titolo: Struutura a schede

Ho una form con struttura a schede_:
testata fattura               form fattura
dettaglio fattura           form dett fatt +casella riepilogo
Se sono sul primo record  e passo alla seconda scheda tutto OK, ma se mi
sposto sul record successivo e vado alla seconda scheda la casella di
riepilogo non si aggiorna  tranne se non uso  AGGIORNA DATI o se non mi
posiziono
sulla casella di riepilogo dove su ATTIVATO ho inserito un refresh.
Qualcuno mi puņ aiutare ad automatizzare il tutto

 ha scritto nel messaggio
news:hYmja.78914$i26.2...@news2.tin.it...

Credo che un casella_riepilogo.requery al momento apportuno ti risolva il
problema per esempio sull'evento click del tabcontrol o della page (non
ricordo quele dei due disponga di tale evento)
Ciao, omnitow
Newsgroup: it.comp.appl.access
Titolo: Editazione Query

Si puo' evitare l'editazione delle query in un MDE in A2K ?
Tutto il resto e' bloccato e le query no.
E' un BAG o ha una ragione precisa ?
Grazie a tutti !

 ha scritto nel messaggio
news:CyCT9.103251$Ou4.3...@twister2.libero.it...

Creati le Query Runtime con QueryDefs, poi le cancelli sempre Runtime.
Non perdi ore per questa operazione, e se crei Qry complilate non ti accorgi
nemmeno.
Alternativa è protezione utente.....!!
Non sò se ci sia qualche altro metodo.
@Alex.

 ha scritto nel messaggio
news:znQT9.105473$TC5.3...@twister1.libero.it...

Ok Alex, grazie mille !

Newsgroup: it.comp.appl.access
Titolo: Silvio, chi manda Carabinieri a rubare in Cassazione ?

Silvio, chi manda Carabinieri a rubare in Cassazione ?
Silvio, ma sei tu che mandi i Carabinieri a rubare i documenti in 
Cassazione,
approfittando della legge MANCINO,  sulla  NON  RILETTURA delle carte, per 
assolvere i mafiosi ???
Io di certo non li mando;  e  se  non  tu, che ne hai il controllo, chi  li 
manda ?
SOLO  COS�  LA  MAFIA  E  I  DELINQUENTI  SI  SALVANO  DALLE  CONDANNE  !!!
MA  QUANTO  SIETE  BRAVI   TU  E  I  TUOI  PICCIOTTI    !!!!!!
FATTA  LA  LEGGE, (1992-NICOLA MANCINO)  E  TROVATO  L' INGANNO  !!!
E  LA  MAFIA  CAMPA   E  REGNA   SULLA  REPUBBLICA  !!!!!!!!!
====================================================
Siamo certi che con il PARTITO  DELL'AMORE,  questi bravi militari,
al prossimo furto, lasceranno i giro dei preservativi, magari usati da te.
====================================================
A  proposito, che ne � delle tue truffe fatte anche alla NASA ????
Gli Americani ne hanno le palle piene di queste tue truffe, o sbaglio ???
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
Presidente  Napolitano,  quando  lo cacci  dal  governo, questo delinquente,
che continua a mietere vittime innocenti, ed a perpetrare truffe in Europa,
Olanda  compresa,  ed  in  America, con denuncie che si estenderanno
prevedibilmente  anche ad altri continenti  ?
ED  INTANTO  HA  DERUBATO  GLI  ITALIANI,  DIVENTANDO RICCHISSIMO,
DA  PEZZENTONE  CHE  ERA ???
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
PER  LA  CRONACA, :   NON HO MAI VOTATO COMUNISTA, caro  truffatore  dell' 
AMMMMMMMORE   (Alla  Noemi - diction - please !!!)
AKI

 ha scritto nel messaggio 
news:7ph%m.74110$813....@tornado.fastwebnet.it...

Newsgroup: it.comp.appl.access
Titolo: dimensione report che cambiano

Ringrazio ancora chi mi ha aiutato ieri nel problema del conteggio dei
record!!
GRAZIE GRAZIE GRAZIE
ha fnzionato tutto a meraviglia!!!!
Ora perň ho un altro problema: ho creato un report che dovrebbe avere delle
dimensioni specifiche, per intenderci le dimensioni di una tipica busta
gialla di media dimensione!!!!
ora, innanzi tutto non sono riuscito ad impostare la giusta dimensione dal
menů "imposta pagina" perchč le dimensioni di quel tipo di busta non ci sono
e non posso proporre una dimensione personalizzata. Inoltre mi occorre
impostare il foglio in orizzontale: ora, in alcuni casi (forse quando
modifico la stampante su cui stampare) tutte le impostazioni personalizzate
sono scomparse!!!
come posso fare per risolvere il mio problema????
grazie a tutti!
Carlo

 grazie a tutti!
Antico bug di A2k dibattuto almeno 1 volta a settimana. Installa sr1 e togli
la spunta in opzioni - generale - esegui automaticamente correzione nome.
ciao MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it


Grazie!!!
Scusa per la ripetizione ma seguo il News da poco!!!
Carlo

 ha scritto nel messaggio
news:151Z26Z88Z99Y1...@usenet.libero.it...


dove posso trovarla ( a parte sul sito della microsoft)?

Newsgroup: it.comp.appl.access
Titolo: Errore su format in query Access 2003 - Windows 7

Buona sera Amici,
ho una query con questa formattazione:
codice_forn: Format([codforn],"000").
Su Xp mi funziona regolarmente mentre su Windows 7 mi da questo
messaggio:
Funzione non disponibile nelle espressioni.
Potete aiutarmi??
grazie molte
Lonardo


Ciao Leonardo, hai controllato i riferimenti ? Sembra che ne manchi
qualcuno.
Ciao
Alberto


ciao Alberto,
i riferimenti sono gli stessi che ho su Xp.
Sai dirmi quale riferimento in particolare dovrei verificare
controllare?
grazie molte
Leo


Ciao Leo,
se vai sotto VBA e poi Strumenti > Riferimenti, ne trovi qualcuno il
cui nome è preceduto da [MANCA] ?
Proprio stamattina ho fatto un controllo del genere per un amico che
aveva problemi passando da A2003 sotto XP a A2007 sotto W7 ed ho
trovato un riferimento mancante, purtroppo non è quello del tuo caso.
Ti direi di mandarmi l'applicazione, ma purtroppo non ho il W7.
Ciao
Alberto

 - Mostra testo citato -
Credo di aver trovato il riferimento che risolve il problema:
Microsoft Data Formatting Object Library.
Con questo funziona tutto! Grazie Alberto del prezioso aiuto.
Ciao
Leonardo
Newsgroup: it.comp.appl.access
Titolo: Sicurezza a livello utente

Ho creato un'applicazione con A97 con la quale, sul server aziendale
(WinNT), gestisco le attività di assistenza tecnica (riparazioni e
garanzie).
Ho bisogno di definire le abilitazioni dei vari utenti secondo il reparto di
appartenenza (Service Advisors, Magazzino, Tecnici di Riparazione, ecc.).
Ho eseguito una prova sul mio PC (Win98) copiando il file "Assistenza" nella
cartella "Prova" e seguendo le istruzioni della guida ho eseguito il file
Wrkgadm.exe => Crea =>......=> Salvato il file con il nome "Protezione"
nella cartella "Prova" => Attivato Access => Strumenti => Sicurezza =>
Definito gruppi ed utenti => Chiuso Access => Aperto l'applicazione
"Assistenza" della cartella prova => Strumenti => Sicurezza => Scelto cosa
proteggere => Creato il file "Protetto-Assistenza".
Fin quì tutto ok. le autorizzazioni funzinano perfettamente, ma il profilo
utenti rimane valido anche per le altre applicazioni che ho sul mio PC le
quali non hanno bisogno di alcuna protezione. Io ho bisogno che questo
profilo sicurezza sia valido solo per l'applicazione "Protetto-Assistenza" e
mi chiedo cosa possa succedere quando andrò a proteggere il file sul server.
Ringrazio anticipatamente chiunque mi darà il suo aiuto.
Simone

Newsgroup: it.comp.appl.access
Titolo: Consiglio sul libro  "Access 2003 uso avanzato e programmazione VBA"

Salve,
poiché non è recensito nel SitoComune, qualcuno saprebbe dirmi se
"Access 2003 uso avanzato e programmazione VBA" di Charles E. Brown e
Ron Petrusha (editore Mc Graw Hill) è un buon libro per approfondire
la mia conoscenza di Access e VBA?
Grazie.

robb ha scritto:

Non lo conosco, ma ti posso consigliare un altro libro molto buono:
PROGRAMMARE MICROSOFT ACCESS 2003. € 75,00. Mondadori Informatica
896 PAGINE

robb ha scritto:

Io l'ho utilizzato ma penso che il titolo del libro sia un po'
fuorviante, nel senso che l'uso non è poi "avanzato".
Penso sia un ottimo libro, ma da ritenere assolutamente introduttivo.
Per essere più chiaro, se il tuo livello di conoscenza è tale per cui
hai già familiarità con l'editor di vba, recordset, connessioni,
subroutine, function, allora penso che potrebbe non esserti tanto utile
e "deluderti".
Se invece sei al "principio", allora è un ottimo libro.
Prima di comprarlo dai un'occhiatina all'indice per farti un'idea.
mdm

 Grazie.
Non lo conosco, ma ti posso consigliare un altro libro molto buono:
PROGRAMMARE MICROSOFT ACCESS 2003. ? 75,00. Mondadori Informatica
896 PAGINE
Mi associo.
E' un po' caruccio ma la spesa vale la pena.

 ha scritto nel messaggio
news:1153169641....@m79g2000cwm.googlegroups.com...

Grazie.
ciao Robb,
mio associo in pieno a quanto dice Michele. Anch'io l'ho acquistato ma non
sono rimasto un gran che soddisfatto.
Mi sono trovato bene con questo testo che non so se sia ancora in commercio.
"Usare Access 2003 oltre ogni limite"
Costicchia un po' 75? ma lo ri-comprerei, tornando indietro.
Ciao, Sandro.

 Ciao, Sandro.
Ciao Sandro come và...?
@Alex
Newsgroup: it.comp.appl.access
Titolo: proteggere accesso ai dati

vorrei fare in modo che l'accesso al database vero e proprio tramite il 
tasto shift su apertura non sia disponibile a tutti
per esempio posso mettere una password per accedere alla struttura vera e 
propria?
oppure posso disabilitare completamente questo tipo di apertura(a patto di 
averne un altra piu sofisticata)?
gtrazie 

stefano ha scritto:

sul sitocomune c'è una faq (in general o modules, ora non ricordo bene) 
che ti fa vedere ocme modificare le proprietàà del db via codice.
pertanto puoi disabilitare il tsto shift e usare una password per 
visuallizzare la finestra di database...
se hai dubbi nell'utilizzo facci sapere ;)
ciao
Nick

Newsgroup: it.comp.appl.access
Titolo: [?] REPORT con Raggruppamento e interruzione pagina

Salve,
Ho un report che mi raggruppa i record per data, è possibile che ogni nuova
data sia su una pagina differente?.  si? Come?
Grazie a tutti coloro che mi aiuteranno
Pietro


Nella proprietą del gruppo (data) "pič di pagina" - interruzione pagina -
dopo sezione....
Ciao.

Newsgroup: it.comp.appl.access
Titolo: form in sola lettura e pulsante non funzionante

Scusate di nuovo....
apro una maschera in sola lettura
DoCmd.OpenForm "nome form", acNormal, , , acFormReadOnly
in questa maschera c'è un pulsante che apre un'altra maschera
però non funziona, credo proprio perchè la maschera è aperta in sola
lettura perchè se la apro normalmente funziona tutto
come posso ovviare a questo problema?
Grazie a tutti.
Nicola
p.s.
praticamente in base ad un valore in una maschera principale
apro la maschera in modalità normale o in sola lettura

 apro la maschera in modalità normale o in sola lettura
-- 
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------

> apro la maschera in modalità normale o in sola lettura
Ok, grazie del suggerimento, ma....
....come faccio a rendere i campi della form
abilitati = sì
bloccati = sì
???
so che si può fare nomecampo.visible = false
per renderlo invisible, ma come faccio a cambiare lo stato di
abilitazione e bloccaggio?

 ha
scritto:

HO TROVATO:
.enabled = stato
.locked = stato
rimarebbe così il problema delle eventuali eliminazioni
però mi sono accorto che è meglio se elimino questa possibilità da
tali maschere quindi il problema non si pone
grazie

 grazie
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: Cicli su connection esterne ADO vs DAO

Salve a tutti,
correggetemi se sbaglio , ma il ciclo per avere i nomi delle tabelle ( ad
esempio) con Ado su una Connection esterna ad esempio un altro mdb, mi è
risultato un pò più lenta rispetto alla stessa procedura utilizzando pero
Dao.
Ad esempio
# If Dao
Dim CurrDb As DAO.Database
Dim DB As DAO.Database
Dim area As DAO.Workspace
Set area = DBEngine.Workspaces(0)
Set CurrDb = area.Databases(0)
Set DB = area.OpenDatabase(Source)
For j = 0 To DB.TableDefs.Count - 1
etc
next j
'****************************************************
# Else Ado
Dim cat As New ADOX.Catalog, tbl As ADOX.Table
    Dim ltables As Long, lcount As Long
    Dim Cnn As ADODB.Connection
 Set Cnn = New ADODB.Connection
 Cnn.ConnectionString = _
    "Provider=Microsoft.jet.OLEDB.4.0;" & _
    "Data Source=" & _ source
   Cnn.Open
    Set cat.ActiveConnection = Cnn
ltables = cat.Tables.Count
For lcount = 0 To ltables - 1
        Set tbl = cat.Tables(lcount)
           Next lcount
Chiedo il parere dei più esperti, comunque di chi sta eventualmente
"aggiornando il proprio codice" in un ottica futura a Dao.
P.S.  Naturalmente è soggettiva la potenza del PC che viene utilizzato
Saluti
Mak
--
Access 2000 SR1


Se usi ACCESS non ha molto senso convertire in ADO, perchč DAO
č un motore studiato appositamente per ACCESS.
Per questo risulta piů performante, ACCESS per moltissime cose
usa DAO anche se non ti accorgi della cosa, addirittura per alcune
primitive, quando
usi ADO viene reinterpretato il codice in DAO...........!!!(Considerazioni
solo per ACCESS).
@Alex.

 solo per ACCESS).
Dipende, con gli Access Data Projects DAO non esiste proprio.
Ciao.

 ha scritto nel messaggio
news:MxFK9.13702$Ou4.4...@twister2.libero.it...

Ciao Oscar.....!
Si, ma č tutt'altro discorso....... non credi......!!!
Ciao
@Alex.

Newsgroup: it.comp.appl.access
Titolo: Errore nello script di pagina in Access 2003

Ho installato ieri Access 2003 SP2.
Lo apro, clicco sul pulsante "nuovo", poi "database vuoto", poi "crea", poi 
"crea una tabella in visualizzazione struttura"; a questo punto per avere 
aiuto premo f1 e mi compare il seguente messaggio d'errore, che mi ricompare 
ogni volta che clicco su qualche link nella finestra della guida in linea:
Errore nello script della pagina
Linea : 115
Carattere: 2
Errore: L'operazione non è consentita se l'oggetto è chiuso
Codice: 0
URL: 
mk:@MSITStore:C:\Programmi\Microsoft%20Office\OFFICE11\1040\vbaac10.chm::/links/achowSettingPropsUsingCode_L.htm
Continuare a eseguire gli script nella pagina?
SI   NO
Come faccio a risolvere il problema, per cortesia?
Grazie
Roberta 


č un bug dell'help di access credo...tu non puoi fare piu di tanto se non 
usare (secondo me la cosa migliore) la guida in linea (se non ce l'hai 
procurala) di access xp (2002)
ciao :) 

 Roberta
Ciao Roberta
ho avuto pure io un analogo problema. era dovuto da un aggiornamento di IE.
se hai Win XP puoi provare a ripristinare una configurazione precedente
oppure con l'opzione : verifica e ripristina file di sistema di Win
Daniele