mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: segnalazione di errore durante l'esecuzione di una macro.

Buongiorno a tutto il ng.
E' solo una curiosità: se qualcuno ha avuto la stessa esperienza ...
Su access 2000 con s.o. Nt 4.0.
Se lancio una macro passo-passo non ricevo alcuna segnalazione di
errore.
Quando invece la lancio normalmente, mi segnala di non trovare un
componente del db che sto processando.
Qualcuno può darmi qualche dritta? Così evito all'utente di chiamarmi
per dirmi che c'è un errore ...
Grazie.

 ha scritto nel messaggio news:1131359637.0...@g14g2000cwa.googlegroups.com...

[risposta]
Probabilmente esegui una serie di query "a cascata" e annidate che se eseguite passo passo hanno il tempo di completare il lavoro; 
mentre fatte da macro, visto che non c'è attesa di "fine esecuzione", vengono eseguite tutte (quasi) contemporaneamente.
Una dritta? Elimina la macro, utilizza il Metodo Execute dell'oggetto QueryDefs (vedi help) dove puoi controllare se l'esecuzione è 
terminata con successo o meno...
Ciao.
-- 
Sergio MAZZA 

Grazie per la velocità della risposta. Provo subito (anche se ho già
verificato che la macro comunque esegue tutti i comandi contenuti).
Ciao

Newsgroup: it.comp.appl.access
Titolo: ordiare parte di un campo in un report

ciao
ho un serie di dati inseriti in questo modo
047/2006
158/2004
183/2003
ecc...
come faccio ad ordinare questi record per anno senza inserire a mano tutti 
gli anni per ogni record visto che l'anno l'ho già indicato?
Like "*/20*"  crescente può andare, visto che non ho nulla meno del 2000?
Grazie 1000
cio 

cio ha scritto:

Crea due campi calcolati
  right([campo];4)
  left([campo];3)
e usali per l'ordinamento.
Ciao.
-Marco-
-- 
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 e usali per l'ordinamento.
Grazie, ho fatto. Come faccio però ad applicare questo campo ad un report 
visto che non me lo vede come campo calcolato?
Ho la mia quey con questo campo, ma se la seleziono mi da solo i valori 
della tabella di riferimento della query e non mi da il campo che mi 
interessa...
Grazie
cio 

 cio
Crea i campi calcolati nella query origine dati del report e li avrai
disponibili anche nel report.
Se ti servono solo per l'ordinamento puoi inserire le formule direttamente
nella maschera "Ordinamento e raggruppamento", nel formato =Left([campo];3)

Newsgroup: it.comp.appl.access
Titolo: Non ci capisco più niente! - ACCESS

Ciao a tutti,
sto impazzendo! Mi sapete dire perchè quando preparo un report, se scrivo
"Città" (che è il nome del campo) in  stampa mi scrive il nome della città
correttamente mentre se scrivo "=[Città]" mi riporta il valore di un'altro
campo??
Spero che almeno voi mi sappiate aiutare.
Ringrazio tutti in anticipo.
--
Ciao da Emiliano - Webmaster di EmiCAD® - Tutto per AutoCAD
Ex emilandia
e-mail:  
webm...@emicad.it
web:  
www.emicad.it

 ha scritto nel messaggio
news:vOKd8.10651$v7.4...@twister1.libero.it...

Se "città" è il nome di un campo della tabella o query su cui è basato il
report basta che nella casella di testo dove vuoi venga fuori metti in
proprietà - Dati - origine controllo scegli il campo città dal menù a
tendina.
Ciao


Forse perché stai facendo confusione tra campi (presenti in tabelle e query)
e controlli (presenti in maschere e report).
Non è che hai un controllo che ha un nome uguale ad un campo e che fa
riferimento ad un altro campo?
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com

Si se faccio cosi funziona ma io devo mettere una formula, cioè mi deve
stampare oltra al nome della città il valore di altri campi ad esempio
l'indirizzo quindi adrei a scrivere
=[cap] & [indirizzo] & [città]
tutti i valori funzionano tranne quello di città che inserisce invece il
lavore del campo e-mail!


 ha scritto nel messaggio
news:cELd8.11184$fa5.3...@twister2.libero.it...


Newsgroup: it.comp.appl.access
Titolo: Problema da principiante

Salve a tutti, ho il seguente problema, come posso fare o meglio che
formula devo inserire in un campo di una finestra access che mi
restituisca il totale di una serie di altri campi ma solo di quel record
corrente.
per intenderci campo1 + campo2 + campo3 = totale dei tre campi ma solo
di quel record corrente.
infatti io ho inserito la formula somma ma mi calcola si la sommaq ma di
tutti i record, quindi vorrei sapere se c'e' una funzione che mi fissa
solo quel determinato record.
Spero di essere stato abbastanza chiaro, cmq aspetto con ansia una vs
gentile risposta...
Saluti a tutti.
Fabio Porzio
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:44f5e1b2a5fe87570bc...@mygate.mailgate.org...
Ti assicuro che scrivere un subject significativo è qualcosa che può
risolvere anche un principiante
Antonio

Fabio Porzio ha scritto:

Scusa,
ma stai parlando di maschera continua o singola??
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ma stai parlando di maschera continua o singola??
No, sta parlando di un problema da principiante, senza specificare
Antonio


Lui ci ha provato con il soggetto "Calcolo subtotali" ma voi guru non 
gli avete dato retta ed ora sta provando con un soggetto un po piu' 
generico. Certi sforzi vanno apprezzati.
-- 
ac
y-1=x
Newsgroup: it.comp.appl.access
Titolo: Stampante

Ho un problema di questo genere:
In un DB dove sono inseriti i clienti ogni mese devo spedire delle offerte, 
solo che ad alcuni devo stamparle e poi inviarle io per posta, altri tramite 
una stampante fax, altri ancora per email ; è possibile creare un campo 
TipoStampa e in automatico il programma scelga la stampante impostata?
Qualcuno ha avuto lo stesso problema? e come ha risolto?
Grazie 

 ha scritto nel messaggio 
news:fmclds$3fp$1...@nnrp-beta.newsland.it...

