mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: Maschere: Eseguire un'espressione in una casella di testo.

Salve a tutti,
una form con origine una tabella "Tab1"
Campi: descrizione;quantità.
quantità = (2,3+5,6+7)*2= 29,8
All'interno della casella di testo collegata alla quantità devo poter
inserire un'espressione il cui totale dovrà comparire in un'altra casella di
testo (non associata).
E' possibile?
Grazie Luca.

 Luca.
-- 
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


Non sono stato chiaro...
io a priori non so quale formula utilizzare.
Es.:
1+1=2
2*2=4
(3+4)/3....
cioè l'espressione cambia per farmi capire ho la necessita che la casella
associata si comporti come una cella di Excel e la casella non associata
contenga un codice che visualizzi il risultato....
Grazie Luca.

Zappus ha scritto:

Se, come mi pare di aver capito, il problema è quello di valutare il
risultato di un'espressione che attualmente è salvata in tabella in
formato testo vai a vederti sull'help (<F1>) la funzione Eval(). 
Assicurati di usare il giusto separatore decimale. Probabilmente dovrai
sostituire le virgole con i punti.
Dalla finestra debug di un qualsiasi modulo puoi provarla subito:
  ?Eval("(2.3+5.6+7)*2")
Un consiglio: evita i nomi generici tipo "Tab1". Se ti capiterà di
progettare db contenenti molti oggetti potresti impazzire quando dovrai
usarli nel codice o nelle query.
Ciao.
-Marco-
-- 
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ha scritto nel messaggio 
news:5S9Xg.24366$pp1....@tornado.fastwebnet.it...

Devi scusarmi, ma non riesco a capire cosa ti serva.


 ha scritto nel messaggio
news:5EqXg.409$uv5...@twister1.libero.it...

ho un cliente che preferisce tribolare.....

 ha scritto nel messaggio
news:egja5t$a9j$1...@news.newsland.it...

Grazie mille funziona.
Luca

Newsgroup: it.comp.appl.access
Titolo: impedire l'attivazione di un record vuoto all'apertura di una maschera continua.

Ho creato una maschera principale (master) ed una secondaria che per motivi
pratici collego alla principale via codice. La maschera secondaria č
definita  come maschera continua in quanto mi č utile inserire i dati tipo
foglio di calcolo. Purtroppo ogni volta che viene attivata inserisce
autonomamente una riga vuota(record).
E' possibile ovviare a questo problema e abilitare i tasti di direzione per
lo spostamento in su oppure in giů invece di utilizzare i tasti pagina
avanti e pagina indietro.
Grazie in anticipo per l'aiuto.
   Lazlo

 ha scritto nel messaggio
news:8lmbt0$uan$1...@pinco.nettuno.it...

Forse quando apri la maschera secondaria inserisci qualcosa nella chiave
primaria?
Non ti conviene mettere il contenuto della maschera secondaria in una
sottomaschera della maschera master??
Roberto
Newsgroup: it.comp.appl.access
Titolo: Scuse per Antonio Biso

Scusa Antonio senza volerlo ho mandato una E-Mail che dovevo mandare nel
News  al tuo indirizzo privato..
ancora scusa
Gianni_B

 ha scritto nel messaggio
news:400eb96b$1...@news.bluewin.ch...

Abbiamo trasmesso: Terrore dal newsgroup...
Ciao.
--
Sergio MAZZA

 ha scritto nel messaggio
news:bumdkc$iic$1...@canarie.caspur.it...

 Terrore dal newsgroup...?!?
Che ho fatto stavolta..?!?
Gianni_B


AHAaa!! C'hai paura del Biso cazziatore eheeee??!!
Ciao.
P.S. Si scherza eh!
--
Sergio MAZZA

 AHAaa!! C'hai paura del Biso cazziatore eheeee??!!
UAH UAH UAH !!!
Antonio

Newsgroup: it.comp.appl.access
Titolo: Filtro campi in report - Sito comune

Help!!!
Partendo da una query contenente vari record con campi numerici vorrei
creare un report in cui vengono stampati, per ogni record, solo i campi (e
relative etichette) contenenti valori maggiori di zero.
Esempio CAMPO0= Tizio CAMPO1= 12 CAMPO2= 0 CAMPO3=  4 CAMPO5= 0 CAMPO6=
1....ECC. e via dicendo per gli altri record dove in CAMPO0 ho altri nomi
Sul Report vorrei avere:
Tizio: CAMPO1 = 12 CAMPO3= 4 CAMPO6= 1
Ho dato un'occhiata sul sito comune, ma sono troppo principiante per una
ricerca ad hoc.
C'è qualcuno che può aiutarmi o indirizzarmi per risolvere questo mio
problema?
Grazie
elgr...@freemail.it



la procedura richiede la programmazione VBA come te la cavi?
il report lo vuoi da sinistra a destra o va bene anche dall'alto in
basso?
Saluti.
Emanuele.

Newsgroup: it.comp.appl.access
Titolo: QUERY DI AGGIORNAMENTO

Cosa c'è di sbagliato in questa query di aggiornamento???
UPDATE TOTALE_GRUPPO_AGENTI_ABFOR
SET TOTALE_GRUPPO_AGENTI_ABFOR.INCREMENTO = 
Sum([TOT_VENDUTO_COR]-[TOT_VENDUTO_PRE]), 
TOTALE_GRUPPO_AGENTI_ABFOR.MARGINE = 
Sum([TOT_VENDUTO_COR]-[TOT_COSTO_COR])/[TOT_VENDUTO_COR];
mi segnala questo errore
impossibile eseguire una query che non include l'esoressione 
"INCREMENTO" SPECIFICATA COME PARTE DI FUNZIONE AGGREGATA

 mi segnala questo errore

Se non ho capito male la tua query dovrebbe aggiornare il campo INCREMENTO 
e MARGINE di ogni record con quelle due espressioni.
In tal caso è errato avvalersi della funzione di aggregazione SUM.

Emanuel ha scritto:

HO PROVATO ANCHE SENZA LA SUM MA IL RISULTATO NON CAMBIA

maestro wrote:


Ho provato a creare una tabella con i 5 campi presenti nel tuo codice SQL.
Ho generato la seguente query e mi funzione.
UPDATE TOTALE_GRUPPO_AGENTI_ABFOR 
SET TOTALE_GRUPPO_AGENTI_ABFOR.incremento = 
[TOT_VENDUTO_COR]-[TOT_VENDUTO_PRE], 
TOTALE_GRUPPO_AGENTI_ABFOR.margine = 

