mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Casella di riepilogo

Per cortesia un aiuto.
Ho una casella di riepilogo contenente parte di record di una Tabella, e
avrei la necessità che cliccandoci sopra ognuno di essi mi apra in una
maschera il record selezionato. Si può fare? Se si mi indicate la procedura.
Grazie
Giorgio

Per cortesia un aiuto.
Ho una casella di riepilogo contenente una parte di campi di record, e,
avrei la necessità che cliccando sopra ognuno di essi mi si apra una
maschera dove vengono visualizzati tutti i dati. Si può fare? Se si mi
indicate la procedura?
Grazie
Giorgio

 ha scritto nel messaggio
news:SSgBb.67961$AX1.2...@news1.tin.it...

Se fai l'autocomposizione dell'apertura maschera e indichi di aprirla
visualizzando solo il record che ti interssa, hai il codice che ti serve.
Copialo dal bottone a evento click della combo
MAssimiliano

Per cortesia un consiglio.
L' idea è questa:
Ho una casella d riepilogo con visualizzati  record, e vorrei selezionando
uno dei record della lista, che mi si apra una maschera di visualizzazione
del record selezionato. Si può fare? In che modo?
Grazie
Giorgio

 ha scritto nel messaggio
news:DinBb.69957$AX1.2...@news1.tin.it...

Su evento clic del controllo casella apri la form con il comando
docmd.openform
Lo fai usando il criterioWHERE (vedi help) fatto così
"ID=" & lista
Condizioni:
ID sarà il campo chiave della tabella dei record della lista.
lista sarà il nome del controllo casella di riepilogo dove avrai settato
come colonna associata quella del campo chiave.
Antonio

 Antonio per cortesia potresti darmi indicazioni passo a passo
Non sono molto esperto
Grazie

 Non sono molto esperto
Antonio

Newsgroup: it.comp.appl.access
Titolo: Campi nulli in un report

In un report, nel pie' di pagina relativo a un
raggruppamento secondo il campo Campo2, dove visualizzo
nelle singole righe Campo1 (al livello gerarchicamente
superiore), Campo2 e alcuni totali, vorrei visualizzare le
righe solo per i valori non null di Campo1. Come posso fare?
Ho anche provato a definire due raggruppamenti al livello di
Campo1, uno per i valori null e l'altro per i valori non
null, ma non riesco ad assegnare il parametro GroupInterval
il barbi

 ha scritto nel messaggio
news:6JJ0b.19512$zN5.6...@news1.tin.it...

Non ti bastare filtrare nella query recordsource del report per i not is
null di campo1?
Antonio


eh potrebbe essere un'idea, pero' comunque mi servono anche
i record con campo1=null, solo che non li voglio vedere
elencati insieme agli altri, perche' prima vorrei elencare
quelli con campo1 non null (la riga e': campo1 - campo2 - e
due totali), poi sotto nel pie' di pagina vorrei
visualizzare il totale di questi, e sotto quelli con
campo1=null che hanno un altro significato... forse e' un
po' un arzigogolo
il barbi

 ha scritto nel messaggio
news:JY11b.117023$cl3.3...@news2.tin.it...

Nella recordsource crea un campo calcolato
nz(campo1;"-")
e poi raggruppa per questo campo
Antonio
Newsgroup: it.comp.appl.access
Titolo: Analisi codice vb

buongiorno a tutti.
Sto cercando di capire qualcosa in più sul funzionamento del codice di access per poter ottimizzare il mio db e addentrarmi meglio sull'argomento.
 
Il problema è questo. Vorrei capire se dal menu:
--- Strumenti database
-----visualbasic
 
Oltre a vedere il codice sugli eventi (open, current, etc) non so se sia possibile utilizzare una visuale ad albero cio del codice di ciascune maschera o altro.
Questo mi serve ad esempio, oltre che per comprendere meglio la struttura, per verificare di non aver utilizzato piu volte istruzioni ridondanti o incompatibili tra loro.
Nello specifico vorrei individuare ad esempio le istruzioni che interessano una casella di testo o una combo.
 
Spero di non aver scritto corbellerie e ringrazio di cuore per l'aiuto costante.

 
 
 
Ivan
Newsgroup: it.comp.appl.access
Titolo: Richiesta: più utenti possono usare uno stesso DB contemporaneamente?

Ancora una volta, prima che qualcuno mi ripeta per l'ennesima volta che 
dovrei essere più chiaro nelle mie richieste e parlare in gergo più 
"access", chiedo scusa se ancora non ne sono del tutto padrone e per gli 
eventuali errori che posso fare nella mia esposizione. Comunque, ho 
questo problema più teorico che pratico, ovvero: se il DB che sto 
realizzando dovesse essere usato da più utenti, la ragione mi suggerisce 
che lo potrebbe usare solo uno per volta, visto che è un unico file MDB 
e che quando questo viene aperto viene generato un file di bloccaggio.. 
o no? Come potrei ovviare a questo inconveniente?
Grazie a tutti.
Fabrizio

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

 gergo si chiama FE (Front End)..
Bhč ma mica solo dividendo in BE e FE un mdb č condivisibile a piů 
utenti?!... un mdb lo č a prescindere, anche se accorpato in un unico mdb BE 
e FE, ammenochč ovviamente non sia aperto ad accesso esclusivo.
E' vero che la risorsa deve cmq essere condivisa in rete in 
lettura/scrittura, ma fatto ciň, basta una semplice icona di collegamento 
che punti al DB per servire la causa.
So che la cosa ti č fin troppo chiara, ma per essere "precisi" con il nostro 
amico era doveroso "precisare". ;-)
Ciao Robč.

 ha scritto nel messaggio 
news:439e898d$0$349$5fc...@news.tiscali.it...

Ho risposto al tuo quesito speditomi in pvt, ma la mail mi è tornata 
indietro... ma l'indirizzo è lui o no? 

 Ciao Robè.
A meno che non usi la tecnoca Terminal Server non sono affatto d'accordo a
condividere in rete tutto il database mettendolo tutto sul server: anche se
è tecnicamente possibile non sono d'accordo di consigliarlo a qualcuno e
resto dell'avviso che sia bene (anche se non indispensabile) avere
condivisiso sul server solo i dati ed operare ognuno con una copia del FE.


 č tecnicamente possibile non sono d'accordo di consigliarlo a qualcuno ...
