mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: On Error GoTo 0

Quando si incontra questa riga:
 
On Error GoTo 0
 
cosa significa?
 
Io infatti  uso di solito:
 
On Error GoTo nomeprocedura_Error
 
Grazie e saluti 
 
 

vittorio formulated the question :

On Error Goto 0 serve a disattivare la routine di errore.
La quale routine di errore dovrebbe essere specifica per ogni possibile 
tipologia di errore quindi dovrebbe essere disattivata appena si 
verifica il salto a, per usare la tua terminologia, 
nomeprocedura_Error.
Cosicchï¿œ sia possibile riutilizzare On Error Goto ovvero On Error 
Resume Next in altre parti della procedura che richiedano differenti 
gestioni dell'errore.
 
Facile a dirsi, piï¿œ complicato da esemplificare.
Provo a cercare qualche segmento di codice che possa chiarire meglio il 
concetto.
 
Bruno
 
 

vittorio ha scritto:

Vedi se ti pu� essere utile:
 
http://www.accessgroup.it/vba/gestione-errori.html
 
 
--
sv
 
-- 
 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
 
 
 

 
http://www.accessgroup.it/vba/gestione-errori.html
 
 
 
 
mi sembra che ci sia un errore nel commento al seguente listato:
 
Private Sub Comando0_Click()
On Error GoTo Err_Comando0_Click
 
Dim stDocName As String
 
stDocName = "Maschera1"
DoCmd.OpenForm stDocName
 
Exit_Comando0_Click:
Exit Sub
 
Err_Comando0_Click:
MsgBox Err.Description
Resume Exit_Comando0_Click
 
End Sub
 
commento :" Se nella procedura non si verificano errori, vengono eseguite 
tutte le righe  fino all'istruzione Exit Sub e pertanto il codice della 
gestione degli errori che succede ad Err_Comando0_Click: non viene 
eseguito."
 
Ma non dovrebbe invece in tal caso terminare con l'istruzione "end sub" ? E 
saltare quindi anche "exit sub"  ? 
 
 

> Vedi se ti puï¿œ essere utile:

No, la sequenza ï¿œ corretta, ed ï¿œ quella normalmente usata.
 
Sub Test()
. . . . .
On Error Goto Error_Handler_1
<<riga o righe di codice che possono generare lo specifico errore_1>>
On Error GoTo 0
. . . . .
Continua_1:
. . . . .
. . . . .
. . . . .
On Error Goto Error_Handler_2
<<riga o righe di codice che possono generare lo specifico errore_2>>
On Error GoTo 0
. . . . .
Continua_2:
. . . . .
 
Exit_Sub:
    Exit Sub
 
 
Error_Handler_1:
     (*) On Error GoTo 0
     (**) MsgBox Err.number & vbCrLf & Err.Description
     ... codice di gestione errore ...
     Resume Continua_1
          ovvero
     Resume Exit_Sub
 
Error_Handler_2:
     (*) On Error GoTo 0
     (**) MsgBox Err.number & vbCrLf & Err.Description
     ... codice di gestione errore ...
     Resume Continua_2
          ovvero
     Resume Exit_Sub
 
(*) Se chiudi con Resume Exit_Sub puoi anche ometterlo
(**) Opzionali l'inserimento e il collocamento
 
End Sub
 
Direi che ï¿œ quasi tutto per quanto concerne On Error GoTo...
Molto piï¿œ semplice, come ti sarai reso conto, On Error Resume Next.
 
Bruno
Newsgroup: it.comp.appl.access
Titolo: Riusare il DB

Salve a tutti,
	presento subito il quesito (sicuramente semplice da risolvere
da voi altri): mi sono fatto il mio DB e l'ho usato, ora vorrei
riusarlo. Mi spiego meglio: vorrei riusare le tabelle e il resto per
dei nuovi dati e creare un nuovo DB seza dover cancellare i record
presenti (i record vecchi).

 ha scritto nel messaggio
news:3a560769...@news.libero.it...

Detta cosě potrei risponderti che un DB fatto con Access lo puoi utilizzare
quante volte vuoi... ma forse intendevi dire qualcos'altro.
Che cosa esattamente?
--
Silvio
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access

 ha scritto nel messaggio
news:3a560769...@news.libero.it...

Collega le tabelle del nuovo DB alle tabelle del DB già esistente, oppure,
se non aggiornerai più le tabelle con il vecchio DB, importale nel nuovo DB.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: [?] Problemi con casella combinata

Salve a tutti,
Ho un problema con l'utilizzo della casella combinata in una maschera.Ho
creato la casella combinata riferita ad una tabella con due colonne, quando
visualizzo la maschera e clicco sulla casella mi escono i dati della tabella
ma non mi permette di sceglierne uno e mi dice:"controllo associato al campo
.... sconosciuto".
Perche fa cosi, c'č qualche proprieta che ho omesso??
Mi dareste una mano?
Ciao a tutti e grazie anticipatamente MatteoC.
--------------------------------
Inviato via 
http://usenet.libero.it


Leggi cosa c'è scritto in "Origine Controllo" della combo. Cancella il
valore e tutto funziona.
Ciao, Carlo

 valore e tutto funziona.
Ok fatto e funziona, finche ci sono ti chiedo anche questo: se la combo e
riferita ad una tabella con due colonne, colonna1 tipoDato e colonna2
descrizioneDato, selezionando il tioDato dalla combo come faccio a
visualizzare in una casella di testo a parte il relativo campo
descrizioneDato?



Se la colonna associata è la prima (1) e se il controllo testo si chiama
MioTesto e se quello che vuoi vedere nel controllo è la seconda colonna
della combo allora:
Me.MioTesto = Me.MiaCombo.Column(1)
Puoi mettere il codice sull'evento Click della combo. Ti ricordo che in VBA
la prima colonna è la zero.
Se la colonna associata è quella che ti interessa (la seconda) ma è
visualizzata solo la prima o entrambe:
Me.MioTesto = Me.MiaCombo.
Ciao, Carlo
Newsgroup: it.comp.appl.access
Titolo: dilemma su filtro da applicare a maschera e funzione filtro