Newsgroup: it.comp.appl.access
Titolo: [OT]Per chi usa Outlook o Outlook Express

Estratto dall'ultima newsletter Microsoft:
1.A - Microsoft risolve il problema di vulnerabilita' di
Outlook e Outlook Express
===========================================================
A seguito di un problema di protezione scoperto
recentemente, Microsoft mette a disposizione dei propri
utenti l'aggiornamento che consente di risolvere il
problema di vulnerabilita' delle impostazioni di protezione
dei prodotti Microsoft Outlook e Outlook Express:
"Malformed E-mail Header", denominato anche "e-mail
killer".
In alcune specifiche circostanze, questo problema di
protezione potrebbe consentire a un utente esterno di
eseguire del codice sul computer di un altro utente, a sua
insaputa.
Prima di installare l'aggiornamento (solo 964 KB), leggi
con attenzione le istruzioni contenute in questo documento:
http://www.microsoft.it/italy/adv/jump.asp?cod=0014_protezione
-- 
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------

 --------------------------------------
Ho letto il documento da te indicato e dice che il problema viene risolto
anche istallando Internet Explorer 5.5 .
A questo punto non credi che "con una fava si possono prendere due piccioni"
?
Roberto

 Roberto
Credo di si.
Personalmente il documento in questione non l'ho letto, non
uso ne IE ne Outlook :-)
sono un affezionato di Netscape, per Browser e Newsreader;
per quanto riguarda la posta ho sempre usato Eudora.


Newsgroup: it.comp.appl.access
Titolo: Manuale Access 2002

MANUALE Programmare Microsoft Access 2002 di Rick Dobson Mondatori
Informatica con cd - nuovo -prezzo di copertina euro 77,47 vendo ad euro
50,00.
smac...@LEVAMItiscali.it

 ha scritto nel messaggio
news:m1QF9.37998$3l.10...@twister1.libero.it...



Anche la Microsoft lo regala, il linea...... si chiama HELP.
@Alex.
Newsgroup: it.comp.appl.access
Titolo: Regalie per tutti, nel trasferire testo!

Grazie mille Sergio, mi hai ridato la speranza!
Volendo approfittare dell'aiuto di tutti i maramaldi del NG, ed avendo un pò
di confusione in testa, avrei bisogno di una idea.
Come strutturereste un modulo che permetta all'utente di (nell'ordine):
- aprire la finestra tipo "Apri documento" per andare a cercare il documento
da registrare
- Selezionare il documento e, al contempo, acquisire il percorso
- archiviare in apposita tabella il percorso del file, il titolo ed il
contenuto.
Prometto che, ad obiettivo raggiunto, a tutti i partecipanti al thread
regalerò l'mdb.
Ah, in Access97!
--
'--------------------------------------------------------
'Saludos
'--------------------------------------------------------

 Grazie mille Sergio, mi hai ridato la speranza!
Amen, figliolo...

Secondo me dovresti cambiare filosofia; prendi tu il controllo memorizzando
il percorso e nomi dei documenti, la gestione sarà più trasparente. L'unica
grana è se l'utente vuole cambiare il percorso...
Ciao.
--
Sergio MAZZA

Newsgroup: it.comp.appl.access
Titolo: Formattare il testo all'interno dei campi

Come posso formattare il testo all'interno dei campi?
Voglio dire come poter usare il grassetto per alcune parole all'interno di
un campo che è stato settato come memo? Credo che sia molto difficile
ottenere ciò, in considerazione del fatto che gli appunti che dovrei
memorizzare non sono - chiaramente - tutti in grassetto, ma solo alcune
parole.
La mia idea - ma non so se realizzabile o troppo complicata - era di mettere
un pulsante di controllo che avesse la funzione di marcare il testo
introdotto con un simbolo, che venisse interpretato, tramite codice,  come
appunto grassetto (insomma come accade in html).
Ogni idea o suggerimento è ben accetto
Grazie in anticipo
woppa

 ha scritto nel messaggio
news:bd6cs5$r9o$1...@nntp.weblinea.it...

Uitlizzare file word linkati al database
Antonio

 ha scritto nel messaggio
news:TWzJa.111807$Ny5.3...@twister2.libero.it...

se potessi lo farei... il problema è che si tratta di parecchi appunti da
dover gestire e leggere molto velocemente.
Se non  trovo altre soluzioni, probabilmente mi ingegnerò facendo tutto su
word, magari con indici e riferimenti.
Grazie comunque. woppa

 ha scritto nel messaggio
news:bd6cs5$r9o$1...@nntp.weblinea.it...

Allora utilizza un activex che traduce il testo (con i tag inseriti) in
HTML...
Ciao.
--
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: Operazioni matematiche

Salve a tutti, devo realizzare un db per un mio amico e mi servono dei dati
come differenza. Cerco di spiegarmi: ho creato una tabella denominata dati
rilevati:
IDDato
TipDato
ValoreDato
e nel campo ValoreDato, sono inclusi vari valori: 85,83,80,75,ecc., ora il
mio dubbio č questo: č possibile poter fare una sottrazione fra i valori??,
ovvero 83-85,80-83,75-80 ecc ed a ogni operazione visualizzare il risultato
eventualmente in un campo DifferenzaDato??
Spero di essere stato chiaro e ringrazio per le dritte
Maurizio
calma27<NOSPAM>@
libero.it
     Di solito gli uomini
disprezzano le cose
    che non capiscono
                  Johann Wolfgang von Goethe
""togli<NOSPAM> per rispondere""

 disprezzano le cose
Tutto č possibile, perň devi spiegarti meglio, vale a dire in una maschera
sia in visualizzazione Singola che Continue devi avere il riferimento di ciň
che devi fare, se il Record Corrente vale 85 con quale lo devi
relazionare???
Se fosse quello precedente inserisci una txtbox1 nella quale inserirai
come riferimento il seguente codice:
Me!txtbo1=Me!valoredato-Me.recordsetclone.movepreview.fields("ValoreDato")
ATTENZIONE devi perň controllare di non essere all'inizio del Recordset
quindi l'operazione la esegui solo se:
If not me.recordsetclone.bof then
............................
end if
Spero di aver capito.....
Alex.
-- 
Posted from  [62.98.108.47] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 > ValoreDato
OK Alex vedo di spiegarmi meglio:
IDDato | TipoDato | ValoreDato
1                Peso            85
2                peso            80
3                peso            74
quindi il Mio problema è che vorrei visualizzare una maschera continua che
mi mostri per esempio:
DataRilievo | ValoreDato | Differenza
25/10/01            85
30/10/01            80            -5
30/11/01            74             -6
e che quindi la differenza è solo diciamo derivata da una qry e nient'altro,
è fattibile??

