title: Cos'e' sto' SELECT CASE

author: Karl Donaubauer

text:
"xxx" <
wa...@wappi.com
> ha scritto:...
> non lo trovo neanche nell'help di Access.
> Come funziona?
Se hai A00 o AX vai al Visual Basic Editor (VBE) e poi <F1>
Ce anche:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbenlr98/html
/vastmselectcase.asp
o un piccolo esempio:
Dim strNome As String
strNome = "xxx"
Select Case strNome
    Case "Federico", "Sergio", "Roberto", "Silvio" ' ecc.
        MsgBox "Nomi classici."
    Case "xxx"
        MsgBox "Povero ragazzo - genitori inescusabili!"
    Case Else
        MsgBox "Non conosciuto."
End Select
--
HTH
Karl
*********
Non meravigliarti del mio strano italiano. M'esercito qui.
Access-FAQ (tedesco):
http://www.donkarl.com


title: Cos'e' sto' SELECT CASE

text:
"xxx" <
wa...@wappi.com
> ha scritto:...
> non lo trovo neanche nell'help di Access.
> Come funziona?
Se hai A00 o AX vai al Visual Basic Editor (VBE) e poi <F1>
Ce anche:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vbenlr98/html
/vastmselectcase.asp
o un piccolo esempio:
Dim strNome As String
strNome = "xxx"  'questo debbi cambiare per provare Select...Case
Select Case strNome
    Case "Federico", "Sergio", "Roberto", "Silvio" ' ecc.
        MsgBox "Nome classico."
    Case "xxx"
        MsgBox "Povero ragazzo - genitori inescusabili!"
    Case Else
        MsgBox "Nome non conosciuto."



title: Criptare Decriptare dati sensibili

author: Carlo Costarella

text:
Di seguito una funzione per criptare o decriptare i dati sensibili di
un'ipotetica tabella "Clienti" che contiene dati sensibili.
La funzione può essere applicata a qualsiasi tabella modificando
opportunamente il codice. Può essere eseguita all'apertura e alla chiusura
del db o all'apertura di una maschera lasciando sempre criptati i dati e
decriptandoli solo su rischiesta e con password.
I suoi limiti sono nell'impossibilità di criptare campi di testo superiori a
255 caratteri o vuoti; pertanto accertatevi che queste caratteristiche siano
rispettate.
Fate sempre una copia del db con i dati perchè se qualcosa va storto non
posso assumermi responsabilità.
Per la realizzazione ho utilizzato in parte il codice messo a disposizione
da Dima Mnushkin
Option Compare Database
Option Explicit
Const PASSWORD_KEY = "QuEStA ChIaVe12345PassAT"
'modificare la chiave con una a piacimento
'================================================
' Function: encrypt
'
' Purpose:  To encrypt or decrypt a string using
'           a predefined key value stored as
'           the constant PASSWORD_KEY.  The same
'           string encrypted twice won't always
'           look the same because the function
'           chooses a random starting position
'           within the key to encrypt values.
'
' Call:     gResult = encryt("Hello World", true)
'
' In:       strFull -   String containing the
'                       text to encrypt/decrypt
'
'           fEncrypt -  Boolean set to TRUE to
'                       encrypt the string, FALSE
'                       to decrypt it.
'
' Out:      none
'
' Returns:  String -    The encrypted/decrypted
'                       value if successful, ""
'                       otherwise
'
' History:  98/06/10 created by Dima Mnushkin
'
'================================================
Public Function encrypt(strFull As String, _
                   fEncrypt As Boolean) As String
On Error GoTo Err_encrypt
Dim intInputPos As Integer
Dim intPassKeyPos As Integer
Dim strOutput As String
Dim intTemp As Integer
Dim strStartingPos As String
If strFull = "" Then GoTo Exit_encrypt
' Encrypt a value
If fEncrypt Then
  ' Initialize the random function
  Randomize
  ' Determine the starting position to use in
  ' the encryption string
  intPassKeyPos = Int(Len(PASSWORD_KEY) * _
                          Rnd + 1)
  ' Encrypt the starting position used in
  ' preparation to storing it in the middle of
  ' the encrypted result
  intTemp = intPassKeyPos + _
            Asc(Left(PASSWORD_KEY, 1))
  If intTemp > 255 Then intTemp = intTemp - 255
  strStartingPos = Chr(intTemp)
  ' Encrypt the full string
  For intInputPos = 1 To Len(strFull)
    intPassKeyPos = intPassKeyPos + 1
    ' Wrap to the beginning of the key if we have
    ' have used up the last character.
    If intPassKeyPos > Len(PASSWORD_KEY) Then
      intPassKeyPos = 1
    End If
    ' Add the value of the character to be
    ' encrypted to the value of the character
    ' stored at the current position in the key
    intTemp = Asc(Mid(strFull, intInputPos, 1) _
                 ) + Asc(Mid(PASSWORD_KEY, _
                             intPassKeyPos, 1))
    If intTemp > 255 Then intTemp = intTemp - 255
    ' If we are at middle of the result string,
    ' insert our encrypted starting position so
    ' we can decrypt this string later.
    If CInt(Len(strFull) / 2) + 1 = intInputPos _
       Then strOutput = strOutput & strStartingPos
    strOutput = strOutput & Chr(intTemp)
  Next intInputPos
' Decrypt a value
Else
  ' Retrieve the encrypted starting position from
  ' the middle of the string to be decrypted
  intPassKeyPos = Asc(Mid(strFull, _
    CInt((Len(strFull) - 1) / 2) + 1, 1)) - _
    Asc(Left(PASSWORD_KEY, 1))
  If intPassKeyPos < 0 Then _
    intPassKeyPos = intPassKeyPos + 255
  ' Decrypt the full string
  For intInputPos = 1 To Len(strFull)
    intPassKeyPos = intPassKeyPos + 1
    If intPassKeyPos > Len(PASSWORD_KEY) Then _
      intPassKeyPos = 1
    ' Decrypt each character by subtracting the
    ' value of the corresponding character stored
    ' in the key.
    intTemp = Asc(Mid(strFull, intInputPos, 1)) - _
      Asc(Mid(PASSWORD_KEY, intPassKeyPos, 1))
    If intTemp <= 0 Then intTemp = intTemp + 255
    ' If we are looking at the middle character,
    ' ignore it since its the encrypted starting
    ' position.
    If intInputPos = CInt((Len(strFull) - 1) / 2) + _
       1 Then
      intPassKeyPos = intPassKeyPos - 1
    Else
      strOutput = strOutput & Chr(intTemp)
    End If
  Next intInputPos
End If
encrypt = strOutput
Exit_encrypt:
  Exit Function
Err_encrypt:
  encrypt = ""
  MsgBox Error
  Resume Exit_encrypt
End Function
Public Sub CifraDatiClienti()
'Cifra i dati del Cognome
Dim db As Database
Dim rcs As Recordset
Dim i As Integer
Set db = CurrentDb
Set rcs = db.OpenRecordset("Clienti")
rcs.MoveLast
rcs.MoveFirst
For i = 1 To rcs.RecordCount
With rcs
.Edit
!Cognome = encrypt(!Cognome, True)
.Update
End With
rcs.MoveNext
Next i
rcs.Close
Set rcs = Nothing
Set db = Nothing
End Sub
Public Sub DeCifraDatiClienti()
'decifra i dati precedentemente criptati
Dim db As Database
Dim rcs As Recordset
Dim i As Integer
Set db = CurrentDb
Set rcs = db.OpenRecordset("Clienti")
rcs.MoveLast
rcs.MoveFirst
For i = 1 To rcs.RecordCount
With rcs
.Edit
!Cognome = encrypt(!Cognome, False)
.Update
End With
rcs.MoveNext
Next i
rcs.Close
Set rcs = Nothing
Set db = Nothing
End Sub
Sperando di aver fatto cosa gradita e se il sitocomune dovesse ritenerla
valida ne autorizzo la pubblicazione.
Attendo commenti.
Ciao, Carlo


title: Criptare Decriptare dati sensibili

author: Simone Calligaris

text:
"Carlo Costarella" <
> Di seguito una funzione per criptare o decriptare i dati sensibili di
> un'ipotetica tabella "Clienti" che contiene dati sensibili.
> La funzione può essere applicata a qualsiasi tabella modificando
> opportunamente il codice. Può essere eseguita all'apertura e alla chiusura
> del db o all'apertura di una maschera lasciando sempre criptati i dati e
> decriptandoli solo su rischiesta e con password.
> I suoi limiti sono nell'impossibilità di criptare campi di testo superiori
a
> 255 caratteri o vuoti; pertanto accertatevi che queste caratteristiche
siano
> rispettate.
> Fate sempre una copia del db con i dati perchè se qualcosa va storto non
> posso assumermi responsabilità.
> Per la realizzazione ho utilizzato in parte il codice messo a disposizione
> da Dima Mnushkin
(cut)
> Sperando di aver fatto cosa gradita e se il sitocomune dovesse ritenerla
> valida ne autorizzo la pubblicazione.
> Attendo commenti.
Il problema dell'utilizzo degli algoritmi di crittazione (ed è importante
premettere che la pseudo normativa sulla sicurezza ne "chiede" l'utilizzo in
ambito sanitario, non in generale) è come e quando utilizzarli.
Obiettivo: impedire a estranei di accedere ai DataBase, con un qualunque
sistema, e leggere dati relativi alla salute dei pazienti, preferenze
sessuali, etc.
Ora, se i dati di una o più tabelle fossero decrittati su apertura del DB,
questo comporterebbe che per tutto il periodo d'utilizzo del DB tali dati
sarebbero visibili a tutti ... anche a chi si collegasse alle tabelle con
tools d'amministrazione esterni (tipo Access o Enterprise Manager).
Soluzione non accettabile.
Ma anche decrittando su apertura delle maschere la sicurezza non è
garantita: per tutto il tempo in cui tale maschera sarà aperta i dati della
tabella/e sottostante/i saranno visibili a tutti.
Una soluzione che possa garantire maggiore sicurezza (fino a un certo punto)
consiste nel traslare su temporanei locali i dati del server, decrittare
localmente e dare in pasto alla Form/Report la tabella ottenuta.
E viceversa quando le modifiche sull'area locale saranno terminate e i dati
devono essere riportati sul Server.
Ma in questo modo la programmazione si complica notevolmente e i vecchi
programmi andrebbero riscritti.
Ciao


title: Criptare Decriptare dati sensibili

text:
"Simone Calligaris" <
simo...@libero.it
> ha scritto nel messaggio
news:sJ7Ce.2153$a5.3...@twister2.libero.it...
>
>
> "Carlo Costarella" <
>
cut
>
> (cut)
>
>> Sperando di aver fatto cosa gradita e se il sitocomune dovesse ritenerla
>> valida ne autorizzo la pubblicazione.
>> Attendo commenti.
>
> Il problema dell'utilizzo degli algoritmi di crittazione (ed è importante
> premettere che la pseudo normativa sulla sicurezza ne "chiede" l'utilizzo
> in
> ambito sanitario, non in generale) è come e quando utilizzarli.
>
> Obiettivo: impedire a estranei di accedere ai DataBase, con un qualunque
> sistema, e leggere dati relativi alla salute dei pazienti, preferenze
> sessuali, etc.
>
> Ora, se i dati di una o più tabelle fossero decrittati su apertura del DB,
> questo comporterebbe che per tutto il periodo d'utilizzo del DB tali dati
> sarebbero visibili a tutti ... anche a chi si collegasse alle tabelle con
> tools d'amministrazione esterni (tipo Access o Enterprise Manager).
> Soluzione non accettabile.
>
Sono d'accordo.
> Ma anche decrittando su apertura delle maschere la sicurezza non è
> garantita: per tutto il tempo in cui tale maschera sarà aperta i dati
> della
> tabella/e sottostante/i saranno visibili a tutti.
>
A tutti chi? Solo a chi ha accesso al server e si sarà loggato con account e
password o all'operatore del momento (peraltro autorizzato).
L'accesso al server è comunque monitorato: si sà chi accede. Certo potrebbe
non essere sufficiente ma qui siamo nel campo del furto di dati informatici.
Credo non spetti al programmatore occuparsi di questo.
A mio avviso la criptazione dei dati va fatta sulle copie di sicurezza,
quelle giornaliere, conservate in apposito armadio a serratura.
I dati in linea sono "protetti" dall'accesso. Almeno nel mio caso si lavora
così: il server che contiene i dati è accessibile solo a determinate
persone; la cartella non è visibile in rete nemmeno in lettura; tutti gli
accessi alle singole maschere vengono monitorati e richiedono una seconda
coppia di password e loghin; i dati già modificati richiedono la password
del medico che li ha redatti per essere modificati e anche questo è
monitorato.
Insomma tre serie di password...
Certo potrebbe non essere sufficiente...ma...
E' bene ricordare che i dati sanitari possono essere letti dal personale
sanitario e comunque all'interno dell'azienda. Si tratta di evitare la
trafugazione di dati sensibili a scopo fraudolento e garantire la loro
sicura conservazione...ma nei limiti del possibile.
> Una soluzione che possa garantire maggiore sicurezza (fino a un certo
> punto)
> consiste nel traslare su temporanei locali i dati del server, decrittare
> localmente e dare in pasto alla Form/Report la tabella ottenuta.
> E viceversa quando le modifiche sull'area locale saranno terminate e i
> dati
> devono essere riportati sul Server.
>
Anche in questo caso sono visibili i dati temporanei!
> Ma in questo modo la programmazione si complica notevolmente e i vecchi
> programmi andrebbero riscritti.
Sì si complica inutilmente.
> Ciao
>
Voglio solo aggiungere che l'algoritmo proposto può servire anche a tanti
altri scopi, primo fra tutti la possibilità di criptare password, dati
utilizzati dal programmatore in tabelle temporanee, criptare seriali di
utilizzo, ecc.
Ha il limite dei 255 caratteri ma in normali campi testo svolge bene il suo
compito.
Ciao e grazie per le tue utilissime osservazioni.
Carlo


