mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Saltellare tra i controlli di maschere, sottomaschere e sottomaschere di sottomaschere.

Il problema (credo facile, facile........ per voi) è non riesco a passare da
un controllo di una sottomaschera a quello della maschera.
Ho provato ad utilizzare su "dopo aggiornamento" dell'ultimo controllo della
sottomaschera, il seguente codicino docmd.gotocontrol
forms!nomemask!nomecontrollo; risultato zero.
Ho proseguito con Forms!nomemask!nomecontrollo.SetFocus; restituisce errore.
Ma insomma come diavolo si fà a fare stà sciocchezza? E poi, la differenza
tra SetFocus e GotoControl???????
Ciao
Alfio

 ha scritto nel messaggio
news:JCaT5.25084$FV2.7...@news.infostrada.it...

Se il problema riguarda l'uso della tastiera (con il mouse è ovviamente
banale!),
CTRL+TAB.


_____
Ho provato a farmi un form (rubrica) ed un sottoform e dal sottoform su
evento uscita impostando
Forms![Rubrica]![Cognome].SetFocus
mi va al controllo cognome del form e funziona.
Non so' come mai a te non funzioni...non penso che dipenda dalle parentesi
quadre!
ciao Riccardo


Per spostare il fuoco dalla sottomaschera alla maschera non dovresti avere
problemi così come ti ha detto Riccardo.
Qualche problemino ce lo avresti per spostare il fuoco dalla maschera alla
sottomaschera se prima non sposti il fuoco sul controllo sottomaschera della
maschera principale; ovvero devi scrivere:
Me![NomeControlloSottomaschera].SetFocus
[Form]![NomeMaschera]![NomeSottomaschera]![NomeControllo].SetFocus
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------

 ha scritto nel messaggio
news:WQeT5.27245$FV2.8...@news.infostrada.it...

Bene, grazie per l'help......
Ma ancora non mi è molto chiaro quando usare "SetFocus" e quando usare
"Docmd.GotoControl".
Alfio

 ha scritto nel messaggio
news:casT5.30903$FV2.9...@news.infostrada.it...

Apparentemente sono simili, ma la differenza sostanziale è scritta
sull'help, relativamente a DoCmd:GotoControl, di cui ti riporto la parte che
ti interessa:
..... L'azione VaiAControllo sposta lo stato attivo nel campo o nel
controllo specificati nel record corrente della maschera, del foglio dati
della maschera, della tabella o della query aperti. ......
Come vedi con GotoControll puoi spostarti solo all'interno del record
corrente e non "saltellare", come serve a te, tra controlli associati a
tabelle e quindi a record diversi dal corrente.
Se invece devi spostare il fuoco tra controlli associati al record corrente
della maschera attiva, i due modi di operare risultano equivalenti.


Newsgroup: it.comp.appl.access
Titolo: Scrivere Codice da Codice

Ciao a tutti!
E' possibile scrivere codice VBA da codice?
Mi spiego meglio: è possibile, cliccando un commandbutton, creare del
codice associato ad un altro oggetto?
Grazie e buona giornata!

 codice associato ad un altro oggetto?
Sě. Vedi <F1> per "CreateEventProc" e "InsertLines".
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it

 Access FAQ:
www.donkarl.com/it
Grazie!
Newsgroup: it.comp.appl.access
Titolo: pulsanti

Premetto che non sono un esperto e vi chiedevo:
Esiste la possibilità di collegare la descrizione/etichetta di un pulsante,
che ho creato su una maschera, al valore di un campo inserito in una
tabella.
Es.
il mio pulsante Hutch deve acquisire il valore del campo Nome1 inserito
nella tabella Laura.
Grazie
Milo

 ha scritto nel messaggio
news:ahorka$uqiul$1...@ID-115013.news.dfncis.de...

Prova con: Me!Hutch.Caption = Me!nome1
Ciao.
--
Sergio MAZZA

 ha scritto nel messaggio
news:ahosi2$5gn$1...@canarie.caspur.it...

Ho provato ad inserite l'aiuto nelle proprietà del pulsante in etichetta, ma
non funzia.
Mi sapete indicare dove ho sbagliato?


Hai provato a fare che???
Ricominciamo; dovresti inserire nell'evento "su corrente" della maschera il
codice che scrive il valore contenuto nel campo di tabella "nome1";
Es.
'------------
Private Sub Form_Current()
Me!Hutch.Caption = Me!Nome1
End Sub
'------------
Ciao.
--
Sergio MAZZA


Grande!
Grazie per il suggerimento.
Solo un ultima cosa.
Quando apro la maschera, ma non ho inserito alcun valore nella tabella
scatta un errore di debut n° 13.
Ho provato con vari IIf ma non sono riuscito a fargli capire che quando i
valori nella tabella sono Nulli deve lasciare la descrizione vuota, oppure
l'etichetta predefinita.
Grazie in anticipo
Milo
Scusate l'ignoranza.

 Scusate l'ignoranza.
dipende da quello che devi fare; se il pulsante deve essere sempre visibile
anche quando non è presente nessun valore (Null) nel campo di tabella, devi
inserire un qualsiasi testo in sostituzione del Null.
Es.
'--------------
Me!Hutch.Caption = nz(Me!Nome1,"Nessun valore")
 '--------------
Ciao.
--
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: Come caricare un controllo in VBA?

Salve a tutti del N.G.
Volevo sapere, se č possibile o se esiste un modo per caricare un ocx in un
report in modo dinamico, ossia da VBA con il comando CreateReportControl.
Ho usato questo comando per generare in runtime dei controlli per inserirli
dinamicamente nel mio report, ma ora mi trovo in una strana problematica.
Avendo un report, io uso il comando CreateReportControl per creare label,
text e image in modo dinamico, ossia mediante comandi. Il problema č che
vorrei caricare degli ocx, in particolare il TBarCode3 che ho in versione
DEMO. Questi li riesco ad inserire, normalmente, se creo un report
manualmente, ossia (come ben sapete) si tratta di cliccare l'ultima icona a
destra dei controlli e aprire la windows con tutti gli activeX presenti nel
sistema, selezionare quello desiderato e inserirlo nel report, settare le
variabili ecc.
Ma quando lo devo fare in VBA non ho la piů pallida idea di come fare ciň.
Il comando:
Dim CTRLBarCode as TBarCode3
Dim CTRLBARCODE As Access.CustomControl
        Set Ctrl = acApp.CreateReportControl(Me.cmbTemplateRPT,
acCustomControl, acDetail, , Me.txtOrigineDati, CInt(Me.txtPosX) * 56.7,
CInt(Me.txtPosY) * 56.7, CInt(Me.txtWidth) * 56.7, CInt(Me.txtHeight) *
56.7)
................. Cosa posso fare?
Vi prego di aiutarmi se possibile, in quanto questo č l'ultimo step.
Grazie per aver letto.
Klaus Dobermann
doberm...@tin.it

 wrote in message
