title: PULSANTE SFOGLIA

author: luigi corinna

text:
A97
Gentili....ho una maschera denominata DOCUMENTI
dove in una casella di testo chiamata PDF inserisco manualmente un nome file
relativo ad un file pdf contenuto in una cartella di sistema, in base a
questo nome file nella stessa maschera un pulsante apre il PDF relativo...
BENE...volevo inserire il nome file sfogliando direttamente le risorse del
computer,  senza doverlo inserire manualmente (la stringa)....un semplice
sfoglia e scelta del nome file da 'copiare' nella casella di testo PDF...
come posso fare???
Grazie
Luigi,  Bari


title: PULSANTE SFOGLIA

author: Pablitomf

text:
>un semplice sfoglia e scelta del nome file da 'copiare' nella casella di
>testo PDF...
> come posso fare???
http://support.microsoft.com/kb/166291/it


title: Problemi...As Database

author: tore MOLISSO

text:
Ciao a tutti! Ho un problema col Visual Basic. Vorrei definire un oggetto
database in modo da gestirlo con le istruzioni sql definendo poi gli oggetti
recordest. Al momento della dichiarazione però nell elenco dei tipi di
variabili non c'è il tipo "Database" che pure è presente in molti esempi
della guida, mentre invece non ho problemi con il tipo "Recordset".
Per esempio volendo scrivere questo codice:
Sub FindFirstX()
    Dim dbsNorthwind As Database
    Dim rstClienti As Recordset
    .....
mi da errore sulla dichiarazione di dbsNorthwind perchè non riconosce il
tipo Database! Come posso fare??? Grazie in anticipo per la risposta!


title: Problemi...As Database

author: CarloCos

text:
"tore MOLISSO" <
fmo...@tin.it
> ha scritto nel messaggio
news:w75g7.298$vC1....@news1.tin.it...
> Ciao a tutti! Ho un problema col Visual Basic. Vorrei definire un oggetto
> database in modo da gestirlo con le istruzioni sql definendo poi gli
oggetti
> recordest. Al momento della dichiarazione perň nell elenco dei tipi di
> variabili non c'č il tipo "Database" che pure č presente in molti esempi
> della guida, mentre invece non ho problemi con il tipo "Recordset".
> Per esempio volendo scrivere questo codice:
> Sub FindFirstX()
>
>     Dim dbsNorthwind As Database
>     Dim rstClienti As Recordset
>     .....
>
> mi da errore sulla dichiarazione di dbsNorthwind perchč non riconosce il
> tipo Database! Come posso fare??? Grazie in anticipo per la risposta!
>
>
In un modulo qualsiasi apri i riferimenti (menů strumenti) e accertati che
ci sia il riferimento a DAO 3.51 Object Library.
Ciao, Carlo


title: Problemi...As Database

author: Karl Donaubauer

text:
CarloCos ha scritto:
> "tore MOLISSO" ha scritto:...
> >     Dim dbsNorthwind As Database
> >     Dim rstClienti As Recordset
> >     .....
> >
> > mi da errore sulla dichiarazione di dbsNorthwind perchè non riconosce il
> > tipo Database! Come posso fare??? Grazie in anticipo per la risposta!
>
> In un modulo qualsiasi apri i riferimenti (menù strumenti) e accertati che
> ci sia il riferimento a DAO 3.51 Object Library.
È anche importante di spegnere il riferimento a ADO se non è usato
o che DAO è al di sopra del riferimento a ADO o/ed usare sempre
Dim db As DAO.Database, rs as DAO.Recordset ecc.
--
cu
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


title: invio e-mail

author: Galvy

text:
Ciao a tutto il ng, ho scaricato gli esempi dal sitocomune per inviare
e-mail da access ma nessuno funzionava tutti mi restituivano degli errori
dopo la conversione....
Qualcuno sa dove potrei reperire esempi o consigli su come procedere??????
Saluti Galvy


title: invio e-mail

author: Fabio Dalla Villa

text:
"Galvy" <
ga...@libero.it
> ha scritto nel messaggio
news:o8o99.92640$lu5.2...@twister1.libero.it...

Ho avuto lo stesso problema.
Alla fine ho usato blat.exe (prova un motore di ricerca: non ricordo più
dove l'ho trovato).
Ciao
--
Fabio Dalla Villa
Biella
nomec...@tiscali.it


title: Report

author: gino galdi

text:
Ho creato un report di accces il quale stampa delgi ordini raggruppati per
idordine su pagine diverse
(ho qundi nel corpo del report tanti importi per quante sono le voci di
prodotto ordinate)
nella sezione pič di pagina idordine ho messo una casella di testo che
dovrebbe contenere la somma degli importi relativi a quell'ordine
il mio problema č che se c'č un solo ordine funziona bene, mentre ce ne sono
di piů l'importo totale che compare nella sezione non č esatto in quanto
somma anche gli importi degli ordini precedenti
come posso realizzare una cosa del genere?
grazie


title: Specchio dei servizi tipo query a campi incrociati con giorni del mese e cambio mese da casella combinata

author: Bruno - S95

text:
Access 2003
Ciao e buongiorno a tutto il news, oggi mi sento fortunato perchè ho
l'influenza e quindi ho preso tre giorni di "ferie" per stare a casa a
curarmi e frequentare il news.
Ho visto un piccolo programmino in sviluppato VB che ha creato il mio
interesse, infatti vorrei riproporlo in Access per poter gestire i servizi,
ma non riesco a immaginare
come svilupparlo nello stesso modo.
Pur potendo svilupparlo diversamente, questo metodo ha di buono che tiene
tutto a vista, come se si lavorasse in un foglio di Excel.
Ho pensato di fare una maschera con il personale e i 31 giorni del mese, poi
se febbraio ne ha 28 pazienza, per poi farlo apparire come foglio dati, ma
mi sa che nella gestione dei dati e nella bellezza lascia desiderare.
Inoltre potrei mettere solo la prima riga dei servizi e non anche quelle
degli straordinari.
Avete qualche dritta da darmi per iniziare o conosce l'esistenza di un db
come traccia.
Grazie, Bruno
Lo specchio si presentava come di seguito:
                    CasellaCombinataCambioAnno
CasellaCombinataCambioMese
1°CognomeNomePersonale        Campo1°ggMese    Campo2°ggMese
Campo3°ggMese    e così via fino alla fine del mese
2°CognomeNomePersonale        Campo1°ggMese    Campo2°ggMese
Campo3°ggMese    e così via fino alla fine del mese
3°CognomeNomePersonale        Campo1°ggMese    Campo2°ggMese
Campo3°ggMese    e così via fino alla fine del mese
4°CognomeNomePersonale        Campo1°ggMese    Campo2°ggMese
Campo3°ggMese    e così via fino alla fine del mese
e a seguire tutto il personale, compreso me.
Nei campi dei giorni il contenuto sarà tipo "RS" che sta per riposo
settimanale o MP = mattino+pomeriggio, P= pomeriggio, M=mattino, e cosi via.
Non mi dispiacerebbe poter fare uno specchio più completo mettendo anche i
campi per lo straordinario, esempio per una sola persona:
1°CognomeNomePersonale        Campo1°ggMese    Campo2°ggMese
Campo3°ggMese    e così via fino alla fine del mese
StraordinarioDiurno                    Campo2°ggMese    Campo3°ggMese    e
così via fino alla fine del mese
StraordinarioNotturno                Campo1°ggMese    Campo2°ggMese
Campo3°ggMese    e così via fino alla fine del mese
StraordinarioFestivo                   Campo1°ggMese    Campo2°ggMese
Campo3°ggMese    e così via fino alla fine del mese
e cosi via per le varie voci a seguire
Ancora grazie per ogni consiglio.
Bruno


author: Oscar Manfredini

text:
"Bruno - S95"
(cut)
> Lo specchio si presentava come di seguito:
>
>
>                    CasellaCombinataCambioAnno CasellaCombinataCambioMese
>
> 1°CognomeNomePersonale        Campo1°ggMese    Campo2°ggMese Campo3°ggMese
> e così via fino alla fine del mese
> 2°CognomeNomePersonale        Campo1°ggMese    Campo2°ggMese Campo3°ggMese
> e così via fino alla fine del mese
> 3°CognomeNomePersonale        Campo1°ggMese    Campo2°ggMese Campo3°ggMese
> e così via fino alla fine del mese
> 4°CognomeNomePersonale        Campo1°ggMese    Campo2°ggMese Campo3°ggMese
> e così via fino alla fine del mese
> e a seguire tutto il personale, compreso me.
>
> Nei campi dei giorni il contenuto sarà tipo "RS" che sta per riposo
> settimanale o MP = mattino+pomeriggio, P= pomeriggio, M=mattino, e cosi
> via.
Cosa impedisce la realizzazione di questa cosa con una form tabellare di
Access?


text:
"Oscar Manfredini" <
oscar.ma...@libero.it
> ha scritto nel messaggio
news:4975c0fc$0$1105$4faf...@reader4.news.tin.it...

-------------
Ciao Oscar, non saprei dirti cosa lo impedisce; ho capito che realizzeresti
una form tabellare, ma come ? Facendo 31 campi relativi al mese!
Certamente si può fare, ma io intendevo una form che all'apertura del nuovo
mese mi presentasse tutto il personale, presente e non con i campi relativi
al mese per contenere il turno del giorno + gli starordinari (vedasi
spiegazione sopra).
Tu come faresti?
Ciao, Bruno


text:
"Bruno - S95" <
> Ciao Oscar, non saprei dirti cosa lo impedisce; ho capito che
> realizzeresti una form tabellare, ma come ? Facendo 31 campi relativi al
> mese!
> Certamente si può fare, ma io intendevo una form che all'apertura del
> nuovo mese mi presentasse tutto il personale, presente e non con i campi
> relativi al mese per contenere il turno del giorno + gli starordinari
> (vedasi spiegazione sopra).
> Tu come faresti?
La verità è che non ho ben capito la visualizzazione che insegui   ;-)
Dovrei vedere le schermate dell'applicazione che vorresti imitare.
Ciao: Oscar


text:
"Oscar Manfredini" <
oscar.ma...@libero.it
> ha scritto nel messaggio
news:4975d6ec$0$1111$4faf...@reader3.news.tin.it...

--------
Posso inviarti una sorta di specchio fatto con Excel.
Fammi Sapere.
Bruno


text:
"Bruno - S95"
> Posso inviarti una sorta di specchio fatto con Excel.
> Fammi Sapere.
E' no: vorrei vedere il funzionamento dell'applicativo.
Non esiste una Demo sul web, o un sito con delle schermate?
Ciao: Oscar


text:
"Oscar Manfredini" <
oscar.ma...@libero.it
> ha scritto nel messaggio
news:4975d8e7$0$1115$4faf...@reader3.news.tin.it...

---------
Non sono in possesso dell'applicativo e non ho un demo pur avendo cercato
nell'web; diversamente non avrei chiesto aiuto.
Va bene cosě.
Grazie, Bruno


author: Carlo Costarella

text:
"Bruno - S95" <
mus...@virgilio.it
> ha scritto nel messaggio
news:49758b77$0$1105$4faf...@reader4.news.tin.it...
> Access 2003
>
> Ciao e buongiorno a tutto il news, oggi mi sento fortunato perchè ho
> l'influenza e quindi ho preso tre giorni di "ferie" per stare a casa a
> curarmi e frequentare il news.
> Ho visto un piccolo programmino in sviluppato VB che ha creato il mio
> interesse, infatti vorrei riproporlo in Access per poter gestire i
> servizi, ma non riesco a immaginare
> come svilupparlo nello stesso modo.
cut
Qualcosa come questo?
http://www.carlocostarella.it/MascheraTurni.jpg
Ciao, Carlo


text:
"Bruno - S95"
>> E' no: vorrei vedere il funzionamento dell'applicativo.
>> Non esiste una Demo sul web, o un sito con delle schermate?
> Non sono in possesso dell'applicativo e non ho un demo pur avendo cercato
> nell'web; diversamente non avrei chiesto aiuto.
> Va bene cosě.
> Grazie, Bruno
Scusa ma non capisco: non scrivevi d'avere in possesso un'applicazione che
fa certe cose?
Ciao: Oscar


text:
"Oscar Manfredini" <
oscar.ma...@libero.it
> ha scritto nel messaggio
news:4976d6c4$0$1117$4faf...@reader3.news.tin.it...

-------
Leggi il primo post: ho scritto:
Ho visto un piccolo programmino in sviluppato VB che ha creato il mio
interesse, infatti vorrei riproporlo in Access per poter gestire i servizi,
ma non riesco a immaginare
come svilupparlo nello stesso modo.
Ciao, Bruno


text:
"Carlo Costarella" <
carloantoni...@gmail.com
> ha scritto nel
messaggio news:gl6fmk$ght$1...@tdi.cu.mi.it...

------------------
Buongiorno Carlo, si è proprio l'idea che avevo; come ho scritto vorrei
poter avere visibile anche lo straordinario per ogni persona, da
visualizzare sotto le caselle del turno di ognuno , pur non essendo
strettamente necessario in quanto si potrebbe fare una una form a parte o
una sottoform.
Nella tua applicazione ho notato che visualizzi febbraio, presumo quindi e i
giorni siano fissi, inoltre hai formattato in verde le domeniche.
Nella form tabellare, ogni mese aggiungi il personale; va bene lo stesso.
Comunque è quello che volevo fare, solo con qualche piccola variante.
Ciao, Bruno
P.S... Ho visto che ti stai costruendo il tuo nuovo sito; auguri.


text:
"Bruno - S95" <
mus...@virgilio.it
> ha scritto nel messaggio
news:4976dcf0$0$1118$4faf...@reader1.news.tin.it...

---------
Dimenticavo, puoi darmi una dritta generale. i pulsanti "aggiungi persona al
turno", presumo che sia la tabella del personale, mentre "aggiungi nuovo
mese", come lavora ? Come aggiunge il nuovo mese?
Grazie, Bruno