title: Criptare Decriptare dati sensibili

text:
> > Ma anche decrittando su apertura delle maschere la sicurezza non è
> > garantita: per tutto il tempo in cui tale maschera sarà aperta i dati
> > della
> > tabella/e sottostante/i saranno visibili a tutti.
> A tutti chi? Solo a chi ha accesso al server e si sarà loggato con account
Non devi prendere le mie osservazioni come una critica personale: non lo
sono assolutamente.
In fin dei conti derivano da un'esperienza che ho avuto vent'anni fa (il mio
primo lavoro) in una struttura pubblica dipendente dall'esercito.
A quell'epoca i sistemi erano quelli 34/36 IBM e i programmi si scrivevano
in Cobol o Rpg e le problematiche di crittazione degli archivi si
affrontavano senza compromessi.
E in tutti i contesti in cui la sicurezza è critica i compromessi non
dovrebbero esistere.
> password o all'operatore del momento (peraltro autorizzato).
> L'accesso al server è comunque monitorato: si sà chi accede. Certo
potrebbe
> non essere sufficiente ma qui siamo nel campo del furto di dati
informatici.
> Credo non spetti al programmatore occuparsi di questo.
Ma certo: hai perfettamente ragione e infatti concordo totalmente.
Proprio per questa ragione la normativa sulla sicurezza, che prevede la
crittazione dati nel settore sanitario è fuori di testa.
E' solo un proforma per far perdere tempo ai professionisti del settore e
mettere a repentaglio la funzionalità dei programmi (soprattutto le
prestazioni).
La soluzione migliore è affidarsi alle protezioni "sistemiche" e NON
crittare nulla.
Ma se la normativa, prevede (a torto o a ragione) la crittazione dei
databases, purtroppo la soluzione che proponi non è abbastanza affidabile.
In realtà con Access è proprio impossibile trovare una soluzione al problema
affidabile.
> A mio avviso la criptazione dei dati va fatta sulle copie di sicurezza,
> quelle giornaliere, conservate in apposito armadio a serratura.
Ma allora per quale ragioni hai proposto di decrittare i dati su apertura
delle maschere?
C'è un'incongruenza: se la criptazione va fatta sulle copie di sicurezza,
basta creare una utility esterna che critti "off-line" il database  ... non
c'è alcun motivo per decrittare i dati durante l'utilizzo dell'applicazione.
> I dati in linea sono "protetti" dall'accesso. Almeno nel mio caso si
lavora
> così: il server che contiene i dati è accessibile solo a determinate
> persone; la cartella non è visibile in rete nemmeno in lettura; tutti gli
> accessi alle singole maschere vengono monitorati e richiedono una seconda
> coppia di password e loghin; i dati già modificati richiedono la password
> del medico che li ha redatti per essere modificati e anche questo è
> monitorato.
> Insomma tre serie di password...
> Certo potrebbe non essere sufficiente...ma...
Ripeto: concordo totalmente con la tua opinione sull'efficacia delle
protezioni di sistema.
Ma la tua interpretazione della disposizione che impone la crittazione dei
databases è troppo ampia: non è sicura.
Nel momento in cui accedi a una maschera e decritti i campi della tabella
sottostante (anzi, più spesso i campi di molte tabelle, dato che le origini
dati di Forms/Reports sono spesso queries multitabella) quei dati possono
essere letti.
Se in quel momento, per esempio, il DBA (magari un tecnico esterno alla
struttura) stesse lavorando sul Server SQL e dovesse accedere con
un'interfaccia amministrativa a quelle tabelle, potrebbe leggere
informazioni riservate.
Tra l'altro in ambiente multiutente spinto, la probabilità che quasi tutte
le tabelle siano in parte "decrittate" sarebbe molto alta.
Che poi quelle informazioni gli possano interessare o meno esula da questo
post.
> E' bene ricordare che i dati sanitari possono essere letti dal personale
> sanitario e comunque all'interno dell'azienda. Si tratta di evitare la
> trafugazione di dati sensibili a scopo fraudolento e garantire la loro
> sicura conservazione...ma nei limiti del possibile.
E' proprio questo "nei limiti del possibile" che sta alla base della
discussione  :-)
I dati dovrebbero essere decrittati a Runtime, in memoria e non su files
fisici: ma questo è possibile con altri sistemi di programmazione (tutti i
linguaggi di una volta), non con le maschere/Reports di Access.
> > Una soluzione che possa garantire maggiore sicurezza (fino a un certo
> > punto)
> > consiste nel traslare su temporanei locali i dati del server, decrittare
> > localmente e dare in pasto alla Form/Report la tabella ottenuta.
> > E viceversa quando le modifiche sull'area locale saranno terminate e i
> > dati
> > devono essere riportati sul Server.
> Anche in questo caso sono visibili i dati temporanei!
Ma certo è chiaro che sono visibili: infatti ho scritto "una soluzione che
possa garantire maggiore sicurezza (fino a un certo
punto)"
Probabilmente anche questa non è accettabile ma assicura che il DB condiviso
sia sempre crittato, anche con archivi JET.
Il problema della soluzione che hai proposto (e lo hai giustamente accennato
nel post originale) è che se qualcosa va storto durante il processo di
"crittazione"/"decrittazione" sul DB condiviso, i dati sul Server restano
disallineati: terribile!
Ora la soluzione sarebbe racchiudere in una transazione esplicita la routine
di "crittazione/decrittazione": aggiornamento tutto o niente.
Ma le transazioni non sono affidabili in logica "tutto o niente" con un
file-Server come jet privo di componente Ram resident sul PC Server.
Quindi si dovrebbe per forza adottare un Database Server ed escludere
totalmente Jet.
Magari nel caso tuo è proprio così, ma converrai che in generale il motore
Jet di Access è ancora molto utilizzato.
Ciao: Simone


title: Criptare Decriptare dati sensibili

text:
"Simone Calligaris" <
simo...@libero.it
> ha scritto nel messaggio
news:5ytCe.3560$a5.5...@twister2.libero.it...
>
>
>
Cut
Ciao Simone
condivido quasi tutto.
Vanno criptati solo i dati sensibili: abitudini sessuali, religione, esami
medici, diagnosi, ecc.
Questi dati possono essere criptati una volta per tutte e solo
all'occorrenza vanno decriptati (solo il record che interessa) in una
maschera temporanea (tabella temporanea) e visualizzati. Alla chiusura non
rimane nulla.
Una ipotetica ricerca va fatta sul cognome e il nome in chiaro. Anche la
stampa (per esempio del ricovero) va fatta "al volo", decriptando i valori
sul report (non collegato). Cosě per i certificati. In pratica i dati
sensibili restano sempre criptati...si lavora per cosě dire in memoria...
Ognuno si regola come vuole. Per gli ospedali la cosa č veramente piů
stringente...nella mia azienda stiamo migrando a sqlserver ma anche qui chi
accede (p.e. in manutenzione) al db ha campo libero...fatto salvo la
protezione di sistema
La criptazione non serve solo agli ospedali o ai medici di base, per esempio
serve alla ditte per i loro prezzi riservati o per l'elenco dei dipendenti o
dei contatti.
Per chi volesse usare la funzione proposta, per maggiore sicurezza
aggiungerei alla tabella da criptare un campo "Criptato" Si/No, onde evitare
di ripetere l'operazione con danni quasi irreparabili.
Ciao, Carlo


title: Criptare Decriptare dati sensibili

author: Cristiano

text:
"Simone Calligaris"
> Ma la tua interpretazione della disposizione che impone la crittazione dei
> databases è troppo ampia: non è sicura.
> Nel momento in cui accedi a una maschera e decritti i campi della tabella
> sottostante (anzi, più spesso i campi di molte tabelle, dato che le
origini
> dati di Forms/Reports sono spesso queries multitabella) quei dati possono
> essere letti.
>
> Se in quel momento, per esempio, il DBA (magari un tecnico esterno alla
> struttura) stesse lavorando sul Server SQL e dovesse accedere con
> un'interfaccia amministrativa a quelle tabelle, potrebbe leggere
> informazioni riservate.
> Tra l'altro in ambiente multiutente spinto, la probabilità che quasi tutte
> le tabelle siano in parte "decrittate" sarebbe molto alta.
> Che poi quelle informazioni gli possano interessare o meno esula da questo
> post.
Concordo, e ci sono altre casistiche in cui si verificherebbero problemi.
Anzitutto i backup: in molte aziende è necessario che vengano effettuati "a
caldo" perchè ci sono sempre utenti collegati ... se i dati venissero
decrittati nel DB come suggeriva Carlo, le copie risultanti sarebbero un
macello: conterrebbero dati crittati e altri decrittati.
E poi non dimentichiamo che nelle grandi aziende c'è sempre la necessità di
realizzare piccole verticalizzazioni, quindi è normale che ci sia un utente
esperto (spesso un programmatore interno) che abbia licenza di collegarsi
via ODBC alle tabelle sul Server, magari per estrapolare statistiche
personalizzate.
E dopo aver collegato le tabelle si ritroverebbe con ogni probabilità
records ben leggibili in mezzo ad altri crittati...
Saluti.


title: Scannerizzare

author: walter

text:
Ciao a tutti,
          ho bisogno di scannerizzare dall' interno di un' applicazione VBA.
Gli ocx della Kodak non mi funzionano con Office2003.
        Qualcuno di voi ha risolto in qualche modo?
    Grazie
Walter


title: Scannerizzare

author: ciroteo

text:
"walter" <
wa...@libero.it
> ha scritto nel messaggio
news:TCzme.124551$IN.21...@twister2.libero.it...

Sul sitocomune trovi un esempio che utilizza gli ocx kodak e fornisce al
contempo suggerimenti per chi possiede winxp.
Se sei in possesso di un cd di win2000 puoi facilmente utilizzarlo per
trovare i suddetti ocx, una volta installati puoi farci più o meno quello
che vuoi. Se scarichi l'esempio di Roberto vedrai tu stesso.


title: Scannerizzare

text:
>
> Sul sitocomune trovi un esempio che utilizza gli ocx kodak e fornisce al
> contempo suggerimenti per chi possiede winxp.
> Se sei in possesso di un cd di win2000 puoi facilmente utilizzarlo per
> trovare i suddetti ocx, una volta installati puoi farci più o meno quello
> che vuoi. Se scarichi l'esempio di Roberto vedrai tu stesso.
    Forse non sono stato chiaro
    Con Office Xp funziona tutto, con Office 2003 no.
Walter


title: Scannerizzare

text:
"walter" <
wa...@libero.it
> ha scritto nel messaggio
news:OOzme.124566$IN.21...@twister2.libero.it...

Ok , ho capito male.
Non ho altre soluzioni,se non quella di chiamare da access tramite shell
l'interfaccia nativa di scannerizzazione di xp e poi salvare il file
scannerizzato in una cartella e nella tabella solo il path.


title: Scannerizzare

text:
"walter" <
wa...@libero.it
> ha scritto nel messaggio
news:TCzme.124551$IN.21...@twister2.libero.it...

Confermo che con Access 2003 gli ocx Kodak non funzionano.
Al contrario funzionano egregiamente in Axp.
Personalmente ho adottato da tempo la soluzione di LeadTools che, anche se a
pagamento (spesa fatta una volta sola ma per nulla trscurabile), mi fanno
risparmiare tempo e fatica in quanto funzionano benissimo con tutte le
versioni di Access. Inoltre posso usare, creare, modificare come più mi
piace immagini e filmati avi.
Forse in giro trovi anche altre soluzioni meno onerose.
Ciao, Carlo


title: Report:Applicare Un filtro da Maschera

author: Marcello Guarnacci

text:
Da una maschera in cui ho creato una casella di riepilogo dove ho inserito i
possibili valori da ricercare vorrei lanciare un Report che già ho creato
con i valori filtrati.
Maschera "Ricerca"
Casella di Riepilogo "Elenco"
Report "FondDett"
Valore da filtrare "Fondamentale"
Ho provato sia con le macro che con Vba ma il risultato non è arrivato
P.S. Ho provato anche il codice descritto nel SitoComune ma come
immagginerete non trova i riferimenti giusti
--
----
         \ | /
       (@ @)
---o00-(_)-00o-----
Marcello Guarnacci
Allenatore di 2 Grado - Attualmente sotto Servizio Civile
fu Scoutman Icom Latina A1m 2001/02
http://digilander.iol.it/mister79/index.htm
Imparare la pallavolo
Norma(LT)
328 46 90 897


title: Report:Applicare Un filtro da Maschera

author: Alessandro Cara

text:
Marcello Guarnacci wrote:
>
> Da una maschera in cui ho creato una casella di riepilogo dove ho inserito i
> possibili valori da ricercare vorrei lanciare un Report che già ho creato
> con i valori filtrati.
>
> Maschera "Ricerca"
> Casella di Riepilogo "Elenco"
> Report "FondDett"
> Valore da filtrare "Fondamentale"
docmd.openreport "FondDett",,,"Fondamentale = '" & me.elenco & "'"
questo sulle'evento click di un bottone di lancio
se hai piu' di un valore e' evidente che da me.elenco ti devi estrarre
tutti i valori selezionati e produrre una cosa del tipo:
docmd.openreport "FondDett",,,"Fondamentale in (" & stringavalori & ")"
all'interno di stringa valori, i medesimi devono essere nel formato
corretto i.e.
'A','B','C',.......,'Z'
--
a.cara
Togli qualcosa dall'email


title: Report:Applicare Un filtro da Maschera

text:
"Alessandro Cara" <
alexqu...@blunet.it
> ha scritto nel messaggio
news:3E63953D...@blunet.it...