ho una form con una casella combinata che può assumere i seguenti 2 valori
"consegnate" oppure "non consegnate"
le consegnate hanno il campo "dataeffettivaconsegna" diverso da null quelle
non consegnate sono invece a null, su dopo aggiornamento della
casellacombinata eseguo il seguente codice
    Me.Filter = CostruisciFiltro
    Me.FilterOn = True
dove CostruisciFiltro è una funzione seguente:
-------------------------------------------------
Function CostruisciFiltro() As String
CostruisciFiltro = ""
If (Forms![commesselistato]![CasellaCombinata195] <> "") And
(IsNull(Forms![commesselistato]![CasellaCombinata195]) = False) Then
        If Forms![commesselistato]![CasellaCombinata195] = "consegnate" Then
            CostruisciFiltro = CostruisciFiltro &
"[dataconsegnaeffettiva]<>null"
        ElseIf Forms![commesselistato]![CasellaCombinata195] = "non
consegnate" Then
            CostruisciFiltro = CostruisciFiltro & " and
[dataconsegnaeffettiva]=null"
        End If
End If
End Function
Non mi funziona, sapreste aiutarmi voi? Grazie.

 Non mi funziona, sapreste aiutarmi voi? Grazie.
    I confronti con Null si fanno con l'operatore "Is". Es.:
        [dataconsegnaeffettiva] Is Null
        [dataconsegnaeffettiva] Is Not Null
ma potresti anche scrivere:
        IsNull([dataconsegnaeffettiva])=True|False
    Considera anche la possibilita' di valutare:
        Forms![commesselistato]![CasellaCombinata195]
in questo modo:
        Select Case "" & Forms![commesselistato]![CasellaCombinata195]
        Case "Consegnate"
          ' ...
        Case "Non consegnate"
          ' ...
        Case Else
          ' ...
        End Select
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


si però non risolve il mio problema, ho provato anche a mettere nei criteri
del campo dataconsegnaeffettiva il seguente:
=forms![listatocommesse]![campo]
dove a campo gli assegno i seguenti valori
se casellacombinata="consegnate"         campo="is not null"
se casellacombinata="non consegnate"         campo="is null"
però  non funziona, dovrei riuscire a togliere gli apici credo ma non ci
riesco, qualcuno sa illuminarmi.
Newsgroup: it.comp.appl.access
Titolo: For each su caselle di testo

Come si fa, a controllare in una maschera, se tutti i controlli caselle di testo,
abbiano almeno un valore inserito (alcuni sono data altri testo e numeri).
Alcuni controlli a volte possono non essere visibili, per cui il ciclo va sempre
fatto solo su quelli visibili.
n.b. oltre ai controlli caselle di testo ho anche dei controlli caselle combinate
(che non devono essere ciclati).
Ipotizzo un ciclo for each solo sui controlli testo che vada a verificare se il testo è
diverso da null.
if for each controllo diverso da null
allora apri maschera2
altrimenti msgbox controllotesto n2 è vuoto, n5 è vuoto
exit sub (e quindi non apre la masch2)
end if
E' inoltre possibile fare in modo che la msgbox di avviso elenchi tutti i controlli vuoti?
Le caselle di testo non sono associate a nessun campo.
Nel caso di caselle associate cambia qualcosa nel codice?
thank you
--------------

 E' inoltre possibile fare in modo che la msgbox di avviso elenchi tutti i
controlli vuoti?
app = ""
for each ctl in me.controls
  if ctl.controltype = actextbox then
    if isnull(ctl) or ctl = "" then
      app = app & 
ctl.name
 & vbcrlf
    end if
  end if
next
if app = "" then
  docmd.openform "maschera2"
else
  msg = "I controlli vuoti sono:" & vbcrlf & app
end if
Antonio

 end if
azzo!!
cihai proprio le palle, altro che quelle degli alberi natalizi.
complimenti e grazie
è possibile far scrivere nella msg per ogni 
ctl.name
 che ho
dall' if un nome corrispondente più significativo visto
che nel dare i nomi alle caselle di testo ho usato
delle sigle tipo tst_siglafonte_m001 oppure t_codice_m002 e
che non mi è possibile ridare i nomi causa altro codice che fa riferimento
alle sigle già usate.
ipotizzo qualcosa di simile:
     for each ctl in me.controls
         if ctl.controltype = actextbox then
             if isnull(ctl) or ctl = "" then
if 
ctl.name
=sigla1 then miavariabile= Nome1
if 
ctl.name
=sigla2 then miavariabile= Nome2
if 
ctl.name
=sigla3 then miavariabile= Nome3
         app = app & miavariabile & vbcrlf
        end if
      end if
  next
è inoltre possibile contare i controlli vuoti o null
e scriverlo nella
if app = "" then
  docmd.openform "maschera2"
else
  msg = "Ci sono" & XX & "controlli vuoti" & "I controlli vuoti sono:" & vbcrlf & app
end if
dove XX è il numero dei controlli vuoti
per chi segue il post è ha poca dimestichezza con Vb
all'inizio del codice va  aggiunto
Dim ctl as control
e Dim app as string (dichiaro le due variabili)
e al posto di msg del codice ho scritto direttamente msgbox
Thank you mister Biso

 Thank you mister Biso
Prego prego...
Se poi vorresti girare questo post al Bettini, tanto per farlo rosicare un
po', lo puoi fare...
Eh eh eh
Antonio
Newsgroup: it.comp.appl.access
Titolo: Ingannare il contatore

Per cortesia un consulto.
Esempio:
In una tabella o maschera, ho un record corrispondente ad una Ditta chiamata
Pippo con un campo in cui è stata inserita una fattura denominata 0001
corrispondente a Id contatore 10. In seguito, ad ulteriori inserimenti di
record, l'Id contatore aumenta in modo crescente.
Domanda:
Alla previsione di un ulteriore fattura (per modifica o altro ) della stessa
Ditta chiamata Pippo e denominata 0001BIS ,vi è la possibilità di inserirla
al valore contatore 11 facendo scorrere gli altri record?
Spero di essere stato chiaro
Grazie Giorgio

 ha scritto nel messaggio
news:2nfqb.421340$R32.13...@news2.tin.it...

