mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Problemi di principianti!

Buongiorno NG.
Utilizando i Bookmarks di Word mi compilo un modello
con i dati visualizati in maschera.
Funziona regolarmente ma ho un problema,
il nome per la firma del documento lo dovrei prelevare
non dalla maschera ma da una tebella diversa.
Come indico il percorso?
Tabella   "FirmaDoc"
Campo   "CapoRipartizione"
ecco il codice che uso
   Doc.Bookmarks("CapoRipartizione").Select
   Wrd.Selection.TypeText Me.CapoRipartizione
Mi aiutate a completare la stringa?
Grazie di cuore!

 Grazie di cuore!
-- 
Ciao
Geppo 

 ha scritto nel messaggio 
news:d782ee88-9e73-4836...@m3g2000hsc.googlegroups.com...

Ciao principiante,
la prima regola di questo NG č:
utilizza un oggetto significativo quando fai domande..., quindi fai il 
bravo non farmi contravvenire alle regole e  riposta la domanda con un 
oggetto adeguato!
Per conoscere le altre regole 
www.sitocomune.com
 click su ICAA
Grazie.
-- 
Cinzia [Office Access MVP]
_______________________
 
www.riolab.org
http://accessdaziacin.live.spaces.com
---------------------------------------- 

 - Mostra testo tra virgolette -
Grazie Geppo e grazie Cinzia per la tirata d'orecchie.
Leggerò e mi adeguerò!
Saluti, By Princ.

Newsgroup: it.comp.appl.access
Titolo: Access su android possibile?

Access su android possibile?

 Access su android possibile?
 
 
Se esiste un buon emulatore windows per Android, in tal caso � possibile.
 
http://aldexnapoli.jimdo.com/emulare-windows-xp-su-un-dispositivo-android/
 
 
Chiss�, magari funziona...
Newsgroup: it.comp.appl.access
Titolo: Order by nn funziona con query origine dati

Ciao a tutti,
si vede che è un periodo di nuove scoperte....questa mi colpisce
particolarmente.
In una maschera con origne dati una query di selezione non funziona la
proprietà Order By
Ho provato infatti a creare un pulsante e scrivere sull'evento
OnClick:
me.order by = "CAP"
me.refresh
Non mi da errore ma non ordina assolutamete i record, poi però se vai
a vedere nelle proprietà della maschera compare "CAP" come criterio di
ordine...
Esiste una soluzione "veloce" a questa cosa....???
Grazie x l'aiuto
Massimo

 Esiste una soluzione "veloce" a questa cosa....???
Abbastanza veloce:
Me.OrderBy = "CAP"
Me.OrderByOn = True
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it

 Access FAQ:
www.donkarl.com/it
Grazie Karl!
Ma scusa xchè in questo caso order by deve essere seguita da
OrderByOn....
Francamente in alcuni casi proprio nn riesco a capire il motivo di
certe soluzioni....
Ciao

 di certe soluzioni....
Beh, � come con molte cose nel mondo, tanti misteri per l'uomo.
-- 
;-)


 ha scritto nel messaggio 
news:76tqmcF...@mid.individual.net...

Mah io credo non sia una cosa malvagia perch� se uno deve fare una 
composizione di ordinamento (pi� campi) in questo modo pu� passare prima 
tutti i paramentri e poi alla fine ordinare...
Ciao
-- 
Roberto da Parma 

 prima tutti i paramentri e poi alla fine ordinare...
Beh, di solito (=per tante altre propriet�) si usa variabili per
questo scopo:
Dim strOrderBy As String
strOrderBy = "pippi, pluto, CAP"
Me.OrderBy = strOrderBy
-- 
cu


 ha scritto nel messaggio 
news:770an0F...@mid.individual.net...

eh si...ma non rimarrebbero in memoria all'uscita della routine...
invece in questo modo puoi attivare e disattivare tenendo in memoria il 
filtro anche se io poi questa procedura non la uso spesso.
io nel caso salvo il filtro in tabella.


 io nel caso salvo il filtro in tabella.
Secondo me questo restare "in memoria" di un filtro o come qui
di un ordinamento � un tormento imprevedibile (= vecchio bug).
Inteso il fatto che qualche volta a runtime viene salvata nella
propriet� della maschera) come descrivo anche nel
www.donkarl.com/it?FAQ4.7
.
-- 
HTH


 ha scritto nel messaggio 
news:770ciaF...@mid.individual.net...

Un bug deve esserci sempre... :-)))

Newsgroup: it.comp.appl.access
Titolo: record e scelte campi

Ciao!
Problema:
Ho una maschera in cui è  inserito una sottomaschera in cui vorrei svolgera
la seguente operazione:
Maschera: contiene campo "Fornitore" in cui ho 3 record (pluto, pippo,
paperino)
Sottomaschera: contiene 5 campi: "Prodotto" (marmelalta); "Prezzo" (campo
vuoto); "prezzo pluto"; "prezzo pippo"; "prezzo paperino".
Come faccio a dire alla maschera, Se nel campo "fornitore" si è scelto il
record (Pluto) immetti nel campo prezzo(campo vuoto) della sottomaschera il
record del campo "prezzo pluto"; se invece si è scelto nel campo fornitore
il record (pippo) immetti nel campo "prezzo" (campo vuoto) della
sottomaschera il record del campo "prezzo pippo"
Come faccio?Che espressione devo usare?
Ciao e Grazie

 Come faccio?Che espressione devo usare?
    Con qualche "If" concatenata dovresti combinare. Se potessi ridurre
"pippo", "pluto" & C. a numeri tipo 1, 2, 3, ... potresti sfruttare la
funzione "choose"...
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------

 funzione "choose"...
Ammettiamo che riesca a ridurre i nomi in numeri, potresti spiegarmi come
sfruttare la funzione "choose"
Ciao e Grazie

 sfruttare la funzione "choose"
    Curiosa questa domanda... Immagino tu abbia gia' letto la guida al
riguardo... quindi come minimo dovresti chiedere spiegazioni riferendoti a
questa, altrimenti io che posso dirti se non quello che c'e' scritto nella
guida?... (Traduco: SE hai letto la guida ALLORA dicci cosa non ti e' chiaro
ALTRIMENTI leggi la guida. )

Newsgroup: it.comp.appl.access
Titolo: conversione in access 2000

Come mai convertendo un dbs da access 97 a access 2000 non mi dà più la
possibilità di scrivere
Dim dbs as Database o
Dim wsp as Workspace
in che cosa lo hanno modificato?
Grazie Giovanni

 ha scritto nel messaggio
news:OuqO9.50144$TC5.1...@twister1.libero.it...

In nulla, solo che l'Oggetto Database fa parte della Collezione
libreria DAO che non è settata di Default in A2000.
Se vai nei riferimenti e selezioni DAO 3.6 vedrai che funziona tutto.
@Alex.