Newsgroup: it.comp.appl.access
Titolo: Come realizzare una maschera di ricerca ?

Ciao,
sto provando a capire come realizzare una maschera a piu' campi che mi
permetta di eseguire una ricerca su una tabella.
Mi sembra che il modo piu' "semplice" dovrebbe essere quello di lanciare una
stringa SQL da codice VBA... ma mi trovo un po' in difficolta' a capire come
fare sul mio Access 2000...
C'e' qualcuno in grado di darmi un paio di dritte ?
Grazie
Fabio

 ha scritto nel messaggio
news:B__v6.102760$lj4.2...@news6.giganews.com...

Scusami ma mi sembra un pň vaga come richiesta. Perché non la poni in
maniera piů circonstanziata?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:B__v6.102760$lj4.2...@news6.giganews.com...

Scusami ma mi sembra un pň vaga come richiesta. Perché non la poni in


 ha scritto nel messaggio
news:B__v6.102760$lj4.2...@news6.giganews.com...

Newsgroup: it.comp.appl.access
Titolo: Access in Rete

Ciao a tutti, ho questo problema:
ho creato un applicativo con access2000,
ed ho creato il be ed il fe.
Ora devo distribuire il fe su più piattaforme
95/98/2000.
come devo fare per creare l'origine dati sul server??
Devo
"mappare" l'unità di rete???
Grazie
--------------------------------
Inviato via 
http://usenet.iol.it

 wrote in message
news:198Z133Z22Z70Y...@usenet.iol.it...



????
Se devi andare da Roma a Milano che fai passi per Siracusa? :-D
1) Metti il Be in una cartella condivisa sulla rete;
2) allega le tabelle nel Fe passando per Risorse di rete;
3) Copia il Fe sugli altri computer;
puoi anche invertire i punti 2 e 3 solo che poi devi allegare le tabelle in
ogni Fe
Bye
Allanon

Newsgroup: it.comp.appl.access
Titolo: utilizzo dei tasti funzione

Un saluto a tutto il NG.
Vorrei sapere come è possibile utilizzare i tasti funzione all'interno delle
maschere, assegnandovi particolari funzioni personalizzate per ogni singola
maschera, oppure funzioni valide in tutto il DB (classico F10 per uscire
dal'applicativo).
Chi mi sa dire quali sono i riferimenti di codice e a quali eventi della
maschera li devo associare?
Un ringraziamento anticipato.
Goose


Devono essere associati all'evento tasto giů (keydown).
Sull'apertura della maschera dovresti inserire Keypreview=true
Comunque guarda gli esempi di Keycode oppure Eventi tasto giů o qualcosa di
simile.
Alla fine della routine imposta sempre il keycode a zero cosě a windows non
viene passato nessun valore.

 ha scritto nel messaggio
news:oXIu6.69517$yl2.6...@news1.tin.it...

Oltre a quanto consigliato da GT, ti suggerirei di andarti a guardare la
macro speciale Autokeys sull'help.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


Ringrazio entrambi per l'aiuto.
Un saluto
Goose
P.S. Per Silvio: scusa il pvt, 'sti maledetti tasti... uff.. ;-)
Newsgroup: it.comp.appl.access
Titolo: aprire nuovo form ed inserire dato

Salve,
sono nuovo nel mondo Access ma sono riuscito ha creare un piccolo database per il mio lavoro.
Ora sto iniziando a raffinarlo e devo iniziare a gestire un po di VBA.
 
ho una tabella clienti con le varie informazioni ed una cartella pratiche.
io di solito ricerco il cliente per vedere se i suoi dati sono inseriti correttamente e poi creo con un pulsante una nuova pratica.
 
qui ho dei problemi:
ho creato un pulsante che mi apre il form  con inserimento immediato di un nuovo record sulla cartella pratiche. quello che vorrei fare è portare insieme l'id_cliente ed inserirlo in automatico nel nuovo record.
 
questo è il mio codice:
 
Private Sub Comando43_Click()
DoCmd.OpenForm "Pratiche new", acNormal, "", "", acAdd, acNormal
End Sub
 
come devo modificarlo affinché copi Cliente.ID_cliente in Pratiche_cliente.Id_cliente
Grazie


Puoi passare l'IDcliente in OpenArgs, è uno degli argomenti di OpenForm.
Nell'altra maschera, nell'evento Apertura, verifichi se è stato passato un valore e lo metti nella casella:
 
If nz(OpenArgs,0)>0 then Me.IDcliente = OpenArgs
 
Modifica il nome del pulsante Comando43 in NuovaPratica (dovrai modificare anche il nome della Sub in VBA). Se lasci i nomi predefiniti di access, quando il database crescerà non capirai più niente.
Ciao.
-Marco-

Newsgroup: it.comp.appl.access
Titolo: dati da Acces in Word

Ciao a tutti,
ho un grandissimo problema.
Voglio realizzare un archivo per la gestione di uno studio legale.
Vorrei fare in modo che dati quali cliente,controparte,autorità giudiziaria
etc. vengano automaticamente  importati in un documento word in modo che se
l'intestazione word è GIUDICE DI PACE DI .............. dopo il DI venga
inserito il record creato i n ACCESS. Si può fare e come???
Grazie



si
vedi automazione office su 
sitocomune.com
 e sull'help in linea
Saluti.
Emanuele.



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

Ciao a tutti,
volevo dare all'utente la possibilità di scegliere il criterio di
raggruppamento del report tra due possibilità (data o caratteristiche).
Dato che affronto per la prima volta l'argomento, mi conviene creare due
report distinti e sulla base della selezione dell'utente faccio aprire l'uno
o l'altro, oppure posso impostare via codice il criterio di raggruppamento e
modificare quindi l'origine dati delle caselle ?
Ciao
Marco

 ha scritto nel messaggio
news:ca6a1c$gbl$1...@lacerta.tiscalinet.it...

Sì è la cosa più semplice per iniziare; poi se vuoi ti studi come aprire il
report in modalità design (struttura) per impostare un nuovo raggruppamento.
Ma intanto adotta la prima soluzione...
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: concatenare campi in un recordset

Non riesco a capire come in un recordset aperto in vba non riesco a 
concatenare diversi campi usando la funzione rtrim......
Dim rstlistino As ADODB.Recordset
Set rstlistino = New ADODB.Recordset
rstlistino.Open " SELECT ANAART1.IDArticolo, ANAART1.DESCRIZIONE, 
ANAART1.FORMATO, ANAART1.CodArt, ANAART1.Descrizione
 " & RTrim(" " & ANAART1.Formato) & " AS descrizione1 FROM Marchio RIGHT 
JOIN ANAART1 ON Marchio.IDMarchio = ANAART1.IDMarchio", 
CurrentProject.Connection, adOpenKeyset, adLockOptimistic
Eseguo la routin e mi riconosce la stringa di Rtrim come se fosse una 
variabile e non il campo che voglio concatenare alla descrizione......
Non riesco a capire in cosa sbaglio, infatti ho realizzato una query con il 
seguente enunciato e funziona alla perfezione...
SELECT ANAART1.IDArticolo, ANAART1.CodArt, ANAART1.Descrizione & RTrim(" " & 
ANAART1.Formato) & RTrim(" " & ANAART1.Colore) & RTrim(" " & 
mARCHIO.marchio) & RTrim(" " & ANAART1.Serie) & RTrim(" " & 
IIf(IsNull(ANAART1.Scelta),Null,"Sc.") & ANAART1.Scelta) & RTrim(" " & 
IIf(IsNull(ANAART1.Tono),Null,"T.") & ANAART1.Tono) AS descrizione1
FROM Marchio RIGHT JOIN ANAART1 ON Marchio.IDMarchio = ANAART1.IDMarchio;
Grazie a tutti
Massimo

Prova
& RTrim("" "" & ANAART1.Formato)
Strana questa tua composizione...
Ciao
Alex

Newsgroup: it.comp.appl.access
Titolo: Collegare tabelle.

Salve, avrei la necessità di creare un collegamento nel database ad altre
tabelle via codice. Manualmente funziona con "collega tabelle" di Access, ma
dovrei farlo via codice perchè cambia il nome del file.
E' possibile farlo via codice ?
Grazie, saluti.
Silvio.

 ha scritto nel messaggio
news:Staib.7757$uv4....@news.edisontel.com...

Vai sul Sito Comune (link qui sotto) e nella  Seezione Tables leggi queste
tre FAQ:
1) Riallegare tabelle di Paolo Olzi
2) Riallegare tabelle di Antonio Biso
3) Effettuare in maniera del tutto automatica l'aggiornamento delle tabelle
allegate ad un FE di Vincenzo Turturro.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:MUaib.29040$vO5.1...@twister1.libero.it...


 Saluti, Silvio.
