mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Query e SELECT TOP...

Riciao a tutti i poveracci che come me oggi lavorano... 
Ho un problemino ... voglio eseguire una query che mi selezioni solo i
primi N record ... ed eseguo il mio bel SELECT TOP N seguito poi
ovviamente dall' ORDER BY che mi interessa.
Il problema è che voglio che N sia variabile, o meglio definibile in una
form che lancia la query stessa (la query già funziona benissimo
utilizzando come filtri i valori della form in questione).
Perchè non posso farlo? Mi dice che sbaglio keyword ... se metto SELECT
TOP 10 va tutto alla perfezione, se uso SELECT TOP
[Forms]![MiaForm].[Quanti] (che è il valore che vorrei avere) mi dice che
sbaglio.
Non c'è via di uscita?
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 --
Che sappia io in una query non puoi rendere parametrico il predicato TOP.
Secondo me una soluzione può essere quella di non usare il predicato TOP ed
aggiungere alla query un campo calcolato nel quale effettui la numerazione
progressiva dei record della query (vai sul Sito Comune, link qui sotto, e
nella Sezione Queries leggi la FAQ di Stefano Bettini intitolata "Come posso
inserire nella mia query un campo progressivo?").
Nella query, nei criteri di tale campo calcolato scrivi:
<= [Forms]![MiaForm].[Quanti]
Dovrebbe funzionare.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 Dovrebbe funzionare.
Io l'ho aggirata in altro modo: siccome avevo assoluto bisogno di avere
una query o una tabella su cui appoggiare il mio grafico, ho creato un
codice in una form che lancia un DoCmd.RunSql = sqlstr, dove sqlstr è la
mia bella stringa che compongo come mi pare e piace (e così metto TOP come
voglio io).
La query che lancio è una SELECT ... INTO in modo che crei una tabella
temporanea con i valori che mi servono da sbattere sul grafico già
ordinati, filtrati, spostati, calcolati, etc ... come ne ho bisogno. 
Linko il grafico alla tabella temporanea et voilà, il gioco è fatto.
Spero che 'sta cosa serva anche a qualcun'altro...



Se proprio ci tieni puoi sempre modificare il codice SQL della tua query in
base al contenuto del controllo della maschera; per farlo puoi usare la
tecnica QBF (Query By Form): trovi un esempio di tale tecnica nella Sezione
Queries del Sito Comune (link qui sotto).


 base al contenuto del controllo della maschera; 
E' proprio quello che ho fatto... non si capiva dalla risposta di prima?
Miiiii... spiego proprio male le cose :-)

Newsgroup: it.comp.appl.access
Titolo: report su casella cambinata

Buongiorno, devo risolvere un problema di questo tipo:
nel mio db ho un certo numero di report.
Per evitare di creare nella maschera tanti bottoni, perr la
visualizzazione dei singoli report vorrei creare una casella combinata
nella quale elencare tutti i nomi dei report, con la possibilità di
selezionare di volta in volta quello che voglio aprire. Poi tramite un
bottone devo aprire il report scelto nella casella combinata.
Per favore, potete aiutarmi?
Grazie.
Simona


