mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: FilterOn=False oppure filter=""

ciao a tutti
 
da sottomaschera filtro delle fatture
che seleziono da casella combinata
collegata tramite collega campi master e secondari.
 
Ora volendo rimuovere eventuali filtri ad ogni nuova selezione;
in dopo aggiornamento della casella combinata cosa è preferibile
inserire:
 
Me!subform.form.filterOn=false
oppure
Me!subform.form.Form.Filter = ""
 
e che differenza c'è tra i due?
grazie

francodel...@gmail.com
 used his keyboard to write :

La differenza dovrebbe essere evidente.
La domanda dovrebbe essere sulla scelta delle due procedure.
Io le eseguo entrambe, non voglio trovarmi scritta la
stringa di filtro nella proprietà Filter quando FilterOn
è posto a False.
 
Analogamente le eseguo entrambe nel caso contrario:
FilterOn = True
Filter = FilterString
 
Bruno


grazie Bruno

La risposta più completa è che FilterOn oltre che ABILITARE/DISABILITARE la lettura ed applicazione della proprietà FILTER, forza un REQUERY del Set di DATI.
 
Condivido la soluzione di Bruno(che tuttavia non serve con il RUNTIME) di azzerare sempre la proprietà FILTER... ma attenzione alla sequenza, preferisco questa:
 
Per RIMUOVERE
Me.FilterON=False
Me.Filter=vbNullString
 
Per INSERIRE
Me.FilterON=False
Me.Filter="FILTER CRITERIA...."
Me.FilterON=True
 
@Alex


grazie Alex


pur non avendo problemi per il funzionamento
del filtro e neppure errori, 
 
ho provato cosi'
    Me!miasubform.Form.FilterOn = False
    Me!miasubform.Form.Filter = ""
 
e cosi'
 
    Me!miasubform.Form.FilterOn = False
    Me!miasubform.Form.Filter = vbNullString
 
ma non mi cancella la stringa filtro in visulaizzazione struttura della sottomaschera
 
perchè?
grazie

francodel...@gmail.com
 wrote on 12-12-14 :

Perché le proprietà di Form e Report modificate da VBA sono
volatili: quando chiudi Form o Report non vengono salvate.
Per fortuna... pensaci bene!
 
Bruno


grazie Bruno
Newsgroup: it.comp.appl.access
Titolo: Calcolare il tempo

Ho creato una routine per controllare se ci sono state prenotazioni 
negli ultimi tot minuti.
Solo che non riesco ad impostare la differenza tra la variabile Time e 
il tot tempo trascorso
Dim MyTime
MyTime = Time
Set rs = dbs.OpenRecordset("tblprenotazioni", 2)
sqlstr = "[ora] < " & Time & " "
qui in pratica mi dovrebbe beccare il record in cui ora è minore di Time 
meno cinque minuti.
Qualcuno mi può aiutare a scruivere la stringa corretta grazie

 Qualcuno mi può aiutare a scruivere la stringa corretta grazie
    Bisognerebbe conoscere il tipo del tuo campo [ora].
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


inizialmente era formattato come campo data breve.
però posso anche cambiarlo in testo in modo da recuperarmi il numero che 
indica l'ora (tanto è un campo nascosto che serve solo di controllo 
automatico)

 automatico)
    Deduco che il campo e' di tipo Data/ora. Corretto?
    In tal caso devi considerare che in un campo di tipo Data/ora viene
sempre e comunque memorizzata sia una data che un'ora. Ovvero un "numero
seriale di data" di tipo Double, quindi con decimali, che permette la
memorizzazione e manipolazione delle date e degli orari.
    Dato che a te non interessa la parte intera di tale numero, ovvero la
data, ma solo la parte frazionaria, cioe' quella a destra della virgola,
ovvero la frazione di giorno, cioe' un orario, dovrai prima di tutto
ricavare dal valore del campo la porzione orario. La:
        Function TimeValue(Time As String)
            Membro di VBA.DateTime
si occupa proprio di questo. Per esempio:
        TimeValue([TuaTabella].[ora])
    Potrai cosi' confrontare il risultato di tale formula con il valore di
una variabile in questo modo:
        sqlstr = "TimeValue([ora]) < #" & TimeValue(now) & "#"
ovvero usando "valori letterali di data".
    Oppure confrontando i valori delle due date convertiti in valori
letterali numerici:
        sqlstr = "Val(TimeValue([ora])) < " & Val(TimeValue(now))


Grazie e scusa per il disguido avevo letto con superficialità
ora mi metto a fare le prove che mi hai suggerito
Ciao e grazie
Newsgroup: it.comp.appl.access
Titolo: 2 domande (non difficili credo)

Salve a tutti,
volevo sapere come impostare una password affinchè non si possa accedere in
visualizzazione struttura, non una password sul DBase.è possibile?
Come si può azzerare un campo contatore (ossia farlo ripartire da 0) senza
cancellare e ricreare il contatore stesso dalla tabella??
grazie!

 cancellare e ricreare il contatore stesso dalla tabella??
    Dianaaa!...
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------

"Rob Inh00d" <robi...@softhome.netNOSPAM> ha scritto nel messaggio
news:ClkV9.35019$0v.10...@news1.tin.it...
Una sola risposta: scrivi un subject più significativo!!!
Antonio

 --------
Per Giove....!
@Alex.

Newsgroup: it.comp.appl.access
Titolo: formattare...... una data

Ciao ancora,
altro post altro problema...
mi ritrovo a dover fare una query che contiene un campo calcolato su una
data..
il campo lo ho definito cosi:
Data_finale:Data_iniziale-25
dove
Data_iniziale è una data nel formato gg/mm/aa
e -25 è un dato variabile (che per ora ho fissato cosi ma a programma finito
sarà sostituito da una variabile)
Il problema è questo, fino a quando Data_iniziale è una data vera e propria
tutto funziona perfettamente, ma nel momento che Data_iniziale è il
risultato di questa operazione:
iif(Settimana > 31;Data_iniziale;format(data_manuale;'gg/mm/aa'))
il risultato mi da #ERRORE.
Ho notato 1 cosa, inserendo in un altra query i campi Data_iniziale e
format(data_manuale;'gg/mm/aa'),
il primo mi restituisce la data con formatazione testo a DX mentre il
secondo me la restituisce con formatazione a DX,  presuppongo perche il
primo viene effettivamente riconosciuto come data, mentre il secondo è
riconosciuto come testo.....  GIUSTO??
Come faccio a far intendere che sto parlando di una data??
Ciauzz a tutti!!!!
Marco

 ha scritto nel messaggio
