mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.appl.access
Titolo: da access 2003 a 2007 pannello comandi non funziona

Ciao
ho un programma fatto con la versione 2003 di access
passando alla versione 2007 il pannello comandi "buca":
riesce ad aprire maschere e report
ma
non riesce a richiamare "sottoPannelliComandi", comne se non fosse pigiato 
nulla
chi sa parli ;>)
grazie in anticipo

 non riesce a richiamare "sottoPannelliComandi", comne se non fosse pigiato
...
ho risolto cosi:
copiato la tabella del pannello
cencellato e ricreato il pannello
incollato i vecchi dati della tabella del pannello

Newsgroup: it.comp.appl.access
Titolo: Eliminare visualizzazione record duplicati in combo

Inserisco  dei valori in un controlli delle maschere a mezzo di  caselle
combinate utilizzando a volte i dati dei record precedenti della tabella
medesima.
Che espressione posso mettere nella query della combo per evitare che
vengano visualizzati gli eventuali record duplicati?
Grazie
Gianni
-- 
Posted via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Gianni
raggruppa usando il sigma nella struttura della query.
ciao MAssimiliano
--------------------------------
Inviato via 
http://usenet.libero.it


Un'ulteriore finezza è sfruttare i predicati di SELECT "SELECT [ DISTINCT |
DISTINCTROW ]  * FROM tabella"
DISTINCT Omette i record che contengono dati duplicati nei campi
selezionati. Per essere inclusi nei risultati della query, i valori di ogni
campo elencato nell'istruzione SELECT devono essere univoci. Numerosi
impiegati elencati in una tabella Impiegati, ad esempio, potrebbero avere lo
stesso cognome. Se nel campo Cognome due record contengono Rossi, la
seguente istruzione SQL restituirà un solo record contenente Rossi:SELECT
DISTINCT Cognome FROM Impiegati;Se si omette DISTINCT, la query restituirà
entrambi i record contenenti Rossi.Se la proposizione SELECT contiene più di
un campo, la combinazione dei valori di tutti i campi per un determinato
record deve essere univoca perché il record venga incluso nei
risultati.L'output di una query che utilizza DISTINCT non è aggiornabile e
non riflette le successive modifiche apportate dagli utenti.
DISTINCTROW Omette i dati basati su interi record duplicati e non solo su
campi duplicati. È possibile, ad esempio, creare una query che esegua il
join della tabella Clienti e della tabella Ordini in base al campo ID
cliente. La tabella Clienti non contiene campi ID cliente duplicati,
contrariamente alla tabella Ordini in quanto ogni cliente può effettuare più
ordini. La seguente istruzione SQL mostra come utilizzare DISTINCTROW per
produrre un elenco di società che abbiano almeno un ordine, senza però
fornire altri dettagli relativi agli ordini:SELECT DISTINCTROW NomeSocietà
FROM Clienti INNER JOIN Ordini
ON Clienti.IDCliente = Ordini.IDCliente
ORDER BY NomeSocietà;Se si omette DISTINCTROW, questa query produrrà più
righe per ogni società con più di un ordine.DISTINCTROW ha effetto solo
quando si selezionano campi da alcune delle tabelle utilizzate nella query,
ma non da tutte. DISTINCTROW viene ignorato se la query include una sola
tabella o se vengono estratti campi da tutte le tabelle.
Saluti.
@Alex.
Newsgroup: it.comp.appl.access
Titolo: cercare x cognome e nome su maschera

Salve,
dovendo cercare e fare delle modifiche di alcuni dati di clienti attraverso 
una maschera con diversi campi tra cui cognome e nome,
volevo sapere se è  possibile fare la ricerca  (cerca cognome, cerca nome), 
come si fa con la query, in una maschera. Non so come fare potete aiutarmi?
grazie
rino 

 come si fa con la query, in una maschera. Non so come fare potete aiutarmi?
Ciao Rino.
Devo dire che, la domanda posta ha trovato piů e piů volte risposte e credo
che, con cinque minuti di ricerca su Google, avresti potuto risolvere da
solo.
Ma č Natale......
Dunque: nel tuo caso non ti serve a niente una query, a meno che tu non
abbia esigenze particolari.
Quello che devi fare č inserire dei controlli non associati
nell'intestazione della maschera e, sull'evento AfterUpdate degli stessi,
provvedere ad applicare i relativi filtri con la funzione
DoCmd.ApplyFilter, della quale trovi ampia documentazione nell'help di VBA.
-- 
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype:pbsoftsolution

"Gabriele Bertolucci" <"info[at]pbsoft[dot]it"> ha scritto nel messaggio 
news:efq3ciouj10l.17cndg1mpg3gf$.dlg@40tude.net...

grazie gabriele
meno male che esiste il natale :)
rino

Newsgroup: it.comp.appl.access
Titolo: stampare determinate pagine di un report

E' possibile stampare sole le prime 2 pagine di un report?
che codice associo al bottone di stampa?
grazie


se chiami l'interfaccia della stampante hai già fatto.....
DoCmd.RunCommand acCmdPrint
 

 che codice associo al bottone di stampa?
 
Prova con questo codice p.e. al clic di un pulsante di una
maschera:
 
DoCmd.SelectObject acReport, "MioBelloReport", True
DoCmd.PrintOut acPages, 1, 2
 
Vedi anche <F1> per "SelectObject" e "PrintOut".
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
Newsgroup: it.comp.appl.access
Titolo: Report

Buon giorno a tutto news e BUONE FESTE,
espongo il mio piccolissimo problema: ho un REPORT settima dove ci sono le 
intestazioni colonna con LUNEDI, MARTEDI ecc.. DOMENICA, quindi sono 7 
colonne, nel corpo del report c è la riga con 7 caselle di text le quali 
corrispondono ai giorni della settimanae ai record di una tabella, 
chiaramente quando si và a fare l anteprima per ogni giorno escono i record 
della tabella, sin quà tutto ok. esempio:
      LUNEDì MARTEDÌ MERCOLEDÌ GIOVEDÌ VENERDÌ SABATO DOMENICA
      1 1 1 1 1 1 1
      2 2 2 2 2 2 2
      3 3 3 3 3 3 3
      4 4 4 4 4 4 4
      5 5 5 5 5 5 5
      6 6 6 6 6 6 6
      7 7 7 7 7 7 7
      8 8 8 8 8 8 8
      9 9 9 9 9 9 9
      10 10 10 10 10 10 10
      11 11 11 11 11 11 11
      12 12 12 12 12 12 12
      13 13 13 13 13 13 13
      14 14 14 14 14 14 14
      15 15 15 15 15 15 15
      16 16 16 16 16 16 16
      17 17 17 17 17 17 17
      18 18 18 18 18 18 18