Quando rispondi scrivi DOPO e non prima del testo dei messaggi precedenti.

Newsgroup: it.comp.appl.access
Titolo: Conversione in MDE

Access 2000 mi dice che è impossibile creare la versione MDE di un programma
che ho fatto. Quali possono essere le cause? Un altro programma che ho fatto
precedentemente viene convertito tuttora senza problemi, perciò non è un
problema di Access, ma del programma stesso!
--
-------------------------------------------------------
May the Force be with you
Skywalker Senior

 wrote in message
kO2za.222535$K35.5...@news2.tin.it...

prova a compilare e ti dirà dov'è l'errore
Ciao Max


ha scritto:

Ci possono milioni di ragioni. In buona sostanza devi compilare il programma
e affrontare gli eventuali bug.
ciao MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it

 ha scritto nel messaggio
news:uQ2za.22915$Ny5.6...@twister2.libero.it...

Grazie ad entrambi... effettivamente era rimasto in vita un pezzo di codice
legato ad un pulsante che avevo cancellato.
Ora funziona perfettamente!

Newsgroup: it.comp.appl.access
Titolo: Dlookup su sottomaschera

Buongiorno a tutti.
Sono a seccarvi di nuovo perchè non riesco a far funzionare la funzione
Dlookup in una sottomaschera. Il problema è questo, in una StmArtOld vorrei
riempire il campo Prezzo preso dalla tabella Articoli su cui NON è basata la
sottomaschera
discriminato da un criterio, che può assumere i valori Off o Norm.
Quando ho usato Dlookup in una maschera ho usato la sintassi che propone la
guida ed ha funzionato, ma questa volta no, dice che la maschera
ART_VENDUTIstm non può essere trovata. Sapreste indicarmi dove sbaglio?
Grazie comunque dell'attenzione.Cld
*************************************************
*************************************************
Private Sub prezzo_GotFocus()
If Me.Tip = "Off" Then
Me.prezzo = DLookup("[PrezzoOff]", "ARTICOLI", "[Code] =" _
     & Forms![ART_VENDUTIstm]!Codice)
     Else
Me.prezzo = DLookup("[PrezzoNorm]", "ARTICOLI", "[Code] =" _
     & Forms![ART_VENDUTIstm]!Codice)
     End If
End Sub
P.S.
Se può essere importante, il codice è di tipo numerico e non possono esserci
duplicati.

 ha scritto nel messaggio
news:gIcp9.12199$RO.2...@twister1.libero.it...

Poichè ritengo che il controllo Codice sia contenuto nella sottomaschera,
prova con:
Private Sub prezzo_GotFocus()
If Me.Tip = "Off" Then
Me.prezzo = DLookup("[PrezzoOff]", "ARTICOLI", "[Code] =" _
     & Me!Codice)
     Else
Me.prezzo = DLookup("[PrezzoNorm]", "ARTICOLI", "[Code] =" _
     & Me!Codice)
     End If
End Sub
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


il nome del controllo subform e' certo che sia ART_VENDUTIstm?
purtroppo questi sono i casini che si hanno quando si utilizza
la collezione forms
prova secondo questo schema
Forms!NomeForm!nomeSubform!codice
se non dovesse andare c'e' da mettere un .form o dopo NomeForm 
o dopo NomeSubForm (non mi ricordo)
--
a.cara

 a.cara
Me.prezzo = DLookup("[PrezzoOff]", "ARTICOLI", "[Code] =" _
    & Forms!INTESTAZIONI!ART_VENDUTIstm.Codice)
bene, cosi vede il criterio poichè nella finestra di debug quando il cursore
del mouse è sull'espressione di criterio mi restituisce il valore giusto,
però mi da errore 438, proprietà o metodo non supportati. Pecchè, pe quale
mutivo? grazie comunque del passo avanti.Cld

ggac ha scritto:

uhmm... sicuro che il controllo "Prezzo" abbia la proprieta' .value?
che controllo e', non e' un etichetta vero?
--
a.cara

 ha scritto nel messaggio
news:3DA5FBDC...@blunet.it...