I campi contatore sono una bestiaccia gestita in esclusiva da Access, per
fare quello che vuoi tu dovresti usare un campo progressivo proposto da VBA
e poi lasciato modificare durante l'imputazione della fattura.
Per il N° fattura unito alla dicitura /BIS usi 2 campi, oppure un unico
campo alfanumerico?
Potresti usare un campo numerico con 1 decimale, in cui la parte intera
sarebbe il N° fattura e l'eventuale decimale rappresenterebbe il /BIS,
/TRIS, ecc....
Non puoi direttamente eliminare il campo contatore ed usare il N° fattura
come chiave?
Ciao.
--
Francesco G. Rizzoni

 Grazie della risposta
Il campo alfanumerico impostato è unico e tieni presente che la fattura
prende in automatico il numero del contatore pertanto non potrei eliminare
quest'ultimo.
Se hai un suggerimento per risolvere questo problema 1000 grazie. Ho provato
a creare in Vb una sintassi per inserire in automatico il numero progressivo
della fattura senza avvalermi del contatore ma non ci riesco.
ciao Giorgio

 ha scritto nel messaggio
news:i9qqb.423443$R32.14...@news2.tin.it...

Hai provato la soluzione di Sib pubblicata sulla Sezione General del Sito
Comune (link qui sotto)?
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Piè di pagina maschera

Ciao a tutti.
Ho questo problemino : dovrei da una maschera continua associata ad una
tabella visualizzare nel piè di pagina maschera, i totali, ovvero: ho per
ogni riga una casella Importo la cui origine è Qtà * Prezzo.
Nel piè della maschera ho creato una casella di testo la cui origine è
Somma(Importo) ma mi da sempre Errore.
Perchè secondo voi ???
Già che ci sono, anche l'ordinamento della sottomaschera non mi prende,
anche mettendogli il nome del campo nella casella "Ordina per".
Grazie mille.
Ronny
--------------------------------
Inviato via 
http://usenet.libero.it

 Usa =somma(Qta*prezzo)
Ma io non ho query, la maschera è associata direttamente alla tabella



La formula, cosě come l'ho scritta, vale lo stesso!

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

 = Somma([Qtà] * [Prezzo])
anche con i nomi della tabella non funzia... cos'altro ci può essere ???


 anche con i nomi della tabella non funzia... cos'altro ci può essere ???
Usi nomi di campi che non esistono.

Newsgroup: it.comp.appl.access
Titolo: Saldo in prima nota con MS ACCESS

Ciao a tutti, sono un utente che utilizza access per il mio ufficio.
Ho la necessità di crearmi un database che mi faccia la prima nota.  Mi
spiego meglio.
Il database deve essere semplice, ci deve essere data, descrizione, entrate,
uscite e saldo. Ho creato il database, solo che trovo difficoltà nel saldo.
Infatti creando un campo calcolato, il saldo lo calcola solo in quel record,
io invece voglio che il saldo tenga conto anche delle operazioni precedenti.
es:
                                                      ENTRATE         USCITE
SALDO
10/10/00       Saldo iniziale
10.000
21/10/00       Pagamento                                             1.000
9.000
31/10/00       RISCOSSIONE        2000
11.000
Come posso fare a creare una cosa del genere.
Vi ringrazio anticipatamente e complimenti per il NG.
Ciao da Nino.

 ha scritto nel messaggio
news:PUBS5.13138$FV2.3...@news.infostrada.it...