Newsgroup: it.comp.appl.access
Titolo: MSysModule2

Ciao a tutti,
ho impostato la sicurezza a livello utente, ma quando provo ad aprire il db
mi dice che non ho l'autorizzazione ad usare il modulo in oggetto.
Il modulo non è mio, credo si nascosto, come posso risolvere il problema?
ciao, AEOM

 Il modulo non è mio, credo si nascosto, come posso risolvere il problema?
MDB o MDE?
Normalmente quest'errore viene con un MDE:
http://support.microsoft.com/default.aspx?scid=kb;en-us;Q170696
--
HTH
Karl
*********
Access-FAQ (tedesco): 
http://www.donkarl.com

 ha scritto nel messaggio
news:a5j43a$7o39t$1...@ID-46617.news.dfncis.de...

Perfetto!!!
Grazie
Newsgroup: it.comp.appl.access
Titolo: recupero descrizioni da codici

scusate la stupidità della domanda ma oggi è la giornata dei problemi che
non so risolvere!
Ho creato la maschera di inserimento dati Descrizione (associata ad una
tabella Descrizione) in cui ho una ListBox "servizi" a selezione multipla,
che prende i valori da una tabella Servizi (codice; descrizione) e scrive
nel campo Servizi della tabella Descrizione i codici relativi ai servizi
scelti  (scelgo pippo e pluto e nel campo mi scrive 1;3)
E fin qui, grazie ai molti esempi su NG e sito comune, tutto ok
Inserisco in tabella i codici e non le descrizioni per motivi di spazio però
quello che mi sfugge è:
quando da una maschera di sola lettura vado a visulizzare i dati inseriti in
tabella Descrizione come faccio a vedere le descrizioni anzichè i codici?
ovvero se
1 = pippo
2 = paperino
3 = pluto
...
e nel campo descrizione con la scelta da listbox ho memorizzato 1; 3
che tipo di codice devo usare per vedere nella maschera di lettura non  "1;
3" ma "pippo; pluto"?
Ho guardato l'esempio del sito comune per "filtrare report su selezione
multipla", ma non riesco a capire se e come posso sfruttarlo nel mio caso in
cui ho tre utenti che, in tempi e luoghi diversi, uno inserisce i dati, uno
legge e modifica, un terzo legge e basta e chi inserisce e chi legge sono
due utenti che necessariamente devono vedere la scritta Pippo e non il suo
codice
Scusate ancora per l'ignoranza e grazie per la pazienza
Nadia


Collega la tabella a quella dove ci sono anche le descrizioni. Le leghi tra
loro e invece del controllo che visualizza 3 mostri descrizione
Ciao MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it

 ha scritto:
[cut]

sì ma nella tabella principale non scrivo semplicemente "3"
bensì "1; 3; 4" per cui se con "collega le tabelle" intendi collego il campo
codice della tabella con le descrizioni al campo "descr" (quello in cui
scrivo le scelte delle ListBox) della tabella principale... se lo faccio
nelle relazioni non mi consente di applicare l'integrità referenziale
(ovviamente perchè da una parte ho un campo di larghezza due e dall'altra
uno di larghezza 10) se provo a collegrle all'interno di una query, invece,
non mi estrae nulla perchè da una parte c'è scritto o 1 o 2 o 3 mentre
dall'altra c'è scritto "1; 3"    ....continua a mancarmi un qualche
passaggio fondamentale!
grazie ancora
Nadia



Allora anche se non lo visualizzi ci metti un controllo riferito alla
tabella dei selezionati in cui inserisci anche la descrizione.
se la acsella combianata è fomata da
id descrizione
1 pippo
tu nel controllo che visualizzi ci metti
me.tuocontrollo.column(0)
e in quello che non visualizzi ma c'è
me.controllonasconsto.column(1)
Alla fine mostri solo me.controllonascosto
MAssimiliano

Newsgroup: it.comp.appl.access
Titolo: Insert o Update dati tabella ...

Ho due tabelle: tab1 e tab2.
Dovrei aggiornare, da codice, la tab2 attingendo dalla tab1.
A seconda dell'esistenza o meno dei records nella tab2, devo fare un insert
oppure un update, confrontando il campo [id] esistente nella tab1.
Cioè :
se [id] esiste già nella tab2 faccio un update, altrimenti faccio un insert.
Riporto qualche riga di codice (da rivedere) che, sull'evento click di un 
pulsante,
mi fa degli insert, ma non non considera la chiave [xKey] e non mi fa 
nemmeno l'update:
Dim dbs As Database
Dim rst As Recordset
Dim rst2 As Recordset
Dim xKey As String
Dim sql As String
Set dbs = CurrentDb
Set rst = dbs.OpenRecordset("select * from tab1")
Set rst2 = dbs.OpenRecordset("select * from tab2")
With rst
        .MoveFirst
xKey = rst!id
   While Not .EOF
      If Not rst.BOF Then
        sql = "INSERT INTO Tab2(id2)values ('" & rst!id & "')"
        DoCmd.RunSQL sql
        Else
        sql = "UPDATE tab2 SET campoTab2 = '" & rst!campoTab1 & "' WHERE id2 
= '" & xKey & "'"
        DoCmd.RunSQL sql
      End If
       .MoveNext
    Wend
End With
rst2.Close
rst.Close
dbs.Close
Set rst = Nothing
Set rst2 = Nothing
Set dbs = Nothing
.... grazie per l'aiuto
Angelo