Grazie Alessandro,
ho risolto anche questa, anche se non era complicato mi dava di continuo
errore. Dopo aver reinstallato Access tutto è andato bene.
Se hai ancora un po' di paziaenza mi potresti dire qual'è la sintassi più
corretta se voglio filtrare campi diversi
Ciao



title: consiglio su fatturazione....

author: Fabio

text:
Salve a tutti
Gradirei un piccolo consiglio sulla gestione del mio piccolissimo dbase di
contabilità.
La domanda è la seguente,come gestite i ddt con relativa fattura di fine
mese??
Cerco di spiegarmi meglio.
Di solito inserisco fatture accompagnatorie, percui quantita, prezzo,
importo iva etc etc...e fin qui tutto bene.
inserisco anche eventuali ddt, ma come faccio a trasformarli in fattura fine
mese?
Mi capita che creo dei doppioni (ddt e fatture fine mese), con il risultato
che non
riesco a presentare al cliente un resoconto limpido con fatture acc, e fatt
fine mese.
Spero di essermi spiegato.


title: consiglio su fatturazione....

author: sigma

text:
"Fabio" <
f.par...@mail.sirio.it
> ha scritto nel messaggio
news:9e170m$1036q$1...@news02.it.net...

La soluzione potrebbe essere di inserire fatture, ddt, note di credito etc
etc. come documenti. Una tabella Tipologie definisce che tipi di documento
sono e una tabella Stato definisce lo Stato del documento (Stampato DDT,
Stampata fattura/nota acc.,Contabilizzato...)
Non so se è chiaro...
ciao


title: consiglio su fatturazione....

author: Borg Massimiliano

text:
Fabio <
f.par...@mail.sirio.it
> wrote in message
9e170m$1036q$1...@news02.it.net...

> non sono sicuro di aver capito bene cosa stai cercando di fare
tu fai una fattura ogni volta o crei solo un documento e la fattura la crei
alla fine del mese


title: Abilitazione voce menu personalizzato (Risposta per Riccardo)

author: Emyr

text:
non lo meriteresti per aver postato in privato senza il permesso
(scusa Antonio) ma finalmente ho trovato mezz'oretta per leggere
l'help di Access)
Dim mybar As CommandBar
Set mybar = CommandBars("Pippo")
Dim mybutton As CommandBarControl
Set mybutton = mybar.Controls("Secondo")
Dim mybutton2 As CommandBarControl
Set mybutton2 = mybutton.Controls("Secondo")
mybutton2.Enabled = Not mybutton2.Enabled
naturalmente il menu si chiama pippo e contiene un sottomenu di nome
Secondo con una voce di nome secondo
Saluti.
Emanuele.


title: [SitoComune] Aggiornato

author: Federico Luciani

text:
Come da subject, tanto nuovo materiale.
Controllate la sez. Novita'
La sacra triade ;-))


title: [SitoComune] Aggiornato

author: Roberto dal portatile

text:
"Federico Luciani" <
fluc...@paperino.sitocomune.com
> ha scritto nel
messaggio news:3AF2DC4A...@paperino.sitocomune.com...
> Come da subject, tanto nuovo materiale.
> Controllate la sez. Novita'
>
> La sacra triade ;-))
Lunga vita alla Sacra Triade!  :-)))
Ciao, Roberto


title: [SitoComune] Aggiornato

author: Antonio Biso

text:
Federico Luciani <
fluc...@paperino.sitocomune.com
> wrote in message
3AF2DC4A...@paperino.sitocomune.com...
> Come da subject, tanto nuovo materiale.
> Controllate la sez. Novita'
>
> La sacra triade ;-))
3 cornuti!!!
Perchè mi si continua a piantare explorer ogni volta che provo a fare una
ricerca nell'apposita sezione?
Antonio


title: [SitoComune] Aggiornato

text:
Antonio Biso wrote:
> Federico Luciani <
fluc...@paperino.sitocomune.com
> wrote in message
> > Come da subject, tanto nuovo materiale.
> > Controllate la sez. Novita'
> >
> > La sacra triade ;-))
>
> 3 cornuti!!!
> Perchč mi si continua a piantare explorer ogni volta che provo a fare una
> ricerca nell'apposita sezione?
> Antonio
se tu _leggessi_ quello che c'e' scritto (da sempre) in quella pagina,
ie non si pianterebbe!!
--
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: [SitoComune] Aggiornato

text:
Federico Luciani <
fluc...@paperino.sitocomune.com
> wrote in message
3AF7A3E5...@paperino.sitocomune.com...
> Antonio Biso wrote:
> > Federico Luciani <
fluc...@paperino.sitocomune.com
> wrote in message
> > > Come da subject, tanto nuovo materiale.
> > > Controllate la sez. Novita'
> > >
> > > La sacra triade ;-))
> >
> > 3 cornuti!!!
> > Perchè mi si continua a piantare explorer ogni volta che provo a fare
una
> > ricerca nell'apposita sezione?
> > Antonio
>
> se tu _leggessi_ quello che c'e' scritto (da sempre) in quella pagina,
> ie non si pianterebbe!!
Ok, ok, mi scuso e mi correggo:
3 cornuti!!!
Potrebbero inserire il messaggio in testa alla pagina, invece che in fondo,
dove notoriamente, nessuno legge!!!
Antonio


title: [SitoComune] Aggiornato

text:
Antonio Biso wrote:
> Federico Luciani <
fluc...@paperino.sitocomune.com
> wrote in message
> > Antonio Biso wrote:
> > > Federico Luciani <
fluc...@paperino.sitocomune.com
> wrote in message
> > > > Come da subject, tanto nuovo materiale.
> > > > Controllate la sez. Novita'
> > > > La sacra triade ;-))
> > > 3 cornuti!!!
> > > Perchè mi si continua a piantare explorer ogni volta che provo a fare
> una
> > > ricerca nell'apposita sezione?
> > > Antonio
> >
> > se tu _leggessi_ quello che c'e' scritto (da sempre) in quella pagina,
> > ie non si pianterebbe!!
>
> Ok, ok, mi scuso e mi correggo:
> 3 cornuti!!!
> Potrebbero inserire il messaggio in testa alla pagina, invece che in fondo,
> dove notoriamente, nessuno legge!!!
> Antonio
anto', ma non ti viene in mente di leggere quello che c'e' scritto dopo
la seconda volta che si pianta?
troppo difficile? :-)



title: [SitoComune] Aggiornato

author: Luciano (DOC)

text:
"Antonio Biso" <
ch...@etruria.net
> wrote in message
news:NQNJ6.1181$B87....@news.infostrada.it...
> Potrebbero inserire il messaggio in testa alla pagina, invece che in
fondo,
E compratelo un monitor buono! Cosi' alzi la risoluzione e ti entra tutto in
una schermata!:-))
Saluti.
Luciano
(DOC)


title: [SitoComune] Aggiornato

text:
Federico Luciani <
fluc...@paperino.sitocomune.com
> wrote in message
3AF7B398...@paperino.sitocomune.com...
> > Ok, ok, mi scuso e mi correggo:
> > 3 cornuti!!!
> > Potrebbero inserire il messaggio in testa alla pagina, invece che in
fondo,
> > dove notoriamente, nessuno legge!!!
> > Antonio
>
> anto', ma non ti viene in mente di leggere quello che c'e' scritto dopo
> la seconda volta che si pianta?
> troppo difficile? :-)
Seee... mo' mi metto a guardare pure i banner pubblicitari e lo sfondo
colorato....
Antonio


title: [OT] un'altra ragione di utilità del forum.

author: Riccardo Baldinotti

text:
Anni fa un'utente fece delle richieste sul forum per un suo db. Io,
volenteroso neofita convinto di sapere già qualcosa, le risposi prima
attraverso il forum, poi per post-el. I miei suggerimenti le furono
utili e facemmo amicizia, un'amicizia proprio da XXI secolo fra
persone che abitano in regioni diverse, visto che prosegue via
internet, anche se qualche volta usiamo l'arcaico telefono e una volta
ci siamo serviti pure delle poste (!).
Recentemente ci siamo sentiti per un'altra operazione in Access.
Siccome questo è l'unico passatempo per il quale mi pagano, ho avuto
modo di mandarle una soluzione di suo gradimento.
E questo è il punto. Senza le richieste specifiche avute al lavoro non
avrei avuto occasione di imparare tante cose, ma senza questo forum
innanzitutto, e varie altre risorse in rete, non avrei saputo
soddisfare le richieste.
Vi sarà chiaro che sono un "finto" programmatore...
Ma tengo in particolare a rilevare che l'esistenza di spazi
collaborativi in rete, oltre alla modernità, evidenzia la possibilità
di sviluppare una mentalità non biecamente mercantile e
contemporaneamente, a scorno di critici ottusi, di alta qualità
professionale. Di questi tempi c'è bisogno di sapere e far sapere,
anche mediante esempi simili, che "un altro mondo è possibile".
Grazie a tutti.
Riccardo Baldinotti


text:
"Riccardo Baldinotti" <
bari...@gmail.com
> ha scritto nel messaggio
news:87bf901d-cc7e-4030...@j13g2000yqj.googlegroups.com...


-----------------------------------
Ogni tanto fa bene un po' di gratitudine.
Il free help si pone all'opposto dell'open source.
In questo NG (non è un forum) il software è a pagamento ma l'aiuto è gratis.
In altri NG software e aiuti sono gratuiti.
In entrambi i casi effettivamente può scaturire un'amicizia che a mio
avviso, almeno inizialmente, è dettata dalla gratitudine, salvo poi
consolidarsi attraverso incontri personali.
Ed è proprio l'incontro che si deve favorire. A quando la CISA 2011?
Ciao, Carlo


text:
On 4 Apr, 13:39, "Carlo Costarella" <
carlocoslib...@libero.it
> wrote:
> "Riccardo Baldinotti" <
barimo...@gmail.com
> ha scritto nel messaggionews:87bf901d-cc7e-4030...@j13g2000yqj.googlegroups.com...

Sì, sì! La CISA a Milano così vengo a salutare!
Riccardo Baldinotti


author: MA

text:
"Carlo Costarella"  ha scritto nel messaggio
news:incalb$pdu$1...@tdi.cu.mi.it...
Ed è proprio l'incontro che si deve favorire. A quando la CISA 2011?
Ciao, Carlo
________________Risposta:
Firulì, Firulà...
MA


text:
On 4 Apr, 15:17, "MA" <
mas...@massimilianoamendola.it
> wrote:
> "Carlo Costarella"  ha scritto nel messaggionews:incalb$pdu$1...@tdi.cu.mi.it...
>
> Ed è proprio l'incontro che si deve favorire. A quando la CISA 2011?
>
> Ciao, Carlo
> ________________Risposta:
> Firulì, Firulà...
> MA
Ti senti Fischiare le 2 ORECCHIE con la tromba da stadio vero....???
;-)
@Alex


title: Problema con un report ...

author: Angelo

text:
In sintesi, il mio report è il risultato di un insieme di query
appositamente create per la visualizzazione di determinati valori.
Mentre la query funziona perfettamente, il report su di essa creato mi
visualizza il seguente messaggio d'errore:
"Il riferimento al campo specificato 'NomeTabella.NomeCampo' potrebbe essere
relativo a più tabelle elencate nella proposizione FROM dell'istruzione
SQL:"
Effettivamente io ho la necessità di visualizzare lo stesso campo della
stessa tabella (relazionata) in due aree distinte del report.
Come posso ovviare a questo inconveniente?
Grazie
Angelo


title: Problema con un report ...

author: Maurizio Borrelli

text:
> "Angelo" <
ap...@inwind.it
> ha scritto nel messaggio
> news:DCAU9.31835$AA2.1...@news2.tin.it...

    Per esempio:
        SELECT Tabella1.Campo1 AS T1Campo1, Tabella2.Campo1 AS T2Campo1
        ...
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------


title: Report particolare

author: Amedeo B.