Non nella tabella, ma in una query, o maschera o report puoi creare un nuovo
campo calcolato o meglio "controllo" usando DSum con criterio per data, e se
all'inizio aggiungi un IDcontatore, che ti conviene comunque, anche per ID
contatore e quindi per ciascun record.
Una decina di giorni fa qualcuno ha postato un esempio che leggermente
adattato farebbe al caso tuo, parlava di *mastrini*, ma non so essere piu'
preciso perche' l'ho cancellato :-(
Ciao, Lo


Prova con questa query e chiamala Query3:
SELECT MOVIMENT.NUM_MOV, MOVIMENT.DAT_MOV, MOVIMENT.DESC_MOV,
MOVIMENT.IMP_MOV, MOVIMENT.CONTODARE, MOVIMENT.SCONTODARE,
MOVIMENT.CONTOAVERE, MOVIMENT.SCONTOAVERE,
IIf([MOVIMENT].[CONTODARE]=4,IIf([MOVIMENT].[SCONTODARE]=1,[MOVIMENT].[IMP_M
OV],[MOVIMENT].[IMP_MOV]*-1),[MOVIMENT].[IMP_MOV]*-1) AS A,
DSum("A","Query3","NUM_MOV<=" & [NUM_MOV]) AS B
FROM MOVIMENT;
Perchè funzioni così come è scritta la devi chiamare Query3.
--
Roberto
---------------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Persistenza del filtro su maschera

Ciao a tutti
sono  un "antico" utente di Visual Basic 3 e sto usando da poco tempo Access 
per la gestione soci di un'associazione di volontariato onlus e ho un 
problema con i filtri; mi spiego meglio: ho una maschera "Scheda Socio" con 
cui posso visualizzare tramite un bottone di comando i records sia per 
numero d'iscrizione crescente che per ordine alfabetico sul campo "Cognome". 
Ho attivato una mashera popup di ricerca socio con istruzioni di ricerca 
usando il Like, che fa sempre riferimento alla Scheda Socio e funziona 
perfettamente. Il problema è che la maschera Scheda Socio "ricorda" il 
filtro anche chiudendola e anche ponendo come istruzione in form open 
"filteron=false", per cui non mi funziona piu' la scelta per numero 
d'iscrizione o quella per cognome, comparendo sempre i record filtrati. 
Ringrazio anticipatamente chi mi voglia aiutare.
Ercole 

 ha scritto nel messaggio
news:4HA6e.40487$IN.7...@twister2.libero.it...

Ciao MArco,
prova a mettere su chiusura della form :
Me.Filter = ""
Me.Filteron = false
Cinzia

 Cinzia
Ciao Cinzia mi permetto di fare una Considerazione per Marco.
Questo problema non avviene se usi una versione MDE, ma se non ricordo
male per farlo via codice su un MDB occorre invertire 
l'ordine delle AZIONI:
Me.Filteron = false
Me.Filter = ""
Ciao
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

veramente una miniera di consigli!

Newsgroup: it.comp.appl.access
Titolo: Problema con la stampa dei grafici nei report

Salve.. ho letto centinaia di post ma non ho trovato niente di simile.
Il mio problema è praticamente questo:
Ho un report che mostra un grafico calcolato. Se lo apro per stampa a
Video (anteprima) è tutto corretto, se invece lo invio alla stampante
il grafico mi viene stampato sottosopra e la qualità delle linee e del
logo sull'angolo della pagina risulta scadente.
In un report identico ma senza grafico il risultato è perfetto..
E' tutto strano. e non penso sia colpa della mia stampante laser
Samsung che stampa grafica egregiamente..
Se avete soluzioni vi aspetto! :-D
Grazie
Antonio






Che versione di Access?
Il problema si verifica anche stampando il report con grafico incorporato
che puoi trovare in Northwind.mdb?
Ciao, Simone

Newsgroup: it.comp.appl.access
Titolo: Transfretex x importare .txt con VB6.

Salve, ho un problema.
Ho da importare diversi contenuti, in tabelle di Access2000, di file .txt
utilizzando Transfertext.
Il tutto mi funziona ma solo se Access è aperto utilizzando le "Specifiche".
Ho capito però che si può forse ovviare a questo problema se utilizzo uno
"schema.ini", qualcuno può aiutarmi o l'ha già utilizzato?...
Grazie,
SS

 SS
Saluti
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ha scritto nel messaggio
news:88ca8d8214af47ee85...@mygate.mailgate.org...


 SS
Mai usato, ma il suggerimento di Rafunk in ICLVB direi che è ottimo
e completo...!
Ciao

Newsgroup: it.comp.appl.access
Titolo: Apertura di un FE da codice VB

Buongiorno a tutti,
questa e' la prima volta che pongo una domanda all'interno di un
NewsGroup quindi mi scuso anticipatamente perl'eventuale uso improprio
che ne faro'.
Veniamo alla domanda in oggetto:
vorrei aprire un database di FrontEnd da codice VisualBasic invece che
dalla sua icona.
Attualmente il database viene aperto mediante un collegamento all'MDB
con questo comando:
'c:\programmi\.....\MSACCES.EXE /wrkgrp c:\mydir\mydbacc.mdw
c:\mydir\mydbfe.mdb'
Cliccando l'icona, parte Acces e richiede l'utente e la password per
aprire il MDB di FE.
Vorrei cambiare il comando suelencato con una routine
VisualBasic/VBScript simile alla seguente:
DIM accObj AS NEW Acces.Applications
accObj.OpenCurrentDatabase "c:\mydir\mydbfe.mdb", True
accObj.visible = True
....
Con queste istruzioni la cosa funziona e riesco ad aprire il mio MDB; il
mio problema e' quello di voler bypassare la richiesta di Access di
identificativo utente fornedo idUtente e Password da codice VisualBasic;
esempio:
accObj.DBEngine.SystemDb = "c:\mydir\mydbacc.mdw"
accObj.???.User = "myUser"
accObj.???.Password = "myPassword"
Qualcuno ha qualche suggerimento:
Ringrazio tutti.
Saluti, Andrea.

 accObj.???.Password = "myPassword"
Spero qualcuno mi smentisca, ma credo che l'unico modo sia usare la shell
shell("c:\programmi\.....\MSACCES.EXE /wrkgrp c:\mydir\mydbacc.mdw
c:\mydir\mydbfe.mdb /user paperino /pwd pippo")
in quanto, dovresti poter impostare il SystemDB prima di aprire l'istanza di
access, e credo proprio che non sia possibile
-- 
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
--------------------------------------

Newsgroup: it.comp.appl.access
Titolo: Cancellare tutte le tabelle del database

Come si può da codice cancellare tutte la tabelle del Database?
Con Drop Table, dico bene?
Ma come faccio a cancellarle _tutte_?
Ciauz

 Ma come faccio a cancellarle _tutte_?
Così:
-----------------------------------------
Private Sub Command0_Click()
Dim i As Object
For Each i In CurrentDb.TableDefs
    If (i.Attributes And dbSystemObject) _
        Or (i.Attributes And dbHiddenObject) Then
    Else
        DoCmd.DeleteObject acTable, i.Name
    End If
Next
End Sub
-----------------------------------------
Ho inteso "eliminarle", non "svuotarle"!
Bruno 

 Ho inteso "eliminarle", non "svuotarle"!
Grazie mille Bruno! :)
Newsgroup: it.comp.appl.access
Titolo: stampa report da maschera

ciao a tutti.
ho una maschera (che pesca da una query in cui si chiede
l'introduzione del nome corrente sulla maschera) in cui un bottone mi
stampa un report. purtroppo se non salvo il record o non aggiorno la
maschera il report non viene stampato correttamente: cioč viene
stampato senza gli ultimi dati introdotti?
come posso fare? (ho tentato da principiante di introdurre un
me.requery su corrente e dopo aggiornamento, ma non funziona.
grazie dell'aiuto
oscar

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

 il comando) per stampare il report in 2 copie?
In VBA puoi eseguire il report con il metodo SelectObject (vedi help) e
stamparlo con
DoCmd.RunCommand acCmdPrint
Prima della stampa si aprirà la finestra di dialogo della stampante nella
quale indicherai il numero di copie.
Oppure puoi impostare adeguatamente la proprietà PrtDevMode; ti anticipo
però che usare tale proprietà è tutt'altro che facile.
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


su una maschera ho installato un pulsante di comando che mi stampa un
report SU CLICK del record attualmente visualizzato sulla maschera, a
fronte dell'evento "su click" del pulsante di comando ho inserito il
seguente codice:
Private Sub Comando63_click()
On Error GoTo Err_Comando63_Click
    Dim stDocName As String
DoCmd.OpenReport "tipo_E", , , "numero=" & Me.Numero
 
Exit_Comando63_Click:
    Exit Sub
Err_Comando63_Click:
    MsgBox Err.Description
    Resume Exit_Comando63_Click
 
End Sub
clikkando sul pulsante, mi esce il seguente errore:
"Tipi di dati non corrispondenti nell'espressione criterio"
ma quali dati? ho controllato il nome <<numero>>, il nome del report
<<Tipo_E>> e comando63 che corrisponde al pulsante di comando e sono
esatti!
dove sbaglio?
ho anche provato a togliere l'= dopo a numero, ma in questo caso mi stampa
solo il report senza i dati inseriti nei campi del record.
chi ci capisce, mi aiuta per piacere?
grazie
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 grazie
aggiungo che il campo "numero è in formato testo.


 > End Sub


ho aggirato l'ostacolo inserendo un altro campo contatore e basare
l'evento su di esso dato che non sono riuscito a farlo sul campo testo.


 wrote:

grazie infinite funziona tutto perfettamente
ciao e scusa il ritardo 
oscar
Newsgroup: it.comp.appl.access
Titolo: filtrare ListView

Ciao a tutti non riesco a filtrare una listview in base al valore 
scritto in una casella di testo non associata.
mi date qualche suggerimento con qualche esempio per favore?
Grazie e ciao

 scritto in una casella di testo non associata.
Una ListView non si filtra.
Al limite puoi modificarne l'origine dati tramite codice, prima recuperando 
i dati filtrati e poi ricostruendo la ListView.
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype: pbsoftsolution

Maurizio ha scritto:

Come hai fatto a popolare la ListView...???
Credo usando un Recordset....!
Riesegui la stessa procedura inserendo nel predicato SQL  WHERE con il
criterio da te voluto, quindi ripopola la ListView.
Rendila NonVisibile prima di eseguire quest'azione altrimenti ad ogni
Riga viene inviato il comando di Paint a Windows che ne rallenta il
caricamento.
@Alex

Newsgroup: it.comp.appl.access
Titolo: [2021] Esportare da Access a Excel

...e comunque, il fatto che con la versione 2021 NON si possa ancora 
esportare in formato xlsx è una cosa che inorridisce
 
https://i.imgur.com/oMAVLQn.png
 
 
inoltre un report strutturato a rientri viene trasferito in Excel in 
modo osceno :-@
 
però con l'ultima versione hanno aggiunto un sacco di nuovi colori, 
così gli utonti son contenti e MS vende di più ;-)
 
-- 
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
-=- -=- -=- -=- -=- -=- -=- -=- - -=-
........... [ al lavoro ] ...........

 gli utonti son contenti e MS vende di più ;-)
 