Prova così:
(ovviamente si suppone che a fronte di un record in tab1 ne possa
esistere al più uno in tab2 tale che tab2!id2=tab1!id
Dim dbs As Database
Dim rst As Recordset
Dim rst2 As Recordset
Dim sql As String
Set dbs = CurrentDb
set rst = dbs.OpenRecordset("tab1")
Set rst2 = dbs.OpenRecordset("tab2")
With rst
        .MoveFirst
   While Not .EOF
        rst2.findfirst "id2=" & !id
      If rst2.nomatch= true Then
        sql = "INSERT INTO Tab2(id2)values ('" & rst!id & "')"
        Else
        sql = "UPDATE tab2 SET campoTab2 = '" & rst!campoTab1 & "'
WHERE id2 = '" & !id & "'"
      End If
      DoCmd.RunSQL sql


Angelo ha scritto:

Non sò se ho capito, ma una cosa simile...?
UPDATE T2 
SET CampoT2=(SELECT CampoT1 FORM T1 WHERE ID=
T2.ID
)
@Alex


non so se ti possa essere d'aiuto.... ma un po' di tempo fa usavo una
funzione del genere che mi serviva adc aggiornare una tabella dai dati di
un'altra con un join tra le due tabelle....
dim dbs as database
dim rst1 as recordset
dim rst2 as recordest
dim mystring as string
set dbs = dbengine.workspace(0).Databases(0)
set rst1 = dbs.openrecordset("tabella1", dbopentable)
set rst2 = dbs.openrecordset("tabella2", dbopendynaset)
 ' la tabella1 è quella da aggiornare
rst1.movefirst
do while not rst1.eof
mystring ="[campocomune] = '" & rst1("campocomune") & "'"
rst2.findfirst mystring
    If not rst2.nomatch then
          rst1.edit
          rst1("campocomune") = rst2("campocomune")
          rst1.update
    end if
rst1.movenext
loop
rst1.close
rst2.close
set dbs =nothing
mi auguro di aver capito il problema....buon lavoro
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

Grazie a tutti ragazzi ... proverò le soluzioni
tutte interessanti ....
Ciao
Angelo
Newsgroup: it.comp.appl.access
Titolo: ottimizzazione MDB

Salve a tutti,
secondo voi si migliorano le prestazioni
su un MBD di 85 mb se sposto tutti
i report su un'altro MDB?
Ho fatto la prova e l'MDB senza report risulta 40MB
grazie!
ringo

 ha scritto nel
messaggio news:cdldkd$bm$1...@newsread.albacom.net...

ma che ci sono foto, logo o immagini in generale?
MAssimiliano

 ha scritto nel messaggio
news:eVqLc.3758$B06...@news.edisontel.com...

no ci sono solo query, maschere, tabelle e codice nei moduli...
ringo

ci sono tanti reports? 
--
'gnurant come una cucuzza
Inviato da 
www.mynewsgate.net

 ha scritto nel messaggio
news:200407211...@mynewsgate.net...

saranno circa 400

 i report su un'altro MDB?
A mio avviso no.
Le cause della lentezza della tua applicazione sono altre (a proposito: ha
settato per caso l'opzione "tieni traccia informaz. di correzione?).
Saluti.

 ha scritto nel messaggio
news:QHsLc.4481$1V3....@twister2.libero.it...

si č spuntato č meglio togliere la spunta?
grazie!

 ha scritto nel
messaggio
news:cdlla8$41j$1...@newsread.albacom.net...

Toglila
MAssimiliano

 si č spuntato č meglio togliere la spunta?
Decisamente: quella č una delle cause della lentezza (almeno con
l'applicazione in formato .mdb).
Pixel

 ha scritto nel messaggio news:cdldkd$bm$1...@newsread.albacom.net...

(altro suggerimento) Utilizzi tabelle temporanee? Se sě spostale su un altro mdb e le colleghi al primo...
Ciao.
-- 
Sergio MAZZA

 grazie!
400? uhm...sono i reports a influire sulle dimensioni di un db, se mi dici 
che ne hai 400 nel tuo front-end ne ho ancora la conferma...assorbono più 
del 60% dello spazio...
Ciauz

Newsgroup: it.comp.appl.access
Titolo: trovare dati con excel

Salve, l'oggetto del post fa schifo ma non ho trovato di meglio per
descrivere il mio problema.
Ho un foglio .xls composto da due fogli di lavoro.
Nel primo esiste una struttura simile a questa
Nome     -     Descrizione     -     Data    -     Ore
Rossi     -     Feriale     -     20080101     -     4
Rossi     -     Sabato     -     20080102    -     5
Rossi     -     Domenica     -     20080103     1
Verdi      -     Feriale     -     20080101     -     4
Verdi     -     Sabato     -     20080102    -     5
Verdi     -     Domenica     -     20080103     1
.......
Nel secondo esiste una struttura piu' complessa ma il succo del
problema e' questo
Nome   -     Tipo    -    20080101    -     20080102
Rossi    -    F    -     le ore se feriale   -     le ore se feriale
Rossi    -    S    -     le ore se sabato   -    le ore se sabato
Rossi    -    D    -     le ore se domenica    -     le ore se
domenica
Verdi    -    F    - .........................
Verdi    -    S    -
Verdi    -    D    -
Qualcuno vede una soluzione al mio problema??? :-D
Grazie
.yo.mo.

 ha scritto nel messaggio 
news:a4a0949e-497e-428f...@x41g2000hsb.googlegroups.com...

Difficile; almeno per me. Non vedo neanche che ti serve!
Magari se scrivi qualche dettaglio in più; ricordandoti che questo è un NG 
per Access non per Excel e se vuoi la soluzione la troverai con Access come 
soggetto attivo.
Altrimenti devi passare la domanda al NG: microsoft.public.it.office.excel.
Ciao.
-- 
Sergio MAZZA 

 Altrimenti devi passare la domanda al NG: microsoft.public.it.office.excel.
:-( mi son fumato il cervello...........
Newsgroup: it.comp.appl.access
Titolo: prtDevMode dell'oggetto Application

Sapete come accederci?
Nell'articolo 290293 della KB di Microsoft si legge che, dopo avere settato
quello che si vuole per l'oggetto Application.Printer ed avere impostato la
proprietą Printer di un report all'oggetto Application.Printer, il report
distrugge la sua struttura DEVMODE corrente e ne eredita una nuova
dall'oggetto Application.Printer.
Peccato che io non sono riuscito ad accedere alla proprietą
Application.prtDevMode: se provo a stamparne il valore dalla finestra
immediata ottengo un errore di compilazione. Devo dire che anche
l'IntelliSense avverte che quella proprietą non č disponibile.
-- 
Gabriele Bertolucci
PBsoft

 l'IntelliSense avverte che quella proprietà non è disponibile.
Non utilizzato molto l'oggetto Printer (se non per cambiare a Runtime i
margini, e funziona bene).
Ma non si capisce cosa vuoi ottenere.
Impostare una stampante specifica per quel report?
Ciao.

 Impostare una stampante specifica per quel report?
No, voglio impostare i settaggi della stampante Application.Printer come mi
pare, quindi assegnare alla proprietą Printer del report l'oggetto
Application.Printer.
Questo mi risolve il problema di stampare in un MDE impostando come mi pare,
di volta in volta, i settaggi della stampante, report per report, quando e
come vuole l'utente.
Inoltre, risolve anche il problema di salvare le impostazioni del report che
Access, notoriamente, spesso perde passando un applicativo da un computer ad
un altro.
-- 
Gabriele Bertolucci
PBsoft

 un altro.
Questo è un problema che non esiste.
Basta eliminare l'opzione di AutoCorrect o installare i Service Pack.
O all'avvio dell'applicazione settare dei margini minimi con
Application.SetOption.
Ciao.

 Application.SetOption.
Questo problema esiste e come. Il mio collega ha sviluppato un MDB per un
cliente, nel quale era previsto un report in formato A5. Tale formato è
stato impostato in sede di sviluppo (dove abbiamo tutti i Service Pack e le
patches necessarie). Quindi ha creato un pacchetto con il PDW ed è andato
dal cliente. Ha provato quindi la stampa dalla macchina del cliente e
risultava in A4.
p.s.: carino il ricorso alla SetOption. Non l'avevo ancora utilizzata. Si
impara sempre qualcosa dai newsgroup :-)

 risultava in A4.
Con Access 'XP (io distribuisco sempre .MDE) non ho riscontrato problemi.
Sarà solo questione di fortuna?  ;-)
Saluti.

> Cosa pensi della risposta di Carlo Costarella su microsoft.public. etc.?
Dai un'occhiata alla risposta che gli ho dato.
Abbiamo cercato di fare maggiore chiarezza sul problema.
Magari ti vengono in mente nuove idee.
p.s. senza polemica: cerchiamo tutti di limitare il quoting allo stretto
necessario :-)
-- 
Gabriele Bertolucci
PBsoft 
www.pbsoft.it

 necessario :-)
