text:
On 3 Feb, 18:34, "Carlo Costarella" <
carlocoslib...@libero.it
> wrote:
> "Luigi" <
luigialibe...@gmail.com
> ha scritto nel messaggionews:1170520901.2...@m58g2000cwm.googlegroups.com...

Perfettamente così!
è possibile?
Ciao e grazie,
luigi


title: numero progressivo di riga in una tabella!

author: Carlo Costarella

text:
"Luigi" <
luigia...@gmail.com
> ha scritto nel messaggio
news:1170525733....@s48g2000cws.googlegroups.com...

Perfettamente così!
è possibile?
Ciao e grazie,
luigi
---------------------
In questo caso la cosa è molto semplice.
La chiave di tutto è il numero di fattura a video (è solo un esempio).
Conosciuto questo il "numeretto" sarà il dmax di tutti i record
dettagliFattura il cui idFattura è quello della maschera, + 1.
Per fare questo è necessario (meglio) creare una query con la sola tabella
dei dettagli (quella che usi nella sottomaschera) e con due soli campi: il
campo di join (IDFattura) e il campo "numeretto"; nei criteri del campo
IDFattura scriverai: Forms!TuoNomeMascheraPrincipale!TuoControlloChiave.
Salvi la query per esempio con "DimmiNumeretto" e poi fai così:
nella sottomaschera, al controllo "numeretto" scrivi questo codice su
attivato:
Private Sub Numeretto_GotFocus()
If IsNull(Me.Numeretto) Or Me.Numeretto = 0 Then
Me.Numeretto = Nz(DMax("Numeretto", "DimmiNumeretto"), 0) + 1
End If
End Sub
Ora appena il controllo "numeretto" della sottomaschera riceve il focus.....
Ciao, Carlo


author: Luigi

text:
On 3 Feb, 19:30, "Carlo Costarella" <
carlocoslib...@libero.it
> wrote:
> "Luigi" <
luigialibe...@gmail.com
> ha scritto nel messaggionews:1170525733....@s48g2000cws.googlegroups.com...

Bella idea! Non ci sarei mai arrivato!
Ho cambiato i nomi dei campi e dei controlli adegauandoli ai miei e mi
dà errore nella riga dell'if dicendo che c'è un punto, un punto
escalamativo o delle parentesi non utilizzate validamente!
Ho scritto sia come mi hai sugerito tu sia così
Private Sub ProgressivoRigaPerRicetta_GotFocus()
If IsNull(Me.ProgressivoRigaPerRicetta) Or
(Me.ProgressivoRigaPerRicetta = 0) Then
Me.ProgressivoRigaPerRicetta = Nz(DMax("Numeretto", "DimmiNumeretto"),
0) + 1
End If
End Sub
ma mi da sempre errore! Un'ultima cortesia...
grazie
Luigi


text:
"Luigi" <
luigia...@gmail.com
> ha scritto nel messaggio
news:1170529921.0...@s48g2000cws.googlegroups.com...
cut
Bella idea! Non ci sarei mai arrivato!
Ho cambiato i nomi dei campi e dei controlli adegauandoli ai miei e mi
dà errore nella riga dell'if dicendo che c'è un punto, un punto
escalamativo o delle parentesi non utilizzate validamente!
Ho scritto sia come mi hai sugerito tu sia così
Private Sub ProgressivoRigaPerRicetta_GotFocus()
If IsNull(Me.ProgressivoRigaPerRicetta) Or
(Me.ProgressivoRigaPerRicetta = 0) Then
...................
qui ci sono due parentesi di troppo, la prima e l'ultima. La stringa
diventa:
Private Sub ProgressivoRigaPerRicetta_GotFocus()
If IsNull(Me.ProgressivoRigaPerRicetta) Or
Me.ProgressivoRigaPerRicetta = 0 Then
ecc....
Ciao, Carlo


text:
On 3 Feb, 22:00, "Carlo Costarella" <
carlocoslib...@libero.it
> wrote:
> "Luigi" <
luigialibe...@gmail.com
> ha scritto nel messaggionews:1170529921.0...@s48g2000cws.googlegroups.com...

Continua a darmi lo stesso errore:
uso dell'operatore punto, punto esclamativo o delle parentesi non
valide.
Quando clicco su debug mi porta su questa riga:
If IsNull(Me.ProgressivoRigaPerRicetta) Or
Me.ProgressivoRigaPerRicetta = 0 Then
Il codice completo è il seguente:
Private Sub ProgressivoRigaPerRicetta_GotFocus()
If IsNull(Me.ProgressivoRigaPerRicetta) Or
Me.ProgressivoRigaPerRicetta = 0 Then
   Me.ProgressivoRigaPerRicetta = (Nz(DMax("Numeretto",
"DimmiNumeretto"), 0) + 1)
End If
End Sub
ho provato a scriverla in diecimila modi diversi ma non va!
Un suggerimento...
Ciao e grazie.
Luigi


text:
"Luigi" <
luigia...@gmail.com
> ha scritto nel messaggio
news:1170594457.0...@a75g2000cwd.googlegroups.com...





Ciao e grazie.
Luigi
-----------------------------
Ci sono sempre una o due parentesi parentesi di troppo. Questo il giusto
codice:
Private Sub ProgressivoRigaPerRicetta_GotFocus()
If IsNull(Me.ProgressivoRigaPerRicetta) Or Me.ProgressivoRigaPerRicetta = 0
Then
   Me.ProgressivoRigaPerRicetta = Nz(DMax("Numeretto","DimmiNumeretto"), 0)
+ 1
End If
End Sub
Accertati inoltre che esista la query chiamata "DimmiNumeretto" e che al suo
interno esista il campo "numeretto".
Il codice va scritto nella sottomaschera in corrispondenza del controllo
"ProgressivoRigaPerRicetta". Accerta anche la correttezza di questo nome.
La riga incriminata deve risiedere su di un unico rigo e non a capo come qui
riportata (ma potrebbe essere l'impaginazione di OE).
Così come l'ho scritta io:
If IsNull(Me.ProgressivoRigaPerRicetta) Or Me.ProgressivoRigaPerRicetta = 0
Then
In ultimo controlla se il tipo di dati di "ProgressivoRigaPerRicetta" è di
tipo numerico.
Dimenticavo: tra i riferimenti hai DAO?
Al limite mandami il db zippato che te lo aggiusto io.
Ciao, Carlo


text:
On 4 Feb, 15:45, "Carlo Costarella" <
carlocoslib...@libero.it
> wrote:
> "Luigi" <
luigialibe...@gmail.com
> ha scritto nel messaggionews:1170594457.0...@a75g2000cwd.googlegroups.com...

Ciao Carlo,
grazie mille per la pazienza dimostrata. Avevo un valore nel campo
"valore predefinito" della finestra delle proprietà e non me ne ero
accorto! Ora funziona tutto alla perfezione.
Ciao e grazie,
Luigi


title: Sintassi Like in confronto tra TextBox e stringa

author: PaoloD

text:
Ciao a tutti!
Dovrei fare un confronto tra TextBox1 e TextBox2 però nel seguente
modo:
   If Me!TextBox1 <> "*" & Me!TextBox2 & "*" then .....
In pratica TextBox2 può essere una parte di TextBox1
Penso che bisognerebbe in qualche modo usare il Like, ma non riesco a
creare la sintassi corretta: mi date una mano?


author: Alessandro Cara

text:
PaoloD ha scritto:

if instr(texbox2,texbox1) <>  0 -->trovato
oppure texbox2 like "*" & texbox2 & "*"  --> true se trovato
--
ac


text:

Ho usato la seconda
oppure texbox2 like "*" & texbox2 & "*"  --> true se trovato
e funziona alla grande, grazie davvero!


title: Access da OLEDB

author: Puntoblu

text:
Un grazie anticipato a chi trova tempo per questo
problemino :

perchè proteggendo un database MsAccess
(tramite password oppure tramite abilitazioni utente) e

volendo poi accedervi tramite OLEDB (naturalmente
impostando User ID e Password) viene generato il seguente errore "Impossibile
avviare l'applicazione. Il file di informazioni sul gruppo di lavoro è mancante
o aperto in modo esclusivo da un altro utente." ???

Come e dove va definito il file di informazioni sul
gruppo di lavoro ???

Ciao, grazie a tutti.

Piero.


title: Access da OLEDB

author: Federico Luciani

text:

prova a postare il codice che usi per la connessione
--
Federico
----------------------------------
Rimuovi paperino. per e-mail
----------------------------------
Tutte le richieste che arrivano
in privato, vengono cestinate.
----------------------------------
Sito Comune di it.comp.appl.access
http://www.sitocomune.com
mailto:
webm...@sitocomune.com
----------------------------------


title: Dritta su menu a tendina

author: computer valley

text:
Qualcuno sarebbe in grado di darmi una dritta su come creare una maschera
con dei menů a tendina incorporati.
Vi ringrazio.
Lucio


title: Dritta su menu a tendina

author: @Arold [             ]

text:
"computer valley" <
c.va...@tin.it
> ha scritto nel messaggio
news:BeAna.43167$T34.1...@news2.tin.it...
> Qualcuno sarebbe in grado di darmi una dritta su come creare una maschera
> con dei menù a tendina incorporati.
> Vi ringrazio.
> Lucio
>
ti aiuto perchè ci ho tribulato un po prima di riuscirci spero di delucidare
te e tutti quelli a cui servirà.
crei tante macro quanti sono i menu in alto in ogni macro metti le voci di
quel menù
per esempio la macro la chiami File in nome macro metti per esempio
"&nuovo in azione metti eseguicodice nuovofile
"&apri in azione metti eseguicodice aprifile
ecc.....................
poi crei una macro di nome menu e in tutte le righe della macro scegli
aggiungimenu e in nome menu metti & file e in nome macro menu scegli la
macro File
e cosi via per tutte le voci di menu.
alla fine scegli strumenti \ macro \ crea menu da macro \ e scegli la macro
di nome Menu.
ciao.


title: suddividere l'importo in più rate e arrotondamento euro

author: IgnazioC

text:
Salve  a tutto il NG!
mi trovo alle prese con un problema che non riguarda nello specifico
access, ma spero che qualcuno mi possa dare un consiglio.
sto realizzando un piccolo scadenziario, quindi quando memorizzo una
fattura, in base alla modalità di pagamento mi genera una o più
scadenze (nella tabella scadenze)
L'importo della singola rata lo calcolo come importo totale diviso
numero rate.
Il problema nasce quando l'importo non è perfettamente divisibile per
il numero delle rate
es: fattura da 100 euro da pagare in 3 rate...da 33.333333 euro
cadauna :)
ovviamente non deve succedere che il totale delle rate non corrisponda
al totale fattura, perchè altrimenti resta la partita aperta.
La prima soluzione che mi è venuta in testa è quella di  calcolare
l'importo di tutte le rate tranne l'ultima ed effettuare il calcolo di
quest'ultima per differenza (ed: 3 rate da 33.33 euro e una da 33.34)
Qualcuno ha qualche altro consiglio???
grazie.


author: Oscar Manfredini

text:
"IgnazioC" <

grazie.
>
Nessun altro consiglio: va benissimo così (non importa su quale rata tu
butti lo scarto).
Ciao: Oscar


title: How to update datasheet?

author: Fung

text:
datasheet:   student data
field : name , class2001
datasheet:  class
field : class2001, class2002
What should I do so that I can have a datasheet with field : name,
class2001?


title: Gestione data/ora

author: TopoDiddl