news:AbZCc.19087$c_1.5...@twister1.libero.it...

cdate? ... guarda l'help ...

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


perfetto!!!!
grazie mille
Marco

Newsgroup: it.comp.appl.access
Titolo: Ricerche in SITO COMUNE

Ciao grande NG,
mi chiedo come mai se utilizzo da Explorer il comando :
Modifica/Trova in questa pagina,
sul Sito Comune non funziona mentra in altri siti web funziona sempre.
grazie.

[CUT]
Ciao,
sul SC trovi un apposito Motore di Ricerca, prova ad utilizzarlo, ma prima 
leggi l'annotazione sulla configurazione da verificare per risolvere 
eventuale Bug.
Saluti,
-- 
strano...mavero
L'universo è cambiamento; la nostra vita è il risultato dei nostri pensieri.
Marco Aurelio 

Dante ha scritto:

Ne abbiamo parlato l'altra settimana. Vai a cercare tra i post vecchi.
Namor
-- 
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


grazie. !
Newsgroup: it.comp.appl.access
Titolo: pacchetti Access

volevo riformulare la domanda fatta in precedenza. Non voglio un compilatore
ke mi compili i file mdb ma voglio un utility ke mi crei i pacchetti di
installazione e mi permetta di distribuire il programma senza installare
Office cioè copiando ad esempio solo le librerie di run time di Access!
Grazie!

 ha scritto nel messaggio
news:a0ha7r$s8c$1...@nreadb.inwind.it...

Devi comprare Office Developer Edition (ODE) e potrai fare quello che hai
postato.
Ciao Roberto - Syd

sai quanto costa?


Dovrebbe costare intorno ai 2.000.000 di Lire, comunque se vuoi essere
sicuro cerca sul sito della microsoft.
Ciao Roberto - Syd
Newsgroup: it.comp.appl.access
Titolo: controllo condizione fra report e query

Ciao a tutti.
Ho un report basato su una query.
Non tutti i campi della query sono inseriti nel report (o meglio, non
vorrei inserirli tutti).
Devo far eseguire un controllo del tipo:
se il campo X (presente nella query ma non nel report) è vuoto allora
fai questo.
Per il momento ho fatto così (e funziona):
ho inserito il campo nel report, ho tolto la visibilità al campo per
non averlo tra i piedi in fase di stampa e ho generato il codice "su
apertura" seguente:
If IsNull(Me!X) Then
     Me.Z= dieci
Else
     Me.Z= Me!Y
End If
dove:
X è il campo che ho inserito nel report ma non volgio vedere (vorrei
che rimanesse nella query e basta)
Z è un campo effettivamente presente nel report che assume diversi
valori a seconda della condizione
Y è un altro campo ancora.
Fondamentalmente non so come scivere la riga If isnull ..... che va a
leggere il valore della query e controlla se è vuoto o no.
Il campo è testo quindi non so se è il caso di scrivere la condizione
con ="" o è sufficiente scrivere is null. So che non devo scrivere Me!
perché si riferisce al report corrente, ma non so come indicargli la
query e il campo relativo.
Scusate se può sembrare banale le domanda, ma devo mettere molti campi
così nel report che è molto lungo e temo di appesantirlo troppo se
inserisco troppi campi.
Grazie in anticipo e tanti auguri a tutti.
Ciao
---
oierpa


Ciao
Potresti utilizzare la funzione IIF nella stessa queri:
iif([X]<>0;[Y];10)
iif([X]<>0;[Y];"dieci")
mak

 
Si ma non è comodissimo.
Quando creo la query il report non l'ho ancora definito. In pratica, 
genero la query con solo i dati che mi possono servire, poi a seconda 
delle condizioni creo o meno i campi.
La tecnica che dici tu funziona bene (credo) quando sai già cosa 
conterrà, con una certa precisione, il report. Ma io devo impostare che se:
il campo X sulla query è vuoto allora il controllo Y (nel report) deve 
avere un valore statico che imposto io, altrimenti deve prendere il 
valore che legge dalla query.
Quindi se modifico il report devo poi sempre andare a modificare la 
query, saltando qua e la da query a report.
Invece se dal Visual Basic Editor riesco a leggere il dato del campo X 
della query velocizzo di molto la procedura. Purtroppo non so come 
leggere questo dato.
Grazie comunque per l'aiuto.
Ciao e auguri.
-- 
oierpa
Don't follow me, I'm lost too!
Newsgroup: it.comp.appl.access
Titolo: controllo "contatore" in un report, funzione Now...

Saluti a tutti
vi vorrei sottoporre alcuni problemini che non sono riuscita a risolvere:
1)  ho un report che viene aperto da una form; in questa ci sono alcuni
controlli che servono come parametri della query di origine-report. Io perň
devo avere in ogni riga/record del report un controllo con una sorta di
contatore che mi conta i record visualizzati; come fare?
codice      descrizione    data                contatore
---------------------------------------------------
32            pippo            01/01/2001    1
90            pluto             01/02/2201     2
2) Nel report ho dei totali nel pič di pagina e uno nel pič di report;
vorrei fare in modo che il totale alla fine del report comparisse comunque
nella parte bassa del foglio dopo i totali di pěč pagina
3) in una form ho una data in una textbox che ha:
valore predefinito = Now
formato = gg-mm-aaaa
maschera di input = 99/99/0000;0;_
formato campo collegato in tabella = Data aaaa-mm-gg
All'apertura della form č tutto corretto, ma vorrei sapere perché quando ci
clicco sopra per modicare il valore della textbox mi compare la data in
formato esteso con le ore e i minuti. Non č proprio possibile farla
comparire solo con il formato gg-mm-aaaa?
Ok, forse ho esagerato con le domande, ma ho aspettato a raccogliere alcuni
dubbi per postare sul ng.
Grazie in anticipo a chi mi risponderŕ
Ilaria

 comparire solo con il formato gg-mm-aaaa?
usa la funzione date()
la now() riporta anche l'ora
puoi usare anche now() ma non in maniera diretta ma filtrata dalla funzione
format(MyDate, formatodata)

Newsgroup: it.comp.appl.access
Titolo: procedura che apre modalità debug