Prima di tutto aggiungi un campo di tipo Testo o anche numerico alla tabella 
Clienti.
Questo campo conterrà "S" oppure "F" oppure "E" a seconda se stampa, Fax o 
E-mail.
Lo stesso se utilizzi un campo numerico (1,2 o 3).
Ovviamente in base al valore deciderai (il codice saprà) se stampare, faxare 
o inviare per e-mail.
Sul 
www.sitocomune.com
 trovi delle routine per impostare al volo una 
stampante.
Anche qualche post più in alto ("Stampanti") si è parlato di come impostare 
una stampante diversa.
Ciao, Carlo

Grazie Carlo ci provo

Newsgroup: it.comp.appl.access
Titolo: Apertura Combo da tastiera

Banalmente, come faccio ad aprire una combo box da tastiera senza ricorrere 
al mouse?
Grazie mille per la risposta
Angelo 

 wrote in message
news:J06Gd.5008$
GU.1...@twister1.libero.it

Il metodo supportato dalla Combo per l'apertura
è DropDown, pertanto se vuoi gestire la cosa
da tastiera usa l'intercettazione di un KEYS
nella Form ti faccio un esempio banale:
Private Sub XXXXX_KeyDown(KeyCode As Integer, Shift As Integer)
 
   If KeyCode = vbKeyF10 Then
        Me!NomeCombo.DropDown
   End If
 
End Sub
Ciao.
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ricorrere al mouse?
<F4>
o
<ALT>+<Freccia giù>
Vedi anche la FAQ 4.14 Aprire una casella combinata via codice
sul sito indicato sotto.
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
+info sulla prima Conferenza Italiana per Sviluppatori di Access (CISA1)
Newsgroup: it.comp.appl.access
Titolo: importazione testo

Ciao, vorrei esporre un mio problema.
Devo integrare un sistema di gestione del personale con i dati che arrivano
dai nuovi lettori di badge che producono un unico file di testo, questo lo
devo poi gestire sotto  l' applicazione per lelaborazione dei conteggi delle
ore lavorate.
Dovrei automatizzare il tutto in fase di importazione (dare il nome dei
campi della tabella a cui devo accodare il risultato dell' importazione e
visto che chi opera non e' di grande praticita' informatica devo realizzare
una procedura automatica e che non richieda intervento da parte dell'
operatore.
Ho visto che in un messaggio piu' sotto qualcuno di voi ha avuto gia'
esperienza in questo, mi date qualche "dritta" o dove posso reperire qualche
informazione in merito.
Grazie e scusate  Ciao...
  Angelo

>Dovrei automatizzare il tutto in fase di importazione (dare il nome dei
la prima volta lo importi a mano tu, e salvi le impostazioni di
importazione in uan cosiddetta specifica di importazione.
questa la userai come parametro di un comando transferttext.  altri
dettagli sull'help.
per i calcoli sulle ore lavorate ecc., quello e' un casino...
--
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

 ha scritto nel messaggio
news:38a885d3...@news.interbusiness.it...

Newsgroup: it.comp.appl.access
Titolo: Svuotare Campo Numerico

PER PRIMA COSA MI SCUSO SE STO RIFORMULANDO LA DOMANDA, LO FACCIO SOLO
PERCHE' HO DAVVERO BISOGNO DI QUESTA RISPOSTA.
IL MIO PROBLEMA E':
Ho creato una tabella con 4 campi testo
COGNOME
NOME
VIA
CITTA'
ed uno numerico
SELEZIONE
Tramite una query fatta con l'autocomposizione metto dei controlli per
l'ordinamento o la stampa (ad esempio fammi vedere solo quelli che abitano
a Milano).
Con la maschera "GIOVANNI" fatta sempre con l'autocomposizione inserisco i
dati in tutti i campi sopracitati.
Ora oltre ad inserire i dati nei vari campi, inserisco nel campo
"selezione" un numero sequenziale ( 1, 2, 3 ecc.) che mi permette una
volta che apro il report, di stampare (sfruttando la query) solo le schede
che anno nel campo "selezione" il codice numerico e di stamparmele
nell'ordine che gli ho dato.
Il mio problema č non sapendo come svuotare il campo "selezione" mi
succede di dimenticarmi la sequenza utilizzata e di stampare una o piů
volte schede che non mi interessano.
In definitiva Vi chiedo se qualcuno di Voi mi puň spiegare il modo o
realizzare (scusate se Vi chiedo a Voi di realizzarmelo ma di
programmazione non ne capisco niente) il codice che mi permetta solo
quando apro la maschera di inserimento o tramite un pulsante inserito
dentro la maschera, di cancellare i dati dentro il campo "selezione" prima
che io immetto di nuovo i numeri.
Ovviamente i dati degl'altri campi non dovranno essere cancellati.
Sperando che stavolta qualcuno mi aiuti, invio distinti saluti e
ringrazio per la Vs collaborazione.
PS. per meglio spiegarmi Vi allego immagine del mio database
Guarda l'immagine cliccando 
http://attach.mynl.it/img?id=NTg4MA
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

(.....)

Crea un pulsante sulla maschera.
Nella routine associata all'evento SuClick del pulsante scrivi:
Docmd.SetWarnings False
DoCmd.RunSQL "UPDATE [TuaTabella] SET Selezione=0"
Docmd.SetWarnings True
dove al posto di TuaTabella devi scrivere il nome della tabella che contiene il campo da azzerare.
Vincenzo Turturro
Certificato Eucip Core Level
ITA 0000-002299 del 14/05/2007
---------------------------------------------
il sito comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
risorse Access:
http://www.accessgroup.it
---------------------------------------------
Il sito comune di it.comp.as400
http://www.faq400.com
---------------------------------------------

Per prima cosa ti ringrazio davvero Tantissimo, sei stato gentilissimo.
Per secondo ti vorrei chiedere una curiositā (puoi rispondermi con calma
questa informazione non č importante come quella che mi hai dato) se
volessi cambiare nome al campo "selezione" oppure vorrei cancellare i dati
di uno o pių campi basta fare delle modifiche al codice che mi hai fatto
oppure si deve crearne uno nuovo?
Cordiali saluti.


Cordiali saluti.


Complimenti, hai capito di nuovo quello che volevo dire (solitamente non
mi capisce mai nessuno).
Di nuovo GRAZIE.

Newsgroup: it.comp.appl.access
Titolo: Runtime di Access 97

Salve a tutti,
ho trovato sul sito microsoft runtime per access 2000, nulla per 97, sapete
dirmi se è introvabile o se c'è modo di averlo?
Vi Ringrazio, Filippo.

 dirmi se č introvabile o se c'č modo di averlo?
Prova a dare un occhio su 
www.sagekey.com
, a quanto pare c'č gente che ci
campa con i run-time di Access... ;-)
Ciao, Alessandro

 Vi Ringrazio, Filippo.