text:
"Bruno - S95" <
mus...@virgilio.it
>
cut
>> Buongiorno Carlo, si è proprio l'idea che avevo; come ho scritto vorrei
>> poter avere visibile anche lo straordinario per ogni persona, da
>> visualizzare sotto le caselle del turno di ognuno , pur non essendo
>> strettamente necessario in quanto si potrebbe fare una una form a parte o
>> una sottoform.
>> Nella tua applicazione ho notato che visualizzi febbraio, presumo quindi
>> e i giorni siano fissi, inoltre hai formattato in verde le domeniche.
>> Nella form tabellare, ogni mese aggiungi il personale; va bene lo stesso.
>> Comunque è quello che volevo fare, solo con qualche piccola variante.
>> Ciao, Bruno
Il programma per i turni a cui appartiene l'mmagine che ti ho mostrato è
stato realizzato a partire da un vecchio db. Ho dovuto quindi adattare alla
meno peggio le caratteristiche del vecchio con il nuovo.
In quest'altra immagine:
http://www.carlocostarella.it/MascheraTurni2.jpg
ti mostro un'altro mese e a sinistra puoi vedere la struttura della tabella
principale.
La tabella contiene un' ottantina di campi (sic! - i campi Val1, Val2 che
vedi in basso proseguono fino a Val31) e praticamente riproducono non solo i
giorni ma anche tutti i possibili valori che risultano dalla somma dei vari
tipi di specifiche. Nei giorni inserisco il tipo di turno (1 = mattina, F =
Ferie,ecc..), in Val1,Val2,ecc. inserisco il valore in ore del turno (scelta
necessaria ma non indispensabile) e negli altri campi, come "Smonto",
"Mattino", il conteggio per ogni tipologia (anche questo necessario ma non
indispensabile).
Dico necessario ma non indispensabile perchè esiste una tabella "OreTurni"
dove vengono riportati sia il tipo di turno che il valore in ore, per cui so
sempre quante ore corrispondono per esempio al turno 1 = mattina. Quando si
vanno a fare i calcoli risulta più semplice avere gia il valore in ore in un
campo piuttosto che andarselo a calcolare.
>> P.S... Ho visto che ti stai costruendo il tuo nuovo sito; auguri.
Grazie
>
> Dimenticavo, puoi darmi una dritta generale. i pulsanti "aggiungi persona
> al turno", presumo che sia la tabella del personale, mentre "aggiungi
> nuovo mese", come lavora ? Come aggiunge il nuovo mese?
>
> Grazie, Bruno
"Aggiungi nuovo mese" serve ad evitare l'inserimento dei singoli operatori;
il codice provvede ad aggiungere alla tabella l'anno il mese e le stesse
persone presenti nella schermata a video. L'operatore deve solo provvedere
ad inserire i turni.
"Aggiungi persona al turno" serve in due casi: quando si aggiunge una
persona nuova, un nuovo assunto o incaricato o sostituto; oppure al primo
uso del db o di un nuovo reparto o servizio a cui attribuire i turni. In
questo caso, infatti, il db non conosce i dipendenti a cui si vogliono
attribuire i turni...è un'operazione che viene fatta una sola volta.
Premendo questo pulsante si apre una combo con solo i dipendenti scelti
nella maschera di apertura. Infatti il programma permette di essere usato
per un numero indefinito di reparti o servizi. Esiste evidentemente una
tabella "Dipendenti", una tabella "Reparti" e altre tabelle come "Ruoli" o
"SottoRuoli".
Il db è poi impreziosito da evidenziazioni colorate come il verde per le
domeniche e i festivi (esiste una tabella "Festivi") o il controllo "BL",
Bilancio, che evidenzia se il dipendente è in credito o in debito di ore.
Quanto allo straordinario, quello che chiedi, è fattibilissimo...basta
prevederlo.
Tieni però conto della complessità di una maschera con così tanti controlli
e dello spazio limitato di cui disponi.
Ti sei preso una brutta gatta da pelare!
Ciao, Carlo


text:
"Carlo Costarella" <
carloantoni...@gmail.com
> ha scritto nel
messaggio news:gl6qim$qlt$1...@tdi.cu.mi.it...

-----------
Mille grazie per la spiegazione, ho capito, ora posso iniziare ad elaborare
mentalmente il tutto, farmi venire qualche idea e poi dopo aver terminato
un'altro lavoro inizio con questo.
Ancora grazie, Bruno
P.S.. Oggi non si ha più tempo a disposizione; cosa non bisogna fare per
organizzarsi!


title: FE - Sostituire separatore decimale, da virgola a punto

author: Carlo POTS

text:
Dovrei sostituire il separatore decimale in una query di accodamento, ma
non ci riesco.

Parto dal presupposto che la query fa il select da una tabella i cui
campi numerici sono di tipo Precisione_Doppia, in formato Standard
(quindi con il punto separatore delle migliaia e la virgola per i
decimali) e 2 decimali.

I campi di richiamo della query sono Quantit, Imp_UNIT, IMPONIBILE,
Un_Misura e ALIVA

I campi di destinazione, per evitare problemi di formattazione, li ho
settati tutti come campi di testo.

Io ho provato a selezionare e modificare i campi come di seguito:

INSERT INTO DettaglioLinee ( NumeroLinea, Descrizione, Quantita,
PrezzoUnitario, PrezzoTotale, AliquotaIVA, UnitaMisura )
SELECT CInt([NUMDETT]) AS NumLinea, VenditaMateriali.DESC_MAT,
Replace([QUANTIT],".",",") AS Quantita,
Format(CDbl(Replace([IMP_UNIT],",",".")),"#,#00") AS PrezzoUnitario,
Format(CDbl(Replace([IMPONIBILE],".",",")),"#,#00") AS IMPON,
Format(CDbl(Replace([ALIVA],".",",")),"#,#00") AS ALIQ,
VenditaMateriali.UN_MISURA
FROM VenditaMateriali
WHERE (((VenditaMateriali.IDREGCON)=[Maschere]![TGFE]![txtREGCON]));

pero' al massimo, gli importi inferiori a 1 (ad es. 0,56) me li porta in
numero intero (quindi da 0,56 me lo trasforma in 56).

E' da stamattina che cerco una soluzione, ma non ne vengo a capo.
Non c'è qualcuno che mi può far capire dove sbaglio?
Accidenti all'SDI e ai decimali con il punto invece della virgola!!!!!

---
Questa e-mail è stata controllata per individuare virus con Avast antivirus.
https://www.avast.com/antivirus


author: mantro

text:

http://www.donkarl.com/it?FAQ6.21


text:
Il 08/02/2019 14:42, mantro ha scritto:

>> ---
>> Questa e-mail è stata controllata per individuare virus con Avast
>> antivirus.
>>
https://www.avast.com/antivirus

>>
>
>
http://www.donkarl.com/it?FAQ6.21

>

Forse sono io che non ho afferrato.

Ho scritto, in un campo della query, per un importo di 0,56, la stringa
Str([PrezzoUnitario])

Il prezzo lo accoda come .56; ovvero omette di inserirmi la parte intera.

Oltretutto, il campo, se contiene un valore intero, ad esempio 12,00,
deve inserirmi 12.00, mentre invece mi inserisce solo 12.

Dove sbaglio?

--
Lamps a tutti from Naples's kingdom Carlo POTS on VFR VTEC '02
& Bmw F650GS '00 "insomma, e' un VFR, mica una zoccola che cede appena ci
provi..." (cit. PMF)



text:

Funziona solo per i NUMERI POSITIVI e > 1 perchè convertendo in Stringa  sopprime lo ZERO, ma introduce anche uno spazio per il Segno... se verifichi infatti non è ".56" ma " .56"

Quindi il Replace credo sia meglio...

@Alex


text:
Il 08/02/2019 18:53, @Alex ha scritto:

>
> Funziona solo per i NUMERI POSITIVI e > 1 perchè convertendo in Stringa  sopprime lo ZERO, ma introduce anche uno spazio per il Segno... se verifichi infatti non è ".56" ma " .56"
>
> Quindi il Replace credo sia meglio...
>
> @Alex
>

Giustissimo, infatti ho risolto.

- Replace(Format([Campo];"00,00");",";".")

Ho preferito inserire solo due zeri prima della virgola, cosi' se non ho
un numero espresso in centinaia, non mi mette zeri superflui

Grazie



text:
Il 08/02/2019 18:53, @Alex ha scritto:

Vero!
Io, erroneamente, non avevo specificato che bisognava usare CStr() e non
Str(). Infatti Cstr(0.56)="0,56" mentre Str(0.56)=" .56".
Io, proprio seguendo il suggerimento iniziale di Karl, negli enunciati
Sql ho sempre usato Cstr e non ho mai dovuto tribolare.
Mi è sempre andata bene perché non sono mai incappato in numeri
negativi?... Ne farò tesoro!

mantro


text:
Il 08/02/2019 18:56, Carlo POTS ha scritto:
> Il 08/02/2019 18:53, @Alex ha scritto:
>
>>
>> Funziona solo per i NUMERI POSITIVI e > 1 perchè convertendo in
>> Stringa  sopprime lo ZERO, ma introduce anche uno spazio per il
>> Segno... se verifichi infatti non è ".56" ma " .56"
>>
>> Quindi il Replace credo sia meglio...
>>
>> @Alex
>>
>
>
> Giustissimo, infatti ho risolto.
>
> - Replace(Format([Campo];"00,00");",";".")
>
> Ho preferito inserire solo due zeri prima della virgola, cosi' se non ho
> un numero espresso in centinaia, non mi mette zeri superflui
>
> Grazie
>

... risolto a meta'...!

	La query, volendola eseguire in SQL, funziona con questo codice qui:

---------------------------------------------------------------------------------
INSERT INTO DettaglioLinee ( NumeroLinea, Descrizione, Quantita,
PrezzoUnitario, PrezzoTotale, AliquotaIVA, UnitaMisura )
SELECT CInt([NUMDETT]) AS NumeroLinea, VenditaMateriali.DESC_MAT,
Replace(Format([QUANTIT],"Fixed"),",",".") AS Quantita,
Replace(Format([IMP_UNIT],"Fixed"),",",".") AS PrezzoUnitario,
Replace(Format([IMPONIBILE],"Fixed"),",",".") AS PrezzoTotale,
Replace(Format([ALIVA],"Fixed"),",",".") AS AliquotaIVA,
VenditaMateriali.UN_MISURA
FROM VenditaMateriali
WHERE (((VenditaMateriali.IDREGCON)=[Maschere]![TGFE]![txtREGCON]));
----------------------------------------------------------------------------------

	Il problema e' quando devo convertirla in VBA; ho digitato il codice in
questo modo; la correzione non mi da errori, ma in esecuzioni mi da'
errore di operatore mancante vicino al Replace.
	Sto smadonando da 2 ore ma non ne vengo a capo.
	Questo e' il codice che ho digitato:

-----------------------------------------------------------------------------------
	Dim Q_add as string

	Q_add = "INSERT INTO DettaglioLinee ( NumeroLinea, Descrizione,
Quantita, PrezzoUnitario, PrezzoTotale, AliquotaIVA, UnitaMisura )"

     Q_add = Q_add & " SELECT CInt(NUMDETT) AS NumeroLinea,
VenditaMateriali.DESC_MAT, "
     Q_add = Q_add & "'Replace(format(QUANTIT,'00,00'), ',', '.')' AS
Quantita, "
     Q_add = Q_add & "'Replace(format(IMP_UNIT,'00,00'), ',', '.')' AS
PrezzoUnitario, "
     Q_add = Q_add & "'Replace(format(IMPONIBILE, '00,00'), ',', '.')'
AS PrezzoTotale, "
     Q_add = Q_add & "'Replace(format(ALIVA,'00,00'), ',', '.')' AS
AliquotaIVA, VenditaMateriali.UN_MISURA"
     Q_add = Q_add & " FROM VenditaMateriali"
     Q_add = Q_add & " WHERE (VenditaMateriali.IDREGCON)='" &
Me.txtREGCON & "'"
     MsgBox (Q_add)
     CurrentDb.Execute Q_add, dbfailonerror
------------------------------------------------------------------------------------

Dove sbaglio?



text:

P.s.: quella riga "MsgBox(Q_Add)" la uso come "spia" alla fine della
query per controllare che tutti dati siano instradati bene, per cui non
ne tenete conto... :-)



text:
Il 08/02/2019 22:50, Carlo POTS ha scritto:

>> -----------------------------------------------------------------------------------
>>
>>      Dim Q_add as string
>>
>>      Q_add = "INSERT INTO DettaglioLinee ( NumeroLinea, Descrizione,
>> Quantita, PrezzoUnitario, PrezzoTotale, AliquotaIVA, UnitaMisura )"
>>
>>      Q_add = Q_add & " SELECT CInt(NUMDETT) AS NumeroLinea,
>> VenditaMateriali.DESC_MAT, "
>>      Q_add = Q_add & "'Replace(format(QUANTIT,'00,00'), ',', '.')' AS
>> Quantita, "
>>      Q_add = Q_add & "'Replace(format(IMP_UNIT,'00,00'), ',', '.')' AS
>> PrezzoUnitario, "
>>      Q_add = Q_add & "'Replace(format(IMPONIBILE, '00,00'), ',', '.')'
>> AS PrezzoTotale, "
>>      Q_add = Q_add & "'Replace(format(ALIVA,'00,00'), ',', '.')' AS
>> AliquotaIVA, VenditaMateriali.UN_MISURA"
>>      Q_add = Q_add & " FROM VenditaMateriali"
>>      Q_add = Q_add & " WHERE (VenditaMateriali.IDREGCON)='" &
>> Me.txtREGCON & "'"
>>      MsgBox (Q_add)
>>      CurrentDb.Execute Q_add, dbfailonerror

Come non detto.... Chi l'ha duro la vince:

Il codice giusto e':
--------------------------------------------------------------------
Dim Q_Add as string