SALVE
ho modificato una procedura di un pulsante di una maschera
non capisco come mai aprendo la maschera e premendo il pulsante va in debug ma non ci sono errori
se premo F5 esegue tutto correttamente e poi se chiudo la visualizzazione del codice e ri-premo il pulsante non capita nulla
se chiudo il file e lo riapro mi capita la stessa cosa
come posso fare? ho anche fatto una prova dal menu debug - compila Access non ci sono errori né nei riferimenti non ci sono voci mancanti

Taglia ed incolla nuovamente nello stesso posto la porzione di codice su cui si ferma il DEBUG, salva e compila e vedrai che risolvi.
 
@Alex 

>>>>  
http://www.bb2002.it
 :)  <<<<<
........... [ al lavoro ] ...........
Newsgroup: it.comp.appl.access
Titolo: proprietà bordestyle sui form

qualcuno sa spiegarmi perchè non riesco ad impostare la proprietà 
"borderstyle" per le maschere via vba? (non rispondete con facili 
battute.. :p )
il codice è:
me.bordestyle=1
ho provato anche con :
form_nomemaschera.borderstyle=1
form_nomemaschera.form.borderstyle=1
genera sempre errore di runtime 2448 "impossibile assegnare la 
proprietà".
ma la guida di access dice che è possibile!! >:|
-- 
ignazioc


da help
È possibile impostare la proprietà BorderStyle per una maschera soltanto 
in visualizzazione Struttura della maschera utilizzando la finestra 
delle proprietà della maschera, una macro o Visual Basic.
-- 
ac
y-1=x


wrote:

mm...
l'help dice che è possibile via "visualizzazione struttura", macro o
codice vb.
ma il codice che ho scritto io non funziona.
mi sapresti spiegare il motivo?


A occhio l'help dice che se sei "in struttura" puoi attraverso i tre 
metodi indicati cambiare il BorderStyle. Poiche' dall'interno della 
applicazione puoi aprire un form in modalita' "struttura" in quel caso 
puoi acceder via vba.
Almeno questo e' quello che ho capito.
-- 
ac
y-1=x

 ha scritto nel messaggio
news:b0abd401-1437-4600...@e1g2000hsh.googlegroups.com...


E' interpretabile forse.... ma come ti ha detto Alessandro Cara, per le FORM
è gestibile solo in Struttura nei modi previsti..., quindi è normale
che non funzioni...!
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------


che sottigliezze linguistiche...ed io che pensavo fosse frutto di una
traduzione imprecisa.. :)
cmq il problema nasceva dall'idea di uniformare la grafica di tutta
una serie di form nella mia applicazione con una sola procedura.
così, dopo aver creato 200 maschere..posso con una sola procedura
andare ad impostare per tutte e 200 le stesse impostazioni di colore,
font delle textbox,borderstyle, larghezza etc etc in previsione anche
di poter permettere all'utente finale di personalizzare questi aspetti
del programma.
appena ho una demo decente la pubblico.
Newsgroup: it.comp.appl.access
Titolo: in una query ci sono dei record ma non li vedo

l'struzione seguente:
?DCount("id", "miaquery") 
nella finestra immediata vale 3 quindi ci sono 3 record nella query
 
se però apro la query manualmente che è una query di selezione 
non vedo i record.
 
qualcuno sa dirmi il perché?
 
grazie.

Salve,
 
mario rossi:

Controlla se nella proprietà Filtro della query c'è qualcosa che è 
meglio eliminare.
 
-- 
Ciao
Karl
*********
Access Bugs: 
https://AccessForever.org
 
Access News: 
https://youtu.be/cs_mZvaKYeY
 
Access DevCon: 
https://www.donkarl.com/devcon
 
Access FAQ: 
https://www.donkarl.com/it
 


alla fine ho scoperto cosa non andava una casella di riepilogo riportante gli anni mi metteva uno spazio vuoto all'inizio dell'anno.
2023
2024
2025
...

Newsgroup: it.comp.appl.access
Titolo: INTERROGARE STAMPANTI PER NUMERO COPIE  SNMP

Salve,
avrei la necessità di utilizzare il protocollo SNMP  per interrogare
le stampanti della rete e ricevere il numero di copie effettuate.
Non ho trovato nulla nei post precedenti, compreso il sitocomune.
La cosa più simile che utilizzo è:
http://support.microsoft.com/kb/202480
ma non riesco a ricavare il numero di copie ma solo lo stato della
stampante.
Grazie per l'attenzione


Credo che quello che vuoi fare e quello che hai trovato siano 2 cose
diverse...
Quello che hai trovato in MS si appoggia giustamente allo SPOOLER di
stampa un Driver specifico di MS che gestisce l'invio dati alle
stampanti.
Quello che invece vuoi fare tu deve sfruttare gli specifici DRIVER
della casa madre, ma per farlo devi avere le istruzioni per accedere a
tali DRIVER.
C'è da dire che se questi Driver non espongono interfaccia OLE(quasi
nessuno) significa che devi accedere alla DLL specifica usando le API
del Driver....
Tenendo conto che ogni Driver ha strutture diverse e Funzioni
diverse... ogni Driver codice diverso...!!!!!!
Sicuro sia quello che devi fare...?
@Alex

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

Avevo realizzato una query per aggiornare una tabelle excel collegata al
mio db, e fin qui tutto bene.
Ho sostitui il pc passando dal s.o. Windows 2000 a Xp.
Adesso eseguendo la query di cui sopra appare il messaggio di errore
"Per l'operazione č necessaria una query aggirnabile".
Che faccio?
Ciao
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Ciao
Ciao Pippo,
c'è poco da fare, dipende dalla versione di Access.
Quell' opzione è stata disabilitata in queste versioni:
----
Impossibile modificare, aggiungere o eliminare dati in tabelle collegate a
una cartella di lavoro di Excel in Office Access 2003 o in Access 2002
http://support.microsoft.com/kb/904953/
----
Ciao
-- 
Giorgio Rancati
[Office Access MVP]
Newsgroup: it.comp.appl.access
Titolo: Colore sfondo controllo attivo.

Ciao,
dopo vari tentativi mi son dovuto arrendere e adesso devo chiedere a voi, in
un form dove sono presenti molti controlli, vorrei far cambiare colore allo
sfondo del controllo attivo in modo da evidenziarlo o comunque far risaltare
il cursore, negli schermi LCD la definizione non è eccelsa.
Access2000.
Grazie in anticipo.
Diego.