Mi daresti il link, please
MAssimiliano


Ho visto i prodotti, ma come faccio ad avere solo runtime??
Newsgroup: it.comp.appl.access
Titolo: collegamento ODBC SQL Server

salve
 
ho creato un collegamento a una vista di SQL server.
 
select * from tabella 1 ... ORDER BY DataCreazione DESC and OraCreazione Desc
 
come mai mi collega i dati ma non mi esegue l'ordinamento fatto dalla vista?
 
dove sbaglio?

 salve ho creato un collegamento a una vista di SQL server. select * from tabella 1 ... ORDER BY DataCreazione DESC and OraCreazione Desc come mai mi collega i dati ma non mi esegue l'ordinamento fatto dalla vista? dove sbaglio?
 
Ti pare corretta la sintassi...?
I campi si concatenano con la Virgola... in quel caso... non con AND...!
 
@Alex

grazie della precisazione
 
qui nel forum digitando a mano la stringa effettivamente 
ho commesso un errore
select * from tabella 1 ... ORDER BY DataCreazione DESC, OraCreazione Desc
 
ma il problema c'e'
creata una vista in sql server contenente un ordinamento tutto ok
collegata via odbc a access ricavo il recordset correttamente MA NON ORDINATO.
 
consigli?
Grazie



Ciao
il problema è che le viste di sql server e Order By non vanno molto d'accordo.
Puoi ottenere comunque una vista ordinata applicando la clausola 'TOP 100 percent' al comando SELECT della vista:
p.e. SELECT TOP 100 percent * FROM Tabella1 ORDER BY ...
 
tuttavia, a causa di come il server ottimizza i propri processi, non è certo in tutti i casi che la vista venga restituita ordinata correttamente.
 
Sarebbe meglio ordinare i risultati durante la select che farai per utilizzare la vista:
p.e. SELECT * FROM Vista1 ORDER BY ...
 
Se vuoi che sia proprio il server ad ordinare i dati potresti usare una stored procedure da eseguire all'interno di una query pass-through
 
Se possibile evita di usare * nelle SELECT, meglio/più efficiente l'elenco esplicito dei nomi dei campi.
 
Ciao
Mat.
 


sei stato veramente gentile a darmi delle dritte.
 
in effetti avevo ovviato all'ordinamento errato creandomi in locale una query che mi ordinasse il tutto.
 
UNA DOMANDA:
dici di non usare * nelle select. ma c'e' un limite al numero di caratteri nelle stringhe SQL di access? o nelle rowsource? 
e soprattutto in DoCmd.RunSQL miaStringa
 
 
 
devo dire che ora tra tabelle, relazioni e nomi di campi lunghi la stinga diventa veramente grande.

 devo dire che ora tra tabelle, relazioni e nomi di campi lunghi la stinga diventa veramente grande.
 
Le query possono arrivare a circa 64000 caratteri, DoCmd.RunSql a 32000, RowSource (listbox/combobox) 2048, RecordSource(forms/reports) 2048
Google non basta ma aiuta :)
Ciao,
Mat.
Newsgroup: it.comp.appl.access
Titolo: totale righe di un report

Salve e buona pasqua a tutti :)
Il problema è il seguente:
in un report che ha come recordsource una query, vorrei stampare in prima
pagina una scritta del tipo:
"Trovati XX record che soddisfano i criteri richiesti."
dove XX sono le righe che compongono la query alla base del report stesso e
i criteri me li porto dietro dalla form che richiama il report
la domanda è: come faccio a contare le righe del report o della query?
grazie per l'attenzione
Giovanni
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/


Nel corpo del report metti un campo nascosto non associato chiamato ad
es. tuocampoconteggio e nell'origine dati scrivi    =conteggio("*")
Nell'intestazione del report crei un'altro campo non associato e
nell'origine dati    =tuocampoconteggio

 grazie per l'attenzione
una casella di testo con origine record:
=DCount("*","nomequery") 
guarda help per Dcount
Buona Pasqua
Daniele
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

Newsgroup: it.comp.appl.access
Titolo: controllare se una query è vuota ogni 30 secondi in qualcunque punto del db

secondo voi č possibile eseguire un controllo su una query per vedere se
contiene record ogni 30 secondi, ma sopratutto eseguire questo controllo in
qualunque form mi trovo in quel momento ed eseguire quindi qualcosa se non č
vuota?
Grazie.

 ha scritto nel messaggio
news:bkmuvo$k0a$1...@lacerta.tiscalinet.it...

Creati una maschera invisibile e su Timer fai quello che vuoi
MAssimiliano
Newsgroup: it.comp.appl.access
Titolo: OT Traduzione FAQ 4.6

********************************
4.6 Show a form multiple times
Problem
You want to open a form more than one time i.e. show it multiple times
on the screen e.g. to be able to present different records side by side.
Solution
In versions >=A95 you can open multiple instances of a form.
There's some information in the Online Help with "Instances of Forms".
e.g. in the declaration section of a form module you write:
Dim FormAgain As New Form_NameOfYourForm
Then in an appropriate event you make the second instance visible
and place it at a different position on the screen because otherwise
it's placed exactly over the first instance:
With FormAgain
    .Visible = True
    DoCmd.MoveSize 2000, 2000
End With
<KB article with DB example> (German)
*******************************
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 


ciao
MAssimliano

 Solution