Perchč ti ho tagliato?  ;-)
Scusa, non volevo offenderti.
Ciao.

 Scusa, non volevo offenderti.
Tutt'altro: ho focalizzato l'attenzione sul quoting proprio perché avevi
tagliato poco :-)
Nessuna offesa, figurati. Mi piacciono tutte le critiche costruttive.

Newsgroup: it.comp.appl.access
Titolo: Report: piè di pagina gruppo va a pagina successiva

 
          Ciao a tutti.
In un report ho messo un pič di pagina (a proposito, bisognerebbe scrivere
pie' con l'apostrofo, ma se becco chi traduce Office...) ad un gruppo, e
dentro ho messo una casella con il conteggio dei record.
Tutto bene, tranne il fatto che alle volte questo totale mi capita a nuova
pagina, mentre l'ultimo record del gruppo era nella pagina precedente.
Le ho provate tutte (tranne la soluzione, pare...), ma niente. Ho guardato
un bel po' in giro senza esito, ma mi viene il sospetto che si debba
calcolare il numero di righe per pagina. Č cosě?
Grazie a chiunque.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Grazie a chiunque.
Hai provato ad impostare a Si la proprietà Stampa sezione unita (vedi help)
di quella sezione di report?
-- 
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


Sě. Ho provato mettendo a "sě" l'intestazione gruppo, il pič di pagina e
anche il corpo che c'č in mezzo.
Stamattina ho fatto altre prove: mettendo a "no" sia il corpo che il pič di
pagina gruppo, uno dei totali mi stava alla pagina precedente, insieme alle
righe del corpo, anziché andare alla pagina dopo; il valore
dell'intestazione gruppo sembrava irrilevante.
Mettendo a "sě" uno dei due suddetti, o entrambi, il totale andava alla
pagina successiva.
Questo era esattamente il contrario di quanto prevedevo... finché non ho
scoperto che con tutti "sě" sulla prima pagina mi metteva una riga piů ma
non c'entra niente, infatti in quel gruppo c'erano altre righe sulla pagina
successiva, in entrambi i casi!
Questo nel mio db di prova, con tabelle in locale. Prendendo i dati "veri",
con tabelle in rete, giŕ a pagina due ho un totale dei dati che si trovano a
pagina uno. Lě ho provato le varie combinazioni di "sě" e "no" ma non mi č
cambiato niente.
Perplesso e turbato...
Ciao
Riccardo


Newsgroup: it.comp.appl.access
Titolo: Query con campo calcolato

Salve a tutti
ho una query di selezione che estrappola due tipi di dati: N(numerici) e
A(alfabetici).
Siccome questi dati in seguito vanno esportati vorrei sapere come si possano
riempire i campi N con degli 0 prima del valore che ottengo dalla selezione.
Mi spiego meglio: supponiamo che ho un campo della query che ottiene (dalla
selezione)il valore 100 , questo campo pero' dovra' avere come lunghezza
campo 5 , e dovra' anteporre al valore 100 due 0.
Premetto che non posso agire sulle tabelle, ma dovro' fare tutto da questa
query.
Ciao a tutto il NG
------Access to Success------

 ha scritto nel messaggio
news:8vej68$u18$1...@lacerta.tiscalinet.it...

Puoi provare con un nuovo campo calcolato con la funzione:
format(nomeCampoNumerico,"00000")
Ciao.


Puoi agire sulla query ?
Se il campo dei valori ha nome Num puoi aggiungere un secondo campo   Num2:
Format([Num];"00000")
giuseppe
Newsgroup: it.comp.appl.access
Titolo: Aiuto

Salve a tutti.
vorrei sapere qual'č la proprietą che permette di rilevare lo stato di
recordset es.  se si trova uno stato di edit o
in stato di lettura,  mi serve disattivare lo stato di editazione di un
record per aggiornarlo da un altra maschera se no si verifica un errore di
conflitto.
grazie a tutti
Sigest

 Sigest