text:
Ciao a tutto il NG, avrei bisogno del vostro aiuto per risolvere un
problema:
Ho una base di dati in formato testo e ho necessità di fare delle
elaborazioni. Solitamente lavoro in Excel ma essendo questa troppo
grande eccede al max numero di celle che ha a disposizione il programma
e quindi devo ripiegare su Access che conosco un po meno.
Cerco di spiegarvi cosa mi occorre:
Partenza: 2 files in formato TESTO che contengono dei dati come da
esempio:
"TMSTAMP","RECNBR","O3_average"
"2006-09-01 00:01:00",298789,2.312
"2006-09-01 00:02:00",298790,2.112
"TMSTAMP","RECNBR","O3_average","O3_err"
"2006-09-05 11:00:00",2818,12.02,3
"2006-09-05 11:01:00",2819,-0.422,3
In pratica sono due files che provengono dallo stesso Logger che scrive
su uno o sull'altro in caso di errore o meno... registrando i dati ogni
minuto e indicando in caso di errore un codice che ne stabilisce il
tipo.
Cosa ho fatto: ho importato i files in due tabelle separate O3_DATA e
O3_ERRORS ciascuna formata dai campi
[TMSTAMP],[RECNBR],[O3_average]e[O3_err].
Ho creato una query per unire le due tabelle in una unica che contenga
tutti i dati.
SELECT * FROM O3_DATA UNION SELECT * FROM O3_ERRORS;
E gliela ho fatta creare chiamandola O3_ALL
SELECT * INTO O3_ALL FROM Query_SELECT_unione_tabelle;
Su questa tabella O3_ALL devo fare le seguenti operazioni:
- Individuare tutti i record che contengono la mezzanotte e modificare
la data in questo modo: dopo 02/09/2006 23:59:00 ho il record
03/09/2006 (e non visualizza il 00:00:00 dell'ora). Io devo invece
avere 02/09/2006 24:00:00
Come posso fare? Se imposto una query riferimento a O3_ALL con un campo
ChangeDay:[TMSTAMP]-1 mettendo come criterio Like "??/??/????" ottengo
i record della mezzanotte e accanto la colonna ChangeDay con la data
che mi serve. Se aggiungo un campo Ora: " 24.00.00" e unisco gli ultimi
due (ChangeDay e Ora) in un campo NewTMSTAMP ho quello che mi serve
ovvero la data nel formato 02/09/2006 24:00:00 solo che se uso la query
per creare una tabella NewTMSTAMP è formato testo e non data/ora e se
lo modifico perde i dati.
Spero in un vostro aiuto. Grazie.
TopoDiddl


title: Gestione data/ora

author: Michele (Giò)

text:
"TopoDiddl" <
topo...@yahoo.it
> ha scritto nel messaggio
news:1164121541.2...@h48g2000cwc.googlegroups.com...
Ciao a tutto il NG, avrei bisogno del vostro aiuto per risolvere un
problema:
Ho una base di dati in formato testo e ho necessità di fare delle
elaborazioni.
............
.........
Cosa molto importante, hai piacere che questi dati rimangano in txt? In questo caso direi che si
potrebbe direttamente lavorare su di essi....
Michele


title: Gestione data/ora

text:
Michele (Giò) ha scritto:
> Cosa molto importante, hai piacere che questi dati rimangano in txt? In questo caso direi che si
> potrebbe direttamente lavorare su di essi....
>
> Michele
I dati originali vengono salvati in formato .dat che è un file di
testo che utilizza la virgola come separatore come puoi vedere dalle
prime righe che ho postato.
Per importarli sono stati rinominati .txt formato supportato da Access.
Premesso che il Logger continua a lavorare in questo modo e non ho la
possibilità di modificare il programma di acquisizione ma ho solo
accesso ai dati mi sembra improponibile andare a lavorare su un file
con oltre 300000 righe senza possibilità di utilizzare filtri e quanto
altro.
Il cambio del giorno alla mezzanotte è solo un primo step per ovviare
a un errore concettuale di chi ha realizzato il programma di
acquisizione: i dati vengono registrati riportando l'orario (TMSTAMP)
di quando vengono scritti ma in realtà si riferiscono a quanto
registrato nel minuto prima. Mi spiego: l'acquisizione dalle 23:59:00
alle 00:00:00 viene registrata come 00:00:00 (primo record del giorno
successivo) mentre in realtà la misura è riferita al giorno
precedente.
Oltre a questo sono necessarie altre elaborazioni più complesse come
ad esempio riportare i valori da ogni minuto a valori ogni 30 minuti
facendo la media dei valori e il conteggio di quanti errori ci sono
stati in modo che se superano un certo tanto il dato in quella mezz'ora
deve essere considerato non attendibile.
Per questo è improponibile lavorare con files in formato testo.
Grazie comunque per l'interesse.
TopoDiddl


title: Divisione guidata database: è possibile riunirlo, dopo?

author: Roberto QCI

text:
Buongiorno,
Dopo aver eseguito la "Divisione guidata database": è possibile
riunirlo, dopo?
Grazie.


author: Alessandro Baraldi

text:
"Roberto QCI" <
ut...@katamail.com
> wrote in message
news:1134807209.4...@z14g2000cwz.googlegroups.com

Importa le tabelle.
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:
Alessandro Baraldi ha scritto:
> Importa le tabelle.
Ok, grazie !
Ciao


title: Ma inzomma, Access e pagine web, gnente de gnente ???

author: RobertoA

text:
Ma ti pare che uno ci mette 20 anni a farsi la sua bella anagrafica clienti
con Access e poi si accorge che l'applicazione realizzata non si puo'
webbizzare ?
E Microsoft che fa ? Nella versione 2007 ci toglie anche le 'pagine di
accesso ai dati'
Ma como ?
Ma se ce l'ha anche Filemaker il webbizzatore ?
E noi non cellabbiamo ?
A me mi (che non si dice) sembra che sia una pecca troppo peccaminosa
Ma sti poveri sviluppatori Access (Axes come diciamo noi fighi) cosa devono
fare per vedere le proprie applicazioni girare dentro un browser ?
Ce damo de Visual Web Developer ?
Oppure ce damo de Delphi x Php ?
RobertoA


author: Sergio MAZZA

text:
"RobertoA" <
amor...@tiscalinet.it
> ha scritto nel messaggio news:4699...@newsgate.x-privat.org...
> Ma ti pare che uno ci mette 20 anni a farsi la sua bella anagrafica clienti con Access e poi si accorge che l'applicazione
> realizzata non si puo' webbizzare ?
Perché ne conosci una che si può?
> E Microsoft che fa ? Nella versione 2007 ci toglie anche le 'pagine di accesso ai dati'
> Ma como ?
Però c'hai i bottoni fichi e maschere che fanno frizzi e lazzi.
> Ma se ce l'ha anche Filemaker il webbizzatore ?
Oltre a chi?
> E noi non cellabbiamo ?
Noi ci distinguiamo.
> A me mi (che non si dice) sembra che sia una pecca troppo peccaminosa
> Ma sti poveri sviluppatori Access (Axes come diciamo noi fighi) cosa devono fare per vedere le proprie applicazioni girare dentro
> un browser ?
Sudare, sudare, sudare.
> Ce damo de Visual Web Developer ?
Io lo farei in
ASP.NET
 (se devo proprio).
> Oppure ce damo de Delphi x Php ?
Macché.
> RobertoA
Robbe' ma allora non hai seguito il suggerimento di Carlo?
Quindi ti sei perso l'occasione di comprare XP-unlimited (
www.xpunlimited.com
) a 100 eurozzi?
Ahaaaa... No XP-Unlimited, no-access (on-line).
Io l'ho fatto comprare e tra poco lo faccio utilizzare...
Ciao.
--
Sergio MAZZA


text:
> Robbe' ma allora non hai seguito il suggerimento di Carlo?
> Quindi ti sei perso l'occasione di comprare XP-unlimited
> (
www.xpunlimited.com
) a 100 eurozzi?
> Ahaaaa... No XP-Unlimited, no-access (on-line).
>
> Io l'ho fatto comprare e tra poco lo faccio utilizzare...
Beh ho visto, e' interessante, molto interessante, pero' non e' proprio
quello che intendevo
Un'applicazione tipo OsCommerce secondo me e' una procedura da usarsi con un
qualsiasi browser
Sistemi tipo il Terminal Services hanno bisogno comunque di un client
installato sulla parte client ed inoltre di 'roba a pagamento'  sula parte
server


author: Carlo Costarella

text:
"RobertoA" <
amor...@tiscalinet.it
> ha scritto nel messaggio
news:469b035a$1...@newsgate.x-privat.org...

Secondo me tu hai la fissa dei file installati...come se i vari browsers non
fossero dei client installati.
Se vuoi mostrare e far usare il tuo bel applicativo Access, con maschere
report e quant'altro, via web, la soluzione più economica e funzionale è
XPUnlimited. Funziona alla grande...lo si installa su XP e vi possono
accedere macchine di qualsiasi tipo comprese Linux, MAC o palmari oltre a
tutti i sistemi Windows. L'accesso avviene via rete locale o via web anche
con macchine obsolete...cosa vuoi di più?
Se invece hai la necessità di usare le sole tabelle di Access in un
applicativo web allora il discorso cambia e di molto. In questo caso i
consigli di Sergio sono molto ma molto sensati: Access è un applicativo
database non un applicativo web...può diventare un "server" di applicativi
web, un repository di dati, al pari di SQL, ma non è un applicativo web.
Certo sarebbe stato bello. Chissà forse nella versione 2010...
Ciao, Carlo


text:
"RobertoA" <
amor...@tiscalinet.it
> ha scritto nel messaggio
news:469b035a$1...@newsgate.x-privat.org...
>
> Beh ho visto, e' interessante, molto interessante, pero' non e' proprio
> quello che intendevo
> Un'applicazione tipo OsCommerce secondo me e' una procedura da usarsi con
> un qualsiasi browser
> Sistemi tipo il Terminal Services hanno bisogno comunque di un client
> installato sulla parte client ed inoltre di 'roba a pagamento'  sula parte
> server
Come ti ha detto Carlo, non hai nulla da installare se non XPunlimited su
l'unico computer che "distribuirerà" la tua applicazione via rete (e se non
leggo male, dal 1 luglio è possibile interagire anche via browser) perché il
desktop remoto è già parte del S.O.
Ciao.
--
Sergio MAZZA


text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:f7ffk4$f94$1...@tdi.cu.mi.it...
cut
> Come ti ha detto Carlo, non hai nulla da installare se non XPunlimited su
> l'unico computer che "distribuirerà" la tua applicazione via rete (e se
> non leggo male, dal 1 luglio è possibile interagire anche via browser)
> perché il desktop remoto è già parte del S.O.
>
> Ciao.
> --
> Sergio MAZZA
Esatto. Dal 1 luglio, quindi la versione attuale, ha integrato un
"webserver".
Ciao, Carlo


text:
>> Come ti ha detto Carlo, non hai nulla da installare se non XPunlimited su
>> l'unico computer che "distribuirerà" la tua applicazione via rete (e se
>> non leggo male, dal 1 luglio è possibile interagire anche via browser)
>> perché il desktop remoto è già parte del S.O.
>>
>> Ciao.
>> --
>> Sergio MAZZA
>
> Esatto. Dal 1 luglio, quindi la versione attuale, ha integrato un
> "webserver".
Aggiugiamoci anche che va bene solo con IE
Almeno la versione attuale (scaricata oggi)
Ciao
RobertoA


author: Simone Calligaris

text:
"RobertoA" <
> Beh ho visto, e' interessante, molto interessante, pero' non e' proprio
> quello che intendevo
> Un'applicazione tipo OsCommerce secondo me e' una procedura da usarsi con
un
> qualsiasi browser
> Sistemi tipo il Terminal Services hanno bisogno comunque di un client
> installato sulla parte client ed inoltre di 'roba a pagamento'  sula parte
> server
Ma anche un computer e un Sistema operativo sono a pagamento ... tutto (più
o meno) si paga e le aziende spendono soldi tutti i giorni per risolvere i
loro problemi.
Sul discorso "parte Client" da installare per accedere al Terminal Server
sei fuori strada: la utility connessione Desk remoto è preinstallata sul
S.O. (almeno da win XP).
E poi, volendo, si può comunque utilizzare il browser web.
Saluti.


text:
"RobertoA" <
amor...@tiscalinet.it
> ha scritto nel messaggio
news:469b9326$1...@newsgate.x-privat.org...
>
> Aggiugiamoci anche che va bene solo con IE
> Almeno la versione attuale (scaricata oggi)
> Ciao
> RobertoA
Ma che devi fare? Un sito con la "tripla A" o distribuire, via internet, a
bassisimo costo e tempo di realizzazione la tua gestione magazzino?
Metti sulla bilancia i pro' e contro e poi valuta...
Ciao.
--
Sergio MAZZA


text:
>> Aggiugiamoci anche che va bene solo con IE
>> Almeno la versione attuale (scaricata oggi)
>> Ciao
>> RobertoA
> Ma che devi fare? Un sito con la "tripla A" o distribuire, via internet, a
> bassisimo costo e tempo di realizzazione la tua gestione magazzino?
> Metti sulla bilancia i pro' e contro e poi valuta...
Non e' che mi sembra una richiesta tanto strana poter usare anche browser
diversi da IE
E credo anche che quelli di Xp Unlimited si stiano adoperando per avere
questa possibilita'
Nulla toglie al valore della soluzione Access + Xp unlimited, attualmente la
piu' conveniente possibilita' di 'webbizzare' in modo quasi indolore delle
applicazioni Access
Ma esistono soluzioni analoghe (a parte il TS Microsoft intendo) ???
Ciao
RobertoA


text:
"RobertoA" <
amor...@tiscalinet.it
> ha scritto nel messaggio
news:469d...@newsgate.x-privat.org...
>
> Non e' che mi sembra una richiesta tanto strana poter usare anche browser
> diversi da IE
> E credo anche che quelli di Xp Unlimited si stiano adoperando per avere
> questa possibilita'
> Nulla toglie al valore della soluzione Access + Xp unlimited, attualmente
> la piu' conveniente possibilita' di 'webbizzare' in modo quasi indolore
> delle applicazioni Access
> Ma esistono soluzioni analoghe (a parte il TS Microsoft intendo) ???
> Ciao
> RobertoA
Mah!
Io sto' tenendo sott'occhio lo sviluppo di questo software (che in parte ho
già utilizzato anche per PHP): ASPMaker
(
http://www.hkvstore.com/aspmaker/).
..
Ciao.
--
Sergio MAZZA


title: Doppio click per attivare un controllo a seguito dell'evento Dopo Aggiornamento

author: Davide

text:
Salve.
In una maschera ho due sottomaschere.
Sull'evento "Dopo Aggiornamento" della Sottomaschera1 eseguo il requery di
una casella combinata nella Sottomaschera2.
Se modifico un record della Sottomaschera1 e poi passo ad un altro record
(sempre della Sottomaschera1) il campo sopra al quale clicco non viene
attivato. Per attivarlo devo cliccarci due volte.
Come posso evitare questo inconveniente?
Grazie.
Davide


author: Dino

text:

Durante lo spostamento da un record all'altro (sucessivo,prec, o
nuovo) sposta il focus nel campo in esame.Es:
Me.miocampo.setfocus
Dino


title: OT Traduzione FAQ 3.11

author: Karl Donaubauer