4.5 Mostrare diverse istanze di una maschera
Problema
Desideri aprire una maschera più di una volta, cioè mostrarla sullo
schermo più volte a.e. per essere in grado di mostrare record diversi in
maschere affiancate.
Soluzione
Nelle versioni uguali o successive ad Acc95 puoi aprire istanze multiple
di una maschera.
Qualche informazione si trova sull’Help in linea con “Istanze di una
maschera” 
(Ho trovato soltanto qualcosa nella MSDN Library)
a.e. nella sezione di dichiarazione del modulo di una maschera scrivi:
Dim FormAgain as New Form_NomeDellaTuaMaschera
Poi in un evento appropriato rendi visibile la seconda istanza e la
piazzerai in un punto differente dello schermo perchè altrimenti si
sovrapporrà sulla prima istanza.
With FormAgain
Visibile = True
DoCmd.MoveSize 2000, 2000
End With
<Articolo della KB con esempio>
(Per Acc2000 utilizzo questo link:
http://support.microsoft.com/support/kb/articles/Q210/2/48.asp
 )
--
rgrds
SC
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 
http://support.microsoft.com/support/kb/articles/Q210/2/48.asp
 )
tnx. Ho aggiunto un link a questo articolo.
-- 
cu


 tnx. Ho aggiunto un link a questo articolo.
OK. Notato

Newsgroup: it.comp.appl.access
Titolo: Importzione dati da AS400

Ciao a tutti
Prima di esporre il problema volevo sapere se
qualcuno sa se si può e come si fa ad importare
da as400.Ho chiesto in giro ma nessuno sa niente.
Ciao
TT

 Ciao
By(e) Omar


Consiglio in aggiunta a quello precedente. Se per caso devi fare solo
delle interrogazioni e non devi aggiornare niente su AS400, imposta
l'ODBC in sola lettura, per evitare casini in caso di errore.
Inoltre se devi fare delle interrrogazioni su file che si aggiornano
continuamente, ti conviene collegare la tabella e non importarla,
comunque vedi tu come ti torna meglio.
William

[cut]
Ciao a tutti
Grazie per le risposte.
Io ho fatto un db che uso ma volevo importare i dati
del magazzino 2400 codici e descrizioni componenti da
reinserire a mano mi rompe un po', da as400
che però non vedo in rete.
Il gestionale che utilizziamo (quello su as400) funziona in
rete ma non vedo il calcolatore (pc non va bene) nell
risorse di rete.
Mi è stato vietato di chiamare la ditta del gastionale,
ogni chiamata volano centoni!!!!!!!!!
Quindi solo per una mia comodità (poi è da vedere
dove si spende di più!) non vale la pena chiamare.
A me non frega nulla della scrittura su as400 mi basta leggere
una tabella se ci sono e importare i dati in access nel mio db
riparazioni.
Questo è il quanto.
Ciao
TT

 TT
Per fare quello che dici te puoi fare in due modi, come ti diceva
RedSilverstone:
1- usi il Trasferimento Dati del Client Access, molto intuitivo.
    In genere viene installato automaticamente insieme al client
    e lo trovi sotto Azione-RiceviFile da Host oppure sotto
    programmi - IBM - trasferimetno file da As400.
    Questo č uno strumento molto utile perchč se sai
    in quali file dell'as400 andare a cercare i dati puoi tirar
    giů quasi tutto ciň che ti serve anche in formato Excel.
    PS. da as400 se conosci il nome del file dati puoi stamparti un
tracciato
    record con la funzione     EPRTRF nomefile.
2- oppure ti configuri un ODBC da Pannello di Controllo - Strumenti di
Amministrazione
    e lo interfacci all'as400. Poi vai su Access e a quel punto importi o
colleghi una tabella
    usando come Tipo file l' ODBC invece di .xls o .mdb ecc..
spero di essere stato chiaro.
Saluti
William

Newsgroup: it.comp.appl.access
Titolo: pulsanti ridimensionamento maschere

E' possibile eliminare il pulsanti di chiusura e ridimensionamento
delle maschere, cosě come fatto per Access (sul modello "Ciao
Pulsantini" presente nelle Tips)?
					CARLO.

Puoi eliminare facilmente i pulsanti dalle proprietą della maschera, scheda
formato, voci pulsanti ingrand./riduzione e pulsante di chiusura.
Newsgroup: it.comp.appl.access
Titolo: numerazione progressiva in rete

ho un applicativo che funziona in rete con il BE su server centrale, ho un
campo numeratore in formato testo che si incrementa di 1 ad ogni nuovo
record che ci si aggiunge con una formula su valore predefinito del
controllo abbinato
"=IIf(DCount("[contatore]";"archivio")=0;"0000001";Format$(DMax("[contatore]";"archivio")+1;"0000000"))"
a volte capita che se un utente apre la schermata su nuovo record e va a
"cagare" scusate il termine (tipo qualcuno che si è abbuffato al CISA2
:-))))   ), lasciando l'applicativo aperto e i record non finito di
inserire, un altro utente apre nuovo record inserisce tutti i dati e va
avanti col prossimo record, quando il primo utente torna con la pancia
libera, finisce di inserire i dati nei record non ancora completati, va a
passare a nuovo record e perde tutti i dati del record appena completato
dato che il numero assegnato gli è stato fregato dall'altro utente
"stitico".
C'e' qualcuno che si è regolato diversamente per l'assegnazione in rete di
un numero progressivo?
cosa mi consigliate? per non far succedere questo inconveniente? (non
vorrei assegnare il numero in manuale per paura che non lo mettono proprio)
grazie
luigi
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 un numero progressivo?
un campo numerico
una mschera non associata
un pulsante salva
la sub salva_click
dim numero as integer/long
'calcolo il calore del nuovo numero
numero = dmax(........)+1
'ma sarebbe meglio calcolarlo con una query
poi esegui la query del tipo
INSERT INTO ................ " & numero & " as nuovo_numero,.......
in questo modo i dati vengono scritti solo alla pressione del pulsante e 
uno può anche avere 20 attacchi di diarrea nel mentre e non succederà nulla

 grazie
Io lavoro su temp nel client e poi schiaffo tutto sul server con un pulsante 
SALVA!
A quel punto si cerca l'ultimo numero progressivo su di una tabella 
appositamente studiata sul server e registra il nuovo record.
Non mi č mai successo che due client si sianolitigati un numero.
Saluti Andrea 


-- 
Cinzia
---------------------------------------
|  
http://www.riolab.org
  |
---------------------------------------
-- 
Cinzia
---------------------------------------
|  
http://www.riolab.org
  |
--------------------------------------->