Q_add = "INSERT INTO DettaglioLinee ( NumeroLinea, Descrizione,
Quantita, PrezzoUnitario, PrezzoTotale, AliquotaIVA, UnitaMisura )"

Q_add = Q_add & " SELECT CInt(NUMDETT) AS NumeroLinea,
VenditaMateriali.DESC_MAT, "

Q_add = Q_add & "Replace(format(QUANTIT,'0.00'), ',', '.') AS Quantita, "

Q_add = Q_add & "Replace(format(IMP_UNIT,'0.00'), ',', '.') AS
PrezzoUnitario, "

Q_add = Q_add & "Replace(format(IMPONIBILE,'0.00'), ',', '.') AS
PrezzoTotale, "

Q_add = Q_add & "Replace(format(ALIVA,'0.00'), ',', '.') AS AliquotaIVA,
VenditaMateriali.UN_MISURA"

Q_add = Q_add & " FROM VenditaMateriali"

Q_add = Q_add & " WHERE (VenditaMateriali.IDREGCON)='" & Me.txtREGCON & "'"

     CurrentDb.Execute Q_add, dbfailonerror

--------------------------------------------------------------------------

Chiedo venia per lo "scomodo"

--
Carlo POTS



title: Auguri

author: Giorgio A.

text:
Buon Natale a tutti Voi
Giorgio


title: Auguri

author: fidirico

text:
"Giorgio A." <
g_abbr...@virgilio.it
> ha scritto nel messaggio
news:9VfGb.3295$VW.1...@news3.tin.it...
> Buon Natale a tutti Voi
> Giorgio
Buon Natale a te e a tutti gli altri in ascolto.
Galliano.


title: Auguri

author: Sergio MAZZA

text:
"Giorgio A." <
g_abbr...@virgilio.it
> ha scritto nel messaggio
news:9VfGb.3295$VW.1...@news3.tin.it...
> Buon Natale a tutti Voi
> Giorgio
>
Anche a te e famiglia...
Ciao.
--
Sergio MAZZA


title: Auguri

author: cidi

text:
"Giorgio A." <
g_abbr...@virgilio.it
> ha scritto nel messaggio
news:9VfGb.3295$VW.1...@news3.tin.it...
> Buon Natale a tutti Voi
> Giorgio
>
>
Buon Natale anche a te  e famiglia
Daniele


title: Auguri

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:M4iGb.4687$_P.1...@news4.tin.it...

 Buon Natale a te e famiglia
Daniele


title: Auguri

text:
"fidirico" <
galSENZAMA...@libero.it
> ha scritto nel messaggio
news:%0iGb.211072$e6.80...@twister2.libero.it...

Buon Natale a te e famiglia
Daniele


title: Auguri

author: badush

text:
A tutti gli amici del newsgroup
                                            BUON NATALE
                                                       E
                                     FELICE ANNO NUOVO


title: Auguri

text: Tanti auguri di buon Natale e Felice anno nuovo


title: file access - protezioni e wrkgadm_exe

author: ced

text:
> Se e' per questo, puoi condividere lo stesso mdw per tutti mettendolo, ad
> es, nella stessa cartella del db (o comunque in un posto accessibile
almeno
> in lettura dagli utenti della rete). Basta che nella riga di comando che
ti
> apre il db tu faccia esplicito riferimento al file mdw che stai usando.
>
> > un'ultima curiosita o dubbio, quando assegno il nome e la password di un
> > utente in Wrkgadm.exe, questi devono avere qualche relazione con il nome
> > utente e password  di windows che si trova sui computer collegati in
rete
> o
> > posso assegnarli con nomi differenti?
>
> Non c'e' alcuna relazione con l'utente di windows.
> Ma attenzione, la password serve solo a evitare che un utente non
> autorizzato possa connettersi al tuo mdb usando il tuo mdw (che contiene
> l'elenco degli utenti).
> Se crei un nuovo utente con lo stesso neome e ID su un altro pc noterai
che
> potrai accedere senza inserire password.
> L'ID e' cio' che effettivamente impedisce agli utenti non autorizzati di
> accedere al tuo mdb creando un utente sul loro stesso pc, anche se
conoscono
> il tuo nome utente, senza conoscere l'ID Access non li riconoscera' e non
> gli dara' l'accesso che hai tu.
>
> > ciao e grazie delle risposte
>
> Ciao
> Sib
>
>
oggi ho creato 2 utenti, con relativi ID (è stata un'impresa dato che ho
dovuto ripristinare 3 volte il system originale "come amministratore, nom mi
riconosceva la PW")
dopo averci riuscito, ho trasferito il file mdb su un pc di un collega senza
toccare il system,
vado fisicamente sul pc del collega e tento di aprire il file, ma è stato
impossibile (non mi chiedeva ne la password ne il nome utente, appariva solo
l'avviso di utente non autorizzato.
A questo punto ho copiato il file system del mio PC su quello del collega e
ho riprovato, OK funziona! ma........  aprendo il file con il nome utento
assegnato, questo si apre senza password.
A questo punto mi chiedo, se il secondo utente apre il DB col nome utente
del primo, questo ha le autorizzazioni del primo e non mi sta bene,
dove devo cambiare le password dei singoli utenti? sul mio pc(di cui ho
provato, ma cambia l'unica pw disponibile che è quella mia), su ogni pc
degli utenti o dove? e poi, i singoli utenti come devono comportarsi se si
vogliono fare un loro DB senza tener conto del system che gli ho piazzato io
dato che access parte con la protezione del system che ho messo io in
windows dei loro pc?


title: Do events blocca la maschera

author: MarcoBa

text:
ho inserito in una maschera con più controlli un cronometro al centesimo
trovato sul sito comune, il quale sfrutta la funzione Do Event,
esattamente
queste sono le dichiarazioni
Private Declare Function GetTickCount Lib "kernel32" () As Long
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
e questo il ciclo
Do: DoEvents
tempotmp& = GetTickCount - Inizio
Sleep (5)
Label2.Caption = Format$(tempotmp& \ 3600000, "00") & ":" &
Format$(((tempotmp& - (tempotmp& \ 3600000) * 3600000)) \ 60000, "00") &
":" & Format$((tempotmp& - (tempotmp& \ 60000) * 60000) / 1000, "00.000")
label3.Caption = tempotmp&
Loop Until Command1.Caption = "Start"
il mio problema è che quando aziono il cronometro i controlli che si
trovano nella maschera non riesco più ad usarli, como posso risolvere il
problema ??
Grazie
Marco
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Do events blocca la maschera

author: ALESSANDRO Baraldi

text:
"MarcoBa" <
produ...@pica.it
> ha scritto nel messaggio
news:db8mk0$hag$1...@news.newsland.it...
> ho inserito in una maschera con più controlli un cronometro al centesimo
> trovato sul sito comune, il quale sfrutta la funzione Do Event,
> esattamente
>
> queste sono le dichiarazioni
>
> Private Declare Function GetTickCount Lib "kernel32" () As Long
> Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
>
> e questo il ciclo
>
> Do: DoEvents
> tempotmp& = GetTickCount - Inizio
> Sleep (5)
> Label2.Caption = Format$(tempotmp& \ 3600000, "00") & ":" &
> Format$(((tempotmp& - (tempotmp& \ 3600000) * 3600000)) \ 60000, "00") &
> ":" & Format$((tempotmp& - (tempotmp& \ 60000) * 60000) / 1000, "00.000")
> label3.Caption = tempotmp&
> Loop Until Command1.Caption = "Start"
>
> il mio problema è che quando aziono il cronometro i controlli che si
> trovano nella maschera non riesco più ad usarli, como posso risolvere il
> problema ??
> Grazie
> Marco
Dubito fortemente che inserire un Loop di questo tipo ti renda disponibili
i Comandi se non via API....!
Declare Function GetAsyncKeyState Lib "user32" Alias _
        "GetAsyncKeyState" (ByVal vKey As Long) As Integer
Sfrutta invece del Loop l'Evento Timer impostato come credi e vedrai che
li funziona.
Per il DEMO API vai sul mio sito alla Sezione API FAQ 1.30
Inserire ESCAPE in un Loop
Ovviamente puoi inserire altri Key, ma non ControlKey, per quelli devi
SubClassare
ed è meglio che lasci perdere...!!!
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: Do events blocca la maschera

text:
"MarcoBa" <
produ...@pica.it
> ha scritto nel messaggio
news:db8mk0$hag$1...@news.newsland.it...
> ho inserito in una maschera con più controlli un cronometro al centesimo
> trovato sul sito comune, il quale sfrutta la funzione Do Event,
> esattamente
>
> queste sono le dichiarazioni
>
> Private Declare Function GetTickCount Lib "kernel32" () As Long
> Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
>
> e questo il ciclo
>
> Do: DoEvents
> tempotmp& = GetTickCount - Inizio
> Sleep (5)
> Label2.Caption = Format$(tempotmp& \ 3600000, "00") & ":" &
> Format$(((tempotmp& - (tempotmp& \ 3600000) * 3600000)) \ 60000, "00") &
> ":" & Format$((tempotmp& - (tempotmp& \ 60000) * 60000) / 1000, "00.000")
> label3.Caption = tempotmp&
> Loop Until Command1.Caption = "Start"
>
> il mio problema è che quando aziono il cronometro i controlli che si
> trovano nella maschera non riesco più ad usarli, como posso risolvere il
> problema ??
> Grazie
> Marco
>
> --
 Ciao Marco
ho riprodotto il codice e fatto qualche modifica, ora funziona ma dovrai
adattarlo alle tue esigenze:
Private Declare Function GetTickCount Lib "kernel32" () As Long
Private Declare Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)
Private Sub Comando3_Click()
Me.Command1.Caption = "STOP"
End Sub
Private Sub Command1_Click()
Dim tempotmp&, Inizio
Inizio = 0
While Command1.Caption = "Start"
tempotmp& = GetTickCount - Inizio
Sleep (5)
Label2.Caption = Format$(tempotmp& \ 3600000, "00") & ":" & _
Format$(((tempotmp& - (tempotmp& \ 3600000) * 3600000)) \ 60000, "00") & _
":" & Format$((tempotmp& - (tempotmp& \ 60000) * 60000) / 1000, "00.000")
Label3.Caption = tempotmp&
DoEvents
Wend
End Sub
Ciao, Carlo


title: leggere i dati da tessera sanitaria ed inserirli in una tabella

author: Cesare Briglia

text:
Da qualche tempo ho realizzato un programma per la refertazione degli
esami endoscopici (a proposito chi fosse interessato può scrivermi
perchè ho intenzione di distribuirlo...)
Mi hanno chiesto di inserire i dati angrafici inserendo la tessera
sanitaria del paziente in un lettore smart card (minilector EVO). Ho
cercato nella rete ma praticamente non ho risolto nulla.  Un lungo
listato (praticamente l'unico che si trova in giro ) rimane fermo perchè
sono solo dichiarazioni di variabili (Forse sono incapace di vedere il
punto d'inizio?). Se qualcuno di voi non ha nulla da fare (perchè a casa
con il covid o mosso da spirito didattico o da pietà informatica)
potrebbe darmi delle indicazioni di massima (for dummies) sul come
leggere i dati dalla tessera sanitaria ed inserirli in una tabella di
access?

grazie dell'attenzione
BC


author: BFS

text:

avevo provato qualche tempo fa
trovi la discussione qui

https://it.comp.appl.access.narkive.com/Ixab2qHj/leggere-da-smart-card

il codice funziona solo che legge solo i primi 150 caratteri e non ho
trovato il modo di leggere tutto il contenuto...

se vuoi provarci tu

alla fine per risolvere mi ero apoggiato ad un programmino esterno (a
pagamento)..una sorta di agent che appena il contenuto della smart card
viene letto salva tutto in un txt

quindi da access vado a leggermi il contenuto e amen

BFS


text:

questo è il software se vuoi risolvere velocemente

https://shop.nexustech.it/home/4-tessera-sanitaria-cns-nexcode3.html

BFS


author: RobertoA

text:

Ma quanti caratteri ci stanno nella memoria tessera sanitaria?
Nel senso, da primo esempio si leggono 150 caratteri, e col programma
quanti ne vengono fuori?


text:

con il programma esterno si leggono anche luogo di nascita, data di
nascita e altre info
mentre con il codice che avevo trovato io si leggono solo 150 caratteri
e i rimanenti del buffer di risposta sono sempre vuoti

il protocollo usato è il APDU

https://it.wikipedia.org/wiki/Application_Protocol_Data_Unit

alla fine ci avevo riunciato visto che le ore perse per traovare una
soluzione iniziavano ad essere parecchie

BFS


text:
Il 15/07/2022 14:19, BFS ha scritto:

ho meditato quanto mi hai segnalato ma, (vista la mia colossale
ignoranza..) ma non riesco a ricomporre il codice che è tutto frammentato...

Inizia con

Private Declare Function SCardTransmit Lib "WinScard.dll" ( _
ByVal hCard As Long, _
ByRef pioSendRequest As SCARD_IO_REQUEST, _
ByRef sendbuff As Byte, _
ByVal SendBuffLen As Integer, _
ByRef pioRecvRequest As SCARD_IO_REQUEST, _
ByRef RecvBuff As Byte, _
ByRef RecvBuffLen As Integer) As Long

e  poi sono tutti frammenti di esempio che anche riuniti non funzionano...

se ho ben capito è una funzione che deve essere chiamata p. es da un
pulsante di una maschera (?)
abbi pazienza (tanta), pur avendo realizzato diversi programmi, "cose"
del genere  non le ho mai incontrate .
grazie ancora per l'attenzione
BC


text:
Il 17/07/2022 22:13, Cesare Briglia ha scritto:

> (vista la mia colossale ignoranza..)

ti consiglio allora di acquistare il programmino che fa quasi tutto da
solo. il costo è minimo

https://shop.nexustech.it/home/4-tessera-sanitaria-cns-nexcode3.html

ciao
BFS


author: BF Soluzioni

text:
Il 15/07/2022 12:58, Cesare Briglia ha scritto:

Io ho avuto quasi lo stesso problema. Ho fatto un programma che tramite
il codice fiscale mi cerca un cliente e se non c'è, lo inserisce come
nuovo prendendo dal codice fiscale la data di nascita, il sesso, il
comune di nascita. Invece del lettore smartcard, ho usato un banalissimo
lettore barcode e ho risolto senza problemi.

--
Questa e-mail è stata controllata per individuare virus con Avast antivirus.
https://www.avast.com/antivirus


text:
> Io ho avuto quasi lo stesso problema. Ho fatto un programma che tramite
> il codice fiscale mi cerca un cliente e se non c'è, lo inserisce come
> nuovo prendendo dal codice fiscale la data di nascita, il sesso, il
> comune di nascita. Invece del lettore smartcard, ho usato un banalissimo
> lettore barcode e ho risolto senza problemi.
>

comprendo, però:
1) lavoro su "roba" che mi danno e ho messo le mani sul lettore perchè
ne hanno acquistati un po' nell'ambito di un tentativo di
migliorare/complicare l'accesso al sistema NOIPA
2) non è il mio lavoro (sembra strano ma faccio o per lo meno cerco di
fare il medico)
3) la mia azienda ha le braccine corte...
4) ripeto: chi volesse il programma per refertare gli esami endoscopici
mi deve solo scrivere...