3mjG8.65866$CN3.2...@news2.tin.it...


 wrote in message
dSwH8.83784$CN3.2...@news2.tin.it...


Newsgroup: it.comp.appl.access
Titolo: Se DoCmd.FindRecord non trova la corrispondenza

Ho utilizzato in un modulo la funzione DoCmd.FindRecord assieme ad Inputbox
per cercare un record in una tabella purtroppo non riesco ad utilizzare
(forse perchč non utilizzo una corretta sintassi) un ciclo do If affichč
ottenga in caso di record non trovato un Msgbox che mi avverte con
conseguente Exit Function.
Ringrazio
Saluti
--------------------------------
Inviato via 
http://usenet.libero.it


Se la ricerca la devi effettuare su un controllo della maschera chiamato
Città, genera un codice VBA simile a questo:
Dim Pippo As String
Pippo = InputBox("Digita il nome della città cercata")
Me!Città.SetFocus
DoCmd.FindRecord Pippo
If Me!Città <> Pippo Then
    MsgBox "La città digitata non esiste"
    Exit Sub
End If
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Aiuto!

Sono una novellina di Access ed ho bisogno di aiuto! Devo costruire una
tabella in cui ho nome cognome ecc.. e poi devo inserire delle
caratteristiche (sempre le stesse) per ogni mese dell'anno... Come si fa a
cambiare mese?
Sono stata chiara? Grazie Diana

 ha scritto nel messaggio
news:c5gR9.75266$TC5.2...@twister1.libero.it...

Mica tanto! ;-)
Inoltre usa per i tuoi messaggi un Oggetto Significativo e non generico:
molti frequentatori non leggono i messaggi con un subject generico.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:c5gR9.75266$TC5.2...@twister1.libero.it...

Oltre a ribadire quanto ha detto Roberto (oggetto e maggiori dettagli),
provo a rispondere in base a quello che credo d'aver capito sia il tuo
problema.
Praticamente hai una tabella "Anagrafe" con i dati personali (Cognome, Nome,
ecc...) e poi devi avere dei dati per ciascun soggetto contenuto in anagrafe
mese per mese.
Nella tabella Anagrafe metterai anche un campo chiave primaria "ID" di tipo
contatore tanto per non sbagliare.
Io creerei una seconda tabella che chiamerò "Mese" che conterrà - da quanto
ho capito - almeno i campi "Mese", "Anno" e soprattutto "Chiave" (intero
lungo) che andrà a collegarsi - stabilirà una relazione uno a molti - tra
Anagrafe.ID e Mese.Chiave. Vi sarà un solo record Anagrafe per molti record
Mese collegati a ciascun anagrafico. In tabella Mese creerei come chiave
primaria l'insieme di Chiave+Anno+Mese, in modo da evitare che si possano
duplicare mesi per lo stesso anagrafico.
In tabella Mese va creato un indice su Chiave (con duplicati).
In tabella Anagrafe creerei anche degli indici (per le ricerche) su Cognome
e Cognome+Nome (sempre con duplicati, di Mario Rossi ce ne sono tanti...).
Spero di essere stato abbastanza chiaro e soprattutto di non aver detto
stupidaggini - nel caso le meritate fustigate arriveranno senza dubbio
subito.
Un consiglio spassionato: se dovrai usare spesso Access in futuro, comprati
un buon libro di base, studialo e fatti gli esercizi proposti - sono soldi
sempre ben spesi - oltre a visitare un luogo ottimo come il sitocomune.
Saluti, Luigi.
--
Togli xyzViaLoSpam dall'e-mail per rispondere.
ICQ (LICQ)  73039437

Newsgroup: it.comp.appl.access
Titolo: PROTEZIONE DA COPIE PIRATA

Salve a tutti,
volevo sapere se esiste un programma che protegge una tua applicazione da
indesiderate copie pirata.
Se si, dove posso trovarlo?
Grazie a tutti

Se si, dove posso trovarlo?
Sul 
sitocomune.com
 c'e' un esempio di come proteggere usando il numero
di serie dell'hard disk !!
Credo faccia x te

 ha scritto nel messaggio
news:C1QUa.207066$lK4.5...@twister1.libero.it...

Secondo me č meglio cercare di limitare l'uso dell'applicativo in caso di
copia
piuttosto che evitarne la copia stessa o l'uso.
La fortuna di Microsoft con Windows e anche con altri applicativi, č
stata proprio la copia pirata.
Immagina i casini se, come spesso succede, si cambia Hard Disk o si sposta
l'applicativo in un altro disco della stessa macchina.
Ciao, Carlo
Newsgroup: it.comp.appl.access
Titolo: stampa unione da tante fonte

Ho office 2000, e volevo chiedere se era possibile effettuare la stampa
unione su un documento word utilizzando non una sola tabella o query di
access ma andando a prendere i vaolri dei campi da diverse tabelle e/o
query... se possibile chi mi spiega come si fa
grazie
--------------------------------
Inviato via 
http://usenet.libero.it


Il documento word con la stampa unione è associato ad una sola fonte dati,
tabella/query che sia; con una query prendi vari campi dalle tabelle messe
in relazione (nella query). Poi nello stesso documento word tu puoi inserire
un campo {database} che legge i dati presi da altre tabelle/query nello
stesso mdb o in un altro.
Dai un'occhiata nel sito comune (
www.sitocomune.com
) c'è un esempio per
realizzare un documento tipo fattura (intestazione/dettagli) dove spiega
come realizzare questo.
Se è questo che ti serve...
Ciao.
--
Sergio MAZZA

Scusami... non è che potresti essere più chiaro?... cmq grazie per il sito 
non lo conoscevo
e starò sempre lì adesso!!! ;-))

 e starň sempre lě adesso!!! ;-))
Cosa non ti č chiaro?
Hai trovato l'esempio che ti ho indicato?
Ciao.
--
Sergio MAZZA