A bhč, questo lo condivido e lo sottoscrivo a pieno (ma a fronte di un
"meglio questo o quello?", e non su un "come si fa?") , ma piů che un
consiglio, la tua, prima sembrava essere "per te" l'unica soluzione
possibile (cosa che sapevo "impossibile"), ma come risottolineato
giustamente e nuovamente da te non č cosě. Lo dicevo giusto per non dare al
nostro amico soluzioni falsate dall'eccessivo zelo nel consigliare la cosa
migliore "vista con i soli nostri occhi". ;-)
Risaluto. 
-- 
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
----------------------------------
http://www.accessgroup.it/
http://www.sitocomune.com/
----------------------------------
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.
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 mettendolo tutto sul server: anche se


 mettendolo tutto sul server: anche se

Newsgroup: it.comp.appl.access
Titolo: Presunto refresh continuo

Salve, scusate se posto di domenica, ma purtroppo dovrei finire una
cosa per domani e mi tocca lavorarci anche oggi. Quindi, prima buona
domenica a tutti, poi il problemuccio.
Ho una maschera (senza origine record) con 4 sottomaschere. Di queste
4, 3 le devo collegare alla maschera. Per collegare le maschere ho
fatto il giochino di inserire un campo nella maschera principale con
il nome del campo da collegare che prenda il valore nella
sottomaschera.
Es.
Maschera_principale (senza origine record)
- Campo codice1 = sottomaschera1.Form!codice1
- Campo codice2 = sottomaschera2.Form!codice2
- Campo codice3 = sottomaschera2.Form!codice3
Sottomaschera1 (non collegata)
Sottomaschera2 (collegata da codice1)
Sottomaschera3 (collegata da codice2)
Sottomaschera4 (collegata da codice3)
Il fatto è che funziona ma noto un continuo "presunto refresh" che non
riesco ad intercettare. Lo vedo perchè il puntatore cambia sempre fra
clessidra e normale. Di continuo. Come posso fare per eliminare questo
effetto?
Spero di essere stato chiaro
Grazie
Stefano


Ciao 
questo ch descrivi è un inconveniente che ti da se i colegamenti campi master e detail sono in qualche modo ambigui, tipo il nome di un controllo usato più volte è diverso dall'etichetta.
senza conoscere il tuo db ti posso suggerire di chiamare il controllo della sottomaschera con un alias (quello che vuoi che appaia) e così risolvi l'ambiguità
-- 
-- 
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access
Segrate (MI), 7-8 giugno 2007

Grazie, provo subito.
Stefano

Ciao Massimiliano, ho provato ma non ci sono riuscito. Provo a
mandarti per mail il DB chiedendoti il piacere di darci un'occhiata.
Grazie!
Stefano
Newsgroup: it.comp.appl.access
Titolo: nome files in cartella

è possibile...estrarre i nome di files contenuti in una cartella elencandoli
in una tabella?
 esiste gia qualcosa del genere...fatto magari da qualche big ???
grazie per eventuali suggerimenti..
altrimenti pazienza non è un problema particolarmente importante....
buon lavoro a tutti

 ha scritto nel messaggio 
news:eg2fa0$1r2i$1...@newsreader2.mclink.it...

Riprendo posto di Alessandro e modifico per tua esigenza :
    Dim OriginalPath As String
    OriginalPath = "C:\Tuo_Percorso\"
    MyName = Dir(OriginalPath)
    Do While MyName <> ""
        MyName = Dir
            Dim RS As Recordset
            Set RS = CurrentDb.OpenRecordset("Tua_Tabella")
            With RS
                .AddNew
                ![Tuo_campo_Tabella] = MyName
                .Close
            End With
            Set RS = Nothing
    Loop
-- 
-- 
Ciao
Pablitomf (Maurizio Facciuti)
-----------------------------------------------------------------
Access: 97, 2000, XP e 2003
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." 

 buon lavoro a tutti
@Alex

Pablitomf (Maurizio Facciuti) ha scritto:

Conviene così altrimenti non sai la Folder se rileggi la Tabella:
![Tuo_campoFolder_Tabella] = OriginalPath
![Tuo_campoNome_Tabella] = MyName
Ciao
@Alex

Newsgroup: it.comp.appl.access
Titolo: Aiuto adCmdStoredProc

Uso il seguente codice per eseguire una stored procedure,db access
 Set cmdByRoyalty = New ADODB.Command
    Set cmdByRoyalty.ActiveConnection = cnn
       cmdByRoyalty.CommandType = adCmdStoredProc
cmdByRoyalty.CommandText = "prova"
     'cmdByRoyalty.CommandTimeout = 15
    Set rstByRoyalty = cmdByRoyalty.Execute()
Pero' mi da il seguente errore in corrispondenza della riga
cmdByRoyalty.CommandType = adCmdStoredProc
Gli argomenti utilizzati dall'applicazione non sono di tipo valido, non sono
compresi nell'intervallo consentito o sono in conflitto.
Qualcuno mi sa dire perche?
Grazie infinite

 Qualcuno mi sa dire perche?
Che tipo di applicazione stai realizzando? MDB o ADP?
--
Matteo Palmieri
Cybercreations - 
www.cybercreations.it

 wrote in message
ane2c3$7oc$1...@serv1.albacom.net...

Newsgroup: it.comp.appl.access
Titolo: ci sono esempi in giro su internet ?

Sono alla ricerca di tanti piccoli esempi di *.mdb che riportino tutte le
possibili relazioni fra i dati di un db e particolarita' e curiosita' varie.
C'e' qualcuno che sa se c'e' in giro una collezione simile ?
Grazie-Carlo

 ha scritto nel messaggio
news:9pknid$ef5$1...@lacerta.tiscalinet.it...

La migliore!!
Vai sul Sito Comune.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


Prova qui:
ftp://www.athree.com/pub/candace/access_downloads_html.htm
http://www.alco.dk/user/hugo/access/index.htm
http://www.njh.myweb.nl/
http://www.rogersaccesslibrary.com/TableOfContents.asp
e, se vuoi qualcosa di più estremo:
http://www.lebans.com/
consiglio di fare un giro sul WebRing Applecore99uk (in fondo alla pagina di
Stephen Lebans): tra tanti siti inutili, se ne trovano alcuni molto
interessanti.
ciao
Silvio
Newsgroup: it.comp.appl.access
Titolo: creare una tabella via codice solo in memoria

