mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: ADP + Report su SP + formattazione multipla + intestazioni dei raggruppamenti

In un ADP ho un report basato su una stored procedure parametrica.
Ho notato che, all'apertura del report, questo viene formattato 7 volte.
Allora ho cominciato ad indagare.
Il report non contiene alcuna riga di codice, quindi il VBA è stato scartato 
dall'elenco dei sospettati.
Ho avviato il SQL Profiler e, con mio stupore, ho notato che la SP viene 
richiamata ed eseguita una sola volta.
Allora ho controllato il report ed ho visto che sono definiti due livelli 
di raggruppamento, che, tra l'altro, mi permettono di avere due sezioni (intestazioni/pié) 
nelle quali andare ad inserire dei controlli.
Ho provato a togliere questi raggruppamenti e, in effetti, il problema sembra 
scomparire: il report viene formattato solo una volta.
Allora ho pensato di spostare gli ordinamenti all'interno della stored procedure, 
ottenendo anche un discreto miglioramento prestazionale.
Purtroppo, come avrete già intuito, a questo punto non ho più le sezioni 
(intestazioni/pié) che poche righe sopra mi piacevano da impazzire.
A questo punto non so più come formattare il report in modo da ottenerelo 
stesso risultato, senza però ricorrere ai raggruppamenti.
Avete qualche suggerimento?
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution

[omissis]
Nessuno ha un consiglio?


scomparire: il report viene formattato solo una volta.
ma non č un problema, č un comportamento by design.
[CUT]
:-)
-- 
Giorgio Rancati
[Office Access MVP]

 Nessuno ha un consiglio?
Rimettere le sezioni al loro posto:  cali di performances rilevabili, in
conseguenza di riformattazioni, si notano su Reports con un'infinità di
pagine.
Saluti.

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

Dovrei creare un report che stampi una serie di etichette su un foglio
A4.C'č un metodo preimpostato in Office o bisogna crearselo appositamente ?
Se devo crearmelo come posso fare?
Devo far si che il report venga stampato in un intervallo di date. ( Per ES.
Da ieri a oggi ). Nella maschera principale salvo giŕ la data di inserimento
dei dati per ogni singolo record.Come posso creare la maschera di richiesta
intervallo date ?
Forse sono domande un pň onerose o stupide.
Grazie comunque del possibile aiuto.
Ciao Francesco
P.S.: Spero di essere stato chiaro?


Saluti.
Emanuele.

 >Forse sono domande un pň onerose o stupide.

Newsgroup: it.comp.appl.access
Titolo: Cambio ordinamento in report

Dal bottone di una Form faccio partire la stampa di  un report. A seconda
della condizione scelta nella form (ordinamento x codice o ord. x titolo)
voglio che il report (lo stesso report) sia ordinato come scelto.
Purtroppo ho provato in vari modi ma esso stampa sempre nell'ordinamento
predefinito nel report. La soluzione che ho trovato è di fare una copia del
report con l'altro ordinamento, ma poi come manutenzione è un casino!
Qualcuno ha un suggerimento??
bye
--
*****************************
** Harry Evans - Bolzano
** Clipper Specialist & Magician
** Access Student
** e-mail:  
harry...@tin.it
*****************************
---------------------------------------------------------
->C.N.G.E.I. - Sezione di Bolzano
->
www.edp-progetti.it/cngei.bz
---------------------------------------------------------

 wrote in message 87minr$gnu$1...@nslave1.tin.it...



I report non utilizzano l'ordinamento della query ma quello impostato nello
stesso report (menu Visualizza - Ordinamento e Raggruppamento...).
Per risolvere il tuo problema dovresti procedere nel seguente modo:
crea nella query il seguente campo calcolato:
CampoOrdinamento: choose([parametro];[Codice];[Titolo])
Nel caso in cui il [parametro] vale 1 verrà scelto il campo [Codice], se
vale 2 il campo [Titolo], etc.
Nel report Menu Visualizza - Ordinamento e Raggruppamento... inserisci il
campo  CampoOrdinamento  e scegli il tipo di ordinamento (crescente /
decrescente).
 Saluti.
AlexFreeNet  :-)

 stesso report (menu Visualizza - Ordinamento e Raggruppamento...).
e' fantastico! da giorni ero bloccato su questo problema... non osavo
scrivere sul NG per non farmi cazziare data l'EVIDENTE assurdità della
cosa... e qui mi trovo spiattellata in due righe la soluzione! l'unica cosa
positiva e' che ora so l'help a memoria... sono queste le carognate di
Access che ti stroncano... non bisogna ragionare tanto
grazie da barbi

Newsgroup: it.comp.appl.access
Titolo: RichTextBox di VB in Access???

E' possibile utilizzare la RichTextBox di Visual Basic dentro Access97?
In che modo? Qualcuno saprebbe farmi un esempio?
Grazie anticipatamente a chi mi rispondera'...
Marco

Ciao,
teoricamente e' possibile utilizzare qualsiasi controllo OCX dentro un form
di Access basta cercarlo nella lista dei controlli aggiuntivi (Bottone con
Martello, Chiave e ... sulla casella degli strumenti) e piazzarlo sulla
Maschera. Purtroppo pero' Access non ti lista tutte le propieta', i metodi e
gli eventi degli stessi anche se rimangono comunque disponibili; in poche
parole o ti ricordi a memoria la sintassi o ti scrivi il codice su VB e poi
fai un bel Cut & Paste su VBA.
In alcuni casi Access si comporta stranamente e raramente crasha pero' ci si
lavora abbastanza bene.
Ovviamente se devi poi distribuire il prodotto, anche sulle macchine
"Client" devi avere lo stesso OCX (o DLL) registrato e funzionante con tutto
cio' che ne deriva in termini di praticita' ( vai di RegSvr32) e di licenze.
Spero di essere stato utile.
<LuigI>
Newsgroup: it.comp.appl.access
Titolo: F1-Online-Manager

Nuvo Sito da visitare assolutamente: 
http://f1.oasi.ch
Saluti
Alessandro

>Nuvo Sito da visitare assolutamente: 
http://f1.oasi.ch
e io che pensavo che avesse a che fare con l'help...
si tratta di insulse gare automobilistiche.
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/

Newsgroup: it.comp.appl.access
Titolo: Autoimmissione dati...

Salve a tutti!
Volevo porre questa domanda: se io ho una tabella in cui sono presenti tutti
i nomi dei clienti, es. "Mario Rossi", "Giovanni Bianchi" etc., come faccio
a creare una nuova tabella dove io inserisca il nome nel campo nome, es.
"Mario", e nel campo cognome mi venga fuori automaticamente il cognome, es.
"Rossi"? e cosě per tutti gli altri campi che riguardano quel nome-cliente?
Grazie per le vostre risposte!
Davide.

 ha scritto nel messaggio