Che ti importa?
Se vuoi che la modifica sia salvata lancia il comando per salvare il record
corrente (lo vedi se ti fai l'autocomposizione salva record qual è) se vuoi
annullare fai un sendkeys di ESC
Antonio

Newsgroup: it.comp.appl.access
Titolo: Allegare file

Ciao a tutti,
vorrei sapere se è possibile allegare dei file di varia natura (es.
menti word) ad un database.
Grazie
Ciao
Fabrizio


Che vuoi fare???
Facci capire e sii ricco di particolari
MAssimiliano

 MAssimiliano
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

MAssimiliano
Vorrei allegare ad un particolare ID un file es. un curriculum in
formato doc, e volevo sapere se è possibile farlo.
Grazie


Sì, se cerchi nei post precedenti è stato + volte dibattuto comunque può
essere risolto con il collegamento ipertestuale. Ti sarà comodo prevedere un
campo per il percorso del file.
Ora devo scappare, domani ti dò una mano
MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it


Grazie.
Si può inserire il file all'interno del database. Immagino che le
dimensioni del db in questo caso aumenterebbero a dismisura ma mi
servirebbe una soluzione del genere.
Ciao
Fabrizio


 Ciao
Non inglobare nulla all'interno, semplicemente creati un campoo nella
tabella che raccolga il percoso,
poi al tuo click generi tuocontrollo.Hyperlinkaddress =
ilvaloredeltuocontrollo
lui trova il file e lo apre con l'appliactivo di default: word per i doc
excel x .xls etc.
MAssimiliano

MAssimiliano
Ok pacifico.
Hai qualche esempio da farmi vedere.
Grazie 

 Grazie
Questa la uso cleiccando un'immagine di cui ho richiamato il percorso in
precedenza
Private Sub Immagine69_Click()
If Dir("z:\" & Forms!acquisto_qry!forma & ".jpg") = "" Then
Else
    Me.Immagine69.HyperlinkAddress = "z:\" & Forms!acquisto_qry!forma &
".jpg"
End If
End Sub
Lui vede qual'è il programma fdi default per jpg e mi apre la foto se esiste
MAssimiliano

Newsgroup: it.comp.appl.access
Titolo: Installazione Access 97 su Windows XP in cinese

Ciao,
è mai capitato a qualcuno di installare Office 97 Italiano su Windows XP in
cinese ?
L'installazione parte, viene chiesto in quale cartella installare Office 97
e dopo di che esce dall'installazione !!!
Ho installato Office 97 Italiano su Windows XP Italiano e non ho avuto
problemi.
Grazie
Pasquale


O97 su w2000 pro senza problemi
ciao MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it
Newsgroup: it.comp.appl.access
Titolo: notizie su file .CB1

salve a tutti
sto cercando  qualcuno che mi sappia dire con che programma
posso leggere questo file reldat.CB1 questo file contiene i dati di una
biblioteca
immessi con molta fatica circa 6 anni fa
da un programma di gestione biblioteche (C.T.O) che girava in DOS
come posso fare a recuperare questo database e metterlo in un programma
che giri su windows
grazie a tutti
Mary

 ha scritto nel messaggio
news:AaF56.254774$hk4.12...@news.infostrada.it...

Non ho idea di quale possa essere il formato utilizzato, e non mi risulta
che sia uno dei formati standard (altri forse potranno darti maggiori
informazioni).
Quello che puoi tentare č di aprirlo con un editor x vedere se ha una
struttura comprensibile, oppure puoi provare a darlo in pasto ad Excel, che,
nel capire il formato dei dati, č anche + bravo di Access.
--
Silvio
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access

Prova questo indirizzo:
www.wotsit.org
Vincenzo Turturro
---------------------------------------------------------
Se no diventiamo tutti **** dai portatili o peggio ancora 
provetti poeti fiorentini come vturturro.
(Cosě disse Ivan Lelli Ven 25 Aug 2000 09:34:52 +0200)
---------------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: Salvare una tabella.

Ho creato la maschera per una tabella fatture e una sottomaschera per le
righe della fattura.
Ora vorrei fare in modo che il salvataggio dei dati sia nella maschera
principale che nella sottomaschera avvenisse solo quando clicco sul bottone
salva appositamente creato, è possibile ????
GRAZIE GRAZIE


Non puoi non salvare un set di record.
Due sono le strade: o ti crei una tabella temporanea e poi la riversi o ci
lavori e nel caso li elimini
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it
Newsgroup: it.comp.appl.access
Titolo: compattazione db alla chiusura BE e FE

ho messo in opzioni di access "Compatta alla chiusura" sia nel BE che nel FE
 
secondo voi pu� andare bene? pu� creare problemi? perdita di dati o altre 
anomalie la compattazione
ad ogni chiusura del db?
 
un altro dubbio avviando sempre il FE il BE quando viene compattato? quando 
chiudo l'FE??
 
grazie. 
 

 chiudo l'FE??
Il BE viene compattato... quando lo decidi tu, nessun automatismo!
Fallo periodicamente, come detto sopra, ovvero quando a seguito di 
eliminazioni di record vuoi conservare ininterrotta la sequenzialitï¿œ 
dell'Autonumber in tabella.
 
Bruno
 
 

"Bruno Campanini"  ha scritto nel messaggio 
news:517e95aa$0$1369$4faf...@reader2.news.tin.it...

Grazie, ma non userï¿œ io direttamente il db come dico all'utilizzatore finale 
di aprire un BE con password e comprimerlo periodicamente?
 
posso fare un comando da un db esterno con un pulsante? sai l'istruzione?
 
grazie.
 

 grazie.
 
Vedi:
http://accessgroup.it/howto/traduzioni-ms-access-2000.html
 
 
Cap 8 - Manutenzione del database
 
--
sv
 
 
-- 
 
 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
 
 
 

 posso fare un comando da un db esterno con un pulsante? sai l'istruzione?
 
========================================
Public Sub CompactDB()
Dim FilePath As String, FileName As String, ExternalPassword As String
 
FilePath = InputBox("External Database Path", "Compact External 
Database", "D:\Access\Orario\")
If FilePath = "" Then Exit Sub
FileName = InputBox("Filename", "Compact External Database", 
"Orario_T.mdb")
If FileName = "" Then Exit Sub
ExternalPassword = InputBox("External Database Password", "Compact 
External Database", "")
ChDir FilePath
 
If ExternalPassword = "" Then
    DBEngine.CompactDatabase FileName, "New_" & FileName
Else
    DBEngine.CompactDatabase FileName, "New_" & FileName, , , ";PWD=" & 
ExternalPassword
End If
    FileCopy "New_" & FileName, FileName
    Kill "New_" & FileName
    If ShowMessage Then
        MsgBox FilePath & FileName & vbCrLf & "Compattato (" & 
FileLen(FileName) / 1024 & " Kb)"
    End If
 
' ===================================================================
CompactDB_Exit:
    DoCmd.Hourglass False
    Exit Sub
 
CompactDB_Err:
    If Err.Number = 70 Then
        MsgBox "Procedura CompactDB" & vbCrLf & Err.Number & " - 
Chiudere Access, riaprire l'Applicazione ed eseguire la procedura di 
Compattazione prima di ogni altra."
    Else
        MsgBox "Procedura CompactDB" & vbCrLf & Err.Number & " - " & 
Err.Description
    End If
    Resume CompactDB_Exit
 
End Sub
====================================================
 
Bruno
 
 

Bruno Campanini was thinking very hard :

Correggo:
Public Sub CompactDB(Optional ShowMessage As Boolean = True)
...
 
Bruno
Newsgroup: it.comp.appl.access
Titolo: Developer kit, chiarimenti

Salve a tutto il N.G.!
Avrei bisogno di ulteriori chiarimenti (ho letto molti post sul sito comune)
sulle funzionalità del Developer kit.
La Microsoft mi ha risposto che il Developer kit per Access 2000 è stato
ritirato dal mercato e mi ha indirizato a quello per Office XP (ovviamente
non mi ha indicato il prezzo........se qualcuno di voi lo sa mi fa un
piacere!! :-)).
Siccome la applicazione da me realizzata con A2000 gira sotto Windows 98
(anche il mio cliente ha Win 98) vorrei sapere se ci sono problemi di
compatibilità fra le versioni, oppure se la soluzione Developer kit XP mi
garantisce un'ampia portabilità.
Inoltre volevo chiedere: basta installare il runtime al cliente per far
girare la mia applicazione, o questo deve acquistare un pacchetto Office?
...mi scuso per l'argomento trattato già altre volte, ma essendo un neofita,
non mi sono trovato mai, prima di oggi, dinanzi ad una problematica relativa
alla distribuzione di software proprio
Ringrazio anticipatamente!!!!

 Ringrazio anticipatamente!!!!
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 > Ringrazio anticipatamente!!!!
Ciao
AleX
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Basta il RunTime, cke più economicamente lo puoi trovare gratuito.
devo contraddirti.....
civilmente non può usare il runtime se tu non lo fornisci unitamente
al programma medesimo e lo può usare solo per quello
Saluti.
Emanuele.

 avuto qke problema di eseguibilità
Attenzione,
per chiarezza, il runtime non e' gratuito in quanto fornito con la
versione developer.
Puo' essere distribuito solo unitamente all'applicativo da installare
e, naturalmente, chi lo distribuisce deve essere in possesso della
licenza Office Developer.
-- 
Federico
----------------------------------
Rimuovi paperino. per e-mail
----------------------------------
Tutte le richieste che arrivano
in privato, vengono cestinate.
----------------------------------
Sito Comune di it.comp.appl.access
http://www.sitocomune.com
mailto:
webm...@sitocomune.com
----------------------------------

Newsgroup: it.comp.appl.access
Titolo: Leggere il contenuto di una pagina web

Via codice VBA � possibile inserire in una casella di testo il contenuto di 
una pagina web, in pratica, automatizzare il Visualizza > HTML dalla 
finestra di Internet Explorer?
-- 
Ciao, Sandrobi

 finestra di Internet Explorer?
Sineeeee.... detta e ridetta 10 volte sta cosa :D
guarda il mio demo su accessgroup "Recuperare dati da server remoto"... ;)
Tienici aggiornati. 

 
Volendo si puo' fare anche ad un livello piu' basso utilizzando la 
wininet.dll.
Quando ho avuto questa esigenza mi sono modificato questo esempio in VB
http://www.freevbcode.com/ShowCode.Asp?ID=1252
Mentre tutte i dettagli sulla dll  sono qui
http://msdn.microsoft.com/en-us/library/aa385483(VS.85).aspx
Imperius
Newsgroup: it.comp.appl.access
Titolo: visualizzazione elementi in Report

Ciao, come posso visualizzare in un report solo i primi n record della query 
associata?
C'è un modo per compilare un report attraverso VBA piuttosto che caricando i 
dati da una query esistente?
Grazie 

 dati da una query esistente?
Probabilmente si potrebbe partire da un report totalmente disconnesso, ma 
a seconda della complessità del report e della quantità dei controlli in 
esso contenuti potrebbe essere una "strage di codice".
Ergo: te lo sconsiglio.
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it

Grazie.. ricordavo l'istruzione sql TOP, ma speravo ci fosse qualcosa di 
insito in access che potesse aiutarmi in modo più dinamico.
Ciao
"Gabriele Bertolucci" <in...@REMOVEpbsoft.it> ha scritto nel messaggio 
news:875ea355b4a48...@news.virgilio.it...


 news:875ea355b4a48...@news.virgilio.it...
Esiste qualcos'altro, ma si tratta di una caratteristica sfruttabile con 
maschere contenute in un progetto ADP di Access.


 maschere contenute in un progetto ADP di Access.
Io vorrei avere i primi n elementi per ciascun gruppo; con TOP prendo i 
primi n elementi di tutta la query (e quindi di uno solo dei gruppi).
Il report mi deve riportare l'intestazione del gruppo  e poi i primi n 
elementi di quel gruppo, fino a che non finiscono i gruppi (non definibili a 
priori).
Parametrizzando la query posso isolare il gruppo, ma come lo passo al 
report?
Pensavo di creare una query che contenga solo i gruppi da caricare nel 
report.. collegato a questo un sottoreport che usa la query parametrizzata 
di cui sopra isolando il gruppo e pescando i primi 3..
E' una pensata decente o c'č di meglio?!?
Grazie.

 priori).
Ho ricreato la tua situazione con due tabelle (tblAnagrafica e tblRecapiti) 
e mi pare che con due query sia fattibile.
Ecco la sotto-query che filtra tutti i nominativi che hanno almeno 3 recapiti 
(supponi di chiamarla qryAnagraficheScelte):
SELECT
  tblRecapiti.IDAnagrafica,
  tblAnagrafica.Nome,
  tblAnagrafica.Cognome
FROM
  tblAnagrafica
  INNER JOIN
    tblRecapiti
  ON tblAnagrafica.IDAnagrafica = tblRecapiti.IDAnagrafica
GROUP BY
  tblRecapiti.IDAnagrafica,
  tblAnagrafica.Nome,
  tblAnagrafica.Cognome
HAVING
  (Count(tblRecapiti.IDRecapito)>3))