però se nel caso ci sono + di "18" record in uno o piu giorni continua sul 
secondo foglio. C è la possibilità di stampare tutto su un unico foglio in 
questo modo:
      LUNEDì             MARTEDÌ MERCOLEDÌ               GIOVEDÌ VENERDÌ 
SABATO DOMENICA
      1 1 19 1 1 19 1 1 1
      2 2 20 2 2 20 2 2 2
      3 3 21 3 3 21 3 3 3
      4 4 22 4 4 22 4 4 4
      5 5 23 5 5 23 5 5 5
      6 6 24 6 6 24 6 6 6
      7 7 25 7 7 25 7 7 7
      8 8 26 8 8 26 8 8 8
      9 9 27 9 9 27 9 9 9
      10 10 28 10 10 28 10 10 10
      11 11 29 11 11 29 11 11 11
      12 12 30 12 12 30 12 12 12
      13 13 31 13 13 31 13 13 13
      14 14 32 14 14 32 14 14 14
      15 15 33 15 15 33 15 15 15
      16 16   16 16 34 16 16 16
      17 17   17 17 35 17 17 17
      18 18   18 18 36 18 18 18
Ho messo a caso i record in + a MARTEDI e GIOVEDI, ma potrebbero essere in 
LUNEDI, MERCOLEDI ecc... non c è uno standard fisso per sapere quando 
capitano i record in +. C è qualche soluzione che si potrebbe fare? Speo di 
essere stato chiaro....
Grazie in anticipo e BUONE FESTE. 



P.S. Spero che questa volta siano uscite le celle!!!!
Newsgroup: it.comp.appl.access
Titolo: creare un collegamento ad una tabella da codice vb

Mi spiego meglio, ho una tabella collegata di nome ricevutevoci, sapete se č 
possibile eliminare tale collegamento e ricrearlo da codice vba quando 
serve?
Grazie. 

 Grazie.
Si ...
Vedi il metodo DELETE dell'insieme Tabledefs, e per ricrearla usa
CreateTableDef
specificando la proprietà Connect dell'oggetto.
Nell'help è tutto spiegato
-- 
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------

 @Alex (Alessandro Baraldi)
tnx

Newsgroup: it.comp.appl.access
Titolo: Intercettare i controlli numerici attivati in una form

Un saluto a tutti. Ho una form in visualizzazione maschera continua. In
questa form ci sono numerosi controlli nel singolo record nei quali
compaiono degli importi espressi in euro. Poiche' mi e' stato chiesto di
rendere possibile la conversione visiva in lire di un qualsiasi importo , mi
sono regolato cosi' :
Ho creato un controllo nell'intestazione della maschera diciamo "INLIRE" non
visibile.
Nell'evento su attivato dei controlli con importi ho fatto in modo che
"INLIRE" diventasse visibile e mostrasse la conversione in lire.
La domanda e' questa : Esiste un modo senza scrivere codice per ogni
controllo che contiene importi,
ma in eventi della sola maschera far sě che il controllo "INLIRE" svolga lo
stesso la sua funzione??
N.B. la form contiene anche controlli che non contengono importi .
Ovviamente e' ben accetta anche una soluzione completamente diversa dalla
mia che risolva meglio la questione, anche se sarei comunque curioso, per
conoscenza, di sapere se e' realizzabile la scorciatoia che ho descritto.
Grazie a tutti e un affettuoso saluto.

 ha scritto nel messaggio
news:0nvua.101761$iy5.
3103788
@twister2.libero.it...

Ti propongo una strada originale:
Usa l'evento "Su mouse spostato" del controllo che sai essere numerico o
valuta e scrivi per esempio:
Private Sub Testo8_MouseMove(Button As Integer, Shift As Integer, X As
Single, Y As Single)
If IsNumeric(Me.Testo8) Then
Me.Testo8.ControlTipText = "Lire " & Me.Testo8 * 1936.27
End If
End Sub
Cioč utilizzi l'etichetta di spiegazione del controllo per mostrare il
calcolo.
Per provarlo scrivi il codice utilizzando un controllo numerico e che abbia
un valore. Apri la maschera e posiziona il mouse sul controllo. Dopo pochi
decimi di secondo...
Ciao, Carlo

 Ti ringrazio molto , ci provo.
Newsgroup: it.comp.appl.access
Titolo: Problema con pulsanti maschera Access97

Mi capita questo errore che proprio non capisco:
In una maschera (con all'interno due sottomaschere), da un certo punto (non
mi sembra di aver fatto nessuna operazione in particolare), ha cominciato a
darmi ogni volta che premo i pulsanti (evento suClic):
'L'espressione clic immessa come impostazione della proprietą di evento ha
provocato il seguente errore: La dichiarazione della routine di eventi non
corrisponde alla descrizione dell'evento con lo stesso nome'
Io non ho affatto cambiato nome ai controlli ed ho provato a creare anche
nuovi pulsanti ma mi da sempre lo stesso errore (ho provato anche Copia e
Incolla della maschera).
Cosa puo' essere?
Vi ringrazio anticipatamente per qualsiasi suggerimento a riguardo.
Ciao,
Roberto

 ha scritto nel messaggio
news:k8wM7.64$H73....@nreader3.kpnqwest.net...


Newsgroup: it.comp.appl.access
Titolo: calcolo errato in query campo calcolato

ho 3 campi
il primo vale 1.898.857,52  -----> importo
il secondo vale 65       ----> DCount("idprodotto";"miaquery")
il terzo vale 12  ----> DCount("idprodotti";"miaquery";"idprodotto=" & 
[maschera].[idprodotto])
la formula del campo calcolato è
b1: 
Format((Round([importo];2)\Round(DCount("idprodotto";"miaquery");2))*Round(DCount("idprodotti";"miaquery";"idprodotto=" 
& [maschera].[idprodotto]);2);"Standard")
la calcolatrice di widows mi restituisce il valore 
350558,31138461538461538461538462
la query mi restituisce il valore 350.556,00
sembra che perda i decimali o arrotondi sapete cosa sbaglio? 

 ha scritto nel messaggio
news:4413458e$0$18284$4faf...@reader1.news.tin.it...

si, l'operatore della divisione
Prova dalla finestra immediata di VBA a fare questa divisione
? 10\3
e poi prova questa
? 10/3
Ciao
-- 
Giorgio Rancati
[Office Access MVP]


grazie mille :)
non me ne ero veramente accorto
grazie ancora ciao.
Newsgroup: it.comp.appl.access
Titolo: Porta controllo in primo piano

Ciao a tutti.
C'è qualcuno che sa con quale istruzione (quindi via codice) si porta in 
primo piano un controllo di una maschera ?
Grazie
Antonio