Rowsource del cbx
select name from mssysobjects where type = -32764
su evento after update ( o quello che e')
docmd.openreport reportname:=cbx
o farti una tabella dove metere i nomi dei report ed utilizzarla come 
sorgente del cbx.
-- 
ac
y-1=x


wrote:

GRAZIE.
Newsgroup: it.comp.appl.access
Titolo: Arrotondamenti non richiesti nelle somme (un po' da imbranata....)

ciao a tutti,
sono la solita imbranata.. :-(
Ecco il mio problema.
Ho un report che ha come origine controllo una query di selezione (avevo 
bisogno di una join tra 2 tabelle). Uno dei campi della query è 
spese_rappresentanti con le seguenti caratteristiche:
dimensione campo: precisione singola
formato: standard
posizioni decimali: 2
Quando nel report eseguo la somma di questi valori, che sono stati 
inseriti con solo 2 decimali (la loro forma nativa è quindi con solo due 
cifre dopo la virgola), ottengo delle somme "strane"... in pratica 
access fa degli arrotondamenti per me incomprensibili (ma sono 
ignorantella, magari sono normali).
Ho letto parecchi interventi in merito e alla fine mi sembra che il mio 
problema si possa risolvere (=fare delle somme 'normali') con una 
funzione di Karl Donaubauer.
Tutti ne parlano, tutti dicono che bello funziona ma anche su 
http://www.donkarl.com/it/
 nessuno dice come utilizzarla :-(
Ehm... ci sono persone un po' ignoranti come la sottoscritta ;-)
Cosa dovrei fare dopo aver creato un modulo con quel codice?
Grazie a tutti per gli eventuali interventi.
ciao ciao

 ...
No. Singola è troppo impreciso.
Allora prima devi cambiare la precisione del tuo campo a doppia
o ancora più meglio il tipo di dato a valuta. Poi se ci sono ancora
problemi tu dici cosa fai _esattamente_ per calcolare la somma
e forse io ti dico come usare la fctRound.
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
+ Conferenza Italiana per Sviluppatori di Access (CISA) 

 
Ho cambiato la precisione in doppia.
Dopodichè faccio una query di selezione tra questa tabella e un'altra. 
La query risultante è l'origine record del report.
Per la somma ho seguito le indicazioni del tuo sito nella sezione 5.16 
(Somma incrementale)
- creare un nuova casella di testo
- impostare la proprietà Origine controllo della casella di testo a
=[Nome_del_campo_che_vuoi_sommare]
- impostare la proprietà Somma parziale della casella di testo a Su tutto.
La somma ora è a posto! Ho fatto delle prove incrociate con la 
calcolatrice.... :-)
Mi spiegheresti comunque come utilizzare la tua funzione?
Grazie mille per la disponiiblità.
ciao

 Mi spiegheresti comunque come utilizzare la tua funzione?
Non è un gande mistero. Se hai copiato la funzione in un modulo
standard (questi che si vede come oggetto nella finestra database)
puoi usarla come una funzione di Access. p.e. in un origine controllo:
=fctRound([Nome_del_tuo_campo])
o per un calcolo e per un risultato con 3 ciffre decimali
=fctRound([1234,5678 * 987];3)
o nel codice
dblMioVariabile3 = fctRound(dblMioVariabile1/dblMioVariabile2)
ecc.


 =fctRound([1234,5678 * 987];3)
Eh, ok, non è facile alla mattina. :-) Quest'esempio dev'essere
senza parentesi quadre:
=fctRound(1234,5678 * 987;3)

Newsgroup: it.comp.appl.access
Titolo: Origine dati casella di testo

Buongiorno.
Utilizzo A00 su W2000
In una maschera ho una casella di testo non associata, la cui origine dati
dovrebbe essere rappresentata dalla seguente espressione:
Somma([TblArticoli]![Fabbisogno]*([TblRigheprd]![QtaDaProdurre]-NZ([TblRighe
prd]![PezziGiaProdotti])))
Ovviamente non va, poichè questa espressione l'ho generata in un campo
calcolato all'interno di una query (e lì funziona, ma non vorrei creare una
sottomaschera basata sulla query, il campo calcolato, e inserire il tutto
nel form principale). Ho cercato di riprodurre lo stesso calcolo con DSum,
ma non riesco (non si può?) a impostare due domini diversi (le due tabelle
origine).
Cosa devo scrivere come origine controllo per far fare il calcolo
specificato alla casella di testo?
Grazie per l'aiuto
Gianluigi Agostini

 ha scritto nel messaggio
news:V3yD7.28574$C57.8...@news1.tin.it...

Se la query si chiama Query1 ed il suo campo calcolato si chiama Pippo, usa
una DSum (vedi help).
Quindi nell'origine controllo della tua casella di testo non associato
scrivi una cosa simile:
= DSum("Pippo";"Query1")
Se non vanno sommate tutte le righe di Query1, usa anche i criteri della
DSum (arivedi l'help).
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Controllo "visible" su maschera continua.

 
          Ciao a tutti,
ho un altro problemino, posso utilizzare su una maschera continua il comando
"visible.false/true" in modo da poter nascondere dei campi che non mi
servono solo se si verificano determinate condizioni? Mi spiego meglio: ho
una lista di dipendenti, per quelli al di sotto dei 25 anni devo inibire la
visualizzazione del campo "X" lo posso fare? Access mi farà vedere su una
maschera continua tutti i record aggionati alla proprietà "visible"? O
quanto meno aggiornare il record corrente da me selezionato?
Chi sa darmi una mano o almeno trovare una soluzione accettabile?
Grazie sempre mille e più! ;o)
Ciao
Francesco
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Francesco
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: [ot-excel]

Salve
 ho chiesto anche altrove ma senza risposta (ammesso che esista una
risposta)
Dunque:
ho una tabella di questo tipo:
        A            B                C                D
1                     Lunedě      Martedě         Mercoledě
2      Rossi        1a            3a                2a
3      Bianchi      2a           2a               1a
4      Verdi        1a           1a                3a
5
Domanda:
in una cella ad es. in B5 con una funzione č possibile caricare ( far
apparire) l'elenco delle persone (nomi separati da una virgola ad es.)
presente in una classe.?
Se le persone  in una classe sono 1 sola con cerca.vert riesco a caricare
il nominativo.
IL problema č quando ci  sono piů persone  nella stessa classe (es.
Verdi e Rossi sono assieme in 1a nel giorno di lunedě) in quanto cerca.vert
si ferma alla prima ricorrenza.
(provvisoriamente ho risolto con una tabella con  le persone copovolte cioč
quelli all'inizio sono passati alla fine della tabella)
Spero di essermi spiegato
grazie comunque a tutti!!!
Frangio

 ha scritto nel messaggio
news:5cFbb.337566$lK4.10...@twister1.libero.it...

Sono un po' arrugginito con Excel, ma credo che in una cella non sia
possibile visualizzare + di 255 caratteri.
Se ti sono sufficienti, fammelo sapere che faccio qualche prova.
(Sempre che qualcuno non sappia risponderti prima).
Ciao


Grazie per l'interessamento
255 caratteri sono sicuramente sufficienti in quanto una cella devo caricare
due o tre cognomi che non dovrebbero superare il limite di cella.
frangio

Avrei preparato un file di Excel con la soluzione, se mi dici una casella di
posta elettronica, te lo invio in allegato.
Ciao.
Newsgroup: it.comp.appl.access
Titolo: Parametrizzare percorso file immagini collegate

Su un database ho molte immagini collegate a pulsanti e maschere il cui
percorso ho messo nelle proprietà in struttura. Avrei bisogno di impostare
un percorso dinamico senza mettere il codice sul'apertura di ogni form.
Pensavo di gestire l'errore di "file non trovato" ma non riesco ad
intercettarlo.
--
Ciao, Sandrobi
"De quo nihil dici potest, id tacendum est" (L. Wittgenstein, "Tractatus
logico-philosophicus")

 Ciao, Sandrobi
Al di lą di intercettare l'errore che sicuramente viene scaturito
su Form_Error, ma dopo che fai...? Dove gliele fai cercare...?
Io mi trasporto abitualmente una Cartella Immagini e con il
percorso relativo mi carico la stessa dopo aver controllato
l'esistenza del File.
Generalmente perņ questo non lo faccio con le Immagini dei 
CommandButton, quelle le INGLOBO, in quanto non sono impegnative
se le realizzi in modo appropriato.
Ciao
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Newsgroup: it.comp.appl.access
Titolo: Testo su Pulsanti

Scusate la domanda stupidina ma necessaria esteticamente.
In una maschera access ho creato un pulsante ed ho quindi inserito il testo.
Avrei bisogno di fare in modo che il testo sia allineato a sinistra ed
invece è centrato e non riesco a portarlo a sinistra.
Possibile risolvere ?
Grazie
Luigi

 wrote in message
news:Apfna.42847$DT4.1...@twister1.libero.it...

    (-: Curiosita': perche' hai di questi bisogni perversi? /:-)
    Potresti simulare il pulsante con una Etichetta.
-- 
    (Facci sapere se ed eventualmente come hai risolto. Grazie.)
Ciao :o)
Maurizio
--------
?SPQR(C)
 X
--------

 ha scritto nel messaggio
news:Apfna.42847$DT4.1...@twister1.libero.it...

Alla fine del testo aggiungi alcune battute con la barra spaziatrice:
otterrai di spostare l'inizio del testo verso il margine sinistro, anche se
si tratta sempre di testo "centrato".
Ciao
Galliano.

Ringrazio entrambi :-)
Buona Pasqua
Luigi

Newsgroup: it.comp.appl.access
Titolo: Traduzione delle FAQ: posso dare una mano?

Ciao a tutti,
mi piacerebbe dare una mano a tradurre le Faq.
Posso avere qualche capitolo anche io?
Grazie!

 Grazie
E' tutto tuo...
http://www.donkarl.com/it/
Traduci e riposta.
-- 
Pablitomf (Maurizio Facciuti)
Lentamente muore chi abbandona un progetto prima di iniziarlo, chi non fa
domande sugli argomenti che non conosce, chi non risponde quando gli
chiedono qualcosa che conosce. (P.Neruda)
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Traduci e riposta.
Ciao, 
sono tornato oggi dalle ferie, scusa il ritardo :)
Sono andato alla pagina, ma è tutto in italiano e tedesco.
Avevo capito che c'erano degli articoli in inglese...sbaglio?
Se no, purtroppo col tedesco non posso essere d'aiuto :(
Ale

 ha