ecco perchè non cercavo la pappa scodellata e pronta ma qualcosa su cui
lavorare senza fare un corso di APDU..
Comunque grazie ancora dell'attenzione

BC


text:

senza offesa Cesare...
è difficile aiutarti cosi.

non vuoi la "pappa pronta"

non vuoi spendere 60 euro per un software che fa quello che chiedi ed è
integrabile nella tua applicazione

vuoi "qualcosa su cui lavorare" ma del codice che ti ho postato non
capisci neppure dove inizia e come usarlo. non è che chiedi di fare da
codice la cosa più banale del mondo.

chiedi "potrebbe darmi delle indicazioni di massima (for dummies) "

Ad ogni modo le indicazioni di massima sono:
devi leggere da una smartcard e quindi devi usare "winscard.dll"

per inviare comandi alla smart card:
https://docs.microsoft.com/en-us/windows/win32/api/winscard/nf-winscard-scardconnecta

per interrogare una tessera sanitaria devi usare il protocollo APDU
https://wisnu.id/notes/developing-apdu-sender-using-winscard/

devi tradurre in vba quanto sopra

oppure cambiare linguaggio
in pyton questo è il codice per fare quanto chiedi
https://www.mmxforge.net/index.php/sviluppo/python/item/9-lettura-dei-dati-della-tessera-sanitaria-con-python

ti fai un agent che appena la tessera viene inserita viene letta e il
risultato salvato in txt. Da access vai a leggerti il txt e compili i
campi della persona

BFS


text:
Il 20/07/2022 18:01, Cesare Briglia ha scritto:
>

"..3) la mia azienda ha le braccine corte..."

E allora resta senza programma esami endoscopici
Anche se, onestamente, mi sembra altamente improbabile che possano
ignorare comprendere la convenienza di spendere qualche centinaia di
euro per una procedura che potrebbe migliorare l'operativita'


text:
Il 21/07/2022 08:16, RobertoA ha scritto:
> "..3) la mia azienda ha le braccine corte..."
>
> E allora resta senza programma esami endoscopici
> Anche se, onestamente, mi sembra altamente improbabile che possano
> ignorare comprendere la convenienza di spendere qualche centinaia di
> euro per una procedura che potrebbe migliorare l'operativita'
>
Senza contare che il lettore barcode mi è costato 21 euro...
Non mi sembra una spesa eccessiva...



title: Corrispondenza di Datatype

author: IO

text:
Ciao a tutti,
qualcuno potrebbe essere così gentile da darmi una correlazione tra i
datatype di SQL (MS va benissimo) e di Access?
Non ho ben chiaro perché un campo testo di Access ha in SQL almeno 3 tipi di
formati char, varchar, nchar...
Grazie


title: Lo sò che voi preferireste Jonah Falcon...

author: Pablitomf (da casa)

text:
ma sto F�rlan non � niente male.
--
----------------------------------------------
FORZA NAPOLI SEMPRE
----------------------------------------------
 "Non lottare mai con um maiale - vi infangate entrambi,
ed il maiale si diverte.."
Never wrestle with a pig: You both get all dirty, and the pig likes it.


author: CIDI

text:
"Pablitomf (da casa)" <
pabl...@hotmail.it
> ha scritto nel messaggio
news:6VDGn.57294$Ua....@twister2.libero.it...
> ma sto F�rlan non � niente male.
Forl�n non � male ...dopo la doppietta della finale lo vorranno tutti.....
prenotalo per il Napoli :DD
a Mauriiii che lo fai apposta? ;-)
ciao
Daniele


author: pablitomf

text:
On 12 Mag, 23:38, "CIDI" <
dadonz...@spamtin.it
> wrote:
> "Pablitomf (da casa)" <
pablit...@hotmail.it
> ha scritto nel messaggionews:6VDGn.57294$Ua....@twister2.libero.it...
>
> > ma sto Fòrlan non è niente male.
>
> Forlàn non è male ...dopo la doppietta della finale lo vorranno tutti.....
> prenotalo per il Napoli :DD
>
> a Mauriiii che lo fai apposta? ;-)
>
> ciao
> Daniele
uhauhauahuhauha Danièèèè.... è che ho i 2 NG uno attaccato
all'altro...  e spesso mi sbaglio!!!!
Mi pareva strano che nessuno m'avesse risposto!
Sorry :D
PS
Menomale che non hai googolato per capire chi fosse Jonah :D
(ovviamente era dedicato agli amici di iscn, con i quali si scherza
abbiano determinate tendenze, non a voi :D)


text:
"pablitomf" <
pabl...@virgilio.it
> ha scritto nel messaggio
news:25bbc1ac-f9bb-4b92...@l28g2000yqd.googlegroups.com...
On 12 Mag, 23:38, "CIDI" <
dadonz...@spamtin.it
> wrote:
> "Pablitomf (da casa)" <
pablit...@hotmail.it
> ha scritto nel
> messaggionews:6VDGn.57294$Ua....@twister2.libero.it...
>
> > ma sto F�rlan non � niente male.
>
> Forl�n non � male ...dopo la doppietta della finale lo vorranno tutti.....
> prenotalo per il Napoli :DD
>
> a Mauriiii che lo fai apposta? ;-)
>
> ciao
> Daniele
uhauhauahuhauha Dani����.... � che ho i 2 NG uno attaccato
all'altro...  e spesso mi sbaglio!!!!
Mi pareva strano che nessuno m'avesse risposto!
Sorry :D
PS
Menomale che non hai googolato per capire chi fosse Jonah :D
(ovviamente era dedicato agli amici di iscn, con i quali si scherza
abbiano determinate tendenze, non a voi :D)
e chi l'ha detto?....io leggo tutto di icaa e non solo, chiedi ad Alex, e tu
pensi
potesse sfuggirmi il tuo? eccome se ho googolato!!!  in primis avevo pensato
ad
una storpiatura del nome di Falcao....ma visto il risultato ho preferito
tacere,
si sa mai..... chi legge pu� farsi delle idee sbagliate .... uhauhauhauha
.. :DD
ciao Maur�...sbaglia pure ....;-)
tanto Datolo l'avete ....anche per l'anno prossimo *__*
Daniele


text:

Ciao Dani�.... saluti a figlia e famiglia.


title: Chiudere una maschera di "menu"

author: Luca

text:
ciao a tutto il ng,
e' possibile chiudere una maschera che funge da menů dopo aver premuto un
pulsante in essa che mi fa aprire una maschera di dinserimento dati?
Grazie
Luca
--------------------------------
Inviato via
http://usenet.libero.it


title: Chiudere una maschera di "menu"

author: MA

text:
Il 17 Giu 2003, 13:19,
pi...@libero.it
 (Luca) ha scritto:
> ciao a tutto il ng,
>
> e' possibile chiudere una maschera che funge da menů dopo aver premuto un
> pulsante in essa che mi fa aprire una maschera di dinserimento dati?
>
> Grazie
>
> Luca
>
Dopo aver aperto la 2 mascgěhera
docmd.close "Tuamascheramenu", acsaveno
ciao MAssimiliano



title: password maschera...

author: Gianni

text:
Salve a tutti .......una criosità.....
è possiblie assegnare una password ad una maschera senza aplicarla al
db...?!
Cioè io vorrei che una data maschera non sia accessibile a tutti è
possibile?! è se è possibile come potrei procedere..
Grazie a tutti
Gianni.


title: password maschera...

author: sittinghorse

text:
"Gianni" <
giian...@bluewin.ch
> ha scritto nel messaggio
news:3d12f...@news.bluewin.ch...

> Penso che sia possibile anche in modo semplice: basta che crei una piccola
porzione di codice VBA che gestisca l'accesso alla maschera.
Puoi usare diverse strategie: o ti crei una tabella in cui salvi la password
per l'accesso alla maschera (ovviamente ti conviene usare un algoritmo che
cripti la password)  e nel momento della richiesta di accesso con una msgbox
chiedi la pwd e fai fare un match con i dati della tabella pwd o generi,
alla base del db, una routine che gestisca i diritti degli utenti che si
loggano oppure ti servi degli strumenti di protezione di access e generi dei
gruppi di lavoro con i relativi diritti (ma in questo io non posso darti una
mano perchè ho sempre provveduto diversamente senza utilizzare gli strumenti
di protezione access).
Fammi sapere se quanto ti ho scritto ti complica ulteriormente la vita o se
ti è utile, se ti dovesse complicare la vita riscrivimi e cercherò di
aiutarti in qualche altro modo.
Saluti da sittinghorse
---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (
http://www.grisoft.com
).
Version: 6.0.370 / Virus Database: 205 - Release Date: 05/06/02


title: password maschera...

author: Guggenheim

text:
Sul sito comune c'è l'esempio di un login con password puoi utilizzare quel
codice per la tua maschera
ciao
Gugge
"Gianni" <
giian...@bluewin.ch
> ha scritto nel messaggio
news:3d12f...@news.bluewin.ch...



title: password maschera...

author: Emyr

text:
On Fri, 21 Jun 2002 11:40:55 +0200, "Gianni" <
giian...@bluewin.ch
>
wrote:

imposta una pasword da codice sull'evento su apertura o vedi la
protezione utente assegnado i vari diritti, vedi su sitocomune.,com i
vari esempi
Saluti.
Emanuele.


title: password maschera...

text:
"Emyr" <
fan...@lavoro.com
> ha scritto nel messaggio
news:u416hug3408c1gf6v...@4ax.com...

Ciao Emanuele gra^zie della tua risposta ,ma vedi forse mi sono spiegato
male,il mio db deve essere accessibile a tutti perchè se devo impostare le
pass per un centinaio di persone è un casino io ho fatto in modo di
nascondere tutto è lasciare solo ilnecessario a tutti quelli che mettono
dati dentro il db è lasciare la possibilità ad altri di poter controllare in
qualsiasi momento quello che è successo durante la giornata di lavoro,è un
db chiamiamolo di Informazione Giornaliera di quello che succede nell'arco
di tempo (48 ore) di un turno di lavoro,il mio unico problema è che nessuno
o almeno una sola persona sia in grado di manipolare i dati tramite una
maschera di correzione o di eliminazione dei dati......
grazie comunque ma la protezione a livello utente non è nel mio caso..
Ciao
Gianni.


title: password maschera...

text:
"Guggenheim" <
gugge...@iol.it
> ha scritto nel messaggio
news:IYGQ8.46477$Kt3.1...@twister2.libero.it...
> Sul sito comune c'č l'esempio di un login con password puoi utilizzare
quel
> codice per la tua maschera
>
> ciao
> Gugge
> "Gianni" <
giian...@bluewin.ch
> ha scritto nel messaggio
> news:3d12f...@news.bluewin.ch...
> > Salve a tutti .......una criositą.....
> > č possiblie assegnare una password ad una maschera senza aplicarla al
> > db...?!
> > Cioč io vorrei che una data maschera non sia accessibile a tutti č
> > possibile?! č se č possibile come potrei procedere..
> > Grazie a tutti
> > Gianni.
> >
> >
>
>
Si lo visto anchio ma non ci ho caito un ' H
di come poterlo mettere in pratica.
Hai qualche idea??
Ciao
Gianni


title: password maschera...

author: Maicol

text:
"Gianni" <
giian...@bluewin.ch
> ha scritto nel messaggio
news:3d12f...@news.bluewin.ch...

> Potresti provare cosi  : Se la password e' pippo
Sull'evento su apertura della maschera
if inputbox("Inserire password")<>"pippo" then cancel=true


title: password maschera...

text:
"Maicol" <
enzo...@libero.it
> ha scritto nel messaggio
news:73hR8.54003$Kt3.1...@twister2.libero.it...

Grazie Maicol provero' subbito
Ciao
Gianni


title: password maschera...

text:
On Sat, 22 Jun 2002 16:05:01 +0200, "Gianni" <
giian...@bluewin.ch
>
wrote:

e perchè?
non potresti lasciare le maschere aperte solo in visualizzazione dati
con la modifica dati impostata a false e creare delle maschere
apposite per la modifica dei dati? potresti quindi usare la protezione
utente.
comunque ti avevo detto di mettere anche una richiesta password in
apertura maschere se la password è errata consenti la visualizzazione
e non la modifica dei dati
Saluti.
Emanuele.


title: password maschera...

text:
"Gianni" <
giian...@bluewin.ch
> wrote in message
news:3d12f...@news.bluewin.ch

Spero di non insultarti proponendoti quanto segue:
Soluzione A (vai sulla maschera solo se conosci la psw)
1. Sulla maschera di origine (Apertura) metti un pulsante.
2. Sul click del pulsante:
   If InputBox("Password", "Password", "", 0, 0) = "m@ilgate" Then
   DoCmd.Close acForm, "Apertura"
   DoCmd.OpenForm "Admin", acNormal, windowmode:=acWindowNormal
   End If