Salve sono Fanciullo,
access97
uso questo codice per creare una tabella dove poi
devo fare delle interrogazioni via DAO
Dim tblSMraggr As TableDef
Set tblSMraggr = CurrentDb().CreateTableDef("tblSMraggr")
come mai la tabella mi viene creata fisicamente nel database
anche se non uso il codice:
CurrentDb().TableDefs.Append tblSMraggr ??
Come posso fare in modo che la tabella venga creata
solo in memoria?
grazie 

Fanciullo ha scritto:

Per quanto ne so io, le tabelle non esistono 'solo' in menoria...essendo 'tabelle' vengono memorizzate come 'tabelle'.......
se vuoi un set di record in memoria per farci qualche cosa, o usi i recordset o le viste (leggi query temporanee). Il metodo CreateTableDef in effetti fa quello che tu gli chiedi.....ossia crea una tabella.....differente il metodo CreateQueryDef, dove puoi creare una query temporanea in memoria......ma valuta bene i costi-benefici
-- 
Questo articolo e` stato inviato dal sito web 
http://www.nonsolonews.it


L'unico modo per fare una sorta di Tabella in memoria è usare ADO ed
un Recordset in memoria temporaneo... con DAO non è possibile.
Quì trovi un ottimo esempio di Giorgio:
http://www.riolab.org/viewrisorsa.asp?id=45
@Alex

 ha scritto nel messaggio 
news:490dd04b$0$18155$4faf...@reader3.news.tin.it...

Ti riferisci ad una specie di array bidimensionale?
Ciao, Carlo 

e che cosa è un  array bidimensionale?  Scusami ma non capisco...
devo usare per forza una tabella che è ottenuta con una query di
creazione tabella.
Siccome la tabella la uso solo temporaneamente non volevo
che venisse memorizzata nel database. Questo è tutto.
Perché non uso un recordset sulla query?
Perché la query è incasinatissima... e il resto del codice DAO non funziona
poi. Mentre la tabella è lineare: contiene solo i campi creati e i loro 
valori.
Ciao, Vito 

 Ciao, Vito
Ciao, Carlo 

Cercherò di capire come funziona la routine che tu hai postato.
Visto che siamo in argomento, con un esempio pratico,
per cosa useresti una matrice a due dimensioni?
A proposito di cancellare la tabella...gisuto così al limite finito di 
usarla
via codice la cancello
ma  se lo faccio tante volte aumenta la
dimensione del database?
Ciao 

>>> news:490dd04b$0$18155$4faf...@reader3.news.tin . it ...

Le matrici si possono usare per un'infinità di motivi!!! Ma x l'utilizzo che devi farne tu, va benissimo una tabella temporanea. 2 modi : o crei (anche con query di creazione tabella) e cancelli  (docmd.deleteobject acTable, "TuaTabella") o, se ti serve + volte, la crei vuota e la riempi/svuoti con SQL. Il db si gonfia, ma se poi lo compatti alla ciusura, torna normale.....Le tabelle temporanee sono prassi comune (IMHO) in Access e non solo....

Newsgroup: it.comp.appl.access
Titolo: arrotondamento verso il basso

ciao a tutti,
alcuni giorni fa vi ho chiesto, e qualcuno mi ha gentilmente risposto, come
fare l'arrotondamento.
Ora, come risposta mi si dice di aggiunger "INT" e questo funziona a
meraviglia, il problema che l'arrontondamento con questo sistema mi risulta
verso l'alto, e come faggio per arrotondare verso il basso?
Salute a tutti da Raffaele

 ha scritto nel messaggio
news:99nerq$5h$1...@news1.sunrise.ch...

Probabilmente non ho capito bene ciò che ti serve, però è sicuramente vero
che la funzione Int effettua un arrotondamento all'unità per difetto (o come
dici tu verso il basso) e non per eccesso (o come dici tu verso l'alto).
Ovvero Int(13,7) mi restituisce 13 e non 14.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: [OT] Un saluto a tutti

Volevo solo mandarvi un saluto e scusarmi della latitanza....sono ancora 
vivo! :-)))
Varie vicissitudini mi hanno tenuto lontano da qui....a parte l'orario 
indegno cerco di essere presente quando posso!
Un salutone a tutti e spero di rivedervi al più presto alla prossima CISA!
Ciauz
-- 
Roberto da Parma 

 ha scritto nel messaggio 
news:gl0l66$49u$1...@tdi.cu.mi.it...

Un saluto anche a te.
Però, complimenti, in meno di un'ora hai risposto ad almeno 4 o 5 post!
Ciao, Carlo 

 ha scritto nel messaggio 
news:gl0l66$49u$1...@tdi.cu.mi.it...

Ehilà!!
CISA...lutiamo!!!
Ciao.
-- 
Sergio MAZZA 


hmhm ...spero che le vicissitudini non siano legate ad anelli,
brillanti o solitari vari ... recriminati dalla dolce pulzella!
:-)

 ha scritto nel messaggio 
news:gl1g1t$kuu$1...@tdi.cu.mi.it...

Yes!
Grande Sergio!
Ciao
-- 
Roberto da Parma 

 ha scritto nel messaggio 
news:abe0d833-205a-4ed8...@i20g2000prf.googlegroups.com...


:-)
Ahahah....al momento no....ma è dura!!! :-))))
Un salutone
-- 
Roberto da Parma

 ha scritto nel 
messaggio news:gl15it$cd7$1...@tdi.cu.mi.it...

Di notte do il meglio Carlo!! :-))))

Newsgroup: it.comp.appl.access
Titolo: Mesi e grafici

Ciao,
spero che qualcuno possa aiutarmi...
Sto realizzando, o almeno ci sto provando, un database che permetta di 
realizzare dei semplici report grafici su base mensile ed annuale: il 
problema è che quando visualizzo il grafico nel report (grafico basato su 
di una query di selezione), i mesi sull'asse delle ascisse appaiono in 
ordine alfabetico (aaarghh :-/); inoltre non mi è possibile modificare i 
colori delle varie colonne del grafico (e questo mi sarebbe molto utile ai 
fini della comprensione del grafico) perché in modalità progettazione mi 
mostra il solito grafico di default (quello con East North etc..). Qualcuno 
conosce per caso la soluzione a questi arcani misteri? Ho già provato ad 
ordinare i record tramite la query, ed infatti la tabella risultato della 
query è corretta ma il grafico non ne vuole proprio 
sapere...ah...dimenticavo: utilizzo Access 2002.
Grazie per l'attenzione e buona giornata! 
S.

 su di una query di selezione), i mesi sull'asse delle ascisse appaiono
[snip]
Mi rispondo da solo ;-P
Ci ho messo un po' ma alla fine credo di avere trovato la soluzione...beh 
almeno funziona...
In visualizzazione Struttura del report, selezionare il grafico, tasto 
destro Proprietà,tabsheet Data, alla voce Row Source cliccare sul tasto con 
"..." e nella query che compare aggiungere il campo IdMese, ordinandolo in 
modo ascendente e voilà...il report presenta il grafico con i mesi ordinati 
come dovrebbero (NB: i Mesi si trovano in una tabella a parte).
Ciaoooo

Newsgroup: it.comp.appl.access
Titolo: collegamento tabelle

salve a tutti
ho creato un database che lavora con tabelle allegate presenti su un server.
Ogni tanto eseguo alcune modifiche al database e ho la necessità di
riallegare le tabelle. Sul sito comune avevo trovato alcune istruzioni molto
semplici:
Public Function CollegaTabelle()
Dim Catalogo As New ADOX.Catalog
Dim Tabella As ADOX.Table
Dim Prop As ADOX.Property
Dim Dir, Tb As String
Catalogo.ActiveConnection = CurrentProject.Connection
Dir = Forms!Impostazioni!PercorsoDati
Dir = Replace(Dir, "programma.mdb", "Dati.mdb")
For Each Tabella In Catalogo.Tables
        If Tabella.Type = "LINK" Then
            Set Prop = Tabella.Properties("Jet OLEDB:Link Datasource")
            Prop.Value = Dir
        End If
Next Tabella
Set Catalogo = Nothing
End Function
ho incluso la libreria Microsoft ADO Ext. 2.5 for DDL and Security
il problema è che su alcuni PC funziona senza problemi su altri mi compare
il messaggio:
errore di run-time 429: il componente Active X non è in grado di creare
l'oggetto
grazie e buon lavoro
Maurizio

 ha scritto nel messaggio
news:MqeFd.398131$b5.19...@news3.tin.it...

Probabilmente stai usando un MDB e sui vari PC ci sono aggiornamenti
differenti.
Se fai un MDE spesso appiana molti di questi problemi.
In ogni caso siamo arrivati alla 2.8 con MDAC.
Ciao
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Problema database access

Ho fatto alcune prove per crearmi un duplicato di una tabella dal server
centrale a un database locale.
In pratica ho fatto una macro che tramite odbc mi preleva una vista del
database centrale.
Problema: tempi lunghissimi si parla di 36 min per scaricarmi 5600 record.
Non ce una soluzione piu rapida?
possibile tutto st tempo?
grazie
Luca

 ha scritto nel messaggio 
news:db0d0v$3t0$1...@ftp-news.csita.unige.it...

Subject significativo please. ;-) 


Non capisco cosa vuoi di più.
Ti ha detto che ha un problema (beh forse se non l'avesse non scriverebbe
qui)
che è un database (mica pizza e fichi!!!)
access (tu credevi Visual Fox????)
Per muoviti e dagli una mano!
;-P
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it


Sei un bast....!!!! :-D
ROTFL

Newsgroup: it.comp.appl.access
Titolo: consenti aggiunte=no!!!!

Questa è una riga di codice che ho inserito all'apertura di una
maschera (non badate a come è stata formattata dal mio programma di
news): 
Private Sub Form_Open(Cancel As Integer)
    DoCmd.Maximize
    If Not IsNull(Forms!archivio!nome_regione) = True Then
        MsgBox "Attenzione, ci sono gare scadute" & vbNewLine & "Premi
il pulsante 'Archiviare Gare' per passarle all'archivio!",
vbExclamation, "GESTIONE-GARE"
        Forms!archivio.Visible = False
        Me.puls_archivio.Enabled = True
    Else
        DoCmd.Close acForm, "archivio"
    End If
End Sub
Ora, il problema è che la maschera archivio che apre ha come proprietà
consenti aggiunte=no, quindi se non ci sono record, questa è
completamente vuota (totalmente grigia nel mio caso).
Mi da però un problema di run time (nel caso in cui ometto il Nz) e un
problema -251..... (nel caso in cui metto il nz).
Come faccio, per non visualizzare niente se la maschera è vuota?
Grazie per l'interassemento

 ha scritto nel messaggio
news:3c46baa8...@news.tiscalinet.it...

Se puoi controllare la presenza o meno di record all'interno dell'archivio
che è recordsource della Maschera potresti fare così
If archivio=vuoto then
    continua
Else
    apriLaMaschera
endif
;-)>  Mrok

 ha scritto nel messaggio
news:3c46baa8...@news.tiscalinet.it...

Per verificare la presenza di record all' interno del recordsource della
maschera:
apri un recordset
set myrs = mydb.openrecordset(query)              nel caso sia una tabella
la query sara' select * from...
if myrs.eof and myrs.bof then                              l 'inizio e la
fine del recordset coincidono (e' vuoto)
  exit sub
else
apri maschera
ecc...
Ciao Alessandro

 ha scritto nel messaggio
news:3c46baa8...@news.tiscalinet.it...

Condiziona l'apertura della maschera "archivio" al fatto che l'oggetto che è
sua origine record contenga qualcosa.
Se l'origine record di "archivio" si chiama Pippo,
If DCount("*", "Pippo") <> 0 Then
     DoCmd.OpenForm "archivio"
End If
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: runTime Access & "Gestione Tabelle collegate"

salve
 
con un runtime Access è possibile gestire "Gestione Tabelle collegate"
 
non capisco come mai mi dà errore di ODBC eppure il collegamento verificato e' corretto
 
GRAZIE anticipatamente

con un runtime Access è possibile gestire "Gestione Tabelle collegate"
 
Se intendi la utility di "Gestione Tabelle collegate" di Full Access, non è 
disponibile nelle installazioni Runtime (almeno che io sappia).
Però non vedo il problema: basta utilizzare il classico codice per 
riallegare le tabelle, con relativa stringa di connessione.
 
Saluti

Newsgroup: it.comp.appl.access
Titolo: PULSANTI NON RETTANGOLARI

E' possibile inserire nelle maschere pulsanti NON rettangolari, se si come?
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

puoi mettere delle immagini che al passaggio del mouse cambiano apsetto
simulando il bottone...
sul sito comune trovi un esempio:
Pulsanti Stile OutLook
Saluit Cris

Questo tipo di funzionalità risulta automatica per chi possiede AC2003 e
dipende dal sistema operativo...nella fattispecie da XP
Ciao
Roberto
Newsgroup: it.comp.appl.access
Titolo: Struttura If-Then

Ciao a tutti
come si fa in una struttura If....Then..Else
a mettere più condizioni .
Io ho questo:
If IntNuovo = vbYes Then
DoCmd.OpenForm "CodificaArticoli", , , , acFormAdd, acNormal, NewData
e fino quì bene
però devo aggiungere altre condizioni prima
dell'apertura della maschera
se il valore di un controllo nella sottomaschera è 054
allora aprire la maschera  "CodificaArticoli054"
se il valore di un controllo nella sottomaschera è 001
allora aprire la maschera  "CodificaArticoli001
e cosi via
Ciao Giuseppe

 allora aprire la maschera  "CodificaArticoli001
Non rispondo alla tua domanda dell'if then else ma se è solo questo il
problema allora
If IntNuovo = vbYes Then
  DoCmd.OpenForm "CodificaArticoli" & valore , , , , acFormAdd, acNormal,
NewData
Antonio

 allora aprire la maschera  "CodificaArticoli001
Select..case.

 ha scritto nel messaggio
news:r5eab.325271$Ny5.10...@twister2.libero.it...

Sinceramente non l'ho capita,
"se solo questo è il problema" che cosa significa
Ciao Giuseppe

 ha scritto nel messaggio

Significa "se il tuo problema e' solo aprire maschere che si chiamanto
'CodificaArticoliXXX' "
cos'altro senno'?
Sib

"Sib" <si...@SPAMiol.it> ha scritto nel messaggio
news:Mzeab.111308$R32.3...@news2.tin.it...


"Sib" <si...@SPAMiol.it> ha scritto nel messaggio
news:Mzeab.111308$R32.3...@news2.tin.it...

Il mio problema  non è solo aprire una maschera  ,
è aprire maschere diverse al variare di un  valore di un controllo in una
sottomaschera .
Giuseppe

 sottomaschera .
Delle volte ho la sensazione che non può essere solo un esserci, ma anche un
farci...
ma sarà solo una sensazione...
SE il tuo problema è solo aprire maschere dipendenti dal valore dello stesso
controllo, non c'è bisogno di fare tanti IF quanti sono i possibili casi, ma
con un unico comando risolvi il problema
Quindi NON
if x = 1 then
  docmd.openform "Pippo1"
elseif x = 2 then
  docmd.openform "Pippo2"
elseif...
...
end if
ma
docmd.openform "Pippo" & x
Antonio

 sottomaschera .
Ma l'hai letta la sintassi?
e l'hai capita?
Sib


Comunque ho dei pacchi di ascigamani  da 20 kg  a prezzo stracciato
Giuseppe
Newsgroup: it.comp.appl.access
Titolo: comuni e province

Saluti a tutti
Ho una tabella che ho chiamato edificio  in cui ho memorizzato la provincia
dove è ubicato.
Ora vorrei , senza aggiungere un'altro campo regione, interrogare questa
tabella e tirare fuori il numero di edifici per ogni singola regione es..
Piemonte:110 edifici...lombardia:235 edifici e così via.
Cosa mi consigliate?


Mi sembra un po' dura .....non credo che il pc riesca da solo ad associare
le provincie alle regioni!
Credo che tu non abbia altra soluzione, o in altrernativa creare una tabella
in cui inserisci:
 id, provincia, regione appartenenza
anche se forse ti complica un po' il lavoro!
ciao
David

Ok, questa è una soluzione che però vorrei evitare, se posso.
Pensavo a qualche routine che utilizzasse un istruzione tipo "case" che a
seconda della sigla della provincia assegnasse alla variabile REGIONE la
stringa corretta.
Ahimè non conosco Visual Basic (ma ovviamente altri linguaggi di
programnmazione, PASCAL FORTRAN ..) e non vorrei perdere chissà quanto tempo
a studiarmi qualche libro.
Help...
Ciao.


 ha scritto nel messaggio
news:9e43sa$vf$1...@pegasus.tiscalinet.it...

Ipotizziamo che la struttura della tabella Edificio sia:
IdEdificio        Contatore e chiave primaria
Provincia        Testo
ecc. ecc.
e che quindi il campo Provincia contenga il nome della provincia in chiaro.
Creati una tabella di corrispondenza tra provincia e regione (tblProvReg)
che abbia, ad esempio, questa struttura:
Provincia        Testo e chiave primaria
Regione         Testo
e che ha quindi questi contenuti:
Provincia            Regione
-------------            ------------
Torino                Piemonte
Alessandria        Piemonte
Novara               Piemonte
Vercelli              Piemonte
Milano               Lombardia
Mantova            Lombardia
Brescia             Lombardia
ecc. ecc.
A questo punto, creati una query di raggruppamento che abbia il seguente
codice SQL:
SELECT tblProvReg.Regione, Count(Edificio.IdEdificio) AS
ConteggioDiIdEdificio
FROM Edificio INNER JOIN tblProvReg ON Edificio.Provincia =
tblProvReg.Provincia
GROUP BY tblProvReg.Regione;
Poi puoi ottimizzare la struttura del tuo database, usando i codici di
provincia, anziché il nome della provincia in chiaro, creandoti naturalmente
una tabella Province per la relativa trascodifica in chiaro.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Passaggio da DB3+ ad Access2000

Chiedo scusa del disturbo.
Mi ero creato con DB3+ un database per gestire un piccolo magazzino. Mi 
andava bene fino a quando ho cambiato la stampante. Adesso ho notevoli 
problemi (non gestisce bene i programmi DOS).
Ho quindi deciso di passare ad access2000.
Per importare i vari file di database nessun problema. Ma come si fa a 
far leggere i programmi di calcolo scritti da me? per intenderci quei 
file che in DB3+ hanno l'estensione .prg
Ho cercato dappertutto, ma non ho trovato niente.
Mi potete dare una dritta?
Grazie
Julo Cumani

 ha scritto nel messaggio
news:atkr1d$ees$1...@newsfeed.cineca.it...

Ho da darti una brutta notizia: i file .prg di DB3+ non li puoi usare nè
convertire; devi riscriverti tutto exnovo in Access; puoi solo importarti i
dati contenuti nelle tabelle.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:NnoL9.21461$Ou4.6...@twister2.libero.it...


 ha scritto nel messaggio
news:atkr1d$ees$1...@newsfeed.cineca.it...

Ciao Julo
Dipende molto da cosa c'e' scritto nei tuoi .prg
Per intenderci:
1) say/get e input vari... in access non hanno alcun senso..!
2) set filter to.... e index on...in access sono quasi un'altra cosa.. :-(
3) tutto cio' che e' inerente alla gestione del puntatore e' da
dimenticare.. :-(
Restano valide tutte le routines dove usi puro codice di ragionamento...
(fatte le piccole dovute correzioni..)
Quasi tutte le funzioni di Db3+/clipper sono contemplate da access,
alcune con differente nome.. :-(
Cordialita'
Antcim
Newsgroup: it.comp.appl.access
Titolo: classe msXml

salve
 
per la classe MsXML
dove trovo la documentazione dei metodi 
 
in particolare
come posso ciclare dalla root e i nodi sottostanti?
 
GRAZIE

Ovunque trovi documentazione... è molto usata, non è semplicissima anche perchè è una Classe OOP:
 
https://docs.microsoft.com/it-it/dotnet/standard/data/xml/xml-document-object-model-dom
 
https://docs.microsoft.com/en-us/previous-versions/windows/desktop/ms757828(v=vs.85)
 
https://it.coredump.biz/questions/7091162/access-vba-how-to-download-xml-file-and-enter-its-data-into-a-recordset
 
https://analystcave.com/vba-xml-working-xml-files/
 
 
@Alex

Newsgroup: it.comp.appl.access
Titolo: banalità: sommare campi??

salve a tutti
ho la necessità di inseire automaticamente in un campo la somma di altri due
campi della stessa tabella... è possibile senza utilizzare moduli???
se si come....????
oltre al sito del gruppo mi consigliate altri siti dove trovare faq per
cominciare????
grazie  a tutti per l'attenzione...
davide

 wrote in message
87vjen$4s7$1...@lacerta.tiscalinet.it...

Non indichi se parli di form o query? Somma o concatenazione? Campi numerici
o alfanumerici?
Io ci provo...
- Per la somma (tra campi numerici)  in una form:
crea un campo non legato e nell'evento prima di aggiornare inserisci i
codice:
me![totale]=me![campo1]+me![campo2]
- Per concatenare i campi (alfanumerici) sostituisci il + con la &;
- Per la somma (tra campi numerici) in una query:
nella casella "campo" inserisci:
totale: campo1+campo2
- Per concatenare i campi (alfanumerici) sostituisci il + con la &.
Se va bene....
Ciao.

campi della stessa tabella... è possibile senza utilizzare moduli???
perche', che ti ha fatto di male il codice?  e' "difficile"?  
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/

Newsgroup: it.comp.appl.access
Titolo: Condizione per mancanza di dati

Salve a tutti,
il mio problema è questo...
Ho una maschera con una sottomaschera relazionata, come faccio a mettere una 
condizione per quando la sottomaschera non mi rende dati , ovverosia è vuota 
?   Ho provato con if isnull(me.figlio ecc..) o con if me.figlio ecc = 
null.. ma non funziona.
Vorrei mettere una condizione per cui quando non ci sono dati nella 
sottomaschera relativi al cliente della maschera principale, la stessa mi 
avvisasse con una msgbox. Grazie anticipate. Augusto 

 avvisasse con una msgbox.
If Me!figlio.Form.RecordsetClone.RecordCount = 0 Then
    MsgBox "Vuoto"
End If
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it

Tante grazie Karl.... sei stato gentilissimo..
Newsgroup: it.comp.appl.access
Titolo: Incrementa tabella

Domanda:  ho una tabella T_DettaglioTirocinio (ID_Tirocinio,
DataPresenza) che devo alimentare attraverso una maschera con base
dati T_Tirocinio (ID_Tirocinio, DataInizio, DataFine)   vorrei creare
una query di accodamento che alimenti la tabella T_DettaglioTirocinio
di tanti record quanti sono quelli nella Maschera (T_Tirocinio,
DataInizio - DataFine)   Spero sia stato chiaro.
Grazie e Buon NAtale a Tutti

 ha scritto nel messaggio 
news:73d28917-c2d3-452a...@e27g2000yqd.googlegroups.com...

Risposta
Se ho capito bene tu vuoi aggiungere un giorno di tirocino per ogni gorno 
intercorrente tra inizio e fine
dim i as integere
For i = 1 to datediff("d", me.dataInizio, me.datafine)
dateAdd("d",
currentdb.Execute "INSERT T_DettaglioTirocinio (ID_Tirocinio, DataPresenza) 
VALUES " & me.idTirocino, &", #" &  dateAdd("d", i, me.dataInizio) & "#"
next

 ha scritto nel messaggionews:73d28917-c2d3-452a...@e27g2000yqd.googlegroups.com...

Esatto, devo creare per ogni allievo, tanti giorni quanti sono quelli
intercorenti tra Datainizio e Datafine, quello che mi scrivi... creo
un pulsante e all'evento click inserisco ?
Grazie

 ha scritto nel messaggio 
news:d47601d2-22ea-4600...@e27g2000yqd.googlegroups.com...


Risposta:
yes, dovrebbe andare (magar se scrivi integer invece di integere � meglio 
;-P 

MA ha scritto:



Chiaramente quello � il VBA Partenopeo.. cos� come "recordeset" etc..
--
sv
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 - Mostra testo citato -
si, certo Interger, ma ho provato ad inserirlo creando sulla maschera
del tirocinio un pulsante che al click esegue il codice inviatomi e mi
visualizza le righe di errore, ti preciso che uso Access 2003
Dov'è che sbaglio ?
Grazie

 - Mostra testo citato -
si, certo Interger, ma ho provato ad inserirlo creando sulla maschera
del tirocinio un pulsante che al click esegue il codice inviatomi e mi
visualizza le righe di errore, ti preciso che uso Access 2003
Dov'� che sbaglio ?
Grazie
Sbagli a non dire che errore ti produce
alla fine ho scritto direttamente qui su OE e non potevo verificare 

 creo un pulsante e all'evento click inserisco ?
Invece di una query o SQL puoi anche usare DAO visto
che in ogni caso devi usare un ciclo. Se ti capisco bene
il codice nell'evento click potrebb'essere:
Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim i As Long
Set db = CurrentDb
Set rs = db.OpenRecordset("T_DettaglioTirocinio", dbOpenDynaset)
For i = Me!DataInizio To Me!DataFine
    rs.AddNew
        rs!ID_Tirocinio = Me!ID_Tirocinio
        rs!DataPresenza = i
    rs.Update
Next i
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it


Grazie amici, siete grandi... funge tutto perfettamente e non mancherò
mai di ringraziarVi perchè trovo sempre la soluzione navigando tra le
vostre risposte anche ad altri amici della rete.
Grazie ancora e BUON NATALE !
Newsgroup: it.comp.appl.access
Titolo: domanda banale

cia a tutti , non riesco a trovare la funzione like per cercare una parte 
del nome di un campo del record da inserire nei parametri della query:
nel senzo  ho 3000 campi nomi e devo trovare fantozzi anche solo inserendo 
la scritta " fant" nella query di ricerca.
grazie a tutti CiaoMarco 

 Inviato via 
http://arianna.libero.it/usenet/
continuiamo a rispondere a subject poco significativi ... 

ho provato ma non  funziona...
allora, sei io inserisco nella struttura del campo nome della query questa 
"scritta"
[inserire nome:]
quando rilancio la query mi chiede di inserire il nome, io lo inserisco e mi 
da tutti i dati riferiti a quel nome.
ma nel mio database al campo nome trovo anche dei nomi come " istituto 
spaziale mazzinga zeta"
utilizando la query parametrica per la ricerca dovrei inserireil nome intero 
della societŕ quando io vorrei trovare il cliente anche inserendo nel 
parametro di ricerca la parola  "spaziale"
quale "scritta" devo mettere nel parametro per fare ciň.
grazie Marco. 




Like "*" & [inserire nome:] & "*"


Newsgroup: it.comp.appl.access
Titolo: Planner o simile per Access 2000

Qualcuno sa dirmi per favore se e come è possibile creare un planner
settimanale/mensile in Access 2000?
In sostanza avrei bisogno di una sorta di agenda, dove segnare i vari
impegni nei giorni all'interno della settimana in corso; pensavo di
utilizzare il controllo ActiveX calendar, ma non so come fare a servirmene
perché sembra un oggetto fine a se stesso, che non è possibile utilizzare
per eventuali collegamenti.
Grazie
Marco


wrote:

mmi sembra tu lo possa assegnare ad un campo sottostante in cui
memorizzare la data scelta...
poi sulla stessa tabella metti i campi che ti servono ed il tutto è
fatto...
Saluti.
Emanuele.
Newsgroup: it.comp.appl.access
Titolo: [Forse OT] ORDER BY dataEvento

Ciao a tutti.
Ho il seguente problema, forse OT perché si tratta di Access solo in parte,
il db è SQL Server. In una query ho un ORDER BY dataEvento, dove dataEvento
è un campo datetime(8).
L'ordinamento avviene però interpretando la data come stringa e non come
data, ad esempio
08/08/2003
10/02/2003
18/07/2002
21/11/2001
29/03/2002
in pratica tutto quello che viene dopo il primo "/" viene ignorato, infatti
in un'ottica stringa servirebbe solo a discriminare eventuali giorni uguali.
Devo modificare la query per avere l'ordinamento giusto e non posso toccare
il db.
Ho pensato di ordinare per i campi che si ottengono estraendo le
sottostringhe giorno, mese e anno, ma non riesco a trovare la funziona
sottostringa in SQL Server.
Grazie in anticipo a tutti.
Bye
giaconet

 ha scritto nel messaggio
news:bq9qkd$1v04ka$1...@ID-71483.news.uni-berlin.de...

Ciao giaconet
se l'ordinamento avviene come dici il campo non è di tipo datetime ma
CHAR(10).
Quindi per ottenere l'ordinamento adeguato ....
-----------------------
ORDER BY RIGHT(dataEvento,4)+SUBSTRING(dataEvento,4,2)+LEFT(dataEvento,2)
-----------------------
Ciao Giorgio

 Ciao Giorgio
Il campo è effettivamente un datetime, ma mi hai messo la pulce
nell'orecchio. Effettivamente era fatto su una vista in cui il campo era
stato convertito tramite un Convert(char(10), ecc.ecc.).
Inoltre era anche un SELECT DISTINCT quindi ho modificato la query creando
un campo con le funzioni che mi hai segnalato e ordinando in base a quello.
Tutto funzia, adesso. Grazie
Bye
giaconet

Newsgroup: it.comp.appl.access
Titolo: A97 evidenziare la/le righe in un report

Ciao a tutti!
Espongo il mio problema:
Nella maschera inserisco i seguenti dati nel campo descrizione:
LAVORO 1
LAVORO 2
LAVORO 3
MODIFICA LAVORO 1
nel report di stampa ho necessità che venga stampato in questo modo:
LAVORO 1
LAVORO 2
LAVORO 3
ESEGUITO MODIFICA LAVORO 1
voglio evidenziare la o le righe in cui compare modifica!     (per A97)
Grazie
Ciao Chita

 Ciao Chita
Dipende cosa intendi per "evidenziare".
Per esempio questo codice "evidenzia" il bordo della casella di testo 
"Articolo" se contiene la parola "Modifica" e imposta il grassetto:
If InStr(1, Me.Articolo, "modifica") > 0 Then
Me.Articolo.BorderStyle = 1
Me.Articolo.FontBold = True
Else
Me.Articolo.BorderStyle = 0
Me.Articolo.FontBold = False
End If
Le combinazioni possono essere tante...
Ciao, Carlo 

 ha scritto nel messaggio
news:fdtofo$2bl$1...@tdi.cu.mi.it...

Hai inteso benissimo!!!
Spettacolo!
Grazie mille CARLO
Ciao
Newsgroup: it.comp.appl.access
Titolo: Inserire nella maschera di scarico il prezzo dal listino

Ciao amici del newsgroup
possiedo un vecchio database in Dos per la gestione di magazzino nel quale
c'è una funzione, molto carina, che mi permette di caricare automaticamente
il prezzo di un articolo, in una maschera di scarico degli articoli,
prelevandolo dal listino.
Vorrei sapere se si puo fare anche in Access.
In sostanza posto che ho una maschera di scarico, composta da una maschera
di anagrafica dei Clienti e una sottomaschera per lo scarico vero e
proprio - composta dal nome dell'articolo, la descrizione, il prezzo la
quantita ecc -, vorrei, con un doppio click nella casella di testo prezzo ad
esempio, aprire la maschera listino nel quale, in corrispondenza di ciascun
articolo, ci sono due prezzi uno al dettaglio l'altro all'ingrosso.
La maschera listino, aperta in questo modo, dovrebbe visualizzare solo il
record relativo all'articolo che mi interessa con i relativi prezzi.
Con l'evento doppio click nella casella di testo relativa al prezzo che  mi
interessa automaticamente deve essere caricato nella casella di testo del
prezzo della maschera di scarico con la possibilità, se non voglio applicare
i prezzi di listino, di mettere anche un prezzo diverso.
Tutto questo è possibile farlo?

 ha scritto nel messaggio
news:v5Vpa.64731$DT4.1...@twister1.libero.it...

Sull'help dai un'occhiata alla funzione DLookup.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: file dati con database separati

chiedo a voi esperti un parere
 
se creo un db diviso front end e back end 
 
caso 1: tutte le tabelle le metto nell'unico back end e le collego al front end
caso 2: creo 3 back end per tenere alcune tabelle nel primo back end alcune nel secondo e alcune nel terzo back end poi le collego comunque tutte all'unico front end
 
secondo voi cambia qualcosa a livello di prestazioni o altri effetti indesiderati nell'avere un unico back end o più back end?
 
grazie.


La risposta non può essere così BANALE...!
Se le tabelle tra i 3 BE non hanno alcun legame e non devi interagire nelle Maschere tra dati di un BE ed un'altro non cambia NULLA... se invece i dati possono avere Legami o JOIN in Queries... beh mi verrebbe da chiederti perchè 3BE....?
 
@Alex


no le tabelle separate non hanno nessuna relazione fra loro 
3 BE perche se uno si danneggia le altre form che usano le altre tabelle presenti negli altri 2 BE continuano a funzionare. sbaglio?

Questa affermazione mi terrorizza sì, non capisco come è strutturato il tuo lavoro.
@Alex
Newsgroup: it.comp.appl.access
Titolo: spostare e rinominare files

Buona giornata a tutti !
Ho una tabella che contiene due campi : il nome del vecchio file e il nome 
del nuovo
ho due directory una che contiene i files con il vecchio nome e una vuota 
che in cui devono andare i nuovi assumendo il nome nuovo
come faccio a ciclarli in modo da ottenere la rinominazione di cui sopra?
vi ringrazio in anticipo come sempre !
Paolo

 ha scritto nel messaggio 
news:K4Xth.21629$bH4....@tornado.fastwebnet.it...

Ciao,
questa funzione ti permette di ricorrere solo ad Access:
Public Function CopiaUnFile(Origine As String, Destinazione As String)
 FileSystem.FileCopy Origine, Destinazione
End Function
Puoi benissimo richiamarla in un ciclo passando il nome originale compreso 
il percorso e il nuovo percorso con il nuovo nome del file.
Tipicamente:
CopiaUnFile("C:\TuoFile.xxx", "F:\TuoNuovoNomeFile.xxx")
Ciao, Carlo 

 ha scritto nel messaggio 
news:epcug2$kuh$1...@tdi.cu.mi.it...

ciao Carlo e grazie per la risposta che provero tra non molto !
Nel frattempo con l'aiuto di un collega abbiamo elaborato quanto segue :
Private Sub Comando2_Click()
' Necessita di Strumenti\Riferimenti:Visual Basic For Application;Microsoft 
Access 9.0 Object Library; OLE Automation;Microsoft ActiveX Data Objetc 2.1 
Library; Microsoft Scripting Runtime
'FileScriptingObject
Dim fso As New FileSystemObject
Dim fls As Scripting.File
Dim ImmagineP As String, ImmagineA As String
Dim FolderP As String, FolderA As String
'Folder di Partenza ed Arrivo delle immagini
FolderP = "G:\Imm_New_2007\"
FolderA = "G:\Imm_New_2007_rin\"
'Collegamento al Data Base
Dim cn As New ADODB.Connection
cn.Open CurrentProject.Connection
Dim rs As New ADODB.Recordset
rs.Open "T_Confronto_Aggior", cn, adOpenStatic, adLockOptimistic
Dim i As Integer
rs.MoveFirst
For i = 1 To rs.RecordCount
    ImmagineP = rs("Nomefile_Orig").Value
    ImmagineA = rs("Codice_Foto").Value
    For Each fls In fso.GetFolder(FolderP).Files
        If ImmagineP = fls.Name Then
            fso.CopyFile FolderP & ImmagineP, FolderA & ImmagineA, True
            rs("Conferma").Value = ImmagineP
        End If
    Next
    rs.MoveNext
Next
rs.Close
Set rs = Nothing
cn.Close
Set cn = Nothing
End Sub
e funziona molto bene aggiunge anche un campo di conferma ome puoi notare.
Vorrei magari sapere cosa ne pensi, dato che magari puoi aggiungere o 
modificare qualche cosa al fine di renderla migliore
Con la buona serata e grazie ancora
Paolo


Ciao Paolo
se funziona bene usala pure!
Con quello che ti ho mandato le righe di codice sono meno di un quarto...e 
con lo stesso risultato.
In aggiunta, e se distribuisci il programma, non dovrai preoccuparti di 
inserire il riferimento alla libreria Microsoft Scripting Runtime.
Ciao, Carlo 

 ha scritto nel messaggio 
news:epddjs$aag$1...@tdi.cu.mi.it...

Vero, Carlo infatti ho provato con analogo risultato e quindi dato che è piu 
semplice...... detto fatto
Grazie ancora sei / siete sempre preziosi
Paolo
Newsgroup: it.comp.appl.access
Titolo: Aiuto urgentissimo

Desidero sapere se esiste un programma per estrapolare i file contenuti in
un unico file. In poche parole ho un file che devo vedere se sia exe o una
dll che contiene un mdb che vorrei estrarre sapete come fare?????
Grazie mille
 
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Grazie mille
Domanda 1: Se è un unico file ... quanti file può contenere? E' un archivio 
quindi?
Domanda 2: Non sei stato molto chiaro a mio avviso
Affermazione 1: Il subject è insignificante
Considerazione GLOBALE: ti consiglio di leggere le regole di questo NG per 
capire come si fa un post corretto e come evitare di rimanere con il 
problema in essere (ovvero senza aiuto).
Senza rancori ;)
-- 
**********
EmMeCi
**********
Blog: 
http://www.setfocus.it
 

In poche parole desidero sapere come fare per vedere i file contenuti in una
dll.



 dll.
A parte che l'argomento sembra essere OT, una DLL non contiene "file", bensì 
una serie di funzioni ed una tabella di puntatori ad esse che serve per 
poterle referenziare da altri file.
-- 
PBsoft di Gabriele Bertolucci
www.pbsoft.it