scritto nel messaggio
news:265b5842.0408...@posting.google.com...

Per quelli in inglese ci pensa Karl: cioè lui li
traduce dal tedesco in inglese
e noi in italiano.
Ora però Karl è in ferie, ma al suo ritorno lo
facciamo trottare...
MAssimiliano

 MAssimiliano
:) Ok, allora tornerò a visitare la pagina tra qualche giorno, ok? 
Grazie!
Alessio

 ha
scritto nel messaggio
news:265b5842.04082...@posting.google.com...

Quando le traduce, poi le pubblica qui.
MAssimiliano

Newsgroup: it.comp.appl.access
Titolo: SANTI NUMI !!!  INDICE EMEROLOGICO

Qualcuno nel Ng può inviarmi la tabella con i santi di tutti i giorni dell'anno?
pm.meg...@virgilio.it
Grazie, siete dei santi....

 ha scritto nel messaggio 
news:43d536a6.05010...@posting.google.com...

Ciao Gianluca
ti ricordo che in questo è un NG  dedicato ad Access ed ha le sue regole.
Nonostante questo, pure qua si trovano dei santi, al momento mi pare che 
siano solo due.
un'altro candidato, sta compilando il database dei nomi dei santi. MA 
attualmente è in ferie dovrebbe rientrare lunedì.
cmq prova a chiedere a:
http://www.santiebeati.it/
---
Daniele
Newsgroup: it.comp.appl.access
Titolo: riavviare server ole

ho sviluppato una piccola applicazione con access 2002. Su alcuni computer
funziona, ma uno di questo mi segnala problemi di collegamento al server
OLE, chiedendomi di riavviarlo. In pratica, non visualizza alcuni documenti
di word incorporati nel file.
Altre applicazioni però funzionano correttamente, non ho la possibilità di
capire come mai perchè sono mde non sviluppate da me.
Cosa posso fare?
salvare il doc come immagine? altrimenti?
Grazie

 ha scritto nel messaggio
news:bdrsov$pof$1...@newsread.albacom.net...

Sul PC sul quale hai problemi hai installato per caso il Norton Antivirus?
Beh, se è così, prova a disattivare la protezione dagli script.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 Beh, se è così, prova a disattivare la protezione dagli script.
Norton Antivirus?
Vade retro Satana!
Costegli mai piu' si avvicinera' al mio pc!
Ormai l'ho fatto esorcizzare con l'acqua benedetta.
Sib


non credo... altri files vanno tranquillamente...
Cristiano

"Sib" <si...@SPAMiol.it> ha scritto nel messaggio
news:WzhMa.1501$HU3....@news2.tin.it...

Non solo tu lo hai bandito dai tuoi PC. ;-)
Però spesso viene regalato ed installao nei nuovi PC, e non sapendo quanto
sia malefico c'è chi lo lascia installato.


 Cristiano



Ciao Sib,
scusa se mi intrometto nel 3D volevo sapere in merito a Norton Antivirus
quali sono i problemi che vengono creati su applicativi Access e quale
Antivirus consigliate di utilizzare al posto di quello fornito dalla
Symantec.(Io personalmente Utilizza McAfee sia come Antivirus e sia come
Firewall)
Difatti ho alcuni PC che ogni tanto creano messaggi e dei Bug dei quali non
riesco a trovare soluzione e guarda te i Pc che creano tali problemi hanno
Norton installato.
Grazie per gli eventuali suggerimenti.
Alex de Rosssi

 Norton installato.
Oh! Come mi stupisco!
Sib

 Ho avuto buone esperienze con il pccillin, ma nel mio pc non ne uso.
E come ti proteggi, di grazia?
Antonio
Newsgroup: it.comp.appl.access
Titolo: esportazione in excel

Vorrei collegare un foglio di excel ad una query parametrica in access su 
cui creare una tabella pivot
è possibile
Vorre ottenere dati in base ad un periodo prescelto.
E' corretto utilizzare una query parametrica (e come lo posso fare visto che 
si visualizzano errori)
o c'è un'altra procedura?
Ringrazio 

 ha scritto:

it.comp.appl.access (ma prima fai una ricerca sui post precedenti)
ciao
--
Alberto
No alle guerre

it.comp.appl.access (ma prima fai una ricerca sui post precedenti)
ooops, chiedo scusa (credevo di essere in aun altro NG)
riciao


 ha scritto nel messaggio news:43d132c5$0$1077$4faf...@reader4.news.tin.it...

Il problema non è la query con origine il foglio excel collegato ma il fatto che nel foglio non ci sono i dati formattati bene.
Access se non riconosce il formato dei dati delle celle ti presenta un errore; prova a creare una tabella con la struttura che 
dovrebbe avere il foglio excel e poi con una query di accodamento ad importare i dati. Si fermerà o ti segnalerà gli eventuali 
errori riscontrati...
Ciao.
-- 
Sergio MAZZA 

 ha scritto nel messaggio 
news:dqstca$1qn$1...@area.cu.mi.it...

In realtà posso anche utilizzare il raggruppamente per data sulla tabella 
pivot collegata alla query
HO fatto cosi!!!
Grazie

Newsgroup: it.comp.appl.access
Titolo: help..manca proolus,msi