3. Nascondere la maschera “Admin”
Soluzione B (meno efficace, se l'utente è smaliziato)
1. Sulla maschera che intendi proteggere (Admin), sull'evento apertura
   form:
   If InputBox("Password", "Password", "", 0, 0) <> "m@ilgate" Then
   DoCmd.Close acForm, "Admin"
   End If
Le varianti, sulle due soluzioni, dovrebbero essere in grado di
tutelarti dai più sprovveduti.
Ciao, Michele
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: help per un file cue

text:
salve a tutti...ho un file cue da masterizzare ma il mio master non supporta
cdrwin, avete idea si si possa convertire in qualche modo in file iso? cosě
potrei masterizzarlo con nero.
grazie a tutti


title: vorrei impostare un timer.

text:
Chiedo una cortesia, avrei bisogno di sapere se è possibile impostare un
time sul database in modo che se non si lavora per un determinato periodo di
tempo, questo si chiuda automaticamente (close).
Dove posso impostare questo tipo di timer?
Come posso fare?
voglio ringraziare chi potrà aiutarmi.


title: vorrei impostare un timer.

author: Federico Luciani

text:

a mio parere le variabili da gestire sono troppe, io proverei a gestire lo
screen saver di windows
--
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: vorrei impostare un timer.

author: Dominijanni Giuseppe

text:
mauro06 wrote:

Per una o più maschere:
1- Anteprima tasti: Si . Con No non funziona
2- Dim bolKey As Boolean ' variabile Booleana che determina se l'operatore
sta lavorando
3- Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
     bolKey = True ' ad ogni digitazione assegna True alla variabile
  End Sub
4- Private Sub Form_Timer()
     If bolKey = True Then
          bolKey = False
     Else
          DoCmd.Quit
     End If
      End Sub
5- Nella proprietà, Intervallo time: imposta il tempo che il db deve
rimanere aperto se non si digita.
giuseppe


title: vorrei impostare un timer.

text:
Dominijanni Giuseppe" <
edq...@tin.it
> ha scritto nel messaggio
news:3AA95AAC...@tin.it...
> 1- Anteprima tasti: Si . Con No non funziona
> 2- Dim bolKey As Boolean ' variabile Booleana che determina se l'operatore
> sta lavorando
> 3- Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
>      bolKey = True ' ad ogni digitazione assegna True alla variabile
>   End Sub
> 4- Private Sub Form_Timer()
>      If bolKey = True Then
>           bolKey = False
>      Else
>           DoCmd.Quit
>      End If
>       End Sub
> 5- Nella proprietà, Intervallo time: imposta il tempo che il db deve
> rimanere aperto se non si digita.
> giuseppe
Ti ringrazio Giuseppe del tuo suggerimento. Ho provato e funziona
perfettamente. C'è solo un dettaglio che vorrei tu mi aiutassi a sviluppare.
Con l'istruzione che tu mi hai dato, il valore True per bolKey, viene
aggiornato solo quando lavoro sulla maschera su cui ho impostato la
funzione. (che nel mio caso è una maschera di Menu iniziale che rimane
sempre aperta).
C'è la possibilità di fare in modo che se io stò lavorando con un'altra
maschera, il valore di bolKey continui ad essere impostato a True.
In poche parole, c'è il modo di evitare che se stò lavorando su una maschera
diversa da quella su cui è impostata la funzione, mi si chiuda tutto per
effetto del timer che ho impostato su una maschera aperta contemporaneamente
e su cui non stò lavorando.?
Ti ringrazio per il tuo prezioso aiuto.
Grazie
Mauro.


title: vorrei impostare un timer.

author: Giuseppe

text:
prova a modificare il codice nel seguente modo per tutte le maschere
interessate:
- la Proprietā Anteprima tasti : No
nel modulo della maschera digitare:
- Dim bolKey As Boolean
Nell'evento Su attivazione:
- Private Sub Form_Activate()
   Me.KeyPreview = True
  End Sub
Nell'evento Su disattivazione:
- Private Sub Form_Deactivate()
 Me.KeyPreview = False
 End Sub
Nell'evento Su tasto gių:
- Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
 bolKey = True
  End Sub
Nell'evento Su timer:
- Private Sub Form_Timer()
  If Me.KeyPreview = False Then
    Exit Sub
  Else
    If bolKey = True Then
        bolKey = False
    Else
        DoCmd.Close
    End If
 End If
 End Sub
Su intervallo timer
- imposta il tempo che il db deve rimanere aperto se non si premono tasti
(1000 equivale a un   secondo).
Quando la maschera acquista lo stato attivo la Proprietā Anteprima tasti
diventa True e l'evento Su timer verifica l'intervallo di tempo tra due
tasti gių.
Quando la maschera perde lo stato attivo la Proprietā Anteprima tasti
diventa False e l'evento Su timer perde la funzione di controllo.
Giuseppe
p.s.
per il webmaster:
la soluzione esposta pensi si possa pubblicare nel sito comune ?


title: vorrei impostare un timer.

text:
"Giuseppe" <
ebq...@tin.it
> ha scritto nel messaggio
news:%kxq6.5456$x3.1...@news2.tin.it...
> prova a modificare il codice nel seguente modo per tutte le maschere
[CUT]
Ti ringrazio Giuseppe della tua collaborazione, per quanto dovevo realizzare
io č tutto OK.
grazie ancora e saluti
MAURO


title: Query Arrotondare al Multiplo superiore

author: Arsenio

text:
Nel'atto pubblico
news:3E39101C...@company.com
, il Sig.
Cesco <
jsm...@company.com
>,  comprovando temporanea infermità
mentale scrisse:
> Ciao a tutti,
>
> In una query ho prelevato alcuni valori:
> Data_Fatture=31/10/2002
> [Forms]![Genera Fatture]![Data_Fatture]=30/01/2003
>
> Mesi_Trascorsi: Year([Forms]![Genera
> Fatture]![Data_Fatture])*12+Month([Forms]![Genera
>
Fatture]![Data_Fatture])-(Year([Ultima_Fatt])*12+Month([Ultim
a_Fatt]))
>
> Mesi_Trascorsi= 3
>
> E fino qui tutto OK
>
> Premetto che ho anche una tabella fatta Così:
>
> IDPag     Tipo_Pagamento   Fattore_Divisione     Mesi
> 1             Mensile                 12
1
> 2             Bimestrale              6
2
> 3             Trimestrale             4
3
> 4             Quadrimestrale       3
4
> 5             Semestrale             2
6
> 6             Annuale                 1
> 12
>
> Mesi_Trascorsi dovrebbe diventare il multiplo della colonna
Mesi della
> tabella sopra indicata, quindi in questo caso
>
> Mesi_Trascorsi= 4 che poi dividendo per il campo Mesi mi da
la rata o
> le rate che mi deve pagare
>
> quindi nel caso specifico di un Pagamento BIMESTRALE dovrei
ricavare:
>
> Mesi_Trascorsi= 1        --> deve diventare: Numero_Rate= 1
> Mesi_Trascorsi= 2        --> deve diventare: Numero_Rate= 1
> Mesi_Trascorsi= 3        --> deve diventare: Numero_Rate= 2
> Mesi_Trascorsi= 4        --> deve diventare: Numero_Rate= 2
> Mesi_Trascorsi= 5        --> deve diventare: Numero_Rate= 3
> Mesi_Trascorsi= 6        --> deve diventare: Numero_Rate= 3
> Mesi_Trascorsi= 7        --> deve diventare: Numero_Rate= 4
> Mesi_Trascorsi= 8        --> deve diventare: Numero_Rate= 4
> Mesi_Trascorsi= 9        --> deve diventare: Numero_Rate= 5
> Mesi_Trascorsi= 10        --> deve diventare: Numero_Rate=
5
> Mesi_Trascorsi= 11        --> deve diventare: Numero_Rate=
6
> Mesi_Trascorsi= 12        --> deve diventare: Numero_Rate=
6
>
> quindi nel caso specifico di un Pagamento TRIMESTRALE
dovrei ricavare:
>
> Mesi_Trascorsi= 1        --> deve diventare: Numero_Rate= 1
> Mesi_Trascorsi= 2        --> deve diventare: Numero_Rate= 1
> Mesi_Trascorsi= 3        --> deve diventare: Numero_Rate= 1
> Mesi_Trascorsi= 4        --> deve diventare: Numero_Rate= 2
> Mesi_Trascorsi= 5        --> deve diventare: Numero_Rate= 2
> Mesi_Trascorsi= 6        --> deve diventare: Numero_Rate= 2
> Mesi_Trascorsi= 7        --> deve diventare: Numero_Rate= 3
> Mesi_Trascorsi= 8        --> deve diventare: Numero_Rate= 3
> Mesi_Trascorsi= 9        --> deve diventare: Numero_Rate= 3
> Mesi_Trascorsi= 10        --> deve diventare: Numero_Rate=
4
> Mesi_Trascorsi= 11        --> deve diventare: Numero_Rate=
4
> Mesi_Trascorsi= 12        --> deve diventare: Numero_Rate=
4
>
> quindi nel caso specifico di un Pagamento QUADRIMESTRALE
dovrei
> ricavare:
>
> Mesi_Trascorsi= 1        --> deve diventare: Numero_Rate= 1
> Mesi_Trascorsi= 2        --> deve diventare: Numero_Rate= 1
> Mesi_Trascorsi= 3        --> deve diventare: Numero_Rate= 1
> Mesi_Trascorsi= 4        --> deve diventare: Numero_Rate= 1
> Mesi_Trascorsi= 5        --> deve diventare: Numero_Rate= 2
> Mesi_Trascorsi= 6        --> deve diventare: Numero_Rate= 2
> Mesi_Trascorsi= 7        --> deve diventare: Numero_Rate= 2
> Mesi_Trascorsi= 8        --> deve diventare: Numero_Rate= 2
> Mesi_Trascorsi= 9        --> deve diventare: Numero_Rate= 3
> Mesi_Trascorsi= 10        --> deve diventare: Numero_Rate=
3
> Mesi_Trascorsi= 11        --> deve diventare: Numero_Rate=
3
> Mesi_Trascorsi= 12        --> deve diventare: Numero_Rate=
3
>
> e così via... insomma i mesi trascorsi mi influenzano le
rate ma in
> maniera anticiapata, quindi il valore Mesi_Trascorsi
> dovrà essere più vicino alla rata sucessiva ed in base al
tipo di
> pagameto.
>
> Se qualcuno di buon cuore mi sa dare un linea di soluzione
dentro la
> query o con l'utilizzo di qualche funzione.
>
> Grazie a tutti per l'attenzione
>
> Ciao Cesco
Secondo me potresti fare in modo di dividere i mesi trascorsi
per la periodicità ed eliminare la parte frazionaria del
risultato applicando la funzione ROUND o ARROTONDA (vedi
help - se non funziona ARROTONDA usa ROUND con lo stesso
criterio)
es. rata quadrimestrale
mesi trascorsi 11 ---->>> fai 11 fratto 4 e con la funzione
ROUND o ARROTONDA arrotondi il risultato al numero senza
decimali (11/4 = 2.75 ---- ROUND([il_campo_con_il
risultato_della frazione];0) che da come risultato 2
Ciao
--
Arsenio Lupin
ICQ: 168741021
Togliere LEMANIDALNASO per rispondere in e-mail


title: Query Arrotondare al Multiplo superiore

author: Cesco

text:
Ok, ho risolto con il vecchio
Function ArrIva(Dinero As Double) As Double
'Arrotonda l'importo dell'iva alla lira superiore
   If Dinero / Int(Dinero) > 1 Then
      ArrIva = Int(Dinero) + 1
   Else
      ArrIva = Int(Dinero)
   End If
End Function
che penso sia la setssa cosa.
Ciao e grazie



title: Prime armi: collegamenti tra le tabelle.

author: songohan

text:
Ciao, vi estraggo alcune righe dal testo 'Guida all'uso di Microsoft Access
2000' della Microsoft Press, Cap.4 pag.101
Creazione di collegamenti fra tabelle.
L'ultimo passo per la progettazione del database è la creazione dei
collegamenti fra le tabelle. Per ogni argomento, identifica le tabelle per
le quali hai scritto 'Molti' nella colonna 'Relazioni' del foglio di lavoro.
Accertati che la relazione corrispondente per l'altra tabella sia 'Uno'. Se
vedi molti in entrambe le tabelle, devi creare una tabella di intersezione
separata per gestire la relazione (non puoi definire direttamente una
relazione molti-a-molti fra due tabelle).
[...]
Dopo aver definito le relazioni molti-a-molti, devi creare i collegamenti
fra le tabelle. Per completare i collegamenti, inserisci una copia della
chiave primaria delle tabelle 'uno' in un campo delle tabelle 'molti'.
Ecco, non riesco a capire perchè i collegamenti vanno fatti solo tra tabelle
uno-a-molti e non anche molti-a-molti.
Mi fate per favore esempi concreti e chiari? E perchè c'è bisogno di un
effettivo collegamento tramite chiave primaria?
A che scopo?
Scusate la semplicità delle domande, ma dal capitolo 5 comincierò a lavorare
con Access e non vorrei partire con il piede sbagliato.
Grazie a tutti.


author: Sib dal portatile

text:
"songohan" <
no...@nowhere.com
> ha scritto nel messaggio
CUT
> Ecco, non riesco a capire perchè i collegamenti vanno fatti solo tra
tabelle
> uno-a-molti e non anche molti-a-molti.
> Mi fate per favore esempi concreti e chiari? E perchè c'è bisogno di un
> effettivo collegamento tramite chiave primaria?
> A che scopo?
Facciamo un esempio pratico:
Tabella clienti: contiene ovviamente tutti i clienti e ogni cliente ha una
chiave primaria (non spiego cos'e' perche' presuppongo che tu l'abbia
capito)
Tabella servizi: contiene l'insieme dei tipi di servizi che tu offri ai tuoi
clienti. Anche in questa tabella e' definita una chiave primaria.
Ora, e' abbastanza evidente che un cliente possa essere collegato a uno o
piu' (quindi molti) servizi. Analogamente, un servizio puo' essere collegato
a piu' clienti.
Ergo: hai una relazione molti a molti.
Ora, se instauri una relazione tra le due tabelle collegandole direttamente
dovrai mettere un campo in una delle due che faccia riferimento al campo ID
(chiave primaria) dell'altra.
Questo ti portera' ad avere un collegamento uno a molti di una tabella
rispetto all'altra e quindi otterrai una relazione che non soddisfa le tue
esigenze.
Quello che devi fare e' creare una terza tabella che contenga due campi, uno
collegato col campo ID dell'una e l'altro collegato col campo ID dell'altra.
In questo modo otterrai la relazione molti a molti che ti serve:
TabCli        TabCollegamento    TabServ
IDCL  1-------M  IDCL
                IDSERV M--------1 IDSERV
So che non e' di immediata comprensione, ma tant'e'...
Sib
----------------------------------------------------
la mia home:
http://digilander.iol.it/syb
----------------------------------------------------
il sito comune di it.comp.database.access:
http://www.sitocomune.com
----------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente


text:
> Ora, se instauri una relazione tra le due tabelle collegandole
direttamente
> dovrai mettere un campo in una delle due che faccia riferimento al campo
ID
> (chiave primaria) dell'altra.
> Questo ti portera' ad avere un collegamento uno a molti di una tabella
> rispetto all'altra e quindi otterrai una relazione che non soddisfa le tue
> esigenze.
> Quello che devi fare e' creare una terza tabella che contenga due campi,
uno
> collegato col campo ID dell'una e l'altro collegato col campo ID
dell'altra.
> In questo modo otterrai la relazione molti a molti che ti serve:
>
> TabCli        TabCollegamento    TabServ
> IDCL  1-------M  IDCL
>                 IDSERV M--------1 IDSERV
>
> So che non e' di immediata comprensione, ma tant'e'...
Ti ringrazio. Ho capito il problema, se metto in relazione due tabelle
molti-a-molti perdo la possibilità di reperire qualche tipo di informazione
quando ad es. non solo un cliente ha ordinato più libri ma quando uno stesso
libero è stato ordinato da più clienti....Perdo ovvero uno dei due
collegamenti possibili.
Grazie, spero che la pratica mi renda più....pratico in queste cose :-D


text:
"songohan" <
no...@nowhere.com
> ha scritto nel messaggio
CUT
> Grazie, spero che la pratica mi renda più....pratico in queste cose :-D
In realta' e' un problema di "teoria". Cioe' e' proprio il concetto che
bisogna comprendere. La pratica viene dopo.
Ciao
Sib
--



text:
"Sib dal portatile" <
sibN...@iol.it
> ha scritto nel messaggio
news:YEcL6.10673$RX4.6...@news.infostrada.it...
> "songohan" <
no...@nowhere.com
> ha scritto nel messaggio
> CUT
> > Grazie, spero che la pratica mi renda più....pratico in queste cose :-D
>
> In realta' e' un problema di "teoria". Cioe' e' proprio il concetto che
> bisogna comprendere. La pratica viene dopo.
Ed infatti è ciò che sto cercando di fare :-D e pare ci stia
riuscendo....anche il perchè i collegamenti possono instaurarsi solo tra
tabelle in relazione uno-a-molti.
Cmq saturiamo ECHELON: saddam attentato bomba ira eta fbi bomba bin laden


title: Aiuto ! Ho un problema con il maledetto APOSTROFO :-)

text:
Ho un recordset che devo filtrare in base a un campo :
recoset.filter = "mio_campo = '" & k "'" dove k e' il
valore di volta in volta.

Purtroppo k puo' contenere l' apostrofo e sapete bene
che in quel caso salta tutto.

Voi che siete vecchi volponi conoscete qualche trucco
per aggirare il problema ?

Altrimenti mi tocca fare una routine che sostituisce
l' apostrofo con un altro carattere in ogni record ogni
santa volta.

Grazie


text:
Usare il REPLACE...? (Attento ai concatenatori di Stringa... servono)

recoset.filter = "mio_campo = '" & REPLACE(k,"'","''") & "'"

Saluti
@Alex


text:
Il giorno giovedì 26 marzo 2015 16:46:53 UTC+1, @Alex ha scritto:
> Usare il REPLACE...? (Attento ai concatenatori di Stringa... servono)
>
> recoset.filter = "mio_campo = '" & REPLACE(k,"'","''") & "'"

Grandissimo maestro :-)
Grazie !