Private sub Biso_enter()
me.biso.backcolor = vbred
me.biso.forecolor = vbyellow
End if
Per un compra_arbitri come lui colorarsi giallorosso deve essere il
massimo!!!
MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it


A questo punto sono arrivato anche io, ma non voglio impostare il colore per
ogni singolo controllo, vorrei che la maschera riconoscesse il controllo
attivo e cambiasse il colore (i controlli sono tanti!!) :)
Comunque grazie. :)

 ha scritto nel messaggio
news:iqFIa.105253$Ny5.3...@twister2.libero.it...

La Form non genera un'evento per ogni controllo, è il controllo
stesso che genera l'evento, quindi puoi solo scrivere una Funzione
generica da richiamare su evento Activate di ogni controllo.
Public Function Colore()
    Screen.PreviusControl.BackColor=ColoreOriginale
    Screen.ActiveControl.BackColor=ColoreInEvidenza
End Function
Nella Mascherina delle proprietà del controllo su evento
non selezionare [RoutineEvento], ma scrivi direttamente
=Colore()
Ciao.
@Alex.

 ha scritto nel messaggio
news:W6FIa.105199$Ny5.3...@twister2.libero.it...

Imposta lo stile di sfondo a "trasparente"...
Ciao.
--
Sergio MAZZA


Grazie @Alex, immaginavo che non ci fosse altra soluzione, ma la mia
"poltronite" voleva sentirselo dire da qualcun altro. :))
Diego

Newsgroup: it.comp.appl.access
Titolo: regola di convalida campo

In una tabella denominata IMMOBILI ho, tra gli altri, i seguenti campi:
[riscaldamento]  campo sì/no
[tipo riscaldamento]   campo ricercato da altra tabella contenente vari
record ("centrd"=centralizzato a gasolio. "autom"=autonomo a metano, etc.)
Vorrei impostare una regola di convalida nel campo [tipo riscaldamento] in
modo che, se erroneamente si tenti di inserire un valore in assenza di
impianto di riscaldamento ([riscaldamento]=false) restituisca un messaggio
di errore da definire.
Nelle proprietà "valido se" del campo [tipo riscaldamento] ho inserito la
seguente regola di convalida:
not ([tipo riscaldamento]="centrm" and [riscaldamento]=false)
ma mi restituisce il seguente errore:
the database engine does not recognize either the field 'riscaldamento' in a
validation expression, or the default value in the table 'immobili'
Ringrazio in anticipo chi vorrà darmi una mano.
Daniela

 ha scritto nel messaggio
news:ONh37.6315$kf3.2...@news.infostrada.it...

Prova ad inserire nell'evento "su attivato" del controllo [tipo
riscaldamento] il codice che verifica la presenza o meno di dati nel
controllo [riscaldamento].
Es.
'------
Private Sub tipo_riscaldamento_GotFocus()
If Me.riscaldamento = 0 Then
    MsgBox "Errore!"
    Me.riscaldamento.SetFocus
End If
End Sub
'------
Ciao.
Newsgroup: it.comp.appl.access
Titolo: Problema di date.

Salve a tutti.
Vado immediatamente a spiegarvi il mio problema:
Allora, ho collegato un tabella FoxPro nel mio data base, in questa esistono
diversi campi tra cui uno riguardante le date.
Il problema è che le date sono memorizzate nella maniera americana
(mese/giorno/anno) quindi eseguendo le queries mi viene visualizzato la data
nel modo detto.
Come posso fare per visualizzare le date nella nostra maniera, escludendo
una modifica della tab stessa?
Grazie a tutti.

 ha scritto nel messaggio
news:slBja.9166$DT4.2...@twister1.libero.it...

MyStr = Format(MyDate, "dd mm yyyy")

 ha scritto nel messaggio
news:IYBja.81665$i26.2...@news2.tin.it...


> > Il problema č che le date sono memorizzate nella maniera americana


Newsgroup: it.comp.appl.access
Titolo: Somma.se

Esiste in Access una funzione simile a quella di excel?
Grazie

 Esiste in Access una funzione simile a quella di excel?
Ciao, Enrico.
    Consulta la Guida in linea di Microsoft Access alla pagina:
        Funzione DSum
-- 
    (Facci sapere se ed eventualmente come hai risolto. Grazie.)
Ciao :o)
Maurizio Borrelli, Microsoft MVP - Office Systems - Access
--------
?SPQR(C)
 X
--------

Newsgroup: it.comp.appl.access
Titolo: Comando apri cartella

Vorrei implementare un comando che mi apre una data
cartella, visualizzando i files contenuti, poi ne scelgo uno
e il suo nome mi deve essere caricato in una casella di
testo. Ho visto nelle FAQ che c'e' la funzione cmdlg_file
che fa uso della GetOpenFileName della libreria
comdlg32.dll, pero' io non voglio una ricerca nell'albero
dell'HD, vorrei limitare la scelta del file a una cartella
precisa
come posso fare?
il barbi

 ha scritto nel messaggio
news:EXmxb.15096$AX1.5...@news1.tin.it...

Usando la funzione Dir (vedi help) puoi scandire il nome di tutti i file
presenti in una determinata directory.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
--------------------------------------------- 


si' ma non mi va bene, io vorrei che mi si apre una tendina
che mi fa vedere tutti i files di quella cartella (o
eventualmente solo i .doc o altri), cioe' esattamente come
me la fa vedere la funzione cmdlg_file della FAQ, e poi
scegliere il file, ma non vorrei che l'utente mi cambi
cartella andando a spasso per l'HD. Forse mi basta cambiare
qualche parametro nella funzione cmdlg_file, infatti ho
provato a porre :
 OpenFile.lpstrInitialDir=la mia cartella e infatti mi
visualizza i files della mia cartella, adesso devo solo
trovare il modo di impedire all'utente di uscire dalla
cartella
il barbi

 il barbi

Newsgroup: it.comp.appl.access
Titolo: codice a barre

egr. sigg. buongiorno.
premetto che sono un autodidatta.
il mio problema è questo. 
genero e stampo un codice a barre. la "pisstola" la riesce a
riconoscere.
adesso devo prendere il valore del codice a barre e inserirlo in un
campo di selezione per attivare una query
come faccio.
grazie anticipatamente delle vs. gentili risposte
carlo saulle
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 carlo saulle
Che significa "la riesce a riconoscere"? ti da qualche output che te lo fa
capire?
-- 
Ciao
Pablitomf (Maurizio Facciuti)
------------------------------
http://www.sitocomune.com/
http://www.accessgroup.it/
------------------------------
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: MESSAGGIO PER ROBERTO