news:4eUt5.26511$_U1.4...@news.infostrada.it...

Prova a fare l'autocomposizione di una combo di ricerca
Ciao, Sib

Newsgroup: it.comp.appl.access
Titolo: errore di run time '94' Utilizzo non valido di Null

salve a tutti
uso access2000 su win 2000 pro
tempo fa chiesi aiuto al Ng per un problema di attivazione di alcuni
controlli in base allo stato di altri nella maschera.
francescoR mi suggeri di fare ciň: (riporto quello che lui scrisse).
---------------------------------------------
Nelle routine evento "Su corrente" della maschera e "Dopo aggiornamento" del
primo controllo, inserisci la chiamata ad una sub tipo questa:
Private Sub AbilitaControllo()
    Me.MioControllo2.Enabled = MioControllo1
End Sub
--------------------------------------------
cosě facendo funziona bene, proprio come volevo.
il problema soprge quando voglio usare il db su AccessXP
mi esce sempre un errore di run time '94' Utilizzo non valido di Null.
che potrebbe essere?
grazie anticipatamente a tutti
luigi

 ha scritto nel messaggio
news:bg65c5$afp$1...@fata.cs.interbusiness.it...

Ciao Luigi.
La soluzione la trovi in MSDN all'articolo Q202352
"Errors Caused by Strong Typing in Microsoft Access 2000"
Ciao, Carlo

 Ciao, Carlo
carlo grazie dell'aiuto, ma avevo gią fatto quanto dice l'articolo, la
compilazione non da errori, fatto sta che all'apertura della maschera (che
contiene le sottomaschere alle quali fa riferimento il codice che mi da
questo errore) principale ricevo sempre il messaggio di errore.
 non c'č qualche rimedio?
grazie ancora
luigi
Newsgroup: it.comp.appl.access
Titolo: Maschera in un punto definito dello schermo

Ciao ragazzi, vorrei sapere se è possibile aprire la maschera in un punto
definito dello schermo ad es. l'angolo in alto a sinistra.
Ciao e grazie


