mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: forzare un evento da codice vba (riproposto)

 (Alessandro Baraldi)
A proposito continuo il dibattito sulla
forzatura di un evento da codice vba,
che per me merita di essere approfondito.
L'evento su attivato (GotFocus),
può essere evocato da codice vba.
Su doppio click di casella di testo 'testo0'
passo lo stato attivo a casella di testo
'testo2', mi esegue la routine associata
all'evento 'Testo2_GotFocus()'
e poi mi continua la routine dell'evento
Testo0_DblClick.
Quindi NON è vero e NEPPURE noto che l'azione
fatta da codice non scatena l'Evento.
Private Sub Testo0_DblClick(Cancel As Integer)
    Me.Testo2.SetFocus
    For K = 1 To 5
        MsgBox K
    Next K
End Sub
Private Sub Testo2_GotFocus()
    MsgBox "attivato testo2"
End Sub
Perchè non può esistere l'analogo
dell'aggiorna, in modo da evocare
l'evento 'Testo2_AfterUpdate()'.....?
Private Sub Testo0_DblClick(Cancel As Integer)
    Me.Testo2.Requery (oppure Me.Testo2.Recalc, oppure
Me.Testo2.Update)
    For K = 1 To 5
        MsgBox K
    Next K
End Sub
Private Sub Testo2_AfterUpdate()
    MsgBox "aggiornato testo2"
End Sub
Perchè? Come vedete esiste un caso in
cui la cosa è possibile. Access cosa è?
Il mondo delle eccezzioni, proprio
dove le eccezzioni non dovrebbero esistere.
La soluzione di creare una funzione evento
pubblica da chiamare da vba, mi è chiara,
però ritengo sia purtroppo una limitazione.
Perchè? Grazie.

 Perchè? Grazie.
;-)
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

generati
cioè mi vuoi dire che quando faccio doppio
faccio anche e prima got focus? Non hai frainteso
quanto ti ho chiesto? hai capito che io voglio
fare riferimento all'evento di un secondo controllo, non
dello stesso!!!! testo0.dbleClicl()  -> testo2.gotfocus()
Scusa ignoranza,
per favore mi traduci il significato di 'chiamare in modo nativo',
KG e una esposizione del concetto di OOP?
Grazie

 Grazie
KG= Chilogrammo, era riferito ad ingenti quantità di codice.
OOP = Programmazione orientata ad Ogetti
Ciao


OOP = Programmazione orientata ad Ogetti
KG non si scrive così bensi: kg (nel sistema internazionale),
con le maiuscole uno sfigato come me lo prende per acronimo di
qualcosa.
OOP me lo hai gia detto, ma cosa vuole dire programmare ad
oggetti, spiegato con un esempio?
Grazie.

 Grazie.
La tua domanda presuppone la "non completa conoscenza" della
programmazione base di VBA, e spiegarti cos'è è compito arduo visto
che VB e VBA(per similitudine di linguaggio) sono costituiti da
Oggetti e/o classi per almeno il 90%.
Programmare in modo orientato ad oggetti significa sostanzialmente
non sviluppare codice fine a se stesso, ma strutturarlo in modo
da renderlo condivisibile e fruibile in modo flessibile da molte
fonti, scrivendo codice INPERSONALE.
Esempio classico è l'uso delle Classi, ma anche una Form come
dovresti sapere è una Classe(con interfaccia utente)....!
Non saprei come indirizzarti meglio verso la questione, credo che
alla base di tutto ci sia l'approfondimento...!

Newsgroup: it.comp.appl.access
Titolo: richiesta aiuto

Mi servirebbe creare una tabella con un campo che contenga le prime quattro 
cifre (o lettere) di quanto contenuto in un campo di un'altra tabella.
Come posso fare?
grazie
 
 
 


Con le prime 4 lettere, è semplice, in quanto si presume che il campo
sia in formato testo.
Se invece si tratta di un campo numerico, la cosa si potrebbe
complicare....
Che formato deve avere il campo nella nuova tabella?

Ma va'?
Next time crca di dare un oggetto piu' "accattivante".
www.sitocomune.com
 sezione ICAA
 
-- 
 
ac (x=y-1)

 ha scritto nel messaggio 
news:bbc2e06c-1d2d-44fb...@m10g2000vbc.googlegroups.com...


 Sono campi formato testo
 
 
SELECT NomeMiaTabellaOrigine.NomeMioCampoOrigine,
Left([NomeMiaTabellaOrigine]![NomeMioCampoOrigine],4) AS
NomeCampoNuovaTabella INTO NomeNuovaTabella
FROM NomeMiaTabellaOrigine;
 

 ha scritto nel messaggio 
news:856436a6-9f57-412c...@t16g2000vba.googlegroups.com...


"info"  ha scritto nel messaggio 
news:4edf2f5c$0$1375$4faf...@reader1.news.tin.it...

_____________Risposta:
Ciao
Scrivi DOPO il testo a cui rispondi, non prima
MA
Newsgroup: it.comp.appl.access
Titolo: Object Definition

Sto analizzando una base dati con l'analizzatore di Access 2000.Mi chiedevo
se fosse possibile salvare i report creati come report di Access senza
doverli esportare.
SunRex

 wrote in message
news:uHa1e.1118617$
35.41...@news4.tin.it

Non credo, ma cosa ti serve di preciso di quelle informazioni...?
Ciao
@Alex
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG


Bieca documentazione.Mi piaceva anche la formattazione che viene persa
però durante l'esportazione , mi riferisco in particolare a quella delle
relazioni.
SunRex

 SunRex
Immaginavo.
Ti ho chiesto proprio perchè ho sviluppato un Demo per documentare
la struttura delle Tabelle alla Sezione REPORTS FAQ 1.10
"Documentare il proprio progetto".
Volevo pure tentare di sviluppare il discorso Relazionale, ma
la strada è troppo complessa per l'utilità che ne deriva.


 ha scritto nel messaggio
news:110c0a40447241ff01...@mygate.mailgate.org...

Veramente carino.
Per le relazioni hai pensato (chiaramente da Access 2000) ad usare
 il report che ti crea se mandi in stampa la maschera delle relazioni
 ( e questo lo puoi salvare nei report) e magari fonderlo con il tuo?
Ciao e buona pasqua
SunRex

 SunRex
Sinceramente no, perchč non potrei controllare bene la cosa.
In ogni caso come ti dicevo l'esigenza č secondaria e non 
credo di poter approfondire oltremodo.
Buona Pasqua anche a te.


Newsgroup: it.comp.appl.access
Titolo: sqlex parametri query