Newsgroup: it.comp.appl.access
Titolo: finestra database - vecchio stile dettagli

salve
 
trovavo molto comodo la fiestra database con visualizzazione dettagli in modo da individuare velocemente query o maschere mettendo una descrizione a fianco 
 
con i Ribbon da access 2007 in avanti trovo molto difficile indivisuare query quando ne ho moltissime
 
avete dei consigli?
c'era una add-on che simulava una vecchia visualizzazione
 
voi come fate?


io me la sono fatta da me
una maschera con 5 list box con nome e data ultima modifica di ogni oggetto
 
tabelle
view
maschere
report
moduli
 
con un click si apre il relativo oggetto
 
BFS

Grazie 
potresti darmi delle dritte?
Grazie
Newsgroup: it.comp.appl.access
Titolo: [OT] document management

sto cercando un software simile a
 	INFODOC OFFICE 2003 ,   o comunque un  Document Managment e Imaging che
Integra funzionalità di Creazione, Modifica e Conversione Documenti PDF.
Puoi Convertire qualsiasi Documento in PDF e un PDF in un documento
Editabile in formato RTF, HTML, XLS (excell). Permette al generazione
Ottimizzata per la pubblicazione su Internet. Permettendo anche la modifica
ed editazione diretta del File PDF.
qualcuno può darmi una mano?
Mi andrebbe bene anche sapere se si può relizzare in access un qualcosa di
simile.
ciao Sthepan


Puoi riprodurre al 99% le funzionalità descritte (non c'è da re-inventarsi 
nessuna ruota) solo che i tempi (e costi) di sviluppo/test/produzione non 
giustificherebbero l'impresa...
Ciao.
-- 
Sergio MAZZA

Newsgroup: it.comp.appl.access
Titolo: versione Access e Excel

salve
 
ho una procedura per esportare i dati da access a excel
 
in particolere
 
per stabilire la versione di access utilizzo
 
Application.version
 
 
e da vba aperto excel
utilizzo
    ' APRE SE ESISTE GIA' UN'OGGETTO EXCEL
    Set xlApp = CreateObject("Excel.Application")
e quindi 
 
xlApp.version    <--------------
 
 
 
ricavo
 
 
    ' application.version
    ' xlApp.version
    ' 11.0  --> 2003
    ' 14.0  --> 2010    come mai sia la versione 2010 che 2016 da' 14.0?
    ' 14.0  --> 2016
 
il problema e' quale parametro mettere per il slavataggio
 
 
    oWkb.SaveAs NomeFile, ???
 
    ' ATTENZIONE ALLA VERSIONE DI EXCEL, usare 43 oppure 50 o 56 a seconda della versione 2003 o superiore...
    '
    ' 43 -- .xls  -- xlExcel9795 -- Excel version 95 and 97
    ' 56 -- .xls  -- xlExcel8    -- Excel 97-2003 Workbook
    ' 50 -- .xlsb -- xlExcel12   -- Excel Binary Workbook
 
 
 


Non devi solo modificare l parametro del FileFormat, ma anche adeguare l'estensione del file che deve essere coerente con il FileFormat.
 
Io faccio una cosa simile, ovvero ricavo l'estensione ed il FileFormat:
 
If Val(mXLSAPP.Version) < 12 Then
	' Excel 97-2003
        FileExtStr = ".xls": FileFormatNum = -4143
 
Else
     	Select Case oWkb.FileFormat
  		Case 51: FileExtStr = ".xlsx": FileFormatNum = 51 
        	Case 52:
        		If oWkb.HasVBProject Then
                		FileExtStr = ".xlsm": FileFormatNum = 52
                	Else
                		FileExtStr = ".xlsx": FileFormatNum = 51
                	End If
		Case 56: FileExtStr = ".xls": FileFormatNum = 56
		Case Else: FileExtStr = ".xlsb": FileFormatNum = 5
	End Select
End If
 
oWkb.SaveAs NomeFile & FileExtStr,FileFormatNum 
 
Ciao
@Alex
Newsgroup: it.comp.appl.access
Titolo: Totale su maschere continue

Salve a tutti.
Dopo essermi letta miriadi di messaggi, forum , FAQ sul sito comune e
ovunque mi sono decisa a porre il quesito, in quanto non ho trovato la
soluzione al mio problemino (se la soluzione c'è già scusate, andrò
a cambiarmi gli occhiali).
Veniamo al problema.
Ho una maschera in formato maschere continue, che ha come origine dati
una tabella Vendite.
Oltre ai controlli associati ad alcuni campi della tabella, ne ho uno
calcolato mediante una funzione guadagno() piuttosto complessa.
Questa funzione, tra le altre cose, preleva anche dati da altre tabelle
mediante delle SELECT.
Il tutto funzia, io mi vedo tutte le mie vendite con a finaco il
guadagno calcolato.
Il problema è che mi servirebbe anche il guadagno totale alla fine.
Ovviamente non posso fare il totale del controllo in quanto non
associato.
Ho provato anche con la funzione che farebbe il totale progressivo, ma
lo fa solo partendo dai campi della tabella.
Ho quindi due alternative:
1) Salvare il guadagno della vendita in un ulteriore campo della
tabella Vendite (non è gravissimo visto che non è che cambi nel
tempo), e poi farmi tranquillamente la somma.
2) Chiedere aiuto, ed è quello che sto facendo.
Tenete presente che sono una autodidatta in Access, mi diverto pure, ma
non ho le basi.
Grazie e ciao
  Michela

 ha scritto nel messaggio
news:1141556079.6...@j33g2000cwa.googlegroups.com...
Salve a tutti.

Veniamo al problema.






Ho quindi due alternative:



Grazie e ciao
  Michela
Ciao Michela,
una soluzione potrebbe essere quella di associare la maschera continua ad
una Query anzichè direttamente alla Tabella Vendita, inserendo la funzione
Guadagno tra i campi restiruiti dalla query, una cosa di questo genere
Select  campo1, campo2, campo3, guadagno([campo1], [campo2]) as ilguadagno
from  Vendite
ovviamente dovrai usare i nomi dei campi corretti e forse modificare la
funzione affinchè prenda come parametri i valori dei campi che le servono
per il calcolo.
A questo punto il campo sarà associato e potrai sfruttare le funzioni per i
totali.
Saluti
-- 
Cinzia
---------------------------------------
|  
http://www.riolab.org
  |