Se per angolo intendi l'angolo in alto a sinistra della finestra di database
(un po' piů piccola dello schermo) allora puoi usare
Docmd.Movesize su apertura della maschera.
Ciao, Carlo

 Ciao e grazie
Se l'esempio che haiportato č il tuo caso allora con
MoveSize 0,0 dovrebbe essere OK se effettuato all'apertura.
Se invece era puramente casuale le cose cambiano, e molto.
Devi rilevare la risoluzione dello schermo ed in base a quella
posizionare la Form, ma non piů con il MoveSize, che forse non
riuscirebbe ad interpretare i valori, ma com le API.
La cosa tutto sommato č semplice, solo un pň laboriosa.
@Alex.
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

Newsgroup: it.comp.appl.access
Titolo: [OT] prelevare dati dal WEB, come iniziare ?

Come da oggetto, vorrei prelevare dati da pagine WEB.
Ho già realizzato qualcosa con copi/incolla dei dati in un foglio tipo EXCEL
e poi, da lì, analizzo e importo in tabelle.
Vorrei evitare la fase di copia/incolla, ma non so come accedere a pagine
WEB ( di cui conosco l'indirizzo) dall'ambiente ACCESS.
Devo comandare una sessione di IExplorer ?
I dati sono visibili sulla pagina esposta, ma il codice HTML dove stà?
Ho bisogno di alcune linee guida per iniziare l'esplorazione automatica,
grazie a chi mi seguirà.
Ivan
PS
questo post l'ho inviato a questo NG ma non lo vedo elencato, forse ho fatto
casino, quindi scusate se per qualche motivo risultasse doppio.

 grazie a chi mi seguirà.
Option Compare Binary
Option Explicit
Dim objIE As Variant
Private Sub Href_Click()
objIE.navigate2 "http://" & t_http
End Sub
Private Sub Attiva_Click()
    Set objIE = CreateObject("InternetExplorer.Application")
    With objIE
        .Visible = True
        .navigate2 "http://" & t_http
    End With
End Sub
me.objIE.document    <-------qui c'e' il documento web
--
a.cara 
Togli qualcosa dall'email

 Togli qualcosa dall'email
Grande !
L'oggetto IE non l'avevo presente.
Ho dovuto modificare me.objIE.document    in  docu = objIE.document
xchč mi dava oggetto non conosciuto.
Ma adesso in docu ottengo la stringa "[object]" .
Non voglio stressarti + di tanto, ma mi sapresti indicare dove reperire info
sull'oggetto IE e quindi mi vado a studiare proprietą e metodi....
grazie
Ivan
Newsgroup: it.comp.appl.access
Titolo: references in VBA

Un saluto a tutto il NG.
Dopo aver fatto una copia di un mio db, sono andato a compilarlo e il
sistema mi ha presentato una serie di errori legati a:
workspace.. database nella dichiarazione degli oggetti.
Avevo giŕ affrontato questo problema tempo fa, e grazie al vostro aiuto,
l'ho superato inserendo il segno di spunto in "Microsoft DAO 2.5/3.5
Compatibility Library", tra le references in ambiente VBA.
Questa volta, nonostante aver fatto ciň, il sistema mi da un errore a
livello di Edit.
In altre parole, il comando:
rst.edit
proprio non gli piace.
Neanche a parlarne se scrivo solo .edit
Devo selezionare qualche altra opzione nelle references, oppure cambiare
comando, oppure... ?????
Grazie in anticipo per l'eventuale aiuto
Goose

 wrote in message
news:8UQH6.6520$FS.1...@news1.tin.it...

Grazie ragazzi ho risolto da solo.
Ho confrontato infatti le references del db con altri che avevo creato in
precedenza.
In questo ultimo, risultava selezionato un ActiveX (non ricordo quale).
Adesso sembra che funzioni tutto.
Grazie ugualmente
Goose

Newsgroup: it.comp.appl.access
Titolo: FOX PRO

Carissimi,
    ho dei problemi a collegare in database ACCESS dei file tabelle (dbf) di
FOX PRO tramite ODBC (uso MS ACCESS 2000). Mi spiego meglio
Se collego semplicemente i file senza scegliere i campi univoci allora mi
visualizza il contenuto della tabella senza permettermi l'inserimento, la
cancellazione. Mentre se scelgo anche i campi univoci ACCESS risponde non
visualizzando il contenuto alla prima richiesta e alla seconda con un
blocco.
NB. con Access 97 tutto ok posso fare quello che voglio.
Attendo vostre notizie. Alberto.

 wrote in message
jABt4.17757$qv.1...@news.infostrada.it...

A qunato ho sentito dire, Access 2000 consente di leggere i file dbf ma, a
differenza delle versioni precedenti, non consente di modificarli.
Ciao, Sib
--
------------------------------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access
------------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente
Newsgroup: it.comp.appl.access
Titolo: A2002: autoricerca record da incubo ...

Scusate l'enfasi ma sono stressato.. Questa è la stramaledetta sub generata 
in autocomposizione che funziona con i cognomi normali ma NON funziona con 
quelli accentati (?) tipo Orru':
Private Sub CasellaCombinata165_AfterUpdate()
    ' Trova il record corrispondente al controllo
    Dim rs As Object
    Set rs = Me.Recordset.Clone
    rs.FindFirst "[NOME_CLI] = '" & Me![CasellaCombinata165] & "'"
    If Not rs.EOF Then Me.Bookmark = rs.Bookmark
End Sub
Nel caso dell'accento mi da errore di run time '3077', errore di sintassi 
(operatore mancante) nell'espressione.
Ho provato ad usare questa variante, mi pare frutto di una autocomposizione 
in una versione precedente di Access:
Me.RecordsetClone.FindFirst "[NOME_CLI] = " & Me![CasellaCombinata165]
    Me.Bookmark = Me.RecordsetClone.Bookmark
ma niente da fare. Qualcuno può darmi un'idea su cosa caspita sia successo? 
un problema di riferimenti DAO sbagliati? (ho DAO 3.6).
Grazie in anticipo.
Ciao
Pietro 

 ha scritto nel messaggio 
news:4360b...@x-privat.org...

e' L'Antico problema degli apici, virgolette ecc ... generalmente si 
consiglia di utilizzare chr$(34) per raddoppiare gli apici.
A me funziona per le parole accentate o con apostrofo, ma non con le parole 
virgolettate con " parola "
prova una delle due, non posso verificare al momento.
rs.FindFirst "[NOME_CLI] = '" & chr$(34) & Me![CasellaCombinata165] & 
chr$(34) & "'"
rs.FindFirst "[NOME_CLI] = " & chr$(34) & Me![CasellaCombinata165] & 
chr$(34) 

 ha scritto nel messaggio 
news:djqekp$1nf$1...@fittipaldi.interac.it...

Grazie di cuore in primo luogo per la tempestività della risposta, e poi per 
la preziosa indicazione che non vedo l'ora di testare...
Mi scuso con l'NG se il tuo riferimento all'annoso problema degli apici, 
virgole ect. è un modo garbato per dirmi che si tratta di tema già 
affrontato dal Ng, magari alla nausea ..
Ero piuttosto impanicato ...
Ciao e grazie ancora
Pietro 

> chr$(34)
Per la cronaca, buona la seconda !!
Ciao e grazie
Pietro

 ha scritto nel messaggio 
news:4360d5ad$1...@x-privat.org...

ehehe!
Il riferimento all'aggettivo annoso non era tanto per dire che si tratta di 
un problema arcinoto, sempre che di problema si tratti, piuttosto intendevo 
dire ( e di questo ho avuto modo di riflettere con MA e Cinzia al recente 
smau) che si tratta di una faq che dovremmo trovare il modo di raggruppare 
con le altre e di evidenziare.
Peraltro come ti ho detto nel precedente messaggio, io pure spesso mi trovo 
incasinato con gli apici e i doppi apici ... ho colleghe che si divertono a 
chiamare i clienti con nomi fantasiosi virgolettati: Scuola Media "G. 
Pascoli" ... ecc ...
saluti
MC 


E' negli aggiornamenti di Accessgroup
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it
Newsgroup: it.comp.appl.access
Titolo: x ac - y-1=x + chi vuole grazie

ciao
ho pensato meglio postare qui ancora ac non mi segue più
volevo chiederti x ottenere invece un risultato a seguito di una divisione
x 200 es. 1002/200 da 5,01 io vorrei ottenere 6
cioè quando a seguito di una divisione la parte decimale è dispari deve
darmi il decimale successivo intero
è possibile?
grazie
rino

 ho pensato meglio postare qui ancora ac non mi segue più
Per seguire seguo.
Era giusto cambiare post magari *non* personalizzando e con un soggetto 
adeguato. Lo sai che non dovrei risponderti? NG "regolamentum"
Non ho capito! Cioe' questa?
(numero\200) + (numero\200) mod 2
-- 
ac
y-1=x

 ha scritto nel messaggio 
news:tJojj.52453$8j3....@tornado.fastwebnet.it...

ac prima di tutto ti chiedo scusa non sono molto pratico +  (non ho letto il 
regolamento)
poi voglio dirti ringraziandoti che hai capito bene e funziona
grazie
rino

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

tramite una query dovrei selezionare alcuni dati. Ad esempio:
la seguente tabella è composta da:
ID
Data 1
Data 2
ed una decina di campi (Si/No)
ora tramite una query, appunto, dovrei selezionare tutti gli Id in cui
almeno un campo Si/No è uguale a no, se tutti i campi sono uguali a si l'ID
non dovrà selezionarlo...
Mi auguro di essere stato chiaro e ringrazio chiunque sia disponibile a
darmi una mano...
Ciao
Mauro

 ha scritto nel messaggio
news:j87A8.38283$8D3.1...@news1.tin.it...

Creati una query basandola sulla tua tabella.
Nella riga Criteri: relativa al primo campo Si/No scrivi Falso.
Nella riga Oppure: relativa al secondo campo Si/No scrivi Falso.
Nella riga seguente a Oppure: relativa al terzo campo Si/No scrivi Falso.
E così via di seguito sino a scrivere Falso relativamente a tutti i campi
Si/No; naturalmente per operare agevolmente devi aumentare l'altezza della
finestra che contiene la griglia di struttura della tua query.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

finestra che contiene
la griglia di struttura della tua query.
;-))
--------------------------------
Inviato via 
http://usenet.iol.it
Newsgroup: it.comp.appl.access
Titolo: doppio criterio in query

Carissimi,
nel mio applicativo (A2003) ho necessità di lanciare la stampa
indipendentemente da due maschere:
1 - maschera stampe con casella combinata167 da cui prendere l'id
2 - sottomaschera (S_MskProgramma) in maschera (programmaMsk);
il report è gestito da una query dove ho messo il seguente criterio:
[forms]![stampeMsk]![casellacombinata167] Or [Forms]![programmaMsk]!
[S_MskProgramma]![id]
Ho anche provato così:
Like nz([forms]![stampeMsk]![casellacombinata167];"*") Or Like
nz([Forms]![programmaMsk]![S_MskProgramma]![id];"*")
I due criteri, isolatamente, funzionano ma in associazione, no.
Vi chiedo: dove sbaglio?
Grazie,
Antonio