Grazie di avermi risolto il precedente problema.
Quindi anche in caso di criteri via forms del tipo "da data" "a data" 
devo filtrare il report tramite vba?
mi dite come?
Grazie
Ilario


Di cosa parli...?
Fai chiarezza a quanto stai dando per scontato.... cioè che tutti
abbiano partecipato al tuo Post precedente di cui non dai riferimenti.
@Alex

Scriveva Alessandro Baraldi sabato, 24/03/2007:

Hai ragione, 3post più su era "filtro vista"
Ilario

 Ilario
Se ci dici anche il tipo di progetto utilizzato MDB o APD, possiamo
aiutarti, le due soluzioni sono completamente diverse.
(visto l'argomento "filtro vista" mi viene da pensare che stai usando un
progetto ADP.)
:-)
-- 
Giorgio Rancati
[Office Access MVP]
Newsgroup: it.comp.appl.access
Titolo: AIUTO !!!! HELP !!! Urgentissimo!!! SOLO GURU!!!! Rispondetemi anche in mail ma aiutatemi!!!!!

Bè, non date troppo peso all'oggetto ... è un bonus concessomi ieri da
Antonio Biso :-)
Il problemino è questo: la finestra di un .mdb aperto attraverso un
Collegamento Ipertestuale non si espande automaticamente a tutto video: è
necessario cliccare sul "ridimensiona finestra".
La cosa è scocciante nel caso che l'operatore chiuda senza aver
ridimensionato: da quel momento la finestra di qualunque altro .mdb aperto,
si comporta in modo analogo.
Pensavo di automatizzare il processo di ridimensionamento usando un codice
che su apertura del .mdb forzi l'espansione della "finestra database" a
tutto video.
Conoscete una costante VBA o simile che ottenga l'effetto senza ricorrere ad
API (quella ce l'ho ma preferirei non usarla)?
Ciao a tutti, Simone


Ciao. Prova con Docmd.Maximize
Logicamente questo comando lo dovrai riferire alla finestra attiva.

 API (quella ce l'ho ma preferirei non usarla)?
RunCommand acCmdAppMaximize
--
HTH
Karl
*********
Access-FAQ (tedesco): 
http://www.donkarl.com

 RunCommand acCmdAppMaximize
Aggiudicato :-)
Grazie Karl, sei un "manico"!  (eh, eh ... difficile trovare l'equivalente
tedesco penso)
Ciao, Simone

 Antonio Biso :-)
Gli dai un dito, si prendono un braccio...
Antonio

Newsgroup: it.comp.appl.access
Titolo: ricercare un file tra pc in rete

Ho la necessità di aprire il file doc Baseofferta che si trova in questa
posizione:
Set wordDoc = wordApp.Documents.Open("F:\Ves\Comune\PC
Programme\Baseofferta")
Non posso essere vincolato da tale percorso. Vorrei che:
1 ci fosse una routine che trovi automaticamente il file tra le risorse del
pc (il file è il rete)
2 che mi chiedesse di indicargli la posizione
Come posso fare?
Furo
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Furo
Direi che:
1 A mio avviso non è una soluzione molto veloce la ricerca di un file in
tutte le periferiche/cartelle/percorsi di rete;
2 (per esempio) potresti utilizzare la funzione InputBox (vedi help):
es.
percorso = InputBox("inserisci il percorso")
Set wordDoc = wordApp.Documents.Open(percorso & "Baseofferta")
Ciao.
--
Sergio MAZZA

 Furo
Perchè non connetti la cartella come unità condivisa assegnando sempre la
stessa lettera?
Accorceresti anche il percorso
MAssimiliano
Newsgroup: it.comp.appl.access
Titolo: Calcolare il numero dei giorni di un mese

Ciao a tutti,
mi servirebbe un aiuto riguardo la seguente questione:
nel campo DATA di una query compaiono i valori "Giugno 2001" "Marzo
2002" "Aprile 2002" ... etc.
Vorrei aggiungere un nuovo campo calcolato GIORNIMESE che legga
"Giugno 2001" e restituisca 30 (cioč il numero dei giorni del mese di
giugno nell'anno 2002). Il tutto dovrebbe funzionare anche con i
bisestili.
Grazie in anticipo.

 ha scritto nel messaggio
news:1k5bcu4o55ak7qjpj...@4ax.com...

fai cosě circa:
sapendo che ogni mese ha un inizio..di solito il primo del mese  ;) perciň 1
ma non ha una fine uguale per  tutti
bene
esempio:
per calcorare l'ultimo giorno c'č una funzione precisa..ma questa secondo me
č efficace uguale
sub calcolagiorni
dim
giorno,mese,anno,giornostart,mesestart,annostart,datastart,datafine,numerogi
orni
giornostart =1
mesestart= x    ' (qui inserisci il numero del mese di cui vuoi calcolare il
numero dei giorni)
annostart= y    '(anno di cui fa parte il mese)
datastart=giornostart & "/" & mesestart & "/" & annostart
datafine=giornostart & "/" & mesestart + 1 & "/" & annostart
' qui con funzione DATEFORMAT riesci a togliere un giorno alla data
DATASTART
numerogiorni=day(  nome della variabile che hai calcolato con DATEFORMAT  )
'se per esempio alla data 01/02/2001 aggiungo un mese [ mesestart + 1 ]
ottengo 01/03/2001 'mentre se alla data 01/03/2001 tolgo un giorno ottengo
la data corrispondente all'ultimo giorno di 'febbraio qualunque sia.
scusa ma non ho avuto tempo di farti un dettaglio + preciso
ciao

 ha scritto nel messaggio
news:1k5bcu4o55ak7qjpj...@4ax.com...