text:
***********************
3.11 Running Number/Sum in queries
Problem
You want a field in a query with a running number or sum.
Solution
Running Number
You can use a subquery inside your query to create a counter field.
To do this insert an SQL string like the following in a new column
of the query:
RunNum: (Select Count (*) FROM [Products] as Temp
WHERE [Temp].[Id] < [Products].[Id])+1
The example shows how to create the counter field "RunNum" in a
table "Products" with a unique/key field "Id".
If your query has filter criteria or if you want to sort after other fields
the SQL string becomes more complicated. In this case have a look
at the examples on the Attac website and in the KB:
http://ourworld.compuserve.com/homepages/attac-cg/AQryTip.htm
*KB article with example db*
An alternative to the solution with the subquery is to create the running
number with DCount:
RunNum: DCount("Id";"Products";"Id<" & [Id])+1
As subqueries with JET not are real racers, despite of the frequently
proscribed domain aggregat function, this method may be faster
when dealing with large data volumes. So, it's best to test.
Running Sum
You can e.g. use the Function DSum:
http://support.microsoft.com/?kbid=290136
*************************
Non meravigliatevi del buco tra FAQ 3.6 e 3.11.
Era un campo contatore di Access con cancellazioni e poi non ho
saputo come reimpostare il contatore al numero libero successivo.
Scherzi a parte, significa che 3.1x sono articolo per query.
--
cu
Karl
*********
Access FAQ:
www.donkarl.com/it
+info sulla prima Conferenza Italiana per Sviluppatori di Access (CISA1)


title: OT Traduzione FAQ 3.11

author: MA

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:395nnpF...@individual.net...
> ***********************
> 3.11 Running Number/Sum in queries
3.11 Numero o somma
>
> Problem
>
> You want a field in a query with a running number or sum.
Problema
Tu vuoi in un campo di una query un numero o una somma incrementale
> Solution
>
>
> Running Number
Soluzione
Numero Incrementale
>
> You can use a subquery inside your query to create a counter field.
> To do this insert an SQL string like the following in a new column
> of the query:
Usa una subquery all'interno della query per creare un campo contatore.
Per ottenere ciò inserisci una stringa SQL come quella che segue in una
nuova colonna
della query:
RunNum: (Select Count (*) FROM [Products] as Temp
WHERE [Temp].[Id] < [Products].[Id])+1
> The example shows how to create the counter field "RunNum" in a
> table "Products" with a unique/key field "Id".
> If your query has filter criteria or if you want to sort after other
> fields
> the SQL string becomes more complicated. In this case have a look
> at the examples on the Attac website and in the KB:
L'esempio mostra come creare il campo contatore "RunNum" in una tabella
"product" con il campo univoco "id"
Se la tua query ha dei filtri o vuoi ordinarla in campi diversi la stringa
Sql diventa più complessa.
In tali casi guardati gli esempi al sito indicato e nella KB:
>
http://ourworld.compuserve.com/homepages/attac-cg/AQryTip.htm
> *KB article with example db*
> An alternative to the solution with the subquery is to create the running
> number with DCount:
Una soluzione alternativa alla subquery è creare una numero incrementale
con Dcount
RunNum: DCount("Id";"Products";"Id<" & [Id])+1
>
> As subqueries with JET not are real racers, despite of the frequently
> proscribed domain aggregat function, this method may be faster
> when dealing with large data volumes. So, it's best to test.
siccome le subquery con Jet sono sono granchè veloci,
....
funzioni di aggregazioni di domini, questo metodo potrebbe essere
più veloce quando hai a che fare con enormi volumi di dati.
Quindi, è meglio fare test.
> Running Sum
>
> You can e.g. use the Function DSum:
Somma Incrementale
Tu puoi usare la funzione Dsum:

http://support.microsoft.com/?kbid=290136
> *************************
>
> Non meravigliatevi del buco tra FAQ 3.6 e 3.11.
> Era un campo contatore di Access con cancellazioni e poi non ho
> saputo come reimpostare il contatore al numero libero successivo.
Karl se hai problemi posso sistemarti io il contatore
;-P
> Scherzi a parte, significa che 3.1x sono articolo per query.
ok
ciao MAssimiliano


title: OT Traduzione FAQ 3.11

author: sv

text:
Karl Donaubauer ha scritto:

> Problem

> Solution
> Running Number






> Running Sum

Premessa
Valgono su RunSum le stesse considerazioni delle FAQ 4.39 e 5.16.
*********
3.11 Numero e/o somma incrementale nelle query
Problema
In una query, vuoi un campo con un numero o una somma incrementale.
Numero Incrementale
Puoi utilizzare una subquery all’interno della tua query per creare un
campo contatore. Per far questo, inserisci una stringa SQL, come la
seguente, in una nuova colonna della query:
 NumeroIncrementale: (Select Count (*) FROM [Prodotti] as Temp
WHERE [Temp].[Id] < [Prodotti].[Id])+1
L’esempio mostra come creare il campo contatore “NumeroIncrementale” in
una tabella “Prodotti” con un campo chiave primaria “Id”.
Se la tua query ha criteri di filtro, o se vuoi ordinare dopo altri campi,
la stringa SQL diviene più complessa. In questo caso dai uno sguardo agli
esempi sul sito Attac e nella KB:
http://ourworld.compuserve.com/homepages/attac-cg/AQryTip.htm
(seguono gli esempi nella KB)
Un’alternativa alla soluzione con la subquery è quella di creare il numero
incrementale con Dcount:
NumeroIncrementale: DCount("Id";"Prodotti";"Id<" & [Id])+1
Le subquery con Jet non sono sostanzialmente veloci, e, nonostante le
funzioni di aggregazione su dominio, frequentemente proscritte (messe al
bando), questo metodo potrebbe risultare più rapido con grandi volumi di
dati. Pertanto, è meglio testarlo.
Somma Incrementale
Puoi usare, p. e., la funzione Dsum
http://support.microsoft.com/?kbid=290136
> Non meravigliatevi del buco tra FAQ 3.6 e 3.11.
> Era un campo contatore di Access con cancellazioni e poi non ho
> saputo come reimpostare il contatore al numero libero successivo.
Ma ..dai...:)) FAQ 3.2 (l'hai messa su un piatto d'argento..:))
> Scherzi a parte, significa che 3.1x sono articolo per query.
Go..
--
rgrds
SC
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Come referenziare dataset di una sottomaschera ???

text:
Dispongo di una maschera 'Clienti' dentro alla quale ci sono altre
sottomaschere, la 'Scadenze' e la 'Documenti'
Come fare da codice Vba ad eseguire operazioni sulle 'Scadenze' e sui
'Documenti' di quel cliente ?
Vorrei inserire record sulle scadenze via dao usando il metodo Addnew
Ciao e grazie
RobertoA


text:
"RobertoA" <
amor...@tiscalinet.it
> ha scritto nel messaggio
news:463ee7b3$1...@newsgate.x-privat.org...

Ciao, proprio questo sarà oggetto del webcast sul sito M$ di oggi


author: Roberto dal portatile

text:
"RobertoA" <
amor...@tiscalinet.it
> ha scritto nel messaggio
news:463ee7b3$1...@newsgate.x-privat.org...

Visto che hai già deciso di aprire dei recordset in DAO sulle tabelle
origine record delle due sottomaschere e di aggiungere in essi dei record
con il metodo Addnew, quali sono i tuoi problemi?
> Ciao e grazie
Prego
> RobertoA
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


text:
> Visto che hai già deciso di aprire dei recordset in DAO sulle tabelle
> origine record delle due sottomaschere e di aggiungere in essi dei record
> con il metodo Addnew, quali sono i tuoi problemi?
Il problema e' come referenziare correttamente il dataset delle
sottomaschere
Cioe' cosa devo metterci prima del       xxxxx.Addnew   quando devo eseguire
la creazione di un nuovo record nel dataset di una sottomaschera ?
Se eseguo un Addnew senza niente dovrebbe prendermi il dataset della
maschera principale, attualmente i clienti
Avendo due sottomaschere, scadenze per clienti e documenti per cliente,
vorrei aggiungere, eliminare, ricercare sulle scadenze e sui documenti,
usando codice vba
Ciao e grazie
RobertoA


text:
"RobertoA" <
amor...@tiscalinet.it
> ha scritto nel messaggio
news:463f0fab$1...@newsgate.x-privat.org...
>
> Il problema e' come referenziare correttamente il dataset delle
> sottomaschere
> Cioe' cosa devo metterci prima del       xxxxx.Addnew   quando devo
> eseguire la creazione di un nuovo record nel dataset di una sottomaschera
> ?
> Se eseguo un Addnew senza niente dovrebbe prendermi il dataset della
> maschera principale, attualmente i clienti
> Avendo due sottomaschere, scadenze per clienti e documenti per cliente,
> vorrei aggiungere, eliminare, ricercare sulle scadenze e sui documenti,
> usando codice vba
> Ciao e grazie
> RobertoA
(se ho capito)
Me!nomeSottomaschera.Form.RecordsetClone.AddNew
Ciao.
--
Sergio MAZZA


text:
>> Il problema e' come referenziare correttamente il dataset delle
>> sottomaschere
>> Cioe' cosa devo metterci prima del       xxxxx.Addnew   quando devo
>> eseguire la creazione di un nuovo record nel dataset di una sottomaschera
>> ?
>> Se eseguo un Addnew senza niente dovrebbe prendermi il dataset della
>> maschera principale, attualmente i clienti
>> Avendo due sottomaschere, scadenze per clienti e documenti per cliente,
>> vorrei aggiungere, eliminare, ricercare sulle scadenze e sui documenti,
>> usando codice vba
>> Ciao e grazie
>> RobertoA
>
>
> (se ho capito)
> Me!nomeSottomaschera.Form.RecordsetClone.AddNew
>
Eh si, mi scuserai per la banalita' della domanda ma avevo provato con
diverse varianti, e non mi andava nessuna
Grazie, ciao
RobertoA


text:
"RobertoA" <
amor...@tiscalinet.it
> ha scritto nel messaggio
news:46403023$1...@newsgate.x-privat.org...
>
> Eh si, mi scuserai per la banalita' della domanda ma avevo provato con
> diverse varianti, e non mi andava nessuna
> Grazie, ciao
> RobertoA
No ai problema...
Ciao.
--
Sergio MAZZA


title: Come 'vedere' avvio stampa anteprima a schermo?

text:
Procedura Access che avvio anteprima di un documento a schermo
L'avvio anteprima abilita la visualizzazione dei tasti STAMPA,
DIMENSIONI, MARGINI ecc tipici dei report in anteprima
Vorrei avviare del codice quando l'operatore materialmente manda in
stampa il report, e quindi quando preme STAMPA, appare pannellino scelta
stampante, e poi preme OK
Quindi SOLO se la stampa viene materialmente inviata alla stampante
vorrei far partire del codice
Come fare?


author: BFS

text:

mmm

dovresti in qualche modo allora interrogare lo spooler di stampa

forse con queste ?
https://learn.microsoft.com/en-us/windows/win32/printdocs/printing-and-print-spooler-functions

BFS


text:

Ho bypassato il problema semplicemente creando un altro menu comandi da
usare per avviare materialmente la stampa, come dimostrato al link:

https://www.access-programmers.co.uk/forums/threads/print-event-intercept.324758/#post-1844092

In sostanza aggiunge un menu di comandi personalizzato alla pressione
del tasto destro sul report e sulla funzione fnPrint() ci metti quel che
vuoi, esattamente come mi serviva
Certo che, il monitoraggio dello spooler di stampa di Windows sarebbe
stata l'ovvia soluzione al problema che ho descritto, forse non cosi'
banale da realizzare a colpi di vba
Ma il menu volante col destro mi sembra gia' un'eccellente soluzione


text:

ottimo
dovresti però anche inibire o intercettare un eventuale CTRL+P che un
utente può eseguire per avviare la stampa dall'anteprima

BFS


text:

Si sarebbe perfetto
In questo momento mi basta poter indicare il mouse-destro/Stampa per
avviare la stampata sia di quanto a video che del codice accessorio
Per gli interessati ho trovato anche questo che mi pare molto utile per
monitorare lo spooler di Windows, come la api che hai consigliato

https://web.archive.org/web/20191031183312/http://www.merrioncomputing.com/Programming/WatchPrinter.htm


author: Silvio Berruti

text:

Ciao, ho avuto un problema simile e l'ho risolto creando una maschera che contenesse, come sotto maschera, il report in anteprima.
Questo utilizzo ti permette di inserire dei pulsanti per gestire la stampa: ad esempio, avevo bisogno di poter mandare in stampa una sola pagina, oppure scegliere da pagina a pagina, oppure far gestire la stampa ad un programma esterno (ZebraDesigner 3).
Inoltre, cambiando da VBA l'Oggetto origine del controllo sotto maschera, puoi mandare in anteprima tutti i report che desideri, senza dover creare maschere differenti.
Questo è un esempio di codice:
Private Sub Form_Load()
  On Error Resume Next
  Dim risp
  risp = Left(DLookup("id_eti", "T_DaStampare"), 6)  ' leggo il tipo di etichetta da stampare
  Me.Caption = "Stampa Etichetta - Anteprima " & risp
  Select Case risp
    Case "K445/C": Me.SR_Etichetta.SourceObject = "Report.R_EtiK445_Oriz"
    Case "888/B ": Me.SR_Etichetta.SourceObject = "Report.R_Eti888B"
    Case "000/A ": Me.SR_Etichetta.SourceObject = "Report.R_Eti000A_Oriz"
    Case "111/B ": Me.SR_Etichetta.SourceObject = "Report.R_Eti111B_Oriz"
    Case "888/D ": Me.SR_Etichetta.SourceObject = "Report.R_Eti888D"
    Case Else
      MsgBox "Questo Tipo di etichetta non è previsto." & vbCrLf & "Potete richiederlo e verrà rilasciato in un prossimo aggiornamento del programma.", vbInformation, "In fase di preparazione"
      DoCmd.Close
      Exit Sub
  End Select
End Sub


text:
Salve,

RobertoA:

Con pocche righe di codice.
Puoi scaricare il mio demo db da
https://www.isladogs.co.uk/aeu-11/
 e
vedere il no. 8 "Report in page previw or sent to printer".

Puoi vederlo anche nel video della presentazione:
https://www.youtube.com/watch?v=k9jgkzG2IaU