Non so se ho interpretato bene, ma se tu hai due controllo esattamente
sovrapposti uno sull'altro, puoi usare la proprietà Visible per nasconderne
uno e visualizzare l'altro.
Saluti
Franco
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 ha scritto nel messaggio 
news:217Z222Z110Z44...@usenet.libero.it...

Sto realizzando una classe che mi permetta di fare una specie di dissolvenza 
di una parola/frase su una maschera. La parola (scelta in modo random fra 
una trentina di parole che sintetizzano più o meno l'applicazione) viene 
esposta variando i colori progressivamente, partendo dal beige, scurendosi 
fino al blu e tornando al beige, che è il colore della maschera e quindi 
sembrerà inesistente.
Quando tutte le lettere avranno subito questa trasformazione di colore 
(l'operazione viene avviata in modo differito fra di esse), dovrà essere 
ripristinata la visualizzazione, per una ventina di secondi, della parte 
della maschera che era stata momentaneamente soppiantata dalle lettere in 
dissolvenza.
Questo meccanismo l'ho già realizzato, è venuto bene, ma non è una classe: 
volendo renderlo il più generalizzato possibile, ho pensato di creare 
dinamicamente i controlli che accoglieranno le lettere colorate e la cosa 
migliore sarebbe crearli "in secondo piano", per poi portarli in primo piano 
quando deve essere visualizzato quella specie di banner. Va bene anche 
cambiare lo stato da visibile ad invisibile e viceversa, ma se esiste 
un'istruzione che sposta un controllo da primo in secondo piano e viceversa 
mi sembra più consona a quello che vorrei fare.
Grazie
Antonio
Newsgroup: it.comp.appl.access
Titolo: Messaggi Privati !!!!!

--------------------------------------------------------------------------<
-- 
Posted from [212.141.54.103] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 Alex.
Inviano MAIL private. Perchè non c'hanno voglia di scaricare i messaggi del
NG e cercare il loro argomento. Una risposta in mailbox è immediata no?
Non è corretto. Il NG è pubblico e se io aiuto qualcuno anche altri possono
usufruire dell'aiuto. Una mail avvantaggia solo chi la riceve. Allora però
mi faccio pagare!!!
Antonio

 Sono "n'uovo" del NG scusate la domanda!!!
Ciao Alex,
oltre a quanto segnalato da Antonio, non č neanche corretto inviare un
messaggio al NG indicando x Tizio o x Caio, solo perché si conosce la
disponibilitą a trovare soluzioni da parte di Tizio o di Caio.
I messaggi si inviano al NG e basta.
Chi ha voglia e le conoscenze risponde.
Comunque tutti possono leggere ed apprendere dalle risposte; anzi + sono e
meglio č: tante teste rappresentano esperienze lavorative differenti.
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com

--------------------------------------------------------------------------<
-- 
Posted from [212.141.54.101] 


--------------------------------------------------------------------------<
-- 
Posted from [212.141.54.103] 


 ha scritto nel messaggio
news:000301c12a84$d58b2440$e90a623e@w1v7p0...

Poiché, dati i miei ultimi post, mi sento chiamato in causa sull'argomento,
ci tengo a esprimere il mio punto di vista.
Se ho fatto riferimento esplicito a una persona (Roberto), è  semplicemente
perché all'inizio il mio problema era più "concettuale" che pratico (cioè
non del tipo domanda secca-risposta secca), e mi sembrava naturale
richiamare l'attenzione dell'interlocutore col quale avevo cominciato un
"ragionamento".
E poi, nuovo dell'NG, considerati i centinaia di post giornalieri, confesso
che avevo anche il timore di non ricevere più risposte. Ma vedo che così non
è! (ma come cacchio fate a tener dietro a tutti?!).
In ogni caso ciò non ha impedito ad altri amici di accodare le proprie
risposte, per cui colloquio privato proprio non era (rinnovo un grazie a
tutti); neppure era da parte mia un modo per esprimere
un qualche tipo di preferenza (siete tutti bravissimi!)
Ergo, pur con i dovuti distinguo, non ne farei una questione così
"scandalosa". ;-)
Salutoni a tutti

 Salutoni a tutti
Ciao.

--------------------------------------------------------------------------<
-- 
Posted from [212.141.54.102] 

Newsgroup: it.comp.appl.access
Titolo: stesso evento GotFocus per tutti i controlli del db

buon giorno
vorrei che la stessa routine venisse lanciata, al verificarsi di una certa 
condizione, ogni volta che un qualsiasi controllo di una qualsiasi maschera 
prende lo stato attivo.
un aiuto, per favore?
ipergrazie in anticipo
ruggero 


Argomento trito e ritrito...!
Per farlo devi scrivere del codice, e questo è di un livello
discretamente elevato.
Si tratta di scrivere una Classe che possa essere istanziata per
gestire conl'ereditarietà gli eventi del controllo associato...
Personalmente se non hai una buona conoscenza del VBA ti sconsiglio
questa cosa.
Per farti capire di cosa parlo ti allego degli esempi:
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=155
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=157
meno attinente ma in realtà più vicino alla tua esigenza:
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=288
Se sei in grado di comprendere la tecnica usata hai la soluzione in
mano.
@Alex

Non me ne intendo molto ma forse una strada potrebbe essere questa:
1) Crei un modulo, ad es. Modulo1 che includa una funzione del tipo
Public Function FuncGotFocus()
contenente il codice che vuoi eseguire.
2) Poi crei una macro, ad es. MacroGotFocus, e come azione scegli
"EseguiCodice" mentre come argomenti scegli il nome della function
(nel nostro caso FuncGotFocus).
3) Infine nell'evento Form_Load di ogni form inserisci il seguente
codice:
Dim C As Control
For Each C In Me.Controls
    On Error Resume Next
    C.OnGotFocus = "MacroGotFocus"
Next

 ha scritto nel messaggio 
news:4c6ceb31$0$31384$4faf...@reader1.news.tin.it...


Antologiko ha scritto:

Comunque fare la macro non serve e' sufficiente:
C.OnGotFocus = "=FuncGotFocus()"

 C.OnGotFocus = "=FuncGotFocus()"- Nascondi testo citato
Ok, io avevo provato con
C.OnGotFocus = "=FuncGotFocus"
e mi dava errore, e quindi ho ripiegato sulla macro, ma evdentemente
bisogna inserire anche le parentesi tonde.


In quel codice, manca tutta la gestione errori...
Infatti la collection Controls espone anche controlli che non hanno
l'evento in questione.
C'è poi la questione delle Sottomaschere... quella non la
consideri...?
Saluti
@Alex

 @Alex