Se vuoi sapere il numero di giorni del mese di una data contenuta in un
campo di tipo Data/ora di una query e chiamato MiaData, nella riga Campo: di
una colonna vuota della griglia di struttura della query scrivi:
GIORNIMESE: Day(DateSerial(Year(MiaData); Month(MiaData)+1; 0)
Ti ricordo che, a prescindere dal suo formato, il campo Data/ora deve essere
di tipo testo.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: dove trovare runtime access?

Buongiorno.
E scusate per il casino di prima.... In effetti era un oggetto "infelice"
Cmq, il problema č questo
Ho creato, in access 2000, il mio primo database,una semplicissima maschera
per l'inserimento di alcuni dati.
Questo database dovrei metterlo in un pc, senza access.
Immagino che serva la versione runtime di Access per fare una cosa del
genere, giusto?
La domanda spontanea č: dove si trova sto runtime? si deve pagare?
E' per caso compreso nell'office 2000 versione premium?
Grazie in anticipo per le info.
Stefano D.

 Stefano D.
Ciao Stefano... (mò si!) :-)
Effettivamente se non si dispone della versione Access di Office
installata sul PC, per poter permettere l'esecuzione di un DB creato con
Access c'è bisogno della versione Runtime dello Stesso.
Dove trovarla? Bhè basta chiedere ai centri di distribuzione Microsoft (li
trovi sull'omonimo sito)... il problema io però lo sposterei sul quanto
costa?...NA CIFRA!!! quindi vedi se il gioco vale la candela.
Cmq, ora le versioni Runtime 97 e 2000 non si trovano più in
commercio...tutto è stato sostituito da due pacchetti Office2003 + Visual
Studio Tools(...) (se non erro si chiamano così, e se erro suggerite)
Spero di esserti stato utile.
PS
Quello accaduto prima era solo un modo per dirti benvenuto in un NG che
funziona in un certo modo. Senza rancore.
Ciao
-- 
Pablitomf (Maurizio Facciuti)
“Quando non ti eserciti ricorda che qualcuno in qualche posto si sta
allenando e, quando lo incontrerai, ti batterà”.
Ed Macauley 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Ciao.
Immaginavo che mamma Microsoft mantenesse il suo stile...
Stavo pensando, siccome questo database è davvero semplice, in pratica si
compone di una sola tabella( e quindi lo posso riscrivere velocemente),
esiste qualche soluzione *free* a livello di database / runtime?
Grazie
(Per Pablitomf) Per quanto riguarda il prima,tranquillo. Nessun problema.
Ciao.

Newsgroup: it.comp.appl.access
Titolo: fattura PA xml come importarla

salve
 
mi hanno richiesto di importare fatture XML PA
 
dove posso trovare documentazione?
 
GRAZIE


vedi qui
https://msdn.microsoft.com/en-us/library/aa468547.aspx
 
 
ciao
BFS
Newsgroup: it.comp.appl.access
Titolo: problema lettore barcode

salve a tutti
ho un problema con il lettore di codice a barre (datalogic)
Il cursore dopo aver letto il codice esce dalla textbox ed invece vorrei
che restasse nella textbox pronto a registrae un nuovo codice.
Come posso fare per evitare che il cursore vada su altre textbox?
Grazie 
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Grazie
facendolo "rimbalzare"...
su enter del secondo controllo ci metti
me.miocontrollo1.setfocus
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it

Il problema è che si sposta sul tasto della stampa, vale lo stesso
discorso?


 discorso?
tu puoi decidere l'ordinamento della tabulazione
struttura
tasto dx
ordine tabulazione


 ordine tabulazione
-- 


 Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG
Comunque, può essere utile sapere che quasi tutt i lettori di codici a
barre (se non tutti) si possono programmare, togliendo l'Invio alla
fine della lettura del codice.
ciao
Newsgroup: it.comp.appl.access
Titolo: [A2K-SP2] application.quit - il ritorno

Gia' chiesto un po' di tempo fa
Ringrazio warp per la risposta di allora
Il caso ancora non l'ho risolto
Ordunque, la suddetta application.quit opera correttamente su piccolo db
di prova ma.., poiche', su quello reale, prima di fare il quit faccio un
po' di giri VBA, dopo codesti giri, all'esecuzione del quit mi va in
errore '91' (Variabile del blocco with non impostata)
Mi esce con una bella mascherina di richiesta  invitandomi a chiudere o
al debug.
Diligentemente dico 'Debug' ma obviously siccone sta sul quit non me lo
fa e chiude.
L'applicazione interessata e' stata convertita da A97 (per il momento,
tranne qualche
quisquilia il resto funziona) 
Qualcuno ha notizie?
-- 
Alessandro Cara

 quisquilia il resto funziona)
Immagino che tu abbia gia' fatto Compattazione, Ripristino e Compila e salva
tutti i moduli.
O no?
Sib
--
----------------------------------------------------
la mia home:
http://digilander.iol.it/syb
----------------------------------------------------
il sito comune di it.comp.database.access:
http://www.sitocomune.com
----------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente

 O no?
me oui, mon cher
le cose normali credo di averle fatte, piu' o meno tutte, ivi compresa
un po' di ricerca su internette (ho pure integrato i moduli che avevo su
una libreria separata). 
Qualche puttanata aggiuntiva me la fa
i.e.
mi entra cmq in debug anche se ho tolto i breakpoints (pure dopo
chiusura di access e riconnessione con altro utente, sono su win2000
professional), apro una maschera che non esiste e non mi dice nihil.
Ho provato su installazioni e macchine con OS diversi.
Ho l'impressione che dipenda da qualcosa di particolare del codice. 
Uso una collection, ho provato a metterla a nothing. Niente
Mi sa che dovro' lavorare un po'. Abbiate pieta'.
--
a.cara

 Mi sa che dovro' lavorare un po'. Abbiate pieta'.
Hai chiuso e messo a nothing tutte le variabili oggetto del tuo codice
ovviamente. Si'?


 ovviamente. Si'?