Salve a tutti
stamattina quando apro access xp o qualsiasi applicazione del pacchetto 
office xp developer mi chiede di inserire il cd di office e selezionare 
il file proplus.msi
Windows se ne ï¿œ uscito con la frase che la configurazione del mio 
computer ï¿œ cambiata e quindi va attivata la copia di office.
Essendo un portatile non vedo come possa essere cambiata cmq...nessun 
problema visto che ho licenze in regola..solo che mi chiede il file in 
oggetto
il problema che ho il cd in ufficio e sono fuori per lavoro fino a domani.
qualcuno gentilmente mi puï¿œ uplodare da qualche parte il file in questione?
Grazie
BFS

BFS ha scritto:

scusate...il file che mi chiede ï¿œ proplus.msi
BFS

BFS ha scritto:

risolto..grazie lo stesso
BFS

 BFS
Ciao BFS,
nell'ottica community che caratterizza il Newsgroup, se ci dicessi 
anche come hai risolto, un domani quando qualcuno avr� il tuo stesso 
problema, cercando  su internet troverebbe anche la soluzione...  e 
questo � lo spirito con cui bisognerebbe partecipare ai NG non solo 
per chiedere ... ma anche per dare!  :-)
-- 
Cinzia [Office Access MVP]
_______________________
 
www.riolab.org
http://accessdaziacin.spaces.live.com
----------------------------------------

 
visto che non avevo aiuto qui e dovevo lavorare urgentemente ho dovuto 
scaricarmi una iso pirata con utorrent, ho masterizzato il cd e ho 
recuperato il file.
Appena rientro disinstallo per sicurezza il tutto e reinstallo con i 
miei cd originali.
E dai oggi mai piï¿œ in giro senza i cd di installazione in borsa.
Non ho cmq capito il motivo di questa richiesta del cd di stamattina.
cmq risolto
Ciao
BFS
Newsgroup: it.comp.appl.access
Titolo: controlli in report

Ho un problema di questo tipo:
Devo far si che da codice, all'apertura di un report, sia in stampa che in
anteprima, possia variare la posizione di un controllo.
Voglio creare una maschera, dove inserendo dei determinati valori,
all'apertura del report, il controllo cambi posizione in base al valore
precedentemente immesso.
Questo mi servirebbe per far si che il cliente, possia spostare a suo
piacimento il controllo, cosě ogni cliente puň configurare la stampa a suo
piacimento.
Ho cercato nella guida ma mi sono perso e non ho trovato la funzione che
possa fare questo.
1000 Grazie e spero di essermi spiegato.
Max

 ha scritto nel messaggio
news:2Jyb8.7714$eD3.3...@twister1.libero.it...

Ops.. fatto, ora non riesco ad impostare la larghezza del report via codice,
come posso fare ?
Ho provato in alcune maniere ma mi da sempre errori o non mi fa niente.
Max
 Grazie 1000

Newsgroup: it.comp.appl.access
Titolo: Cerca file zip in una cartella

L'aiuto datomi non mi č servito perchč non funzionante...
Spiego meglio ciň che devo fare:
devo cercare all'interno di una cartella, che contiene diversi file, se č
presente un file .zip!
Come devo fare per poter scorrere ogni file della cartella e vedere se č un
file .zip?
Grazie x l'aiuto!

Centro Sviluppo Sistemi ha scritto:

guarda il comando FileSearch nella guida fa sicuramente al caso tuo.
ciao
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Grazie x l'aiuto!
Usa la funzione Dir (vedi help).
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: tipo data/ora maledetto !!!

Ho tre Tabelle
Tab_Box: Box_1, Box_2, Box_3, etc.
Tab_Orari: 08:00 - 08:30 - 09:00 - 09:30 etc. (tipo data/ora)
Tab_Appuntamenti: Data, Paziente, Box, Orario
Vorrei creare una matrice, una "mappa" del giorno, che mi visualizzi in
orizzontale i box, in verticale gli orari, al centro i pazienti
niente di piu' semplice che creare una query a campi incrociati, ma cosi non
fu ...
presumo che ci sia un problema con il tipo data/ora (non relaziona
correttamente)
su diversi appuntamenti ne visualizza solo alcuni (???) e mi mette un riga
in bianco in alto
AIUTO ..........
che devo fare ?
Grazie mille da Gianni




Newsgroup: it.comp.appl.access
Titolo: Importazione file di testo

Salve a tutti, avrei bisogno di un aiuto per risolvere il seguente problema.
Devo importare in access un file di testo che contiene dati per delle distinte materiali su quattro colonne.
Per fare ciò ho utilizzato il comando 
DoCmd.TransferText acImportFixed, "DIST ACAD", "tbDISTCAD", strNomeFile
Il caricamento dei dati funziona ma nella tabella tbDISTCAD mi ritorovo i record ordinati secondo l'ordine delle colonne mentre io vorrei che rimanessere nell'ordinamento originale del file di testo
Faccio un esempio: se nel file di testo ho due record
AAAA BBBB CCC
AAAA AAAA DDD
nella tabella di destinazione mi trovo
AAAA AAAA DDD
AAAA BBBB CCC
C'è un modo per lasciare inalterato l'ordine delle righe del file di testo (anche con altri metodi di importazione)?
Grazie per l'attenzione
Mario

 Mario
 
 
ti conviene abbandonare transfertext e leggerti direttamente il file 
riga per riga scrivendolo nella tabella che ti serve.
tabella con un campo ID contatore che servir� per tenerti l'ordine in 
base all'inserimento e non alfabetico sui dati
 
spero di essermi spiegato
ciao
BFS

 BFS
 
Grazie BFS, ho trovato una soluzione alternativa.
Con il medesimo comando TransferText invece che creare una nuova tabella gli faccio popolare una tabella (nel mio caso tbDistCAD) già esistente che contiene anche ha un campo contatore.
Grazie comunque
Ciao Mario

 Mario
 
Penso che nella tabella di destinazione tu abbia uno o piï¿œ campi 
indicizzati.
Questo spiegherebbe l'ordinamento ASC.
 
Bruno
Newsgroup: it.comp.appl.access
Titolo: Interruttori: quale proprietà per Checked?

Ciao, nel mio database vorrei che se il valore della proprietà Value
di una casella di testo fosse diverso da "VUOTO" l'interruttore
relativo al record corrente assumesse lo stato di 'selezionato'.
Ho provato a cercare la proprietà Checked ma non l'ho trovata.
Che proprietà esiste per questo scopo?
Grazie :)