Nel metodo.
Invece di usare un criterio nella query usa il criterio dove
il contesto è chiaro, cioè nei 2 (?) commandi che lanciano
il report. Se p.e. usa VBA il commando OpenReport ha un
parametro per criteri, p.e.
DoCmd.OpenReport "MioReport", , , "id=" & Me!id
o
DoCmd.OpenReport "MioReport", , , "id=" & _
    Forms!stampeMsk!casellacombinata167
BTW Sarebbe meglio di rinominare "casellacombinata167"
con un nome parlante che dice cosa fa o quale dati ha.
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 

Grazie Karl,
sempre bravissimo, ovviamente funziona perfettamente.
Grazie per l'aiuto e per i consigli.
Antonio
Newsgroup: it.comp.appl.access
Titolo: Msgbox...

Salve a tutti, volevo chiedere una piccola informazione...
Ho scritto questo pezzo di codice
Private Sub Form_Load()
If IsNull(IdPersona) Then
DoCmd.Close acForm, "Maschera per persona"
 If MsgBox("Nessuna persona corrispondente!", vbQuestion + vbYesNo,
"Gestione Registri Parrocchiali") = vbYes Then
 DoCmd.OpenForm "Ricerca persona"
 Else
 Cancel = True
End If
End If
End Sub
che uso in una maschera per la ricerca delle persone. Se nessuna persona è
corrispondente ai criteri mi appare un msgbox che mi chiede se voglio
effettuare un'altra ricerca o voglio uscire! Quello che vorrei fare è
aggiungere al msgbox un altro pulsante "aggiungi" che mi permetta di aprire
una maschera per aggiungere le persone se non sono presenti nel database!
Come posso farlo??
Ciao a tutti e grazie

 ha scritto nel messaggio
news:0m959.52949$n04.1...@twister2.libero.it...

Con la MsgBox tradizionale non è possibile a meno di creare una serie di
msgbox nidificate cioè dopo la prima domanda fai partire un'altra msgbox che
chiede se l'utente vuole aggiungere un nuovo record.
Una soluzione adottata da molti è quella di crearse una maschera che
riproduce l'aspetto della msgbox. In quasto caso potrai mettere tutti i
pulsanti che vuoi.
Anzichè far partire la msgbox fai partire la nuova maschera.
Ciao, Carlo

 pulsanti che vuoi.
Perché non usare una MsgBox YesNoCancel e associare al No (if VBNo then ...)
l'azione di aprire la maschera di inserimento del nuovo nominativo.
Ciao,
Lo

 ha scritto nel messaggio
news:0m959.52949$n04.1...@twister2.libero.it...

Anch'io adotto in questi casi la soluzione di Carlo Costarella,
volevo comunque sottolineare che una MsgBox tipo VbYesNo è fatta per
rispondere ad una domanda: "Nessuna persona corrispondente!" non mi sembra
una domanda.
Per lo scopo che ti prefiggi, sarebbe piu' opportuno scrivere qualcosa del
tipo:
..."Nessun soggetto presente in archivio!" & vbCR & "Effettuare un'altra
ricerca ?" ...
Poi decidi se adottare la soluzione di Carlo Costarella o quella di Lorenzo
Bolognini.
Ricorda che l'utente finale non conosce la logica con cui hai costruito
l'applicazione quindi sii sempre il + chiaro possibile.
Mandi Rob.


Bhč, in effetti nel msgbox originale avevo scritto cosě, non ricordo ora
perchč non l'abbia copiato anche nel messaggio! In effetti sarebbe stato
stupido mettere le risposte ad una domanda che non č mai stata fatta,
considerando poi chi dovrebbe usare questo programma:-)))...ma lasciamo
stare!
Cmq, ho provveduto alla realizzazione di una maschera che assomiglia tanto
ad un msgbox cosě come indicatomi da Carlo e devo dire che ho ottenuto un
buon risultato!
Ciao e grazie a tutti per l'interesse dimostrato!
Luigi
Newsgroup: it.comp.appl.access
Titolo: Struttura Maschera e sottomaschere

ciao a tutti
ho una tbNote cosi composta
IdNota Contatore
NotaScritta Memo
IdAltraNota Numerico
IdTipoNota Numerico
IdOrdine Numerico
IdCarico Numerico
DataCarico Data/ora
IdTrasportatore Numerico
 
nella maschera "M_ConfermaCarico" ho inserito due sottomaschere
con origine record
1-SELECT A.* FROM TbNote AS A WHERE A.IdTipoNota=3;
2-SELECT B.* FROM TbNote AS B WHERE B.IdTipoNota=3;
 
la prima sottomaschera è a Maschere continue,
la seconda è a Maschera singola,
collegate entrambi con campi master e secondari.
 
Ho fatto in questo modo per avere nella TbNote
anche le note scritte, ma è corretto fare in questo modo?
Oppure le NoteScritte dovevo inserirle nella Tb Origine record
della Maschera "M_ConfermaCarico"?
 
grazie

della Maschera "M_ConfermaCarico"?
 
Forse ho capito il risultato che desideri ottenere...
Non usare due sottomaschere, ma usa una sola maschera in questo modo:
- maschera continua in modalità grafica e non foglio dati; in questo modo 
hai la possibilità di avere intestazione e pie di maschera;
- associa a questa maschera la intera tabella TbNote;
- nel corpo della maschera metti tutti i campi tranne il campo note;
- nell'intestazione maschera metti eventuali campi di filtro non associati;
- a piè di maschera metti il solo campo note, i cui dati saranno relativi al 
solo record corrente;
- in questo modo, oltre ad essere tutti visualizzabili correttamente, i 
campi sono anche editabili e in maniera piu sicura. 
 


grazie caezan
ma in questo modo ho questo problema;
prendo in esempio la tbnote
 
idnota   notascritta   idaltranota   idtiponota  idcarico ecc.
  1         prova1           50           2         100  
  2
  3
  4
 
se mi trovo la notascritta sul medesimo record di idaltranota,
eliminando (con tasto CANC) l'idaltranota
elimino anche la notascritta.
 
Ho dovuto fare due sottomaschere
con origine record da query filtrate
1- SELECT TbNote.* FROM TbNote WHERE (IdAltraNota) Is Not Null AND TbNote.IdTipoNota=2;
2-SELECT TbNote.* FROM TbNote WHERE (IdAltraNota) Is Null AND TbNote.IdTipoNota=2;
 
 