Newsgroup: it.comp.appl.access
Titolo: Immagine in report

Salve, ho bisogno di conoscere le regole di gestione di una immagine
importata in un report. Mi spiego meglio : ho un logo in  foglio word che in
termini qualitativi č molto buono, sia in visualizzazione che in stampa; ho
estratto questa immagine ed ho creato un bmp, un jpg, ma importando questa
in un report (sia come immagine collegata che importata) ho un risultato
discreto in visualizzazione ma mediocre in stampa, sia su laser che su
inchiostro. C'č qualche regola che non conosco  ? Grazie.



prova a fare direttamente copia incolla da Word a Report
Saluti.
Emanuele.

Newsgroup: it.comp.appl.access
Titolo: Numero di Record presenti in tabella

Mi potreste dire qual'č il comando VBA che mi restituisca il numero di
records presenti in una tabella, su una casella di testo presente in una
maschera?
Ciao a tutti, Rosario.

 wrote in message
news:UHIQ6.4596$HK.3...@news.infostrada.it...

- Apri un recordset sulla tabella;
- ti posizioni all'ultimo record (MoveLast);
- leggi il numero di records con RecordCount.
RecordCount ritorna il numero di record a cui si č avuto accesso: č per quello
che devi posizionarti in fondo alla tabella!
Ciao!
Esteban
Hosted by 
www.seber.it

 Hosted by 
www.seber.it
Ecco l'esempio che ho trovato nella guida:
Dim MioDB As Database, MieiRecord As Recordset, Totale As Long
Set MioDB = DBEngine.Workspaces(0).Databases(0)
Set MieiRecord = MioDB.OpenRecordset("Impiegati")
MieiRecord.MoveLast
Totale = MieiRecord.RecordCount
If Totale = -1 Then
 Debug.Print "Impossibile contare i record."
End If


 wrote in message
UHIQ6.4596$HK.3...@news.infostrada.it...

Nessun comando VBA, scrivi l'espressione nell'origine dati del controllo.
=DCount("*";"Nome tabella")
Antonio

 > RecordCount ritorna il numero di record a cui si č avuto accesso: č per


 > Mi potreste dire qual'è il comando VBA che mi restituisca il numero di

Newsgroup: it.comp.appl.access
Titolo: Rinominare una jpg

Salve a tutti,
un aiutino  vi prego!
ho un database con delle immagini "collegate"
cioe il solito campo "path" percorso e l'evento su corrente che legge e
imposta l'immagine.
Ora il problema....
La path è composta anche dal campo nomearticolo....
se un utente cambia il nome articolo-->cambia la path--->il db non trova +
la foto...
Come si puo fare una routine che rinomini la foto.jpg seguendo la modifica
sul database...?!
Entro nella scheda dell'articolo pippo
lo modifico in pipposimpatico...
la routine dovrebbe andare nella cartelle e rinominare pippo.jpg
in pipposimpatico.jpg..
Grazie!

jobxxyy ha detto: in data 22/11/2005 10.14:

potresti usare
Dim SourceFile, DestinationFile
SourceFile = "aritcolopippo" ' percorso completo ovviamente
DestinationFile = "articolopipposimpatico" ' percorso completo
FileCopy SourceFile, DestinationFile
'Elimino l'originale
Kill sourcefile
ciao
Nick

 Kill sourcefile
ok, chiarissimo e semplice,
ma non riesco a capire su quale evento metterlo...
come faccio ad avere nelle variabili il vecchio nome e il nuovo?
se lo faccio all'apertura ho il vecchio...
se lo faccio in chiusura maschera ho il nuovo..

jobxxyy ha detto: in data 22/11/2005 11.00:

devi usare 2 eventi (credo)
su "attivazione"  (o "on enter") del campo nome articolo memorizzi il 
nome attuale (vecchio) (mettilo in una variabile pubblica a livello di 
maschera)
poi
su "dopo aggiornamento" (o "after update") del campo nome articolo 
prendi il nuovo nome e fai eseguire il codice prendendo come SourceFile 
il nome che hai messo nella variabile pubblica..
..sono riuscito a spiegarmi?
ciao
Nick

Newsgroup: it.comp.appl.access
Titolo: Copiare record di una sottomaschera

ho una maschera con all'interno una sottomaschera continua; come faccio
a duplicare il tutto in un altro record della maschera?


Due post in un'ora e mezza, bah!
La tua richiesta comunque non è chiara.
1. Maschera e sottomaschera hanno la stessa origine dati?
2. Cosa devi copiare: un record della sottomaschera... e dove? Un record 
della maschera... e dove?
3. Maschera e sottomaschera sono collegate dai campi master e secondario?
Ciao
NatPP

Nat.P.P ha scritto:

maschera ha 1 origine dati mentre la sottomaschera ne ha un'altra. i
dati della sottomaschera sono collegati a quella della maschera.
devo copiare un record della maschera (che contiene +record nella
sottomaschera continua) in un altro nuovo record della maschera, in
pratica duplicare il tutto in un nuovo record compreso quanto c'e'
nella sottomaschera. Poi procedero' a fare alcuni cambiamenti dove
necessario in mdo da rendere univoco il nuovo record .
ciao grazie
P.S. L'altro post si riferisce ad un altro problema


Fai una query di accodamento mettendo come criterio forms!tuaform!tourecord
(ovvio usando i nomi giusti)
-- 
-- 
Massimiliano Amendola
www.accessgroup.it
Il sito italiano di svilupatori Access
www.donkarl.com/it/cisa
Newsgroup: it.comp.appl.access
Titolo: Integrità referenziale

Sto cercando di capire come funziona questa cosa che ho iniziato a vedere da
poco.
Io ho una tabella delle Zone della città
IdZona
Zona
Un altra tabella cone le Vie della città
IdVia
Via
IdZona
Zona
Riempio Vie.IdZona tramite una casella combinata che pesca i valori nella
tabella Zone.
All'evento Onclick della casella combinata ho associato la funzione che
preleva Zone.Zona dalla casella combinata e la copia in Vie.Zona
Ho creato la relazione uno a molti tra Zone.IdZona e Vie.IdZona con attivata
l'integrità referenziale per aggiornare i campi correlati.
La mia domanda è questa:
Se vado a modificare il nome della singola zona (ad es trasformo "ZONA A" in
"ZONA B") in Zone.Zona,  l'integrità referenziale mi dovrebbe apportare le
modifiche a tutti i campi Vie.Zona che contengono "ZONA A" ma questo non
succede.
devo impostare un altra relazione per farlo accadere?
Grazie