Su current
If isnull(Tuocontrollo) then
    tuoInterruttore = 0
else
    tuoInterruttore = -1
end if
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa1 - I° Conferenza Italiana per Sviluppatori Access Arezzo 4+5
Giugno 2005 Info:  
www.donkarl.com/it

 Grazie
La proprietą č Value e consente 3 Stati:
1 TRUE
2 FALSE
3 NULL
Se vuoi forzare lo stato passa alla proprietą Value
del controllo TRUE
Ciao
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Grazie, ecco il codice:
If Not (CurriculumLink = "VUOTO") Then
    ccCVAllegato = -1
Else
    ccCVAllegato = 0
End If
Ne approfitto per una domanda che riguarda il SQL. Ho una stringa SQL
del genere:
DoCmd.RunSQL "UPDATE tblUtenti SET CurriculumLink = ""VUOTO"" WHERE
idUtente = " & rif
con la quale, in sostanza, elimino il CV dall'utente corrente
impostando il campo CurriculumLink alla stringa "VUOTO". Ho messo la
stringa vuoto perchè non so come far leggere all'interprete SQL una
stringa vuota veramente, cioè "". Mi sballa la sintassi. Ho provato
con li apici ma non va. In sostanza l'update dovrebbe svuotare il campo
CurriculumLink.
Grazie ancora :)

 ha scritto nel messaggio
news:1118662483.8...@g49g2000cwa.googlegroups.com...
Grazie, ecco il codice:
If Not (CurriculumLink = "VUOTO") Then
    ccCVAllegato = -1
Else
    ccCVAllegato = 0
End If
Perchè ti sei complicato la vita....?
Io la scriverei così:
ccCVAllegato = Not (CurriculumLink = "VUOTO")
'---------------------------------------------------------------------------
-------------
Ne approfitto per una domanda che riguarda il SQL. Ho una stringa SQL
del genere:
DoCmd.RunSQL "UPDATE tblUtenti SET CurriculumLink = ""VUOTO"" WHERE
idUtente = " & rif
con la quale, in sostanza, elimino il CV dall'utente corrente
impostando il campo CurriculumLink alla stringa "VUOTO". Ho messo la
stringa vuoto perchè non so come far leggere all'interprete SQL una
stringa vuota veramente, cioè "". Mi sballa la sintassi. Ho provato
con li apici ma non va. In sostanza l'update dovrebbe svuotare il campo
CurriculumLink.
Grazie ancora :)
Ne approfitti male altro quesito altro POST.
Ciao
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------

Grazie :) beh le ore piccole fanno grandi errori :)
Cmq ho visto che l'altro post non appare...chissà che sarà
successo...
Google avrà iniziato ad odiarmi mi sa.... va beh....
Ma per mandare il mio db al sitocomune come devo fare? Via email al
sito?
Newsgroup: it.comp.appl.access
Titolo: [News] Effetti grafici ed altro

A chi interessasse implementare effetti grafici su MENU' personalizzati e
colori diversi dal Nero su Item Selezionato in ListBox
ci sono 2 demo da vedere.
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=284
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=285
Saluti
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------

 Saluti
Non ho parole... 
Ti ho sempre stimato come programmatore, ho sempre detto che le tue interfacce grafiche sono ottime.
Ma devo dire che... fin'ora ti avevo "sottovalutato"
Veramente Complimenti (e la "C" maiuscola non è a caso)
Max

Max
Ciao


 Ciao
piglio e porto a casa!!!   :-))
può sempre servire in futuro!
icom plimenti!
luigi
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 - Mostra testo tra virgolette -
bello alex! mi associo ai complimenti di Max ... sempre che a me non
tagli le gomme...

 tagli le gomme...
No non credo di farlo... ;-)
Ciao
@Alex

 @Alex
Ciao,
Max

Nel senso che tu (matteo) non arbitri !!!
;-)
Poi dai... il Mantova è andato in serie A ora, per un pochino almeno non
penso di bazzicare in zona.
E' andata male con il Calcio almeno il Volley è OK...
Ciao,
Max
Ciao Max, sono sempre in debito per la birretta...

Newsgroup: it.comp.appl.access
Titolo: Non mi si azzerano i contatori!!!???

Salve
Ho un problema con i campi contatore. In un DB devo azzerare i 
contatori nelle tabelle, per fare questo ho eliminato tutti i record 
dalle tabelle e ho eseguito il comando "Compatta e riprisina database", 
pero non mi si azzera niente!!!! Avete un idea del perchï¿œ? L'ho fatto 
altre volte e ha sempre funzionato.
Grazie 1K per l'help

 Grazie 1K per l'help
Sono tabelle collegate da un db esterno?
Ciao.
-Marco-
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Sono tabelle collegate da un db esterno?
Sono tabelle di un file back-end e sono collegate solo al relativo front-
end. Le ho copiate perï¿œ da un altro db (per non riscriverle ex novo) che 
sia li il problema?

 sia li il problema?
Ma tu hai compattato il BE che contiene le tabelle o il FE che contiene i
collegamenti?
Comunque prova a vedere questo:
 
http://www.donkarl.com/it/FAQ/FAQ3TabQuery.htm#3.2


 
a naso, mi sa che usi i contatori per la cosa sbagliata...
nella faq che ti ha indicato marco trovi i dettagli, ma l'ultima riga e' 
imho quella piu' significativa:
"In genere, i campi Contatore sono destinati per l'uso interno, p. e., essi 
servono come campi chiave e di relazione, non per ottenere dei bei numeri. 
Quest'ultimi dovrebbero essere creati via programmazione, quali valori 
predefiniti o manualmente."
-- 
Paolo opg
BE AWARE that this post uses a fake reply-to address
to contact me write to:
janickg ( at ) hotmail ( dot ) com
--

OK. messaggio ricevuto, non userï¿œ piï¿œ i contatori come "bei numeri"
Grazie

Newsgroup: it.comp.appl.access
Titolo: Setwarning Non Funziona?

Al click del pulsante eliminaprodottiinvent eseguo una query, ma sapeste 
quant'è antipatico, vedere tutti quei messaggi!
Ho provato cosi, ma i msg arrivano ugualmente.
------------------------------
Private Sub eliminaprodottiinvent_Click()
On Error GoTo Err_eliminaprodottiinvent_Click
    Dim stDocName As String