Ciao Alessa'. Come si sta a zanzare dalle tue parti? ;-{)

antologiko ha scritto:

Quello che fa access, quando sopprime le parentesi di chiamata a 
funzione (cfr. x=date()), e' una puttanata pari alla gestione delle 
date. Capisco che quando usa "[Event Procedure]", dovendo fare una 
sostituzione, ci sta tutto che non vengano utilizzate le parentesi. Nel 
caso di chiamata a funzione di tipo statico (nel senso di nome 
assegnato) sopprimerle genera solo confusione poiche' si ha 
l'impressione di usare una variabile e non una funzione.
La confusione e' tale che ti ha indotto a pensare di scrivere la 
chiamata senza le parentesi con conseguente errore in esecuzione.
La mia abitudine a usare le parentesi e' tale che scrivo sempre Date() e 
mi inalbero (incazzo) sempre quando access mi rimuove le parentesi.
--
ac
Newsgroup: it.comp.appl.access
Titolo: Filtro Maschera

Come si fa a filtrare una maschera?
Avrei necessità di filtrare una maschera, collegata a una tabella in base
a i valori presenti in un campo.
Io ho usato una query filtrata come origine della maschera.
MA c'è un altro sistema?
Ciao
Guido
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Guido
Me.filter = "Tuofilitro"
Me.filterOn
-- 
_ _
Ciao
MAssimiliano Amendola            
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:  
www.donkarl.com/it

Newsgroup: it.comp.appl.access
Titolo: Numerazione progressiva

Roma 18/07/00
Ciao a tutti
vorrei sapere come faccio a numerare progressivamente dei record inseriti in
una sottomaschera con riferimento alla maschera principale con due sole
tabelle..........
prima che bestemmiate addosso tutto il calendario mi spiego meglio.
Sto cercando di fare un'applicazione in grado di gestire un sistema di
codifica basato su MacroFamiglie, Famiglie, Tipi e Progressivi.
Ad esempio componenenti delle MacroFamiglie potrebbero essere articoli
Elettronici, Meccanici, Pneumatitici, Idrualici, etc. gestiti in una tabella
il cui codice univoco sarebbe gestito da un campo contatore.
LA sezione delle Famiglie potrebbe essere Resistenze, Condensatori,
Induttanze, Diodi etc. per la MacroFamiglia di articoli Elettronici.
Viti, Rondelle, Dadi, Prigionieri per la MacroFamiglia di articoli
Meccanici.
Il problema e' che dovranno esistere i codici 001 sia per la MacroFamiglia
degli articoli elettronici che per quella degli articoli Meccanici.
Io pensavo di creare un'unica tabella per le Famiglie ma ovviamente il campo
contatore e' di tipo univoco quindi il codice 001 o viene assegnato alla
Macrofamiglia  di articoli elettronici o alla MacroFamiglia di articoli
meccanici.
Grato per l'attenzione/pazienza saluto a tutti .

degli articoli elettronici che per quella degli articoli Meccanici.
invece di usare un campo contatore usa la funzione dMax come
illustrato in apposita sezione del sito comune, indirizzo qui sotto.
--
make it idiot proof and someone will make a better idiot.
--
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/

 ha scritto nel messaggio
news:397571cc...@news.interbusiness.it...

Newsgroup: it.comp.appl.access
Titolo: Criterio query con "Between"

Ciao a tutti.
 
Vorrei filtrare una query in base all’intervallo tra due valori
contenuti nei campi CampoDa e CampoA di una maschera.
 
Se dovessi eseguire la query solo da un report del mio database,
scriverei semplicemente nel criterio: Between Forms!MiaForm!CampoDa
And Forms!MiaForm!CampoA
 
Per evitare di duplicare la query che deve essere eseguita da più
report, dovendo eseguire questo criterio solo se la MiaForm è
caricata, allora in un modulo scriverei la funzione:
 
Function CriterioIntervallo()
 
If CurrentProject.AllForms("MiaForm ").IsLoaded = True Then
CriterioIntervallo = Between Forms! MiaForm!CampoDa And Forms!MiaForm!
CampoA
End If
End Function
 
e nel criterio della mia query richiamerei il criterio:
CriterioIntervallo()
 
Il problema è che la suddetta funzione così com’è scritta mi dà errore
di compilazione.
Dove sbaglio?
 
Grazie anticipatamente, cranze

on 04-09-12, cranze supposed :

Ma che bisogno hai di creare una funzione per esprimere una riga di 
criterio soggetta a una condizione (IsLoaded)?
Mi sembri un programmatore della Microsoft...
 
Comunque Between etc non dev'essere stringa?
 
Bruno
 
 

 
 
Cioè? I valori sono numerici se è questo che chiedi.
 
Grazie per l'interessamento.
 

 ...
 
Certo perch� VBA non sa cosa fare con Between ecc.
Per� anche con la sintassi corretta, cio� una stringa:
 
CriterioIntervallo = _
  "Between Forms!MiaForm!CampoDa And Forms!MiaForm!CampoA"
 
non funzioni perch� non si puo mandare operatori alla query
in questo modo. La query interpreta tutto che viene dalla funzione
come valore fisso (letterale).
 
In pi� la query sarebbe abbastanza perplessa se (in caso di
IsLoaded = False) la funzione non ha nessun valore.
 
Forse � meglio di duplicare la query?
 
-- 
Ciao
Karl
*********
Access FAQ: 
www.donkarl.com/it
 
 
 

 
 
Peccato. Comunque grazie per la spiegazione.
 
cranze

Newsgroup: it.comp.appl.access
Titolo: DoCmd.RunSQL "DELETE * ......WHERE

Vorrei eliminare dei record provvisori con la data < della data corrente:
Dim dtmOggi As Date
dtmOggi = CStr(Date)
DoCmd.SetWarnings False
DoCmd.RunSQL "DELETE .*" _
& "FROM [Provvisorio]" _
& "WHERE [Data]< " & Data
MsgBox "DELETE COMPLETATO"
DoCmd.SetWarnings True
Ma cosi  WHERE non legge la data corrente,mentre, se inserita all'interno vi
è la richiesta di parametri.
Come è possibile inserire la data corrente in WHERE ?
Grazie anticipate

Come è possibile inserire la data corrente in WHERE ?
Dunque....dopo il delete c'e' un punto che non ci va, macano gli spazi fra i
blocchi di istruzioni, le date non sono circoscritte dai cancelletti, non le
hai formattate americane ed io prepararei la striga prima di darla a runsql.
Ergo:
strsql = "DELETE  * FROM [Provvisorio] WHERE[Data] < #" &
Format(Data,"mm/gg/aaa") & "#"
DoCmd.RunSQL strsql
Saluti.
Luciano
(DOC)
Newsgroup: it.comp.appl.access
Titolo: controllo barra scorrimento