---------------------------------------

**************************************************************************************
FUNZIONA FUNZIONA FUNZIONA FUNZIONA !!!!
Grazie Cinzia
Ciao
  Michela

 totali.
Giusta soluzione, ma a meno che il calcolo non sia estremamente complesso 
e/o articolato conviene farlo eseguire al motore sql anzicchè a una funzione 
esterna:
(campo1+Campo2) AS ilguadagno
Questo per due motivi fondamentali:
1. in caso di conversione del databasa in adp o nel caso di utilizzo della 
query in un altro database la funzione non funzionerà più
2. è più veloce
Ciao
Sib
-- 
http://www.gestionedati.com
Newsgroup: it.comp.appl.access
Titolo: database corrotto dopo una operazione di compattamento

Buongiorno a tutti. Ho purtroppo per le mani un serio problema:
Mentre era in corso una operazione di compattamento del database è mancata
la corrente e il server si è bloccato.
Alla riaccensione - purtroppo - il database non risulta essere più
accessibile (il modulo Microsoft Jet non è capace di trovare l'oggetto
MsysDb). Probabilmente l'operazione si è interrotta proprio al termine, per
cui non risulta più presente nè la copia del database prima del
compattamento, nè alcun altro file intermedio.
Chiaramente, posso ripartire da una situazione di back-up per ripristinare
le funzionalità dell'utilizzatore. Vorrei però capire - vista l'importanza
dei dati perduti - se esiste qualche utilità per riuscire a recuperare -
anche parzialmente - le informazioni contenute nel database corrotto (dati
e/o procedure - l'utente aveva appena terminato di realizzare alcuni report)
o se devo mettermi il cuore in pace e ripartire dall'ultimo back-up.
--------------------------------
Inviato via 
http://usenet.libero.it

 ha scritto nel messaggio
news:217Z133Z176Z211Y...@usenet.libero.it...

In genere lo scandisk recupera il database.
Ciao, Carlo

 ha scritto:

--------------------------------
Inviato via 
http://usenet.libero.it

Il 28 Mag 2003, 12:23, 
api...@mentelibera.it
 (Alessandro) ha scritto:
[...]
Chiedo scusa per l'invio errato... Ho per sbaglio premuto invia anzitempo.
Ringrazio Carlo della risposta. Purtroppo il problema e' un altro.
Rileggendo il mio post mi sono reso conto di non aver descritto bene il
problema. Ci riprovo.
Il file ".mdb" esiste ed ha anche una dimensione inferiore alla dimensione
di partenza. Nella directory non sono presenti altri file (come ad esempio i
files temporanei che vengono generati mentre la procedura di compattamento è
in corso) quindi tutto lascia supporre che il compattamento fosse arrivato
al termine al momento della mancanza di corrente.
Cercando pero' di accedere al database, l'applicazione non riesce ad aprirlo
(errore di oggetto Msysdb mancante). Si ottiene lo stesso errore cercando di
importare gli oggetti all'interno di un altro database vuoto.
E' evidente che il database ora è corrotto in qualche tabella di sistema.
La mia speranza è che esista un modo per ricostruire le tabelle di sistema
(magari partendo dagli oggetti utente) o che esista una procedura capace di
esportare comunque gli oggetti utente (tabelle - schemi e dati- , query,
report, form,..).
Qualcuno ha qualche idea?
Grazie.


 ha scritto nel messaggio
news:217Z133Z177Z38Y...@usenet.libero.it...

In ultima analisi prova a rivolgerti ad aziende che operano il recupero
dati.
Un punto di partenza potrebbe essere:
http://riparafiles.it/recfiles.htm
Ciao, Carlo
Newsgroup: it.comp.appl.access
Titolo: invertire i record selezionati di una query

se ho un campo di nome selezione di tip Si/No se ad esempio seleziono 3 
record mettendo a -1 quel campo per i 3 record come fareste voi per 
invertire la selezione ovvero mettere a -1 tutti gli altri e a 0 quei 3 
record?
grazie a tutti. 

 ha scritto nel messaggio
news:ckgt0l$9bn$1...@lacerta.tiscalinet.it...

Se la tabella che contiene il campo Si/No chiamato Selezione si chiama
Tbalella1, prova con una query di aggiornamento che abbia il swguwnte codice
SQL:
UPDATE Tabella1 SET Tabella1.Selezione = IIf([Selezione]=-1,0,-1);
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


funziona grazie mille .............insomma sta campagna fà bene proprio :))

 ha scritto nel messaggio
news:ckh2gq$evj$1...@lacerta.tiscalinet.it...

Non potrebbe essere altrimenti: aria pulita, cibo buono e genuino, moto e
poi e poi...
Comunque la vendemmia è agli sgoccioli, quindi sto per ritornare alla
grigiore dell'autunno cittadino. :-(


Newsgroup: it.comp.appl.access
Titolo: Casella combinata visualizza solo 65535 voci?

Ciao ragazzi eccomi qua con un problema strano...
In una form dove gestisco l'anagrafica dei clienti
è presente una casella combinata per il recupero delle città presenti in
una tabella con i rispettivi cap.
Con i nuovi cap trovati in un link del NG ho aggiornato la tabella Comuni
superando i 65535 record.
Ora succede che nella casella combinata si ferma fino a Roma. Ho provato a
cambiare da casella combinata a riepilogo ma il risultato non cambia...
Come si risolve?
Grazie come sempre
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Grazie come sempre
Non puoi usae la combo
ma puoi filtrare i dati attraverso una casella di testo
ad ogni lettera avrai 65000 record da visualizzazre
-- 
-- 
Massimiliano Amendola
www.accessgroup.it
Il sito italiano di svilupatori Access
www.donkarl.com/it/cisa
 

 ad ogni lettera avrai 65000 record da visualizzazre
WoW! Grazie per la dritta!!! 


 ha scritto nel messaggio 
news:eisssh$nos$1...@news.newsland.it...

Scusami ma come è possibile 65000 comuni???
In Italia a mala pena si superano gli 8000???
Sbaglio?
Roberto 


No, ma bisogna vedere come ha normalizzato i dati