Sicurissimo che si tratta di una casella di testo. Grazie e anche se ho
risolto in modo più brutale, mi piacerebbe venirne a capo. Un saluto. Cld
Newsgroup: it.comp.appl.access
Titolo: setfocus su controllo di una maschera popup

Salve
all'avvio il mio db visualizza la maschera menù principale.
quest'ultimo ha la seguente subroutine :
Private Sub Form_Open(Cancel As Integer)
DoCmd.Maximize
DoCmd.OpenForm "Mdata"
Forms!Mdata!Data.SetFocus
End Sub
ebbene non riesco a fare in modo che il controllo [Data] della maschera di 
popup Mdata prenda lo stato attivo.
come devo fare?
grazie
Michele
 

Michele ha scritto:

Nella tavola delle proprietà della popup "A scelta obbligatoria = Sì"
--
sv
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Newsgroup: it.comp.appl.access
Titolo: errore di sintassi (virgola) come lo risolvo?

Il seguente codice
Me!PROVVIGIONE = DLookup("PROVV", _
"SONTISTICAEPROV", "SCONTOMIN <= " & _
SCONTO & " And SCONTOMAX >=" & SCONTO)
si esegue con un bottone ma genera questo errore:
Errore di run-time '3075'
Errore di sintassi (virgola) nell'espressione della query 'SCONTOMIN <=
0,287514285714286 And SCONTOMAX >=0,287514285714286'.
In pratica il codice che ho scritto sopra "dovrebbe" andare a cercare nella
tabella scontisticaeprov in quale riga si trova il valore SCONTO (presente
nella maschera dove sto lavorando) e scrivermi il valore (sempre nella
stessa maschera nel campo PROIVVIGIONE) della colonna PROVV nella riga
corrispondente.
Nella tabella scontisticaeprov sono presenti i seguenti campi:
IDPROV
SCONTOMIN
SCONTOMAX
PROVV
Grazie a tutti

 ha scritto nel messaggio
news:ja8pb.397832$R32.13...@news2.tin.it...

 Che tipo di campi sono questi nella Tabella...??
SCONTOMIN
SCONTOMAX
La variabile sconto di che tipo è...??(spero non integer)
Poi non è il caso di arrotondare quel numero, visto che
al massimo sommercialmente si arriva alla 4° cifra decimale
e ufficialmente alla 2°.....!!!
Credo ci sia un errore di dichiarazione delle variabili....!!!!
Poi con quella dichiarazione equivale ad estrarre solo quelle
in cui
SCONTOMIN=Sconto e SCONTOMAX=sconto, di fatto
non hai variazione.
Io on sò cosa devi ottenere, ma quanto meno è strano.....!!!
@Alex.

0,287514285714286 And SCONTOMAX >=0,287514285714286'.
... già discusso tempo fa ...
Me!PROVVIGIONE = DLookup("PROVV", _
   "SONTISTICAEPROV", "SCONTOMIN <= " _
   & Str$(SCONTO) & " And SCONTOMAX >=" _
   & Str$(SCONTO))
[cut]
Ciao
--
Alberto
No alle guerre
Newsgroup: it.comp.appl.access
Titolo: problema di collegamento

salve a tutti.
In access 97 sto crecando di razionalizzare (parola per me
fantascientifica) un  precedente archivio. Ho costruito un database
cosi formato:
- tabella1 "pazienti"(dati anagrafici dei pazienti)
- tabella2 "ricoveri" (dati dei ricoveri)
la tabella 1 e 2 sono collegate con un campo idpaziente con relazione
uno a molti (un paziente più ricoveri)
-  tabella3/4/5 "esami strumentali" "farmaci" e accidenti vari
collegati con tabella2  tramite campo idricovero con relazione uno a
molti (in ogni ricovero si possono avere più esami strumentali e dare
più farmaci etc etc) . 
Fin qui mi sembra più o meno (??) razionale.
Il problema è che quando  cerco di fare una query che si basi su tre
tabelle (1,2 e 3) il numero di record che ottengo è spropositato.
La cosa mi sembra abbia un suo senso, (il computer non sbaglia mai, e
access nemmeno, e in generale l'unico che si ...ehm.. confonde sono
io), ma quale è la possibile soluzione?? 

 salve a tutti.
[CUT]
Scusa ma mica ho capito tanto.Intendi dire che il n° dei record restituito č
inverosimile?
Se il db č molto grosso č dificile capirlo.Fatti una copia, scarica il db
della copia e tieniti che so
5 pazienti esegui la qry e contati anche a mano i risultati.Cosě č piů
facile capire il problema.
Ciao
Giuseppe

 ha scritto nel messaggio
news:3eb67a0f...@powernews.libero.it...

Che tipo di Join hai usato?
Può darsi che non hai usato alcun Join tra le tabelle allora vengono
prodotti tanti record quanti se ne ottiengono dal prodotto tra matrici: per
ogni record di una tabella vengono ottenuti tanti record quanti sono i
record dell'altra tabella: quindi se la prima tabella avesse 10 record, la
seconda 15 e la terza 30, la query visualizzerebbe 4500 record, e visto che
le tabelle sono cinque....
Prova a postare il codice SQL della query, la struttura delle cinque tabelle
e i modo incui sono tra di loro in relazione.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: come intercettare l'evento attivato dallo scroll del mouse.

Ho notato che se in fase di inserimento all'interno di una maschera  viene
azionato lo scroll (rotellina) del mouse, automaticamente viene inserito un
record nuovo.
Esiste un metodo oppure un accorgimento per interecettare l'evento provocato
dallo scroll.
Grazie in anticipo
Valerio

b.valerio schrieb:

Il cambio del record si puo controllare con API
http://www.mvps.org/access/api/api0036.htm
--
HTH
Karl
*********
Scusate il mio malissimo Italiano. Faccio solo esercizi qui.
Access-FAQ (Tedesco): 
http://www.donkarl.com
APP: 
http://www.AccessProfiPool.com
Newsgroup: it.comp.appl.access
Titolo: VBA maschera selezione parametri report

ho una maschera che serve come parametrico di lancio di un report.
Questa form contiene una serie di caselle di controllo in base alle quali
dovrebbero variare i dati estratti da determinati campi della query che sta
alla base del report. Ad esempio ho un campo "tipo progetto" che puo' assumere
diversi valori: "investimento", "prevendita" ecc. Per ognuno di questi valori
ho creato una casella di controllo nella form, ma non so come "legare" queste
caselle alla selezione della query: ad esempio se voglio un report che mi
riporti i dati relativi solo ai progetti di tipo "investimento" nella form
metto il flag sulla relativa casella, ma come si fa da VBA a fargli selezionare
solo quelle che voglio?????
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:6ba120925b6a1b4a43b...@mygate.mailgate.org...