in un db di access 2003 devo eseguire un serie di macro una di seguito 
all'altra.
Per far cěň ho creato una macro che esegue tutte le precedenti, siccome 
l'operazione puň durare 60, 120 secondi o piů vorrei utilizzare una "barra 
di scorrimento" la cui progressione segua il tempo di durata dell'esecuzione 
delle macro. E' possibile?
e come?
grazie

 e come?
Puoi mettere con facilità una barra nella statusbar e aggiornarla
perche' vada avanti di un pezzettino alla fine di ogni query, ma non
sara' proporzionale alla "vera" durata dell'operazione.
Incolla questa roba in un modulo
Function InizializzaBarra()
SysCmd acSysCmdInitMeter, "Esecuzione in corso", 100
End Function
Function AggiornaBarra(valore As Integer)
SysCmd acSysCmdUpdateMeter, valore
End Function
Function EliminaBarra()
SysCmd acSysCmdRemoveMeter
End Function
Nella macro metti innanzitutto Eseguicodice InizializzaBarra(), poi
quando vuoi aggiornare la progressione metti Eseguicodice
InizializzaBarra(XX) dove XX indica quanto "piena" vuoi la barra
(0=vuota, 100=piena) . Alla fine fai Eseguicodice Eliminabarra() .
cia'
Max

Newsgroup: it.comp.appl.access
Titolo: [2K] Runcommand accmdexit (o Docmd.Quit)

Qualcuno ha avuto problemi?
Ricevo: Variabile oggetto o variabile di blocco With non impostata
Stranezza: Se si richiama il codice VB (senza fare nulla) il sistema
chiude correttamente
-- 
Alessandro Cara

...

Mi pare che figuri nell'elenco degli 8 bugs corretti dal service pack 2 di Office 2000.
Ciao, warp

 Mi pare che figuri nell'elenco degli 8 bugs corretti dal service pack 2 di Office 2000.
grazie
-- 
Alessandro Cara
Newsgroup: it.comp.appl.access
Titolo: Recuperare riferimenti mancanti

Sono passato ad acc2010 e mi sa che iniziano i dolori!!!
 
Ma procediamo con calma. Primo problemino
 
Da acc97 a 2010 riferimenti mancanti dao.... e utility.mda
 
Vorrei provare ad inserire il file/libreria mancante ed inserirlo nel 
percorso giusto ma nella finestra dei riferimenti non riesco a leggere 
il percorso completo ...
 
Ammesso che la mia idea per risolvere il problema sia giusta dove riesco 
a leggere il percorso completo?


Ciao 
guarda su 
www.accessgroup.it
 sezione API c'è un articolo di @Alex
MA


Elimina il riferimento a utility.mda perch� non serve.
Elimina anche il riferimento a DAO che ha cambiato nome
e in compenso dall'elenco scegli la libreria
 
Microsoft Office 12.0 Access Database Engine Object Library
 
Vedi anche 
http://www.donkarl.com/it/FAQ7.1
.
 
-- 
Ciao
Karl
*********
Access FAQ:  
http://www.donkarl.com/it
 
 
 

 ...
 
oops, letto troppo presto, 2010... -->
 
Microsoft Office 14.0 Access Database Engine Object Library 
 
 


Non lo trovo!!! ... quello che ci somiglia di piï¿œ ï¿œ
 
Microsoft Office 12.0 Object Library
 
 
 
 
 

 Microsoft Office 12.0 Object Library
 
Non ï¿œ DAO, ma la libreria di Office 2007.
Hai anche (avuto) quella versione sulla macchina?



 
Ehmm...
chiedo umilmente scusa ...
per qualche strano motivo mi ero autoconvinto di avere office2010...
invece ï¿œ solo 2007 ... :)
 
Se non mi avete mandato a quel paese ricomincio da capo ...
conversione da 97 a 2007
Riferimenti mancanti:
Utility.mda (posso eliminarlo?)
dao2535.tlb che se ho ben capito sostituisco con
Microsoft Office 12.0 Access Database Engine Object Library
 

 Microsoft Office 12.0 Access Database Engine Object Library
 
Bene tutto sembra girare bene il front in A2007 si collega bene al back 
in A97.
 
Mi rimane solo un errore che nella vecchia versione non apparive:
 
Ho una maschera singola che mi visualizza il dettaglio di una azienda.
Per l'inserimento di una nuova azienda con un pulsante  apro questa 
stessa maschera con un semplice
 
DoCmd.OpenForm "Aziende"
DoCmd.GoToRecord , "", acNewRec
 
nel vecchio funzionava mentre ora mi segnala "Impossibile passare al 
record specificato ...... potrebbe essere alla fine di un recordset"
Newsgroup: it.comp.appl.access
Titolo: Simbolo di valuta

Ho una tabella Costi formata da due campi di tipo "Valuta in Euro":  Costo1 
e Costo2
In una maschera ho una casella di riepilogo che visualizza tutti i campi 
della tabella Costi e nella stessa maschera ho due caselle di testo (formato 
Euro)nelle quali dopo aver selezionato una delle righe della casella di 
riepilogo viene immesso il valore di Costo1 e Costo2.
Nella casella di riepilogo i record vengono visualizzati con la 
formattazione in Euro, dunque sia col simbolo che coi decimali, ma nella 
casella di riepilogo mi viene visualizzato solo il numero.
Se ad esempio ho E1.200,50, nella casella di testo mi visualizza 1200,50
PS: la casella di testo è bloccata, perchè mi serve solo per visualizzare.
Come posso fare a far visualizzato la formatatzione della valuta in euro? 

 Come posso fare a far visualizzato la formatatzione della valuta in euro?
Ho risolto cosě da VBA:
CasellaDiTestoCosto1 = EuroConvert(Elenco.Column(1, j), "EUR", "EUR")
Cnq se qualcuno ha un metodo piů efficace, ke ben venga.
Newsgroup: it.comp.appl.access
Titolo: Sottrarre giorni lavorativi ad una data

Salve a tutti
Partendo da una data specifica devo togliere un certo numero di giorni
(lavorativi) e ricavare la nuova data.
Potete aiutarmi?
Grazie

 wrote in message 
news:200604280...@mynewsgate.net...

Poiché i giorni lavorativi sono dati da tutti i giorni meno quelli
festivi, dovresti precisare cosa intendi per quest'ultimi.
Le domeniche, anche i sabati, anche altre festività...
Bruno 