Esportare un report in formato xlsx non è mai stato possibile.
 
È un difetto vecchio e documentato. Vedi:
https://support.microsoft.com/it-it/office/esportare-dati-in-excel-64e974e6-ae43-4301-a53e-20463655b1a9
 
 
"Si noti che i report possono essere esportati solo nel formato di file 
precedente xls e non nel formato più recente xlsx."
 
-- 
Ciao
Karl
*********
Access Bugs: 
https://AccessForever.org
 
Access News: 
https://youtu.be/XMOHBSudo-U
 
Access DevCon: 
http://AccessDevCon.com
 
Access FAQ: 
https://www.donkarl.com/it
 

 precedente xls e non nel formato più recente xlsx."
 
sono comunque fiducioso che con la versione Access 2066 si potrà farlo, 
cre srfgrttvner vy zvb frpbyb qv ivgn


 
 
 
per il 2066 è previsto che fixino questo
https://www.accessforever.org/post/let-s-celebrate-the-bug-of-the-year
 
 
che è li da 20 anni :-)

Newsgroup: it.comp.appl.access
Titolo: Relazioni di tabelle collegate

C'e' un modo di visualizzare le relazioni delle tabelle di un data base
collegato?
Romeo

 Romeo Cerri
Ma le tabelle collegate da quale db provengono? e nel db originale, sono
collegate tra loro?
Ad ogni modo, se le relazioni non sono presenti del db origine, puoi
comunque creare delle relazioni locali.
Ciao, Sib

Apri il database collegato e guardale da lė.
Le puoi anche stampare se installi un aggiunta (che non mi ricordo dove ho
trovato) che si chiama pių o meno "Access PrintRelationships" (solo per
Access 97).

 ha scritto nel messaggio
news:8p27u0$kib$3...@lacerta.tiscalinet.it...

Newsgroup: it.comp.appl.access
Titolo: report dei dati filtrati in una maschera

Salve
ho un report che all'apertura carica i dati di una form tabulare:
me.recordsuource=miaform.recordsource
questo perchï¿œ nella form ho varie caselle per la ricerca dei dati, 
esempio da data a data, nome cliente etc.
I record restituiti dall'interrogazione mi vengo correttamente 
visualizzati anche nel report.
Il problema si presenta quando l'utente filtra con il tasto destro del 
mouse sulla lista dei record restituiti dall'interrogazione.
Quando apro il report infatti, vengono ignorati i filtri applicati 
dall'utente.
Esiste il modo di caricare sul report i dati della form con i filtri 
applicati dall'utente?
ciao
BFS

 applicati dall'utente?
me.recordsuource=miaform.recordsource
Me.Filter = miaform.Filter
Me.FilterOn = True
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 


grazie 1K
ciao
BFS
Newsgroup: it.comp.appl.access
Titolo: Condivisione Db

Ciao a tutti ,
vorrei porvi una domanda , avrei l esigenza di condivire un db di 
access sl web  diciamo che questo file di access deve essere aperto e 
compilato da diverse postazioni in giro per l italia .
sapete darmi qualche dritta ?
E' fattibile la cosa ?
Io cercavo una sorta di Skydrive della microsoft però che mi permetta 
di modificare i file di access .
 
Ciao e garzie a tutti
 
 


argomento discusso mille volte. se cerchi con google troverai varie 
soluzioni.
 
si va dalla soluzione db su server web interfacciato con pagine asp
a soluzioni tipo terminal server
 
dipende da quanti sono queste postazioni in giro per l'italia, budget, 
prestazioni richieste
 
ciao
BFS

 db su server web interfacciato con pagine asp
 
Intanto grazie ,
diciamo che vorrei realizzare una cosa semplice e veloce .
gli utenti che si dovranno collegare a questo db saranno 10 circa , 
budget bassissimo , come prestazioni direi non a livello di lumaca .
 
sai darmi qualche indicazione precisa visto che è la prima volta che 
affronto questo argomento .
 
grazie mille
 
 