idnota   notascritta   *AltraNota*   idtiponota  idcarico ecc.
 
dove il campo AltraNota, nella maschera di inserimento, è un menu a tendina 
che contiene il testo della nota.
Dopo che l'utente aggiorna il menu a tendina, il campo conterrà il testo 
della nota e non l'id della nota.
Successivamente in fase di modifica, se cancelli quella nota di quel record, 
non la cancellerai su altri record (perché in pratica è copia del testo 
della nota sul quel record).
Newsgroup: it.comp.appl.access
Titolo: Identificare il nome macchina di rete

Ciao ragazzi
come si può fare per recuperare il nome macchina del
computer su cui gira un applicativo in Access?
Il problema mi si pone perchè ho bisogno di controllare dal mio PC
quali macchine sono connesse ad database remoto, quindi faccio in modo
che se una macchina si connette scriva il nome macchina su una tabella, che
poi
leggo... Ma come recuperare questo nome macchina?
Vi ringrazio per l'aiuto.
Ciao
ByZ-2K

Option Compare Database   'Utilizza il tipo di ordinamento del database per
i confronti fra stringhe
Option Explicit
Global Variabile As Variant
Global VariabileRecord As Byte
Private Declare Function apiGetComputerName Lib "kernel32" Alias _
    "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long
Private Declare Function apiGetUserName Lib "advapi32.dll" Alias _
    "GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long
Function fOSMachineName() As String
'Returns the computername
Dim lngLen As Long, lngX As Long
Dim strCompName As String
    lngLen = 16
    strCompName = String$(lngLen, 0)
    lngX = apiGetComputerName(strCompName, lngLen)
    If lngX <> 0 Then
        fOSMachineName = Left$(strCompName, lngLen)
    Else
        fOSMachineName = ""
    End If
    fOSMachineName = strCompName
End Function
Function fOSUserName() As String
' Returns the network login name
Dim lngLen As Long, lngX As Long
Dim strUserName As String
    strUserName = String$(254, 0)
    lngLen = 255
    lngX = apiGetUserName(strUserName, lngLen)
    If lngX <> 0 Then
        fOSUserName = Left$(strUserName, lngLen - 1)
    Else
        fOSUserName = ""
    End If
    fOSUserName = strUserName
End Function

 ha scritto nel messaggio
news:zbfd8.4044$v7.1...@twister1.libero.it...

puoi fare riferimento ad un file di windows (wshom.ocx) e utilizzare una sua
libreria:
Funtion NomeComputer()
    Dim WshNAs IWshRuntimeLibrary.IWshNetwork_Class
    Set WshN= New IWshRuntimeLibrary.IWshNetwork_Class
    NomeComputer = WshN.ComputerName
End Function
ciao.

Quale libreria NON FUNZIONA

 wrote in message
a54r8t$ehq$1...@pegasus.tiscalinet.it...

Mille grazie, non sono ancora abituato a cercarmi le cose
sull'infrastruttura Win32 di
Windows... in effetti tutto ricade poi sulle API.
Proverņ questo esempio e in ogni caso ancora grazie.
Ciao
ByZ-2K


bah... a me si........ (win2Kpro)
ciao.
Newsgroup: it.comp.appl.access
Titolo: Ricerca con casella combinata in un elenco campi

Ciao a tutti e grazie in anticipo per il vostro aiuto.
Il mio quesito riguarda una proprietą delle caselle combinate o a
discesa di Access 2000, e precisamente la scelta di "elenco campi"
nella proprietą Tipo Origine Riga nella scheda Ricerca della struttura
tabelle (alternativo a "tabella/query" e "elenco valori"): sapreste
indicarmi un utilizzo ragionevole di tale opzione??
grazie e ciao
Lauretta

 indicarmi un utilizzo ragionevole di tale opzione??
Uhmmm...
Dare la possibilità all'utente di selezionare un nome di un campo come
valore da attribuire a quel campo di un certo record della tabella in
modalità foglio dati?!?
Antonio

...

Si, Antonio, quello che tu dici è quello che permette di fare Access,
ma a cosa può servire? Mi piacerebbe trovare una situazione in cui
questa opzione può essere utile, e non ci riesco.
Grazie ancora e ciao
Lauretta

 Lauretta
Ariuhhmmmm...
Stai cercando di darti una martellata sui....
ah no, non è possibile....
Senti, maaaaa....
perchè andarsi a complicare la vita da soli?!?
Quando e se incontrerai una necessità che si risolve con quella soluzione,
la applicherai, perchè andarsi a scervellare senza motivo?!?
Antonio

 indicarmi un utilizzo ragionevole di tale opzione??
    Hai mai usato, per esempio, l'autocomposizione "Crea una maschera
mediante una creazione guidata"? Nella prima maschera che tale
autocomposizione ti propone osserva le due caselle di riepilogo: "Campi
disponibili" e "Campi selezionati". Ora immagina di voler realizzare
qualcosa del genere...
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------

...

Grazie Maurizio,
effettivamente questo può essere interessante e ha un significato,
anche se...cercavo un'applicazione più semplice per gli utenti di
corsi base di Access.
Grazie e ciao a tutti
Lauretta

 corsi base di Access.
Aspetta, fammi capire...
Vorresti dire che tu insegni TUTTE le funzionalità, anche le più recondite
di Access, ai tuoi allievi corso base?!?!?!?
Antonio

 corsi base di Access.
    Se e' cosi' allora considera una semplice maschera che richieda
all'utente secondo quale campo vuole ordinare una qualche vista...
    Oppure una procedura di trasferimento dati che richieda quali campi
esportare...

Newsgroup: it.comp.appl.access
Titolo: Ultimo pezzo di query

Devo filtrare solo la via nei casi sotto riportati, come fare? Grazie
 
Via Mazzini 40
Mazzini 13
Via Verdi 159
 
-- 
Greg


Certo non ti sforzi nè nel dire cosa hai provato a fare nè con dettagli...
 
SELECT * FROM T1
WHERE Indirizzo IN ('Via Mazzini 40','Mazzini 13','Via Verdi 159')
 
@Alex

Il 24/02/17 16:08:09 @Alex ha scritto:

Scusami Alex, sto facendo delle Union per coprire quasi tutti i casi.
Con una query filtro le vie senza numero civico:
SELECT * FROM T1
WHERE ASC(RIGHT(TuoCampo,1)) NOT BETWEEN 48 AND 57
 
Un'altra mi filtra i nomi delle vie posti a sinistra di ", "
Left(CampoIndirizzo,Instr(CampoIndirizzo,", ")-1)
 