Ecco la query che mi fa vedere tutti i recapiti di ogni nominativo restituito 
dalla sotto-query:
SELECT
  qryAnagraficheScelte.IDAnagrafica,
  qryAnagraficheScelte.Cognome,
  qryAnagraficheScelte.Nome,
  tblRecapiti.Numero
FROM
  tblRecapiti
  INNER JOIN
    qryAnagraficheScelte
  ON tblRecapiti.IDAnagrafica = qryAnagraficheScelte.IDAnagrafica
GROUP BY
  qryAnagraficheScelte.IDAnagrafica,
  qryAnagraficheScelte.Cognome,
  qryAnagraficheScelte.Nome,
  tblRecapiti.Numero
ORDER BY
  qryAnagraficheScelte.Cognome,
  qryAnagraficheScelte.Nome,
  tblRecapiti.Numero


Grazie :o)
Newsgroup: it.comp.appl.access
Titolo: Replica DB

Ciao a tutti.
Ho un'applicazione non access che popola un DB access.
Il cliente ora vorrebbe aumentare la sicurezza dei dati aggiungendo una
workstation collegata in rete dove tenere una copia del DB principale
aggiornata in tempo reale.
Questo mi sembra un caso di replica del DB, ma come si fa a definire
l'operazione di replica, dato che nelle due workstation non c'é Access
installato?
Ho letto l'help di Access per ciò che concerne la replica dei DB ma non
ho concluso nulla.
Qualcuno ha esperienze del genere?
Grazie.
G.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 G.
Pianifica la copia dell'mdb, inserendo l'azione nelle "operazioni 
pianificate" di windows.
Trovi un esempio di backup su 
www.sitocomune.com
 Sezione General...
Ciao.
-- 
Sergio MAZZA 

 wrote in message
news:eh4ggl$4ol$
1...@area.cu.mi.it