SetWarnings = False
    stDocName = "Q_CANCELLA_Tb_Prodotti_Inventariati"
    DoCmd.OpenQuery stDocName, acNormal, acEdit
SetWarnings = True
Exit_eliminaprodottiinvent_Click:
    Exit Sub
Err_eliminaprodottiinvent_Click:
    MsgBox Err.Description
    Resume Exit_eliminaprodottiinvent_Click
End Sub
------------------------------
Napoleone 

 ha scritto nel messaggio 
news:ZgqBe.15777$tX6.3...@twister1.libero.it...

Togli = e aggiungi DoCmd
DoCmd.SetWarnings False
poi lo riporti a true con
DoCmd.SetWarnings True
Ciao, Carlo 

 ha scritto nel 
messaggio news:akqBe.158452$75.67...@news4.tin.it...

Come sempre, OK!
Grazie
Napoleone
Newsgroup: it.comp.appl.access
Titolo: data calcolata in base ad altra data

devo aggiornare in automatico la data di un campo "data_scadenza" a 5 anni
dopo una data di un altro campo "data_rilascio", SV mi ha consigliato la
formula su dopo aggiornamento del controllo campo "data_rilascio"
Me.data_scadenza = DateAdd("yyyy", 5, Me.data_rilascio)
solo che non mi funziona anche cambiando yyyy in aaaa
dove sbaglio?
l.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 l.
aggiornamento:
mettendo lo stesso codice anche "su invio", il tutto funziona! anche senza
premere su invio, strano!


 l.
Ma perchè apri un altro post??
E poi "non mi funziona" cosa vuol dire? Cosa ti restituisce?.
Ricordati che questo codice lo devi inserire come "RoutineEvento".
--
sv


 sv
l.


 l.
Vedi questa raccolta di funzioni sulle date:
http://www.accessgroup.it/HomeArgomenti.asp?ID=41&Oggetto2=Formattiamo%20le%20date
--
sv


Newsgroup: it.comp.appl.access
Titolo: Collegamento campi secondari e campi master

Spero proprio che qualcuno possa risolvermi il problema.
Premetto che questo newsgroup è realmente prezioso per me e i miei colleghi, 
che operiamo con Access.
Quando provo a collegare i campi secondari e campi master di un sottoreport, 
utilizzando la finestra che si apre dal menù proprietà, ottengo un errore:
"Impossibile creare un collegamento tra maschere non associate".
Non riesco proprio a capire come risolvere, visto che esiste una relazione 
tra un campo (il campo Num) delle tabelle dalle quali derivano le query 
sulle quali ho costruito il report con sottoreport.
Grazie 

 ha scritto nel messaggio news:%htRg.120963$_J1.8...@twister2.libero.it...

Il tipo dei campi (nella struttura della tabella) scelti per le relazioni deve essere uguale...
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: Problemi con la funzione Inputcombobox

Per selezionare la firma che deve comparire in calce ad un Report
utilizzo la funzione InputComboBox di Baraldi. La funzione valorizza
una variabile pubblica che poi imposta una casella di testo del report
sull'evento formattazione.
Provo a spiegarmi meglio: Da una maschera1, uin pulsante richiama la
InputComboBox assegnando il valore di ritorno ad una variabile
pubblica. Subito dopo viene lanciata l'anteprima di un report che su
evento Formattazione di una sezione assegna la variabile pubblica ad
una determinata casella di testo.
Tutto funziona fino all'anteprima, nel senso che il report riporta il
corretto valore della Firma. Ma quando si stampa la casella della firma
appare inspiegabilmente vuota. Ho provato ad intercettare il valore
della variabile pubblica ed era corretto. Ho rovato anche a spostare il
codice sull'evento Stampa ma non funziona lo stesso. Potete darmi
qualche suggerimento?

 wrote in message
news:1120550229....@o13g2000cwo.googlegroups.com

Se la Form contenente la InputComboBox è la stessa dalla quale lanci
la Stampa/Anteprima ed è aperta, non serve l'uso di una VarPublic
che tra le altre cose crea solo dispersione di codice.
Metti una TextBox nel Report che come origine riga ha :
=Forms!NomeForm!NomeInputComboBox
Se proprio vuoi usare una gestione Public ti cvonsiglio di
usare in un Modulo una Funzione:
Public VariabilePublica as TuoTipo
Public Function retVar() as TuoTipo
   retVar=VariabilePublica 
End Function
a questo punto sempre nella TextBox origine riga:
=RetVar()
Da purista del codice quale sono ti suggerisco di usare
Public Property Let/Get/Set per inserire in un Modulo
standard tutte le proprietà(intese come Variabili Public)
la gestione è un pò più scomoda, ma Tecnicamente è la sintassi
corretta per rendere tali variabili PROPRIETA' del progetto.
Ciao
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Innanzitutto grazie per la velocità della risposta. Non credo però
che il problema sia dovuto alla VarPublic perchè: 1) nell'anteprima di
stampa la casella di testo del report viene valorizzata
correttamente;2) ho provato ad intercettare la variabile con una msgbox
prima della stampa e il valore era corretto;3) ho risolto il problema
utilizzando un maschera popup dedicata invece della tua funzione,
mantenendo la variabile pubblica e l'evento Su Formattazione così
com'erano.
Come dico, il problema pratico l'ho risolto, magari non in maniera
elegante, però mi rimane la curiosità di capire cosa non funzionava
prima. Già che ci siamo, perchè non si riesce a fare il debug passo
passo sulla tua funzione? Ad un certo punto un messaggio avvisa che non
è possibile interrompere la procedura in quel punto e la funzione
viene portata a termine. Dipende dal Run Time? è possibile ovviare?
Grazie ancora
Kingborn
Newsgroup: it.comp.appl.access
Titolo: Tabella a tempo....!!

salve amici di Ng... volevo chiedere se è possibile impedire l'apertura o
funzionamento di una Tabella dopo un determinato periodo di tempo...da
escludere MDE o Pwd !!!
in una mashera funziona questa... ma in tabella ???
Private Sub Form_Load()
Dim Tempo1
Tempo1 = #10/5/2000#
If Date > Tempo1 Then
DoCmd.Quit
End If
End Sub
Grazie....

 in una mashera funziona questa... ma in tabella ???