Adesso dovrei prendere i nomi dele vie posti a sinistra dell'occorrenza spazio + un numero qualsiasi
Dati qusti record:
Via Mazzini 40
Mazzini 13
Via Verdi 159
 
vorrei ottenere:
Via Mazzini
Mazzini
Via Verdi
 
Ero breve e conciso per non stancare :)
 
-- 
Greg

 Via Verdi
 
IIf(IsNumeric(Mid([TuoCampo],InStrRev([TuoCampo]," "))), 
Left([TuoCampo],InStrRev([TuoCampo]," ")-1))
 
-- 
Ciao
Karl
*********
http://www.AccessDevCon.com
 
Access FAQ: 
http://www.donkarl.com/it
 
 
 
 

 IIf(IsNumeric(Mid([TuoCampo],InStrRev([TuoCampo]," "))), Left([TuoCampo],InStrRev([TuoCampo]," ")-1))
 
Grazie come sempre Karl :)
 
-- 
Greg

Newsgroup: it.comp.appl.access
Titolo: valori accettati da un controllo e tabella di access

Ho notato che alcuni controlli textbox  con associata una tabella contenente
i valori possibili accetta indifferentemente la cifra 1 e la cifra 01 (
quest'ultima presente in tabella ).
La tabella contiene le quattro scelte : 1,2,3 e 4 .
Se digito 5 ad es. mi da errore , con il messaggio "valore non presente in
tabella" .
Come mai accetta perň 04  anzichč 4 ?
Potrŕ comportare problemi ?
Ho notato che tutto funziona  anche digitando  04 anzichč 4 , per cui ad es.
viene utilizzato nei calcoli il valore associato alla quarta riga della
tabella , proprio come se avessi prelevato da tabella il numero 4 anzichč
digitato 04 .
Voi che dite ?
-- 
Cordiali saluti
-- 
Cordiali saluti

 ha scritto nel messaggio 
news:db0uc7$3iv$1...@carabinieri.cs.interbusiness.it...

Probabilmente lo tratta o lo converte come intero. Certamente il campo della 
tabella ha un tipo di dati testo che basterebbe cambiare in numerico per non 
avere piů questo errore...almeno credo...non mi č mai capitato.
Ciao, Carlo
Newsgroup: it.comp.appl.access
Titolo: Stringa numero in sintassi non corretta

Buona sera a tutti,
ho creato in una casella di testo di un report la seguente stringa:
 
="calcolati su EURO " & [TotImp] & " + quota esente EURO " & [Esente]
 
Tutto funziona, l'unica cosa è che non mi restituisce il numero completo di decimali, per esempio se la cifra di TotImp (che nel record è un campo calcolato con formato Euro) fosse 2.000,00 mi restituisce solo 2000. E' possibile indicare in sintassi il formato?
Grazie mille al mago che sa darmi una risposta.
Buona serata a tutti.
Lo


Non c'e' l'apposita proprieta' formato sul controllo (che e' cosa divers 
dal campo del record)?
qui 
http://www.donkarl.com/it
 
trovi il 99.9% (9 periodico) ai tuoi dubbi.
 
-- 
ac (x=y-1)
Aborro il Killfile
(La violenza e' l'ultimo rifugio degli incapaci -Salvor Hardin-)
 
---
Questa e-mail è stata controllata per individuare virus con Avast antivirus.
https://www.avast.com/antivirus
 
 

 trovi il 99.9% (9 periodico) ai tuoi dubbi.
 
Non ho ancora guardato cosa propone l'infallibile Karl  :)
 
Controllo dopo avere postato la risposta 
 
 
Io pensavo ad usare la funzione Split rispetto alla virgola
separando la parte intera dalla decimale
 
nel caso di numeri interi si genera l'errore 9
quindi con la gestione errori si arriva al risultato
 
Di meglio non mi è venuto,
adesso vado a guardare cosa ne pensa Karl ......
 
Facci sapere
 
[codice]
Public Function strCal(ByVal dblTI As Double) As String
On Error GoTo GesErr
 
strCal = "TuoTesto " & Split(dblTI, ",")(0) & "," & Split(dblTI, ",")(1)
 
Usci:
Exit Function
 
GesErr:
    If Err.Number = 9 Then
        ' errore 9 Indice (dello Split) non incluso nell'intervallo se non ci sono decimali
        strCal = "TuoTesto " & dblTI & ",00"
    Else
        MsgBox "Errore N° " & Err.Number & vbNewLine & Err.Description
    End If
GoTo Usci
 
End Function
[/codice]
 
.


 
Non so, sono arriginito, ma mi sembra complicata.
Parte dalla definizione del campo.
Se intero o long non mi sembra sia in grado di gestire decimali.
Se con virgola il numero di decimali dipende semplicemete dalla 
/formattazione/ che vuoi dargli.
E' un  po come il formato data, su cui spesso sorrido, quello nel db e' 
/sempre/ un formato numerico , in decimillesimi di secondo se non 
ricordo male, a partire da una data limite (1899?) il resto e' /fuffa/



Grazie mille per l'aiuto, la notte ha portato consiglio...
Ce l'ho fatta in questo modo:
="calcolati su EURO " & Format([TotImp];"Standard") & " + quota esente EURO " & Format([Esente];"Standard")
oppure così...
="calcolati su " & Format([TotImp];"Valuta") & " + quota esente " & Format([Esente];"Valuta")
Buon pomeriggio
Lo
 

 .... Non so, sono arriginito, ma mi sembra complicata. ...
 
Concordo.  è complicata
Adesso che lo rivedo mi sto chiedendo come ho fatto a complicare in quel modo una roba cosi semplice   :((
 
.
Newsgroup: it.comp.appl.access
Titolo: Impostazioni di avvio

All'avvio di un database ho disattivato tutti i menù in modo da poter solo 
visionare il contenuto. Tuttavia ho un problemino, ovvero, la finestra che 
si apre all'avvio non si apre estesa per tutto il foglio, ma solo in 
parte.... cioè per ingrandire la finestra devo cliccare col mouse sul 
quadrato per l'ingrandimento della finestra... c'è un modo per visualizzare 
le maschere nella finestra già ingrandita all'avvio?
Grazie!
-- 
Cicerone
*********************
Il primo Newsgroup sulla Balbuzie
http://www.newsland.it/nr/browse/it-alt.salute.balbuzie/
**********************
C.I.B. Comunità Italiana Balbuzienti
www.balbuzienti.altervista.org/md-pro/index.php
**********************

 Grazie!
docmd.maximize
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it

 docmd.maximize
GRAZIE :-)

Newsgroup: it.comp.appl.access
Titolo: ordinamento crescen-decres query

Ciao a tutti,
è possibile impostare l'ordinamneto  di un campo in una query in base ad un
criterio.
Mi spiego meglio.
Vorrei che certi campi di una stessa tabella venissero ordinati in modo
crescente se ho come criterio un certo valore x in un altro campo associato
ed in modo decrescente se ho un valore y.
ciao



penso tu debba creare la query da codice od utilizzare due query
Saluti.
Emanuele.

 ha scritto nel messaggio

In termini di query, il suggerimento di Emyr e' il migliore.
Pero' suppongo che questa query vada a finire da qualche parte (non credo
che tu lavori direttamente sulla query) in tal caso puoi ordinare i dati
dopo, nella maschera o nol report cui la query sottende.
Sib

E' vero, i valori della query mi servono come etichette per un grafico
sull'asse delle ascisse.
Per questo ho la necessità che scorrano in direzioni opposte a secondo del
verso.

qualcuno esperto di vba mi può dare una dritta sulle istruzioni da usare.
Grazie

E' possibile intervenire sulle impostazioni di MS graph.chart.8 tramite VBA.
Ho visto che tra le proprietą dell'asse x c'č anche quella di inversione dei
valori.
Quindi vorrei attivarla nel momento in cui ho un valore Z in un campo della
mia tabella.

 ha scritto nel messaggio

Personalmente non ho mai avuto l'esigenza che hai tu, quindi non ho per te
una soluzione precotta.
Se avessi il tuo problema mi armere di pazienza e inizierei a spulciare
l'help in linea e a fare esperimenti, e' cosi' che trovo la maggior parte
delle soluzioni.
Sib
Newsgroup: it.comp.appl.access
Titolo: Domanda Query uno a uno

Buongiorno, vorrei eseguire una specifica query ma non so come fare.
Ho due tabelle, di nome COMPUTER e TEST fatte così:
COMPUTER con i campi: IP e TIPO_TEST
TEST con i campi: TIPO e AUTORE
Faccio un esempio di tabella così per rendere chiaro il mio problema:
|         IP         |      TIPO_TEST    |
---------------------------------------------------
|    127.0.0.1   |              5           |
---------------------------------------------------
|    127.0.0.2   |              3           |
e la tabella:
|    TIPO    |      AUTORE      |
-------------------------------------------
|       5      |       emilio          |
------------------------------- ------------
|       5      |          fabio         |
------------------------------- ------------
|       5      |          marco       |
------------------------------- ------------
|       3      |          luigi         |
Ora, ogni computer può eseguire un solo tipo di test ed i test da fare
sono diversi.
Io vorrei una query che mi ritorni, per ogni computer, solo UN test
tra quelli che può eseguire, ad esempio:
|         IP         |      TIPO_TEST    |      AUTORE    |
--------------------------------------------------------------------------
|    127.0.0.1   |              5           |        emilio       |
--------------------------------------------------------------------------
|    127.0.0.2   |              3           |        luigi         |
e non tutte le righe come quando faccio il join
|         IP         |      TIPO_TEST    |      AUTORE    |
--------------------------------------------------------------------------
|    127.0.0.1   |              5           |        emilio       |
--------------------------------------------------------------------------
|    127.0.0.1   |              5           |        fabio         |
--------------------------------------------------------------------------
|    127.0.0.1   |              5           |        marco       |
--------------------------------------------------------------------------
|    127.0.0.2   |              3           |        luigi         |
Grazie, Emilio.


Raggruppa e come opzione Tipo_test metti Primo (ad es.)
oppure metti un Join con 
il top 1 degli autori
-- 
-- 
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


Ciao Massimiliano,
potresti per cortesia spiegarmi meglio la tua soluzione, grazie.
Emilio
Newsgroup: it.comp.appl.access
Titolo: Parent Form Filter

Ciao a tutti,
ho una sottomaschera che utilizzo come filtro di un altra maschera e
fin qui tutto ok,
Il mio problema è che vorrei cambiare il riferimento da un campo
numerico ad un campo contatore ma non va, qualcuno può aiutarmi?
Grazie
espressione funzionante
Me.Parent.Form.Filter = "NrOperazione= " & Me.Elenco0.Column(0)
espressione non funzionante
Me.Parent.Form.Filter = "id= " & Me.Elenco0.Column(0)

 Me.Parent.Form.Filter = "id= " & Me.Elenco0.Column(0)
Perche' non e' funzionante? Che sagnalazione da? Se id e' numerico (ivi 
compreso il sottotipo contatore) la istruzione sembra corretta, sempre 
che il campo id sia compreso nella sorgente dati.
--
ac

 ac