In access, al contrario di alcuni DBMS, l'integrita' referenziale
consente anche la "modifica" automatica.
Nella tua struttura c'e' qualcosa di superfluo:
Perche' c'e' la descrizione di zona sulla tabella vie?
Io avrei fatto cosi'
TabZone ----> idzona, zona
Tabvie -----> idvia, via, idzona
con relazione tabzone.idzona->tabvie.idzona
la descrizione della zona si recupera da tabzone.
Quello che chiedi tu e' un po'troppo poiche', mi sembra di aver capito,
che pretendi anche la modifica di zona (su vie) che penso non sia nella
relazione di integrita' 
------
Probabilmente, anzi, avrei fatto cosi' (e' difficile che ci sia omonimia
fra le zone)
Tabzone---> Zona
Tabvie ---> via, zona
modo di procedere non proprio ortodosso ma la "denormalizzazione" quando
ce vo' ce vo'
--
a.cara 
Togli qualcosa dall'email

Newsgroup: it.comp.appl.access
Titolo: Creare un Help

qualcuno di voi ha avuto modo di creare un Help in Access? Utile in caso
l'utente premendo F1 si apre la guida in HTML relativa all'argomento nel
form.
Grazie
Ciao

 ha scritto nel messaggio
news:b7jo0p$is$1...@grillo.cs.interbusiness.it...

leggi qualche messaggio del gg indietro... c'č gią qualche suggerimento..
cerca come HELP
ciao
Newsgroup: it.comp.appl.access
Titolo: Tabelle collegate e runtime

Nella distribuzione di un file .mde da installare con runtime di
access,spesso è necessario mettere l'utente in condizione di ricreare il
percorso verso le tabelle collegate.Qualcuno conosce una utility per
ottenere questo risultato? (ricollegare le tabelle selezionando la nuova
directory nella rete locale dell'utente)

 ha scritto nel messaggio
news:c9i1lr$ahm$1...@fata.cs.interbusiness.it...

puoi crearti una piccola routine VBA che legge i percorsi da tabella e ricollega il db
esempio:
nella tabella "TabTabelle" ci sono i nomi delle tabelle, nella tabella "TabPercorsi" c'è il percorso
nel quale si trovano le tabelle (per percorso intendo nome del file, eccc)
prima di tutto devi eliminare quelle presenti quindi scorri con un recordset (io uso DAO) TabTabelle
e metti questo ciclo
do while not rst.eof
    docmd.deleteobject actable, rst!nometabella
    rst.movenext
loop
per ricaricare
prima cerchi il percorso generale (con dlookup o con un altro recordset) e lo metti in una varabile:
percorsodb = dlookup("PercorsoCompleto", "TabPercorsi") ' supponiamo che abbia solo 1 record questa
tabella, altrimenti devi aggiungere il criterio e ricorda che il percorso completo sta ad indicare :
drive, cartella, eventuale sottocartella, nomedb estensione db
quindi fai un altro loop sulla TabTabelle:
do while not rst.eof
    docmd.transferdatabase  acLink, "Microsoft Access", Percorsodb, acTable, rst!nomeTabella,
rst!nomeTabella
    rst.movenext
loop
ricordati di controllare l'errore se una tabella non è stata trovata
spero di essere stato chiaro :-)
ciao
Nick

 ha scritto nel
messaggio news:c9i1lr$ahm$1...@fata.cs.interbusiness.it...

Vai sul Sito Comune (link qui sotto), nella Sezione Tables troverai 3 o 4
FAQ che ti indicano come risolvere il tuo problema.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: uffa, collegamenti...

Mi viene un pochino di voglia di lavorare, apro Access, faccio una
modifichina, compilo, mi esce l'errore "tipo non definito dall'utente"...
Ho controllato i riferimenti, tutto a posto... uffa, come mi piacerebbe che
le cose funzionassero sempre.
Cosa puo' essere?


wrote:

che riferimenti hai impostati?
dao viene prima di ado?
Saluti.
Emanuele.
Newsgroup: it.comp.appl.access
Titolo: Istruzione sql per filtrare una sottomaschera

ciao a tutti,
ho una sottomaschera dove visualizzo tutte le Destinazioni diverse.
Vorrei tramite una istruzione sql in VBA filtrare solo quelle dove il
codice cliente nella sottomaschera è uguale o a quello della maschera
anagrafica cliente o a quello imputato in una scheda di lavorazione, cioè
se è aparta la maschera anagrafica prende il codice cliente
dell'anagrafica se invece è aperta la maschera della scheda di lavorazione
prende quello del cliente inputato nella scheda di lavorazione.
Come posso fare?
Grazie.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 -- 
Puoi risolverlo indicando come proprietà Collega campi master del controllo
sottomaschera il nome di una casella di testo non associata nascosta posta
nella maschera principale il cui valore lo imposterai, a seconda del caso, o
con il codice cliente della maschera anagrafica cliente o con il codice
cliente imputato nella nella scheda di lavorazione.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: help anomalia in calcolo totali report

ho un report che fà delle somme e sottrazioni con il seguente codice
    If Me.Data = DMin("data", "gr170") Then
        Me.saldo = Me.iniziale + Nz(Me.Carico, 0) - Nz(Me.Scarico, 0)
        Prec = Me.saldo
    Else
        Me.saldo = Prec + Nz(Me.Carico, 0) - Nz(Me.Scarico, 0)
        Prec = Me.saldo
    End If
ho provato con il debug
il mio problema è che su cambio pagina non capisco il motivo una certa somma 
o sottrazione
dell'else qui sopra riportato me lo esegue 2 volte quindi dalla seconda 
pagina in poi mi sballa
tuttto
qualcuno di voi sà perchè su cambio pagina esegue 2 volte l'else? 


risolto, ho messo il codice su stampa anzichè su formattazione del corpo del 
report
e magicamente tutto si è sistemato, il mitovo però non lo capito se qualcuno
me lo spiega.... 

 ha scritto nel messaggio
news:47a9da0d$0$17943$4faf...@reader1.news.tin.it...