text:
Il giorno giovedì 26 marzo 2015 16:46:53 UTC+1, @Alex ha scritto:
> Usare il REPLACE...? (Attento ai concatenatori di Stringa... servono)
>
> recoset.filter = "mio_campo = '" & REPLACE(k,"'","''") & "'"

Pero' scusa ... In effetti perche' funziona ?

In teoria se io ho : mio_campo = "D'Alida", io con quella formula
costruisco :
where mio_campo = 'D''Alida'  e siccome D'Alida e' diverso da
D''Alida il record corrispondente a quel valore dovrebbe andare
fuori filtro.

Invece ?


author: Karl Donaubauer

text:
Salve,

Radicale.002 ha scritto:

... c'è una regola nel SQL:
Se ci sono due apostrofi di seguito uno prende il ruolo dell'escape
character che dice al motore di database di non più considerare
l'apostrofo come parte dell'istruzione della query (delimitatore) ma
come parte della stringa da ricercare (literale).

--
Ciao
Karl
*********
Access FAQ:
http://www.donkarl.com/it

Access Lobby:
http://www.AccessDevelopers.org


text:
Il giorno giovedì 2 aprile 2015 14:15:17 UTC+2, Karl Donaubauer ha scritto:
> Salve,
>
> Radicale.002 ha scritto:
> > @Alex ha scritto:
> >> Usare il REPLACE...? (Attento ai concatenatori di Stringa... servono)
> >>
> >> recoset.filter = "mio_campo = '" & REPLACE(k,"'","''") & "'"
> >
> > Pero' scusa ... In effetti perche' funziona ?
> >
> > In teoria se io ho : mio_campo = "D'Alida", io con quella formula
> > costruisco :
> > where mio_campo = 'D''Alida'  e siccome D'Alida e' diverso da
> > D''Alida il record corrispondente a quel valore dovrebbe andare
> > fuori filtro.
> >
> > Invece ?
>
> ... c'è una regola nel SQL:
> Se ci sono due apostrofi di seguito uno prende il ruolo dell'escape
> character che dice al motore di database di non più considerare
> l'apostrofo come parte dell'istruzione della query (delimitatore) ma
> come parte della stringa da ricercare (literale).

Hops ! Ti ringrazio !


title: AIUTOOOOOOOOOOOOOO!!!!!!!!!!!!!!

author: Spectrumit

text:
Ciao a tutti, sono un nuovo iscritto al newsgroup ed anche un "novello"
sviluppatore in Access. Avrei un problema da sottoporre e ringrazio in
anticipo chiunque me lo possa risolvere. Sto sviluppando un database che ha
una maschera per la selezione dei clienti, la cui origine dei dati é una
query, poiché i dati di costoro arrivano da più tabelle, per motivi che non
sto qui a spiegare. Io voglio fare una finestra di dialogo per la selezione
dei clienti, attivabile da questa maschera tramite pulsante, che mi permetta
di selezionare e deselezionare, tramite caselle di controllo, i clienti che
corrispondono a certi criteri, ad esempio, solo i clienti giapponesi ( e
quindi ci sarà un rettangolo che conterrà una listbox con l'elenco degli
Stati più due caselle di controllo, "seleziona" e "deseleziona"), con magari
solo macchine idrauliche (altro rettangolo, altra listbox con l'elenco dei
tipi di macchina, altre due caselle di controllo), di una certa marca (idem,
ma con l'elenco delle marche), e naturalmente che rimanga possibile fare
tutte le combinazioni (solo stati, solo macchine, solo marche oppure solo
stato e macchina, solo stato e marca o solo macchina e marca). Se qualcuno
fosse capace di dirmi il codice VBA che mi permetta di eseguire questo tipo
di operazione, gli sarei proprio grato.
Alessandro.


title: AIUTOOOOOOOOOOOOOO!!!!!!!!!!!!!!

author: AntoGal

text:
Spectrumit <
alexp...@virgilio.it
> scrisse...
> Ciao a tutti, sono un nuovo iscritto al newsgroup ed anche un "novello"
Una regola è di usare dei subject descrittivi... :-)
> una maschera per la selezione dei clienti, la cui origine dei dati é una
> query, poiché i dati di costoro arrivano da più tabelle, per motivi che
non
> sto qui a spiegare. Io voglio fare una finestra di dialogo per la
selezione
> dei clienti, attivabile da questa maschera tramite pulsante, che mi
permetta
> di selezionare e deselezionare, tramite caselle di controllo, i clienti
che
> corrispondono a certi criteri
E' una domanda un po' troppo generica, magari spiega meglio qual è il
problema che non riesci a risolvere.
Comunque, in linea di massima, al pulsante associ qualcosa tipo:
DoCmd.OpenForm "MskFiltro", , , , , acDialog
Poi alla chiusura di questa maschera (per es. cliccando sul pulsante Esci
che hai predisposto), costruisci la stringa filtro in base alle opzioni
scelte e imposti la proprietà Filtro della maschera Clienti.
Forms!MskClienti.Form.Filter = strFiltro
Forms!MskClienti.Form.FilterOn = True 'aggiorna visualizzazione
La stringa filtro te la costruisci dinamicamente rispettando la sintassi
(come il WHERE di SQL).
Ad esempio, nella tua maschera di scelta avrai un codice tipo questo:
strFiltro = ""
if Me!ChkClientiCategoriaA = True Then
 strFiltro = "TipoCliente = 'A'"
Else
 strFiltro = "TipoCliente = 'B'"
End If
If Not Isnull(Me!Anno) Then
 strFiltro = strFiltro & " AND Anno=" & Me!Anno
End If
ecc....
Alla fine la stringa filtro sarà qualcosa tipo
strFiltro = "TipoCliente = 'A' AND Anno = 1999 AND (Colore = 'Giallo' OR
Colore = 'Nero')"
--
Ciao, AntoGal
*************************************************
Gestione punti vendita (casse e pos NCR)

www.powerretail.it
-------------------------------------------------------------
per scaricare un gioco di DAMA ITALIANA
http://volftp.mondadori.com/italiani/galletta/
*************************************************


title: Errore nel Debug

author: Napoleone

text:
Ho effettuato il debug, con questo codice, e tutto è filato liscio:
--------
Option Compare Database
Private Sub ABILITA_Click()
Me.aggiungiprodotto.Visible = False
Me.eliminaprodotto.Visible = False
Me.nGiacIni.Visible = False
For Each ctl In Me.Controls
        If ctl.Tag = "X" Then ctl.Enabled = False
    Next
End Sub
---------------------
poi ho aggiunto Option Explicit:
----
Option Compare Database
Option Explicit
Private Sub ABILITA_Click()
Me.aggiungiprodotto.Visible = False
Me.eliminaprodotto.Visible = False
Me.nGiacIni.Visible = False
For Each ctl In Me.Controls
        If ctl.Tag = "X" Then ctl.Enabled = False
    Next
End Sub
-----
e mi segnala errore di compilazione:
Variabile non definita
e mi si punta su ctl nella settima riga di codice
Cosa viene modificato?
Napoleone


title: Errore nel Debug

author: Sandro Peruz

text:
"Napoleone" <
napole...@libero.it
> ha scritto nel messaggio
news:dnyuf.27278$eD5.4...@twister2.libero.it...

Ciao Grande,
hai imposto la dichiarazione obbligatoria delle variabili, ti manca:
dim ctl as control,
un saluto, Sandro


title: Errore nel Debug

author: sv

text:
Napoleone ha scritto:






> Cosa viene modificato?
> Napoleone
Ti sei dimenticato di esplicitare ctl
.
.
Dim ctl as Control
For
.
.
Next
--
Salvino
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Errore nel Debug

text:
"sv" <
sal...@nosp.accessgroup.it
> ha scritto nel messaggio
news:dpedro$hfk$1...@news.newsland.it...

Buon Anno ad entrambi e lunga vita!
...
Adesso è OK
Napoleone


title: Pdfcreator e sito comune....

text:
Ciao, ho scaricato l'esempio sul sito comune ed ho installato pdf
creator ma sul mio pc non riesco a trovare il file .ini....
Ho visto alcuni massaggi precedenti con lo stesso quesito ma non sono
riuscito a capire come risolverlo (installazione con useini....)
Mi sapete aiutare?
Grazie
Ciao.


title: Pdfcreator e sito comune....

author: Cinzia

text:

Ciao ant.81,
dai un'occhiata a questo 3d:
http://groups.google.it/group/it.comp.appl.access/browse_thread/thread/d6e23e3e509842e9
--
Cinzia
---------------------------------------
|
http://www.riolab.org
  |
---------------------------------------


title: Pdfcreator e sito comune....

text:
Cinzia ha scritto:

ok grazie ma.....non conoscendo VB per me andava meglio l'utilizzo del
file ini...
Cosa si intende per mettere come riferimento alla classe pdf creator?
Ciao


title: Pdfcreator e sito comune....

text:
ant...@virgilio.it
 wrote:
> Cinzia ha scritto:
>
>>
ant...@virgilio.it
 wrote:
>>> Ciao, ho scaricato l'esempio sul sito comune ed ho installato pdf
>>> creator ma sul mio pc non riesco a trovare il file .ini....
>>> Ho visto alcuni massaggi precedenti con lo stesso quesito ma non
>>> sono riuscito a capire come risolverlo (installazione con
>>> useini....)
>>> Mi sapete aiutare?
>>> Grazie
>>> Ciao.
>>
>> Ciao ant.81,
>> dai un'occhiata a questo 3d:
>>
http://groups.google.it/group/it.comp.appl.access/browse_thread/thread/d6e23e3e509842e9
>>
>
> ok grazie ma.....non conoscendo VB per me andava meglio l'utilizzo del
> file ini...
senza conoscere VBA anche il file INI non sarebbe stato semplice
> Cosa si intende per mettere come riferimento alla classe pdf creator?
Si intende da un modulo VB andare su strumenti - Riferimenti e selezionare
l'elemento PDF Creator dall'elenco che compare.



title: LENTEZZA APERTURA DATI

author: Jax

text:
Chiedo scusa se l'argomento risulta troppo facile, ma ho un problema che non
riesco a risolvere.
Ho creato un programma in rete suddiviso in 2 (BE e FE)
Il problema è che quando più programmi client (FE residenti sulle varie
postazioni) attingono ai dati salvati sul server (BE) diventano lentissimi.
C'è la possibilità di velocizzarli in qualche modo (i FE non attingono - di
norma -agli stessi record aperti da altri utenti).
Grazie mille per la disponibilità.


title: LENTEZZA APERTURA DATI

author: Potone

text:
"Jax" <
no...@nospam.it
> ha scritto nel messaggio news:fna0a.136232$0v.38...@news1.tin.it...

Potrebbe essere un problema di congestione e di velocità della rete (10 o 100 mbs?).
Inoltre dipende molto anche da come attingi ai dati: se richiami un record alla volta o meno, se apri direttamente le tabelle o usi
query che aprono diverse tabelle.
Ciao,
Mat.


title: LENTEZZA APERTURA DATI

text:
> Potrebbe essere un problema di congestione e di velocità della rete (10 o
100 mbs?).
> Inoltre dipende molto anche da come attingi ai dati: se richiami un record
alla volta o meno, se apri direttamente le tabelle o usi
> query che aprono diverse tabelle.
> Ciao,
> Mat.
>
la rete è a 100 mbs, per quanto riguarda le tabelle uso tabelle collegate e
query che mano a mano mi servono.
Hai una soluzione, o cmq qualcosa che possa aiutarmi ?
Ciao e grazie.


title: LENTEZZA APERTURA DATI

author: Simone Calligaris

text:
"Jax"

Però dovresti guardare i post dei giorni precedenti.
E' stato postato questo link che contiene consigli interessanti (anche se in
parte già si evincono dall'help).
http://www.granite.ab.ca/access/a2kslow.htm


title: eliminare record

author: pensieroso