Prova cosi':
togli tutte le autorizzazioni sulle tabelle agli utenti, crea una query per
ogni tabella aggiungendo l'opzione "with owneraccess option"
quindi nei criteri di ogni query metti:
iif(ConDat();"*";"")
Dove ContDat() e' una funzione che restituisce true fino a una certa data e
false da quella data in poi.
In pratica:
SELECT * FROM TuaTabella WHERE TuaTabella.ID Like iif(ConDat();"*";"")
e:
Public Function ConDat() as boolean
    If Date()<#15/10/2000# then
        ConDat=true
    Else
        ConDat=False
    End If
End Function
Ciao, Sib

 SELECT * FROM TuaTabella WHERE TuaTabella.ID Like iif(ConDat();"*";"")
Come intuibile, intendevo scrivere:
SELECT * FROM TuaTabella WHERE TuaTabella.ID Like iif(ConDat();"*";"") WITH
OWNERACCESS OPTION

 End Function
scusami se ti rompo nuovamente...ma sono poco pratico... Grazie...

 e "with owner access" dove và messo?
Apri la queri in visualizzazione SQL e metti la stringa in calce alle
istruzioni della query
(Qundi non nei criteri)
Ciao, Sib

 ha scritto nel messaggio
news:5E5z5.12268$OI2.2...@news.infostrada.it...


Grazie Sib... x la "dettagliata spiegazione...ora mi sto impazzendo con
autorizzazioni,
utenti e password varie....
vedo se riesco a far funzionare il tutto ... stò provando....anche se non ti
nascondo che
cercavo una soluzione + semplice possibile x non far aprire la tabella
Anagrafe...meno laboriosa.
il Db in pratica non deve essere protetto in alcun modo e tutto deve essere
visibile ed accessibile
ma solo un blocco dello stesso dopo una certa data....da effettuare in
tabella....
se vi fosse una soluzione sempliciotta ti sarei grato se me la suggerissi...
ti ringrazio di nuovo.

 ti ringrazio di nuovo.
In realta' quello che ti ho spiegato e' molto piu' difficile a dirsi che a
farsi.
Comunque di primo acchitto mi vengono in mente solo questo: crea una
funzione da far eseguire all'avvio del db che, passata la data prevista,
elimini tutti i record della tabella.
Potresti anche criptare la tabella con una apposita funzione e fare bloccare
la funzione di decriptazione alla data specificata. Ma forse questo ti viene
piu' difficile.
Ciao, Sib
Newsgroup: it.comp.appl.access
Titolo: lentezza salvataggio codice VBA

salve
non capisco come mai per un'applicazione quando modifico del codice VBA e poi premo salva
ci mette anche 3/4 minuti e e clicko 2 volte mi dice applicazione non risponde.
 
Ho provato a compattare il database ma nulla da fare.
 
Cosa consigliate?
 
GRAZIE


1- verifica che, prima di modificare il codice e poi salvare, cpu e 
accesso al disco fisso siano a zero o quasi (altrimenti qualche altro 
processo potrebbe ciucciarti risorse preziose)
 
2- quando ci sono anomalie inspiegabili, solitamente usiamo le routine
 
https://github.com/timabell/msaccess-vcs-integration
 
 
per esportare e reimportare tutto
Le ritengo un 'must' per qualsiasi sviluppatore in ambiente Access, in 
quanto permettono di esportare in formato testo (e quindi confrontare 
anche versioni diverse) TUTTI gli oggetti di un progetto Access
 

 anche versioni diverse) TUTTI gli oggetti di un progetto Access
 
Un alternativa sarebbe l'Add-In "RebuildDatabase" del collega tedesco 
Thomas Möller:
 
https://team-moeller.de/?Add-Ins:TM-RebuildDatabase
 
 
Esporta tutti oggetti con SaveAsText e crea una nuova copia del db.
 
Però forse aiuta già:
 
Decompile
http://www.donkarl.com/it?FAQ1.23
 
 
-- 
Ciao
Karl
*********
http://www.AccessDevCon.com
 
Access FAQ: 
http://www.donkarl.com/it

Newsgroup: it.comp.appl.access
Titolo: Dove e come 2.........?!?!?

Concordo e  mi scuso sulla pessima presentazione del problema.
I dati che provengono da una tabella devono essere combinati tra loro in
modo diverso al variare di un certo campo  ( es. se banane fare peso*prezzo,
se angurie fare quantità*prezzo*0,5)
Sib consigliava come strumento il report ma temo che la mia precedente
domanda fosse ingannevole, per non dire peggio. Da quello che ho capito di
access dovrei usare una maschera per calcolare la mia fattura ( If then o
Select case per istruzioni diverse al variare della "frutta") e un report
per stamparla.  O sono completamente fuori strada ??
Grazie 1000
Ilario

 wrote in message
jIww4.72663$qv.7...@news.infostrada.it...

Non sei completamente fuori strada.
Come ti dicevo, nel report puoi inserire controlli calcolati e quant'altro
occorre per fare quello che dici. Se poi dovesse essere proprio
indispensabile usare il codice per fare gli opportuni distinguo allora puoi
tranquillamente usare l'evento SuFormattazione del report il quale evento
avviene per ogni record che faccia parte del report.
Ti confermo che avevo capito bene e che e' proprio il report lo strumento
che devi usare (per la stampa), se invece devi presentare a video i tuoi
dati allora ti conviene usare una maschera con una sottomaschera a "maschere
continue". (mamma mia quante "maschere", mi saro' spiegato???)
Ciao, Sib
--
------------------------------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access
------------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente
Newsgroup: it.comp.appl.access
Titolo: aiuto a novizio

come faccio ad assegnare a una variabile di una tabella un valore di una
maschera ?
maschera1  ( con valore che mi serve )
apre maschera 2  ( qui c'e una sottomaschera e in questa sottomaschera devo
                                   inserire il valore che è nella maschera
1 )
Scusate se sono stato molto confuso
Grazie e ciao
c...@libero.it

 wrote in message
8bg6gl$bfg$1...@nslave1.tin.it...


nella sottomaschera avrai una textbox che riporta il valore della maschera
principale; in questa su origine controllo, con il generatore di
espressioni, selezionerai maschere>la maschera principale>il campo di
riferimento et voilà
attenzione se usi access 2000 il generatore di espressioni è un cesso, nel
senso che genera errori; infatti dovrai sostituire l'oggetto Maschere che ti
troverai scritto con Forms.
bye bye


Newsgroup: it.comp.appl.access
Titolo: Barre degli Strumenti