--
Ciao
Karl
*********
Access Bugs:
https://www.accessforever.org

Access News:
https://youtu.be/XMOHBSudo-U

Access DevCon:
http://AccessDevCon.com

Access FAQ:
https://www.donkarl.com/it


text:
Il 26/03/2023 23:16, Karl Donaubauer ha scritto:
> Salve,
>
> RobertoA:
>> Procedura Access che avvio anteprima di un documento a schermo
>> L'avvio anteprima abilita la visualizzazione dei tasti STAMPA,
>> DIMENSIONI, MARGINI ecc tipici dei report in anteprima
>> Vorrei avviare del codice quando l'operatore materialmente manda in
>> stampa il report, e quindi quando preme STAMPA, appare pannellino
>> scelta stampante, e poi preme OK
>> Quindi SOLO se la stampa viene materialmente inviata alla stampante
>> vorrei far partire del codice
>> Come fare?
>
> Con pocche righe di codice.
> Puoi scaricare il mio demo db da
https://www.isladogs.co.uk/aeu-11/
 e
> vedere il no. 8 "Report in page previw or sent to printer".
>
> Puoi vederlo anche nel video della presentazione:
>
https://www.youtube.com/watch?v=k9jgkzG2IaU

>

Molto interessante, il codice e' piu' semplice del mio
Buono a sapersi per le prossime volte
Sul file indicato ci sono diversi esempi, a mio avviso molto
interessanti come l'utilizzo della non documentata StrPtr, un updater
frontend che non fa mai male, ed altre routine particolari
Consiglio a tutti gli associati alla 'banda scarsotti' di darci
un'occhiata     :)


title: problemi con query

text:
buonasera,
ho una tabella composta da:
data
targa
tipo
importo
nel campo data inserisco date. nel campo  tipo posso inserire solo le
voci "costo" oppure "ricavo".
dovrei creare una query che per ogni targa e per ogni mese mi dia la
differenza ricavi-costi.
credo ci voglia una query a campi incrociati, ma non riesco a:
1) suddividere le date in base ai mesi;
2) creare la differenza ricavi-costi.
ecco un esempio di un ipotetico risultato:
targa           gennaio       febbraio        marzo
aa127bb      101 EURO           80 EURO                90 EURO
ab127ee      123 EURO           75 EURO                80 EURO
gli importi in euro sono frutto di del calcolo ricavi-costi .
Spero possiate aiutarmi.
Grazie


title: problemi con query

author: Fabio Dalla Villa

text:
> ho una tabella composta da:
>
> data
> targa
> tipo
> importo
>
> nel campo data inserisco date. nel campo  tipo posso inserire solo le
> voci "costo" oppure "ricavo".
>
> dovrei creare una query che per ogni targa e per ogni mese mi dia la
> differenza ricavi-costi.
>
> credo ci voglia una query a campi incrociati, ma non riesco a:
credo basti una query di selezione con totali raggruppata per targa e mesi
> 1) suddividere le date in base ai mesi;
crei un campo query con mese:month(tuadata)
> 2) creare la differenza ricavi-costi.
crei un campo query con diff:ricavi-costi



title: problemi con query

text:
> > ecco un esempio di un ipotetico risultato:
> >
> > targa           gennaio       febbraio        marzo
> > aa127bb      101 EURO           80 EURO                90 EURO
> > ab127ee      123 EURO           75 EURO                80 EURO
> >
> > gli importi in euro sono frutto di del calcolo ricavi-costi .
> > Spero possiate aiutarmi.
> > Grazie
come non detto, la tabella l'ho notata solo ora


title: problemi con query

text:
> > ecco un esempio di un ipotetico risultato:
> >
> > targa           gennaio       febbraio        marzo
> > aa127bb      101 EURO           80 EURO                90 EURO
> > ab127ee      123 EURO           75 EURO                80 EURO
> >
> > gli importi in euro sono frutto di del calcolo ricavi-costi .
> > Spero possiate aiutarmi.
> > Grazie
credo occorra creare 12 campi nella query, uno per ogni mese, sommando un
condizionale tipo
iif(month(tuadata)=1;importo;0)
(valido per gennaio=1)
e raggruppare per targa


title: problemi con query

text:

scusa ma non ho capito come fare la differenza dei ricavi e dei costi


title: problemi con query

text:
...
scusa ma non ho capito come fare la differenza dei ricavi e dei costi
Nella query crei un campo (lo chiami come ti pare) e imposti la differenza
tra i ricavi e i costi precedentemente sommati con i criteri di
raggruppamento di cui ai msgs precedenti, tipo
diff : ricavi - costi
: è la sintassi delle query che sta per il segno = in matematica


title: db archivio in rete

author: Giorgio

text:
Ciao,
ho un programma gestionale sviluppato in Access suddiviso in 2 file mdb: uno
contiene le tabelle, l'altro le maschere (con VBA+DAO), le query ed i
report. Vorrei poter gestire il programma attraverso il web da più uffici.
Il programma è abbastanza vasto (circa 20 maschere+grafica e altrettanti
report) e la creazione di un applicativo in ASP (soluzione che ho letto nei
suggerimenti in altri post) richiede parecchio tempo.
La mia idea era quella di mettere il db con le tabelle su uno spazio web e
distribuire il file mdb con le maschere nei vari uffici che lo devono
utilizzare.
Al momento il collegamento avviene tramite "tabelle collegate".
E' possibile realizzare un collegamento al db con le tabelle specificando un
URL (anzichè un percorso in locale)?
Mi potreste suggerire altre soluzioni possibili?
Grazie


title: db archivio in rete

text:
"Giorgio"
> ho un programma gestionale sviluppato in Access suddiviso in 2 file mdb:
uno
> contiene le tabelle, l'altro le maschere (con VBA+DAO), le query ed i
> report. Vorrei poter gestire il programma attraverso il web da più uffici.
> Il programma è abbastanza vasto (circa 20 maschere+grafica e altrettanti
> report)
Beh, 20 maschere e 20 Reports sono davvero pochini per definire
l'applicazione "vasta"   ;-)
e la creazione di un applicativo in ASP (soluzione che ho letto nei
> suggerimenti in altri post) richiede parecchio tempo.
> La mia idea era quella di mettere il db con le tabelle su uno spazio web e
> distribuire il file mdb con le maschere nei vari uffici che lo devono
> utilizzare.
> Al momento il collegamento avviene tramite "tabelle collegate".
> E' possibile realizzare un collegamento al db con le tabelle specificando
un
> URL (anzichè un percorso in locale)?
> Mi potreste suggerire altre soluzioni possibili?
Le risposte sono sempre le stesse:
1 - riscrivere l'applicazione per il web
2- Terminal Server:
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=154
3- Connettersi a un Server SQL remoto
L'utilizzo di tabelle collegate a un .mdb sarebbe possibile dopo aver
configurato una VPN ma di fatto è inutilizzabile: prestazioni scarse e alta
probabilità di corruzione dell'archivio.
Saluti.


title: db archivio in rete

author: Pablitomf (Maurizio Facciuti)

text:
"Giorgio" <
d...@sa.it
> ha scritto nel messaggio
news:457fcf01$0$19096$4faf...@reader4.news.tin.it...

Un altro suggerimento oltre all'ASP che già hai appreso da altri
suggerimenti?
Un corso alla scuola di MANDRAKE! ;-)
Scherzi a parte, con il Web no se puede, se non con gli strumenti che hai
già scartato (ASP o simili)!
Potresti invece, sempre che tu abbia un tuo server centrale, gestire il
sistema con TS. praticamente sulle periferie non avresti nulla, se non una
connessione DR del Client al tuo server, sul quale con i relativi permessi
utente, potrai instradare la connessione del Client al suo applicativo di
riferimento.
Spero di esser stato chiaro.
--
--
Ciao
Pablitomf (Maurizio Facciuti)
-----------------------------------------------------------------
Access: 97, 2000, XP e 2003
ASP
-----------------------------------------------------------------
http://www.accessgroup.it/
-----------------------------------------------------------------
Il mio motto :
""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."


title: db archivio in rete

text:
Grazie per la risposta
> 3- Connettersi a un Server SQL remoto
mi indicheresti una guida per realizzare questa connessione sul file mdb con
le maschere per prendere i dati dall'archivio?


title: Richiesta di aiuto

author: Tartas

text:
Scusate sono alle prime armi con access e mi sto avventurando nello sviluppo
di un database, ma dei piccoli problemi, senza l'aiuto di qualcuno un po'
più competente, per me possono diventare veramente insormontabili. Quindi vi
chiedo aiuto.
Ho costruito una tabella ("tlb_anagrafica") costituita da un unico record
che serve per memorizzare memorizzare le informazioni anagrafiche dell'
utilizzatore. Mi piacerebbe che queste informazioni vengano richiamate nell'
intestazione dei miei report, ma come faccio visto che tale tabella rimane
scorrelata dalle altre e quindi non riesco ad inserirla su una query?
Probabilmente c'è da sviluppare una routine all'apertura dei miei report ma
io non sono ancora in grado. C'è qualcuno che può aiutarmi? Grazie


title: Richiesta di aiuto

text:
"Tartas" <
tar...@libero.it
> ha scritto nel messaggio news:MEhBg.64283$_J1.6...@twister2.libero.it...

Ciao Tartas;
un consigio:
www.sitocomune.com
 Sezione ICAA - Come comportarsi in questo
NewsGroup.
Ciao.
P.S. E siamo a quota 2 con oggetti identici
--
Sergio MAZZA


title: problema

author: Matteo

text:
ho una query. in uncampo di questa query ho un criterio del tipo [Ordine].
ogniu volta che apro la query mi si chiede di inserire il valore di Ordine.
ho usato questa query per creare un report. come faccio a creare una
maschera dalla quale automaticamente scorrendo tutti gli ordini premendo un
pulsante mi si viuslalizzi il report dell'ordine a cui faccio riferimento???
GRAZIE


title: problema

author: Marco Pretini

text:
Matteo <
moo...@softhome.net
> wrote in message 8odhs1$2et$1...@nslave1.tin.it...

Ciao Matteo,
supponiamo che tu abbia la tua Form (visualizzazione Maschera singola )
dove hai un Controllo che visualizza il numero dell'ordine e si chiama
Nr Ordine, sul tuo pulsante puoi scrivere sull'evento click
Docmd.OpenReport "ilNomedelReport",,,"[NomedelControllo NrOrdinedelReport] =
Forms![NomeForm]![Nr Ordine]"
Ciao Marco
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/


title: problema

text:
"Matteo" <
moo...@softhome.net
> ha scritto nel messaggio
news:8odhs1$2et$1...@nslave1.tin.it...
> ho una query. in uncampo di questa query ho un criterio del tipo [Ordine].
> ogniu volta che apro la query mi si chiede di inserire il valore di
Ordine.
> ho usato questa query per creare un report. come faccio a creare una
> maschera dalla quale automaticamente scorrendo tutti gli ordini premendo
un
> pulsante mi si viuslalizzi il report dell'ordine a cui faccio
riferimento???
> GRAZIE
>
>
>
Ammettiamo che hai una tabella Ordini che contiene tutti gli ordini e ha,
fra l'altro, un campo chiamato Ordine.
Creati una maschera (Maschera1) nella quale inserisci una casella di
riepilogo non associata che chiami Elenco; Questa casella di riepilogo deve
avere una sola colonna e deve avere come origine riga:
SELECT DISTINCTROW Ordini.Ordine
FROM Ordini;
In Maschera1 inserisci anche una casella di testo non associata chiamata
Pippo; fai in maniaera che Pippo non sia visibile.
Nella riga "Criteri:" della tua query, dove hai scritto [Ordine], scrivi
invece:
    [Forms]![Maschera1]![Pippo]
Se il tuo report si chiama Report1, a fronte dell'evento "Su clic" di Elenco
genera il seguente codice VBA:
    Me![Pippo] = Me![Elenco].Column(0)
    DoCmd.OpenReport "Report1"
A questo punto apri Maschera1 e clicca sul l'ordine che vuoi stampare.
--
Roberto
---------------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access/
---------------------------------------------


title: problema

text:
Occhio all'ora del tuo PC
Roberto


title: problema

text:
grazie, ora funziona
Roberto dal portatile <
r.ma...@libero.it
> wrote in message
RQuq5.149205$dF5.2...@news.infostrada.it...



title: problema

text:
> Occhio all'ora del tuo PC
>
> Roberto
>
Ciao Roberto,
l'ora nel pc è giusta, credo sia il server che
mi scarica i msg  in ritardo, infatti quando ho
risposto a Matteo non vedevo la tua risposta
precedente.-
Marco


title: Access & ASP

author: bobbit

text:
Mi sto cimentando con delle pagine asp che interagiscono su un db access..
Ho installato PWS dal cd di win 98 ho creato una pagina che contiene:
<%
.....
strProvider="DRIVER=Microsoft Access Driver (*.mdb); DBQ="&
"c:\inetpub\wwwroot\mp3.mdb;"
set OBjdbcConnection=Server.CreateObject("ADODB.Connection")
OBJdbcConnection.Open strprovider
set RS=OBjdbcConnection.execute(sql)
...
%>
Ma al momendo di caricarla mi dice :
Errore di run-time di Microsoft VBScript errore "800a01ad'
Il componente ActiveX non può creare l'oggetto
Dove sbaglio? Devo forse installare qualcos'altro?
Ciao, Bobbit


title: Tabelle collegqate da VBA

author: Pisinho

text:
SAlve,
vorrei gestire le Tabelle collegate tramite VBA, in questo modo posso
cambiare senza troppi click, le tabelle collegate di un DB di Produzione con
quello di TEST o fare altre cose al VOLO.
Avete qualche link da suggerirmi , per adesso non ho trovato molto di ben
fatto o almeno spiegato bene.
Grazie mille.
__________ Informazioni da ESET NOD32 Antivirus, versione del database delle firme digitali 4924 (20100308) __________
Il messaggio � stato controllato da ESET NOD32 Antivirus.
www.nod32.it