Grazie del suggerimento.
Speravo che ci fosse un modo "nativo" per avere una sorta di
"replicazione"
ad ogni nuovo dato scritto nel DB (transazione) su una replica in rete,
ma
"in cuor mio" temevo che fosse questa l'alternativa!
Non é l'ideale perchè il DB sará in torno ai 120MBytes e la replica
dovrà
avvenire 1 o 2 volte al minuto.
Comunque sono andato al sito comune ma non ho trovato niente su backup
alla
sezione General. Con la funzione cerca qualcosa ho trovato, ma
essenzialmente
da eseguire da front-end access, che non é il mio caso (solo il back-end
é
access).
Ad ogni modo ti ringrazio ancora per la tua risposta.


 G.
Ti ho suggerito la copia del file perché non avendo access nell'altro pc (se 
non ho capito male) non avresti potuto comunque leggere l'archivio...
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: Problema con dichiarazione Kernel32

Salve a tuttti,
in un file access con funzioni vba avevo questa dichiarazione:
 
Public Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
 
Adesso ho dovuto formattare il disco e quando ho fatto ripartire
il programma mi da errore di compilazione su queasta riga.
 
Ma non riesco a capire cosa gli manca rispetto a prima.
Sapete darmi una dritta ?
 
Grazie

Winston Smith ci ha detto :

Ah, ho installato Office ultima versione

Winston Smith ci ha detto :

Problema risolto ..spero.
Non mi ero accorto che in fase di installazione, Office di default
installa la versione a 64 bit.
Al momento ho risolto il problema aggiungendo PtrSafe
Public Declare PtrSafe  Sub Sleep Lib "kernel32" (ByVal dwMilliseconds 
As Long)
 
e sembra funzionare.

Newsgroup: it.comp.appl.access
Titolo: filtrare dei record con date

Between forms!frmricerca!datainiziale And forms!frmricerca!datafinale
il criterio immesso nella query funziona se le due text box non sono null e
se lascio le due text box vuote come faccio a visualizzare tutti i record?
qualè la giusta sintassi
sempre graie per l'aiuto
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 sempre graie per l'aiuto
www.donkarl.com/it?FAQ3.14
oppure sul sito comune: query parametriche
Daniele

Newsgroup: it.comp.appl.access
Titolo: VBA97: usare array

Salve  a tutti,
ho bisogno di utilizzare un'array per memorizzarmi degli elenchi di valori
ma esiste il modo di dichiarare l'array utilizzando una variabile?
dim array(variabile) as variant
... così mi dà errore...
se invece dichiaro
dim array(3) as variant
lo accetta.... però io non conosco a priori la dimensione dell'array....è
variabile
come posso ovviare a ciò?
grazie
ringo

 ha scritto nel messaggio
news:b2861b$3jq$1...@newsread.albacom.net...

Leggi Redim sulla guida.
Ciao, Carlo

 ha scritto nel
messaggio news:R7N1a.160149$0v.44...@news1.tin.it...

grazie!
Newsgroup: it.comp.appl.access
Titolo: Pagine di accesso dati con query parametrica

Ciao a tutti,
vorrei realizzare una pagina in cui specificare un parametro da utilizzare 
come criterio per una query.
Ovviamente non voglio specificare il parametro all'apertura della pagina,
ma poterlo cambiare NELLA pagina (magari con un pulsante di refresh per 
aggiornare i dati della query).
è possibile farlo? in che modo?
Grazie mille in anticipo per le eventuali risposte...
Saluti,
-= Hosso =- 


Non ho molta esperienza con le query con parametri, ma provo lo stesso a 
darti una soluzione.
Io avevo creato una query di selezione e per uno dei campi avevo scritto 
"[P01-DATA]" (senza virgolette) nei criteri di uno dei campi.
Come codice avevo scritto questo in un modulo:
Global dbs As Database
Global tdfs As TableDefs
Global qdfs As QueryDefs
Global tdf1 As TableDef, tdf2 As TableDef, tdf3 As TableDef
Global qdf1 As QueryDef, qdf2 As QueryDef, qdf3 As QueryDef, qdf4 As 
QueryDef, qdf5 As QueryDef
Global rst1 As Recordset, rst2 As Recordset, rst3 As Recordset, rst4 As 
Recordset, rst5 As Recordset
Global param1 As Parameter, param2 As Parameter, param3 As Parameter
    Set dbs = CurrentDb
    Set qdfs = dbs.QueryDefs
    Set qdf2 = qdfs("Q mia query CON PARAMETRO")
    Set param1 = qdf2.Parameters![P01-DATA]
    param1.Value = ilparametrocheintendevoapplicare
    Set rst2 = qdf2.OpenRecordset(dbOpenDynaset)
A questo punto rst2 era il recordset dei records che mi interessava avere.
Se invece volevo adattare una query per essere "modificata" prima del suo 
utilizzo, nei criteri del campo avevo scritto "=[Forms]![Maschera Parametri 
caricata ma non visualizzata]![Param01]"
La maschera di cui sopra veniva caricata all'avvio dell'applicativo e 
lasciata lě, a lavorare dietro le quinte.
Prima di aprire la maschera che aveva come origine dati la query detta, 
facevo la seguente assegnazione:
    Forms![Maschera Parametri caricata ma non visualizzata].Param01 = 
Me.Datachemiinteressava
A questo punto, quando veniva aperta la maschera, trovavo il set di records 
che mi interessava analizzare.
Ciao
Antonio

 ha scritto nel messaggio 
news:45e71e97$0$20807$5fc...@news.tiscali.it...

Forse qui trovi informazioni su come modificarle/adattarle:
http://msdn2.microsoft.com/en-us/library/aa139964(office.10).aspx
Ciao.
-- 
Sergio MAZZA 


Ti ringrazio molto per le dritte,
in realtà nel criterio ho una semplice istruzione "like <stringa>" dove 
stringa è il parametro che modifico.
ma hai idea del perché nelle pagine di accesso ai dati non vengono 
visualizzati i campi allorché la stringa contiene "*"???
Con le maschere funziona, con le pagine no!
Saluti,
-= Hosso =- 

 ha scritto nel messaggio 
news:45ea9430$0$7753$5fc...@news.tiscali.it...

Mi spiace, non ho nessuna esperienza con le pagine di accesso.
Ciao
Antonio
Newsgroup: it.comp.appl.access
Titolo: Errore nelle maschere

Salve a tutti
In una sottomaschera che utilizzo per inserire dati relativi a letture di
contatori per più clienti (il cui nominativo seleziono dalla maschera
principale), ci sono delle caselle di testo che visualizzano i dati relativi
alla lettura precedente. Per ottenere ciò ho impostato il valore predefinito
delle stesse al controllo di un'altra sottomaschera avente come origine dati
una query che mi seleziona appunto gli ultimi dati inseriti per quel
cliente. Come posso evitare che quando scelgo un cliente per il quale non ci
sono dati inseriti il valore predefinito non mi dia "#Errore"?
Giancarlo