Risolto. 
In A97 aveva sempre funzionato.
Ho una gestione generalizzata dei messaggi e per evitare che riaprisse
sempre il form (di tipo acdialog, ma questo no so se c'entra) la rendevo
invisibile. E' bastato chiuderla.
Cmq grazie, alla prossima notte.
-- 
Alessandro Cara
Newsgroup: it.comp.appl.access
Titolo: Query a campi incrociati che deve automaticamente popolare una nuova tabella

Salve, ho appena costruito una query a campi incrociati in access 2010 e vorrei che il risultato di questa query mi popolasse una tabella già esistente o di nuova creazione nel db. Come posso fare?
Grazie.
Erika

 tabella gią esistente o di nuova creazione nel db. Come posso fare?
 
 
Se la domanda č se č possibile di impostare la query a campi
incrociati come query di azione, la risposta č: No.
 
Devi crearti un'altra query sulla base della query a campi incrociati
e imposta il tipo della nuova query a query di accodamento
o di creazione tabella.
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it

Newsgroup: it.comp.appl.access
Titolo: Chiusura Maschera in Uscita

In uscita da una maschera, come farla chiudere??
ciao CF
questa è facile.....

 In uscita da una maschera, come farla chiudere??
La chiusura e` implicita in uscita.
Intendi forse l'uscita del puntatore dal form?
    Paolo

 wrote in message
Ed555.272898$VM3.2...@news.infostrada.it...


 Tutto ciň al fine di non ritrovarsi con molte maschere aperte.
Per chiudere una maschera:
DoCmd.Close acForm, "NomeForm", acSavePrompt
Per renderla visibile/invisibile:
Forms!NomeForm.Visible = True
Forms!NomeForm.Visible = False
    Paolo

 GRAZIE Paolo, ma dove vanno inserite le funzioni?? in quali eventi??
rimango in attesa
saluti CF


Vorrei evitare , nel passare ad un'altra maschera, di chiuderla io.
Con questa funzione, mi pare di capire, che sono obbligato a chiuderla??
saluti CF


Quando necessiti di passare dalla maschera in cui ti trovi all'altra.
Ovviamente la prima volta la devi solo aprire, il fuoco si posiziona da
solo.
Es.
Da quella in cui ti trovi:
Forms.NomeForm.SetFocus
Me.visible = False
Dall'altra
Forms.NomeFormPrecedente.Visible=True
Forms.NomeFormPrecedente.SetFocus
Me.visible = False
Ho digitato a memoria, quindi prendilo
come strada da seguire.
    Paolo



Newsgroup: it.comp.appl.access
Titolo: sintassi requery

Ho una form (form1) che contiene due SottoForm (form2 e Form3)
all'interno di Form2 una combo dopo l'evento aggiornamento deve fare una 
requery della Form3.
qual'� la sintassi da inserire nell'evento dopo aggiornamento sulla combo di 
Form2?
grazie

 combo di Form2?
p.e.
Me.Parent!Form3.Requery
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 

 -- 
No, cos� non funziona!

 No, cosï¿œ non funziona!
Che grandiosa descrizione.
-- 
:-)



la descrizione l'ho fatta nel post iniziale.
il punto secondo me � proprio che ci sono 3 maschere:
la combo sta in una maschera contenuta nella principale
nella principale ci sta anche la terza maschera che si deve aggiornare con 
la combo.
la sintassi cos� come hai suggerito non va..
io avevo provato con:
Forms![Maschera1]![Maschera3].Form.requery
ma neanche cos�......
 

 non va
Con tali descrizioni di cosa succede o non succede non
si puo rispondere niente.
Se p.e. ricevi un errore devi rivelare il numero e messaggio
esatto dell'errore.
Se invece solo non succede una reazione, cioï¿œ niente
aggiornamento, il discorso sarebbe diverso.
-- 
cu



s� hai ragione, sono stato un p� sbrigativo.
in effetti non succede niente, semplicemete la maschera non si aggiorna...
ciao

 Me.Parent!Form3.Requery
Continua qui con la discussione perch� nelle altre risposte mancano
citati della situazione e sintassi.
Se con il requery non succede niente molto probabilmente non
� colpa della sintassi (darebbe un errore) ma delle circostanze/dati.
Non � chiaro come sono connessi i dati delle Form2 e Form3.
Forse devi salvare i dati del record attuale nella Form2 prima
che puoi aggiornare la Form3. Questo puoi provare con:
Me.Dirty = False
Me.Parent!Form3.Requery
Qualche volta, p.e. in un rete lente, si deve anche usare
un Requery o aggiornamento pi� forte come:
Me.Dirty = False
Me.Parent!Form3.Form.Requery
o persino
Me.Dirty = False
Me.Parent!Form3.Form.RecordSource = _
    Me.Parent!Form3.Form.RecordSource
Se non aiuta niente, spiegi meglio la connessione tra i dati.

Newsgroup: it.comp.appl.access
Titolo: Controllo non associato: quale strada?

Ciao ragazzi, qualcuno di voi sa in dicarmi la strada corretta per
sviluppare la seguente?
Ho una maschera chiamata "Posta" e 3 Sottomaschere  "agenda"  "messaggi"
"lavagna" di cui queste 3 sottomaschere tutte in visualizzazione foglio
dati.
Nella maschera principale ho messo una casella di testo non associata.
Come posso fare che premendo con il mouse nei campi di tutte le
sottomaschere il valore su cui mi posiziono in quel momento venga
visualizzato nel controllo non associato?
Saluti Marco
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 visualizzato nel controllo non associato?
    Cosa succede quando "premi con il mouse nei campi di tutte le
sottomaschere"? Succede che viene "scatenato" l'evento "Su corrente" della
sottomaschera. Giusto?
    Quindi non devi fare altro che far "catturare", "intercettare", tale
evento dalla maschera.
    Ti faccio un esempio usando il database Northwind.
    Crea due maschere che si aprano in visualizzazione foglio dati, una
basata sulla tabella Clienti, di nome MClienti, ed una su quella Fornitori,
di nome MFornitori. Quindi crea una nuova maschera, chiamiamola MTest, e
piazza sulla sezione Corpo di questa:
      . un controllo non associato di tipo casella di testo di
        nome cdtTest;
      . una sottomaschera con oggetto origine la MClienti;
      . una sottomaschera con oggetto origine la MFornitori.
    Assegna il valore Si' alla proprieta' Possiede modulo delle maschere
MClienti e MFornitori.
    Nel modulo di MTest copia il seguente codice:
Option Compare Database: Option Explicit
Private WithEvents m_oAcFrmClienti    As Access.Form
Private WithEvents m_oAcFrmFornitori  As Access.Form
Private Sub Form_Close()
  Set m_oAcFrmFornitori = Nothing
  Set m_oAcFrmClienti = Nothing
End Sub
Private Sub Form_Load()
  Set m_oAcFrmClienti = Me.MClienti.Form
  Set m_oAcFrmFornitori = Me.MFornitori.Form
  With m_oAcFrmClienti
    .OnCurrent = "[Event Procedure]"
  End With
  With m_oAcFrmFornitori
    .OnCurrent = "[Event Procedure]"
  End With
End Sub
Private Sub m_oAcFrmClienti_Current()
  Me.cdtTest.Value _
    = 
Me.MClienti.Name
 _
    & ": " _
    & m_oAcFrmClienti.CurrentRecord
End Sub
Private Sub m_oAcFrmFornitori_Current()
  Me.cdtTest.Value _
    = 
Me.MFornitori.Name
 _
    & ": " _
    & m_oAcFrmFornitori.CurrentRecord
End Sub
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------

 visualizzato nel controllo non associato?
sulla routine evento di "enter" del singolo campo
me.parent.nomecasellanonassocita = me.nomecontrollo
oppure, per gli amanti della collezione Forms
Forms!Nomemainform!nomecasellanonassociata =
Forms!nomemainform!nomesubform!nomecontrollo
--
a.cara

Grazie di tutto.Provo immediatamente, vi faccio sapere
Ciao Marco

Newsgroup: it.comp.appl.access
Titolo: [2010] data di creazione del file (type mismatch)

la scorsa estate vi avevo sottoposto la questione della data di creazione 
di un file mdb, cosě come la gestisce windows 7 su un filesystem ntfs
 
in poche parole, anche cancellando il file originale (p.e. 
CHNANALL202201DATI_REP, creato il 10.11.2021), creandone uno nuovo in una 
cartella diversa con un nome diverso, e successivamente rinominandolo col 
nome giusto e spostandolo nella giusta diectory, ebbene sto svtyvb qv ohban 
qbaan mi mette la data di creazione uguale a quella del file cancellato 
all'inizio
 
questa č la parte finale del log delle operazioni (leggere dal basso verso 
l'alto):
 
- 12:40:30 Calc phase completed, click on CLOSE, then on STOP to exit
- 12:40:30 Created DATI_REP(YM) CHNANALL202201DATI_REP.Mdb
- 12:40:29 Deleted CHNANALL202201DATI_REP.Mdb
- 12:40:29 Created DATI_REP CHNANALLDATI_REP.Mdb
- 12:40:28 Deleted CHNANALLDATI_REP.Mdb
Import Start : 11/02/2022 12:39:04
Import Stop  : 11/02/2022 12:40:28
Total Time   : 00:01:24
 
e queste sono le date che windows memorizza per il sopracitato file 
CHNANALL202201DATI_REP
 
https://i.imgur.com/X2SzGwC.png
 
 
Date, Date accessed e Date last saved sono corrette (ma non mi servono), 
Date created č sempre quella del vecchio file che ho cancellato, vecchia 
di mesi e mesi.
 
Nelle mie osservazioni facevo notare che eseguendo il codice passo-passo il 
problema non si presenta e il campo č aggiornato correttamente
 
Comunque sia, ora ho in questi file (sono piů di uno) una tabella INFO, con 
il campo CALC che viene aggiornato al termine della creazione con la 
data/ora 
 
Quindi, quando da codice VBA vado a leggermi la directory per elencare i 
vari file che trovo, vorrei per ognuno di essi aprirlo ed estrarre il campo 
sopracitato per poi metterlo nella tabella.
 
San Google aiutami tu e ho trovato questo codice da adattare:
<
https://answers.microsoft.com/en-us/msoffice/forum/all/vba-code-to-access-
 
an-external-database/4af21223-5cd3-4f2a-b773-ea6b354ba095>
oppure
https://is.gd/ejqn6V
 
"che č meglio" (cit.)
 
 
mutatis mutandis e infilato nel mio codice si ferma a *Set myActiveRecord*
 
Dim myDataBase As Database
Dim myActiveRecord As Recordset
Dim done As Boolean
 
'Open a database
Set myDataBase = OpenDatabase(Me.APP_PATH + MyName)
 
'Access the first record from a particular table 
Set myActiveRecord = myDataBase.OpenRecordset("INFO", dbOpenForwardOnly)
 
Run-time error 13: type mismatch
 
non mi capacito del type mismatch, visto che non ho toccato nulla nelle DIM 
iniziali
 
idee?
 
-- 
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
-=- -=- -=- -=- -=- -=- -=- -=- - -=-
........... [ al lavoro ] ...........

 Dim done As Boolean

Newsgroup: it.comp.appl.access
Titolo: Aprire una form con con un tasto

Salve a tutti....
Spero di non fare una domanda troppo banale ma è possibile secondo Voi 
aprire una maschera premendo un tasto della tastiera, per esempio F4?
Grazie
Paolo

 ha scritto nel messaggio 
news:7FDTd.50591$QG6.9...@twister2.libero.it...

Guarda sull'help autokeys
MAssimiliano 

MA ha scritto:

grazie

MA ha scritto:

Avaro di parole... a questo punto potevi pure dire "SI"! :-D
-- 
Ciao
Pablitomf (Maurizio Facciuti)
Access : Ver.97 - 2K
----------------------------------
http://www.accessgroup.it/
http://www.sitocomune.com/
----------------------------------
Non mi fido molto delle statistiche, perchè un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media.
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: DB non riconosciuto

Ciao a tutti,
qualcuno sa dirmi come posso fare a risolvere questo problema???
"Formato di DB non riconosciuto"
Mi impedisce di aprire il DB.
Grazie.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 ha scritto nel messaggio
news:bighv1$dt0$1...@news.newsland.it...

Probabilmente stai tentando di aprire un file di Access 2000 da Access 97, č
cosě?

 Grazie.
Non si apre il BE? Probabilmente si è corrotto, prova a lanciarlo lui
tenterà prima di  ripristinarlo
Altrimenti dacci elementi in più
MAssimiliano

Ciao,
cerchero' di darvi qualche elemento  in piu':
è un data base che utilizzo quotidianamente, (ha sempre funzionato
corretamente)l'altro giorno mi è apparsa quella segnalazione cliccando un
pulsante che utilizzo per l'inserimento di dati in una tabella.
Non riesco ad aprire la tabella neanche "manualmente", non riesco a
visionarne il contenuto.
Spero di avervi fornito qualche chiarimento in piu' per avere un vostro
aiuto.
Grazie.
MA ha scritto:




 cerchero' di darvi qualche elemento  in piu':
cerca di darcelo DOPO il quoting
MAssimiliano

Newsgroup: it.comp.appl.access
Titolo: Access 2000 Vs Paradox 9

Salve  a tutti
premetto che io sono un utilizzatore di A2000,
vorrei sapere le differenze sostanziali tra A2000 e Paradox 9, ho visto
alcune applicazioni fatte con P9 e mi sono piaciute molto. C'e' qualcuno che
puo' illuminarmi ???
Ciao a tutti




Newsgroup: it.comp.appl.access
Titolo: errore in query da codice

Salve a tutto il NG
grazie per l'aiuto.
me!elenco4.RowSource="SELECT DISTINCTROW PrimaConfr.NRZ, PrimaConfr.NRS,
PrimaConfr.SYMPE" & _
" FROM PrimaConfr LEFT JOIN Confronto ON PrimaConfr.NRS = Confronto.NRS" & _
" WHERE (((Confronto.NRS) Is Null))" & _
" ORDER BY LaoSortKey([primaconfr.sympe],"Alice5 Unicode");"
questa query funziona bene ma non riesco a farla funzionare da codice
il problema è che  la funzione LaoSortKey([primaconfr.sympe],"Alice5
Unicode")
(che fa parte di un applicativo da me acuistato ha bisogno del parametro tra
virgolette)
ma non posso usarle nel codice vba
stefano

 ha scritto nel messaggio
news:QCgka.93322$i26.2...@news2.tin.it...

risolto co n chr(34)
stefano

Newsgroup: it.comp.appl.access
Titolo: stampa su due colonne

salve,
devo stampare su un modulo prestampato. che mi permette di inserire su due
colonne dei dati. il problema è che in impostazione pagina definendo il
layout di pagina in priorità orizzontale i dati mi vengono stampati
naturalmente in questa successione
1colonna 2colonna
rec1        rec2
rec3        rec4
io invece devo rispettare quest'ordine:
1colonna 2colonna
rec1        rec11
rec2        rec12
...           ...
rec10      rec20
in pratica impostando max 10 record per linea,  l'undicesimo fino al
20esimo,  dovrebbero stamparsi sulla seconda colonna
morale della favola non ci sono ancora riuscito.
grazie per l'attenzione
--
Cordialità
Calogero Di Lorenzo

rec10      rec20
Si chiama priorita' verticale, e' un'impostazione che puoi scegliere
nel tab "colonne" della dialog del setup stampante.
Stammi bene e salutami tua moglie :-)
--
Lorenzo Coronati
--
<<Nessuno sa che questa affermazione e' vera>>
(John D. Barrow)
--

 wrote in message
38b5a1e3...@news.libero.it...


 ricambiamo i saluti anche per tua sorella.
Ciao Calogero, se ogni record deve occupare una data altezza (quindi ne
espandibile o riducibile) perchè non personalizzi le dimensioni del formato
di stampa in maniera tale che Access interpreti la fine della Pag per
iniziare la col. successiva.
Ho provato con la mia stampa di codici a barre.
Mettendo tutto nel corpo che verrà ripetuto 10 volte per pag., inizierà la
seconda colonna dal 11° record (con priorità verticale già impostata).
Se c'è altra roba dopo le colonne è un'altro paio di maniche.
Ciao e tantissimi saluti. :-)
RoDAgo
Ps. Non ho trovato un programmatore Asp neanche a pagarlo Oro!!

 wrote in message
8969n1$bd$1...@lacerta.tiscalinet.it...

Newsgroup: it.comp.appl.access
Titolo: Esportazione tabella in formato testo

Buongiorno a tutti,
Il mio problema è il seguente:
Esportando una tabella in formato testo e usando le impostazioni avanzate
(formato file a larghezza fissa usando delle specifiche) ho la possibilità
di far sì che il testo sia giustificato a destra? Non trovo l'opzione da
nessuna parte.
Inoltre nel caso di esportazione di campi contenenti numeri pur specificando
che io voglio solo due decimali dopo la virgola mi esporta tanti decimali
fino a riempire la grandezza del campo (esempio: avendo un campo lungo 8
caratteri e un valori di 999,99 nel momento dell'esportazione sul file di
testo mi ritrovo 999,9999). Qualcuno sa aiutarmi?
Ciao e grazie


Mi rispondo da solo... per quanto riguarda la seconda parte ho risolto, ho
utilizzato campi a precisione doppia con due decimali e tutto fila liscio,
ora rimane il problema dell'allineamento a destra.

 > nessuna parte.
<cut>
Provo a rispondermi da solo anche a questa domanda. Il metodo migliore è
forse quello di aggiungere tanti spazi quanti sono i caratteri mancanti a
coprire l'intera lunghezza del campo. Quindi necessito di una query di
aggiornamento che mi aggiorni tutti i vari i campi. Esempio:
Se io ho il campo che è lungo 7 caratteri e il valore numerico è 99,99 dovrò
aggiungere 3 spazi vuoti e avrò qualcosa del tipo "   99,99". In linea
teorica ci sono quello che mi frega è la pratica. Devo utlizzare len giusto?
Aiuto =)

 ha scritto nel messaggio
news:0cgQ8.66624$5i1.2...@news2.tin.it...

il procedimento è essere corretto, e con il len riesci a fare quello che ti
interessa.
attenzione però che per molti font il carattere spazio non ha la stessa
dimensione di un altro carattere:
ad es
        *0001009   tre 0 poi numero
        *    1009     tre spazi poi numero
può funzionare con font tipo curier e similiari.
la stringa la puoi comporre così:
strnum = stringa contenete il numero che ti interessa
LenMax = lunghezza massima del campo
strFinale = space(LenMax -len(strNum)) & strNum
ciao.
--
e` inutile versare ruhm...
nu strunz nun addiventa babba'

 strFinale = space(LenMax -len(strNum)) & strNum
Funziona, sono riuscito a fare il tutto con una query di creazione tabella
dove sposto i dati aggiornati e una successiva query di aggiornamento.
Grazie

Newsgroup: it.comp.appl.access
Titolo: Spazio caratteri

Ciao , č possibile dare una spaziatura tra caratteri ??
Cioč dirgli di "allargare" lo spazio tra un carattere e l'altro , per es.
nella scritta PIPPO in modo che diventi P I P P O ??
thks
:)

 thks