title: Tabelle collegqate da VBA

author: OneEDP

text:

Non so se ti ho risposto ma perdonami se l'ho gi� fatto.
Il 3d "Tabelle ODBC Collegate" spazia un po'.
Ciao
Daniele


title: Tabelle collegqate da VBA

text:
> Non so se ti ho risposto ma perdonami se l'ho gi� fatto.
> Il 3d "Tabelle ODBC Collegate" spazia un po'.
> Ciao
> Daniele
>
>
Capisco che l'argomento sia vasto , ma non c'� un modo semplice per linkare
al volo delle tabelle di un DB invece di un altro ?
Cambia solo il riferimento al DB.
Se hai qualche link da passare...
Comunque grazie.
Saluti
__________ Informazioni da ESET NOD32 Antivirus, versione del database delle firme digitali 4927 (20100309) __________



title: Tabelle collegqate da VBA

text:

Perch� non cambi la connessione ODBC al volo cambiando il database da
quello di produzione a quello di test?
Oppure ti cambi la stringa di connessione e modifichi solo
l'informazione del db.
Cmq io terrei DUE connessioni diverse e due mdb per sicurezza... se
lanci una delete in produzione pensando che sia quelle di test.... non
oso immaginare
Ciao
Daniele


title: Tabelle collegqate da VBA

author: marcopio

text:
On 9 Mar, 08:56, "Pisinho" <
pisi...@gmail.com
> wrote:
> > Non so se ti ho risposto ma perdonami se l'ho già fatto.
> > Il 3d "Tabelle ODBC Collegate" spazia un po'.
> > Ciao
> > Daniele
>
> Capisco che l'argomento sia vasto , ma non c'è un modo semplice per linkare
> al volo delle tabelle di un DB invece di un altro ?
>
> Cambia solo il riferimento al DB.
>
> Se hai qualche link da passare...
>
> Comunque grazie.
>
> Saluti
>
> __________ Informazioni da ESET NOD32 Antivirus, versione del database delle firme digitali 4927 (20100309) __________
>
> Il messaggio è stato controllato da ESET NOD32 Antivirus.
>
>
www.nod32.it
Io uso delle sub che mi sono fatto,
vedi se ti possono essere utili.
La stringa di connessione (strConn) dipende dall'ODBC a cui ti
colleghi
(puoi collegare una tabella a mano e poi vedere in struttura ->
visualizza -> proprietà)
1.
Public Function CollegaTabella(strConn As String, strTbOrig As String,
strTBDest As String)
Dim tdfTbOrig As TableDef
Set tdfTbOrig = CurrentDb.CreateTableDef(strTBDest)
tdfTbOrig.Attributes = dbAttachSavePWD
tdfTbOrig.Connect = strConn
tdfTbOrig.SourceTableName = strTbOrig
CurrentDb.TableDefs.Append tdfTbOrig
End Function
2.
Public Function ScollegaTabella(strTBDest As String)
CurrentDb.TableDefs.Delete (strTBDest)
End Function
3.
Public Function ScollegaLeTabelle()
Dim rstScratch As Recordset
Set rstScratch = CurrentDb.OpenRecordset("SELECT MSysObjects.Connect,
MSysObjects.Name" _
    & " FROM MSysObjects" _
    & " WHERE (((MSysObjects.Connect) Is Not Null))")
If rstScratch.RecordCount > 0 Then
    rstScratch.MoveFirst
    Do While Not rstScratch.EOF
        Call ScollegaTabella(rstScratch!Name)
        rstScratch.MoveNext
    Loop
End If
End Function
per sintesi ho eliminato la gestione degli errori
Dovrebbe essere quello che ti serve
HTH, mpio.


title: Tabelle collegqate da VBA

text:
"marcopio" <
mdre...@more-oxy.com
> ha scritto nel messaggio
news:a9627394-4eff-4d4d...@f8g2000yqn.googlegroups.com...
On 9 Mar, 08:56, "Pisinho" <
pisi...@gmail.com
> wrote:
> > Non so se ti ho risposto ma perdonami se l'ho gi� fatto.
> > Il 3d "Tabelle ODBC Collegate" spazia un po'.
> > Ciao
> > Daniele
>
> Capisco che l'argomento sia vasto , ma non c'� un modo semplice per
> linkare
> al volo delle tabelle di un DB invece di un altro ?
>
> Cambia solo il riferimento al DB.
>
> Se hai qualche link da passare...
>
> Comunque grazie.
>
> Saluti
>
> __________ Informazioni da ESET NOD32 Antivirus, versione del database
> delle firme digitali 4927 (20100309) __________
>
> Il messaggio � stato controllato da ESET NOD32 Antivirus.
>
>
www.nod32.it
Io uso delle sub che mi sono fatto,
vedi se ti possono essere utili.
La stringa di connessione (strConn) dipende dall'ODBC a cui ti
colleghi
(puoi collegare una tabella a mano e poi vedere in struttura ->
visualizza -> propriet�)

Dim tdfTbOrig As TableDef

End Function

CurrentDb.TableDefs.Delete (strTBDest)
End Function
3.
Public Function ScollegaLeTabelle()
Dim rstScratch As Recordset

End Function


___
E se dopo aver cancella la tabelle per qualsiasi motivo si interrompe il
codice?
come hai l'elenco delle tabelle dal sysobject?
Usa una tab di elenco delle tabelle


title: Tabelle collegqate da VBA

text:
On 8 Mar, 15:51, "Pisinho" <
pisi...@gmail.com
> wrote:
> SAlve,
> vorrei gestire le Tabelle collegate tramite VBA, in questo modo posso
> cambiare senza troppi click, le tabelle collegate di un DB di Produzione con
> quello di TEST o fare altre cose al VOLO.
>
> Avete qualche link da suggerirmi , per adesso non ho trovato molto di ben
> fatto o almeno spiegato bene.
>
> Grazie mille.
Fatti una tabella nel BE o Server con l'elenco delle Tabelle da
Linkare.
Apri una connessione al Database accedi alla tabella Elenco ed inizia
a ciclare
i Record tentando di connettere le Tabelle con Nome recuperato dal
Recordset.
Chiudi la connessione e le tabelle sono collegate... GESTIONE ERRORI
prima di tutto.
Ricorda di rimuovere i collegamenti alla chiusura.
@Alex


title: Tabelle collegqate da VBA

text:
On 9 Mar, 18:07, "MA" <
s...@spam.it
> wrote:
> "marcopio" <
mdreo...@more-oxy.com
> ha scritto nel messaggionews:a9627394-4eff-4d4d...@f8g2000yqn.googlegroups.com...
> On 9 Mar, 08:56, "Pisinho" <
pisi...@gmail.com
> wrote:
>
>
>
>
>
> > > Non so se ti ho risposto ma perdonami se l'ho già fatto.
> > > Il 3d "Tabelle ODBC Collegate" spazia un po'.
> > > Ciao
> > > Daniele
>
> > Capisco che l'argomento sia vasto , ma non c'è un modo semplice per
> > linkare
> > al volo delle tabelle di un DB invece di un altro ?
>
> > Cambia solo il riferimento al DB.
>
> > Se hai qualche link da passare...
>
> > Comunque grazie.
>
> > Saluti
>
> > __________ Informazioni da ESET NOD32 Antivirus, versione del database
> > delle firme digitali 4927 (20100309) __________
>
> > Il messaggio è stato controllato da ESET NOD32 Antivirus.
>
> >
www.nod32.it
>
> Io uso delle sub che mi sono fatto,
> vedi se ti possono essere utili.
> La stringa di connessione (strConn) dipende dall'ODBC a cui ti
> colleghi
> (puoi collegare una tabella a mano e poi vedere in struttura ->
> visualizza -> proprietà)

> Usa una tab di elenco delle tabelle- Nascondi testo citato
>
> - Mostra testo citato -
> si interrompe il codice
Da quello che ho capito deve lavorare alternativamente su delle
tabelle oppure altre,
dopo aver connesso la tabella bisogna fare adeguati controlli prima di
proseguire con il codice,
non conosco l'applicazione, per questo credo che ne sappia di più
Pisinho.
Ovviamente serve anche la gestione degli errori, come dice Alex@,
io l'ho eliminata per il post, ma deve essere fatta.
Inoltre è da seguire l'altro consiglio di Alex@ di fare una tabella
con l'elenco,
ho i BE salvati sempre senza connessioni,
le faccio sempre all'avvio dell'applicazione.
Io uso una tabella sul server che come campi ha nome applicazione,
tabella da linkare, stringa di connessione
se Pisinho preferisce può anche aggiungere una flag per il link in
fase di test.
Comunque il mio intervento si limitava a dare un'indicazione su come
sonnettersi/sconnettersi.
Spero di essere stato utile.
Saluti, mpio.
NOTA a margine: leggendo quello che ho riportato è più bello se si
sostituisce tdfTbOrig con tdfTb


title: Tabelle collegqate da VBA

text:
>
> Fatti una tabella nel BE o Server con l'elenco delle Tabelle da
> Linkare.
> Apri una connessione al Database accedi alla tabella Elenco ed inizia
> a ciclare
> i Record tentando di connettere le Tabelle con Nome recuperato dal
> Recordset.
> Chiudi la connessione e le tabelle sono collegate... GESTIONE ERRORI
> prima di tutto.
> Ricorda di rimuovere i collegamenti alla chiusura.
>
Grazie a tutti, ma a parte che non c'ho capito niente come devo procedere
con il codice....
Mi manca un esempio semplice di una tabella con lo stesso nome su due
databases diversi, stesso server.
L'uso di questi cambiamenti al volo come ho spiegato � solo per utilizzare
in fase di Sviluppo del codice, il Databases di TEST,
quando rilascio il software, modifico solo una variabile e all'apertura
dell'applicazione vengono linkate le tabelle di produzione.
Di sicuro � banale e si pu� fare ma non ho codice diciamo di semplice
lettura per capire come operare sulle tabelle.
Grazie comunque a tutti.
__________ Informazioni da ESET NOD32 Antivirus, versione del database delle firme digitali 4931 (20100310) __________



title: Tabelle collegqate da VBA

text:
On 10 Mar, 14:54, "Pisinho" <
pisi...@gmail.com
> wrote:
> > Fatti una tabella nel BE o Server con l'elenco delle Tabelle da
> > Linkare.
> > Apri una connessione al Database accedi alla tabella Elenco ed inizia
> > a ciclare
> > i Record tentando di connettere le Tabelle con Nome recuperato dal
> > Recordset.
> > Chiudi la connessione e le tabelle sono collegate... GESTIONE ERRORI
> > prima di tutto.
> > Ricorda di rimuovere i collegamenti alla chiusura.
>
> Grazie a tutti, ma a parte che non c'ho capito niente come devo procedere
> con il codice....
> Mi manca un esempio semplice di una tabella con lo stesso nome su due
> databases diversi, stesso server.
> L'uso di questi cambiamenti al volo come ho spiegato è solo per utilizzare
> in fase di Sviluppo del codice, il Databases di TEST,
> quando rilascio il software, modifico solo una variabile e all'apertura
> dell'applicazione vengono linkate le tabelle di produzione.
>
> Di sicuro è banale e si può fare ma non ho codice diciamo di semplice
> lettura per capire come operare sulle tabelle.
>
> Grazie comunque a tutti.
>
> __________ Informazioni da ESET NOD32 Antivirus, versione del database delle firme digitali 4931 (20100310) __________
>
> Il messaggio è stato controllato da ESET NOD32 Antivirus.
>
>
www.nod32.it
Ci riprovo con un esempio per una tabella,
prova e fai sapere se ti riesce il tutto.
Se funzia, poi è più performante il discorso di tenere l'archivio
delle tabelle da linkare (e delle stringhe di connessione)
in una tabella e non nel codice.
Allora:
inserisci in un modulo queste tre funzioni:
Public Function EsisteTabella(NomeTabella As String) As Boolean
On Error GoTo Err_Handler
Dim dbsTb As Database
Dim tdfTb As TableDef
Dim intTab As Integer
Set dbsTb = CurrentDb
For Each tdfTb In dbsTb.TableDefs
    If tdfTb.Name = NomeTabella Then
        EsisteTabella = True
    End If
Next tdfTb
Exit_Handler:
    Exit Function
Err_Handler:
    MsgBox Err.Number & Chr(10) & Err.Description & Chr(10) &
"Contattare Pisinho"
    Resume Exit_Handler
End Function
Public Function CollegaTabella(strConn As String, strTbOrig As String,
strTBDest As String)
On Error GoTo Err_Handler
Dim tdfTb As TableDef
Set tdfTb = CurrentDb.CreateTableDef(strTBDest)
tdfTb.Attributes = dbAttachSavePWD
tdfTb.Connect = strConn
tdfTb.SourceTableName = strTbOrig
CurrentDb.TableDefs.Append tdfTb
Exit_Handler:
    Exit Function
Err_Handler:
    MsgBox Err.Number & Chr(10) & Err.Description & Chr(10) &
"Contattare Pisinho"
    Resume Exit_Handler
End Function
Public Function ScollegaTabella(strTBDest As String)
On Error GoTo Err_Handler
CurrentDb.TableDefs.Delete (strTBDest)
Exit_Handler:
    Exit Function
Err_Handler:
    MsgBox Err.Number & Chr(10) & Err.Description & Chr(10) &
"Contattare Pisinho"
    Resume Exit_Handler
End Function
poi, sull'evento click del pulsante per il test (o altro a tuo
piacere) per il test:
if EsisteTabella("NomeTuaTabella") Then
   ScollegaTabella("NomeTuaTabella")