text:
Salve,
ho questa esigenza:
devo creare un report che però, quando lanciato, non mi apra le tre
finestre
che richiedono (una di seguito all'altra) l'immissione dei 3 valori da me
inseriti in una query parametrica (Inserisci NumCodiceCliente,
InserisciNumTel, InserisciDataAbbonamento), ma che mi faccia aprire una
sorta di maschera su cui ho 3 TEXTBOX in cui metto i 3 dati e un pulsante
di comando che Avvia il tutto.
IL report chiaram lo appoggio su di una query che ho strutturato prorpio
come vorrei fosse il report, ma purtroppo i report su maschere non si
posson fare!
Come risolvere questo problema?
Ossequi
Amedeo
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Report particolare

text:
"Amedeo B." <
amed...@libero.it
> ha scritto nel messaggio
news:brcmq7$9lm$1...@news.newsland.it...
> Salve,
> ho questa esigenza:
> devo creare un report che però, quando lanciato, non mi apra le tre
> finestre
> che richiedono (una di seguito all'altra) l'immissione dei 3 valori da me
> inseriti in una query parametrica (Inserisci NumCodiceCliente,
> InserisciNumTel, InserisciDataAbbonamento), ma che mi faccia aprire una
> sorta di maschera su cui ho 3 TEXTBOX in cui metto i 3 dati e un pulsante
> di comando che Avvia il tutto.
> IL report chiaram lo appoggio su di una query che ho strutturato prorpio
> come vorrei fosse il report, ma purtroppo i report su maschere non si
> posson fare!
> Come risolvere questo problema?
> Ossequi
Ossequi???
Amedeo tu sei nuovo e per questo benvenuto, ma qui non c'è bisogno di essere
formale (gurdati tutte le "parolacce" che mando a Biso, un partecipante
pischello di questo Ng!!!). ;-P
Comunque se la tua maschera si chiama Pippo e ha i tre controlli Qui, quo e
qua
inserisci nei criteri della query, invece di InserisciNumTel etc,
forms!Pippo!Qui
e li poggi sia il report che qualsiasi altra cosa.
Lui non ti chiederà nulla ma ti apre i report già come vuoi.
MAssimiliano


title: Report particolare

author: Amedeo

text:
Ok, grazie!
Ciao
MA ha scritto:





title: Report particolare

text:
"Amedeo" <
amed...@libero.it
> ha scritto nel messaggio
news:brcnga$fui$1...@news.newsland.it...
> Ok, grazie!
> Ciao
Amedeo quota bene e usa subject migliori, questo era al limite.
Per imparare come ci si comporta in un Ng cerca il post "Istruzioi per
l'uso"
MAssimiliano


title: Report particolare

text:
Un momento che non capisco...(è colpa mia, sia chiaro).
Io ho la query e metto nei 3 criteri il
   form!NomeQuery!NomeTexTBox
Poi ho la maschera con i 3 TextBOX e il pulsante di comando dove c'è
  DoCmd.OpenQuery"NomeQuery"
Ora, quando creo NuovoReport, scelgo di agganciarlo alla query di cui
sopra?
Devo inserirci qualcosa nel corpo del report?
Così ho fatto ma appena lancio il report ecco che esce una finestrella che
mi dice
   Forms!MascheraRicerca1!Testo0
come se attendesse dei parametri inimmissione.
Scusami, ma da buon novizio mi incarto spesso!
Ciao e grazie!
Amedeo
MA ha scritto:





title: Report particolare

text:
Skipped!
T'avevo avvisato su quoting e subject
Cosě non ti aiuto
MAssimiliano


title: Report particolare

text:
MA ha scritto:
> Skipped!
> T'avevo avvisato su quoting e subject
> Cosě non ti aiuto
  e non mi hai dato neanche il tempo...
  Peggio della Ghestapo!
     (scherzo)
  Ok, vado subito.
> MAssimiliano
  Ciao, Amedeo



title: Report particolare

author: Fabrizio Alessandri

text:
> MA ha scritto:
>
> > Skipped!
> > T'avevo avvisato su quoting e subject
> > Così non ti aiuto
>
>   e non mi hai dato neanche il tempo...
>   Peggio della Ghestapo!
>      (scherzo)
>   Ok, vado subito.
>
>
> > MAssimiliano
>   Ciao, Amedeo
Però come vedi è servito, ora hai quotato bene ;-)
Come diceva Massimiliano, devi inserire nella query di origine del report, i
criteri nei campi che vuoi interrogare:
[Forms]![TuaMascheraCriteriRicerca]![TuoCampoRicerca1]
[Forms]![TuaMascheraCriteriRicerca]![TuoCampoRicerca2]
..............
..............
Sul form di ricerca avrai i campi di interrogazione e col pulsante, apri
direttamente il report.
La query sarà filtrata con i dati inseriti in "TuaMascheraCriteriRicerca".
Ciao.


title: Report particolare

text:
Fabrizio Alessandri ha scritto:

> Però come vedi è servito, ora hai quotato bene ;-)

  Meno male! Thanks!
> Come diceva Massimiliano, devi inserire nella query di origine del  report, i
> criteri nei campi che vuoi interrogare:
> [Forms]![TuaMascheraCriteriRicerca]![TuoCampoRicerca1]
> [Forms]![TuaMascheraCriteriRicerca]![TuoCampoRicerca2]
> ..............
> ..............
> Sul form di ricerca avrai i campi di interrogazione e col pulsante, apri
> direttamente il report.
> La query sarà filtrata con i dati inseriti in "TuaMascheraCriteriRicerca".
> Ciao.
   Ciao e grazie. Amedeo



title: sql server express quale scaricare

author: tmtube

text:
Vorrei creare la parte grafica con access XP e la parte dati con sql server
express 2012

Sapete quale file devo scaricare dal sito microsoft avendo windows 8?
Se poi il pc finale sar� diverso da windows 8 che sql server express dovr�
installare?

Grazie.


title: stampe su modulo continuo

author: Roby

text:
Sto cercando di stampare un report su una vecchissima stampante a modulo
continuo 132 colonne (Epson Ex1000). Purtroppo pu avendo trovato i driver
per windows non c'è verso di stampare (stampa caratteri stranissimi). Cosa
posso fare? Qualcuno ha avuto esperienze simili?
Grazie e ciao, Bo.


title: stampe su modulo continuo

author: Sib

text:
"Roby" <
bobo...@libero.it
> ha scritto nel messaggio

Prova a impostare da BIOS la parallela a Normal e non ECP e/o EPP
Sib


title: come effettuare stampe multiple etc.

author: GM

text:
salve a tutti... non sò se il subject è azzeccato ma provo a spiegarmi
meglio...
 Ho un Db anagrafico in cui inserisco dei dati di un paziente al quale
viene somministrata una cura di prodotti ed essa si ripete  una volta
ogni 3 mesi...quindi il Db è strutturato 1 > Molti...
 il Db contiene una maschera scadenze strutturata per vedere tutte le
scadenze
 <30 gg ;
<30 gg <61 gg;
>60gg <91 ;
>90 gg;>
anche se a me servirebbe solo la scadenza tra >80gg <90 gg in maniera da
poter stampare le ricette solo in questo range di scadenza...
 in sostanza il mio problema è che devo poter stampare tutti i pazienti
(mediamente sono un centinaio da stampare, anche se il Db ne contiene
circa 3500, ma devono essere poi stampati sempre a scadenza di 3 mesi)
che si trovano in questa fascia di scadenza ,
 però la cosa penso + difficile è che una volta stampati infine.... e
qui penso sia difficile... una volta stampati gli utenti in  scadenza
questi dovrebbero ritornare non + in scadenza ma essere nel database
prossimi alla scadenza dei successivi 3 mesi dalla data di stampa...
ho già una tabella Anagrafe ed una tabella Prodotti che includono l'
ID...
la tabella Prodotti include un campo Data erogazione ricetta che poi
sarebbe la data  di stampa...
il mio problema è come stampare tutti assieme quel range di pazienti che
nella scadenza di >80gg <90gg ed una volta stampati ritornare ad essere
stampabili
tra 80gg e 90gg dopo...
spero di essermi spiegato e spero anche che si possa fare, altrimenti
accetto suggerimenti su come agire in maniera "Manuale".  :-(()
 grazie e ciao
ps- chiunque lo desiderasse sono disposto ad inviare il Db per avere una
visione + chiara di quanto ho spiegato.


title: come effettuare stampe multiple etc.

author: Ivan da casa

text:
"GM" <
to...@toglilibero.it
> ha scritto nel messaggio
news:5lQfi.47730$U01.4...@twister1.libero.it...

senza entrare nei dettagli:
devi crearti una tabella che contenga:
CLIENTE o (codiceCliente)
dataStampa
proxScad  ----> dove metterai l'intervallo in giorni
a questo punto potrai, tramite query, controllare chi è in scadenza e
quando.
Ogni volta che deciderai il ciclo di stampe dovrai aggiungere un record per
ogni paziente 'stampato' !
IvanDaBologna


title: come effettuare stampe multiple etc.

author: Sergio MAZZA

text:
"GM" <
to...@toglilibero.it
> ha scritto nel messaggio news:5lQfi.47730$U01.4...@twister1.libero.it...

Ho come un dejavu (SuperPippo@_at Home); o mi sbaglio?
Ciao.
--
Sergio MAZZA


title: come effettuare stampe multiple etc.

text:
"Ivan da casa" <
ivanSENZAQ...@tin.it
> ha scritto nel messaggio
news:46804b58$0$17946
> "GM" <
to...@toglilibero.it
> ha scritto nel messaggio
CUT
>> però la cosa penso + difficile è che una volta stampati infine.... e
>> qui penso sia difficile... una volta stampati gli utenti in  scadenza
>> questi dovrebbero ritornare non + in scadenza ma essere nel database
>> prossimi alla scadenza dei successivi 3 mesi dalla data di stampa...
>> ho già una tabella Anagrafe ed una tabella Prodotti che includono l'
>> ID...
>> la tabella Prodotti include un campo Data erogazione ricetta che poi
>> sarebbe la data  di stampa...
>> il mio problema è come stampare tutti assieme quel range di pazienti
>> che
>> nella scadenza di >80gg <90gg ed una volta stampati ritornare ad
>> essere
>> stampabili tra 80gg e 90gg dopo...
-------------------------------------------------------->
> senza entrare nei dettagli:
> devi crearti una tabella che contenga:
> CLIENTE o (codiceCliente)
> dataStampa
> proxScad  ----> dove metterai l'intervallo in giorni
> a questo punto potrai, tramite query, controllare chi è in scadenza e
> quando.
> Ogni volta che deciderai il ciclo di stampe dovrai aggiungere un
> record per ogni paziente 'stampato' !
> IvanDaBologna
-----------
grazie per avermi risposto Ivan...
allora ho già una Tabprodotti che include il
campo ID - contatore
campo IdAnagrafica - Numerico
campo data erogazione ricetta - data-ora
campo prodotto - testo
campo quantità - numerico...
quindi dovrei aggiungere un campo Proxscadenza...??
ho anche una Qry_Scad così formata :
SELECT Anagrafe.TxTCognome, Anagrafe.TxTNome, Tabprodotti.Prodotto,
Tabprodotti.CodASL, Tabprodotti.CodEsenzione,
Max(Tabprodotti.[data_erogazione ricetta]) AS [MaxDidata_erogazione
ricetta], Min(DateDiff("d",[data_erogazione ricetta],Date())) AS gg,
IIf(Min(DateDiff("d",[data_erogazione ricetta],Date()))<31,1,0) AS gg30,
IIf(Min(DateDiff("d",[data_erogazione ricetta],Date()))>30 And
Min(DateDiff("d",[data_erogazione ricetta],Date()))<61,2,0) AS gg3060,
IIf(Min(DateDiff("d",[data_erogazione ricetta],Date()))>60 And
Min(DateDiff("d",[data_erogazione ricetta],Date()))<91,3,0) AS gg6090,
IIf(Min(DateDiff("d",[data_erogazione ricetta],Date()))>90,4,0) AS gg90
FROM Anagrafe INNER JOIN Tabprodotti ON Anagrafe.ID_Anagrafe =
Tabprodotti.IdAnagrafica
GROUP BY Anagrafe.TxTCognome, Anagrafe.TxTNome, Tabprodotti.Prodotto,
Tabprodotti.CodASL, Tabprodotti.CodEsenzione;
> Ogni volta che deciderai il ciclo di stampe dovrai aggiungere un
> record per ogni paziente 'stampato' !
scusami ma questo non l'ho capito...
grazie x l'aiuto...
Giuseppe


title: come effettuare stampe multiple etc.

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:f5qcme$bke$2...@tdi.cu.mi.it...
> "GM" <
to...@toglilibero.it
> ha scritto nel messaggio
> news:5lQfi.47730$U01.4...@twister1.libero.it...
>> il mio problema è come stampare tutti assieme quel range di pazienti
>> che
>> nella scadenza di >80gg <90gg ed una volta stampati ritornare ad
>> essere
>> stampabili
>> tra 80gg e 90gg dopo...
>
> Ho come un dejavu (SuperPippo@_at Home); o mi sbaglio?
> Sergio MAZZA
-------------
certo.. :-))  è l'indirizzo email di casa...
Ciao


title: come effettuare stampe multiple etc.

text:
"GM" <
to...@toglilibero.it
> ha scritto nel messaggio
news:9v4gi.48320$U01.5...@twister1.libero.it...
> -------------
> certo.. :-))  è l'indirizzo email di casa...
Bene ma questo che significa? L'altro è morto?
Perché se vedo riproposto di nuovo lo stesso quesito dalla stessa persona,
posso pensare che non ti va bene quello che ti ho suggerito; o ti sto
antipatico o chissà che... Ma qualsiasi cosa sia, per tutto l'NG, sarebbe il
caso di inviare un riscontro di quanto detto/fatto...
> Ciao
Ciao.
--
Sergio MAZZA


title: come effettuare stampe multiple etc.

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:f5qo2b$r2j$1...@tdi.cu.mi.it...

-----------------
O fai una tabella dove inserisci gli id del paziente e la data di stampa
del report dove registri tutti quelli stampanti in quel
trimestre; oppure inserisci un campo nella tabella del paziente dove
indichi che è stato stampato (e quando)...
--------------
Ciao Sergio... grazie per avermi risposto... ma non ho ben capito la tua
soluzione...
ho già una tabella Anagrafe ed una tabella Prodotti che includono l'
ID...
la tabella Prodotti include un campo Data erogazione ricetta che poi
sarebbe la data  di stampa...
il mio problema è come stampare tutti assieme quel range di pazienti che
devo stampare nella scadenza di
>80gg <90gg ed una volta stampati ritornare ad essere stampabili >80gg
><90gg dopo...
---------------
+++++++++++++
Guarda che ti ho risposto alla tua risposta di sopra...e cmq lungi da me
che tu mi sia antipatico...
e poi per quale motivo.... ci mancherebbe altro... posto in NG x
chiedere aiuto dato la mia scarsa
conoscenza di Access...
riprendendo il discorso, è x me difficile esporre il problema...
oltre che metterlo in pratica... ma penso cmq che in tabella vada anche
creato un campo data prossima scadenza ??
Ciao e grazie per la pazienza dimostrata...
G


title: come effettuare stampe multiple etc.