Newsgroup: it.comp.appl.access
Titolo: percorsi attendibili e registrazione riferimenti in runtime

ho elaborato un programma in access con access 2003. per la versione 2007 
solitamente funziona inserendo nei riferimenti due olb (MSACC MSWORD) e 
assegnando il percorso del database nei percorsi attendibili.
Da un cliente ho trovato un runtime di access, dal quale non riesco n� a 
fare le due operazioni sopradette n� a verificare se altri riferimenti sono 
presenti o meno.
Come posso risolvere la cosa?
grazie e ciao
Max

 ha scritto nel messaggio 
news:hktr5h$o2h$1...@news.task.gda.pl...

I riferimenti devi impostarli univocamente quando compili il file.
Ti faccio notare che indipendentemente dal runtime ti ritroveresti nella 
medesima situazione se crei un mde.
Per cui o ti crei una routine che ti permette di modificare I riferimenti 
oppure vedi di settarli gi� correttamente al momento della compilazione.
Ciao
-- 
Roberto da Parma

Newsgroup: it.comp.appl.access
Titolo: database che si gonfia

Come mai usando un programma scritto in VB6 che memorizza i dati in un file 
MDB di access 2000 , tale MDB risulta sempre da compattare , anche del 50% ?
Dopo una settimana di utilizzo raddoppia sempre le dimensioni!
saluti e grazie 

Può essere normale come è normale gestire una corretta compattazione
del Database...!!!
@Alex
Newsgroup: it.comp.appl.access
Titolo: gestione gruppi-utenti access, perdita informazioni

se uno crea un gruppo e utenti su un DB access e poi perde queste
informazioni, ha speranza di poter rientrare in possesso dei dati?
l.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 l.
Sě.
-- 
Ciao
Karl
*********
Access FAQ: 
www.donkarl.com/it

Newsgroup: it.comp.appl.access
Titolo: Tabelle collegate

Devo collegare un file di testo strutturato ad un database MDB. La cosa di
per se è facile se non fosse che la directory in cui viene costruito il file
mdb e il suo collegamento non sono sempre le stesse, mi spiego meglio.
Quando progetto il tutto si trova nella 'mia' directory documenti, ma chi lo
utilizza può collocarlo dove vuole e quindi si perde il riferimento alla
collocazione del file collegato. Lo stesso problema in Word è stato risolto
con il VBA, ma con Access come si fa? Grazie.

 ha scritto nel messaggio
news:tmSVb.3035$2j2....@twister2.libero.it...

Forse con il sito comune (
www.sitocomune.com
) "Riallegare tabelle. Funziona
anche se il Backend e' protetto da password." - Sezione Tables...
Ciao.
--
Sergio MAZZA

 ha scritto nel messaggio
news:UN%Vb.213605$VW.87...@news3.tin.it...


 per ora proviamo, poi vedremo, grazie
Per ora comincia a provare scrivendo correttamente DOPO il quoting
Antonio

Newsgroup: it.comp.appl.access
Titolo: RowSource su Combo box

Salve a tutti ho un problema di questo tipo devo assegnare tramite codice 
l'0rigine riga di una combobox Il codice da me scritto e' questo:
Private Sub Form_Open(Cancel As Integer) 
Dim db As database
Dim qdf As QueryDef
Dim ST As String
Dim SP As String
Set db = CurrentDb
ST = "SELECT CDPAR,DEPAR FROM ANPARTI WHERE (((ANPARTI.CDPAR)Between
""0080000"" And ""0080999""));"
Set qdf = db.CreateQueryDef("dsst", ST)
Me.CC4.RowSource=  .... cosa va scritto per vedere il sercordset della
query dsst nella combo box ???? 
Il codice basta questo ???? 
Grazie Stefano !!!! :-))
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Grazie Stefano !!!! :-))
Perchè tante dichiarazioni!!!??? non ti basta :
Me.CC4.RowSource = "SELECT CDPAR,DEPAR FROM ANPARTI WHERE
(((ANPARTI.CDPAR)Between ""0080000"" And ""0080999""));"
e poi fai il requery di CC4????
Fammi sapere (non ho dato un occhiata all'sql)
-- 
Pablitomf
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)

Newsgroup: it.comp.appl.access
Titolo: Inserire riga.

Ciao a tutto il NG.
Access 97
Devo poter inserire un record vuoto in una maschera a schede continua cioč.
record 1
record 2
record 3
record 4
record 5
record 6
Devo posizionarmi sul record 3 esempio, cliccare sul selettore record, e
premere un pulsante.
Quindi fare stile exel, inserire riga.
Come posso fare.?
Cia a tutti

 ha scritto nel messaggio
news:DfEod.47485$Es2.1...@twister2.libero.it...

creati un campo di appoggio che ordini le righe
all'inserimento aggiungi +1 alle rimanenti
MAssimiliano

 ha scritto nel messaggio
news:yUEod.35010$B06....@news.edisontel.com...

Non c'e' un altro sistema.?

Newsgroup: it.comp.appl.access
Titolo: saltare le righe vuote

salve a tutti. In A97.
Ho una tab. in cui sono presenti i seg. campi:
[denominazione]
[documentoA]
[documentoB]
[documentoC]
[documentoD]
......
Nei campi relativi ai documenti possono essere presenti o meno dei dati.
Quando vado a riportare il tutto su un report, se tutti  i campi sono pieni,
non ci sono problemi, ma se alcuni campi sono vuoti, ottengo una cosa del
genere:
Nome_Cognome
   DocumentoA
   (vuoto)
   (vuoto)
   DocumentoD
Invece mi servirebbe una cosa del genere:
Nome_Cognome
   DocumentoA
   DocumentoD
'saltando' le righe vuote.
E' possibile?
Grazie a tutti in anticipo.
Giancarlo

 ha scritto nel messaggio
news:bn0slj$ffa$1...@fata.cs.interbusiness.it...

Una soluzione potrebbe essere questa: dai ai controlli un'altezza minima.
Disponili uno sotto l'altro, allineati in alto.
Fai in modo che la proprietà "espandibile" sia impostata a Sì.
Ciao
Salvatore

 ha scritto nel messaggio
news:bn0slj$ffa$1...@fata.cs.interbusiness.it...