end if
strConn =
"ODBC;DSN=NomeDSN;UID=NomeUtente;PWD=password;DATABASE=DBTEST"
CollegaTabella(strConn , "NomeTuaTabella", "NomeTuaTabella")
poi, all'avvvio della tua applicazione rilasciata (se preferisci con
altro evento):
if EsisteTabella("NomeTuaTabella") Then
   ScollegaTabella("NomeTuaTabella")
end if
strConn =
"ODBC;DSN=NomeDSN;UID=NomeUtente;PWD=password;DATABASE=DBWORK"
CollegaTabella(strConn , "NomeTuaTabella", "NomeTuaTabella")
come vedi cambia solamente il database.
puoi avere anche tabelle con nomi diversi (ma stessa struttura)
se così devi dare valori appropiati a strTbOrig e strTBDest
ricordati che devi costruirti un sistema sicuro per sapere dove stai
lavorando e non far confusione nei dati
HTH, mpio.


title: Tabelle collegqate da VBA

text:

IMHO Volendo separare il testing dalla produzione, terrei separate le
due connessioni non con il codice ma definendola proprio da
amministrazione odbc.
In pi� per ribadire la differenza utilizzare come rafforzativo nomi di
tabella con un prefisso del tipo TEST e poi creerei un utente apposito
per il testing.
COn la switching delle connessioni sono alti i rischi.
Non ce la faccio devo dirtelo. Con le qpt puoi ribadire il concetto con
"SELECT * FROM DBTesting.MyTable" lasciando inttatta la connessione
(initial catalogue magari di default su DBTesting non si sa mai). A
ridaie con le qpt. ;-)
Ciao


title: sintassi codice per unire due campi per un criterio di selezione

author: skipper

text:
Ciao a tutti....
ogni tanto butto dentro la canapia nel NG e pongo le mie due domande...
La prima: tutti bene?
La seconda: attualmente apro una maschera a condizione che i campi presenti
nella prima maschera siano uguali nella seconda solo che ho necessità di far
si che il criterio di scelta sia la composizione di due campi e come al
solito non so la sintassi....
questa la situazione attuale:
stDocName = "knowledge_da_prestazioni"
    stLinkCriteria = "[id_pratica]=" & "'" & Me![id_pratica] & "'"
vorrei che diventasse una cosa di questo tipo...
    stLinkCriteria = "[id_cli_pratica]= right("XXX"&[id_cliente];3)&
right("000000"&[id_pratica];6)
mi manca la sintassi di tutto quel che è a destra dell'uguale.... :-)
qualcuno mi aiuta?
grazie.....
si...si.... la moto è sempre la stessa..... :-)
--
Skipper dixit...
on cbr1000rr
Azz... L'è minga el sescènt!!! L'è 'l mille!!!
motostory su
http://www.superskipper.it/pagine/le_mie_moto.htm


author: Alessandro Baraldi

text:
On 15 Apr, 11:45, "skipper"
<skipperNOS...@superskipperNOSPAM.itNOSPAM> wrote:
> Ciao a tutti....
> ogni tanto butto dentro la canapia nel NG e pongo le mie due domande...
> La prima: tutti bene?
> La seconda: attualmente apro una maschera a condizione che i campi presenti
> nella prima maschera siano uguali nella seconda solo che ho necessità di far
> si che il criterio di scelta sia la composizione di due campi e come al
> solito non so la sintassi....
>
> questa la situazione attuale:
>
> stDocName = "knowledge_da_prestazioni"
>     stLinkCriteria = "[id_pratica]=" & "'" & Me![id_pratica] & "'"
>
> vorrei che diventasse una cosa di questo tipo...
>     stLinkCriteria = "[id_cli_pratica]= right("XXX"&[id_cliente];3)&
> right("000000"&[id_pratica];6)
>
> mi manca la sintassi di tutto quel che è a destra dell'uguale.... :-)
> qualcuno mi aiuta?
>
> grazie.....
>
> si...si.... la moto è sempre la stessa..... :-)
>
> --
La concatenazione di criteri si effettua con un'operatore che può
essere AND o OR a seconda che debbano essere
vere entrambe o almeno 1...!
Nel tuo caso, che non hai specificato:
CriterioFinale=Criterio1 AND Criterio2
Tradotto in stringa:
stLinkCriteria = "[id_cli_pratica]= " % right("XXX"&[id_cliente];3) &
" AND [id_pratica]=" & right("000000"&[id_pratica];6)
Non ho ben chiaro perchè avevi messo le funzioni Right all'interno
degli APICI... in quel modo vengono eseguiti lato Query... serviva
così...?
P.S. se i campi ID.... sono numerici non servono gli APICETTI
SINGOLI...!
@Alex


text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:48a8e44c-01a1-4729...@p25g2000hsf.googlegroups.com...
On 15 Apr, 11:45, "skipper"
<skipperNOS...@superskipperNOSPAM.itNOSPAM> wrote:
>> Ciao a tutti....
>> ogni tanto butto dentro la canapia nel NG e pongo le mie due domande...
>> La prima: tutti bene?
>> La seconda: attualmente apro una maschera a condizione che i campi
>> presenti
>> nella prima maschera siano uguali nella seconda solo che ho necessità di
>> far
>> si che il criterio di scelta sia la composizione di due campi e come al
>> solito non so la sintassi....
>>
>> questa la situazione attuale:
>>
>> stDocName = "knowledge_da_prestazioni"
>> stLinkCriteria = "[id_pratica]=" & "'" & Me![id_pratica] & "'"
>>
>> vorrei che diventasse una cosa di questo tipo...
>> stLinkCriteria = "[id_cli_pratica]= right("XXX"&[id_cliente];3)&
>> right("000000"&[id_pratica];6)
>>
>> mi manca la sintassi di tutto quel che è a destra dell'uguale.... :-)
>> qualcuno mi aiuta?
> La concatenazione di criteri si effettua con un'operatore che può
> essere AND o OR a seconda che debbano essere
> vere entrambe o almeno 1...!
> Nel tuo caso, che non hai specificato:
> CriterioFinale=Criterio1 AND Criterio2
> Tradotto in stringa:
> stLinkCriteria = "[id_cli_pratica]= " % right("XXX"&[id_cliente];3) &
> " AND [id_pratica]=" & right("000000"&[id_pratica];6)
> Non ho ben chiaro perchè avevi messo le funzioni Right all'interno
> degli APICI... in quel modo vengono eseguiti lato Query... serviva
> così...?
perchè ho dimenticato di scrivere il secondo apice.... :-)
ho semplicemente fatto un copia incolla dall'obrobrio che avevo tentato di
creare...
> P.S. se i campi ID.... sono numerici non servono gli APICETTI
> SINGOLI...!
probabilmente non mi sono spiegato bene nel primo post:
con il pulsante che esegue il codice nella prima maschera apro una seconda
maschera...
nella prima maschera ho a disposizione due campi:
    id_cliente (Testo)
    id_pratica (numerico)
nella seconda maschera ho a disposizione un solo campo
    id_cli_pratica (testo) XXX000000 dove XXX è il codice cliente e 000000 è
il codice pratica
dall'alto della mia somma ignoranza mi pare (facile che io sbagli) che nella
tua stringa ci sia qualcosa di troppo quando dopo l'AND inserisci
*[id_pratica]=*
il simbolo di % credo sia un errore di battitura e l'ho sostituito con un
*&*
a proposito... uso ancora A97



text:
On 15 Apr, 12:41, "skipper"
<skipperNOS...@superskipperNOSPAM.itNOSPAM> wrote:
> "Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggionews:48a8e44c-01a1-4729...@p25g2000hsf.googlegroups.com...

Si è un & di concatenazione stringhe... se vedi nella tastiera il % è
affianco a & ... ho le dita molto grosse... ;-)
Detto questo se hai capito il suggerimento sei in grado di
ristrutturare la stringa di Criterio in base alle tue esigenze.
@Alex


text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:4d9cf4a5-7b8c-44be...@2g2000hsn.googlegroups.com...
> Si č un & di concatenazione stringhe... se vedi nella tastiera il % č
> affianco a & ... ho le dita molto grosse... ;-)
> Detto questo se hai capito il suggerimento sei in grado di
> ristrutturare la stringa di Criterio in base alle tue esigenze.
dopo i tuoi suggerimenti ho cambiato impostazioni alleggerendo il tutto,
facendo la selezione sui due campi al posto di utilizzare un ulteriore campo
che raggruppasse gli stessi due...
grazie
skipper dixit...


title: Colonne in Report

author: Marco

text:
Ciao a tutti
E' possibile in un Report di Access creare un campo "incolonnato"?.
Cerco di spiegarmi meglio:
ho questa serie:
000.001
000.002
000.003
000.004
000.005
000.006
000.007
000.008
000.009
000.010
e la vorrei visualizzare così:
000.001			000.006
000.002			000.007
000.003			000.008
000.004			000.009
000.005			000.010
ovvero a blocchi di 5/6 per colonna
I dati sono ricavati da un recordset ed aggiunti alla casella di testo.
La soluzione che mi viene in mente è contare quanti record svengono
aggiunti e dirottarne i successivi cinque su un campo CAMPO2.
Il problema però si avrebbe se i record sono ad esempio 15 (dovrebbero
essere visualizzati 8 sulla prima colonna e 7 sulla seconda).
Idee??


title: Colonne in Report

author: Sergio MAZZA

text:
"Marco" <
pi...@pluto.it
> ha scritto nel messaggio
news:c7tn87$2fb$1...@lacerta.tiscalinet.it...
> Ciao a tutti
> E' possibile in un Report di Access creare un campo "incolonnato"?.
> Cerco di spiegarmi meglio:
> ho questa serie:
> 000.001
> 000.002
> 000.003
> 000.004
> 000.005
> 000.006
> 000.007
> 000.008
> 000.009
> 000.010
> e la vorrei visualizzare cosě:
>
> 000.001 000.006
> 000.002 000.007
> 000.003 000.008
> 000.004 000.009
> 000.005 000.010
>
> ovvero a blocchi di 5/6 per colonna
> I dati sono ricavati da un recordset ed aggiunti alla casella di testo.
> La soluzione che mi viene in mente č contare quanti record svengono
> aggiunti e dirottarne i successivi cinque su un campo CAMPO2.
> Il problema perň si avrebbe se i record sono ad esempio 15 (dovrebbero
> essere visualizzati 8 sulla prima colonna e 7 sulla seconda).
> Idee??
Le impostazioni della pagina del report prevedono la divisione in colonne
(File - Imposta pagina - scheda colonne)..
Ciao.
--
Sergio MAZZA


title: [OT] Traduzione FAQ 1.18 - 1.20

author: Valerio Valentini

text:
 1.18 USO DELLE PROTEZIONI
Problema
Vuoi utilizzare le protezione presenti in Access come autorizzazioni e
password. Incontri delle difficoltà, ma nessun aiuto in linea sufficiente.
Soluzione
L'opera più estesa (sviluppata da autori indipendenti) sono le Microsoft
Access Security FAQ:
http://support.microsoft.com/support/Access/Content/SECFAQ.asp
Una raccolta degli aspetti più importanti della sicurezza di Access si trova
nel Whitepaper Absichern di Bernd Gilles su:
http://www.accessprofipool.de
(ndr. inserire anche la parte trattata in italiano sul sitocomune ???? Mi
sembrerebbe una buona idea)
-------------
1.19 DB CON SISTEMI OPERATIVI DI LINGUA DIVERSA
Problema
Vuoi sapere se puoi, senza problemi, costruire un database con la versione
italiana di Access se poi deve girare su una versione di Access di lingua
diversa, o hai già provato e ti sei accorto che in molti punti ti ritrovi
con messaggi d'errore poco chiari.
Soluzione
Il metodo migliore è senza dubbio quello di realizzare, o per lo meno di
testare approfonditamente, l'applicazione con Access e Windows della lingua
in cui dovrà girare. Per la mia esperienza, ed almeno per le lingue europee,
un'applicazione che gira in Access in versione inglese funzionerà anche
nelle altre lingue.
Se la realizzazione è stata fatta in Access in italiano:
Un errore molto comune è la scritta [Routine evento] nelle proprietà di
maschere e reports che non sempre viene tradutta. Ciò comporta l'errore
nella versione inglese di Access "Can't find macro "[Routine evento]" ..."
perchè in teoria dovrebbe esserci scritto "Event Procedure". Ciò deve essere
corretto manualmente e tramite codice che apra gli oggetti in
Visualizzazione Struttura e sostituisca il testo.
Attenzione ad usare sempre nelle query il riferimento inglese alle maschere
Forms!... al posto dell'italiano Maschere!... (ndr. che mi sa non esista, se
qualcuno trova altro esempio meglio.) altrimenti si verificherà la richiesta
di immissione dati "Enter Parameter Maschere!...".
Altri problemi possono nascere dai simboli valuta, da formattazioni
nazionali della data, ecc...
Da ciò ancora una volta il consiglio di sviluppare con Access versione
inglese o almeno di fare test approfonditi prima della consegna.
------------------
1.20 CONVERTIRE MDB IN VB
Problema
Vuoi convertire un mdb in Visual Basic.
Soluzione
Esistono a tal fine diversi tools commerciali, ad esempio:
AccessToVB
http://www.GFMinc.com
,
http://www.san.de
Access Upsizer
http://www.ndimensional.com/
Object Converter
http://www.soft-shop.com/cgi-bin/product.html?91586986341
Una conversione completa e diretta di tutte le funzionalità di Access verso
VB non riesce nemmeno a questi tools.
----------------
Ciao Valerio.


title: [OT] Traduzione FAQ 1.18 - 1.20

author: MA

text:
                    Il 24 Lug 2004, 20:01, "Valerio Valentini" <
val...@accessgroup.it
> ha
scritto:

tradotta
Ciò comporta l'errore
> nella versione inglese di Access "Can't find macro "[Routine evento]" ..."
> perchè in teoria dovrebbe esserci scritto "Event Procedure". Ciò deve
essere
> corretto manualmente e tramite
tramite del codice
> codice che apra gli oggetti in
> Visualizzazione Struttura e sostituisca il testo.
>
> Attenzione ad usare sempre nelle query il riferimento inglese alle
maschere
> Forms!... al posto dell'italiano Maschere!... (ndr. che mi sa non esista,
se
> qualcuno trova altro esempio meglio.)
Va benissimo così: anche in italiano MAschere non è supportato e bisogna
segnare forms!
altrimenti si verificherà la richiesta
> di immissione dati "Enter Parameter Maschere!...".
> Altri problemi possono nascere dai simboli valuta, da formattazioni
> nazionali della data, ecc...
>
> Da ciò ancora una volta il consiglio di sviluppare con Access versione
> inglese o almeno di fare test approfonditi prima della consegna.
>
> ------------------
>
> 1.20 CONVERTIRE MDB IN VB
>
> Problema
> Vuoi convertire un mdb in Visual Basic.
>
> Soluzione
> Esistono a tal fine diversi tools commerciali, ad esempio:
> AccessToVB
http://www.GFMinc.com
,
http://www.san.de
> Access Upsizer
http://www.ndimensional.com/
> Object Converter
http://www.soft-shop.com/cgi-bin/product.html?91586986341
>
> Una conversione completa e diretta di tutte le funzionalità di Access
verso
> VB non riesce nemmeno a questi tools.
>
> ----------------
>
> Ciao Valerio.
>
          MAssimiliano
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: [OT] Traduzione FAQ 1.18 - 1.20

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:82Z51Z28Z94Y10...@usenet.libero.it...
>                     Il 24 Lug 2004, 20:01, "Valerio Valentini"
<
val...@accessgroup.it
> ha
> scritto:
> > 1.18 USO DELLE PROTEZIONI
> >
.............
> > Se la realizzazione è stata fatta in Access in italiano:
> > Un errore molto comune è la scritta [Routine evento] nelle proprietà di
> > maschere e reports che non sempre viene tradutta.
>
> tradotta
>
>
> Ciò comporta l'errore
> > nella versione inglese di Access "Can't find macro "[Routine evento]"
..."
> > perchè in teoria dovrebbe esserci scritto "Event Procedure". Ciò deve
> essere
> > corretto manualmente e tramite
>
> tramite del codice
>
corretto manualmente o tramite del codice
> > codice che apra gli oggetti in
> > Visualizzazione Struttura e sostituisca il testo.
> >
> > Attenzione ad usare sempre nelle query il riferimento inglese alle
> maschere
> > Forms!... al posto dell'italiano Maschere!... (ndr. che mi sa non
esista,
> se
> > qualcuno trova altro esempio meglio.)
>
> Va benissimo così: anche in italiano MAschere non è supportato e bisogna
> segnare forms!
Ciò che mette Karl come esempio è un caso in cui si può usare una parola
chiave in lingua straniera e che poi non viene riconosciuta, come in tedesco
puoi usare Formulare!... per indicare le maschere, bisognerebbe trovare
un'esempio in cui poter usare una parola italiana come riferimento e che poi
non viene accettata, come nell'esempio precendente di Routine evento che in
inglese si chiama Event Procedure.
>
>
........
> >
>           MAssimiliano
>
Ciao Valerio.


title: [OT] Traduzione FAQ 1.18 - 1.20

author: Karl Donaubauer

text:
Ciao Valerio,
Valerio Valentini wrote:
> Una raccolta degli aspetti più importanti della sicurezza di Access
> si trova nel Whitepaper Absichern di Bernd Gilles su:
>
http://www.accessprofipool.de
 (ndr. inserire anche la parte trattata
> in italiano sul sitocomune ???? Mi sembrerebbe una buona idea)
L'ho sostituito con un link a un articolo sul sitocomune.
> ...
> Ciò che mette Karl come esempio è un caso in cui si può usare una
> parola chiave in lingua straniera e che poi non viene riconosciuta,
> come in tedesco puoi usare Formulare!... per indicare le maschere,
> bisognerebbe trovare un'esempio in cui poter usare una parola
> italiana come riferimento e che poi non viene accettata, come
> nell'esempio precendente di Routine evento che in inglese si chiama
> Event Procedure.
Esatto. Ho lasciato perdere questo esempio nella traduzione perché
avete il gran'vantaggio che nella versione italiana di Access MS
non ha fatto la sciocchezza di una "quasi-traduzione" delle parole
chiave. In tedesco da qui nascono molti problemi.
--
cu
Karl
*********
Access FAQ:
www.donkarl.com/it


title: [OT] Traduzione FAQ 1.18 - 1.20

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:2mkv7qF...@uni-berlin.de...

Ora si spiega perchè non riesco mai a trovare esempi adatti ai tuoi. In
italiano gli errori che descrivi, in queste ipotesi, non ci sono quasi mai.
>
> --
> cu
> Karl
> *********
> Access FAQ:
www.donkarl.com/it
>
Ciao Valerio.


title: Sommare alcuni determinati campi di un report

author: gnews

text:
Questo messaggio è stato inserito anche in microsoft.public.it.office.access
Nel corpo di un report ho le seguenti caselle di testo:
Descrizione, Imponibile, ImportoEsenteIVA, CodIVA
In una casella di testo nel piè di pagina report vorrei sommare tutti gli
ImportoEsenteIVA dove il CodIVA è uguale a E10.
E' possibile? Come posso fare?
Ciao


text:
"gnews" <
gnewsR...@katamail.com
> ha scritto nel messaggio
news:RbCeg.16792$jP5.4...@twister1.libero.it...

DSum("ImportoEsenteIVA";"nomeTabella/Query";"CodIVA='E10'")
Ciao.
--
Sergio MAZZA


title: Query che intergra tutti i campi

author: Sthepan

text:
Ciao
io ho un DB con alcune tabelle collegate uno a molti e alcune molti a
molti, vorrei creare una query per avere in un'unica tabella tutti i dati,
è possibile?
Io ho provato ma mi da errore quando inserisco le tabelle collegate molti a
molti.
ciao
Sthepan


title: Query che intergra tutti i campi

text:
"Sthepan" <
sth...@supereva.it
> wrote in message
news:1atbp3e026imx.1...@40tude.net

Che senso ha quanto chiedi...??
Va un pò contro le normali metodologie di gestione.
Poi è ovvio che non possa andare, la relazione Molti Molti
è un Assurdo relazionale e non a caso viene Spezzata in
2 relazioni 1--Molti--Molti--1....!
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Query che intergra tutti i campi

text:
In data Wed, 23 Mar 2005 20:03:02 +0000 (UTC), Alessandro Baraldi ha
scritto:

Ciao,
Mi serviva per creare poi una maschera collegata da dove inserire tutti i
dati, per non creare tante form quante le tabelle.
ciao Sthepan


title: Elenco nazioni e province italiane

author: Marolif

text:
Ciao,
sto cercando un file (.txt o .xls) che contenga l'elenco di tutte nazioni
del mondo ed uno con le province d'Italia,  da utilizzare in una casella
combinata in Access. Qualcuno mi sa dire dove posso trovarli ?
Grazie
Franco


title: Elenco nazioni e province italiane

author: Alfio

text:

Per quanto riguarda i "confini nostrani" puoi attingere dal sito comune o
dal sito delle poste e adattarti il file .txt , per il resto, non so
aiutarti.
Alfio


title: Elenco nazioni e province italiane

author: Mauro&Giusi

text:
Marolif <
mar...@inwind.it
> wrote in message
PmX_8.16148$s74.4...@twister1.libero.it...

Qualche tabella sui Comuni e Provincie Italiane l'ho vista nel sito del
Ministero dell e Finanze. Qualche cosa c'č anche per gli Stati stranieri.
Ciao Mauro


title: db danneggiato - access 2016

author: mario rossi

text:
un database sviluppato in access 2016 viene al momento utilizzato da 9 utenti quasi mai contemporaneamente ma potrebbe accadere, è capitato un paio di volte che il database si danneggiasse con il seguente messaggio:

Microsoft Access: è stato rilevatoche il database è in uno stato non coerente, ne verrà tentato il recupero. durante tale processo verrà creata una copia di backup del database e tutti gli oggetti verranno inseriti in un nuovo database, che verrà quindi aperto. i nome degli oggetti che non è stato possibile recuperare verranno registrati nella tabella relativa agli errori di recupero.

c'è qualche accorgimento o qualche metodo per capire il motivo per cui accade questo problema?

grazie a tutti.


title: db danneggiato - access 2016

author: RobertoA

text:

Utilizzo in multiutenza
Passa tutto su un db server


title: db danneggiato - access 2016

text:

Sbalzi di tensione, Cavi ... troppe le cause possibili.