Ho provato questa mattina la soluzione al problema sulle sottomaschere e
funziona!!!!
Ti ringrazio tanto. Potresti risolvermi un'altro problema per favore? Questo
sicuramente è più facile.
La maschera principale del mio programma, dove ci sono tutti i dati del
cliente fa riferimento giustamente alla tabella
clienti. Io vorrei che nella maschera principale i clienti siano
visualizzati in ordine alfabetico quindi ho creato una query
dalla tabella clienti ordinandola per cognome. Ho inserito due tasti sulla
maschera: uno per aggiungere un record e l'altro per eliminarlo e non
funzionano. Sai come posso fare????
Ti ringrazio e a presto!

 dalla tabella clienti ordinandola per cognome.
provo a darti un suggerimento anche io:
non so il motivo per cui non si cancellano i record
perņ credo che puoi ordinare i dati della tua maschera
senza usare la query ma semplicemente
utilizzando la proprietą ordina per della maschera stessa.
Quindi origine datio non in query ma in tabella e ordina per
digiti il campo in base al quale vuoi ordinare
nb se digiti solo il campo lui ordina di default in maniera crescente,
se ti serve in maniera decrescente dalla z in gił mi sembra si usa cognome.desc
o qualcosa di simile, comunque vai nella casella ordina per e poi premi F1 per
la guida in linea di tale proprietą
puoi inserendo una virgola (o puntoevirgola, non ricordo bene) inserire
ulteriori campi
successivi di ordinamento dopo il primo ad esempio il campo nome dopo i cognomi


Sempre per darti soluzioni semplici:
Il modo più facile per far sì che i clienti compaiano in ordine alfabetico,
lasciando la tabella come origine record della maschera, è quello di aprire
la maschera, posizionare il mouse nel controllo della ragione sociale e poi,
sulla barra degli strumenti, premi il tasto Ordinamento crescente (AZ
freccia verso il basso) o quello Ordinamento decrescente (ZA freccia verso
l'alto): da quel momento i record già esistenti e quelli che inserirai in
futuro ti verranno visualizzati in ordine alfabetico; di fatto è la stessa
cosa che settare adeguatamente la proprietà "Ordina per" della tua maschera.
Per dirti il motivo per cui i due pulsanti di comando non ti funzionano,
dovresti postare il codice VBA che hai generato a fronte dell'evento "Su
clic". Cosa puoi fare? cancella i due pulsanti e reinseriscili tramite
l'Autocomposizione controllo: nella prima finestra che ti comparirà
seleziona come Categorie:  "Operazioni su record" e come Azioni: "Aggiungi
nuovo record" oppure "Elimina record"; porta quindi a compimento il wizard
di autocomposizione.
--
Roberto
---------------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Pulsante in maschera per requery

Salve a tutti,
ho una maschera dal nome Cliente sulla quale inserisco i dati dei clienti 
(nome, cognome, indirizzo, ecc.), attraverso un pulsante di questa maschera 
accedo ad un'altra maschera chiamata ClienteTelefono (da premettere che 
detto pulsante fa in modo di filtrare i soli telefoni di quel cliente ovvero 
ha un criterio del tipo [IdCliente] = Me![IdCliente]) sulla quale inserisco 
tutti i numeri di telefono di quel cliente. Il tutto funziona correttamente 
eccetto una cosa:
se inserisco un nuovo cliente e clicco sul pulsante ed inserisco i numeri di 
telefono questi non vengono associati al cliente, se invece inserisco i dati 
del cliente, vado sul record precedente o successivo e poi torno sul cliente 
appena immesso e clicco sul pulsante dei telefoni questi vengono immessi ed 
associati al cliente giusto.
So che per risolvere il mio problema devo fare una requery della mia tabella 
solo che se lo faccio anzichè rimanermi su quel cliente nella maschera mi 
appare il primo cliente e devo tornare manualmente al cliente che stavo 
digitando. Voglio fare un requery per fare in modo che cliccando sul 
pulsante Telefoni Cliente mi possa accettare ed associare quei numeri di 
telefono a quel cliente, ma allo stesso modo vorrei che facendo la requery 
mi rimanesse su quel dato cliente.
Siccome non sono molto bravo in Visual Basic potreste gentilmente dirmi 
quali righe digitare all'interno dell'evento "su click" del mio pulsante? O 
in alternativa guidarmi alla soluzione del mio problema?
Saluti e grazie a tutti coloro che mi leggono e/o che mi rispondono
SimoneB 

 Saluti e grazie a tutti coloro che mi leggono e/o che mi rispondono
Saluti a te
-- 
ac
email: w+1=x

 Saluti a te
Saluti e grazie di nuovo 

 In che senso? :-)
Nel senso che parecchi vogliono le cose subito e con servizio a ***** 
(cinque stelle) invece tu hai scritto:
"O in alternativa guidarmi alla soluzione del mio problema?"
che e' una cosa di rara sensibilita'
-- 
ac
email: w+1=x

Newsgroup: it.comp.appl.access
Titolo: password da finestra

Ciao a tutti,
    vedo spesso parlare di password come protezione di archivi mdb FE.
E' possibile passare la password con il comando docmd.openform ??? perche'
fin ora ho sempre visto questa possibilita' utilizzando metodi quali DAO.
Ho creato un programma in access in cui c'e' un FE MDE e un BE protetto da
PSW, ma quando lancio una qualsiasi maschera il tutto si
blocca......segnalando l'errore di password (che non ho passato come
argomento xche' non so come fare!!)
Come conviene conportarsi ??
Ciao
Grazie
--
* David *

argomento xche' non so come fare!!)
Non e' che per caso prima hai fatto il fe e poi hai messo la
pwd al be?
A me risulta che la pwd (quella banale sul db, non stiamo
parlando di sicurezza utente, vero?) venga chiesta solo
quando alleghi le tabelle, una volta per tutte.
O almeno A97 fa cosi'.
--
Lorenzo Coronati
--
<<Ragazzi, sapete indicarmi una utility in 
internet che sia in grado di recuperare le 
password da un database access e da un system mdw?
intendevo, gratuita...>>
(Marco Tullio Bisoli, 27/04/2001)
--
Newsgroup: it.comp.appl.access
Titolo: Stampare solo la prima pagina del report