public function spazia(x as string, num as integer) as string
dim app as string, i as integer
app = ""
for i = 1 to len(x)
  app = app & mid(x,i,1) & space(num)
next i
spazia = app
end function
Antonio

 :)
Puoi farlo con la funzione Format.
Ad esempio, se il controllo che contiene il valore PIPPO si chiama Pluto ed
è lungo massimo 10 caratteri, nell'origine controllo di una casella di testo
non associata scrivi:
= Format([Pluto]; "!@ @ @ @ @ @ @ @ @ @"
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: ricavare ora del server

è possibile in qualche modo ricavare l'ora impostata su un server (per
intenderci un time del server)
in caso contrario come si può fare in altro modo
ciao e grazie
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 in caso contrario come si può fare in altro modo
Su Win9X puoi usare il comando net /time (io lancio un file bat all'avvio
del pc che contiene questa sintassi)
Su Win2000 o superiore c'e' un apposito servizio da poter avviare.
Sib
--
http://sib.ionwd.com
http://www.sitocomune.com

 Su Win2000 o superiore c'e' un apposito servizio da poter avviare.
Ovviamente parliamo di una rete con un SERVER, non di una rete con un pc che
per simpatia viene chiamato server.


 Sib

quello lo faccio anch'io con winNT ma per ragioni varie alcuni PC non
vengono quasi mai riavviati e di conseguenza l'ora non è quella esatta.
è per questo che volevo riuscire ad interrogare l'ora del serve
direttamente se era possibile. anche perchè sarà ben scritta da qualche
parte l'ora e come si interroga l'ora del singolo PC dovrebbe essere
possibile interrogare anche l'ora di un'altra macchina.


 possibile interrogare anche l'ora di un'altra macchina.