"Gianco" <glecce...@QUESTOlibero.it> ha scritto nel messaggio
news:ELBJ9.3794$ab2.1...@news1.tin.it...

Prova a mettere qualcosa tipo
iif(iserror([controlloaltramaschera];"";[controlloaltramaschera])
Antonio
Newsgroup: it.comp.appl.access
Titolo: Aggiornare campi

Salve,
ho una maschera e una sottomaschera correlata da un campo per filtrare
solo i movimenti relazionati.
La sottomaschera è in visualizzazione foglio dati, quindi, dopo il
filtro, visualizzo ad esempio 20 movimenti.
Le colonne sono:
CODICE	CATEG		QTA		PREZZO		IVA
TOTALE
----------		---------		-------		-----
-----		--------
----------		---------		-------		-----
-----		--------
----------		---------		-------		-----
-----		--------
----------		---------		-------		-----
-----		--------
----------		---------		-------		-----
-----		--------
		CAMPO1
Ho esigenza, dopo che la sottomaschera mi ha restituito i valori di
inserire un valore in CAMPO1 e, dopo la pressione di un tasto,
modificare TUTTI i campi Categ dei record filtrati nella
sottomaschera.
Come faccio?
Grazie

 sottomaschera.
Private Sub Agg_Rec_Lavoro_Click()
    'Porto il focus sulla sottomaschera
    Forms!Anagrafe_Dip![Sottomaschera Dip_Az_Lavoro].SetFocus
    'Immetto i dati nella sottomaschera
    Forms!Anagrafe_Dip.[Sottomaschera Dip_Az_Lavoro]!Nominativo =
Forms!Anagrafe_Dip!Id_Dip
    Forms!Anagrafe_Dip.[Sottomaschera Dip_Az_Lavoro]!Azienda =
Forms!Anagrafe_Dip!scelta
    'Salvo il record immesso
    DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
    'aggiorno la maschera
    Forms!Anagrafe_Dip.[Sottomaschera Dip_Az_Lavoro].Requery
    'visualizzo l'ultimo record
    DoCmd.GoToRecord , , acLast
    'Riporto il focus sulla maschera principale
    Forms!Anagrafe_Dip.SetFocus
    Forms!Anagrafe_Dip!Scelta.SetFocus
    'Cancello i record temporanei
    Id_Dip_Az_Lavoro_temp = ""
    Scelta = ""
End Sub
E' una vecchia routine utilizzata tempo fà ma credo possa servirti
Fammi sapere se funge
Ciao
Alex Caponetto
Newsgroup: it.comp.appl.access
Titolo: urgente : Controllo su CASELLA COMBINATA

Voi che sapete avrei la necessità :
Se io faccio in una maschera :
       ......
        Me!Automezzo_NUM_1 = TabellaN!CDAUTOME_M
        Automezzo_NUM_1.SetFocus
questo mi inserische il numero TabellaN!CDAUTOME_M nella casella combinata
Me!Automezzo_NUM_1
e poi mi sposta il Focus nella casella.
Avrei la necessità che si aprisse la tendina in automatico della casella
combinata visualizzando la riga.
E' possibile???
come posso fare
ciao
e infinite grazie
ciao
luca
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 ha scritto nel messaggio 
news:81Z114Z227Z244Y...@usenet.libero.it...

Forse se aggiungi un'istruzione sendkeys "{DOWN}" dopo il setfocus potrebbe 
funzionare: io ora non ho la possibilità di provare.
Ciao
Antonio

 luca
Dall'Help:
Sub Dropdown()
    Membro di Access.ComboBox
Es:
Me!cboNomeCombo.Dropdown
Abitualmente se ti serve che ogni volta che la Combo prende il focus
si apra conviene
scrivere il DropDown solo una volta su evento GotFocus:
Private Sub cboNomeCombo_GotFocus()
    Me!cboNomeCombo.Dropdown
End Sub
@Alex

On 17 Feb, 11:50, 
lucadepiz...@libero.it
 (luca) wrote:

Qui' trovi la soluzione al problema:
http://www.donkarl.com/it/?FAQ4.29
    alla FAQ 4.14
o perlomeno ad aprire la casella combinata. Per posizionarsi
sull'ultimo valore immesso non saprei cosa consigliarti, magari
qualcuno più ferrato di me saprà farlo.
Ciao
Newsgroup: it.comp.appl.access
Titolo: Qual'è la soluzione?

In una maschera ho inserito diverse caselle di testo e una casella
combinata agganciata ad una tabella articoli. Quando seleziono
l'articolo dalla casella combinata, con l'evento
'DopoAggiornamento'collegato alla stessa  "trasferisco" il valore in una
casella di testo libera. Ecco, a questo punto con la prossima selezione
come faccio a trasferire l'articolo scelto in una casella di testo
libera? Si deve usare una struttura iterativa 'Do While.... Loop' che
assegna il focus ad una casella quando la sua proprietà text=""? Se si
mi potreste aiutare con qualche esempio? . La mia soluzione è quella più
giusta? Oppure invece di inserire molte caselle di testo è più pratico
inserire una casella di riepilogo? Da ricordare che poi dovrò in piè di
pagina inserire una casella di testo che riporterà la somma di tutti gli
articoli selezionati.
GRAZIE..
                   CIAO
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG



Io lascerei la casella di testo somma soltanto!!

 wrote in message
139849ebe24a499b46...@mygate.mailgate.org...

Mi sembra di capire che tu voglia selezionare un certo numero di articoli
stile scarico magazzino no?
Allora, non è corretta la tua soluzione di usar euna maschera con una serie
di caselle di testo libere dove mettere il successivo articolo scelto, a
meno che non ci sia un limite al numero di articoli scelti.
In questi casi una soluzione è quella di usare una struttura maschera
sottomaschera e una tabella d'appoggio. Quando selezioni un articolo lo
sbatti in qualche modo nella tabella d'appoggio su cui si appoggia la
sottomaschera. Alla fine sbatterai il contenuto della tab d'appoggio nella
tab delle transizioni o comunque farai quello che devi sulla tab d'appoggio
e poi la svuoterai...
Antonio

 wrote:

puoi usare una variabile public o static per tenere traccia di dove
sei arrivato ad inserire i valori...
Saluti.
Emanuele.

 Antonio
La soluzione per dare il focus ad una casella di testo libera l'ho
trovata:
Public sub trovavuoto (nomemaschera as String)
 Dim ctl as control
   For Each ctl in forms (nomemaschera)
      If TypeOf Is TextBox Then
         ctl.SetFocus
           If ctl.Text="" Then
           Exit For
           End If
      End If
    Next ctl
End Sub
Pero vaglierò attentamente la tua proposta, ti ringrazio per il 
consiglio.