Ciao!
Ho un database che dai miei clienti faccio funzionare con Access XP Runtime.
Una delle mie clienti, non si sa come, ha fatto sparire tutte le barre degli
strumenti e quindi non riesce più a far nulla.
Come posso fare per ripristinarle?
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Inviato via 
http://arianna.libero.it/usenet/
Se ha solo il runtime, a meno che tu non abbia previsto una routine in 
VBA,...nulla.
Devi riprogrammare meglio...attribuire una barra alle maschere in modo da 
evitare questi casi, bloccare la modifica delle barre degli strumenti, 
ecc...
Nella fattispecie una soluzione rapida potrebbe essere, ricopi il DB 
corretto, o se hai a disposizione su un pc ACC installato, ripristini le 
barre...
Puň venirti in aiuto anche la funzione in VBA Docmd.ShowToolBars ....vedi 
guida
Ciao
-- 
Roberto da Parma
Newsgroup: it.comp.appl.access
Titolo: Selezione di Dati con query

25/01/2000+50, sono disperato (è da un mese che sto provando).
 Aiutoooo... ...Grazieeeee.
ewo...@libero.it
x reply -"dd"

 ha scritto nel messaggio
news:8gj82v$api$1...@nslave1.tin.it...


Cdate([Inserire Giorno])+50
Ciao.

 La prima soluzione  ">#[Inserire Giorno]#+50" non ha funzionato, la
seconda invece si ">Cdate([Inserire Giorno])+50". Via ringrazio nuovamente
per la precisa risposta e mi scuso per la mia lentezza per ringraziarvi.
Aggiungo una piccolissima ulteriore richiesta, ho guardato nella guida in
linea di Access2000 ma non ho trovato il significato di Cdate (forse sbaglio
ad eseguire la ricerca), se qualcuno mi può spiegare a cosa serve...
...Grazie.


Direttamente dall'help:
In questo esempio la funzione CDate viene utilizzata per convertire una
stringa in tipo di dati Date. Non è in genere consigliabile definire a
livello di codice date e ore come stringhe come indicato nell'esempio. È
invece consigliabile utilizzare valori letterali di data e ora come
#2/12/1969# e #4:45:23 PM#.
Dim MyDate, MyShortDate, MyTime, MyShortTime
MyDate = "12 febbraio 1969" ' Definisce la data.
MyShortDate = CDate(MyDate) ' Converte nel tipo di dati Date.
MyTime = "16.35.47"   ' Definisce l'ora.
MyShortTime = CDate(MyTime) ' Converte nel tipo di dati Date.
Ciao.

 wrote in message
8h63l3$ouv$1...@suite03.caspur.it...

Grazie, una risposta precisa ed esaudiente.
Newsgroup: it.comp.appl.access
Titolo: [VBA- Access] Perplessità su OperRecordset

Buongiorno a tutto il NG
Ho una sub che crea una tabella temporanea (cancellando eventualmente una
tabella di egual nome prima di crearla) e copia i dati (nomi, descrizioni,
ecc.)
di tabelle contenute in un database esterno.
Dopo la creazione della tabella temporanea tento di inserire i record con
l'OpernRecordset ma mi compare il seguente errore:
"Errore di run-time: Più tabelle con questo nome. Specificare il nome del
proprietario, utilizzando il formato 'proprietario.tabella'. (3298)."
Il che non è assolutamente vero. Esiste una sola tabella con quel nome,
nanche nel db esterno.
Una soluzione l'ho già trovata: chiudere ed aprire nuovamente il puntatore
al db che però giudico una soluzione non molto pulita (vedi sotto).
Altre idee? Grazie 1000.
allego listato sub:
Sub CreaTblDati()
' Crea tabella temporanea @tmpTabelle con dati delle tabelle collegate _
  nel database
Set dbsv = DBEngine.Workspaces(0).OpenDatabase("dbSorgente.mdb")
Set dbs = DBEngine.Workspaces(0).OpenDatabase("dbAttuale.mdb")
' Verifica se esiste la tabella temporanea
For Each tbl In dbs.TableDefs
    If tbl.Name = "@tmpTabelle" Then
        DoCmd.DeleteObject acTable, "@tmpTabelle"
        Exit For
   End If
Next tbl
' Crea la struttura della tabella temporanea
Set tbl = dbs.CreateTableDef("@tmpTabelle")
With tbl
    .Fields.Append .CreateField("IDTabella", dbText, 50)
    .Fields.Append .CreateField("Descrizione", dbMemo)
    .Fields.Append .CreateField("Collegato", dbBoolean)
    .Fields.Append .CreateField("Utilizzato", dbBoolean)
    .Fields.Append .CreateField("Vuoto", dbBoolean)
End With
dbs.TableDefs.Append tbl
' ******* Aggiunta codice per evitare l'errore
dbs.Close
Set dbs = DBEngine.Workspaces(0).OpenDatabase("dbAttuale.mdb")
'*******
' Inserisce i dati delle tabelle collegate
Set rcd = dbs.TableDefs![@tmpTabelle].OpenRecordset()  '******* L'errore si
presenta in questo punto!
With rcd
    For Each tbl In dbsv.TableDefs
        If tbl.Attributes = 1073741824 Then
            .AddNew
            ![IDTabella] = tbl.Name
'            ![Descrizione] = tbl.Properties("Description")
            If tbl.Attributes = 1073741824 Then ![Collegato] = True
            If tbl.RecordCount = 0 Then ![Vuoto] = True
            .Update
        End If
    Next tbl
End With
End Sub

 tabella di egual nome prima di crearla) e copia i dati (nomi, descrizioni,
Ho visto ettolitri di codice...troppi!:-)
Ma perche' vuoi crearla al volo 'sta tabella? Creala a mano una volta e poi
anziche cancellarla la svuoti.
Saluti
Luciano

 wrote in message
9ul2t3$95fe5$1...@ID-86073.news.dfncis.de...

Se hai qualche suggerimento su come "tagliare" qualche riga di codice ben
vengano
però sono dell'idea che scrivere un po' di più (commenti compresi) aiuta la
comprensione del codice.
Il mio proposito era di soddisfare la curiosità su come evitare l'errore
citato.
Grazie 1000.

citato.
Probabilmente devi dare una refreshata all'insieme tabledef. Ma se fai come
ti dico elimini il problema alla radice.
Saluti.
Luciano