text:
Mi sto cimentando (più per curiosità che necessità) nella creazione di una
database per la gestione degli iscritti, con relativi pagamenti, di una
palestra.
Ho una query "Abbonamenti Scaduti"
SELECT [iscritti].[Cognome], [iscritti].[Nome], [pagamenti].[Data scadenza],
[pagamenti].[Descrizione], [pagamenti].[IdIscritto],
[pagamenti].[IdPagamento]
FROM iscritti INNER JOIN pagamenti ON
[iscritti].[IdIscritto]=[pagamenti].[IdIscritto]
WHERE ((([pagamenti].[Data scadenza])<=Date()));
che mi restituisce un record per ogni "pagamento" scaduto (quindi se un
iscritto ha effettuato due pagamenti per due corsi diversi appare due volte)
e fin qui mi va bene.
Ho aggiunto un pulsante che consenta di modificare i dati (quindi rinnovare
l'abbonamento) e ne vorrei inserire uno nel caso in cui l'iscritto non
intenda più frequentare quel corso...
Solo che non riesco a capire come associare l'azione di eliminazione di un
record specifico.
Per completezza di info, ho una maschera "tabulare" per la query
sopracitata.
Grazie
Gianluca


title: eliminare record

author: Sergio MAZZA

text:
"pensieroso" <
pensieroso...@gmail.com
> ha scritto nel messaggio
news:44ffe3d6$0$30240$4faf...@reader1.news.tin.it...

Devi indicare nella condizione where un valore che identifichi in modo
univoco il record da eliminare. Se per esempio hai un campo Id di tipo
contatore univoco la query di eliminazione potrebbe essere:
'---
Dim strSQL as string
strSQL = "Delete * From Iscritti Where id = " & Me!id
Docmd.RunSQL strSQL
'---
Ciao.
--
Sergio MAZZA


title: errore nell'apertura di qualsiasi elemento

author: Millo

text:
Una ricerca sull'argomento restituisce solo un vecchio post dell'inizio
2005 che comunque aveva ricevuta la *solita* risposta demente ed
irrisolvente.
Lo scenario che si propone è che fino al tentativo di apertura di un db
per un forum, funzionante su web e scaricato in locale per controllo,
(e tutt'ora perfettamente funzionante sul web) l'access 2002 installato
sul mio PC andava benissimo, dopo di questo evento ogni tentativo di
apertura di una tabella (anche precedentemente creata correttamente) mi
genera un errore "sconosciuto".
Installazione, reinstallazione, risoluzione conflitti etc non ha risolto
il problema, immagino che bisogna indagare in altra direzione.
Qualcuno ha idea di dove?
TIA
--
Per far danni sul serio mi occorre la tua password di root ;)


author: Roberto da casa

text:
"Millo" <mi...@fatti.miei> ha scritto nel messaggio
news:44j203F...@individual.net...
> Una ricerca sull'argomento restituisce solo un vecchio post dell'inizio
> 2005 che comunque aveva ricevuta la *solita* risposta demente ed
> irrisolvente.
[CUT]
Perdonami, ma se ritieni che in questo NG a fronte dei quesiti non si riesca
ad ottenere che "la *solita* risposta demente ed  irrisolvente" perché
continui a frequentarlo ed a perdere tempo a porre i tuoi quesiti qui?
So che riterrai "demente ed irrisolvente" anche la mia domanda, ma la mia
curiosità è tale da portela, nella speranza che tu mi risponda in maniera
"intelligente e risolutiva".
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


text:
Roberto da casa ha scritto:
>
> Perdonami, ma se ritieni che in questo NG a fronte dei quesiti non si riesca
> ad ottenere che "la *solita* risposta demente ed  irrisolvente" perché
> continui a frequentarlo ed a perdere tempo a porre i tuoi quesiti qui?
...forse perché speravo che dall'inizio del 2005 ad oggi i dementi come
te si fossero allontanati dal gruppo?



text:
"Millo" <mi...@fatti.miei> ha scritto nel messaggio
news:44jnrnF...@individual.net...
> Roberto da casa ha scritto:
>
> >
> > Perdonami, ma se ritieni che in questo NG a fronte dei quesiti non si
riesca
> > ad ottenere che "la *solita* risposta demente ed  irrisolvente" perché
> > continui a frequentarlo ed a perdere tempo a porre i tuoi quesiti qui?
>
> ...forse perché speravo che dall'inizio del 2005 ad oggi i dementi come
> te si fossero allontanati dal gruppo?
Già, e poi chi l'aiuta gente come te che ha bisogno di essere aiutata da
persone dementi come me?
Ciao genio.



author: MA

text:
Roberto da casa wrote:
> "Millo" <mi...@fatti.miei> ha scritto nel messaggio
> news:44jnrnF...@individual.net...
>> Roberto da casa ha scritto:
>>
>>>
>>> Perdonami, ma se ritieni che in questo NG a fronte dei quesiti non
>>> si riesca ad ottenere che "la *solita* risposta demente ed
>>> irrisolvente" perché continui a frequentarlo ed a perdere tempo a
>>> porre i tuoi quesiti qui?
>>
>> ...forse perché speravo che dall'inizio del 2005 ad oggi i dementi
>> come te si fossero allontanati dal gruppo?
>
> Gią, e poi chi l'aiuta gente come te che ha bisogno di essere aiutata
> da persone dementi come me?
>
> Ciao genio.
Roberto no n evale la pena.
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: Form di Login (Access vs Sql Server)

author: Giorgio VE

text:
Chi mi aiuta ad impostare la stringa di connessione da Access vs SQL Server
(installato su server) in VBA dove da un form Access (di login) l'utente mi
possa passa userid e passwrd?
grazie 10000000000000000
(tdf.connect = "ODBC;Database = nomedb; UID=nome user; PWD= password; DSN"
tdf.refreshlink)
PS: mi segnala errore " Invalid Operation "(error 3219)
gio


title: Form di Login (Access vs Sql Server)

author: Antonio Ganci

text:
Giorgio VE wrote:
[CUT]
>
> (tdf.connect = "ODBC;Database = nomedb; UID=nome user; PWD= password;
> DSN" tdf.refreshlink)
> PS: mi segnala errore " Invalid Operation "(error 3219)
>
> gio
Nella stringa manca il DSN.
DSN = nome dsn
lo trovi nell'elenco degli ODBC.
Ti conviene utilizzare una stringa ADO:
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=nome file;Persist Security
Info=False
Questa va bene per Access dovresti cercare nella documentazione per
SQL-Server.


title: Form di Login (Access vs Sql Server)

text:
> Nella stringa manca il DSN.
>
> DSN = nome dsn
>
> lo trovi nell'elenco degli ODBC.
> Ti conviene utilizzare una stringa ADO:
>
> Provider=Microsoft.Jet.OLEDB.4.0;Data Source=nome file;Persist Security
> Info=False
>
> Questa va bene per Access dovresti cercare nella documentazione per
> SQL-Server.
>
Grazie ma, causa mia ignoranza, non ho capito molto bene!
gio


title: Form di Login (Access vs Sql Server)

author: Damiano Zorzi

text:
"Giorgio VE" <
barb...@gieffenet.it
> ha scritto nel messaggio
news:SVmh9.115879$pX1.4...@news2.tin.it...

Esempio di stringa di connessione (la sto utilizzando proprio ora):
TDF.Connect = "ODBC;DRIVER=SQL
Server;UID=sa;SERVER=Damiano;DATABASE=BetaLab;"


title: Report per stampa rubrica

author: RobertOne

text:
Buon giorno a tutto il n.g.
Premetto che non so come impostare questa funzione. Ho la necessità di
stampare una rubrica telefonica formata da 6 campi. Vorrei poter scegliere
tramite una casella combinata, per esempio tutti gli utenti il cui cognome
inizi per la lettera A. Stampare solo gli utenti selezionati ed avere in
alto a destra la lettera iniziale che in questo caso è la lettera A.
A vostro avviso come potrei procedere? Per quanto riguarda i report sono
abbastanza a digiuno...!
Grazie per l'attenzione.
Roberto


title: Report per stampa rubrica

text:
RobertOne ha scritto:



> Grazie per l'attenzione.
> Roberto
In sezione download di
http://www.accessgroup.it
 trovi l'esempio.
--
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: Report per stampa rubrica

text:
"sv"  ha scritto nel messaggio ...
>
> In sezione download di
http://www.accessgroup.it
 trovi l'esempio.
>
> --
> rgrds
> SC
Grazie per l'indicazione. Il programma è molto bello e fatto bene ma non fa
al caso mio, prima di tutto perchè ho la necessità di inserire 2 numeri di
telefono fisso, 2 di cellulare ed 1 di fax e tale programma non mi permette
di modificarlo secondo le mie necessità in quanto se non erro è protetto.



title: Report per stampa rubrica

text:

Erri, se fosse stato protetto non l'avremmo pubblicato.
Lancialo tenendo premuto il maiuscolo
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: Report per stampa rubrica

text:
RobertOne ha scritto:


> Grazie per l'attenzione.
> Roberto
Secondo me non l'hai visto abbastanza.
Richiama la maschera di inserimento e controlla se vi sono limiti
all'inserimento di fax, telefono, cellulari o e-mail.
La maschera Contatti contiene quattro sottomaschere in visualizzazione
maschere continue.
Puoi inserire tutti i dati che vuoi.



title: Report per stampa rubrica

text:
"sv"  ha scritto nel messaggio ...
>
> Secondo me non l'hai visto abbastanza.
> Richiama la maschera di inserimento e controlla se vi sono limiti
> all'inserimento di fax, telefono, cellulari o e-mail.
> La maschera Contatti contiene quattro sottomaschere in visualizzazione
> maschere continue.
> Puoi inserire tutti i dati che vuoi.
>
> --
> rgrds
> SC
>
>
> --
>
> questo articolo e` stato inviato via web dal servizio gratuito
>
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it
Avete ragione... sono stato più veloce con le dita che con il cervello...!
Grazie e scusate.
Roberto


title: Report per stampa rubrica

text:
RobertOne ha scritto:
> "sv"  ha scritto nel messaggio ...
> >
> > Secondo me non l'hai visto abbastanza.
> > Richiama la maschera di inserimento e controlla se vi sono limiti
> > all'inserimento di fax, telefono, cellulari o e-mail.
> > La maschera Contatti contiene quattro sottomaschere in visualizzazione
> > maschere continue.
> > Puoi inserire tutti i dati che vuoi.
> Avete ragione... sono stato più veloce con le dita che con il cervello...!
> Grazie e scusate.
Di niente...
Nota che il report è proprio come tu lo cercavi.
> Roberto



title: Report per stampa rubrica

text:
"sv"  ha scritto nel messaggio ...
> Nota che il report è proprio come tu lo cercavi.
>
Effettivamente credo che il report sia come quello che sto cercando. Siccome
nella mia rubrica ho inserito questi parametri; Utente, Tel 1, Tel 2, Cel 1,
Cel 2 e fax, non ho bisogno del cognome, indirizzo, città etc. etc. ed ho
cercato di copiare sul mio db tale report, con esito zero...
In sintesi, ho bisogno di un report che mi dia la possibilità di
visualizzare e successivamente di stampare tutti gli utenti appartenenti ad
un gruppo, esempio, tutti quelli il cui cognome inizia per A. Il massimo
sarebbe poter stampare la lista utenti, selezionando la lettera iniziale.
I risultati che ottengo, non mi dividono la lista utenti in base alla
lettera iniziale e non capisco perchè mi ritrovo un foglio scritto ed uno
no, in pratica mi salta sempre un foglio rendendomelo bianco.
Grazie.
Roberto


title: Report per stampa rubrica

text:
RobertOne wrote:
> "sv"  ha scritto nel messaggio ...
>
>> Nota che il report è proprio come tu lo cercavi.
>>
>
> Effettivamente credo che il report sia come quello che sto cercando.
> Siccome nella mia rubrica ho inserito questi parametri; Utente, Tel
> 1, Tel 2, Cel 1, Cel 2 e fax, non ho bisogno del cognome, indirizzo,
> città etc. etc. ed ho cercato di copiare sul mio db tale report, con
> esito zero...
>
> In sintesi, ho bisogno di un report che mi dia la possibilità di
> visualizzare e successivamente di stampare tutti gli utenti
> appartenenti ad un gruppo, esempio, tutti quelli il cui cognome
> inizia per A. Il massimo sarebbe poter stampare la lista utenti,
> selezionando la lettera iniziale.
Creati un campo calcolato
Pippo:Left(nome;1)
e coome criterio ci metti forms!tuaform!tuocontrollo chiaramente
personalizzando i nomi
>
> I risultati che ottengo, non mi dividono la lista utenti in base alla
> lettera iniziale e non capisco perchè mi ritrovo un foglio scritto ed
> uno no, in pratica mi salta sempre un foglio rendendomelo bianco.
I margini della pagina sono troppo larghi rispetto a quello che vuoi
stampare e lui sfora di una pagina
>
> Grazie.
>
> Roberto



title: Report per stampa rubrica

text:
"MA"  ha scritto nel messaggio ...
>
> Creati un campo calcolato
> Pippo:Left(nome;1)
> e coome criterio ci metti forms!tuaform!tuocontrollo chiaramente
> personalizzando i nomi
> I margini della pagina sono troppo larghi rispetto a quello che vuoi
> stampare e lui sfora di una pagina
Scusa Massimiliano, ma al report devo fare riferimento ad una query? Che
form dovrei mettere nel campo calcolato che andrò a creare? Devo costruire
una form che ricerchi tutti gli utenti, per esempio, il cui nome inizi per A
e successivamente con un pulsante lanciare il report? Scusami ma non mi è
molto chiara la situazione.
Grazie.
Roberto


title: Report per stampa rubrica

text:
RobertOne wrote:
> "MA"  ha scritto nel messaggio ...
>>
>> Creati un campo calcolato
>> Pippo:Left(nome;1)
>> e coome criterio ci metti forms!tuaform!tuocontrollo chiaramente
>> personalizzando i nomi
>> I margini della pagina sono troppo larghi rispetto a quello che vuoi
>> stampare e lui sfora di una pagina
>
>
> Scusa Massimiliano, ma al report devo fare riferimento ad una query?
Se vai nella struttura del report e vai nella proporietą "origine "
vedrai che puoi indicare o semplicemente il nome della tabella/query gią
salvata
o crearti una "select ...
> Che form dovrei mettere nel campo calcolato che andrņ a creare? Devo
> costruire una form che ricerchi tutti gli utenti, per esempio, il cui
> nome inizi per A e successivamente con un pulsante lanciare il
> report? Scusami ma non mi č molto chiara la situazione.
Dipende se tu vuoi tutti i nomi ordinati con la lettera puoi crearti un
raggruppamento
sul campo calcolato



title: Report per stampa rubrica

text:
RobertOne ha scritto:


> Grazie.
> Roberto
Continuo ad insistere che non la vedi bene l'applicazione.
Se vai in stampa vedrai che ti propone una maschera con un elenco
di valori che filtrano il report in questione.
L'elenco dei valori sono "*", e con questo hai tutti i record
dell'archivio e con "A*", "B*" etc. per avere le stampe di
solo quei record che iniziano per A, B etc..
Quella maschera ti permette pure di stampare una copertina
personalizzata.
Controlla...



title: Report per stampa rubrica

text:
"sv" ha scritto nel messaggio ...
>
> Continuo ad insistere che non la vedi bene l'applicazione.
> Se vai in stampa vedrai che ti propone una maschera con un elenco
> di valori che filtrano il report in questione.
> L'elenco dei valori sono "*", e con questo hai tutti i record
> dell'archivio e con "A*", "B*" etc. per avere le stampe di
> solo quei record che iniziano per A, B etc..
> Quella maschera ti permette pure di stampare una copertina
> personalizzata.
> Controlla...
Ed avevi ragione... Sono riuscito ad esportare la maschera ed il report che
menzioni quì sopra e li ho adattati secondo le mie esigenze.
Grazie ancora e scusate se sono un pò duro...!


title: Grafici e click

author: Michele Salcone

text:
Salute a tutti.

Mi trovo a smanettare con i grafici in Access 2016. Ho letto già qualcosina in giro e credo che si tratti dei grafici NON modern (se non ho inteso male, sono disponibili da A2019) e NON pivot (sempre se non ho inteso male, sono stati deprecati).

Innanzi tutto son partito da una tabella molto semplice:
Anno | Valore1 | Valore2 | Valore3.
Da questa ho creato una form ed ho inserito l'oggetto grafico:
- Classe OLE: Microsoft Graph Chart
- Classe: MSGraph.Chart.8
Ho selezionato un tipo di grafico "a colonne in pila", in modo da avere una colonna per ogni anno, con le varie sezioni grafiche ad identificare i valori 1 2 3 di quell'anno.

Fin qui tutto semplice e veloce, ma mi sono arenato nell'interazione col grafico. Mi spiego. Se voglio modificare/filtrare i dati in esso contenuto, modifico l'origine riga con una diversa istruzione SQL ed access mi visualizza il grafico correttamente aggiornato.

Ma se volessi associare una routine VBA al click/doppio click su una colonna o su una parte di essa? Non trovo i riferimenti esatti!!! Come faccio a sapere se ho cliccato sulla colonna contenente il Valore3 dell'anno 2018?

Ringrazio chiunque voglia/possa aiutarmi.
Michele


title: Grafici e click

text:

I riferimenti che ho trovato sono i seguenti:
Me.NomeGrafico.SeriesCollection(1).Interior.Color = vbYellow
Me.NomeGrafico.SeriesCollection(1).Points(4).Interior.Color = vbRed

La prima istruzione permette di assegnare un colore a tutta la serie n° 1 (nella tabella precedente, la serie Valore1)
La seconda istruzione permette di assegnare un colore ad una sola colonna, o parte di essa.

Ciò che servirebbe è un'istruzione tipo/intercettare un valore tipo:
Me.NomeGrafico.SeriesCollection(1).Points(4).IsSelected

Grazie


title: ritornare al controllo lasciato

author: Stefano LD

text:
Ciao a tutti...
Ho una maschera diciamo con 3 caselle di testo... premendo un pulsante si
apre un'altra maschera.. ora chiudendo la maschera vorrei che un dato
venisse scritto nell ultima casella di testo che ero prima di premere il
pulsante...
Sapete dirmi come devo fare??
grazie


title: ritornare al controllo lasciato

author: Roberto - Syd

text:
"Stefano LD" <
lodu...@yahoo.it
> ha scritto nel messaggio
news:9m72k4$9dd$1...@nreadb.inwind.it...

Sull'evento chiusura della maschera che si apre facendo click su di un
pulsante inserisci questa istruzione:
Forms![NomeDellaMascheraCheContieneLe3CaselleDiTesto]![NomeDellaCasellaDiTes
to]="QuelloCheVuoiScrivere"
Ciao Roberto - Syd


title: ritornare al controllo lasciato

author: CarloCos

text:
"Stefano LD" <
lodu...@yahoo.it
> ha scritto nel messaggio
news:9m72k4$9dd$1...@nreadb.inwind.it...

Una strada:
Crea una variabile globale di tipo stringa (NomeControllo).
Quando clicchi il pulsante che apre l'altra maschera genera il seguente
codice prima della riga che effettivamente apre la maschera:
NomeControllo =
Screen.PreviousControl.Name
Alla chiusura della seconda maschera scrivi:
    DoCmd.SelectObject acForm, "NomePrimaMaschera"
    DoCmd.GoToControl NomeControllo
    DoCmd.Close acForm, "SecondaMaschera"
La sintassi per chiudere la seconda maschera deve essere completa...non
dimenticarlo.
Ciao, Carlo


title: ritornare al controllo lasciato

author: Karl Donaubauer

text:
Stefano LD<
lodu...@yahoo.it
> ha scritto:
> Ho una maschera diciamo con 3 caselle di testo... premendo un pulsante si
> apre un'altra maschera.. ora chiudendo la maschera vorrei che un dato
> venisse scritto nell ultima casella di testo che ero prima di premere il
> pulsante...
Puoi usare l'argomento OpenArgs di OpenForm.
Sul clic del pulsante:
DoCmd.OpenForm "SecondoForm", OpenArgs:=
Screen.PreviousControl.Name
OnClose del secondo form:
Forms("PrimoForm")(Me.OpenArgs) = IlTuoDato
--
HTH
Karl
*********
Non meravigliarti del mio strano italiano. M'esercito qui.
Access-FAQ (tedesco):
http://www.donkarl.com


title: ritornare al controllo lasciato

text:
Scusa l'oggetto del post mi ha tratto in inganno.
La risposta va corretta in:
    DoCmd.SelectObject acForm, "NomePrimaMaschera"
    DoCmd.GoToControl NomeControllo
    Sendkeys Forms!SecondaMaschera!NomeControllo, True
    DoCmd.Close acForm, "SecondaMaschera"
Ciao, Carlo


title: @@identity

author: signorotto

text:
ho un problemino....
se io faccio una insert in una tabella, e la chiave primaria viene
creata automaticamente essendo un contatore, come faccio poi con
certezza a sapere qual'č il valore di quella chiave??
in M$ sql 7 se non ricordo male bisognava fare una cosa simile a
select @@identity from tabella
in access si puň? e come?
www.signorotto.org


title: @@identity

author: Antonio Biso

text:
signorotto <
pad...@freemail.it
> wrote in message
dfofmtkcja5d6huoh...@4ax.com...

Beh, se la ricerca la fai subito dopo l'inserimento ovviamente il valore č
il massimo dei valori del campo contatore. Quindi con una DMax("[ID
Chiave]","Miatabella") c'hai quello che cerchi
Antonio


title: @@identity

author: Expo

text:
"Antonio Biso" <
ch...@etruria.net
> ha scritto nel messaggio
news:FGS97.3952$_07.1...@news.infostrada.it...

Oppure fai la dmax e poi fai un'insert settando il contatore al valore della
dmax.
Piů sicuro di cosě....


title: query di aggiornamento

author: CIDI

text:
ciao a tutti

W7 A2007
tabella Temp:
IDprogetto
Fondo1 - valuta

tblProgetti
IDProgetto
Fondo- Valuta

la tabella Temp contiene un solo record
vorrei aggiornare valore del campo Fondo della tblProgetti
col valore del campo Fondo1 della tab Temp

queste la query provata...
da una query di selezione su tab Temp
SELECT temp.IDProgetto, temp.Fondo1
FROM temp;

ho aggiunto la tblProgetti
e trasformata in query di aggiornamento mi da questo SQL:

UPDATE temp INNER JOIN tblProgetti ON temp.IDProgetto =
tblProgetti.IDProgetto SET temp.Fondo1 = [tblProgetti].[Fondo];
che però non aggiorna il campo Fondo della tblProgetti.

ho provato anche:
UPDATE tblProgetti INNER JOIN temp ON tblProgetti.IDProgetto =
temp.IDProgetto SET temp.Fondo1 = [tblProgetti].[Fondo];
è sempre il campo Fondo1 della tab Temp ad essere modificato.
spero nel vostro aiuto per trovare l'errore
Grazie

Daniele

--- news://
freenews.netfront.net/
 - complaints:
ne...@netfront.net
 ---


title: query di aggiornamento

text:

risolto con:
UPDATE temp INNER JOIN tblProgetti ON temp.IDProgetto =
tblProgetti.IDProgetto SET tblProgetti.Fondo = [temp].[Fondo1];

scusate
buona domenica



title: selezionare valore in maschere continue

author: Massimo

text:
Ho una maschera in vis. continue che in base ad un mio filtro si apre e mi
mostra correttamente i record selezionati.
La mia richiesta e quella di ricavare il valore massimo e quello minimo di
una serie di record che ho filtrato nell'apertura della maschera
Es
data                      luogo
01/01/2001          Bologna
02/02/2001          Modena
03/03/2001          Reggio Emilia
devo ricavare 01/01/2001 come valore minimo e 03/03/2001 come valore
massimo.
Sper di essermi fatto capire.
Saluti Massimo


title: selezionare valore in maschere continue

author: Roberto dal portatile

text:
"Massimo" <
ron...@tiscalinet.it
> ha scritto nel messaggio
news:9e428r$vvv$1...@pegasus.tiscalinet.it...

Se l'origine record della tua maschera si chiama Tabella1.
Se hai filtrato la tua maschera usando le sue proprietą Filter e FilterOn a
fronte dell'evento "Su apertura".
Inserisci nell'intestazione della maschera due caselle di testo non
associate e chiamale rispettivamente DataMassima e DataMinima, quindi a
fronte dell'evento "Su caricamento" della maschera genera il seguente codice
VBA:
Me!DataMassima = DMax("[Data]", "Tabella1", Me.Filter)
Me!DataMinima = DMin("[Data]", "Tabella1", Me.Filter)
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: selezionare valore in maschere continue

text:
"Roberto dal portatile" <
r.ma...@repubblica.it
> ha scritto nel messaggio
news:9e5e3e$tr2$1...@stargate1.inet.it...

Ne frattempo ho provato in questa maniera:
ho inserito due caselle e nell'origine dati ho inserito =Max([data]) in una
e =Min([data]) .
Funziona bene, pensi che sia meglio come mi hai spiegato ho posso lasciare
come ho fatto io ?
1000 grazie Max