ciao a tutti,
ho un problema di questo tipo,
vorrei che la stampante stampasse solo la prima pagina del report a
prescindere da tutto il resto.
Uso questa funzione che, nella prima stampante mi stampa solo 1 pagina,
nella seconda stampante (sempre laser ma di marca diversa) mi stampa una
pagina col report ed una pagina completamente vuota.
Perchè se gli dico di stampare da pag 1 a pag 1?
qualcuno sa aiutarmi?
Questo è il codice che uso.
--------------------------
DoCmd.OpenReport "rptCaricamento", acViewPreview, , "[codice
pratica]=val_prat()"
DoCmd.PrintOut , 1, 1, , 1
DoCmd.Close acReport, "rptCaricamentoKtesios"
-------------------------

 qualcuno sa aiutarmi?

è un problema di margini e dimensione dei controlli del report
modificali lasciando impostata la seconda stampante e gurdandoti
l'anteprima
ciao
-- 
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: cliccare su riga di foglio dati

ciao!
ho una maschera che contiene  test box i quali mi daranno dei risultati 
nella sottomaschera caricata
QUindi Maschera "clienti" con campo CercaNome"
La sottomaschera clienti mi dai x record in risultato
La sottomaschera č in formato foglio dati
Vorrei che cliccando sul record che mi interessa,nella sottomaschera 
clienti, mi si apra il record relativo di quel cliente della maschera 
"Vendite"
insomma fondamenalmente come si fa a far aprire un altra maschera cliccando 
su un record, e eseguire la query sull maschera ch apriro in base al valore 
di uno dei campi...
spero di esser stato chiaro
grazie 

 grazie
Gestisci l'evento "su doppio clic" della sottomaschera, qui inserisci il codice VBA:
es.
if not isnull(me!idcliente) then
    DoCmd.OpenForm "Vendite",,,"idCliente=" & me!idCliente
end if
Ciao.
-- 
Sergio MAZZA 


GRANDE!!!!!
Grazie!!!!

Newsgroup: it.comp.appl.access
Titolo: Rettangolo visibile e non visibile

Buon Giorno,,,
A97
in un report vorrei che un rettangolo chiamato 'pippo' fosse visible false 
se la casella 'tipo pagamento' avesse valore '2' (legato alla descrizione 
BONIFICO BANCARIO)....come posso fare!!!!
Se uso un IF mi dà errore???!!!
Grazie
Luigi 

 ha scritto nel messaggio 
news:5N5wk.3366$YZ3...@tornado.fastwebnet.it...

Dovrebbe essere:
If Me.TipoPagamento = 2 then
Me.Rettangolo.Visible = false
else
Me.Rettangolo.Visible = True
End if
Controlla bene i nomi dei controlli e specifica il tipo di errore che da.
Ciao, Carlo 

 ha scritto nel 
messaggio news:g9qq3v$a73$1...@tdi.cu.mi.it...

Mi da errore...dice che non riesce a trovare il riferimento...alla mascgera, 
casella, etc....
Boh
AIUTOOOOOOOOOOOO
Ciao

 - Mostra testo citato -
Su che evento del report inserisci il codice ?
Per chiedere informazioni bisogna essere particolarmente dettagliati,
per risparmiare il tuo tempo e il tempo di chi volenterosamente
intende aiutarti.
Consiglio:
Per studiare meglio il comportamento di Access durante l'esecuzione,
specialmente quando dà errori del tipo, l'oggetto non p stato creato,
la proprietà specificata non esiste, ecc ti conviene mettere
un'interruzione all'inizio della parte "sensibile" del codice e poi
usare la Finestra Immediata (CTRL-G) per esplorare gli oggetti, le
variabili ecc.
es.:
Non trovo la maschera
per capire quale sia la maschera o il report attivi provi nella
Finestra Immediata a scrivere
? Me.name
dovrebbe restituire il nome dell'oggetto attivo (maschera o report che
sia)
poi procedi con
? 
me.miocontrollo.name
se ti dà lo stesso nome del controllo allora il controllo esiste
e così via.
Ciao
AleC
Newsgroup: it.comp.appl.access
Titolo: Esiste in access select di questo tipo??

Salve a tutti. Il mio problema è il seguente:
Io vorrei visualizzare, a partire dalla data odierna, la prima data
disponibile (e solo quella) per effettuare la prenotazione della specialità
al quale l'utente è interessato.
Il problema non è visualizzare i buchi disponibili dalla data odierna..il
problema è visualizzare solo il primo buco disponibile.
In pratica un semplicissimo sistema di prenotazione che visualizza la prima
data disponibile per effettuare la prenotazione a partire dalla data odierna
 Esiste una sintassi del tipo: select first o select one...o come posso
fare????
Perfavore aiutatemi è necessario per me riuscire a farlo!!!!!
Grazie Enzo

 ha scritto nel messaggio
news:tEkGa.86303$lK4.2...@twister1.libero.it...

Esiste la clausola TOP che serve per restituire i primi n record.
Select top 10 .....
restituisce solo le prime 10 righe del recordset.
Bye

Newsgroup: it.comp.appl.access
Titolo: nome sottomaschera per routine

ho bisogno di passare il nome di una sottomaschera a questa routine
esterna alla maschera e non riesco a trovare la sintassi corretta
For Each ctl In NomeMascheraInteressata.Form.Controls
MsgBox 
ctl.name
Next ctl
in sostanza voglio tramite un pulsante passare il percorso della
sottomaschera che mi interessa. come bisogne fare?
ciao a tutti
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Se il controllo che contiene la sottomaschera si chiama Maschera2.
Se il pulsante di comando si chiama Comando4 e sta nella maschera
principale.
In un modulo registra questa funzione:
Public Function ElencoControlli(NomeMaschera As Form)
Dim ctl As Control
For Each ctl In NomeMaschera.Controls
    MsgBox ctl.Name
Next ctl
End Function
ed a fronte dell'evento "Su clic" del pulsante di comando genera il seguente
codice VBA:
Private Sub Comando4_Click()
Call ElencoControlli(Me!Maschera2.Form)
End Sub
Se invece vuoi ll'elenco dei controlli della maschera principale genererai
il seguente codice VBA:
Private Sub Comando4_Click()
Call ElencoControlli(Form)
End Sub
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Roberto da casa ha scritto:








sei stato come al solito gentile e molto chiaro.
funziona tutto.
ciao e mille grazie

Newsgroup: it.comp.appl.access
Titolo: Problemi nel ricreare caselle dei pulsanti di spostamento