sì ma attenzione che anche nell'evento Su Stampa potrebbe eseguire il codice 
due volte.
Per risolvere controlla il valore di FormatCount o PrintCount a seconda 
dell'evento.
Trovi tutte le info nel manuale di Access.
Ciao
--
Giorgio Rancati
[Office Access MVP]
Newsgroup: it.comp.appl.access
Titolo: DoCmd.OpenQuery...

Il mio problema è questo:
Dovrei creare un pulsante che mi apra una query in modalità foglio
dati... 
Le normali query, di solito (se ho ben capito) si aprono con il
comando: DoCmd.OpenQuery ecc.ecc...
Nel mio caso specifico, la mia è una query parametrica, quindi usando
openquery si apre una finestra che mi chiede il valore del parametro.
Vorrei evitare l'apertura di questa finestra e passargli direttamente
il valore di me.id_ordine...
(Quindi non si presenta il problema di qualche mio post precedente, in
cui dovevo ottenere un recordset da una query per poi lavorarci sopra
via codice, quello è stato risolto da oliones che ringrazio ancora)
C'è qualche modo per far cio? o mi devo sorbire la maledetta
finestrazza?
Gilmour
--
Icq: 32405502
Se le persone che parlano male di me, sapessero quello che dico io di loro, parlerebbero peggio.
Jim Morrison
Clicca sul link per contattarmi direttamente da icq
http://msg.mirabilis.com/scripts/contact.dll?msgto=32405502

 ha scritto nel messaggio
news:v1l9ot8s00g2mlogc...@4ax.com...

Puoi evitare la finestrazza se inserisci nella struttura della query il
riferimento al controllo sulla maschera aperta; nella riga delle condizioni
scrivi Forms!nomeForm!id_controllo e poi la apri con OpenQuery...
Ciao.


Funziona...
Grazie :))


Newsgroup: it.comp.appl.access
Titolo: Importazione txt

Un saluto a tutti i frequentatori del NG,
ho bisogno di un consiglio sull'importazione di dati da un file del tipo
*.txt:
il problema è che non tutte le righe del file sono uguali, infatti la prima
ha un campo in più (12 caratteri) che le altre non hanno.
Vorrei sapere come fare per importare la prima riga secondo una specifica di
importazione, e le successive secondo un'altra. Come altra soluzione si
potrebbe anche allineare tutte le righe del file a destra invece che a
sinistra prima dell'importazione.
Grazie a tutti e ciao

 Grazie a tutti e ciao
Se i campi sono delimitati da qualcosa, non dovrebbe cambiare nulla, no?
Antonio
Newsgroup: it.comp.appl.access
Titolo: forse OT: Store Procedure...

Forse sono un pò ot con le store procedure in access, ma so che il ng è
popolato dalle migliori menti del panorama database in italia... (il tutto
senza la minima ironia ovviamente!)
E' da una settimana che mi stò imbattendo in una store procedure che proprio
non riesco a capire... sembrerebbe molto semplice ma proprio non mi
riesce... vi spiego devo ottenere questo...
1. filtro una tabella 'dati' con un parametro che passo alla store
procedure....
2. il risultato di questo filtro devo a sua volta usarlo per creare un'altra
select dove incrocio tramite id i risultato ottenuti con una tabella
'anagrafica' ottenendo solo i valori non contenuti nel risultato della query
precedente...
il risultato devo quindi restituirlo dalla store procedure...
in altre parole devo combinare due filtri all'interno della medesima store
facendo in modo che il secondo filtro dipenda comunque dal risultato del
primo...
qualche idea per mettermi sulla strada giusta? mi sono perso...
Grazie mille,
Alex


Parlando di stored procedure in access immagino che tu ti riferisca ad una
query, provo a darti un aiuto anche se non sono sicuro di aver capito quello
che ti serve...
Select Anagrafica.* from dati inner join Anagrafica on 
dati.id
=
anagrafica.id
where 
anagrafica.id
 not in (
Select Dati.id where Dati.campoparametro=dati.campodafiltrare=@parametro)
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/
Newsgroup: it.comp.appl.access
Titolo: Associare maschere

Problema, ho creato due maschere che fanno riferimento alla stessa
tabella, ne ho create due per ragioni estetiche e di spazio, per non
affolare troppo la maschera principale, quindi sulla maschera
principale ho inserito un pulsante che apre la maschera secondaria
nella quale solo raramente immetto dei valori.
Il problema è che se nella maschera principale mi trovo al record 145
ed apro la maschera secondaria tramite il pulsante, la secondaria di
default mi visualizza il record n. 1, vorrei invece che aprisse allo
stesso record della principale.
Grazie.

"JoeBlack®" <
joe_...@tiscali.it
^> ha scritto nel messaggio
news:3g0t20p3geg9nv879...@4ax.com...

Puoi usare in alternativa il controllo schede con 2 Pagine.
In ogni caso:
Suppongo IDPrimaryKey come nomedel Campo ChiavePrimaria e
per semplicità anche il nome del controllo ad esso associato:
Docmd.OpenForm NomeForm,,"[IdPrimaryKey]=" Me.IDPrimaryKey
La seconda Form si apre Filtrata sul Record della 1°, se chiudi la 2°
e cambi Record devi rieseguire l'Open.......!
@Alex.

"JoeBlack®" <
joe_...@tiscali.it
^> ha scritto nel messaggio
news:3g0t20p3geg9nv879...@4ax.com...

te lo fa la "creazione guidata pulsante di comando" , quindi inserisci un
pulsante di comando nella maschera e poi :
1.operazioni su maschere
2.apri maschera
3.scegli la tua maschera
4 seleziona : apri maschera e trova dati specifici da visualizzare
5. seleziona i campi corrispondenti.
ciao.

Ex Giocatore ha scritto:
OT:   Vedo che siamo in tanti che frequentano sia it.hobby.scacchi che
it.comp.appl.access!
Ciao,
      GS
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

ciao.
Così come dici non funziona, forse perchè come detto sopra fanno capo
alla stessa tabella solo che alcuni campi li ho spostati in questa
maschera secondaria.
Ho provato come dici facendo riferimento all'Id (Key primario) ed
altri campi, ma nulla la seconda maschera mi apre sempre sul 1 record
anche se mi dice : (filtrato)

rettifico, funziona avevo creato delle routine che ne impedivano lo
svolgimento, grazie.

 Ciao,
    si vede che vogliamo mantenere il cervello in movimento , e parafrasando
un grande :
"gioco con access e studio gli scacchi"
ciao !