Se non ho capito male:
se almeno uno dei controlli e'vero then
stringasql = " where"
if controllo true then
stringasql = stringasql & "tabelle.campo = 'investimento'"
    .
    .
    .
    .
    .
end if
stringasql = stringasql & ";"
e cosi hai costruito la tua stringa sql.
Io personalmente invece di una serie di controlli metterei una combo in modo
da avere sempre un testo a cui fare riferimento. Se puoi fare cosi e' piu'
facile da implementare la stringa sql.
Ciao Alessandro.



comando SQL WHERE
    ....   WHERE flag=true
Saluti.
Emanuele.
Newsgroup: it.comp.appl.access
Titolo: operatore DIVIDE

Ho tre tabelle
tRivenditori(CodRiv, Nomr,.....)
tVendite(CodRiv,CodArt,......)
tArticoli(CodArt, NomArt, ...)
Devo produrre una query per rispondere al quesito:
Visualizza i nomi dei rivenditori che hanno venduto tutti gli articoli.
Con l'algebra relazionale si usa l'operatore DIVIDE.
Cosa si usa con l'SQL di Access?
Un grazie a chiunque voglia aiutare un neofita dell'SQL
Alberto

 wrote in message
fXJu7.7204$Fq5....@news2.tin.it...

Prova con questa query:
SELECT tVendite.CodRiv
FROM tVendite
GROUP BY tVendite.CodRiv
HAVING (((Count(tVendite.CodArt))=(SELECT count(CodArt) FROM tARticoli)));
Fammi sapere.
Gianfry


Immagino che la tabella Vendite abbia dei duplicati relativamente ai
primi due campi, cioe' ci siano ennuple diverse riferite allo stesso
Riv ed allo stesso Art, ma con diverse quantita' o con diverse date.
In tal caso si crea una tabella che elimini i duplicati con la
suguente query:
SELECT DISTINCT CodRiv, CodArtINTO VenditeSelezionate
FROM Vendite
GROUP BY CodRiv, CodArt;
Facciamo una seconda query 
SELECT Rivenditori.NomeRiv
FROM Rivenditori
WHERE Rivenditori.CodRiv=(SELECT VenditeSelezionate.CodRiv
FROM VenditeSelezionate
GROUP BY VenditeSelezionate.CodRiv
HAVING Count(VenditeSelezionate.CodArt)=(SELECT Count(*)
FROM Articoli));
Non e' una soluzione elegante perche' utilizza quattro query (tre
annidate) ma e' l'unica che sono riusito a trovare. Spero che
funzioni.
Saluti.
ing. Franco Varoli
fva...@tin.it
fva...@libero.it


Nella prima riga della prima query ci vuole uno spazio tra CodArt e
INTO.


 ha scritto nel messaggio
news:fXJu7.7204$Fq5....@news2.tin.it...

SELECT Nomr
FROM tRivenditori AliasRivenditori
WHERE NOT EXISTS (SELECT CodArt
            FROM tArticoli AliasArticoli
            WHERE NOT EXISTS (SELECT *
                              FROM tVendite
                              WHERE tVendite.CodRiv =
AliasRivenditori.CodRiv
                               AND tVendite.CodArt = AliasArticoli.CodArt))
Controlla perche' sono un po' arruginito con l'SQL e non ho potuto provarlo.
Ciao
--
Andrea

Newsgroup: it.comp.appl.access
Titolo: File MDE

    Ma esiste la possibilità di risalire da un file MDE al
    relatvo MDB per Access.
    Grazie 

 relatvo MDB per Access.
http://groups.google.com/groups?um=1&tab=wg&hl=en&q=risalire%20da%20mde%20a%20mdb
Un consiglio alle generazioni di internauti che stanno crescendo: compratevi 
una cyber-bussola per i giorni di pioggia.
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution

 wrote in message 
news:875ea355203b08...@news.tin.it...


[omissis]
Immagino che il tuo post volesse essere una risposta a quello di Motore piuttosto 
che al mio.

Newsgroup: it.comp.appl.access
Titolo: Stringhe con apici singoli

Ciao ragazzi,
come si fa quando si ha una variabile stringa che contiene al suo interno 
apici singoli?
Ad esempio nel dichiarare una variabile simile: < strCliente = "IDCliente = 
'" & Me!IDCliente & "'" > possiebo molti ID di questo genere con apici nel 
loro interno.
Che fare?
Grazie e ciao. 

 ha scritto nel messaggio 
news:43203bd5$0$8476$5fc...@news.tiscali.it...


Grazie, cosě funziona, ma perché funziona? Nel tempo in cui viene valutato 
il valore, vengono valutati anche i characters, e quindi la tecnicamente la 
variabile dovrebbe risultare identica: come mai funziona?
Una seconda domanda: come mai la scelta di Chr$ al posto di Chr?
Grazie e ciao :) 

Ma cosa cerchi nell'help? Ho Access 2000 e non ci stanno riferimenti a 
riguardo :\
Cmq grazie e riciao :)
Newsgroup: it.comp.appl.access
Titolo: Progetto Adp e connessione a Sql server

Ciao,
sto cercando disperatamente di cambiare tramite codice vba la connessione
corrente a sqlserver in un progetto adp.(Quella che viene settata dal menu
file /connessione)
Vorrei sapere se esiste la possibilitą di passare da un be ad un altro,
cosi' come si puo' fare con le tabelle collegate  ad un mdb.
Naturalmente tramite codice.
Dalle ricerche che ho fatto io all'oggetto currentproject non si puo'
modificare la stringa di connessione.
E' cosi' ?
Oppure mi sbaglio ?
grazie a tutti
Pietro



glStrStringaConn = "PROVIDER=SQLOLEDB.1;INTEGRATED
SECURITY=SSPI;PERSIST SECURITY INFO=FALSE;INITIAL CATALOG=" & _
       gstrNomeDb & ";DATA SOURCE=" & gstrNomeServer
CurrentProject.OpenConnection glStringaConnPrj
Ciao.
---------------
Guido
light...@flashnet.it

 ha scritto nel messaggio
news:3b8888d3...@news.flashnet.it...