Puoi pianificare l'istruzione net /time in operazioni pianificate del
pannello di controllo.
Per Win 2000 il servizio ci pensa lu a tenersi sincronizzato
Sib

Newsgroup: it.comp.appl.access
Titolo: ordinamento lessicografico

Ma non c'è modo di correggere l'ordinamento che access fa sulle colonne 
testuali contenenti cifre ?
Secondo lui  il 19 precede 2  , perchè li vede come PAROLE e  non NUMERI .
Non possono rendere la colonna di tipo NUMERICO perchè  l'utente potrebbe 
voler inserire lettere .
Che fare ?
-- 
Cordiali saluti 

 ha scritto nel messaggio
news:4657468d$0$37206$4faf...@reader3.news.tin.it...

Si è come dici...!
Crea una Colonna nella Query Val(NomeCampo) ed usa quella...
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: TransferText e HasFieldNames : non importa i nomi campo come intestazione di riga

DoCmd.TransferText _
TransferType:= acExportDelim, _
SpecificationName:= "MiaSpecifica", _
TableName:= "MiaTabella", _
FileName:="C:\MioFile.csv", _
HasFieldNames:= True
 
 
Pur usando "HasFieldNames:= True", nel file csv, la prima riga non
riporta i nomi dei campi della tabella (come intestazione), ma parte
direttamente con i contenuti del primo record. 
Secondo voi, perche'?
 