text:
"GM" <
to...@toglilibero.it
> ha scritto nel messaggio
news:Cr6gi.48494$U01.5...@twister1.libero.it...
> -----------------
> O fai una tabella dove inserisci gli id del paziente e la data di stampa
> del report dove registri tutti quelli stampanti in quel
> trimestre; oppure inserisci un campo nella tabella del paziente dove
> indichi che è stato stampato (e quando)...
> --------------
> Ciao Sergio... grazie per avermi risposto... ma non ho ben capito la tua
> soluzione...
> ho già una tabella Anagrafe ed una tabella Prodotti che includono l'
> ID...
> la tabella Prodotti include un campo Data erogazione ricetta che poi
> sarebbe la data  di stampa...
> il mio problema è come stampare tutti assieme quel range di pazienti che
> devo stampare nella scadenza di
>>80gg <90gg ed una volta stampati ritornare ad essere stampabili >80gg
>><90gg dopo...
> ---------------
> +++++++++++++
> Guarda che ti ho risposto alla tua risposta di sopra...e cmq lungi da me
> che tu mi sia antipatico...
> e poi per quale motivo.... ci mancherebbe altro... posto in NG x chiedere
> aiuto dato la mia scarsa
> conoscenza di Access...
Anch'io ho risposto alla tua, ma non avendo visto un riscontro pensavo che
avessi risolto.
Poi ho visto questo tuo nuovo(vecchio) messaggio e la domanda mi è sorta
spontanea; non che ti ero antipatico ma: "che è successo? Ho sbagliato
qualcosa? (se sì) Perché non lo scrive?".
> riprendendo il discorso, è x me difficile esporre il problema...
> oltre che metterlo in pratica... ma penso cmq che in tabella vada anche
> creato un campo data prossima scadenza ??
E' quello che ti ho proposto. Due campi, uno è la data iniziale di scadenza
l'altra è la prossima scadenza che, una volta eseguita la routine di stampa,
verrà aggiornata alla prossima (con la funzione DateAdd aggiungendo i
giorni)...
> Ciao e grazie per la pazienza dimostrata...
> G
Ciao.
--
Sergio MAZZA


title: come effettuare stampe multiple etc.

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:f5qv8f$4tv$1...@tdi.cu.mi.it...
> "GM" <
to...@toglilibero.it
> ha scritto nel messaggio
CUT
>> riprendendo il discorso, è x me difficile esporre il problema...
>> oltre che metterlo in pratica... ma penso cmq che in tabella vada
>> anche creato un campo data prossima scadenza ??
>
> E' quello che ti ho proposto. Due campi, uno è la data iniziale di
> scadenza l'altra è la prossima scadenza che, una volta eseguita la
> routine di stampa, verrà aggiornata alla prossima (con la funzione
> DateAdd aggiungendo i giorni)...
----------------
Ok Sergio... allora ho creato un campo nella Tabprodotti data_prox
scadenza
e l'ho aggiunto anche nella Qry_Scad... vedi il codice...
SELECT Anagrafe.TxTCognome, Anagrafe.TxTNome, Tabprodotti.Prodotto,
Tabprodotti.CodASL, Tabprodotti.CodEsenzione,
Max(Tabprodotti.[data_erogazione ricetta]) AS [MaxDidata_erogazione
ricetta], Tabprodotti.[data_prox scadenza],
Min(DateDiff("d",[data_erogazione ricetta],Date())) AS gg,
IIf(Min(DateDiff("d",[data_erogazione ricetta],Date()))<31,1,0) AS gg30,
IIf(Min(DateDiff("d",[data_erogazione ricetta],Date()))>30 And
Min(DateDiff("d",[data_erogazione ricetta],Date()))<61,2,0) AS gg3060,
IIf(Min(DateDiff("d",[data_erogazione ricetta],Date()))>60 And
Min(DateDiff("d",[data_erogazione ricetta],Date()))<91,3,0) AS gg6090,
IIf(Min(DateDiff("d",[data_erogazione ricetta],Date()))>90,4,0) AS gg90
FROM Anagrafe INNER JOIN Tabprodotti ON
Anagrafe.ID_Anagrafe=Tabprodotti.IdAnagrafica
GROUP BY Anagrafe.TxTCognome, Anagrafe.TxTNome, Tabprodotti.Prodotto,
Tabprodotti.CodASL, Tabprodotti.CodEsenzione, Tabprodotti.[data_prox
scadenza];
la funzione DateAdd dove la inserisco ??
considera che ho una  Frm_Scadenze che ha come origine la query di
sopra...
Ciao


title: come effettuare stampe multiple etc.

text:
"GM" <
to...@toglilibero.it
> ha scritto nel messaggio
news:sPogi.49199$U01.5...@twister1.libero.it...
> ----------------
> Ok Sergio... allora ho creato un campo nella Tabprodotti data_prox
> scadenza
> e l'ho aggiunto anche nella Qry_Scad... vedi il codice...
>
> SELECT Anagrafe.TxTCognome, Anagrafe.TxTNome, Tabprodotti.Prodotto,
> Tabprodotti.CodASL, Tabprodotti.CodEsenzione,
> Max(Tabprodotti.[data_erogazione ricetta]) AS [MaxDidata_erogazione
> ricetta], Tabprodotti.[data_prox scadenza],
> Min(DateDiff("d",[data_erogazione ricetta],Date())) AS gg,
> IIf(Min(DateDiff("d",[data_erogazione ricetta],Date()))<31,1,0) AS gg30,
> IIf(Min(DateDiff("d",[data_erogazione ricetta],Date()))>30 And
> Min(DateDiff("d",[data_erogazione ricetta],Date()))<61,2,0) AS gg3060,
> IIf(Min(DateDiff("d",[data_erogazione ricetta],Date()))>60 And
> Min(DateDiff("d",[data_erogazione ricetta],Date()))<91,3,0) AS gg6090,
> IIf(Min(DateDiff("d",[data_erogazione ricetta],Date()))>90,4,0) AS gg90
> FROM Anagrafe INNER JOIN Tabprodotti ON
> Anagrafe.ID_Anagrafe=Tabprodotti.IdAnagrafica
> GROUP BY Anagrafe.TxTCognome, Anagrafe.TxTNome, Tabprodotti.Prodotto,
> Tabprodotti.CodASL, Tabprodotti.CodEsenzione, Tabprodotti.[data_prox
> scadenza];
>
> la funzione DateAdd dove la inserisco ??
> considera che ho una  Frm_Scadenze che ha come origine la query di
> sopra...
> Ciao
la funzione la devi eseguire dopo che hai effettuato la stampa:
es.
'<-- qui, l'istruzione per eseguire la stampa
'--> aggiorno la [data_prox scadenza] aggiungendoci 30 giorni per tutti i
record presenti in
'--> Tabprodotti  con IdAnagrafica = all'IdAnagrafica visualizzata sulla
form
Currentdb.Execute "Update Tabprodotti Set [data_prox
scadenza]=DateAdd('d',[data_prox scadenza],30);("d",date,30) Where
IdAnagrafica=" & me!IdAnagrafica
Me.Requery '<-- aggiorno la form
Ciao.
--
Sergio MAZZA


title: come effettuare stampe multiple etc.

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:f5t7c1$es6$1...@tdi.cu.mi.it...
>> CUT <<
>> la funzione DateAdd dove la inserisco ??
>> considera che ho una  Frm_Scadenze che ha come origine la query di
>> sopra...
--------------------------------------------------------------------------------------------------------->
> la funzione la devi eseguire dopo che hai effettuato la stampa:
> es.
> '<-- qui, l'istruzione per eseguire la stampa
>
> '--> aggiorno la [data_prox scadenza] aggiungendoci 30 giorni per
> tutti i record presenti in
> '--> Tabprodotti  con IdAnagrafica = all'IdAnagrafica visualizzata
> sulla form
> Currentdb.Execute "Update Tabprodotti Set [data_prox
> scadenza]=DateAdd('d',[data_prox scadenza],30);("d",date,30) Where
> IdAnagrafica=" & me!IdAnagrafica
>
> Me.Requery '<-- aggiorno la form
----------------------------
scusami Sergio... ma non ho capito un bel nulla...!!
comincio a sentirmi leggermente scoraggiato...:-()
potresti magari dirmi una cosa alla volta parlando terra-terra ???
sempre se hai un pň di pazienza...
Ciao


title: come effettuare stampe multiple etc.

text:
"GM" <
to...@toglilibero.it
> ha scritto nel messaggio
news:SWqgi.49345$%k.17...@twister2.libero.it...
> ----------------------------
> scusami Sergio... ma non ho capito un bel nulla...!!
Ed è pure commentato.
> comincio a sentirmi leggermente scoraggiato...:-()
> potresti magari dirmi una cosa alla volta parlando terra-terra ???
Cosa non ti è chiaro?
> sempre se hai un pò di pazienza...
Io sono qui fino alle 15:30.