per 10 utenti la cosa più semplice è installare il DB in un windows 
server, con 10 utenze terminal server.
 
i 10 client si connettono al server via desktop remoto e lavorano sul db 
in modo indipendente uno dall'altro. (ovviamente nello stesso db)
 
le prestazioni sono ottimali, visto che il lavoro viene fatto 
fisicamente nel server e in internet viaggiano solo i click del mouse e 
le videate.
 
ma se il budget è limitato, questa soluzione costicchia visto il prezzo 
delle licenze Microsoft.
come controparte però, se i 10 client fanno solo questo, puoi dotarli di 
computer da rottamazione e non ti serve neppure windows installato
Questa soluzione è pure indolore dal punto di vista della 
programmazione, visto che non devi modificare nulla al programma. (solo 
qualche piccolo accorgimento)
 
Altrimenti come ti dicevo devi creare una interfaccia grafica al tuo mdb 
in asp...e mettere il tutto in un web server.
questa soluzione comporta il lavoro di un programmatore per la 
conversione delle maschere del tuo db in pagine asp + automatismi vari.
e qui il costo dipende dalla complessità del db
 
 
soluzione intermendia
per il BE usi sql server da installare nel server. Per il FE la tua 
applicazione in access che punta al server..e qui le prestazioni sono 
molto legate alla banda internet
 
ciao
BFS
 
 
 
 
 
 
 
 

 legate alla banda internet
 
Utilizzando quale software, oltre a SQL Server?
 
Bruno
 
 

 il server licenze, e registrarle...tutte cose semplici
 
Con Winserver 2008/R2 Enterprise non ve ne sono alcune già assegnate?
Dirai che basta guardarci! ma per farlo ora dovrei trafficare un po' 
con gli HD...
 
Per il resto tutto chiaro... eventualmente mi faccio risentire.
 
¡Muchas gratias!
 
Bruno
 
 


non credo..non confondere licenze di accesso (5 comprese nel windows 
server) con licenze terminal server
 
ciao
BFS
Newsgroup: it.comp.appl.access
Titolo: aprire un file esistente

ciao
(come tutti sanno) all'apertura di access posso:
1) creare nuovo db
2) wizard
3) aprire esistente
è possibile non avere quest'ultima opzione e/o non avere l'elenco degli
esistenti ?
grazie
Giò
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Giò
Non avere l'opzione non credo, ma cancellare l'elenco degli esistenti
se smanetti nel Regedit dovresti trovare dove MS ha salvato l'elenco e puoi
eliminarlo.
Ovviamente trovato il Registro il tutto si può fare via codice.
@Alex.

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

Salve
Ho una query di selezione con un campo "DATA_DOC" dove nei criteri ho
inserito:
Between [Forms]![MIASCHEDA]![datadal] and [Forms]![MIASCHEDA]![dataal]
nelle scheda inserisco le date esempio datadal :01/01/2004  datal 27/05/2004
la query mi restituisce i valori che ho selezionato
Come posso fare per creare una seconda query di selezione che prendendo gli
stessi dati dalla maschera (MIASCHEDA) mi restitutisca i record dello stesso
periodo di giorni e di mesi ma dell'anno precedente.
Grazie
Ciao
Giorgio

 ha scritto nel messaggio
news:HSntc.23298$Wc.8...@twister2.libero.it...

Con la funzione DateAdd (vedi help) somma 1 all'anno delle date digitate im
MIASCHEDA, ovvero nei criteri della query scrivi:
Between DateAdd("aaaa"; 1; [Forms]![MIASCHEDA]![datadal]) AND
DateAdd("aaaa"; 1; [Forms]![MIASCHEDA]![dataal])
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

Newsgroup: it.comp.appl.access
Titolo: Campo in sottomaschera DefaultValue

Salve ragazzi sto andando fuori di testa ho questo problema!
Ho una maschera denominata Maschera2 con all'interno un subform denominato 
tblliste con nome controllo "gesliste", ora vorrei che un campo denominato 
"ppr" sulla Maschera2 vada a finire ad ogni nuovo record nel campo "ppr" del 
subform. Come fare, per informazione vi dico che il subform è come tipo 
tabella (righe e colonne). 

 ha scritto nel messaggio 
news:46862e58$0$17954$4faf...@reader1.news.tin.it...

Il tuo quesito è rimasto privo di risposte, forse perchè si capisce poco e 
niente di quello che vorresti fare. Specifica a quale dataset di records 
sono associate le due maschere, poi i due "ppr" di maschera e sottomaschera 
sono controlli associati a campi di tabelle ? ...Cerca di dedicare maggior 
tempo a scrivere il messaggio, altrimenti può succedere, come in questo 
caso, che nessuno interviene perchè il problema non è comprensibile.
Ciao
Antonio
Newsgroup: it.comp.appl.access
Titolo: tipo di dati per campo anno

Ciao a tutti,
un dubbio: devo inserire un campo anno in una tabella, il dato è di tipo 
numerico a 4 cifre, ma non devo eseguirci calcoli.
Secondo voi sarebbe meglio inserirlo come numerico intero o come testo con 
dimensione 4? Potreste giustificare poi la scelta, per favore?
Secondo voi, la parola Anno è una parola riservata da non usare quindi come 
nome del campo?
Grazie mille
-- 
Panarea 


Nelle indicizzazioni un valore numerico è molto più veloce di uno testo e
poi è facile da ordinare
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it


Ciao
Panarea

Newsgroup: it.comp.appl.access
Titolo: Access in LAN ----spiegatemi una cosa per pietà (grazie)

Allora ho un database da condividere in rete.Come fare 1 ho provato con
l'importazione degli oggetti e il collegamento delle tabelle , ma non mi
soddisfaceva la cosa in quanto sorgevano problemi col debug di VBA (è un
database pieno di moduli vba).Condivisione del database in rete microsoft
win 95/98/nt.Tuttavia dopo aver impostato le autorizzazioni a utenti e
gruppi su un pc e avere condiviso il file in rete , ogni pc apriva il file
col proprio access e quindi bypassava le autorizzazioni.Allora ho detto
condividiamo l'applicazione stessa e vediamo ! niente! dalle varie
postazioni si apriva sempre access come amministratore e non vedeva nè
account nè niente.C'è un sistema per assegnare autorizzazioni  a gruppi e
account in rete senza dover farlo per ogni singila applicazione Access (il
che sarebbe assurdo) ?
L'ultima soluzione è la condivisione tramite web nella intranet locale ,ma è
un altro discorso che viaggia in maniera indipendente,per cui vorrei
qualcuno,se possibile, che mi spiegasse chiaramente come fare per
condividere in rete il database (il file.mdb) assegnando i vari diritti alle
postazioni.
Grazie---ciao.

 Quale Access Usi ???