-- 
------------
Pablitomf
Napoli sempre nel "Q"uore!
"mammasantissima" si nasce, non si diventa.
 
TheSpaceCowboy : 
Britos deve recuperare per arrivare in forma al prossimo
infortunio - 24/10/12
 

 Pablitomf
 
Ciao Ragazzo...
Ho fatto un TEST copiaincollando il tuo codice... dopo aver creato la
SPEC... ed il mio CSV ha come 1° RIga i NomiCampo.
 
Quindi non so cosa dirti...
 
@Alex

 @Alex
 
marò che stranezza... 


> marò che stranezza... 
 
rifatto per la quarta volta il file e importato tutto... ora va... mha! :D


 Pablitomf
 
Maurizio... perdi i colpi, secondo me è l'età..........
 
Ciao(tutto bene...?)
 
@Alex

 @Alex

Newsgroup: it.comp.appl.access
Titolo: upload e storage di file da parte dell'utente?

Salve ragazzi,
avete idea se sia possibile permettere all'utente di 
fare un upload di un file e far storare ad access questo
file in qualche folder (magari creando eventualmente anche la
struttura di folder) ???
fantascienza?
spero di aver spiegato bene... ;)
illuminatemi... ;)
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 illuminatemi... ;)
A parte l'inglesismo "storare" (che ci arrivo solo per intuito) penso tu ti 
stia riferendo all'utilizzo del protocollo FTP per inviare un file su un 
server web.
Se è così cerca, con google, in questo NG e in 
microsoft.public.it.office.access con le parole: FTP WEB; se né parlato di 
recente...
Ciao.
-- 
Sergio MAZZA 

 recente...
andro' a dare uno sguardo...
ma non intendo questo...
ma un qualcosa del genere.. se la destinazione non fosse un server FTP
ma un semplice network drive accessibile come se fosse un semplice hd dal
proprio PC??  magari e' anche piu' semplice...
grassie
ps: scusa gli inglesismi.. 


 ps: scusa gli inglesismi..
Se il percorso è un semplice percorso di rete non fai altro che un 
copia/incolla (Istruzione FileCopy):
es.
FileCopy "c:\documenti\nomeFile.mdb", 
\\nomePcOindirizzoIP\cartellaCondivisa\nomeFile.mdb
Ovviamente devi avere i permessi di scrittura su quella cartella...
Ciao.
-- 
Sergio MAZZA
Newsgroup: it.comp.appl.access
Titolo: problema

Ho una tabella che contiene i seguenti dati:
"ID"     "Tipo"
100     1
100      3
101       2
102        1
102        1
102        2
Vorrei riempirne un'altra del tipo
"ID"     "Numero Tipo1" "Numero Tipo2" "Numero Tipo3"
100                1                            0                       1
101                0                            1                       0
102                2                            1                        0
Come devo procedere?
Grazie!

"NCP" <pedrone@NOSPAM_tiscalinet.it> ha scritto nel messaggio
news:95v2a.229259$AA2.8...@news2.tin.it...
Già: quello di scrivere subject più significativi!!!
Antonio

 ha scritto nel messaggio
news:Wvv2a.110642$ZE.30...@twister2.libero.it...


"NCP" <pedrone@NOSPAM_tiscalinet.it> ha scritto nel messaggio
news:95v2a.229259$AA2.8...@news2.tin.it...

Ciao NCP
Il Tuo problema è risolvibile con due query, una di selezione con il
conteggio del tipo e una a campi incrociati che ti propongo in un'unica
query (la prima query è racchiusa tra le parentesi della prima FROM)
Ho chiamato la tabella TX che è l'origine record mentre TX1 è l'alias della
prima query quindi devi sostituire FROM TX Con FROM TUATABELLA all'interno
della subquery.
TRANSFORM Sum(Tx1.ContTipo) AS SommaDiContTipo
SELECT Tx1.Id
FROM (
SELECT Id, Tipo, Count(Tipo) AS ContTipo
FROM TX
GROUP BY Id, Tipo
) Tx1
GROUP BY Tx1.Id
ORDER BY Tx1.Id
PIVOT Tx1.Tipo;
Il risultato è
"ID"              "1"                         "2"                    "3"
100                1                                                    1
101                                              1
102                2                            1
In fase di report o maschera puoi sostituire il valore NULL con lo 0
Ciao Giorgio.

 Non sapevo come descrivere il problema...
Se è per questo non sai neanche scrivere correttamente DOPO il quoting!!!
Antonio
P.S.
Ah! Bastava scrivere "Riempire una tabella da un'altra cambiando la
struttura"

 struttura"
un bel "problema"!
;<)
--
a.cara 
Togli qualcosa dall'email

"NCP" <pedrone@NOSPAM_tiscalinet.it> ha scritto nel messaggio
news:95v2a.229259$AA2.8...@news2.tin.it...

Puoi risolvere il tuo problema con un'unica semplice query di
raggruppamento.
Se la tabella che contiene i dati si chiama Tabella1, la query di
raggruppamento che ti serve avrà il seguente codice SQL:
SELECT Tabella1.ID, Sum(IIf([Tipo]=1, 1, 0)) AS NumeroTipo1,
Sum(IIf([Tipo]=2, 1, 0)) AS NumeroTipo2, Sum(IIf([Tipo]=3, 1, 0)) AS
NumeroTipo3
FROM Tabella1
GROUP BY Tabella1.ID;
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------
Newsgroup: it.comp.appl.access
Titolo: Cosa ne pensate?