"JoeBlack®" <
joe_...@tiscali.it
^> ha scritto nel messaggio
news:3g0t20p3geg9nv879...@4ax.com...

m
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.587 / Virus Database: 371 - Release Date: 12/02/2004
Newsgroup: it.comp.appl.access
Titolo: Librerie VBA con release differenti

Ho un DB sul quale lavoro con diversi PC e ho un problema con la Microsoft
Excle Object Library (Dico questa, ma può essere qualunque...): su un PC ho
la 11.0 e su un altro la 12.0. Ovviamente tutte le volte, nei riferimenti
dell'ambiente VBA devo flaggare quella giusta. C'è modo di scaricare la più
aggiornata sul sistema più vecchio?
Grazie.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Grazie.
NOn serve Flaggare nulla, anzi il problema lo generano proprio i riferimenti
ESPLICITI.
Usa la Tecinca LATEBINDING su cui in questo Forum si sono scritti TEMI
epici...
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: vba fa le bizze con le assegnazioni

ragazzi,
mi spiegate perche' questo codice non fa quello che dovrebbe fare?
If Me.XdmInstallDT.Value = "01/01/1900" Or IsNull(Me.XdmInstallDT) Then
  Me!XdmInstallDT.Value = ""
Else
 t = Split(Me.XdmInstallDT.Value, "/")
 Me!XdmInstallDT = t(1) & "/" & t(0) & "/" & t(2)
End If
nel senso che quando debuggo... e va sulla riga
 Me!XdmInstallDT = t(1) & "/" & t(0) & "/" & t(2)
il contenuto di Me!XdmInstallDT resta invariato
mi spiego meglio
Me.XdmInstallDT.Value = "22/05/07"
t = Split(....) quindi diventa t(0)="22" - t(1)="05" - t(2)="07"
quindi mi aspetto che
Me.XdmInstallDT.Value sia uguale a "05/22/07" 
invece resta a "22/05/07"
ovviamente ho debuggato e il controllo passa dentro l'else e quindi
sulle operazioni di cui sopra.. ma niente da fare.. :(
ho provato anche ad assegnare usando Me!XdmInstallDT.Value ma nulla..
idee?
ah... ci sono altri statement del genere nella stessa sub, con altre var..
e su quelle funzia tutto alla perfezione.. su questa mi sta sfasciando i
cosidetti.. ;)
aiutatemi.. pls.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 idee?
Secondo me il controllo in esame è di tipo data.
Quindi, quando tu vai ad assegnargli un valore che con la versione italiana
non è una data, o meglio lo è in formato anglosassone, lui la converte col
solito formato europeo.
Antonio

 converte col solito formato europeo.
il data source per il controllo su sql express e' di tipo datetime,
il problema e' che mentre faccio una query su sqlexpress lui mi ritorna
le date nel formato europeo (il formato mm/dd/yy e' americano non british)
mentre se faccio una query di update o insert le date le vuole in formato
US e non EU ... pur avendo tutti i settaggi di sql server messi bene.. 
mah...
altre idee?

Newsgroup: it.comp.appl.access
Titolo: Query su tabella SQL produce il LOCK!

Buongiorno a tutti,
Ho il classico MDB collegato a SQL. Ho notato che se faccio una query access 
di SELECT su una tabella SQL, finchè la query non termina la tabella è in 
LOCK, vi torna questo comportamento.
Per evitare il problema potrei fare delle query Pass-Trough con l'opzione 
WITH (NOLOCK)  ma c'è un altro modo per evitare questo problema. Che so 
specificando un'opzione nella query access?
Aggiungo che nelle Opzioni di Access ho impostato come "Blocco Record 
Predefintio"  l'opzione "Nessun Blocco".
Grazie.
-- 
Marco Papetti
www.shortchannel.it
 Il software di commercio elettronico OpenSource
www.mondoideale.com
  - Prodotti naturali e biologici. 

 Predefintio"  l'opzione "Nessun Blocco".
il manuale di Access dice:
----
I dati contenuti in una maschera, in un report o in una query di un database 
ODBC (Open Database Connectivity) vengono trattati come se fosse stata 
scelta l'impostazione Nessun record senza considerare l'impostazione della 
proprietà RecordLocks.
----
quindi la proprietà "RecordLocks" non ha alcuna influenza.con tabella 
allegate via ODBC.
Ciao
--
Giorgio Rancati
[Office Access MVP] 

 Ciao
Ciao e grazie mille.


Ciao e grazie mille.
Prego :-)
Ciao


Newsgroup: it.comp.appl.access
Titolo: evento su tasto invio

Db A97
in una casella di testo vorrei che alla pressione del tasto invio oltre a
posizionarsi su una nuova riga del campo mi scrivesse una piccola stringa
(kkk) di poche lettere accodata al testo gi� scritto, poi scrivo altro
testo e con invio mi accoda un'altra volta la stringa senza cancellare
quello che gi� � scritto.
Esempio di cosa vorrei ottenere: 
Prima parte del testo kkk 
seconda parte del testo kkk
terza parte del testo kkk
Ringrazio in anticipo chiunque vorr� darmi un aiuto
Cordiali saluti a tutti 
  Gabriele
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 terza parte del testo kkk
Se ti capisco bene puoi usare questo codice all'evento
"Su tasto gi�" della casella di testo:
If KeyCode = vbKeyReturn Then
    Me!NomeCasella.Text = Me!NomeCasella.Text & "rrr"
    Me!NomeCasella.SelStart = Len(Me!NomeCasella.Text)
End If
-- 
cu
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

Karl Donaubauer ha scritto:



Grazie Karl
Come sempre preciso e puntuale

Newsgroup: it.comp.appl.access
Titolo: 21,0

buonasera a tutti.
č possibile impostare (in una query o altro) il formato del campo im nodo 
che non visualizzi il virgola zero?
il campo deve visualizzare 21,7 ma se il valore č 21,0 deve visualizzare 
solo 21.
oppure deve visualizzare 33,45 ma se il valore č 33,40 deve visualizzare 
33,4.
naturalmente senza intervenire sulla larghezza dela colonna (capaci tutti 
:-)
come si fa? 


credo che l'oggetto sia poco significativo ... mentre riposti un nuovo 
messaggio in linea con le regole del presente newsgroup, potresti ripassarti 
la funzione format ...

Newsgroup: it.comp.appl.access
Titolo: come fare un controllo ...