ciao, Alessandro grazie della risposta. Questo lo ho risolto era
sbagliato il nr della colonna
ora vorrei cambiare id con valuta che è formato valuta ma non conosco
la sintassi esatta. qualcuno può indicarmela? grazie
        Me.Parent.Form.Filter = "valuta = " & Me.Elenco0.Column(5)

         Me.Parent.Form.Filter = "valuta = " & Me.Elenco0.Column(5)
Anche valuta e' un campo numerico (se intendi un importo in valuta, 
valuta e' un sottotipo di numerico) ed il filter non e' altro che una 
where sql senza la where.
Il formato che hai scritto e' corretto.
--
ac

Newsgroup: it.comp.appl.access
Titolo: microsoft dao

inavvertitamennte ho disinstallato microsoft dao dal pannello di controllo"
installazioni applicazioni" adesso non so più come installarlo e delle volte
certe applicazioni me lo richiedono(corel  suite 12, Access)  ho cercato nei
dischi delle applicazioni ma non ho trovato nulla e neanche nel web 

 ha scritto nel messaggio
news:pYxYd.647297$b5.29...@news3.tin.it...

Prova a reinstallare Office Completo, forse è la strada più breve.
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


La Dao360.dll è incluso nel SP8 per JET4.
Trovi il link sul 
www.donkarl.com/it
 FAQ 9.1
La descrizione come registrare la dll trovi nella FAQ 7.9.
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 + CISA1, Arezzo, 4+5/6/2005
la prima Conferenza Italiana per Sviluppatori di Access
Newsgroup: it.comp.appl.access
Titolo: [?] Query SQL

Ho due tabelle che hanno un campo IDPersona non in relazione ma dello
stesso tipo. Ho la necessita' di determinare tutti i record che
contengono IDPersona presenti in tabella1, ma non presenti in tabella2.
Grazie per le risposte.

contengono IDPersona presenti in tabella1, ma non presenti in tabella2.
Relazionali tu nella query, poi fai un bel SELECT * FROM Tabella1 WHERE
idpersona NOT IN SELECT idpersona FROM tabella2.
O qualcosa del genere...controlla la sintassi.
Saluti.
Luciano