fai una query con i 3 campi
data
giorni
risultato
in alto alla query metti RISULTATO:DATA-GIORNI
cosi in risultato avrai la quello che hai chiesto nella domanda.
Ciao 
Manzoni
-- 
manzoni 
------------------------------------------------------------------------
View this thread: 
http://www.itsistemi.net/viewtopic-819397.html
Inviato via 
http://www.itsistemi.net

 
IO devo sottrarre solamente i giorni lavorativi escludendo domeniche e 
festività, e magari potendo decidere se considerare il sabato lavorativo 
o meno. Molto simile alla funzione che conta i giorni lavorativi tra 2 
date presente sul sitocomune, solo che io devo sottrarre dei giorni e la 
seconda data devo ricavarla dal conteggio dei giorni.
Esempio: dalla data di oggi(28/04/2006) se voglio togliere 7 giorni 
lavorativi, oltre ai classici 7 giorni devo poter togliere anche la 
festività del 25 aprile,domenica 23 e sabato 22 (opzionale), per un 
totale di 10 gg effettivi.
Grazie

 totale di 10 gg effettivi.
1 - Crea un tabella t_Festività col campo Festività,
      (Date/Time, PrimaryKey) contenente le festività
      diverse da Sabati (opzionale) e Domeniche di calendario.
2 - Poni le due funzioni seguenti in un modulo.
3 - Esegui la seconda passando gli opportuni parametri.
=========================================
Public Function Festivo(DataLav As Date, _
       Optional SabatoFestivo As Boolean = True) As Boolean
Dim RS_Festività As DAO.Recordset
Set RS_Festività = CurrentDb.OpenRecordset("t_Festività")
If Weekday(DataLav, vbSunday) = vbSunday Or _
          (Weekday(DataLav, vbSunday) = vbSaturday) * _
           SabatoFestivo Then
    Festivo = True
Else
    RS_Festività.MoveFirst
    Do Until RS_Festività.EOF
        If RS_Festività![Festività] = DataLav Then
            Festivo = True
            Exit Do
        End If
        RS_Festività.MoveNext
    Loop
End If
End Function
-----------------------------------------------------------
Public Function DiffDate(DataIniziale As Date, GiorniDaSottrarre As Integer, 
_
       Optional SabatoFestivo As Boolean = True) As Date
Dim i As Integer
Do Until i = GiorniDaSottrarre
    If Not Festivo(DataIniziale, SabatoFestivo) Then
        i = i + 1
    End If
    DataIniziale = DateAdd("d", -1, DataIniziale)
Loop
DiffDate = DataIniziale
End Function
=========================================
Bruno
Newsgroup: it.comp.appl.access
Titolo: X Silvio Berruti... problema Focus..

Ciao a tutti ...
| > ho un DB anagrafico che mi calcola anche il Cod Fiscale...
| > avanzo nei controlli della maschera con il tasto Invio...
| > ebbene arrivati al pulsante di comando x calcolare il codice fiscale..
| > si ferma li... vorrei se possibile con un secondo Invio... procedere
| > nei controlli successivi.... è possibile ???
|--------------------------
| Aggiungi in fondo al codice
| Docmd.GoToControl "nomeprossimocontrollo"
| oppure
| Me.prossimocontrollo.setfocus
|------------------------------
... provati entrambi ma non funziona...
il primo codice inserito mi genera questo errore...
--------------------------------
"Errore Run-Time '2110'
Impossibile spostare lo stato attivo al controllo CAP.
1- Il controllo è di un tipo che non può ricevere lo stato attivo, come
un'etichetta.
2- La proprietà Visibile del controllo è impostata a no.
2-La proprietà Abilitato del controllo è impostata a no.
----------------------------------
il punto 2 e 3 li escludo... perchè normalmente funziona e si vede...
.... provando il secondo codice... mi dice ..che è impossibile trovare il
metodo o il membro dei dati
... mi pare... e mi riporta sul codice setfocus...
ho provato a mettere il focus su un altro controllo non numerico...
 ma il problema rimane....
Ciao

 ha scritto nel messaggio
news:UeQG7.50331$sq5.2...@news.infostrada.it...

Stai cercando di rendere attivo un controllo in una sottomaschera partendo
dalla maschera?
Se è così
Me.ControlloSottoMaschera.Setfocus
Me.tuocontrollo.Setfocus
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com

 ha scritto nel messaggio
news:XmRG7.50935$sq5.2...@news.infostrada.it...
[superCUT..]
| Stai cercando di rendere attivo un controllo in una sottomaschera partendo
| dalla maschera?
| Se è così
| Me.ControlloSottoMaschera.Setfocus
| Me.tuocontrollo.Setfocus
| Silvio
|-----------------------------
veramente no... Silvio...il tutto si trova nel corpo di una Maschera...
se può esserti utile ti posto il codice del controllo del bottone di
comando del calcolo del CF....
--------------------------
Private Sub cmdElabora_Click()
    Dim ctl As Control
    For Each ctl In Me.Controls
        If ctl.Tag = "x" Then
            If IsNull(ctl) Or ctl = "" Then
                MsgBox "Il campo " & Mid$(ctl.Name, 4) & " non può essere
vuoto!"
                Exit Sub
            End If
        End If
    Next ctl
    Me.txtCodiceFiscale = CalcoloCodFis(Me.txtCognome, Me.txtNome,
CVDate(Me.txtDataNascita), Me.cboSesso, Trim(Me.txtCodiceComune))
End Sub
-----------------------------
Ciao....
--
SuperPippo®   [;o))

 ha scritto nel messaggio
news:QaWG7.53792$sq5.2...@news.infostrada.it...

Sinceramente non saprei...
Prova con un
Sendkeys "{TAB}", True


 ha scritto nel messaggio
news:vM5H7.57181$sq5.2...@news.infostrada.it...
CUT
| Sinceramente non saprei...
|
| Prova con un
| Sendkeys "{TAB}", True
| Silvio
|
------------------
azzarola... cosě funziona.... grazie...
Ciao
Newsgroup: it.comp.appl.access
Titolo: difficoltà e consiglio maschera

buonasera a tutti
devo creare una maschera per stampa con più parametri e non ho idea di
come impostarla
i campi da usare sono
da inziale
data finale 
numero
cliente
ecc.
il problema sorge quando non uso tutti i campi nel senso che quando vorrei
stampare un numero in particolare omettendo sia data che cliente come
faccio?
garzie
 
-- 
 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it
 
 
 


la questione riguarda la query origine del report da stampare
devi sfruttare la funzione NZ nei criteri
 

pietro66 ha scritto:

Ma la funzione nz non funziona solo per il testo con le date come faccio?


 garzie
 
1 - Quanti sono i parametri?
2 - Suppongo la relazione fra i paramretri sia un AND: lo confermi?
 
Bruno
 
 

 Bruno
 