title: come effettuare stampe multiple etc.

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:f5te85$n7p$1...@tdi.cu.mi.it...
> "GM" <
to...@toglilibero.it
> ha scritto nel messaggio
>> ----------------------------
>> scusami Sergio... ma non ho capito un bel nulla...!!
>
> Ed è pure commentato.
--------------------------------------------------------------------------------------------------------->
> la funzione la devi eseguire dopo che hai effettuato la stampa:
> es.
> '<-- qui, l'istruzione per eseguire la stampa
>
> '--> aggiorno la [data_prox scadenza] aggiungendoci 30 giorni per
> tutti i record presenti in
> '--> Tabprodotti  con IdAnagrafica = all'IdAnagrafica visualizzata
> sulla form
> Currentdb.Execute "Update Tabprodotti Set [data_prox
> scadenza]=DateAdd('d',[data_prox scadenza],30);("d",date,30) Where
> IdAnagrafica=" & me!IdAnagrafica
>
> Me.Requery '<-- aggiorno la form
-----------------------------------
>> comincio a sentirmi leggermente scoraggiato...:-()
>> potresti magari dirmi una cosa alla volta parlando terra-terra ???
> Cosa non ti è chiaro?
---------------------
Ok Sergio, arieccomi... in sostanza non mi è chiaro da dove devo
cominciare...
cosa devo fare per primo...(sono una frana in Access :-(( ))
potresti spiegarmi terra-terra i passaggi come se li spiegassi ad un
coccio ??
tipo aprire/creare  la tabella, la query, la maschera, etc. etc..
grazie


title: come effettuare stampe multiple etc.

text:
"GM" <
to...@toglilibero.it
> ha scritto nel messaggio
news:GhJgi.50221$U01.5...@twister1.libero.it...
> ---------------------
> Ok Sergio, arieccomi... in sostanza non mi è chiaro da dove devo
> cominciare...
Scusa ma è disarmante.
> cosa devo fare per primo...(sono una frana in Access :-(( ))
> potresti spiegarmi terra-terra i passaggi come se li spiegassi ad un
> coccio ??
No; ci dovrai mettere del tuo.
> tipo aprire/creare  la tabella, la query, la maschera, etc. etc..
Non devi aprire nulla e neanche fare salti mortali; solo avere chiaro in
mente la sequenza di operazioni da fare (analisi del problema) e poi
tradurlo in istruzioni VBA.
Se non hai la prima, la seconda non ci fai nulla; diventa un copia/incolla.
> grazie
Partiamo dalla base; l'analisi del problema: aggiornare un campo dopo aver
stampato un report (filtrato).
Come lo stampi il report? A mano dalla finestra database? Oppure tramite un
bottone e quindi utilizzando codice VBA?
Lo fai a mano? Siamo in alto mare.
Lo fai col bottone? Siamo un passo avanti.
Visto che l'operazione: stampa -> aggiornamento campo deve essere
trasparente all'utente, la faremo nell'evento "su clic" del bottone che
manda in stampa.
Quindi, nell'evento "su clic" ci dovrà essere il codice VBA:
'--> apro il report e lo stampo (se annulli è un altro problema)
DoCmd.OpenReport "nomeReport",,,"stringa filtro"
'--> aggiorno la [data_prox scadenza] aggiungendoci 30 giorni per tutti i
record presenti in
'--> Tabprodotti  con IdAnagrafica = all'IdAnagrafica visualizzata sulla
form
Currentdb.Execute "Update Tabprodotti Set [data_prox
scadenza]=DateAdd('d',[data_prox scadenza],30);("d",date,30) Where
IdAnagrafica=" & me!IdAnagrafica
Me.Requery '<-- aggiorno la form
Che ho aggiunto? Nulla! Solo il ragionamento...
(ripeto) Il codice è un esempio, tu devi verificare che i nomi degli oggetti
(tabelle/query/campi/etc. etc.) siano quelli che ti servono...
Ciao.
--
Sergio MAZZA


title: come effettuare stampe multiple etc.

author: SuperPippo宰at Home

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:f601p5$f5c$1...@tdi.cu.mi.it...
> Scusa ma è disarmante.
e lo dici a me :-((  !! sono indubbiamente avvilito... cmq
> No; ci dovrai mettere del tuo.
ecco il motivo per cui oggi ti scrivo da casa, in quanto al lavoro con
il via vai di persone
non riesco a concentrarmi in alcun modo...
> Non devi aprire nulla e neanche fare salti mortali; solo avere chiaro
> in mente la sequenza di operazioni da fare (analisi del problema) e
> poi tradurlo in istruzioni VBA.
> Se non hai la prima, la seconda non ci fai nulla; diventa un
> copia/incolla.
>
> Partiamo dalla base; l'analisi del problema: aggiornare un campo dopo
> aver stampato un report (filtrato).
>
> Come lo stampi il report? A mano dalla finestra database? Oppure
> tramite un bottone e quindi utilizzando codice VBA?
> Lo fai a mano? Siamo in alto mare.
> Lo fai col bottone? Siamo un passo avanti.
il DB che stò modificando o meglio stò cercando di modificare era solo
un anagrafico..
in un secondo tempo è stata aggiunta la sottomaschera TabProdotti, e
grazie ad un amico
in NG è stata aggiunta una maschera popup FrmScadenze basata sulla
Qry_Scad che conosci.
oggi ho aggiunto con la creazione guidata un bottone di stampa... ma
senza alcuna opzione di filtraggio data di stampa etc...
ho cmq aggiunto nel campo data prossima scadenza delle date fittizie 30
gg dopo la data di erogazione ricetta...
> Visto che l'operazione: stampa -> aggiornamento campo deve essere
> trasparente all'utente, la faremo nell'evento "su clic" del bottone
> che manda in stampa.
> Quindi, nell'evento "su clic" ci dovrà essere il codice VBA:
> '--> apro il report e lo stampo (se annulli è un altro problema)
> DoCmd.OpenReport "nomeReport",,,"stringa filtro"
fin qui ti seguo... questo è il codice del bottone di stampa:
Private Sub prn_Click()
On Error GoTo Err_prn_Click
    Dim stDocName As String
    stDocName = "Report1" (qui che stringa filtro dovrei mettere?)
    DoCmd.OpenReport stDocName, acPreview
Exit_prn_Click:
    Exit Sub
Err_prn_Click:
    MsgBox Err.Description
    Resume Exit_prn_Click
   End Sub
---------------------
> '--> aggiorno la [data_prox scadenza] aggiungendoci 30 giorni per
> tutti i record presenti in
> '--> Tabprodotti  con IdAnagrafica = all'IdAnagrafica visualizzata
> sulla form
> >
> Me.Requery '<-- aggiorno la form
>
> Che ho aggiunto? Nulla! Solo il ragionamento...
beato te... io ho cercato di ragionarci tutto il pomeriggio...ma ognuno
ha i propri limiti,  ho fatto innumerevoli prove
ma nulla...vediamo se ho capito qualcosa...nella sottomaschera
TabProdotti nel controllo IDAnagrafica dopo l'ID dovrei aggiungere
quanto segue: (?)
=Currentdb.Execute "Update Tabprodotti Set [data_prox
 scadenza]=DateAdd('d',[data_prox scadenza],30);("d",date,30) Where
 IdAnagrafica=" & me!IdAnagrafica
> (ripeto) Il codice è un esempio, tu devi verificare che i nomi degli
> oggetti (tabelle/query/campi/etc. etc.) siano quelli che ti servono...
> --
> Sergio MAZZA
Ciao Sergio... sono al Pc dalle 14.30... ora devo uscire a fare delle
commissioni...
altrimenti la moglie mi spela vivo...
se posso riprendo + tardi altrimenti domani dal lavoro...
certo se non vuoi rispondermi + sei libero di farlo (non mi offenderei,
hai molta pazienza..)
in quanto la cosa stà diventando lunga...
Ciao Giuseppe


title: come effettuare stampe multiple etc.

text:
"SuperPippo®_at Home" <cuccoT*O*G*L*I*S*P*A*
M...@libero.it
> ha scritto nel
messaggio news:X_Pgi.50581$%k.17...@twister2.libero.it...
>
> il DB che stò modificando o meglio stò cercando di modificare era solo un
> anagrafico..
> in un secondo tempo è stata aggiunta la sottomaschera TabProdotti, e
> grazie ad un amico
> in NG è stata aggiunta una maschera popup FrmScadenze basata sulla
> Qry_Scad che conosci.
> oggi ho aggiunto con la creazione guidata un bottone di stampa... ma senza
> alcuna opzione di filtraggio data di stampa etc...
> ho cmq aggiunto nel campo data prossima scadenza delle date fittizie 30 gg
> dopo la data di erogazione ricetta...
>
> fin qui ti seguo... questo è il codice del bottone di stampa:
>
> Private Sub prn_Click()
> On Error GoTo Err_prn_Click
>    Dim stDocName As String
>    stDocName = "Report1" (qui che stringa filtro dovrei mettere?)
Li non devi mettere nulla; se vedi l'help in linea del metodo OpenReport
(porti il cursore sulla parola e premi F1) ti renderai conto di dove
inserire il filtro (CondizioneWhere)
>    DoCmd.OpenReport stDocName, acPreview
Questa riga diventa:
DoCmd.OpenReport stDocName, acPreview,,"[data data_prox scadenza] = Date()"
Se vuoi stampare tutti quelli che hanno la data_prox scadenza = a oggi
(Date).
> Exit_prn_Click:
>    Exit Sub
> Err_prn_Click:
>    MsgBox Err.Description
>    Resume Exit_prn_Click
>   End Sub
> ---------------------
>
> beato te... io ho cercato di ragionarci tutto il pomeriggio...ma ognuno ha
> i propri limiti,  ho fatto innumerevoli prove
> ma nulla...vediamo se ho capito qualcosa...nella sottomaschera TabProdotti
> nel controllo IDAnagrafica dopo l'ID dovrei aggiungere quanto segue: (?)
No.
Devi anche saper leggere le istruzioni; l'help (di VBA) ti aiuta. Prova a
cercare Currentdb; poi il Metodo Execute e vedrai che capirai.
> =Currentdb.Execute "Update Tabprodotti Set [data_prox
> scadenza]=DateAdd('d',[data_prox scadenza],30);("d",date,30) Where
> IdAnagrafica=" & me!IdAnagrafica
Comunque questa è l'istruzione che aggiorna la data_prox scadenza
posticipandola di 30 giorni (DateAdd('d',[data_prox scadenza],30)) e lo fa
per tutti i record, nella tabella Tabprodotti, che hanno IdAnagrafica uguale
a quella del record selezionato (focus).
Quindi non va in nessuna query, ma segue l'istruzione dell'apertura del
report:
(sequenza operazioni)
- stampa ricette
- aggiornamento data_prox scadenza
Potresti (forse è meglio) mettere solo quel codice in un altro bottone,
perché se devi interrompere la stampa o solo vedere l'anteprima sarebbe un
casino.
Quindi crea a fianco del bottone di stampa un altro bottone che esegue
l'Execute.
> Ciao Sergio... sono al Pc dalle 14.30... ora devo uscire a fare delle
> commissioni...
> altrimenti la moglie mi spela vivo...
> se posso riprendo + tardi altrimenti domani dal lavoro...
> in quanto la cosa stà diventando lunga...
Purtroppo non può essere altrimenti, e sai il perché...
> Ciao Giuseppe
Ciao.
--
Sergio MAZZA


title: controllo su maschera prima di aggiornare

author: sPAriTO

text:
apro una maschera e automaticamente mi posiziono su un nuovo record con
"DoCmd.GoToRecord , , acNewRec"
appena inizio a scrivere sul primo campo di questo nuovo record la maschera
naturalmente si posiziona in modalit� aggiornamento (appare la matitina)
Al momento di "salvare" realmente il record faccio fare fare un controllo
alla maschera appunto su evento prima di aggiornare, se il controllo ritorna
la condizione, come faccio a riposizionarmi su questo record senza
aggiornare nulla e come se fossi entrato appena adesso sulla maschera ovvero
prima di scrivere sul primo campo?


author: CIDI

text:
"sPAriTO" <
spa...@spa.it
> ha scritto nel messaggio
news:h1svbf$fck$1...@news.eternal-september.org...

cancel = true
me.undo
ciao
Daniele


text:
"CIDI" <
dado...@spamtin.it
> ha scritto nel messaggio
news:4a420431$0$1111$4faf...@reader3.news.tin.it...

Gentilissimo!


title: Quale é il n.massimo del contatore

author: Elìa

text:
può sembrare non apporopriata come domanda: il campo contatore fino a che
numero max può arrivare?
Grazie
Elìa


title: Quale é il n.massimo del contatore

author: Michele (Giò)

text:
"Elìa" <
lmn...@tiscali.it
> ha scritto nel messaggio
news:44f946a9$0$13723$5fc...@news.tiscali.it...

Se è impostato a intero lungo, come obbligatorio mi sembra, si può arrivare
a 2^31-1 cioè 2.147.483.647.


title: Quale é il n.massimo del contatore

text:
"Michele (Giò)" <
joyl...@alice.it
> ha scritto nel messaggio
news:44f9483c$0$15874$4faf...@reader2.news.tin.it...

>Grazie


title: Form basata su due tabelle

author: michi

text:
Ciao,
ho una form dove vedo i dati personali dei  soci di un club.
La form é basata su due tabelle (A e B)
La relazione tra le due tabelle é 1 a 1 (Includi tutti i record di A e solo
i B corrispondenti; Aggiorna campi correlati a catena).
Una casella di testo é associata a un campo della tabella B. Questo campo
posso modificarlo solo se il socio ha un record corrispondente nella tabella
B.
SE però un socio non ha un record corrispondente nella tabella B, non riesco
ad aggiungerne uno e mi viene detto:
"Imposssibile immettere un valore in un campo vuotodel lato 'uno' di un join
esterno"
Qualcuno sa aiutarmi?
Grazie
Michi


title: Form basata su due tabelle

author: Roberto da casa

text:
"michi" <
mich...@freesurf.ch
> ha scritto nel messaggio
news:995rui$l9c$1...@news1.sunrise.ch...

Perché non provi a crearti una maschera che abbia come origine record la
tabella A e che contiene anche una sottomaschera che ha come origine record
la tabella B?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: automatizzare "TROVA"

author: rik

text:
ho una tabella con una singola colonna ove ogni riga contiene varie
informazioni .
con "trova" la soluzione è limitata a trovare un singolo record per volta,
mentre vorrei visualizzarli tutti insieme, visto l'enorme quantità di dati
a disposizione.
premetto che una query non mi trova tutti i record che corrispondono ai
criteri di ricerca.
grazie anticipato.
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: automatizzare "TROVA"

text:
"rik" <
r...@tisc.net
> ha scritto nel messaggio
news:c739r5$lmh$1...@news.newsland.it...
> ho una tabella con una singola colonna ove ogni riga contiene varie
> informazioni .
> con "trova" la soluzione è limitata a trovare un singolo record per volta,
> mentre vorrei visualizzarli tutti insieme, visto l'enorme quantità di dati
> a disposizione.
> premetto che una query non mi trova tutti i record che corrispondono ai
> criteri di ricerca.
> grazie anticipato.
>
> --
Prova con: filtro in base a maschera...
Ciao.
--
Sergio MAZZA


title: *** QUESITO x ME DIFFICILE ***

text:
Come si può copiare il contenuto di una casella di testo da una maschera
access in un file txt,
accodandolo ?
Grazie
Simone
IMPORTANT NOTICE:
This email is confidential, may be legally privileged, and is for the
intended recipient only. Access, disclosure, copying, distribution, or
reliance on any of it by anyone else is prohibited and may be a criminal
offence. Please delete if obtained in error and email confirmation to the sender.
--
Posted from
mail-out-01.piro.net
 [194.64.31.11]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: *** QUESITO x ME DIFFICILE ***

author: RoDAgo

text:
Simene scrisse ...
>Come si può copiare il contenuto di una casella di testo da una maschera
>access in un file txt,
>accodandolo ?
Ma di getto mi viene sta roba.
Non so se funge.
Dai un'occhiata all'help sulla gestione dei file:
    open "tuofile.txt" for append As #1
        Print #1 ; tuocontrollo
    close #1
Cià RoDAgo


title: create table e campi contatore

author: Lbo

text:
come si fa in sql a creare una tabella che contiene un campo memo e
uno contatore?
grazie,
L.
--
non studio non lavoro non guardo la tv
non vado al cinema non faccio sport
----------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access


title: create table e campi contatore

author: Federico Luciani

text:
Lbo wrote:
> come si fa in sql a creare una tabella che contiene un campo memo e
> uno contatore?
> grazie,
se la tabella e' MSAccess:
CREATE TABLE nomeTab (Id Counter, Descrizione Memo)
> il sito comune di it.comp.appl.access:
>
http://members.xoom.it/it_db_access
cambia il link in:
http://www.sitocomune.com
:-))
--
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: create table e campi contatore

text:
>cambia il link in:
>
http://www.sitocomune.com
>
>:-))
anvedi... ecco che vuol dire seguire il gruppo sporadicamente!
l'ho cambiato, non so se viene anche in questo messaggio.
--
non studio non lavoro non guardo la tv
non vado al cinema non faccio sport
----------------------------------------
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


title: create table e campi contatore

text:
Lbo wrote:
> >cambia il link in:
> >
http://www.sitocomune.com
> >
> >:-))
>
> anvedi... ecco che vuol dire seguire il gruppo sporadicamente!
eh gia'.. ;-)
> l'ho cambiato, non so se viene anche in questo messaggio.
viene, viene.
hai visto il nuovo sito?
> ----------------------------------------
>
> il sito comune di it.comp.appl.access:
>
http://www.sitocomune.com
--



title: create table e campi contatore

text:
>hai visto il nuovo sito?
no, cribbio, ce sta na valanga di msgbox che non riesco a fermà...
--
non studio non lavoro non guardo la tv
non vado al cinema non faccio sport
----------------------------------------



title: create table e campi contatore

text:
Lbo wrote:
> >hai visto il nuovo sito?
>
> no, cribbio, ce sta na valanga di msgbox che non riesco a fermà...
per quello, parla con Luciano :-)



title: create table e campi contatore

text:
>> no, cribbio, ce sta na valanga di msgbox che non riesco a fermà...
>
>per quello, parla con Luciano :-)
è che mi vergogno un po' ad aver creduto che esisteva il
compilatore...



title: Access2007 e VB6: Help

author: TG

text:
Ho convertito un db di access 2000 ad Access2007 e lo vorrei utilizzare da
dentro il mio progetto VB6.
Quali stringhe di connessione devo usare, visto che mi cerca un database
.mdb ed Access2007 ora usar .accdb ?
Ed infine come impostare la connessione anche nel DataReport?..
Grazi mille.


title: Access2007 e VB6: Help

author: geppo

text:
Ciao "TG" <
in...@tecnogarden.net
> ha scritto nel messaggio
news:49ad13e0$0$1111$4faf...@reader4.news.tin.it...