Crea i campi del documento di altezza quasi nulla con l'attributo
espandibile = Sě
Bye

 ha scritto nel messaggio
news:bn0vi9$sv7$1...@lacerta.tiscalinet.it...

Bellissima!
Una soluzione molto 'simpatica'.
Grazie.
Giancarlo

 ha scritto nel messaggio
news:bn0slj$ffa$1...@fata.cs.interbusiness.it...

Vai Sul Sito Comune (link qui sotto) e nella Sezione Reports fai il download
del database di esempi allegato alla FAQ intitolata "Esempi di utilizzo dei
reports".
Apri il database scaricato e seleziona il Topic intitolato Eliminating White
Space in Report with CanShrink & Code.
Premendo il pulsante di comando Show Example ti verrà mostrato un esempio di
ciò che ti serve.
Maggiori informazioni di come è stato realizzato l'esempio le troverai al
link:
http://support.microsoft.com/default.aspx?id=95390
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: VBA: vedere stringa connessione ODBC

Salve a tutti,
non mi ricordo come si fà
a vedere la stringa di connessione di una
tabella allegata ODBC
qualcuno ha una dritta?
grazie
ringo

 ha scritto nel messaggio
news:b15mrb$poc$1...@serv1.albacom.net...

Devi andare nella tabella MsSysObject che ovviamente è nascosta
ma dal menù Opzioni le rendi visibili e da li copi la stringa.......!
Oppure falla stampare da una MSGBOX, in fondo non è altro
che la proprietà Connect di Tabledefs(Nometabella)
@Alex.

 ha scritto nel messaggio
news:jqzZ9.56197$YG2.1...@twister1.libero.it...

grazie 1000!
bye

Newsgroup: it.comp.appl.access
Titolo: [Quasi OT] Applicazione per evitare lo stand by del PC

Ciao a tutti,
il problema è questo:
Ho un apparecchio attaccato al pc che invia dati tramite seriale, dati 
che vengono poi importati ed elaborati in Access.
o notato stamattina che  le ultime rilevazioni risalivano a ieri alle 
17.30, mentre ci sarebbero dovuti essere dati anche ieri sera e stamattina.
La mia paura è che il pc sia andato in stand by per inattività ed abbia 
chiuso la connessione alle COM, spegnendole.
E' possibile magari con uno script .vbs in esecuzione mantenere il pc 
sempre attivo evitando lo stand by?
Grazie a tutti
Ciao
Marco

sempre attivo evitando lo stand by?
Non puoi disattivarlo direttamente lo standby?
Puoi far spegnere tranquillamente solo lo schermo mentre il PC rimane
attivo?
--
Ciao
Andrea Malfatti
Newsgroup: it.comp.appl.access
Titolo: Stampa etichette

Ciao a tutti,
In un report che utilizzo per stampare le etichete, volevo sapere se esiste
un modo per decidere il punto esatto in cui iniziare a stampare, es.
nell'etichetta posizionata nella II colonna, IV riga.
Ciao e grazie

 ha scritto nel messaggio
news:Txlsb.11489$hV.4...@news2.tin.it...

dovresti gestire il tutto da codice nascondendo le etichette che non servono

Newsgroup: it.comp.appl.access
Titolo: si puo aprire access e tenerlo al di sopra di ogni altro messaggio provenenienta da windows?

si puň cioč forzare il focus su access in windows?
Grazeia tutti

 Grazeia tutti
Si, devi intercettare laperdita del Focus dall'Istanza
di Access e usare le API per riposizionare l'istanza sopra le
altre.
Se cerchi su Google Maschere in Primo piano dovresti trovare
qualche Funzione in VB(che si adatta in modo semplice) per
fare quello che chiedi.
Eventualmente in serata ti dň qualche riferimento....!
Ciao
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:6672a40188ae9f9a21...@mygate.mailgate.org...

Private Const SWP_NOACTIVATE As Long = &H10
Private Const SWP_NOMOVE As Long = &h4
Private Const SWP_NOSIZE As Long = &H1
Private Const HWND_NOTOPMOST As Long = -2
Private Const HWND_TOPMOST As Long = -1
Private Const GWL_HINSTANCE = (-6)
Private Declare Function SetWindowPos Lib "User32.dll" (ByVal hwnd As Long,
_
ByVal hWndInsertAfter As Long, _
ByVal X As Long, _
ByVal Y As Long, _
ByVal CX As Long, _
ByVal CY As Long, _
ByVal wFlags As Long) As Long
Private Declare Function GetWindowLong Lib "User32"  Alias "GetWindowLongA"
_
(ByVal hWnd As Long, _
ByVal nIndex As Long) As Long
Sub AlwaysOnTop(OnTop As Boolean)
    If OnTop Then
        'Visualizza la finestra sempre in primo piano.
         Call SetWindowPos(application.hWndAccessApp, HWND_TOPMOST, 0, 0, 0,
0, SWP_NOACTIVATE Or SWP_NOMOVE Or SWP_NOSIZE)
    Else
        Call SetWindowPos(application.hWndAccessApp, HWND_NOTOPMOST, 0, 0,
0, 0, SWP_NOACTIVATE Or SWP_NOMOVE Or SWP_NOSIZE)
    End If
End Sub
Non l'ho provata ma dovrebbe andare eventualmente potrebbe essere meglio
passare l'istanza di Access invece che l'Handle
diretto:
      hInstance = GetWindowLong(Application.hWndAccessApp, GWL_HINSTANCE)
poi passalo alla chiamata a SetWindowPos al posto di
application.hWndAccessApp
Ciao
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------

 -- 
aspetta scusa ma non ho capito io ho dichiatato quanto hai detto in un 
modulo poi come mi accorgo che access perde il focus e quindi come gli dico 
di tenerlo? grazie. 

 ha scritto nel messaggio
news:ciq1f5$pb$1...@lacerta.tiscalinet.it...

Che devo aspettare.......???
Non ti devi accorgere di nulla, con la Macro AutoExec o con l'apertura
della Form principale chiama la Sub:
Call AlwaysOnTop(True)
La dichiarazione dell'Istanza è nel caso non vada o abbia qualche anomalia
il
primo codice, ma non lo sostituisce, lo completa....!!
Ciao.