Attenzione Access non Client/Server. Access Ha un sua sicurezza ma fa
ridere.
La tua rete è basata su NT Server, ovvero gli utenti sono autenticati da
NT???
Ci sono comunque alcune cose che puoi fare, magari con WEB.
F.to Salvatore CRISTIANO

 Ci sono comunque alcune cose che puoi fare, magari con WEB.
Ecco, per esempio studiare BENE come funzionano i meccanismi di protezione
di Access.
Faresti bene a studiarli anche tu!
Bye
--
********************************************
Giorgio B. - P.S. elettronica srl - Udine
email: 
giorgio....@ps-elettronica.it

 Ci sono comunque alcune cose che puoi fare, magari con WEB.
Scusa hai ragione,nella fretta ho dimenticato alcune cose, davo per
scontato di riferirmi all'ultima versione, access 2000 .Nella Lan c'è un
server NT e client win 95 che accedono ad un dominio nt.
Grazie ciao.


Ciao, Sib

 Grazie ciao.
Kauto,
Vedi sul sito comune come funziona la sicurezza e vedrai che il tuo era solo
un problema di corretta impostazione.
Ciao, Sib
Newsgroup: it.comp.appl.access
Titolo: Funzione Date ()

Vorrei impostare un campo data che mi inserisca la data di oggi senza che mi
crei però dei problemi con dei vecchi record per i quali il suddetto campo
potrebbe anche essere vuoto.
Ho provato ad usare la funzione Date () ma mi ha modificato tutti i campi
(anche quelli vecchi).
Inoltre mi sorge un dubbio: se io oggi aggiungo un record, la formula Date
() mi metterà la data odierna; non è che poi se domani visualizzo o decido
di modificare quello stesso record (per le modifiche mi riferisco a quelle
effettuate su altri campi) la funzione mi "aggiusta" automaticamente la data
a quella effettiva del giorno in cui visualizzo o moidifco il record in
questione? Spero di essere stato abbastanza chiaro, altrimenti non esitate a
ricontattarmi.
Grazie a tutti in anticipo per le evenrtuali risposte.
Fabio
--------------------------------
Inviato via 
http://usenet.libero.it

"Fabio" <demo...@NNMSPMMTlycos.it> ha scritto nel messaggio
news:62Z211Z221Z192Y...@usenet.libero.it...

Nella proprietà Valore predefinito del controllo scrivi:
Date()
Così facendo la data odierna verrà impostata solamente per i nuovi record.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:oXaX9.29114$ZE.8...@twister2.libero.it...

Grazie.... ci provo subito ;-)

Newsgroup: it.comp.appl.access
Titolo: controllo testo

Non riesco a trovare nella giuda come cambiare il formato di un conrollo
testo di una forms ( valuta, standard, numerico generico, fisso ).
Ho trovato la funzione format, ma con questo non mi sembra che posso
cambiare il controllo .
In sostanza devo cambiare un controllo da FISSO a VALUTA, a seconda di una
mia funzione.
Chi mi da una mano se smplicemente mi indicate dove trovarlo sulla guida.
Saluti Massimo
Grazie 1000

 ha scritto nel messaggio
news:9l8pre$bq8$1...@lacerta.tiscalinet.it...

Se il tuo controllo si chiama Pippo ed ha un formato Fisso.
La riga di codice VBA che cambia la sua proprietà Formato in Valuta è la
seguente:
Me!Pippo.Format = "Currency"
Mentre la riga di codice VBA che cambia la sua proprietà Formato in Fisso è
la seguente:
Me!Pippo.Format = "Fixed"
Per maggiori ragguagli cerca sull'help Proprietà Formato.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

perfetto OK Grazie 1000
Newsgroup: it.comp.appl.access
Titolo: Acc2003: problemi eliminazione record su relazione 1-1

Salve a tutti, vorrei sottoporre un quesito che ha del misterioso!
(o più probabilmente del bug?)
In breve: quando si elimina un record in una tabella in relazione 1-1 
con un'altra A VOLTE si verifica un errore ed Access esce.
Dettagli
--------
Un DB (formato Acc2000) contiene SOLO queste 2 tabelle:
TAB_1                  TAB_2
-------                -------
IDTab_1 (PK) 1<--+     IDTab_2 (PK)
Testo_1          |     Testo_2
                  +-->1 IDTab_1 (FK)
Indici
------
TAB_1.IDTab_1  Contatore     Chiave primaria (PK)
TAB_2.IDTab_2  Contatore     Chiave primaria (PK)
TAB_2.IDTab_1  Intero lungo  Univoco
Relazioni/Vincoli
-----------------
a) tipo 1-1
b) integrità referenziale = attivata
b1) aggiornamento campi correlati a catena = attivato
b2) eliminazione campi correlati a catena = NON attivato
Gli obiettivi per TAB_1 sono:
1) consentire inserimenti senza corrispondenze in TAB_2
2) NON consentire eliminazioni se esistono record in TAB_2
Gli obiettivi per TAB_2 sono:
1) consentire inserimenti SOLO con una corrispondenza in TAB_1
2) consentire eliminazioni SENZA toccare il contenuto di TAB_1
In pratica TAB_2 è una tabella di dettaglio di TAB_1.
Il DB di prova è stato creato da zero proprio per non avere alcuna 
"interferenza".
Anomalia/e
----------
A volte, e sottolineo A VOLTE, quando si tenta di eliminare un record in 
TAB_2 si verifica un errore: "Si è verificato un errore in Microsoft 
Office Access. L'applicazione verrà chiusa.", ecc...
Ho provato anche con le PK di tipo Long senza risolvere.
Il tutto utilizzando solo le tabelle, senza ricorrere a maschere o 
altro. Se poi queste vengono collegate in un altro MDB questa stessa 
operazione A VOLTE elimina anche i record corrispondenti in TAB_1 !!?
Ed ancora, forse è un comportamento "by design" ma quando nella finestra 
Relazioni si tenta di crearne una come quella descritta, Access NON 
acconsente se si trascina il campo IDTab_1 da TAB_2 a TAB_1, mentre 
viceversa gli piace!
!!! Sono e-stereo-fatto... !!!
Qualcuno sa darmi conforto?
Grazie a tutti in anticipo.
glz.

 (o più probabilmente del bug?)