Dov' è l'errore?
Dim tdf As New tabledef
Dim campo As New Field
Dim db As Date
tdf.Name = "bo"
campo.Name = "prova"
campo.Type = Text
campo.Size = 20
tdf.Fields.Append campo
Set db = CurrentDb
db.tabledefs.Append tdf
Volevo anche un'altra informazione:
cosa significa DAO.TABLEDEF ?
Grazie
Fabio

 cosa significa DAO.TABLEDEF ?
Data Access Object . Table Definition.
Dai un'occhiata nell'help su come il motore Jet gestisce tabelle, campi,
workspaces... non è difficile ma non si può spiegare in due parole.
--
Ciao, AntoGal
*************************************************
Gestione punti vendita (casse e pos NCR)
 
www.powerretail.it
-------------------------------------------------------------
per scaricare un gioco di DAMA ITALIANA
http://volftp.mondadori.com/italiani/galletta/
*************************************************

AntoGal <ant...@NOSPAMsitocomune.com> wrote in message
94essh$6pg$1...@lacerta.tiscalinet.it...

Grazie Antogal

Newsgroup: it.comp.appl.access
Titolo: Massimizzare una maschera

Salve,
il mio scopo è quello di avviare un database che parte con una maschera.
Questa, si deve aprire già ingrandita al massimo.
Raggiungo questo scopo con due strade:
1.)  in VB:
                    Private Sub Form_Load()
                        DoCmd.Maximize
                    End Sub
2.) con le macro di access.
La mia domanda è la seguente:
E' possibile aprire una maschera a schermo intero senza che si visualizzi
l'interfaccia del db access?
Grazie per le eventuali risposte, a presto.


Se intendi la Finestra Database vai su Strumenti - Avvio c'è l'opzione
"Visualizza finestra database"
Ciao, FABIO

Newsgroup: it.comp.appl.access
Titolo: Compatibilità Access 2000 - 2002

Salve a tutti
volendo comprare office, e non trovando oramai più la versione 2000,
sarò costretto a convertire un programma fatto su access 2000 nella
versione 2002. Siete a conoscenza di eventuali incompatibilità o
motivi per cui NON dovrei fare questo tipo di operazione?
grazie
gil


wrote:

io conosco un OTTIMO motivo per il quale farlo....
acc2k = shit !!
Newsgroup: it.comp.appl.access
Titolo: Nome form chiamante una funzione

DAta una funzione in un modulo c'è modo di sapere chi l'ha invocata? Mi
interesserebbe il nome del FORM chiamante.
Grazie!
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 Grazie!
Aggiungi alla funzione un parametro opzionale e quando la richiami dalle
maschere lo usi per metterci il nome (Me.Name).
Ciao.
-Marco-
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Grazie!
Non è accessibile da Access lo Stack delle chiamate, quindi in modo
nativo non è recuperabile l'oggetto che ha invocato...!
L'unica soluzione è quella presentatati da Marco.
P.S.:
Puoi passare anche l'oggetto direttamente non è obbligatorio passare
il nome... in quanto passando l'oggetto Access.Form poi puoi accedere
sempre alla sua proprietà Name.
Public Function NomeFunction (Param1 As....., Optional frm as
Access.Form)
   MsgBox frm.Name
End Sub
I 2 metodi sono sostanzialmente uguali.
@Alex


Grazie ad entrambi: ho già adottato la seconda delle due soluzioni. Volevo
capire cse era possibile snellire un po' le chiamate.
Grazie ancora!


 Grazie ancora!
Sono snellissime... ;-)
Diciamo che se hai la certezza che solo le Form ATTIVE possono fare
azioni, e spesso è così... puoi usare 
Screen.ActiveForm.Name
@Alex
Newsgroup: it.comp.appl.access
Titolo: Errore SQL

Saluti al NG.
Lo sapevate che in SQL Server c'e' un errore grave sull'SQL?
Supponete di avere un archivio Clienti contenente i campi Nome e P_IVA.
Si supponga anche che alcuni campi P_IVA abbiano valore "" (non e' NULL!).
Scrivete:
SELECT Nome, P_IVA from Clienti WHERE P_IVA like "%5"
Questa istruzione non vi restituisce tutti e soli i clienti con Partita IVA
che inizia per "5", ma anche quelli che ce l'hanno vuota a partire dal primo
record che si trova in archivio che inizia col 5.
Cioč:
Nome             P_IVA
Minni
Paperino      02348752386
Pluto
restituisce i record 2 e 3
Dunque dipende anche dall'ordinamento.
Questo baco č noto a Microsoft.
Sembra che il sr 1 e 2 mettano a posto questo e molto altro ancora (sono 40
Mb l'uno e l'altro!)
Buon lavoro a tutti.
Luciana

 wrote in message
pw6S5.95727$BF.34...@news.infostrada.it...

Mi č venuta la pelle d'oca!!
Bobbit

 SELECT Nome, P_IVA from Clienti WHERE P_IVA like "%5"
ERRATA CORRIDGE
SELECT Nome, P_IVA from Clienti WHERE P_IVA like "5%".
Scusate il "%5" darebbe il risultato desiderato.

 ha scritto nel messaggio
news:7M9S5.653$FV2....@news.infostrada.it...

Ho provato su MSDE (Stesso motore di SQL 2000) e SQL Server 6.5:
SELECT Nome, PartitaIVA FROM PartiteIVA WHERE (PartitaIVA LIKE N'5%')
e mi restituisce i record giusti.
Mi spiegheresti di più sulla struttura della tabella: tipo di dato per la
colonna della partita IVA, versione dell'SQL Server, ecc.?
Bye

Giorgio PS <giorgio....@NOSPAMps-elettronica.it> wrote in message
8vbgvn$jao$1...@pinco.nettuno.it...

Salve!
Io ho fatto le prove sia con il Query Analyzer di SQL Server Versione
7.00.623, sia attraverso un .adp di Access 2000.
I risultati sono stati gli stessi. Negativi.
Prova a inserire i seguenti valori in una tabella Clienti con due campi:
Nome        P_IVA
---------       --------------------
Balbo
Conti         594215865457
Rossi
Viano
Gli spazi non valorizzati del campo P_IVA sono vuoti (stringa vuota "", non
NULL).
In questo caso  l'istruzione:
SELECT Nome, P_IVA from Clienti WHERE P_IVA like "5%"
restituisce i record Conti, Rossi, Viano.
Cioè tutti i record che trova con P_IVA che inizia con 5 e tutti quelli
successivi con P_IVA vuota.
Se tu cambiassi l'ordinamento troveresti un altro insieme di record.
Prova e fammi sapere. Lo so che e' sconvolgente.
Prova anche a guardare il sito della Microsoft. E' un errore noto che viene
risolto da un service pack.
Se ritrovo l'indirizzo corretto te lo invio.
Buon lavoro