grazie guido
purtroppo non funziona.
A parte il fatto che la variabile stringa che viene richiamata dal metodo
open e' diversa da quella inizializzata prima, comunque (anche sistemando le
cose) mi viene restituito un errore:
Errore di run-time '-
2147467259
 (80004005)'
"Metodo 'Openconnection' dell'oggetto '_Currentproject' non riuscito"
Avevo gią provato a passare la stringa di connessione all'oggetto
currentproject senza risultato.
L'unica cosa diversa che tu hai riportato nella stringa e':
INTEGRATED SECURITY=SSPI
che non so cosa sia
mentre hai omesso per esempio
user id = sa
password = ""
Hai altre idee ?
Grazie mille Pietro

Newsgroup: it.comp.appl.access
Titolo: query con date

Ciao, devo tirare fuori da una tabella tutti i record dove dt_fine (di tipo
datetime) si trova in un dato intervallo di tempo. La query che ho scritto
funziona benino, ma mi tralascia i risultati dell'ultimo giorno
dell'intervallo selezionato. Se poi seleziono un solo giorno, non mi
restituisce nessun risultato. Il problema probabilmente è dovuto al fatto
che il campo è di tipo datetime mentre i valori che passo come limiti per la
ricerca sono date semplici. Esiste un metodo più elegante che aggiungere un
giorno alla data finale per avere risultati corretti?
Ad esempio:
SELECT pippo FROM pluto WHERE dt_fine >=#11/05/2005# AND dt_fine
<=#11/05/2005#
non restituisce nulla, mentre
SELECT pippo FROM pluto WHERE dt_fine >=#11/05/2005# AND dt_fine
<=#11/06/2005#
funziona
Grazie
Ciao

 Ciao
-- 
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: PATH della directory di Access dal file registro

Ciao a tutti,
come si fa a "pescare" la variabile "Path" di Access dal file di
Registro (InstallRoot)?
Per intenderci, nel caso di Access 2002 il Path di Access é:
C:\Programmi\Microsoft Office\Office10\
Grazie,
Roberto LF
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Roberto LF
SysCmd(acSysCmdAccessDir)
Ciao.
-- 
Sergio MAZZA 

 Roberto LF
ti serve proprio dal registro di sistema ?
puoi rilevarla anche da Access
----
syscmd(acSysCmdAccessDir)
----
Ciao
-- 
Giorgio Rancati
[Office Access MVP]


Perfetto!
Grazie ad ambedue siete stati veramente tempestivi ...  :-)
ROberto


Newsgroup: it.comp.appl.access
Titolo: metodo sendobject

Vorrei spedire un report via email, imposto l'argomento Tipo Oggetto
a acSendReport del metodo SendObject. Il Report però non è filtrato a
monte ma dovrebbe essere filtrato quando invio l'email, ma leggendo la
firma del metodo non vi è alcuna possibilità di fare questo.
E' proprio cosi? non c'è nessuna possibilità di filtrare il report con
il metodo in questione?
Grazie a tutti coloro che volessero aiutarmi
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Grazie a tutti coloro che volessero aiutarmi
Il metodo SendObject non ha la possibilità di filtrare il report, si limita
ad incapsolarlo in un messaggio di posta elettronica.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

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

come faccio a compilare un file .mdb velocemente senza visual studio...
magari con qualche software da scaricare dal web???
grazie anticipatamente

 grazie anticipatamente
Credo che anche avendo VISUAL STUDIO sarà difficile....
Vedi Sito Comune Access "COMPILATORE PER ACCESS (IL FAGGONE)"
Credo sia la Miliardesima volta che viene posta questa domanda....
@ALEX.
-- 
Posted from  [62.98.15.82] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 come faccio a compilare un file .mdb velocemente senza visual studio...
Se vuoi un vero .exe devi puntare su Delphi o C++ Builder: VB non è un
comunque un compilatore.
Puoi creare un versione P-Code del tuo progetto VBA creando il file .MDE.
Con la versione Developer di Access puoi distribuire liberamente le
applicazioni sviluppate con Access.
Come già ti disse Alessandro, per altri dettagli Faqqone Sito Comune.
Ciao, Simone
Newsgroup: it.comp.appl.access
Titolo: Query Pass-through URGENTISSIMO!

ho necessità molto urgente di creare una Query Pass-through direttamente da
codice ma non ho trovato il modo di farlo.
sono disperato!
grazie anticipatamente a tutti quelli che mi risponderanno.
Ciao. Nicola.
-- 
Posted from  [192.92.126.162] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:01a6e398df9b013791f...@mygate.mailgate.org...


Newsgroup: it.comp.appl.access
Titolo: Passaggio di valori tra una maschera e un report.

Salve uso A97.
Ho una maschera in stile popup che contiene 2 campi non associati  che
corrispondono ad un intervallo di date (DaData, AData) e un bottone che fa
partire l'anteprima di un report in base all'intervallo di tempo scelto Una
volta premuto tale bottone si apre l'anteprima e la maschera si chiude, fin
quì nessun problema. Il report ha nella sezione "intestazione di report" due
campi non associati che mi devono visualizzare l'intervallo di data per
quella stampa, ma non so come fare a dargli il valore dei campi data presi
dalla maschera, ormai chiusa.
Ho provato creando 2 variabili pubbliche che valorizzo nella maschera e che
associo alle caselle di testo nel report, come origine controllo
(=VarDadata), ma non lo accetta.
Spero ci sia un modo, grazie a tutti.

 Dagli il valore delle date prima di chiudere la maschera
Paolo

 ha scritto nel messaggio
news:zfl_7.40499$s04.1...@news.infostrada.it...

Questa era la mia precedente soluzione, cioè prima di chiudere il form, cosa
per me indispenabile, il campo del report aveva come origine dati
Forms!IntervalloDate![DaData], che effettivamente funzionava in anteprima ma
quando andavo a stampare al posto del valore c'era #Errore, perchè i dati
che conteneva non ci sono piu'.
Ho provato da dentro al report con VB a dargli una data a mano (es.
Testo32="#01/01/02#" )ma ovviamente essendo dati di sola visualizzazione non
possono essere modificati.
Grazie per l'aiuto
Ciao

 possono essere modificati.
La maschera non la chiudi. Sostituisci i controlli di testo con delle
etichette
Su evento apertura del report scriverai
data_da.caption = Forms!IntervalloDate![DaData]
data_a.caption = Forms!IntervalloDate![AData]
Antonio

 ha scritto nel messaggio
news:D_n_7.20867$%B.72...@twister2.libero.it...