Salve,
vorrei ricreare i pulsanti di spostamento di una maschera che ha come
origine una query, con annessa la casella che visualizza il record
corrente e quella che visualizza il numero totale di record.
Per i pulsanti, credo non ci siano problemi.
Quello che vorrei chiedere è come riuscire a ricreare le due caselle.
Ho fatto vari tentativi, seguendo dei consigli che ho trovato su questo
newsgroup, ma ho i seguenti problemi:
1- Per la casella che visualizza il record corrente, non sono riuscito
a trovare il modo di farla funzionare come quella predefinita di
access, cioè fargli visualizzare il record corrente, ma anche, in caso
di digitazione nella stessa di un altro numero di record, farla andare
al record che ho digitato, premendo invio.
2. Per la casella che visualizza il numero totale di record, ho provato
sia con DCount che con Count, ma mi dà lo stesso problema, cioè
quando apro un nuovo record, non lo conteggia. Ho, ad esempio, questo
risultato: "recordcorrente 6" di 5 totali.
Ringrazio per l'eventuale aiuto.

 Ringrazio per l'eventuale aiuto.
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it

 Questo perchè ancora non lo hai salvato
Appunto. Quello predefinito di access, invece, conta anche il nuovo
record non ancora salvato.


Newsgroup: it.comp.appl.access
Titolo: Funzione DCount ...