Vedi se ti torna utile questo sito segnalato da Sergio MAZZA:
http://www.connectionstrings.com/
> Grazi mille.
--
Ciao
geppo


title: Access2007 e VB6: Help

text:
> Vedi se ti torna utile questo sito segnalato da Sergio MAZZA:
>
>
http://www.connectionstrings.com/
>
Ciao, già visto e provato.
In molti mi dicono di vedere tale connectionString, ma non riesco ad
utilizzarla da codice. Io ho sempre usato il metodo "opendatabase" e con
questa connectionString invece come la dovrei usare?...
Mi trovo un pò nelle canne.
Sai darmi una mano te?...
Grazie mille!


title: Access2007 e VB6: Help

text:
Ciao "TG" <
in...@tecnogarden.net
> ha scritto nel messaggio
news:49ae3cae$0$1115$4faf...@reader1.news.tin.it...

Se hai sempre usato quel metodo perchè non continui ad usarlo? Cho problemi
riscontri?
> Grazie mille!
--
Ciao
Geppo


title: Access2007 e VB6: Help

text:
> Se hai sempre usato quel metodo perchč non continui ad usarlo? Cho
> problemi riscontri?
Sto provando ad usare x il workspace creato:
dim DB_Conn as connection
set DB_Conn = WS.OpenConnection (....sintassi trovata x connessione ad
Access2007)
ma mi da errore:
"problema 3251. operaz. non supportata per questo tipo di oggetto"
io ho sempre usato x il workspace creato:
set db = workspace.OpenDataBase("percorso", false, false, "Ms Access;
UID=admin; PWD="xxxx")


title: Access2007 e VB6: Help

text:
Ciao "TG" <
in...@tecnogarden.net
> ha scritto nel messaggio
news:49af9554$0$840$4faf...@reader5.news.tin.it...
>> Se hai sempre usato quel metodo perchè non continui ad usarlo? Cho

prova cosi:
dim db as database
dim vApp as object
set vApp = createobject("Access.Application.12")
set db= vApp.dbengine.openrecordset"("Percorso database accdb")
p.s.: comunque c'è anche un news group dedicato a VB6
it.comp.lang.Visual-Basic
--
Ciao
Geppo


title: Access2007 e VB6: Help

text:
"geppo" <c...@tin.it.invalid> ha scritto nel messaggio
news:f4_rl.190124$Ca.3...@twister2.libero.it...
> Ciao "TG" <
in...@tecnogarden.net
> ha scritto nel messaggio
> news:49af9554$0$840$4faf...@reader5.news.tin.it...
>>> Se hai sempre usato quel metodo perchč non continui ad usarlo? Cho
>>> problemi riscontri?
>>
>> Sto provando ad usare x il workspace creato:
>>
>> dim DB_Conn as connection
>> set DB_Conn = WS.OpenConnection (....sintassi trovata x connessione ad
>> Access2007)
>>
>> ma mi da errore:
>> "problema 3251. operaz. non supportata per questo tipo di oggetto"
>>
>> io ho sempre usato x il workspace creato:
>> set db = workspace.OpenDataBase("percorso", false, false, "Ms Access;
>> UID=admin; PWD="xxxx")
>
> prova cosi:
>
> dim db as database
> dim vApp as object
>
> set vApp = createobject("Access.Application.12")
>
> set db= vApp.dbengine.openrecordset"("Percorso database accdb")
>
>
> p.s.: comunque c'č anche un news group dedicato a VB6
> it.comp.lang.Visual-Basic
>
> --
> Ciao
> Geppo
>


title: Aggiornamento record

author: Giorgio M