ho due tabelle:
-anagrafica
Codice cliente | nome | etc etc
111111|pippo|.....
-consegnato
Codice cliente|contratto
111111|si/no
la seconda tabella č compilata con un form in cui inserisco i codici dei
clienti a cui ho consegnato il contratto nuovo. In pratica inserisco
codice-invio-codice-invio, flaggandomi automaticamente il campo contratto in
true.
Il mio problema č:
come faccio a fare un controllo sulla esistenza del codice cliente che
inserisco verificandolo nella tabella anagrafica?
grazie

 inserisco verificandolo nella tabella anagrafica?
Invece di fare un controllo che quello che inserisci esista in anagrafica,
dai la possibilità all'utente di selezionare SOLO codici già inseriti. Il
controllo casella di testo che prima avevi associato al campo Codice Cliente
della tabella Consegnato, trasformalo in una casella combinata sempre
associata a quel campo. L'origine dati della combo deve essere una query che
pesca dalla tabella clienti il campo Codice Cliente. Infine metterai la
proprietà della combo Solo In Elenco a sì.
Antonio

Newsgroup: it.comp.appl.access
Titolo: Ridimensionamento immagine in report

Ciao a tutti,
ho un report dove vengono stampate le immagini (2 per pagina, in 
orizzontale).
Poichè le immagini hanno formati diversi, ho impostato sulla proprietà 
dell'immagine il tipo ridimensionamento - Ridimensiona.
Ho quindi inserito il vba per scegliere la foto:
Me.foto_nc.Picture = path & Me.nome_foto
Tutto funziona regolarmente se non che le foto ridimensionate, vengono 
compresse o in orizzontale o in verticale.
 
Esiste un modo per ridimensionare l'immagine mantenendo però le proporzioni?
 
Vi ringrazio anticipatamente.
 
Ciao.
 
Stefano


ZOOM invece di ridimensiona
 
ciao
BFS


Ti ringrazio infinitamente...
 
Ciao.
 
Stefano
Newsgroup: it.comp.appl.access
Titolo: Aiuto su condivisione DB con applic.VB6

Salve a tutti, avrei questo tipo di problema:
Ho realizzato un applicazione in VB6 che si collega tramite DataEnvironment
ad un Database che si trova in una cartella di rete condivisa da piu
utenti.In pratica nel database ho solo le tabelle e le relazioni e con
l'applicazione gestisco i dati tramite form (inserimento,modifica,inquiry).
Questa applicazione deve essere utilizzata da molti utenti e quindi avrei
bisogno che il database sia aperto in modo condiviso e che piu utenti ci
possano lavorare senza problemi.
Essendo la prima volta che faccio una cosa di questo tipo, vorrei spaere
dove e come devo agire per fare questo, sul database,
sull'applicazione??...e soprattutto sapere se è possibile fare una cosa del
genere!!??
MatteoC.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/


metti il db in una cartella condividlo in rete (di default vi è un accesso
condiviso)
poi connetti la cartella come unità di rete (è comodo scegliere la stessa
lettera)
Non vedo particolari problemi.
MAssimiliano


Ti ringrazio per il suggerimento!!!
Ciao MatteoC.

Newsgroup: it.comp.appl.access
Titolo: Eliminazione tabelle con macro e gestione errori. Possibile?

Salve a tutti..
Vorrei impostare un comando di eliminazione di una serie di tabelle tramite
una macro. Il problema è che se una tabella non esiste la macro si blocca.
Come fare senza usare l'esempio in codice che si trova sul sito comune?
Grazie & saluti.
Massimo

Come fare senza usare l'esempio in codice che si trova sul sito comune?
c'č un motivo particolare per il quale vuoi proprio usare una macro?
sarebbe molto piů pratico scrivere del codice, e, se proprio ci tieni,
lanciarlo con una macro.
--
non studio non lavoro non guardo la tv
non vado al cinema non faccio sport
----------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access

 sarebbe molto più pratico scrivere del codice, e, se proprio ci tieni,


 Grazie.
1) Scrivi dopo il quoting!
2) Racconta alla persona la barzelletta del tizio che viene pizzicato dalla
vipera mentre fa pipì...
Antonio

è molto facile, avrà qualcosa da ridire...
senti, *è* facile.  se io te lo spiego e poi tu lo spieghi a lui?
con le macro non puoi fare tutto.  le macro sono solo una ventina di
operazioni standard...


operazioni standard...
Beh, io ci faccio anche il caffè collemacro...
Saluti, Antonio

Beh, io ci faccio anche il caffč collemacro...
sě, ma poi te lo bevi tu...  dimmi, te ne eri fatto uno anche prima
della I cena?  :-)))))


 della I cena?  :-)))))
Continui ad abboccare Luca?
Codice identità: La I cena stavo malissimo
Antonio


Se proprio devi farlo con una macro puoi applicare una condizione ad ogni
azione della macro.
Per fare questo ti serve una funzioncina che restituisca true se l'azione
deve essere eseguita, false in caso contrario.
Public Function EsisteLaTabellaQuery(rsNomeTabellaQuery As String) As
Boolean
On Error Resume Next
EsisteLaTabellaQuery =
CurrentDb().Containers("Tables").Documents(rsNomeTabellaQuery).Name <>
vbNullString
End Function
Così nella macro scriverai
Condizione:
EsisteLaTabellaQuery("NomeDellaTuaTabella")
Azione:
Elimina la tabella "NomeDellaTuaTabella"
Ovviamente la funzioncina può essere generalizzata per controllare
l'esistenza di maschere, report e altro.
Spero di esserti stato d'aiuto.
Michele Amato
--
{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}
Un pò di pubblicità per il mio sito, su
http://utenti.worldonline.it/micheleamato
è possibile trovare una add-in per Access97-2000:
          Access Navigator 2.0
comincia a esserci anche un pò di documentazione...
ho pubblicato anche la prima parte di un TUTORIAL
sull'uso di questo strumento
{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}{}

>Codice identità: La I cena stavo malissimo
apposta domandavo... :-)

Newsgroup: it.comp.appl.access
Titolo: problema con query