Un aggiornamento, il problema si verifica sistematicamente quando in 
Visualizzazione Foglio Dati si espande (+) il record correlato, anche se 
lo si nasconde (-) nuovamente.
Allora, in Visualizzazione Struttura ho eliminato questa possibilità 
impostando "Nome foglio dati second" su "[Nessuno]" ma l'impostazione 
non viene salvata! Anche questo "by design"?
Dimenticavo, l'ambiente è WinXP SP2 + Acc2003 SP3 + HotFix KB923618.
glz.
Newsgroup: it.comp.appl.access
Titolo: Accesso remoto

Qualche idea o esempio su come gestire il collegamento tramite linea
telefonica tra due PC? Grazie, Max

 telefonica tra due PC? Grazie, Max
Da windows 98 SE in poi puoi utilizzare l'accesso remoto e relativo
server. Facile e veloce.
In alternativa PcAnywhere etc.
Su windows 2000 Server e successivi e NT4 puoi utilizzare terminal
Server.
Saluti.
-- 
I'am what I'am, I do what I can

Ma non esiste qualche routine da implementare a programmi in Access?
"Setec Astronomy" <setec@_NO_NOSPAM_freemail.it> ha scritto nel messaggio
news:ISZbb.340486$Ny5.10...@twister2.libero.it...


 Ma non esiste qualche routine da implementare a programmi in Access?
Ripartiamo dall'inizio, che cosa vuoi fare? Quale procedura devi
implementare.


Ok. effettivamente non sono stato chiaro. Devo aggiungere una routine ad un
programma che ho creato in Access che mi dia la possibilità di collegare due
PC per mezzo di linea telefonica, analizzare alcuni files (*.DBF generati da
un programma fatto in Clipper), eventualmente aggiornarli. Tramite
"composizione automatica" il collegamento è fatto... ma poi? Cosa fare?
Spero potrai essermi d'aiuto. Ciao,Max
"Setec Astronomy" <setec@_NO_NOSPAM_freemail.it> ha scritto nel messaggio
news:vx0cb.341494$lK4.10...@twister1.libero.it...


 d'aiuto. 
Il computer che riceve la connessione deve aver impostato un server di
accesso remoto, in Windows 98 SE e' presente, come in Win 2000 Pro ed
XP.
Il computer che effettua il collegamento lo fa tramite RAS, le api da
utilizzare sono le ras api, su msdn trovi tutti i riferimenti,
l'implementazione e' semplice. In alternativa puoi far fare la
connessione manualmente al cliente. Per il collegamento al database e'
sufficente cercare il nome del pc destinatario sulla rete
es. 
\\NomePC
Crea una cartella condivisa e mettici i file DBF, e collega il DB a
quella destinazione.
Saluti.


 Ok. effettivamente non sono stato chiaro. Devo aggiungere una routine ad
un
Inoltre stai anche continuando a non scrivere correttamente DOPO il quoting
Antonio
Newsgroup: it.comp.appl.access
Titolo: controllo calendario

Dato un controllo calendario "ctlCal" vorrei che all'apertura della maschera 
il controllo
visualizzasse la data odierna.
Come si puo' fare?
Ho provato con
ctlCal.Value=Date()
ctlCal.Refresh
anche con:
ctlCal.Day=day(Date)
ctlCal.Month=Month(Date)
ctlCal.Year=Year(Date)
ctlCal.Refresh
ma non funziona
grazie
Riccardo 

 ha scritto nel messaggio 
news:cnvinp$qdj$1...@news.panservice.it...

Metti il codice su timer e imposta l'intervallo a 200
Me.ctlCal.Value = Date
Me.TimerInterval = 0
Ciao, Carlo 

 Ciao, Carlo _________________________
grazie mille
ma mi sai spiegare perchč non funzionava in quel modo?
io poi avevo risolto anche in un altro modo, ma sicuramente piů brutto.
Avevo messo come origine controllo=[casellaData] dove casella data era
una casella di testo con =date()
e poi su evento Attivato del controllo
Me.ctlCal.ControlSource=""
ma non mi piaceva la soluzione.
grazie di nuovo
Riccardo

 Riccardo
Probabilmente perchè su apertura ancora non vede il controllo calendario.
Lo stesso codice che ti ho postato avresti potuto metterlo anche su corrente 
perchè i controlli sono stati già tutti inizializzati e riconosciuti dalla 
maschera.
Ciao, Carlo 

 ha scritto nel messaggio 
news:cnvrkd$ulh$1...@news.panservice.it...

E' strano ma a me risulta funzionare sul current della maschera
Me.cntCalendario.Value = Date
parlo del Microsoft DTPicker 6.0
piuttosto non so se funziona bene poichč non posso cancellare
il valore data come si farebbe con una normale casella di testo.
Saluti  Ebo

Newsgroup: it.comp.appl.access
Titolo: caselle combinate

Utilizzo una maschera per la modifica dei dati in un archivio .
La selezione del record avviene con  una casella combinata.
Una volta scelto il record posso con l'evento "dopo aggiornamento"
posizionarmi automaticamente su di una casella
di testo a mia scelta?
Grazie

 ha scritto nel messaggio
news:900aiv$8m2$1...@nslave2.tin.it...

Me.TuoControllo.SetFocus
Sib


Sě; e scommetto che vorresti sapere come.
Nell'evento 'dopo aggiornamento' della casella combinata scrivi:
'--------------
Private Sub NomeCasellaCombinata_AfterUpdate()
Me!nomeControllo.SetFocus
DoCmd.FindRecord Me!NomeCasellaCombinata
End Sub
'--------------
Ciao.