text:
Salvbe
Ho una maschera continua collegata ad una tabella
Tra i vari campi della tabella ho un campo "SI/NO"
nella maschera ho questo controllo "SI/NO" e nella maschera ho un pulsante
che una volta premuto mi richiama una query che visualizza solo i record
che hanno il campo "SI/NO" uguale a VERO
IL problema è che se seleziono il campo "SI/NO" e premo il pulsante la
query non mi visualizza il record (come se non avessi selezionato "SI/NO"
Per visualizzarlo devo selezionare "SI/NO" e poi spostarmi al record
successivo.
Come mai non si aggiorna nel premere il pulsante ??
Grazie
Ciao
Giorgio
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Aggiornamento record

author: Karl Donaubauer

text:
Giorgio M wrote:
> Ho una maschera continua collegata ad una tabella
> Tra i vari campi della tabella ho un campo "SI/NO"
>
> nella maschera ho questo controllo "SI/NO" e nella maschera ho un pulsante
> che una volta premuto mi richiama una query che visualizza solo i record
> che hanno il campo "SI/NO" uguale a VERO
>
> IL problema è che se seleziono il campo "SI/NO" e premo il pulsante la
> query non mi visualizza il record (come se non avessi selezionato "SI/NO"
>
> Per visualizzarlo devo selezionare "SI/NO" e poi spostarmi al record
> successivo.
>
> Come mai non si aggiorna nel premere il pulsante ??
Prima di aprire la query devi salvare il record p.e. con:
If Me.Dirty Then Me.Dirty = False
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: Aggiornamento record

author: Bruno Campanini

text:
"Giorgio M" <
giorg...@tiscalinet.it
> wrote in message
news:fsgl2g$fje$1...@news.newsland.it...
> Salvbe
>
> Ho una maschera continua collegata ad una tabella
> Tra i vari campi della tabella ho un campo "SI/NO"
>
> nella maschera ho questo controllo "SI/NO" e nella maschera ho un pulsante
> che una volta premuto mi richiama una query che visualizza solo i record
> che hanno il campo "SI/NO" uguale a VERO
>
> IL problema è che se seleziono il campo "SI/NO" e premo il pulsante la
> query non mi visualizza il record (come se non avessi selezionato "SI/NO"
>
> Per visualizzarlo devo selezionare "SI/NO" e poi spostarmi al record
> successivo.
>
> Come mai non si aggiorna nel premere il pulsante ??
I record vengono salvati solo quando cambi record ovvero
esegui apposito comando tipo:
RunCommand acCmdSaveRecord
Puoi metterlo in OnEnter del button che attiva la query
o comunque eseguirlo prima che questa venga chiamata.
Bruno


title: ActiveX

author: Gino Palmia

text:
Ecco il mio problema!
Ho realizzato un applicazione con Access.
In una maschera c'è un bottone che, se pigiato, inserisce certi dati
presenti nel db in un file di Excel.
Per fare in modo che l'utente possa decidere il percorso del file, ho
inserito nella maschera un Common Dialog Box e, lanciando il metodo
"showsave" tutto funziona egregiamente.
Il problema nasce quando trasferisco la mia applicazioncina su un altro PC
dove evidentemente il file ocx non c'è; poco male ho pensato, ce lo metto
io.
Avrete già capito dove voglio arrivare....
Come faccio a risolvere i problema?.


title: ActiveX

author: Emyr

text:
On Sat, 30 Nov 2002 11:15:09 GMT, "Gino Palmia" <
gpa...@virgilio.it
>
wrote:

dovresti dirci a quale activex ti riferisci....
per le common dialog box puoi usare modificandolo
Private Declare Function GetOpenFileName Lib "comdlg32.dll" _
            Alias "GetOpenFileNameA" (pOpenfilename As OPENFILENAME)
As Long
Private Type OPENFILENAME
   lStructSize As Long
   hwndOwner As Long
   hInstance As Long
   lpstrFilter As String
   lpstrCustomFilter As String
   nMaxCustFilter As Long
   nFilterIndex As Long
   lpstrFile As String
   nMaxFile As Long
   lpstrFileTitle As String
   nMaxFileTitle As Long
   lpstrInitialDir As String
   lpstrTitle As String
   flags As Long
   nFileOffset As Integer
   nFileExtension As Integer
   lpstrDefExt As String
   lCustData As Long
   lpfnHook As Long
   lpTemplateName As String
End Type
Public Function sceglifile(Optional tipo As String = "*.*")
   Dim OpenFile As OPENFILENAME
   Dim lReturn As Long
   Dim sFilter As String

   OpenFile.lStructSize = Len(OpenFile)
   sFilter = "(" & tipo & ")" & Chr(0) & tipo & Chr(0)
   OpenFile.hwndOwner = Application.hWndAccessApp
   OpenFile.lpstrFilter = sFilter
   OpenFile.nFilterIndex = 1
   OpenFile.lpstrFile = String(257, 0)
   OpenFile.nMaxFile = Len(OpenFile.lpstrFile) - 1
   OpenFile.lpstrFileTitle = OpenFile.lpstrFile
   OpenFile.nMaxFileTitle = OpenFile.nMaxFile
   OpenFile.lpstrInitialDir = Application.CurrentProject.Path
   OpenFile.lpstrTitle = "Selezione"
   OpenFile.flags = 0
   lReturn = GetOpenFileName(OpenFile)

   If lReturn = 0 Then
      sceglifile = ""
   Else
      sceglifile = Left(OpenFile.lpstrFile, InStr(OpenFile.lpstrFile,
Chr$(0)) - 1)
   End If
End Function
Saluti.
Emanuele.


title: ActiveX

text:
"Emyr" <
fan...@lavoro.com
> ha scritto nel messaggio
news:ckbhuusrh6hrk2qp4...@4ax.com...

Grazie!
Con le opportune modifiche funziona tutto perfettamente
Saluti


title: Come aggiungere un 'evento' a procedura Microsoft Access ?

author: RobertoA

text:
Su elaboratore 1 ho un server mqtt, ed una procedura in C# che 'sente' i
comandi inviati dai client connessi al server stesso, ed e' in grado di
eseguire qualsiasi comando
Su elaboratori 2 e 3 ho una procedura Access che deve gestire i comandi
ricevuti dal server mqtt
Vorrei trovare un modo, che esclude il polling, per eseguire del codice
vba quando nel server mqtt arriva un comando

La domanda e': come fare da codice vba (contenuto nelle procedure su pc
2 e 3) per 'sentire' i comandi ricevuti sul server mqtt?
L'ideale sarebbe aggiungere un 'evento' a quelli disponibili da codice
vba, per reagire appena arriva un comando
Un sistema simile a quello realizzato da quelle librerie che consentono
la comunicazione su porta seriale, quando arrivano caratteri sulla porta
rs232 viene scatenato un evento al quale Access puo' reagire


title: Creare un filtro su maschera

author: Gianfranco ED

text:
Salve, ho creato una maschera clienti, ogni cliente ha un codice
indicativo del listino prezzi applicatogli.
Ho creato quindi una sottomaschera ordini clienti, derivata da una
query, ora vorrei poter creare un ordine per il cliente nella
sottomaschera che visualizzi solo i campi del listino prezzi con il
codice identificativo del cliente associato.
Come posso fare?


title: Peso db

author: fausto

text:
a seguito di un post precedente si era entrati in tema di peso db e mediante
la funzione seguente pubblicata da RobertoA sono riuscito a capire dove il
mio db prendeva parecchio peso.
ora chiedo una cosa
tutte le maschere che ho le ho create con il tema sabbia di access ma mi sa
che facendo cosě in ogni maschera c'č incorporata l'immagine.
dove posso prendere il file sabbia per collegare lo sfondo in apertura e
secondo voi č meglio collegarle le immagini di sfondo delle maschere o
lasciarle incorporate?
grazie mille
poi passerň a fare quanto descritto in
v.a.
http://www.donkarl.com/it?FAQ1.22
che mi ha consigliato Karl
Ciapa ki:
'====================================================================
' Name:    DocDatabase
' Purpose: Documents the database to a series of text files
'
' Author:  Arvin Meyer
' Date:    June 02, 1999
' Comment: Uses the undocumented [Application.SaveAsText] syntax
'          To reload use the syntax [Application.LoadFromText]
'      Modified to set a reference to DAO 8/22/2005
'====================================================================
Public Sub Documenta_Database()
10    On Error GoTo Err_DocDatabase
      Dim dbs As DAO.Database
      Dim cnt As DAO.Container
      Dim doc As DAO.Document
      Dim i As Integer
20    nome_dir = Application.CurrentProject.Path & "\PRG_ESP_TXT_" &
Format$(Now, "yyyy_mm_dd_hh_nn_ss")
30    If Len(Dir(nome_dir, vbDirectory)) < 1 Then
40        MkDir nome_dir
50        End If
60    Set dbs = CurrentDb() ' use CurrentDb() to refresh Collections
70    Set cnt = dbs.Containers("Forms")
80    For Each doc In cnt.Documents
90        Debug.Print "FORM ==> " & doc.Name
100       Application.SaveAsText acForm, doc.Name, nome_dir & "\" & doc.Name
& ".txt"
110       Next doc
120   Set cnt = dbs.Containers("Reports")
130   For Each doc In cnt.Documents
140       Debug.Print "REPORT ==> " & doc.Name
150       Application.SaveAsText acReport, doc.Name, nome_dir & "\" &
doc.Name & ".txt"
160       Next doc
170   Set cnt = dbs.Containers("Scripts")
180   For Each doc In cnt.Documents
190       Debug.Print "MACRO ==> " & doc.Name
200       Application.SaveAsText acMacro, doc.Name, nome_dir & "\" &
doc.Name & ".txt"
210       Next doc
220   Set cnt = dbs.Containers("Modules")
230   For Each doc In cnt.Documents
240       Debug.Print "MODULO ==> " & doc.Name
250       Application.SaveAsText acModule, doc.Name, nome_dir & "\" &
doc.Name & ".txt"
260       Next doc
270   For i = 0 To dbs.QueryDefs.Count - 1
280       Debug.Print "QUERY ==> " & dbs.QueryDefs(i).Name
290       Application.SaveAsText acQuery, dbs.QueryDefs(i).Name, nome_dir &
"\" & dbs.QueryDefs(i).Name & ".txt"
300       Next i
310   Set doc = Nothing
320   Set cnt = Nothing
330   Set dbs = Nothing
Exit_DocDatabase:
340       Exit Sub
Err_DocDatabase:
350       Select Case Err
          Case Else
360           MsgBox Err.Description
370           Resume Exit_DocDatabase
380       End Select
End Sub
--
Negrinelli Walter


title: Peso db

text:
scusate magari sono stato troppo lungo prima e qualcuno non ha letto la
domanda
secondo voi è meglio collegarle le immagini di sfondo delle maschere o
 lasciarle incorporate?
questo vale sia per il peso del db ma anche per la sua utilizzabilità non è
che dopo mi impieghi troppo a caricare una mascera perchè deve caricare
l'immagine di sfondo
fatemi sapere per piacere un vostro parere
grazie mille


title: Peso db

author: Silvio

text:
> secondo voi č meglio collegarle le immagini di sfondo delle maschere o
> lasciarle incorporate?
> questo vale sia per il peso del db ma anche per la sua utilizzabilitŕ non
> č che dopo mi impieghi troppo a caricare una mascera perchč deve caricare
> l'immagine di sfondo
> fatemi sapere per piacere un vostro parere
Ciao Fausto.
Secondo me č molto meglio collegarle: l'mdb č piů snello e non noto alcun
rallentamento nel caricare le immagini ogni volta.
Non so in che cartella Access abbia le immagini di sfondo predefinite (tipo
sabbia).
Ciao
Silvio


title: Peso db

text:
fausto wrote:
> ...
> tutte le maschere che ho le ho create con il tema sabbia di access
> ma mi sa che facendo così in ogni maschera c'è incorporata
> l'immagine. dove posso prendere il file sabbia per collegare lo sfondo in
> apertura
Se sabbia = sandstone:
...cartella di Office\Bitmaps\Styles\Acsndstn.gif
> e secondo voi è meglio collegarle le immagini di sfondo
> delle maschere o lasciarle incorporate?
1. Lascarle perdere
2. Lascarle perdere
3. Devi sapere tu cos'è più importante: il peso o un momento
per scaricare l'immagine.
Con queste immagini ottimizzate di solito la differenza nel peso
è <100 kb/oggetto, ma certo se ci sono molti oggetti...
--
Ciao
Karl
*********
Access FAQ:
http://www.donkarl.com/it


title: Lavorare con l'autoincrementante

author: Chip & Chop

text:
E' possibile fare in modo che un campo chiave autoincrementante si
incrementi alla fine dell'inserimento di un nuovo record e non all'inizio
quando si apre la maschera di inserimento?
Lo so che non è bello usarli e che sarebbe meglio farsi dei campi ad ok ...
Grazie


title: Lavorare con l'autoincrementante

author: Alessandro

text:
"Chip & Chop" <
saveri...@libero.it
> wrote in message
news:EKmk8.20586$1S3.6...@twister1.libero.it...
> E' possibile fare in modo che un campo chiave autoincrementante si
> incrementi alla fine dell'inserimento di un nuovo record e non all'inizio
> quando si apre la maschera di inserimento?
>
> Lo so che non č bello usarli e che sarebbe meglio farsi dei campi ad ok ...
>
> Grazie
No.
Se vuoi fare cosě devi realizzarti un CAMPO PRIMARY KEY personalizzato
che su evento Before_Update di Maschera incrementi di 1 [Dmax(...)+1]
Se usi A2000 puoi rendere invisibile il dato e nell'evenienza
Me.UNDO
Alessandro.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Lavorare con l'autoincrementante

text:
"Alessandro" <
ik2...@libero.it
> ha scritto nel messaggio
news:c107875d5c25e82cb7...@mygate.mailgate.org...

Effettivamente č il modo piů pulito e sicuro!
Il fatto č che mi ero creato una maschera "fittizzia" (cioč i cui campi non
erano collegati al DB) quindi in un secondo tempo (pressione del tasto
"salva") li rovesciavo con una procedura sui campi di una nuova riga che
salvavo subito (comprensivo dell'autoincrementante) cosě da riducevo al
minimo le collisioni che si causano in un DB in rete diviso tra BE e FE.
L'elevato tasso di collisione č dovuto al fatto che l'autoincremento avviene
subito all'apertura della maschera e permane fino a che non si salva o si
annulla la riga, se qualcuno perň da un'altra parte inserisce anche lui una
riga ottiene lo stesso numero incrementante (probabilmente perché
l'aggionamento del contatore avviene solo alla fine del salvataggio).
Cosě mi chedevo se si poteva ritardare al massimo tale incremento .... ma
non si puň! :(
Grazie lo stesso!!
Saverio


title: Lavorare con l'autoincrementante

author: Alberto S.

text:
[CUT]
> Lo so che non è bello usarli e che sarebbe meglio farsi dei campi ad ok
...
[CUT]
Il latino ... è vero che è morto ... ma penso che ora si starà rivoltando
nella tomba ...
Salve
--
Alberto


title: Lavorare con l'autoincrementante

text:
"Chip & Chop" <
saveri...@libero.it
> wrote in message
news:yNsk8.22622$1S3.6...@twister1.libero.it...
> Effettivamente è il modo più pulito e sicuro!
> Il fatto è che mi ero creato una maschera "fittizzia" (cioè i cui campi non
> erano collegati al DB) quindi in un secondo tempo (pressione del tasto
> "salva") li rovesciavo con una procedura sui campi di una nuova riga che
> salvavo subito (comprensivo dell'autoincrementante) così da riducevo al
> minimo le collisioni che si causano in un DB in rete diviso tra BE e FE.
> L'elevato tasso di collisione è dovuto al fatto che l'autoincremento avviene
> subito all'apertura della maschera e permane fino a che non si salva o si
> annulla la riga, se qualcuno però da un'altra parte inserisce anche lui una
> riga ottiene lo stesso numero incrementante (probabilmente perché
> l'aggionamento del contatore avviene solo alla fine del salvataggio).
> Così mi chedevo se si poteva ritardare al massimo tale incremento .... ma
> non si può! :(
>
> Grazie lo stesso!!
>
> Saverio
Già in effetti il problema che hai evidenziato è BEN NOTO agli
sviluppatori, e non solo di ACCESS.
Con il tuo sistema in ogni caso avresti dei problemi nell'eventualità
di SubForm........!
Ho letto un commento a riguardo di un'illustre componente dell'MVPS
che suggeriva la soluzione di IMPEGNARE il Numero e salvare subito
per mettersi al sicuro da possibili Dupplicati (il millisecondo di
sincronismo succede solo nelle favole).
Al termine se il SAVE è OK sovrascive, altrimenti esegue un
DELETE.
Questo obbliga in ogni caso ad evitare l'utilizzo di COUNTER, in quanto
renderebbe impossibile l'eventuale IMPEGNO di un BUCO.......!
Un'altra alternativa letta è la famosa TBL TEMP nel BE in cui
ogni utente alla prenotazione di un PROGRESSIVO scrive ed occupa
il NUMERO, e al salvataggio lo elimina.
Ovvio che con DMAX poi devi verificare con Dlookup nella TblTEMP.
Un pò macchinoso, ma semplicissimo e abbastanza affidabile.
(Io uso questo sistema)



title: Filtro query in base a settimana

author: Ema

text:
Salve a tutti! Ho un problema piccolo piccolo ma che x me (purtroppo)
è grande grande!!!
Che istruzione sql devo inserire in una query x filtrare una serie di
record che corrispondano alla 1a settimana, alla 2a ....etc  del mese
corrente??. Senza dover tt le volte cambiare nell'isrtuzione la data??
Grazie!


title: Filtro query in base a settimana

author: Marco

text:
>Che istruzione sql devo inserire in una query x filtrare una serie di
>record che corrispondano alla 1a settimana, alla 2a ....etc  del mese
>corrente??. Senza dover tt le volte cambiare nell'isrtuzione la data??
Dai un occhio alle FAQ:
http://www.donkarl.com/it/
Sezioni 2.8 e 2.9.
Ciao
Marco


title: Numeri come stringa di caratteri

author: Fulvio

text:
Mi scuso ancora una volta per le continue richieste di aiuto.
Ho il seguente problema.
voglio riunire in un unico campo i valori di tre campi numerici.
non voglio però ottenere la somma, ma la loro visualizzazione come fossero
tre stringhe separate da un tratto.
Se io creo nella query una formula con [campo1]+[campo2]+[campo3]ottengo
naturalmente un valore numerico che è la somma dei valori contenuti nei
campi 1,2 e3. io vorrei ottenere[ "valore1"-"valore2"-"valore3"]. Spero di
essere stato chiaro.
Saluti e grazie a tutti.
Fulvio


title: Numeri come stringa di caratteri

author: Sergio MAZZA (Ufficio Stampa)

text:
"Fulvio" <
fulv...@libero.it
> ha scritto nel messaggio
news:mntI6.6897$UW4.6...@news.infostrada.it...

Prova con:
'----------------
[campo1] & "-" & [campo2] & "-" & [campo3]
'----------------
Ciao.


title: togliere msg apertura runtime

author: Xÿmox

text:
come è possibile togliere questo messaggio all'apertura del programma in
modalità runtime scritto in access?

https://www.dropbox.com/s/ksc89kqf3f1vpy5/msg_access.PNG?dl=0

grazie


title: togliere msg apertura runtime

author: Giorgio Rancati

text:

Ciao,

puoi prendere spunto da qui:
https://accessdaziacin.wordpress.com/2010/02/18/aggiungere-una-directory-alle-trusted-location-di-access/

per comporre la chiave di registro con la giusta versione di access puoi usare l'istruzione Application.Version

Ciao
Giorgio Rancati


title: togliere msg apertura runtime

text:
Il 06/05/23 10:28, Giorgio Rancati ha scritto:

> puoi prendere spunto da qui:
>
https://accessdaziacin.wordpress.com/2010/02/18/aggiungere-una-directory-alle-trusted-location-di-access/

>
> per comporre la chiave di registro con la giusta versione di access puoi usare l'istruzione Application.Version
>
> Ciao
> Giorgio Rancati
>

ti ringrazio

ciao marco


title: togliere msg apertura runtime

text:
Il 02/05/23 12:47, Xÿmox ha scritto:

ho poi risolto scaricando il file exe a seconda della versione di Access
installata da questo sito:
https://www.accessribbon.de/en/?Trust_Center:Trusted_Locations

ciao


title: Stampa assegni su modulo continuo con Access

author: Marica Campolucci

text:
Devo stampare degli assegni prestampati su di un modulo continuo.
Riesco a lavorarci con i report oppure mi devo creare un fincato con
l'oggetto print o printer, non so bene come fare, anzi non so proprio dove
iniziare.
Qualcuno ha avuto modo di creare un fincato con l'oggetto in questione ?
Potrei avere un esempio di fincato per prendere uno spunto ?
grazie per la collaborazione !!!!!!!!!!!!!!!!!!!!!
--
Posted from [194.243.108.103]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


author: RoDAgo

text:
Alessandro Cara scrisse...
>
> Marica Campolucci ha scritto:
>
> > Devo stampare degli assegni prestampati su di un modulo continuo.
> > Riesco a lavorarci con i report oppure mi devo creare un fincato con
> >
>
> Anche in riferimento al tuo messaggio successivo (costruzione di un
fincato),
> se gli assegni sono prestampati cosa vuoi "fincare"?. Dovrai al massimo
> riempire nel posto giusto tutte le informazioni richieste gestendo
> correttamente il formato pagina. Non l'ho mai fatto, ma ad occhio non mi
> sembra che ci siano difficoltà insormontabili.
Già fatto tempo fà per la Finemiro Banca, tutto funzia egreggiamente con
stampantina ad aghi e assegni su modulo continuo.
>Dovrai, presumo,solo sprecare
> un po' di assegni con le prove e fare un po' di prova "finestra" cioe'
> stampare su carta bianca e vedere se il formato in stampa "ci azzecca" con
gli
> assegni
Difatti, dopo qualche prova su fotocopie e carta bianca il gioco funziona
perfettamente da due anni, sei giorni su sette (la domenica sono chiusi).
> a.cara
>
RoDAgo


title: Problemi con libreria FORMS 2.0

text:
Scusate la domanda, forse vi sarà già stata esposta prima ma..
Ho la necessità di copiare negli Appunti di Win un testo (un nome di file)
Ho trovato la routine da qualche parte, che usa la lib. FM20.DLL, e che per
comodiutà ho copiato nella c:\, in modo che sia sicuro che il database punti
sempre nello stesso punto, indipendentemente dalla cartella d'installazione
di Office.
Premetto che fino poco tempo fa mi funzionava benissimo, sia in A97 che
A2000, ma non so spiegarmi xchè ora in A97 non funziona +, mentre in A2000
continua ad andare!
Questa è la routine:
Dim ClipBoard as DataObject
Set Clipboard = New DataObject
Clipboard.SetText "testo da copiare negli appunti"
Clipboard.PutInClipboard
Ma A97, mi genera l'errore:
Il componente Activex non è in grado di creare l'oggetto!
Sapete spiegarmi cosa vuol dire? Non potrebbe dipendere da qualche problema
sugli appunti di Win
Cmq. sia, so che l'uso delle librerie è sempre sconsigliato: ma sapreste
indicarmi un metodo migliore, e soprattutto: + sicuro e stabile?
Grazie a chiunque voglia aiutarmi!
Mark


title: memorizzare la data in un form (access 2007)

author: robby

text:
Ciao a tutti,
domandina semplice semplice (spero), in una maschera come è possibile
memorizzare il campo "data" in modo che al successivo inserimento mi
proponga la "data" precedentemente inserita e non quella attuale?
ciao e grazie per l'aiuto.
Robby


author: Alessandro Cara

text:

Risposta semplice semplice:Se quella data la hai scritta da qualche
parte la recuperi altrimenti accontentati di quella corrente.
--
ac (x=y-1)