E inoltre, la cosa più importante, qual è il VartType dei campi (Text, 
Currency, Date, or what else?)
 
Bruno
 
 

Bruno Campanini ha scritto:

i campi sono quelli descritti nella prima richiesta
VartType dei campi due date 1 numero e il resto testo e  la relazione è AND


 VartType dei campi due date 1 numero e il resto testo e  la relazione è AND
 
=====================================
Private Sub Command1_Click()
Dim SQL As String, T As String, Data_Ini As String, Data_Fin As String
Dim NUM As Long, CLI As String, Q As QueryDef, QSL As String
 
T = "T4"
CLI = "aaa"
NUM = 47
Data_Ini = Format("20-01-2012", "mm/dd/yyyy")
Data_Fin = Format("30-01-2012", "mm/dd/yyyy")
 
SQL = "SELECT " & T & ".DataIni, " & T & ".DataFin, "
SQL = SQL & T & ".Numero, " & T & ".Cliente FROM " & T & " "
SQL = SQL & "WHERE (((" & T & ".DataIni)>=#" & Data_Ini & "#) "
SQL = SQL & "AND ((" & T & ".DataFin)<=#" & Data_Fin & "#) "
SQL = SQL & "AND ((" & T & ".Numero)=" & NUM & ") "
SQL = SQL & "AND ((" & T & ".Cliente)='" & CLI & "'));"
Set Q = CurrentDb.CreateQueryDef("q4", SQL)
 
End Sub
==================================
 
Bruno
Newsgroup: it.comp.appl.access
Titolo: annullare inserimento nuovo record

in una maschera ho un pulsante che apre un'altra maschera filtrata.
dopo l'applicazione del filtro, la maschera mostra correttamente i record, ma se
dopo il filtro non vi è nessun record, si predispone per inserirne uno nuovo.
ciò non mi dispiace, ma l'utente deve essere avvisato. a tal fine uso un
vbokcancel.
il problema è che se clicco "cancel" mi apre ugualmente l'inserimento del nuovo
record. come posso evitarlo? come posso annullare l'inserimento del nuovo
record, chiudendo la maschera prima che l'utente la veda?
preciso che il filtro l'ho impostato da creazione guidata pulsante.
grazie
Ciao
Silvia.
 --
www.silvietta.it
...everyone's invited!
Prima di offendere qualcuno contate fino a dieci: vi verranno in mente molti piu' insulti!

 dopo averci riflettuto a lungo, ha