Salve a tutti..
avrei bisogno di un aiuto per la realizzazione di una query.
Il mio problema è questo. Ho queste 2 tabelle:
Anagrafica
Comuni
nella tabella anagrafica i campi ComuneNascita e ComuneResidenza contengono 
il codice del comune.
nella tabella comuni ci sono i codici e le descrizioni del comune stesso
Vorrei realizzare una query in cui comparissero non i codici ma le 
descrizioni di entrambi i campi in questione
Sperando di essere stato sufficientemente chiaro vi ringrazio.
Carlo

 Carlo
Nelle struttura della query, oltre alla tabella Anagrafica,
1- inserisci (Tasto dx del Mouse-Mostra tabelle) due volte la tabella
Comuni (che si chiamernno Comuni e Comuni1);
2- trascini il campo ComuneNascita sul CodiceComune della tabella Comuni;
3- trascini il campo ComuneResidenza sul CodiceComune della tabella
Comuni1;
4- per entrambe (cliccando col dx sulla linea di relazione) scegli
l'opzione 2;
5 - nella struttura della query metti il campo Nome, il campo
DescrizioneComune della tabella Comuni e DescrizioneComune della tabella
Comuni1;
6 - esegui la query.
-- 
TANNHAUSER
"I've seen things you people wouldn't believe..."
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: filter in proprieta' scheda

In modalita' struttura scheda - proprieta' c'e' l'opzione "filter", e non
riesco a capire come funziona...
mi piacerebbe poter filtrare i valori di una sottoscheda con i valori della
precedente sottoscheda... ad esempio se la sottoscheda A e' selezionata sul
campo "id" con valore "8", allora la sottoscheda B mi fa vedere i dati
appropriati... e credo che qui sia il trucco... ma non capisco la
sintassi...

 ha scritto nel messaggio
news:qkcQc.73713$OR2.4...@news3.tin.it...

La proprietą Filter usa la stessa sintassi della clausola Where delle
istruzioni SQL senza la parola Where
Nel tuo esempio dovresti mettere:
me.subformB.Form.Filter = "ID=" & 
me.subFormB.Form.ID
dove subformA e subFormB sono i nomi delle sottoschede A e B sempre che tu
per sottoscheda intenda delle sottomaschere.
Ciao
Cinzia


Grazie per la velocissima risposta... ma tutto quello che riesco a ottenere
e': errore di sintassi operatore mancante.
Scrivo le istruzioni nella finestra delle proprieta' del subform B, giusto?
Conosco pochissimo le istruzioni sql... dove scrivi  "subformB" cosa devo
mettere? il nome del mio subform? oppure cone le parentesi
quadre:[subformB].Form... ho fatto un po' di prove ma ho sempre errore di
sintassi.
Grazie.
Ciao

 ha scritto nel messaggio
news:qkcQc.73713$OR2.4...@news3.tin.it...

Se stai usando una struttura maschera/sottomaschera, per sincronizzare i
dati della sottomaschera con quelli della maschera principale (e/o della
sottosottomaschera con quelli della sottomaschera) non usae le proprietą
"filter", ma usa le proprietą dei controlli sottomaschera Collega campi
secondari e Collega campi master (vedi help).
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 Ciao
me.subformB.Form.Filter = "ID=" & me.subFormB.Form!ID
Punto esclamativo invece dell'ultimo punto
MAssimiliano
 
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/
Newsgroup: it.comp.appl.access
Titolo: Confronto tra 2 tabelle...

ciao a tutti di NG...
mi dite come posso fare un confronto di dati tra 2 tabelle
appartenenti a 2 db diversi....?
in sostanza le 2 tabelle sono identiche, quindi gli stessi
campi e nomi dei campi....
mi serve un confronto per sapere che quello che è scritto
in una corrisponde anche all'altra ...in caso contrario
vorrei che mi venisse segnalato in maniera da apportare
eventuali modifiche...
grazie di tutto...
Ciao....

"SuperPippo®" <ik0qd...@SPAMlibero.it> ha scritto nel messaggio
news:HqGca.15153$7y3.4...@twister1.libero.it...

Vai sul  Sito Comune e nella Sezione Tables leggi la FAQ di Alberto Plano
intitolata "Routine che confronta i records di due tabelle o query e
identifica le differenze".
La routin così come è fatta presuppone che ambedue le tabelle siano
contenute nel database corrente; quindi sostituisci le seguenti righe di
codice VBA:
    Dim dbase As Database
    Dim T1, T2 As Recordset
    Dim campo As Field
    Dim aiuto1(), aiuto2() As String
    Dim indice1, indice2 As Long
    Set dbase = CurrentDb
    Set T1 = dbase.OpenRecordset(Tab1, dbOpenSnapshot)
    Set T2 = dbase.OpenRecordset(Tab2, dbOpenSnapshot)
con le seguenti:
    Dim wsp As DAO.Workspace
    Dim dbase As DAO.Database
    Dim dbase2 As DAO.Database
    Dim T1, T2 As DAO.Recordset
    Dim campo As Field
    Dim aiuto1(), aiuto2() As String
    Dim indice1, indice2 As Long
    Set wsp = DBEngine.Workspaces(0)
    Set dbase = wsp.OpenDatabase("PrimoDatabase.mdb")
    Set dbase2 = wsp.OpenDatabase("SecondoDatabase.mdb")
    Set T1 = dbase.OpenRecordset(Tab1, dbOpenSnapshot)
    Set T2 = dbase2.OpenRecordset(Tab2, dbOpenSnapshot)
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 query e identifica le differenze".
[cut]
Ciao Roberto ... grazie sono andato subito a prendere la routine
nel Sito Comune...e cmq per metterla in atto vorrei chiederti 2 cose...
intanto tu mi hai presentato una modifica essendo le 2 tabelle
in 2 differenti db.... ma per facilitarmi le cose.. che come sai sono poco
esperto...non mi conviene importare momentaneamente la tabella in
questione dall'altro DB ???
inoltre come utilizzare questa routine ?
mi conviene ... creare una maschera provvisoria di appoggio o altro ???
infine nella routine dove è scritto Tab1 e Tab2 basta cambiare solo queste
scritte con i nomi delle vere tabelle o query  oppure bisogna fare
qualche altra modifica ???
ti ringrazie di tutto...

 ti ringrazie di tutto...


> fare
-------------
Ok. grazie risolto tutto...
anche se ho preferito copiare - incollare le tabelle in questione
e chiamarle direttamente Tab1 e Tab2...
dato che la routine mi dava sempre una serie di errori...
ora funge perfettamente...
Ciao Roby !!!
--
:o) SuperPippo®