Oppure se proprio devi chiudere la maschera crei due variabili a cui assegni
il valore delle date in apertura, a quel punto il valore č memorizzato e ne
fai ciŕ che vuoi
Paolo
Newsgroup: it.comp.appl.access
Titolo: Funzione richiamata da RibbonBar

Buongiorno a tutti, sono alcune ore che sbatto la testa su una cosa
che non riesco a spiegare. Ho creato una Ribbon Bar con il seguente
codice
<customUI xmlns="
http://schemas.microsoft.com/office/2009/07/
customui">
  <ribbon startFromScratch="true">
    <qat>
      <documentControls>
        <button idMso="Copy"/>
        <button idMso="Paste"/>
        <button idMso="PrintDialogAccess"/>
        <button idMso="FileCloseDatabase"/>
      </documentControls>
    </qat>
    <tabs>
      <tab id="MyTab1" label="Primo TAB">
        <group id="MyAnagra" label="Anagrafiche">
          <button id="btnAnagraCom"
                  imageMso="DistributionListSelectMembers"
                  size="large" label="Anagrafica comunicazioni"
                  onAction="ApriForm"
                  screentip="Gestione angrafiche per comunicazioni"
                  supertip="Apre la gestione angrafiche per invio
comunicazioni" />
          <dropDown id="myDropDown"
                    showLabel="true"
                    label="Stampa Etichette"
                    onAction="StampaEtichette">
            <item id="auguri" label="Auguri" />
            <item id="ringraziamento" label="Ringraziamento" />
            <item id="invito" label="Invito" />
          </dropDown>
          <button id="btnElencoAnagra"
                  size="normal"
                  imageMso="PrintDialogAccess"
                  label="Stampa Elenco Completo"
                  onAction="ApriForm" />
        </group>
      </tab>
    </tabs>
  </ribbon>
</customUI>
Le varie onaction le richiamo con queste funzioni pubbliche:
Public Sub ApriForm(control As IRibbonControl)
' Debug.Print control.ID
Select Case control.ID
    Case "btnAnagraCom"
        ' Apre la maschera per gestione anagrafica
        DoCmd.OpenForm "msc_anagra", acNormal, , , , acWindowNormal
    Case "btnElencoAnagra"
        ' Apre il report con l'elenco dei contatti
        DoCmd.OpenReport "rpt_anagra_elenco", acViewPreview, , ,
acWindowNormal
    Case Else
        MsgBox "Non previsto questo caso", vbOKOnly, "Administrator"
End Select
End Sub
Public Sub StampaEtichette(control As IRibbonControl)
    DoCmd.OpenForm "msc_anagra", acNormal, , , , acWindowNormal
End Sub
Ok la funzione (anzi sub visto che le ho provate tutte e 2) ApriForm
funziona senza problemi, mentre la sub StampaEtichette mi da come
risposta che non riesce a trovarla. Ma dove sbaglio secondo voi??
ciao e grazie a tutti


wrote:

Ok forse ho risolto il problema, la funzione che deriva da un dropdown
deve essere costruita in questo modo:
Sub StampaEtichette(control As IRibbonControl, selectedId As String,
selectedIndex As Integer)
End Sub
Newsgroup: it.comp.appl.access
Titolo: Come s'imposta l'attributo Nascosto di un Modulo via VBA?

Scusate, sarà il rincoglinimento da PreMatrimonio, sarà che ho superato la
trentina, sarà che ho passato la scorsa settimana a letto con la febbre,
sarà che non esistono più le quattro stagioni, ma non riesco a trovare
soluzione a questo semplice problemino.
Come stracausio imposto da codice l'attributo Nascosto in un Modulo?
Non è che non ho provato, mi sono ciclato le Properties dei Modules
dell'insieme Documents ma niente da fare.
So che esistono alcune proprietà che devono esser create la prima volta come
la proprietà Descrizione (description) prima di esser impostate.
Difatti riesco tranquillamente a compilare da codice la Descrizione legata
agli Oggetti di database.
Ho provato con:
     Set newPro = ctrCiclo.CreateProperty("Hidden", dbBoolean, True)
con
    Set newPro = ctrCiclo.CreateProperty("Hide", dbBoolean, True)
con
    Set newPro = ctrCiclo.CreateProperty("Attributes", dbBoolean, True)
con
    Set newPro = ctrCiclo.CreateProperty("BastardAccess", dbBoolean, True)
e con ...................
Non continuo con la lista per non trascrivere le parolazze incredibili che
ho creato come properties (dovreste vedere come era poi carino ciclarle
quando facevo il debug :))   ).
Nell'help l'unica cosa attinente trovata è l'uso della  costante
dbHiddenObject che è applicabile ad un Tabledef.
Inzomma riferimenti all'attributo Nascosto per quanto riguarda i Moduli
non ne ho trovati!
Spero d'esser stato chiaro ed in ogni caso sfrutto l'occasione per salutare
la combriccola di Roma. :-)
RoDAgo


Ciao.

 dell'insieme Documents ma niente da fare.
Hai provato a settarlo a mano e a vedere poi da codice cosa ha di diverso
rispetto agli altri moduli? (magari da finestra debug...)
Saluti.
Luciano
(DOC)

 (DOC)
RoDAgo

 ------ omissis ---------
Tra un oretta sono in aereporto, arrivo in serata da te e ti spiezzo in
due!!  :))
RoDAgo

 non ne ho trovati!
per le tabelle, infatti, basta impostare tale attributo (con tutti i casini che
ne seguono!)
se trovo qualcosa ti faccio sapere
-- 
Federico
--------------------------------------
Sito Comune di it.comp.appl.access
http://members.xoom.it/it_db_access
mailto:
it_db_...@usa.net
--------------------------------------
Tutte le richieste che mi arrivano
in privato, vengono cestinate.
--------------------------------------
Rimuovi paperino. per e-mail
--------------------------------------


Ciao.

 ho hatto alcune prove e non ne' ho trovato traccia.
Cettamente, difatti credo che si tratti di un attributo ma tracce non ne ho
trovato.
Il fatto che stia assieme a replicabile non mi ha aiutato!
Mi dispiacerebbe lasciare quel lavoretto che ti ho mandato a metà, fammi
sapere se hai qualche illumination!!
Cià Fede e grazie lo stesso!
(come sono diplomatico quando incasso dai clienti!!  ;-) )
RoDAgo

 Ciao.
Ciao nullafacente, a proposito hai dato un'occhiata a quello che ti ho
inviato?
RoDAgo


...Peggio de 'na cambiale!!! Lo prometto, avrai il responso della giuria;
pazienta un poco.
Ciao.