Buon giorno a tutti, una piccola cortesia per risolvere un "grande
problema" funzionale.
Utilizzo la seguente funzione per ottenere il numero dei documenti
archiviati rispetto ad un determinato anno:
=DCount("NumCoord";"tblCoord";"idAnno=" & Maschere!Anni!IdAnno)
vorrei poter sapere anche quanti di questi corrispondono
effettivamente all'archiviazione cartacea ... per questo ho un campo
che custodisce il path del file relativo al documento.
Quindi non saprei come modificare la predetta espressione per far si
che recepisca -ritengo- il numero dei record in cui il campo path è
NULLO sempre riferito ad un determinato anno.
Grazie a tutti per l'attenzione e buona giornata.
Francesco

 Grazie a tutti per l'attenzione e buona giornata.
  =DCount("NumCoord";"tblCoord";"idAnno=" & Maschere!Anni!IdAnno & " and 
campoanno is null")
Il parametro criteri delle D[fun]  e' esattamente una WHERE senza la 
parola medesima.
--
ac

 campoanno is null")
naturalmente
=DCount("NumCoord";"tblCoord";"idAnno=" & Maschere!Anni!IdAnno & " and
[campopath] is null")
--
ac


Grazier Alesandro, innanzitutto per l'immediatezza della risposta ma
più che altro per la spiegazione che mi hai fornito ... avevo sempre
problemi con questa benedetta funzione ma ora mi è decisamente più
chiara ...
Di nuovo grazie e buona giornata
Francesco
P.S. ... ovviamente funziona alla perfezione
Newsgroup: it.comp.appl.access
Titolo: CERCO TABELLA

Gentili...cerco in rete TABELLA TRIBUTI AGENZIA delle ENTRATE...x caso 
esiste???
Grazie e buona giornata...
Luigi
Bari

 Grazie e buona giornata...
Se ti riferisci ai codici tributo...
http://www.agenziaentrate.it/ilwwcm/connect/Nsi/Strumenti/Modulistica/Versamenti/modello+f24/Tabelle+dei+codici+tributo+e+altri+codici+per+il+modello+F24/Tabella+codici+tributo+erariali+e+regionali/
Bruno


Come esporto in ACCESS ????
Grazie 1000
Luigi 

Prova questo
http://tinyurl.com/ku4b9f
Ciao
Alex

 Luigi
Con un .pdf niente da fare...
Bruno 

 ha scritto nel messaggio 
news:8446d35d-44d4-42a2...@r2g2000yqm.googlegroups.com...

Grazie 1000....

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

Ciao a tutto il NG,
L'istruzione:
DSum("importo", "fatture", "DataSituazione=#" & GetDataUltimoAggiornamento & "# and codicecliente='"
& Me.Codice.Value & "'")
mi restituisce sempre il valure null su un pc (win 98), mentre in quello di casa (win xp) funziona
perfettamente (in entrambi i casi è istallato Office 2000). Dopo un po' di verifiche ho trovato
l'origine dell'errore.
Se sostituisco  la chiamata alla funzione GetDataUltimoAggiornamento con una data, allora tutto
funziona su entrambi i pc.
Dov'è l'errore ? Ecco anche il codice della funzione GetDataUltimoAggiornamento che ho registrato in
un modulo a parte:
Function GetDataUltimoAggiornamento() As Date
Dim Provv As Recordset
    Set Provv = New ADODB.Recordset
    With Provv
        .ActiveConnection = CurrentProject.Connection
        .Open "Generale", , adOpenKeyset, adLockOptimistic, adCmdTable
        .MoveLast
        GetDataUltimoAggiornamento = .Fields("UltimoAggiornamento")
        .Close
    End With
End Function
 
Grazie a tutti in anticipo
Stay alive !
Pio Pio
Win XP & Office 2000
www.ticom.it/tennisbuscate





Scusate ho postato male il messaggio. Chiedo venia.



Newsgroup: it.comp.appl.access
Titolo: Formula in una QUERY

Salve ,Ringrazio anticipatamente per il Tempo che mi dedicherete, ho un
grosso problema e cerco di risolverlo.
dovrei calcolare i giorni di intervallo Esempio
Campi:
Paziente               Reparto              data Inizio
data fine            Intervallo?
Rossi Mario        Ortopedia            20/10/04                    21/10/04
Rossi Mario        Ortopedia            30/10/04                    10/11/04
Rossi Mario        Ortopedia            15/11/04                    20/11/04
 Quello che a me interessa e questo Al primo ricovero mi deve scrivere 1°
ricovero Nel (Espressione Intervallo:)
poi mi deve calcolare l'Intervallo di giorni ce sono trascorsi dalla data
fine Ricovero del primo ricovero alla data Inizio per il secondo ricovero e
eventuali successivi per ogni record dello stesso paziente,
Chiedo come posso gestire questo grosso problema non riesco a dire a access
data inizio del secondo ricovero - data fine del primo ricovero
Grazie per l'aiuto che mi darete

 ha scritto nel messaggio
news:YSzdd.50333$N45.1...@twister2.libero.it...

Perchè non dai un Id al paziente e non crei una tabella ricoveri
relazionata?
Non puoi mettere tutto nella stessa tabella dopo diverrebbe ingestibile.
Crea una tabella Ricoveri
IdPaziente un Id per i vari ricoveri (inizio e fine)
Sperando che poi "guariscano"! (battutaccia eh?)

> In tal caso sql DELETE. Esiste sempre una soluzione :)
Eutanasio!

Newsgroup: it.comp.appl.access
Titolo: info mysql

ciao a tutti,
vorrei sapere se qualcuno mi sa indicare un link con informazioni
dettagliate su mysql in particolare se crea problemi con visual c++
grazie x l'aiuto!
p.s. se possibile in italiano
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Forse non è il NG giusto...
www.mysql.org
Non dovresti avere alcun problema dal momento che ti connetti usando ODBC.
Ciao.
Giorgio

Newsgroup: it.comp.appl.access
Titolo: Visualizzare una casella di testo in formato data

Ho la necessità di visualizzare una casella di testo di una maschera nel 
classico formato data "__ /__ /____", in modo da inserire i valori negli 
appositi spazi senza digitare la barra divisoria.
Qualcuno può dirmi come fare ?
Grazie 

Amico ha scritto:

nelle proprietà della casella di testo:
Dati->Maschera di Input
poi segui il wizard e scegli la tua configurazione

Grazie mille, anche per la velocità.
Ciao
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/
Newsgroup: it.comp.appl.access
Titolo: Criterio da file esterno (excell)

Salve a tutti.
Premesso che non sono un esperto di access ho questo caso :
Da una tabella tipo : Codice , Quantità, Datacarico
estraggo una query che raggruppa per ogni codice , il totale quantità per
mese.
Dove mese è la funzione month(Datacarico)
E' possibile dire di estrarre solo i dati di un particolare mese, puntando
ad un file esterno ? Il dato lo può trovare in un file excell di nome pippo
in una tale cella .
Tipo: pippo.worksheets("foglio1").Cells(A1).value
Grazie a chiunque mi risponderà.
Diego Vetturi
--------------------------------
Inviato via 
http://usenet.libero.it

 Diego Vetturi
Cià
RoDAgo

 Tipo: pippo.worksheets("foglio1").Cells(A1).value
        SELECT
            ...
        WHERE
            Mese
            =
            RicavaMeseDaFoglioExcel
            (
              "C:\TuoPercorso\Pippo.xls"
            , "Foglio1"
            , "A1"
            )
        ...
        ;
Public Function RicavaMeseDaFoglioExcel( _
  ByVal WbkFullFileName As String _
, ByVal WksName As String _
, ByVal RngName As String _
) As Integer
  On Error GoTo erh
  Const c_sAppClass = "Excel.Application"
  Dim oXlApp        As Object
  Dim oXlWbk        As Object
  Dim oXlWks        As Object
  Dim bXlQuitOnEnd  As Boolean
  On Error Resume Next
  Set oXlApp = GetObject(, c_sAppClass)
  bXlQuitOnEnd = Not (err.Number = 0)
  On Error GoTo erh
  If (oXlApp Is Nothing) Then
    Set oXlApp = CreateObject(c_sAppClass)
  End If
  With oXlApp.Workbooks
    Set oXlWbk = .Open(WbkFullFileName, True, True)
  End With
  With oXlWbk.Worksheets
    Set oXlWks = .Item(WksName)
  End With
  With oXlWks
    RicavaMeseDaFoglioExcel = .Range(RngName).Value
  End With
ext:
  On Error Resume Next
  oXlWbk.Close False
  If (bXlQuitOnEnd = True) Then
    oXlApp.Quit
  End If
  Set oXlWks = Nothing
  Set oXlWbk = Nothing
  Set oXlApp = Nothing
  Exit Function
erh:
  With err
    Debug.Print _
        "ERL#"; Format$(Erl, "0000"); ";" _
      ; "ERR#"; CStr(.Number); ":" _
      ; .Description; "."
  End With
  Resume ext
End Function
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------
Newsgroup: it.comp.appl.access
Titolo: Controllo2 obbligatorio a seconda del controllo1

Ho due controlli in una sottomaschera [Importo] e [Valuta].
Vorrei che entrambi i controlli diventino obbligatori, solamente se uno dei
due č diverso da null.
Ad esempio se nel controllo [Importo] o [valuta] non inserisco niente, bene
cosě. Se invece nel controllo [Importo] inserisco qualcosa, ecco che il
controllo valuta deve diventare obbligatorio e viceversa.
Qualche suggerimento?

 Qualche suggerimento?
Se hai un pulsante che ti salva tutto quello che hai inserito, inserisci
questo codice prima di salvare:
if not isnull(importo) and isnull(valuta) then
  msgbox "Ciccio, sta somma cad'è, patate? la voi impizza la valuta?"
elseif not isnull(valuta) and isnull(importo) then
  msgbox "Ciccio, lo volemo impiozzà il conquibus?"
else
  salva record
end if
Antonio

Newsgroup: it.comp.appl.access
Titolo: Query e "usabilita'"

Dalla mia domanda capirete che sono praticamente a zero con ACCESS, e
pertanto mi piacerebbe sapere qual'e' l'oggetto che permette di effettuare
una ricerca in una tabella, senza che pero' l'utente/fruitore debba
intervenire nelle query, ho visto da alcuni database di esempio che grazie
alle maschere e' possibile immettere dati nelle tabelle, ma sarebbe
possibile anche effettuare ricerche, estrarre dei risultati, o le eventuali
ricerche che andra' poi ad effettuare il cliente di devono preventivare,
prevedere e pertanto costruire dapprima delle query, so di essere magari
inopportuno a fare una domanda cosi' elementare in un ng che mi pare
avanzato, ma se c'e' qualche anima disposta a perdere due minuti per
aiutarmi la ringrazio sin da ora...
ciao a tutti
R1/2

"ranma1/2" <nos...@lo.news> ha scritto nel messaggio
news:Jdqwa.245$lK4....@twister1.libero.it...

Questo è quello che posso dirti.
Puoi preparare una maschera con origine record una query che abbia dei
criteri basati su dei controlli nella maschera stessa.
Ad ogni inserimento di valori in questi controlli viene fatta una requery
della maschera che viene filtrata su questi valori.
Cerca un po' di esempi sull'help e sul sitocomune
Antonio