scritto:
Private Sub Form_Current()
    If Me.NewRecord = True Then
        nuovorecord = MsgBox("L'elenco è ancora vuoto o sei arrivato alla fine.
Vuoi inserire un nuovo Corsista?", vbOKCancel)
        If nuovorecord = 1 Then
            IdCorso_AfterUpdate
        Else
       		 MsgBox ("cliccato su annulla")
		'a questo punto dovrebbe chiudermi la tabella. le soluzioni di cui
sotto, non si sono rivelate efficaci. danno tutte errore.
       		  ' Me.Undo
	        '    DoCmd.Close
         		  'DoCmd.DoMenuItem acFormBar, acEditMenu, acUndo, , acMenuVer70
        End If
    End If
End Sub


scrivo a rate! ;-P
il comando che mi risulterebbe più utile sarebbe, chiudere la maschera.
ma con  DoCmd.Close mi restituisce l'errore:
impossibile eseguire qeusta azione durante l'elaborazione di un evento di
maschera o report
come posso fare allora?


 Prima di offendere qualcuno contate fino a dieci: vi verranno in mente
molti piu' insulti!
Concordo: saggia politica.

Non č meglio aprire la form impedendo le aggiunte?
non esattamente.
perchč solo se il form che si apre č vuoto, viene chiesto se inserire o meno un
nuovo record, se si clicca su "sě", il nuovo record si deve predisporre, se si
clicca su "no" diventa  inutile aprire la form
Ciao
Silvia.
 --
www.silvietta.it
...everyone's invited!
Prima di offendere qualcuno contate fino a dieci: vi verranno in mente molti piu' insulti!

 come posso fare allora?
Sposta tutto sull'evento clic della maschera principale.
Testa se il filtro ti restituirebbe record. Se no, chiedi se si vuole aprire
la form in aggiunta nuovo record, e se viene scelto no, non apri nulla!
Antonio
Newsgroup: it.comp.appl.access
Titolo: salvare caption controllo

hola,
ho un codice evento in un form che mi imposta il valore (caption) di un
controllo (label) con un testo differente da quello salvato nella maschera
(form) in questione. Come posso fare in modo che questo cambiamento di
valore venga memorizzato nel form cosicchè la prossima volta che apro il
form abbia il valore impostato precedentemente e non più quello impostato
alla creazione del form ????
grazie e ciao
    marco


Prova a buttarlo in una global e sul form unload glielo ricacci dentro e poi
con un docmd.save  [form, nomeform] dovresti aver risolto il problema.
Ciao Alessandro


memorizzi il dato in una tabella e lo riscrivi su apertura maschera
oppure apri la maschera in visualizzazione design modifichi il valore
e chiudi salvando il tutto....
Saluti.
Emanuele.

Newsgroup: it.comp.appl.access
Titolo: caselle combinate sincronizzate non associate

Salve a tutti.
In una maschera ho due caselle combinate non associate IdAzienda e
IdAzienda2 entrambe con origine tblAziende campi IdAzienda e
NomeAzienda. La prima, ordinata  secondo l'IdAzienda, la utilizzo se
conosco a memoria l'IdAzienda, la seconda, ordinata secondo
NomeAzienda, se la devo cercare in modo alfabetico.
Non riesco a far apparire il nome dell'Azienda scelta nella seconda
combo e viceversa.
Inoltre ho una sottomaschera continua collegata con IdAzienda, per cui
se scelgo l'azienda dalla prima combo la sottomaschera mi mostra i
record corrispondenti all'azienda selezionata, se la scelgo dalla
combo IdAzienda2 non succede nulla.
E' possibile ottenere questi due risultati?
Ciao e grazie.

 E' possibile ottenere questi due risultati?
Se fai cosa ho scritto e la sottomaschera è collegata con IdAzienda
a una delle casella, deve funzionare.
-- 
HTH
Karl
*********
Access FAQ: 
www.donkarl.com/it
 


Perfetto! Grazie.
Ciao.

Newsgroup: it.comp.appl.access
Titolo: query per esclusione

Problema:
ho due tabelle FORNITORI e ACQUSTI
nella tabella fornitori ho circa 100 nominativi ma nel 2003 non da
tutti ho effettuato acquisti. 
come costruire una query per conoscere quelli da cui non ho comprato
????? 
Grazie anticipate per l'aiuto 

 ?????
Come prima cosa ti serve una query che estragga dalla tabella Acquisti solo
i fornitori del 2003 che chiameremo q_acquisti2003
Select  IDFornitore From Acquisti where Year(DataAcquisto) = 2003
Dopodichč puoi usare la  procedura guidata Query - Nuova _ Ricerca Dati Non
Corrispondenti
Selezioni la tabella Fornitori, poi la Query q_Acquisti2003, metti in
relazione i due campi idFornitore e dovresti ottenere il risultato cercato.
Saluti
Cinzia

Newsgroup: it.comp.appl.access
Titolo: Problema report

Salve a tutta la ML
Devo aprire un report con uno zoom appropriato e una finestra con una size
appropriata come posso fare
datemi una mano.
Grazie per l'attenzione e per l'aiuto che mi darete.
Ciao.

 Prova a verificare nell'Help in linea alla voce Maximize vedi se fa al
caso tuo, lo puoi applicare con il metodo (access 97) docmd.Openreport
Ciao Tex
Newsgroup: it.comp.appl.access
Titolo: HLP:Eseguire un batch DOS e aspettarne la fine

Come posso eseguire un batch DOS (un comando FTP) con la shell e aspettarne
la fine prima di far coninuare Access nella routine che l'ha chiamato?
grazie
--
Edp l'Abbondanza
Lorenzo Piombini

 - rimuovi XXX x rispondere    ICQ #8814554
Il cicloamatore e' un dongiovanni che corteggia solo donne mestruate?
		-- Da it.hobby.umorismo
Newsgroup: it.comp.appl.access
Titolo: Estrarre parte di testto fino a...

Un cordiale saluto a tutti
A97 - Non riesco trovare una funzione per estrarre da un campo una parte di 
testo.
Mi spiego meglio: dovrei estrarre tutti i caratteri (che possono essere 
numeri o lettere) presenti prima del simbolo - (trattino)
Il numero dei caratteri presenti prima del simbolo - è variabile (potrebbero 
essere 3, 4, 5, ecc.) e quindi non è possibile stabilire un numero fisso per 
troncare il testo.
Ringrazio in anticipo chiunque vorrà dare un suggerimento
Gabriele 


x = left(tuastringa,1,instr(tuastringa,"-")-1)
se "tuastringa" non contiene il trattino la istruzione precedente va in 
errore.
-- 
ac
y-1=x


sorry correzione, e' una left e non una mid:
x = left(tuastringa,instr(tuastringa,"-")-1)
-- 
ac
y-1=x

 y-1=x
Grazie per la tempestivitŕ nella risposta.
ho provato e va bene.
Ma per non vedere la scritta #Errore quando non c'č il trattino come si puň 
fare ??
Sarebbe graditissimo un ulteriore aiuto
Gabriele


idx = instr(tuastringa,"-")
if idx <> 0 then x = left(tuastringa,idx -1)
-- 
ac
y-1=x

 y-1=x
Chiedo umilmente perdono perché penso di essere imbranato.
Il suggerimento va bene ma, probabilmente perchè non mi sono spiegato bene, 
vorrei che quando nel testo non c'è il trattino si vedesse il testo.
Esempio: PANDA-444 dovrebbe diventare PANDA e PUNTO dovrebbe rimanere PUNTO
Grazie ancora
  Gabriele 

 Esempio: PANDA-444 dovrebbe diventare PANDA e PUNTO dovrebbe rimanere PUNTO
non che sia particolarmente illuminante
idx = instr(tuastringa,"-")
if idx <> 0 then
	x = left(tuastringa,idx -1)
else
	x = tuastringa
end if
o
x=iif(idx=0,tuastringa,left(tuastringa,idx -1))
-- 
ac
y-1=x
Newsgroup: it.comp.appl.access
Titolo: Access Xp & Access W2k

Salve,
in ufficio hanno installato Windows Xp e Office XP mentre io a casa utilizzo
Access 2000; creando un database con Access Xp questo verrebbe aperto sul
mio Access 2000 oppure ci sono delle incompatibilita' ?
Thank's


di default, cioč se non cambi impostazioni,
Access XP crea file in formato 2000,
quindi la stessa cosa
ciaoZef

Newsgroup: it.comp.appl.access
Titolo: ricerca record su sottomschera

Ho la necessità di trovare un record specifico in una sottomaschera.......
Tramite maschera1 con una lista di articoli vorrei aprire maschera2 e
trovare il record specifico nella sottomaschera di maschera2
Riesco tranquillamente ad aprire la maschera2 con il seguente codice
Private Sub Form_DblClick(Cancel As Integer)
    Dim stLinkCriteria As String
    stDocName = "frmMovimentiMagazzino"
    stLinkCriteria = "[IDMovimentiMagazzino]=" & Me![IDMovimentiMagazzino]
    DoCmd.OpenForm "frmMovimentiMagazzino", , , stLinkCriteria
    DoCmd.GoToControl "sfrmmovimentimagazzino"
End Sub
Come faccio a trovare il record nella sottomaschera che contiene un valore
della maschera1?
Ho fatto diverse prove con findrecord senza nessun esito.....
Mi date una soluzione?
Mille Grazie
Massimo

 ha scritto nel messaggio
news:UmU5c.75899$FJ6.2...@twister1.libero.it...

VAi sul Sito Comune (link qui sotto) e nella Sezione Forms leggi la FAQ
intitolata "Come si può filtrare una maschera in base al valore contenuto in
un controllo di una sua sottomaschera?".
-- 
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------

 ha scritto nel messaggio
news:61X5c.76180$FJ6.2...@twister1.libero.it...

Se uso FindRecord ho la necessità di visualizzare il campo chiave nella
sottomaschera cosa che non vorrei fare, quale sarebbe un'alternativa........
Saluti

 Saluti


Newsgroup: it.comp.appl.access
Titolo: Bolla raggruppata e diverse commesse

Come da oggetto, stò costruendo un piccolo programmino x la mia azienda,
ma mi si presenta questo piccolo problema a cui non so dare una soluzione:
1 Maschera con nr.bolla e data (incrementabile tramite riga copiata dal
sitocomune, articolo di Sib), sottomaschera con diverse righe di
commesse(chiaramente derivano da 2 tabelle).
Vorrei applicare il nr.bolla a ogni singola commessa, che io sceglierò
tramite un campo Si/No e fissarlo x sempre.
Spero di essere stato sufficientemente chiaro.
Ringrazio chiunque può offrirmi spunti.
Ciao
Marco
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 Marco
Non c'è nessuno che puo aiutarmi?


 > Marco
Su sì_click
me.numerobolla = forms!Tuamaschera!tuoNrBolla
MAssimiliano