O qualcosa del genere...controlla la sintassi.
mi pare che non serva nemmeno relazionarli e che la seconda select
vada tra parentesi.
altra cosa che potrebbe fare e' caricare entrambe le tabelle in una
query, joinare i due campi id, scegliere come proprieta' del join
(clic destro sul join) quella di visualizzazione di tutti i record di
t1 (dovrebbe essere la seconda), caricare tutti i campi di t1 e solo
l'id di t2, inserire come criterio di 
t2.id
 null.
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/

Newsgroup: it.comp.appl.access
Titolo: Su click si può cambiare BMP?

Risalve
Sempre con A2k2 è possibile ottenere che cliccando su un'immagine
(incorporata o collegata) essa venga sostituita, magari passando in secondo
piano, da un'altra?
Grazie Buonuomo.

 ha scritto nel messaggio
news:awdua.100297$DT4.3...@twister1.libero.it...

in questo modo a me funziona:
Private Sub Immagine1_Click()
If Me.Immagine1.Picture = "C:\MyDir\KEYOff.BMP" Then
        Me.Immagine1.Picture = "C:\MyDir\KEY.BMP"
    Else
        Me.Immagine1.Picture = "C:\MyDir\KEYOff.BMP"
    End If
End Sub


Grazie informatica, proverò e ti farò sapere, ma se a te funziona....
Grazie ancora
Buonuomo.

 ha scritto nel messaggio
news:b9dl9j$kj9$1...@server2.ouverture.it...

Funziona!!
Ne sono sempre più convinto:
L'Informatica risolve i problemi :-))
Ciao e grazie ancora
Buonuomo.
Newsgroup: it.comp.appl.access
Titolo: Abilitazione Controlli in maschera

avrei la necessità di abilitare su un evento tutti i controlli di una
maschera al
fine di poter aggiornare i dati.
è possibile effettuarlo da codice senza dover specificare i nomi di tutti i
controlli dato che in futuro dovrò cambiare i campi in tab e quindi anche
quelli
in maschera senza dover quindi mettere mano nuovamente sul codice ??
ringrazio anticipatamente.
complimenti al NG.
ste


i campi in tab ?
ti suggerisco il seguente:
aggiungi alla proprietà Tag dei controlli che intendi modificare : Yes
Dim ctl As Control
    For Each ctl In Controls
        If ctl.Tag = "yes" Then
            ctl.Enabled = False ' o True
        End If
    Next
giuseppe

 in maschera senza dover quindi mettere mano nuovamente sul codice ??
Dai un'occhiata a questo codice, ed ovviamente adattalo al tuo caso:
Private Sub BloccaEditing(TF As Boolean)
 'blocca l'edit dei campi (TF=True) o lo abilita (TF=False)
 Dim ctl As Control
 For Each ctl In Me.Controls
  If ctl.ControlType = acTextBox Or ctl.ControlType = acComboBox Or
ctl.ControlType = acCheckBox Or ctl.ControlType = acSubform Then
   If ctl.Enabled Then ctl.Locked = TF  'solo per controlli non disabilitati
  End If
 Next
End Sub
Eventualmente dai anche un'occhiata a Me.AllowEdits
--
Ciao, AntoGal
*************************************************
Gestione punti vendita (casse e pos NCR)
 
www.powerretail.it
-------------------------------------------------------------
per scaricare un gioco di DAMA ITALIANA
http://volftp.mondadori.com/italiani/galletta/
*************************************************

 wrote in message
sE466.13219$jT6.5...@twister2.tin.it...


ottima anche questa ....
grazie

Newsgroup: it.comp.appl.access
Titolo: parziale importo su report

Ciao a tutti,
su un report eseguo la somma parziale con una casella
di testo denominata "parziale" con origine controllo sul campo
"importo" ,impostata con somma parziale = su tutto,visibile = no
posizionata su corpo, poi con una casella di testo denominata "riporto" con
origine controllo
= [parziale]  su intestazione pagina  mi esegue il parziale su ogni pagina,
prendendo
però anche il primo importo della pagina stessa
Perche?
Mentre se inserisco la casella "riporto" sul piè di pagina pagina tutto ok
ma mi visualizza l'importo anche sull'ultima pagina, cosa che non vorrei.
ma che non riesco a risolvere
nel report per mie necessità non ci sono campi con criteri di ordinamento
Qualcuno sa darmi un consiglio Grazie.

 ha scritto nel messaggio
news:zU3rb.110909$e5.40...@news1.tin.it...

Newsgroup: it.comp.appl.access
Titolo: Apertura maschera secondo valore controllo

Ciao a tutti
Vorrei poter aprire una maschera popup sincronizzata
automaticamente quando in una Sottomaschera  viene selezionato
un  record il cui campo (Immagine) ha un valore  , e
automaticamente si chiudesse quando la selezione nella
sottomaschera passa ad altro record
il cui valore nel campo Immagine è nullo,
Io sono solo riuscito a inserire un pulsante per l'apertura della
maschera popup e sincronizzare il tutto , però tutto questo se
avvenisse automaticamente sarebbe tutta un'altra cosa.
Qualcuno mi sa insegnare la strada?
P.S.
Lo stesso problema lo avevo superato con un controllo
immagine associato , ma ora ho assolutamente bisogno di
aprire una maschera nuova per problemi di spazio
Ciao
Giuseppe

 ha scritto nel messaggio
news:Vvema.10196$T34.3...@news2.tin.it...

Ammesso e non concesso che abbia capito cosa tu voglia fare, a fronte
dell'evento "Su corrente" della sottomaschera, se la maschera popup è aperta
chiudila e comunque riaprila filtrandola.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:iQfma.33731$DT4.1...@twister1.libero.it...

Probabilmente mi sono spiegato male
ma io ho bisogno di aprire una maschera popup
quando nella sottomaschera in visualizzazione foglio dati  viene selezionato
un determinato record  in cui nel campo "Immagine" sia presente un valore
e di nuovo spostando al selezione , se nel record corrente non esiste nessun
valore per il campo
"immagine" la popup si dovrebbe chiudere.
Spero di di essermi fatto capire.
Ciao Giuseppe

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

Salve a tutti!
ma con 512 Mb RIMM non si potrebbe evitare di far lavorare l'H.D.
continuamente con questo fastidioso Swap???
Mi hanno detto che qualcuno ha già risolto smanettando nel system.ini e,
praticamente, qualsiasi programma o gioco viene caricato tutto in memoria
con una velocità mostruosa.
Vero??? e come si fa?
Grazie anticipatamente.
Marco.

Oopss.......... ho sbagliato forum!