Se per ragioni tecniche o di tempo non ti è possibile convertire il DB su base Server (e in parte l'applicazione), ti resta la possibilità di configurare un Terminal Server, spostando programmi e DB lato Server: in quello scenario anche .mdb/accdb funzionano abbastanza bene.

Saluti

Saluti


title: db danneggiato - access 2016

text:
Mario Rossi ha scritto:
> un database sviluppato in access 2016 viene al momento utilizzato da 9 utenti quasi mai contemporaneamente ma potrebbe accadere, è capitato un paio di volte che il database si danneggiasse con il seguente messaggio:
>
> Microsoft Access: è stato rilevatoche il database è in uno stato non coerente, ne verrà tentato il recupero. durante tale processo verrà creata una copia di backup del database e tutti gli oggetti verranno inseriti in un nuovo database, che verrà quindi aperto. i nome degli oggetti che non è stato possibile recuperare verranno registrati nella tabella relativa agli errori di recupero.
>
> c'è qualche accorgimento o qualche metodo per capire il motivo per cui accade questo problema?

Già da 7 mesi è il problema più frequente di Access su tutto il mondo.
Si tratta di un problema con il caching di Win10, molto probabilmente
causato da un update di Windows in maggio.

Non esiste un fix. L'unica cosa che aiuta è il workaround di disattivare
il caching nel registro come descritto qui:

https://support.office.com/article/access-reports-that-databases-are-in-an-inconsistent-state-
-7ec975da-f7a9-4414-a306-d3a7c422dc1d

--
Ciao
Karl
*********
http://www.AccessDevCon.com

Access FAQ:
http://www.donkarl.com/it


title: db danneggiato - access 2016

author: scaronic

text:

Purtroppo il link suggerito da Karl non funziona
......
La pagina che cerchi non è stata trovata.
Puoi aver selezionato un collegamento obsoleto oppure la pagina è stata spostata.
Riprovare l'operazione di esplorazione da pagina principale.
________
Qualche suggerimento ??


title: db danneggiato - access 2016

text:
Il link suggerito da Karl funziona benissimo se non hai fretta di fare click e guardi che il link completo è più lungo... quindi devi fare copia incolla...

https://support.office.com/it-it/article/access-segnala-che-i-database-sono-in-uno-stato-incoerente-7ec975da-f7a9-4414-a306-d3a7c422dc1d?ui=it-IT&rs=it-IT&ad=IT

@Alex


title: db danneggiato - access 2016

text:

A me funziona
Uso thunderbird, forse il tuo news-reader tronca il link


title: db danneggiato - access 2016

text:

grazie a tutti, provo e vedo se risolvo


title: db danneggiato - access 2016

text:

ho adottato quella modifica proposta da microsoft ma il problema si è ripresentato, ora vi chiedo, visto che il problema di incoerenza del database lo crea sempre una sola tabella secondo voi se creo un un dbdati a parte con dentro solo quella tabella creo problemi al client per il fatto che tutte le tabelle sono in un certo database e solo quella tabella da sola in un altro?
il client si appesantisce o rallenta?

in questo modo se si crea il problema il file con tutte le altre tabelle continuerà a funzionare immagino.

grazie a tutti e buon anno.


title: db danneggiato - access 2016

author: GiorgioDaPrato

text:
 ora vi chiedo, visto che il problema di incoerenza del database lo crea sempre una sola tabella secondo voi se creo un un dbdati a parte con dentro solo quella tabella creo problemi al client per il fatto che tutte le tabelle sono in un certo database e solo quella tabella da sola in un altro?
> il client si appesantisce o rallenta?
>
> in questo modo se si crea il problema il file con tutte le altre tabelle continuerà a funzionare immagino.
>
> grazie a tutti e buon anno.

aggiungo una opinione (NON "una risposta")
essendo interessato alle procedure "solo Access"

La risposta è appunto quella che hanno già dato:
passare a sql server o a terminal server

Però, se ora sei "costretto" a procedere per tentativi
(e anche considerando che nei siti stranieri si dà per "sostenibile"
una multiutenza di 10 postazioni)

e rivedendo qualche esperienza personale
mi sento di dire questo:

-prima di tutto una domanda:
non avendo A2016 non conosco (e non mi è chiaro)
il suo proprio tentativo di ripristino automatico:
per quanto ho visto con versioni precedenti
il sistema tenta di ripristinare TUTTO il db (accdb, mdb)
e quindi, considerando solo le registrazioni (le tabelle),
o ripristina TUTTO il db
(meglio ancora: lo fa ripartire ..., non è detto che il db sia "risanato" !)
o non ripristina niente (il db non riparte ...)

Quindi chiedo cosa accade con A2016
(da quanto dici sembra che il sistema indichi propriamente l'"oggetto fallato")

e queste le osservazioni "minime del caso":
-cerca di raccogliere i vari suggerimenti per rendere "più stabile" il db in multiutenza

-se davvero c'è una tabella colpita in modo "privilegiato"
considera quali postazioni scrivono su essa
e se già una di esse "zoppica" con altri programmi
o se ha difficoltà di collegamento in rete

-sarebbe da "misurare" la risposta della rete dei vari posti
verso quella che è la "postazione server"
(e agevolare in particolare quella postazione con le modalità di collegamento)

-ovviamente nelle postazioni NON ci devono essere prodotti Office
(o comunque Microsoft) SENZA licenza
(magari disinstallati in modo non adeguato)

Per la question tabelle distribuite su più db che insieme fanno il BackEnd,
non ci dovrebbero essere problemi,
però se quella tabella fa parte di una relazione non credo che tu la possa ricostruire nel FrontEnd


title: Consigli su funzione per "camuffare" messaggi errore di Access

author: robb

text:
Salve,
come consiglia spesso il buon Alex Baraldi, ho voluto provare a
razionalizzare una parte di codice che si ripete spesso in due
maschere.
Per far ciò, ho creato la seguente funzione:
Public Function fErrore()
  Const Err3101 = 3101
  Const Err2501 = 2501
  Const Err3021 = 3021
  Dim sMessaggio As String
  Dim sTitolo As String
  Dim iStile As Integer
  If (err = Err3101) Then
    sMessaggio = "Scegli un cliente dall'elenco clienti."
    iStile = vbExclamation + vbOKOnly
    sTitolo = "Richiesta selezione cliente"
    MsgBox sMessaggio, iStile, sTitolo
  ElseIf (err = Err2501) Or (err = Err3021) Then
  Else
    MsgBox err.Description
  End If
End Function
la quale viene richiamata nell'evento clic di vari pulsanti di comando
in questo modo:
Private Sub Comando_Click()
On Error GoTo Err_Comando_Click
  'Azioni varie'
Exit_Comando_Click:
  Exit Sub
Err_Comando_Click:
  fErrore <-------------------
  Resume Exit_Comando_Click:
End Sub
Funziona bene.
Vorrei solo sapere se possa in futuro generare errori inaspettati o se
possa essere ottimizzata in qualche modo.
Grazie.
Robb


text:
robb ha scritto:

Secondo me ti conviene mettere la Routine in un Modulo e passare anche
il numero di Errore...!
Public Function fErrore(ErrNum as long, ErrDesc as String)
If (err = 3101) Then
    sMessaggio = "Scegli un cliente dall'elenco clienti."
     iStile = vbExclamation + vbOKOnly
     sTitolo = "Richiesta selezione cliente"
     MsgBox sMessaggio, iStile, sTitolo
   ElseIf (err = Err2501) Or (err = Err3021) Then
   Else
     MsgBox ErrDesc
   End If
End Function
quindi puoi togliere la dichiarazioni delle Costanti Errore nella
Funzione e per richiamarla
puoi fare cos':
.....
Err_Comando_Click:
   Call  fErrore(Err.Number, Err.Description)
   Resume Exit_Comando_Click:
.....
Ciao
@Alex


text:
Alessandro Baraldi wrote:
[CUT]
> Secondo me ti conviene mettere la Routine in un Modulo e passare anche
> il numero di Errore...!
>
> Public Function fErrore(ErrNum as long, ErrDesc as String)
> If (err = 3101) Then
>     sMessaggio = "Scegli un cliente dall'elenco clienti."
>      iStile = vbExclamation + vbOKOnly
>      sTitolo = "Richiesta selezione cliente"
>      MsgBox sMessaggio, iStile, sTitolo
>    ElseIf (err = Err2501) Or (err = Err3021) Then
>    Else
>      MsgBox ErrDesc
>    End If
> End Function
>
> quindi puoi togliere la dichiarazioni delle Costanti Errore nella
> Funzione e per richiamarla
> puoi fare cos':
>
> .....
> Err_Comando_Click:
>    Call  fErrore(Err.Number, Err.Description)
>    Resume Exit_Comando_Click:
> .....
>
>
> Ciao
> @Alex
Ciao Alex,
ti ringrazio molto per il suggerimento che ho subito sfruttato.
Purtroppo, mi ero dimenticato che uno dei pulsanti ha un MsgBox diverso
dagli altri e quindi ho dovuto modificare la funzione in questo modo:
Public Function fErrore(ErrNum As Long, ErrDesc As String, _
                        Optional errChiudi As Boolean = False)
  Dim sMessaggio As String
  Dim sTitolo As String
  Dim iStile As Integer
  Dim retValore As Integer
  If (err = 3101) Then
    If errChiudi = False Then
      sMessaggio = "Scegli un cliente dall'elenco clienti."
      iStile = vbExclamation + vbOKOnly
      sTitolo = "Richiesta selezione cliente"
      MsgBox sMessaggio, iStile, sTitolo
    Else
      sMessaggio = "Nessun cliente selezionato." & vbCrLf & "" & vbCrLf
& _
      "Il preventivo corrente non verrà salvato. Chiudere comunque?"
      iStile = vbExclamation + vbYesNo
      sTitolo = "Chiusura finestra"
      retValore = MsgBox(sMessaggio, iStile, sTitolo)
      Select Case retValore
        Case vbYes
          DoCmd.Close
        Case vbNo
      End Select
    End If
  ElseIf (err = 2501) Or (err = 3021) Then
  Else
    MsgBox ErrDesc
  End If
End Function
Come sempre, non è che non funzioni, ma gradirei un tuo parere.
Ciao e grazie.


text:
robb ha scritto:
> [CUT]

Direi che può andare....!
Non complicarla troppo con accezioni altrimenti è tolto lo scopo di
centralizzare.
@Alex


text:
Alessandro Baraldi wrote:
[CUT]
> Direi che può andare....!
> Non complicarla troppo con accezioni altrimenti è tolto lo scopo di
> centralizzare.
>
> @Alex
No no, la funzione rimarrà così.
Grazie mille.
Ciao.
Robb


title: Verificare se un file txt o immagine è aperto - ci riprovo, non so più che pesci pigliare...

author: sergio cosso

text:
Niente da fare, non riesco a fare questa verifica con la funzione
sotto esposta. Funziona con tutto ma non con i files appena
citati.......cosa c'è che non va? Grazie a tutti, saluti
Sergio
Function FileIsOpen(sFileName As String) As Boolean
    Dim iFileNum As Integer, lErrNum As Long
    On Error Resume Next
    iFileNum = FreeFile()
    Open sFileName For Input Lock Read As #iFileNum
    Close iFileNum
    lErrNum = Err.Number
    On Error GoTo 0
    Select Case lErrNum
    Case 0
        FileIsOpen = False
    Case 70
        FileIsOpen = True
    Case 53
        FileIsOpen = False
    Case Else
        FileIsOpen = True
        'Debug.Print Error(lErrNum)
    End Select
End Function
Restituisce False se il file NON aperto.


author: pablitomf

text:

http://support.microsoft.com/kb/291295/it
Provato questo?


text:

Sì, grazie, ho provato anche questa.
Sono giorni che giro sul web, la questione è largamente dibattuta;
tutti usano sostanzialmente lo stesso metodo che funziona benissimo ma
non per txt, jpg, bmp.....
Ciao, grazie ancora..se hai novità fammi sapere, appena riesco metto
tutto sul forum
Sergio


author: Carlo Costarella

text:
"sergio cosso" <
sergio...@gmail.com
> ha scritto nel messaggio
news:0ae8791f-e8f7-4218...@t9g2000vbs.googlegroups.com...
On 20 Ago, 21:07, pablitomf <
pablit...@virgilio.it
> wrote:
> On 19 Ago, 21:47, sergio cosso <
sergio.co...@gmail.com
> wrote:
cut
Sě, grazie, ho provato anche questa.
Sono giorni che giro sul web, la questione č largamente dibattuta;
tutti usano sostanzialmente lo stesso metodo che funziona benissimo ma
non per txt, jpg, bmp.....
Ciao, grazie ancora..se hai novitŕ fammi sapere, appena riesco metto
tutto sul forum
Sergio
--------------------------------------------
Se non ricordo male in un post precedente dicevi di avere W7 64 bit.
Se č cosě prova ad attivare il super amministratore (va bene anche per W7 32
bit):
Digita cmd nel box di ricerca del menů Start, clicca col tasto destro sull'icona
del prompt dei comandi che appare in cima al menů Start, e spunta la voce
Esegui come amministratore.
Nel prompt dei comandi digita:
Net user administrator /active:yes  seguito da invio
Fai ripartire la macchina e ora tra gli utenti trovi anche amministratore,
entra con questo account e fai le prove di cui abbiamo giŕ parlato.
Per disattivare il super amministratore stesso procedimento ma la stringa da
usare nel prompt dei comandi č:
Net user administrator /active:no
Ciao, Carlo


text:
On 21 Ago, 09:17, "Carlo Costarella" <
carlocoslib...@libero.it
> wrote:
> "sergio cosso" <
sergio.co...@gmail.com
> ha scritto nel messaggionews:0ae8791f-e8f7-4218...@t9g2000vbs.googlegroups.com...
> On 20 Ago, 21:07, pablitomf <
pablit...@virgilio.it
> wrote:> On 19 Ago, 21:47, sergio cosso <
sergio.co...@gmail.com
> wrote:
>
> cut
> Sì, grazie, ho provato anche questa.
> Sono giorni che giro sul web, la questione è largamente dibattuta;
> tutti usano sostanzialmente lo stesso metodo che funziona benissimo ma
> non per txt, jpg, bmp.....
> Ciao, grazie ancora..se hai novità fammi sapere, appena riesco metto
> tutto sul forum
> Sergio
> --------------------------------------------
>
> Se non ricordo male in un post precedente dicevi di avere W7 64 bit.
> Se è così prova ad attivare il super amministratore (va bene anche per W7 32
> bit):
> Digita cmd nel box di ricerca del menù Start, clicca col tasto destro sull'icona
> del prompt dei comandi che appare in cima al menù Start, e spunta la voce
> Esegui come amministratore.
> Nel prompt dei comandi digita:
> Net user administrator /active:yes  seguito da invio
> Fai ripartire la macchina e ora tra gli utenti trovi anche amministratore,
> entra con questo account e fai le prove di cui abbiamo già parlato.
> Per disattivare il super amministratore stesso procedimento ma la stringa da
> usare nel prompt dei comandi è:
> Net user administrator /active:no
>
> Ciao, Carlo
Grazie, Carlo; qualche chiarimento:
Poi come accedo? user/pw?
In ambiente multi utente bisogna come funziona?
Tu hai provato la funzione e funziona anche con files immagine o txt?
Grazie ancora, cordiali saluti a tutti
Sergio


text:
"sergio cosso" <
sergio...@gmail.com
> ha scritto nel messaggio
news:2771ea45-35d6-4b98...@l7g2000vbz.googlegroups.com...
On 21 Ago, 09:17, "Carlo Costarella" <
carlocoslib...@libero.it
> wrote:
> "sergio cosso" <
sergio.co...@gmail.com
> ha scritto nel
> messaggionews:0ae8791f-e8f7-4218...@t9g2000vbs.googlegroups.com...
> On 20 Ago, 21:07, pablitomf <
pablit...@virgilio.it
> wrote:> On 19 Ago,
> 21:47, sergio cosso <
sergio.co...@gmail.com
> wrote:
>
> cut
> S�, grazie, ho provato anche questa.
> Sono giorni che giro sul web, la questione � largamente dibattuta;
> tutti usano sostanzialmente lo stesso metodo che funziona benissimo ma
> non per txt, jpg, bmp.....
> Ciao, grazie ancora..se hai novit� fammi sapere, appena riesco metto
> tutto sul forum
> Sergio
> --------------------------------------------
>
> Se non ricordo male in un post precedente dicevi di avere W7 64 bit.
> Se � cos� prova ad attivare il super amministratore (va bene anche per W7
> 32
> bit):
> Digita cmd nel box di ricerca del men� Start, clicca col tasto destro
> sull'icona
> del prompt dei comandi che appare in cima al men� Start, e spunta la voce
> Esegui come amministratore.
> Nel prompt dei comandi digita:
> Net user administrator /active:yes seguito da invio
> Fai ripartire la macchina e ora tra gli utenti trovi anche amministratore,
> entra con questo account e fai le prove di cui abbiamo gi� parlato.
> Per disattivare il super amministratore stesso procedimento ma la stringa
> da
> usare nel prompt dei comandi �:
> Net user administrator /active:no
>
> Ciao, Carlo
Grazie, Carlo; qualche chiarimento:
Poi come accedo? user/pw?
---------------------
Per accedere come super amministratore basta selezionare l'icona
Amministratore che ti compare dopo la procedura. Non serve la password.
Ora prova a vedere se il codice ti segnala come non aperto un file txt o
immagine.
------------------------------
>In ambiente multi utente bisogna come funziona?
-------------------------------
No, no serve solo a capire se l'utente ha dei blocchi. Intanto vediamo come
va con il super amministratore.
-----------------------------
>Tu hai provato la funzione e funziona anche con files immagine o txt?
>Grazie ancora, cordiali saluti a tutti
>Sergio
----------------------
S� ho gi� provato e funziona perfettamente sia in W7 64 bit che in XP SP3.
Del resto avevo gi� risposto a un post precedente indicando il codice usato.
Ciao, Carlo


text:
On 21 Ago, 11:39, "Carlo Costarella" <
carlocoslib...@libero.it
> wrote:
> "sergio cosso" <
sergio.co...@gmail.com
> ha scritto nel messaggionews:2771ea45-35d6-4b98...@l7g2000vbz.googlegroups.com...
> On 21 Ago, 09:17, "Carlo Costarella" <
carlocoslib...@libero.it
> wrote:
>
>
> Fatto e il pc si riavvia normalmente, e poi?
Ho dimenticato di precisare 32bit, W7
Ciao grazie
Sergio
