title: db su disco di rete

author: GiangiRank

text:
ciao a tutti
sto cercando (per ora inutilemnte) di lavorare con un db access in rete.
su un pc ho un applicazione (c#) che si connetterà al db access che sta
sul disco di un altro pc,  sulla stessa rete.
Questa la connection string:
<add key="connectionString" value="Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=\\192.168.10.10\nomeDb.mdb" />
ma quando fa la connessione mi dice che il percorso non è valido.
se lo apro da explorer invece è tutto  ok!
suggerimenti?


title: db su disco di rete

author: Bruno Campanini

text:
"GiangiRank" <
travian201...@email.it
> wrote in message
news:g8bgnf$8ri$1...@aioe.org...

Ti devi collegare a un database esterno per far che cosa?
Dovendone semplicemente utilizzare le tabelle, la via più
semplice è quella che ti suggerisce il Table Link Manager.
Bruno


title: db su disco di rete

text:
> Ti devi collegare a un database esterno per far che cosa?
ho un db che viene aggiornato da un servizio c#, ma anche da un
applicaqzione web, che npon risiederanno sulla stessa macchina.
> Dovendone semplicemente utilizzare le tabelle, la via più
> semplice è quella che ti suggerisce il Table Link Manager.
ah ok, ora cerco qualcosa perchè non so di cosa tu mi stia parlando! :-)


title: db su disco di rete

author: Cinzia

text:
"GiangiRank" <
travian201...@email.it
> ha scritto nel messaggio
news:g8bkvd$8b7$1...@aioe.org...

Ciao Giangi,
il table link manager è una funzione di Access, nel tuo caso non
servirebbe.
Hai provato a mappare il disco di rete e ad usare la lettera
corrispondente, invece dell'ip adress?
--
Cinzia [Office Access MVP]
_______________________

www.riolab.org
http://accessdaziacin.live.spaces.com
---------------------------------------->


title: db su disco di rete

author: Alessandro Baraldi

text:
On 18 Ago, 13:10, "Cinzia" <
cinziapagani-no-spam_ple...@tiscali.it
>
wrote:
> "GiangiRank" <
travian2010SSUCAMI...@email.it
> ha scritto nel messaggionews:g8bkvd$8b7$1...@aioe.org...
>
> >> Ti devi collegare a un database esterno per far che cosa?
>
> > ho un db che viene aggiornato da un servizio c#, ma anche da un
> > applicaqzione web, che npon risiederanno sulla stessa macchina.
>
> >> Dovendone semplicemente utilizzare le tabelle, la via più
> >> semplice è quella che ti suggerisce il Table Link Manager.
>
> > ah ok, ora cerco qualcosa perchè non so di cosa tu mi stia parlando!
> > :-)
>
> Ciao Giangi,
> il table link manager è una funzione di Access, nel tuo caso non
> servirebbe.
> Hai provato a mappare il disco di rete e ad usare la lettera
> corrispondente, invece dell'ip adress?
>
> --
> Cinzia [Office Access MVP]
Ciao Cinzia...
Speriamo non sia così...(ma da quanto mi risulta è proprio come dici
con JET)
Purtroppo la ritengo una pessima cosa la mappatura delle risorse che
sarebbe meglio evitare...per motivi di sicurezza, essendo oltretutto
una cartella R/W(ma è mia opinione)...!
Per questo motivo quando mi appoggiavo a JET Mappavo e Smappavo... ma
si poneva il problema dei privilegi dello USER..., insomma ne usciva
una cosa poco corretta.
Ciao ben risentita...
@Alex


title: db su disco di rete

text:
> Hai provato a mappare il disco di rete e ad usare la lettera
> corrispondente, invece dell'ip adress?
>
si ho anche provato così ma niente
in ogni caso l'errore che mi viene fuori è che il file è già aperto in
maniera esclusiva da qualche altro utente... in realtà non è così


title: db su disco di rete

text:

Cancella il file LDB di bloccaggio(che trovi nella stessa Path)... poi
riprova.
@Alex


title: db su disco di rete

text:
> Cancella il file LDB di bloccaggio(che trovi nella stessa Path)... poi
> riprova.
č che non me lo crea neanche


title: db su disco di rete

text:
"GiangiRank" <
travian201...@email.it
> ha scritto nel messaggio
news:g8boh1$46o$1...@aioe.org...
>
>> Cancella il file LDB di bloccaggio(che trovi nella stessa Path)...
>> poi
>> riprova.
>
>
> è che non me lo crea neanche
ciao Giangi,
diritti sulla cartella di rete e istruzione usata per aprire il file?
potrebbe essere che tenta di creare il file LDB ma non ha diritti
suffiicienti, da qui l'errore..



title: db su disco di rete

text:
Cinzia ha scritto:
> "GiangiRank" <
travian201...@email.it
> ha scritto nel messaggio
> news:g8boh1$46o$1...@aioe.org...
>>> Cancella il file LDB di bloccaggio(che trovi nella stessa Path)...
>>> poi
>>> riprova.
>>
>> è che non me lo crea neanche
> ciao Giangi,
> diritti sulla cartella di rete e istruzione usata per aprire il file?
> potrebbe essere che tenta di creare il file LDB ma non ha diritti
> suffiicienti, da qui l'errore..
>
per ora son riuscito a capire che devo far girare il serviizio con un
utente riconosciuto sul pc del db...


title: filtro multivalore in maschera

text:
un utente puň scegliere un valore da un menu a tendina per filtrare i record
di una maschera in visualizzazione continua, e fin qui nessun problema,
vorrebbe anche poter scegliere piů valori fra quelli presenti nel menu a
tendina, qualcuno ha giŕ affrontato il problema?
devo usare una listbox?


title: filtro multivalore in maschera

author: MA

text:
"Nicolas73" <
nico...@email.it
> ha scritto nel messaggio news:467297d3$0$10629$4faf...@reader2.news.tin.it...
> un utente può scegliere un valore da un menu a tendina per filtrare i record
> di una maschera in visualizzazione continua, e fin qui nessun problema,
>
> vorrebbe anche poter scegliere più valori fra quelli presenti nel menu a
> tendina, qualcuno ha già affrontato il problema?
> devo usare una listbox?
>
Sì, oppure una "mini" tabellatemporanea che compila come vuole e poi com citerio della form ci metti select * FROM... WHERE id IN (select tuaminitabellatemporanea)
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access
Segrate (MI), 7-8 giugno 2007


title: Between e intervalli di dati

author: Zax

text:
In una query ho messo la seguente istruzione:
 Between ([Forms]![Database Tagli]![CercaPianoBasso]) And ([Forms]![Database
Tagli]![CercaPianoAlto]))
Se i campi [CercaPianoBasso] e [CercaPianoAlto] sono nulli la query non mi
restituisce niente.
Cosa posso fare?
GRazie


title: Between e intervalli di dati

author: Jonathan Canova

text:
"Zax" <
z...@zzz.com
> ha scritto nel messaggio
news:42ad843e$0$19533$5fc...@news.tiscali.it...

Between (nz([Forms]![Database Tagli]![CercaPianoBasso]);0) And
nz(([Forms]![Database Tagli]![CercaPianoAlto]);0))
?
--
Jonathan Canova
infoCHIOCCIOLAaladinoinformatica.com
www.aladinoinformatica.com


title: Between e intervalli di dati

text:
> Between (nz([Forms]![Database Tagli]![CercaPianoBasso]);0) And
> nz(([Forms]![Database Tagli]![CercaPianoAlto]);0))
>
Ho provato ma niente, se i campi sono vuoti la query non fnziona.


title: Between e intervalli di dati

author: namor

text:
Zax ha scritto:
> > Between (nz([Forms]![Database Tagli]![CercaPianoBasso]);0) And
> > nz(([Forms]![Database Tagli]![CercaPianoAlto]);0))
> >
> Ho provato ma niente, se i campi sono vuoti la query non fnziona.
Se entrambi i campi sono vuoti il criterio diventa between 0 and 0.
Spiega meglio che tipo di dati c'č nei due campi e cosa volevi ottenere.
Namor
--
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Between e intervalli di dati

text:
"namor" <
do...@spam.me
> ha scritto nel messaggio
news:d8k3ue$t29$1...@news.newsland.it...
> Zax ha scritto:
>
> > > Between (nz([Forms]![Database Tagli]![CercaPianoBasso]);0) And
> > > nz(([Forms]![Database Tagli]![CercaPianoAlto]);0))
> > >
>
> > Ho provato ma niente, se i campi sono vuoti la query non fnziona.
>
> Se entrambi i campi sono vuoti il criterio diventa between 0 and 0.
> Spiega meglio che tipo di dati c'è nei due campi e cosa volevi ottenere.
> Namor
vorrei attraverso una query filtrare i piani contenuti in una tabella che
vanno da x a y.
Se invece non specifico niente mi dovrebbe far vedere tutti i piani.
come posso fare?


title: Between e intervalli di dati

text:
Zax ha scritto:





Usi la formula con gli nz() che ti ha dato Jonathan sostituendo gli zeri
con dei valori limite molto alti, per esempio -99999 e 99999:
Between (nz([Forms]![Database Tagli]![CercaPianoBasso]);-99999) And
nz(([Forms]![Database Tagli]![CercaPianoAlto]);99999))
Questo supponendo che nel campo su cui applichi il criterio non ci siano
valori inferiori a -99999 o superiori a 99999.
Per andare sul sicuro ti conviene usare il minimo e il massimo numero
consentito dal tipo di dati del campo, li trovi sulla guida F1.
Per esempio, se è di tipo byte userai 0 e 255.



title: Between e intervalli di dati

text:
>
> Between (nz([Forms]![Database Tagli]![CercaPianoBasso]);-99999) And
> nz(([Forms]![Database Tagli]![CercaPianoAlto]);99999))
>
> Questo supponendo che nel campo su cui applichi il criterio non ci siano
> valori inferiori a -99999 o superiori a 99999.
> Per andare sul sicuro ti conviene usare il minimo e il massimo numero
> consentito dal tipo di dati del campo, li trovi sulla guida F1.
> Per esempio, se č di tipo byte userai 0 e 255.
> Namor
>
Ok funziona!!
Grazie...


title: R: Avete bisogno di ricaricare il vostro cellulae ma non avete i soldi....

author: LuGala

text:
vendetevi il cellulare,e compratevi un panino..
pier <pierino> wrote in message kQ8PRBZ8$GA....@news1.galactica.it...
> ...iscrivetevi a :
>
http://www.kyberlandia.it/iscrizione/default.asp?utente=pierino
>
> mettete il mio nome "pierino" quando chiesto e potrete ricevere le vostre
> ricariche VERAMENTE
> gratis!
>
> Nb: non è un sevizio tipo cellmoney o smscash...
>
>


title: indice indexs oggetto TabeDef

author: Daniele News

text:
ciao a tutti, vorrei sapere se qualche esperto può dirmi ilproblema che mi
si
è creato
ho un db converti in mde, funziona da gennaio senza problemi in rete con la
classica condivisione da più utenti, ad un tratto ad un utente mentre
inseriva i dati gli ha dato un messaggio di errore, e ha chiuso il db, dal
quel momento ho cercato di capire che cose fosse successo è in pratica il db
è come sparito il file c'è ma dentro non ci sono ne tabelle e nè nient'altro
e praticamnete vuoto
ma: il db in proprietà dice che e di 64 mb come se ci fosse ma invece niente
l'unica cosa è che da questo errore:
-non è un indice di questa tabella
esaminare l'indice indexes dell'oggetto tableDef per determinare
i nomi indici validi.-
ho poi ripreso l'originale mdb e l'ho riconvertito in mde e funziona
ma l'altro no perdento cosi 3 giorni di dati.
chi può darmi un aito per riprendere almeno le tabelle e sopratutto
perchè questo errore e come si può essere verificato?
un saluto Daniele.


title: indice indexs oggetto TabeDef

text:

luck...@inwin.it


title: Collegare tabelle

author: Maicol

text:
Buongiorno a tutti.
Ho letto dei post vecchi e sono andato sul sito comune ma, sicuramente per
incapacita' mia non sono riuscito a raggiungere il risultato. In pratica
vorrei collegarmi con delle tabelle del back-end diciamo scrivendo percorso
dell'mdb e nome della tabella a cui collegarmi in due controlli di una
maschera o qualcosa del genere. Potreste  spiegarmi come, magari con qualche
dettaglio, perche' come ho gia' detto, con le funzioni che ho scaricaro dal
sito comune mi sono impicciato. Grazie e ciao.


title: Collegare tabelle

author: Skywalker Senior

text:
"Maicol" <
enzo...@libero.it
> ha scritto nel messaggio
news:75tr9.41595$%M1.10...@twister2.libero.it...

Io ho trovato sul sito comune la soluzione a questo problema. Se fai una
ricerca per la parola chiave "collegate" troverai due risultati, un file ZIP
ed un codice di una SUB. Copia il codice nel tuo progetto, cerca la riga
path = BrowseFolder("Percorso corrente: " & aDB(intI, 2) & "\" & aDB(intI,
1))
sostituisci a tutta la funzione BrowseFolder, il riferimento al controllo
che contiene il tuo path+nome file e  avrai risolto!
--
-------------------------------------------------------
May the Force be with you
Skywalker Senior


title: Collegare tabelle

text:
"Skywalker Senior" <
questo.i...@non.esiste.it
> ha scritto nel messaggio
news:AAxr9.13297$6n3.4...@news1.tin.it...

> Ti ringrazio ci provo


title: Collegare tabelle

text:
"Skywalker Senior" <
questo.i...@non.esiste.it
> ha scritto nel messaggio
news:AAxr9.13297$6n3.4...@news1.tin.it...

Non sono riuscito a trovare la funzione BrowseFolder puoi aiutarmi ?
>


title: Collegare tabelle

text:
"Maicol" <
enzo...@libero.it
> ha scritto nel messaggio
news:94zr9.42826$RO.10...@twister1.libero.it...
>
>
> Non sono riuscito a trovare la funzione BrowseFolder puoi aiutarmi ?
> >
Pių o meno a metā del listato, cercala con l'apposita funzione!



title: Collegare tabelle

text:
CUT
>
> Più o meno a metà del listato, cercala con l'apposita funzione!
>
> Scusami, sicuramente io non ho capito cosa devo esattamente fare:
allora alla riga
path= browsefolder(........................
ho sostituito path= forms!collegare!pathnuova   che e' il nome del controllo
che contiene la path dell'mdb e non ho fatto altro.
il risultato e' : "la cartella selezionata non contiene il database miomdb"
dove sbaglio???
A parte cio' , io devo collegare una sola tabella, ma non capisco come farei
nel caso avessi piu' tabelle da collegare a diversi BE a indicargli la path
diversa di questi ultimi.
Sicuramente ti avro' fatto capire che ho in testa una grande confusione,
puoi illuminarmi un minimo.
Grazie ancora


title: Collegare tabelle

text:
"Maicol" <
enzo...@libero.it
> ha scritto nel messaggio
news:k3Qr9.46112$RO.11...@twister1.libero.it...
>
Questo è il codice che (da me) funziona:
Public Function ChangePath()
'Autori: Antonella Romeo & Vincenzo Turturro
'Funzione per effettuare in maniera del tutto automatica
' l'aggiornamento delle tabelle allegate ad un FE, anche quando queste
' sono contenute in più BE, residenti su percorsi differenti (anche LAN)
' e protetti da password.
' L'unica interazione con l'utente consiste nella richiesta della posizione
' di ogni BE contenente le tabelle da allegare
' La funzione segnala le tabelle allegate al FE non trovate nei BE
' selezionati dall'utente
'Parametri in ingresso: nessuno
'Funzioni richiamate: BrowseFolder() (presente sul sito comune)
    Dim intI As Integer, intJ As Integer, dbs As Database, tdf As TableDef,
path As String
    Dim sNomeDB As String, intK As Integer, lRefr As Boolean
    Dim tdfNew As TableDef, dbNew As Database, stPwd As String, aDB(1 To 50,
1 To 3) As String
    For intI = 1 To UBound(aDB)
      aDB(intI, 1) = ""     ' Nome del database
      aDB(intI, 2) = ""     ' Path del database
      aDB(intI, 3) = ""     ' Password del database
    Next intI
    ' Gestisce il collegamento delle tabelle
    Set dbs = CurrentDb()
    With dbs
      ' Recupera percorso corrente e pwd di ogni mdb contenente le tabelle
collegate
      For Each tdf In .TableDefs
        If tdf.Connect > "" Then
           sNomeDB = ""
           ' Ricava il nome del database contenente la tabella
           For intJ = 1 To Len(tdf.Connect)
             If InStr(1, Right$(tdf.Connect, intJ), "\") > 0 Then
                sNomeDB = Mid$(tdf.Connect, Len(tdf.Connect) - intJ + 2)
                If InStr(1, sNomeDB, ";") > 0 Then
                  sNomeDB = Left$(sNomeDB, InStr(1, sNomeDB, ";") - 1)
                End If
                Exit For
             End If
           Next intJ
           For intI = 1 To UBound(aDB)
             If aDB(intI, 1) = sNomeDB Then
                ' Database già memorizzato nella matrice
                Exit For
             Else
                ' Database non memorizzato nella matrice
                If aDB(intI, 1) = "" Then
                   aDB(intI, 1) = sNomeDB
                   path = Left$(tdf.Connect, InStr(1, tdf.Connect, "\" &
sNomeDB) - 1)
                   If InStr(1, path, ":\") > 0 Then
                      ' Percorso su unità logica
                      path = Mid$(path, InStr(1, path, ":\") - 1)
                   Else
                      ' Percorso UNC
                      If InStr(1, path, "\\") > 0 Then
                         path = Mid$(path, InStr(1, path, "\\"))
                      End If
                   End If
                   aDB(intI, 2) = path
                   stPwd = ""
                   If InStr(1, tdf.Connect, ";PWD=") > 0 Then
                      stPwd = Mid$(tdf.Connect, InStr(1, tdf.Connect,
";PWD="))
                      stPwd = Left$(stPwd, IIf(InStr(2, stPwd, ";") > 0,
InStr(2, stPwd, ";") - 1, Len(stPwd)))
                   End If
                   aDB(intI, 3) = stPwd
                   Exit For
                End If
             End If
           Next intI
        End If
      Next tdf
    End With
    For intI = 1 To UBound(aDB)
      If aDB(intI, 1) > "" Then
        path = Percorso()             '<----------------------- Qui ci si
mette il percorso del file BE
         If Nz(path, "") > "" Then
            If Dir(path & "\" & aDB(intI, 1)) > "" Then
               path = Trim$(path)
               If Right$(path, 1) = "\" Then
                  path = Left$(path, Len(path) - 1)
               End If
               aDB(intI, 2) = path
            Else
               MsgBox "La cartella selezionata non contiene il database " &
aDB(intI, 1), vbCritical
            End If
         End If
      Else
         Exit For
      End If
    Next intI
    ' Aggiorna i collegamenti
    DoCmd.Hourglass True
    With dbs
      ' Scorre l'insieme TableDefs
      For Each tdf In .TableDefs
        lRefr = False
        sNomeDB = ""
        If tdf.Connect > "" Then
           ' Ricava il nome del database contenente la tabella
           For intJ = 1 To Len(tdf.Connect)
             If InStr(1, Right$(tdf.Connect, intJ), "\") > 0 Then
                sNomeDB = Mid$(tdf.Connect, Len(tdf.Connect) - intJ + 2)
                If InStr(1, sNomeDB, ";") > 0 Then
                   sNomeDB = Left$(sNomeDB, InStr(1, sNomeDB, ";") - 1)
                End If
                Exit For
             End If
           Next intJ
           For intK = 1 To UBound(aDB)
             If Trim$(aDB(intK, 1)) = Trim$(sNomeDB) Then
                ' ... cerca la tabella nel nuovo database
                Set dbNew = OpenDatabase(aDB(intK, 2) & "\" & aDB(intK, 1),
False, False, aDB(intK, 3))
                With dbNew
                  For Each tdfNew In .TableDefs
                    If tdfNew.Name = tdf.Name Then
                       ' ... modifica il percorso del database contenente la
tabella
                        tdf.Connect = Left$(tdf.Connect, IIf(InStr(1,
tdf.Connect, ":") > 0, _
                           InStr(1, tdf.Connect, ":") - 2, InStr(1,
tdf.Connect, "\\") - 1)) & _
                           Trim$(aDB(intK, 2)) & "\" & aDB(intK, 1) & _
                           Mid$(tdf.Connect, InStr(1, tdf.Connect, sNomeDB)
+ Len(Trim$(sNomeDB)))
                       tdf.RefreshLink
                       lRefr = True
                       Exit For
                    End If
                  Next tdfNew
                End With
                dbNew.Close
                Set dbNew = Nothing
                Exit For
             End If
           Next intK
           If Not lRefr Then
              MsgBox "Tabella " & tdf.Name & " non trovata nel database"
           End If
        End If
      Next tdf
    End With
    DoCmd.Hourglass False
End Function
La funzione "Percorso()" restituisce un valore stringa con il path del
database da collegare, tu la devi sostituire con il tuo controllo (accertati
che contenga un valore valido seguendo la funzione in debug);
Attenzione! Sotto la riga "MsgBox "La cartella selezionata non contiene il
database..." troverai una riga tipo "IntI = IntI - 1"...
io ho cancellato questa riga perchè, se non trovava il DB, entrava in loop!



title: Collegare tabelle

text:
"Skywalker Senior" <
questo.i...@non.esiste.it
> ha scritto nel messaggio
news:RJ%r9.7006$aL4.2...@news1.tin.it...
>
> "Maicol" <
enzo...@libero.it
> ha scritto nel messaggio
> news:k3Qr9.46112$RO.11...@twister1.libero.it...
> >
> CUT
>
> Attenzione! Sotto la riga "MsgBox "La cartella selezionata non contiene il
> database..." troverai una riga tipo "IntI = IntI - 1"...
> io ho cancellato questa riga perchč, se non trovava il DB, entrava in
loop!
>
E' succeso anche a me. Comunque riprovo e ti ringrazio. Spero di riuscirci.


title: Collegare tabelle

author: MM

text:
> >
> E' succeso anche a me. Comunque riprovo e ti ringrazio. Spero di
riuscirci.
>
>
Se vuoi dare un'occhiata alla mia soluzione forse ti puņ essere di aiuto.
Ciao con simpatia
Marco.


title: Collegare tabelle

text:
"MM" <
mar...@libero.it
> ha scritto nel messaggio
news:qvHs9.57035$%M1.14...@twister2.libero.it...

Volentieri, sono in attesa  .
>
>


title: quesito sulla versione developer

author: Lenny

text:
siccome devo prendere un po' di licenze office (10), e visto che usiamo
molto access (2 o 3 programmano)
pensavo di prendere la 1 versione developer e poi gli altri office standard.
mi chiedevo però:
i client su cui installo il runtime che file access possono eseguire? mde,
mdb, o bisogna che lo
sviluppatore compili sempre in qualche modo l'applicazione?
grazie.
Lenny


title: quesito sulla versione developer

author: Emyr

text:
On Thu, 21 Nov 2002 10:47:59 +0100, "Lenny"
<luca...@QUESTOLOTOGLItiscali.it> wrote:
>siccome devo prendere un po' di licenze office (10), e visto che usiamo
>molto access (2 o 3 programmano)
>pensavo di prendere la 1 versione developer e poi gli altri office standard.
>
>mi chiedevo perň:
>i client su cui installo il runtime che file access possono eseguire? mde,
>mdb, o bisogna che lo
>sviluppatore compili sempre in qualche modo l'applicazione?
>
>grazie.
>
>Lenny
>
per usare access:
se devi usare č sufficente  un developer
se devi distribuire č sufficiente un developer
se devi sviluppare su piů computer ti serve un developer (per
distribuire) ed un professional per ogni computer che sviluppa
vedi le licenze
al posto di office visto che non ti serve access puoi vedere
openoffice per windows che č gratuito č funziona per quasi tutte le
esigenze...
Saluti.
Emanuele.


title: quesito sulla versione developer

text:
> per usare access:
> se devi usare è sufficente  un developer
> se devi distribuire è sufficiente un developer
> se devi sviluppare su più computer ti serve un developer (per
> distribuire) ed un professional per ogni computer che sviluppa
> vedi le licenze
> al posto di office visto che non ti serve access puoi vedere
> openoffice per windows che è gratuito è funziona per quasi tutte le
> esigenze...
>
>
perfetto.
ma cosa distribuirò poi esattamente?
è sufficiente mettere l'mdb sul pc client dopo aver installato il runtime?
di cosa si compone esattamente il runtime?
grazie.
Lenny


title: quesito sulla versione developer

author: Ettore Manara

text:
"Lenny" <
> perfetto.
> ma cosa distribuirò poi esattamente?
> è sufficiente mettere l'mdb sul pc client dopo aver installato il runtime?
.mdb, .mde, .adp, .ade
> di cosa si compone esattamente il runtime?
Praticamente è Access protetto a livello di finestra oggetti (quindi puoi
solo eseguire progetti e non modificarli), privo di autocomposizioni, files
di help, assisistenti office e ... (purtroppo) con delle limitazioni sugli
strumenti Attivi del Pivoting.
Ciao.


title: acquisire dati da porta seriale

author: nicola

text:
Salve a tutti.
mi rivolgo al newgroup per trpvare riposta al seguente quesito:
come posso acquisire dati da una bilancia collegata alla porta seriale
(COM1)?
lo scopo č quello di memorizzare in una tabella le "pesate" direttamente
dalla bilancia evitando cosě l'errore umano della trascrizione .
Ringrazio chiunque sia in grado di darmi aiuto.
Ciao a tutti.
Nicola
--------------------------------
Inviato via
http://usenet.libero.it


title: acquisire dati da porta seriale

author: Karl Donaubauer

text:
nicola ha scritto:
> mi rivolgo al newgroup per trpvare riposta al seguente quesito:
> come posso acquisire dati da una bilancia collegata alla porta seriale
> (COM1)?
Qui trovi un ActiveX gratis e buono per leggere dati dal COM:
http://ourworld.compuserve.com/homepages/richard_grier/xmcomm.htm
--
HTH
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


title: acquisire dati da porta seriale

author: ciroteo

text:
Ciao Karl,
non è che dopo 13 anni tu sai ancora come trovare questo ocx?
;-)



title: acquisire dati da porta seriale

author: BFS

text:

usa
web.archive.org
 per recuperare siti che non esistono più

ecco qui la copia al 7 settembre 2005

https://web.archive.org/web/20050907060115/http://ourworld.compuserve.com/homepages/Richard_Grier/xmcomm.htm

ciao
BFS


title: acquisire dati da porta seriale

text:
grazie!
m



title: acquisire dati da porta seriale

author: pfm

text: Come si chiama l'OCX?


title: acquisire dati da porta seriale

text:
Ciao, il sito da cui l'ho acquistato è questo:
http://www.hardandsoftware.net/xmcomm.htm




title: Numero giorno errato

author: Nao

text:
In un controllo non saaociato, ho messo come origine dati:
=DatePart("i";[data])
Il sistema funziona, ma secondo lui il lunedi è il numero 2 e la domenica il
numero 1.
come gli dico che lunedi è 1 e domenica è 7?
grazie Nadir
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Numero giorno errato

author: Gabriele Bertolucci

text:
> =DatePart("i";[data])
>
> Il sistema funziona, ma secondo lui il lunedi è il numero 2 e la domenica
il
> numero 1.
>
> come gli dico che lunedi è 1 e domenica è 7?
=DatePart("i";[data];vbMonday)
Comunque, non ho capito che parte della data vorresti recuperare, visto che
l'argomento Interval ammette solamente i seguenti valori:
yyyy Anno
q    Trimestre
m    Mese
y    Giorno dell’anno
d    Giorno
w    Giorno della settimana
ww   Settimana
h    Ora
n    Minuti
s    Secondi
--
Gabriele Bertolucci
PBsoft
www.pbsoft.it


title: Numero giorno errato

author: Roberto da casa

text:
"Gabriele Bertolucci" <CANCEL...@ELIMINApbsoft.TOGLIit> ha scritto nel
messaggio news:EgYyb.136993$hV.49...@news2.tin.it...

Quello che hai evidenziati qui sopra sono i valori possibili dell'argomento
Interval della funzione DatePart se la usi in VBA o comunque con la versione
inglese di Access; se però usi la versione italiana di Access e devi
scrivere tale funzione nell'origine controllo di una casella di testo o in
una griglia di struttura di una query, la tua tabella diventa:
aaaa Anno
t    Trimestre (ma non sono sicuro)
m    Mese
a    Giorno dell'anno
g    Giorno
i    Giorno della settimana
ii   Settimana
h    Ora
n    Minuti
s    Secondi
Quindi Nao stava ricavando il giorno della settimana di una data.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Numero giorno errato

text:
> Quello che hai evidenziati qui sopra sono i valori possibili
dell'argomento
> Interval della funzione DatePart se la usi in VBA o comunque con la
versione
> inglese di Access; se però usi la versione italiana di Access e devi
> scrivere tale funzione nell'origine controllo di una casella di testo o in
> una griglia di struttura di una query, la tua tabella diventa:
>
> aaaa Anno
> t    Trimestre (ma non sono sicuro)
> m    Mese
> a    Giorno dell'anno
> g    Giorno
> i    Giorno della settimana
> ii   Settimana
> h    Ora
> n    Minuti
> s    Secondi
Sinceramente non sono riuscito a trovare questo elenco di valori nella guida
di Access 2002 italiano.
Io provato a fare un db con una form in cui ho messo un campo non legato con
origine dati
=DatePart("w";Date();[PrimoGiorno])
dove PrimoGiorno è una combo della stessa form.
Ha funzionato perfettamente, restituendo quello che ci si aspetta che
restituisca.
Ho provato a modificare l'origine dati in
=DatePart("i";Date();[PrimoGiorno])
ma Access si è incavolato come una biscia, nel senso che il controllo
visualizza sempe #Errore.
Allora ho ripetuto le stesse prove con Access 2003 inglese e funziona nello
stesso identico modo.



title: Numero giorno errato

text:
Il 02 Dic 2003, 13:10, "Gabriele Bertolucci"
<CANCEL...@ELIMINApbsoft.TOGLIit> ha scritto:

Bravo Roberto, sempre preparatisso e competentissimo.
Il mio problema è che mettendo la giusta stringa che restituisce il numero
del giorno, mi restituisce 2 come numero del lunedi, mentre io vorrei
impostarlo che mi restituisca 1 per lunedi e 7 per domenica. Con excel si
imposta il tipo di settimana, con access come si fa?
grazie NAdir



title: Numero giorno errato

text:
> > Ho provato a modificare l'origine dati in
> >
> > =DatePart("i";Date();[PrimoGiorno])
> >
> > ma Access si č incavolato come una biscia, nel senso che il controllo
> > visualizza sempe #Errore.
> >
> > Allora ho ripetuto le stesse prove con Access 2003 inglese e funziona
> nello
> > stesso identico modo.
> >
> Bravo Roberto, sempre preparatisso e competentissimo.
> Il mio problema č che mettendo la giusta stringa che restituisce il numero
> del giorno, mi restituisce 2 come numero del lunedi, mentre io vorrei
> impostarlo che mi restituisca 1 per lunedi e 7 per domenica. Con excel si
> imposta il tipo di settimana, con access come si fa?
> grazie NAdir
Innanzi tutto, cerca di quotare solo lo stretto indispensabile.
Scusa Nao, ma non sto piů comprendendo quello che vorresti fare esattamente.
Inoltre, il codice che ti ho proposto io, fa al caso tuo?
Non ho capito dove stai ottenendo problemi. Prova a spiegarmelo di nuovo.
Grazie.



title: Numero giorno errato

text:
"Nao" <OOOnaon...@inwind.itOOO> ha scritto nel messaggio
news:212Z159Z223Z113...@usenet.libero.it...
> Il 02 Dic 2003, 13:10, "Gabriele Bertolucci"
> <CANCEL...@ELIMINApbsoft.TOGLIit> ha scritto:
> > > Quello che hai evidenziati qui sopra sono i valori possibili
> > dell'argomento
> > > Interval della funzione DatePart se la usi in VBA o comunque con la
> > versione
> > > inglese di Access; se perň usi la versione italiana di Access e devi
> > > scrivere tale funzione nell'origine controllo di una casella di testo
o
> in
> > > una griglia di struttura di una query, la tua tabella diventa:
> > >
> > > aaaa Anno
> > > t Trimestre (ma non sono sicuro)
> > > m Mese
> > > a Giorno dell'anno
> > > g Giorno
> > > i Giorno della settimana
> > > ii Settimana
> > > h Ora
> > > n Minuti
> > > s Secondi
> >
> > Sinceramente non sono riuscito a trovare questo elenco di valori nella
> guida
> > di Access 2002 italiano.
> >
> > Io provato a fare un db con una form in cui ho messo un campo non legato
> con
> > origine dati
> >
> > =DatePart("w";Date();[PrimoGiorno])
> >
> > dove PrimoGiorno č una combo della stessa form.
> >
> > Ha funzionato perfettamente, restituendo quello che ci si aspetta che
> > restituisca.
> >
> > Ho provato a modificare l'origine dati in
> >
> > =DatePart("i";Date();[PrimoGiorno])
> >
> > ma Access si č incavolato come una biscia, nel senso che il controllo
> > visualizza sempe #Errore.
> >
> > Allora ho ripetuto le stesse prove con Access 2003 inglese e funziona
> nello
> > stesso identico modo.
> >
> > --
> > Gabriele Bertolucci
> > PBsoft
www.pbsoft.it
> >
> Bravo Roberto, sempre preparatisso e competentissimo.
> Il mio problema č che mettendo la giusta stringa che restituisce il numero
> del giorno, mi restituisce 2 come numero del lunedi, mentre io vorrei
> impostarlo che mi restituisca 1 per lunedi e 7 per domenica. Con excel si
> imposta il tipo di settimana, con access come si fa?
> grazie NAdir
Prova cosě:
=DatePart("w";[Data];2)
Stranamente se nella funzione DatePart si usa anche l'argomento
firstdayofweek l'argomento Interval va scritto all'inglese (come in VBA); se
invece si omette l'argomento firstdayofweek l'argomento Interval  va scritto
all'italiana ovvero:
=DatePart("i";[Data])
Sembrerebbe proprio un maledettissimo bug.



title: condizione if su campo Sì/No

author: marco

text:
Ciao a tutti,
Voglio rendere visibile in un report un campo flag Sì/No solo se è impostato
su Sì ed ho scritto questo nel corpo del report su formattazione :
If Me.tassativo = "No" Then
   Me.tassativo.Visible = False
   Me.etichetta54.Visible = False
   End If
perchè non funziona mentre questa funziona?
If Nz(Ora1, "") = "" Then
   Me.Ora1.Visible = False
   Me.etichettaOra1.Visible = False
End If
Grazie a chi mi darà una mano.
Marco


title: condizione if su campo Sì/No

text:
"marco" <
m.l...@tiscali.it
> ha scritto nel messaggio
news:arq8dh$52i$1...@lacerta.tiscalinet.it...

Quando visualizzi un campo Si/No ha un'ulteriore stato, quello, per
inenderci, che
ti mostra il Controllo in Grigetto......!
E lui il colpevole, in quanto non vale nè "SI" nè "NO", ma è Null......!!!
@Alex.


title: condizione if su campo Sì/No

author: Giorgio prx

text:
"marco" <
m.l...@tiscali.it
> ha scritto nel messaggio
news:arq8dh$52i$1...@lacerta.tiscalinet.it...

Ciao un campo sì/no contiene -1 se sì 0 Se no ovvero True e False quindi
....
Me.tassativo.Visible=Nz(Me.tassativo,0)
Ciao Giorgio.


title: condizione if su campo Sì/No

text:
Grazie a tutti !!
"Giorgio prx" <
giorgio...@tiscalinet.it
> ha scritto nel messaggio
news:arqcmu$7fb$1...@lacerta.tiscalinet.it...



title: Esiste un OCX per poter catturare un'area dello schermo ?

author: antonio

text:
Salve a tutti.
La domanda è tutta nell'oggetto: mi sapete indicare quale riferimento
includere (se esiste) in un programma per poter catturare piccole zone dello
schermo ?
Grazie
Antonio


author: Alessandro Baraldi

text:

Non servono OCX ma un pò di API.
Trovi in ogni caso un Demo di Lebans già fatto dovrai eventualmente
adattarlo.
http://www.lebans.com/windowtobitmap.htm
Chiaramente poi dipende tutto da cosa ci devi fare con l'Immagine
catturata...
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.alessandrobaraldi.it
---------------------------------------------------------------------------


author: ALESSANDRO Baraldi

text:
"antonio" <
antone...@tiscali.it
> ha scritto nel messaggio
news:468a77ba$0$16027$5fc...@news.tiscali.it...

Non servono OCX ma un pò di API.



text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:f6e0ia$pq0$1...@aioe.org...

Ti ringrazio molto: scarico subito l'esempio e faccio le mie prove.
Ciao
Antonio


title: Aiuto !!!! arrotondamento euro

author: Gian Luca

text:
Ciao ragazzi, ho un serio problema, l'arrotondamento:
se ho una somma con 2 decimali, tutto OK   es: 11,25 + 30,96 = 40,21
ma se calcolo il 4% di 40,21 il risultato è 1,6884 come posso ottenere
l'arrotondamento a 1,69 ??????
è vero che a video il dato visibile è 1,69 ma in effetti sotto sotto c'è
1,6884
40,21 - 1,69 = 38,52 è una cosa
40,21 - 1,6884 = 38,5416   E' UN'ALTRAAAAAAAAAA
quali possono essere i problemi nel caso ci fossero?
P.S. :il dbase è fatto con Access 97
Ciao a tutti e ringrazio anticipatamente
Luca


title: Aiuto !!!! arrotondamento euro

author: Paolo P

text:
"Gian Luca" <
g_bas...@libero.it
> ha scritto nel messaggio
news:t8018.31202$aD.11...@twister2.libero.it...

A parte che 40.21-1.6884=38,5216, ;-), vai su
www.sitocomune.com
 e usa la
funzione di Karl per l'arrotondamento
Ciao
Paolo


title: formattare una cella

text:
ciao a tutti

vorrei creare in excel una cella vuota, ma formattata nel formato standard.

Ho provato cosi'

With objExcel.Cells(X, 8)
.Value = ""
With .Font
.Name = "Verdana"
.Size = 12
.FormatNumber = "Standard"
End With
End With

ma non va

grazie per l'aiuto


title: formattare una cella

text:

risolto
            With objExcel.Cells(X, 8)
                .Value = ""
                .NumberFormat = "#,##0.00"
                With .Font
                .Name = "Verdana"
                .Size = 12
                End With
            End With


title: macro word non funziona piu dal nulla

text:
ciao,
ho fatto un piccolo programma per trasformare file txt in pdf..
è andato senza problemi negli ultimi mesi..
oggi, dopo alcuni giorni che non lo usavo ho attivato la macro e mi
sono trovato word in blocco.
si blocca su questa istruzione
    Application.PrintOut FileName:="", Range:=wdPrintAllDocument,
Item:= _
        wdPrintDocumentContent, Copies:=1, Pages:="",
PageType:=wdPrintAllPages, _
        Collate:=True, Background:=True, PrintToFile:=False,
PrintZoomColumn:=0, _
        PrintZoomRow:=0, PrintZoomPaperWidth:=0,
PrintZoomPaperHeight:=0
è sempre andato.. ora.. dal nulla.. su tutti i pc dell'ufficio non
funziona più..
avete una qualche idea del perchè??


title: macro word non funziona piu dal nulla

text:

porca miseria ho sbagliato forum!!
scusate!!
ero distratto


title: visualizza valori NULL in "*******"

author: Aldo Reynaudo

text:
ciao a tutti!    rieccomi.
 Ho un problema sulla VISUALIZZAZIONE dei dati da una query, mi spiego.
Per ottenere un report che mi riportasse tutti i giorni del mese o
legato una tabella GIORNI (tutti i giorni dell'anno) con una tabella
ricevute tramite il Campo DATA, Correttamente mi riporta il totale
pagato e il numero di ric. fatte nel gg.. Problema: come faccio a dirgli
che nei gg. in cui non ci sono stati movimenti (VALORE NULL) mi
visualizzi (es. "************")al posto del valore NULLO
IL RISULTATO DOVREBBE ESSERE :
NUM_RIC	        TOT_PAG       GG
14	        52000         01
12	        59500         02
**********	**********    03
45	        25000         04
***********	**********    05
spero di essermi spiegato,  grazie comunque a tutti          Aldo

--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: visualizza valori NULL in "*******"

author: bb

text:
Ho bisogno di aprire un file "htm" con word (già esistente in una
determinata cartella), come posso fare?
Grazie bb


title: visualizza valori NULL in "*******"

author: Antonio Biso

text:
Aldo Reynaudo <
rey_a...@yahoo.it
> wrote in message
27ede80d3f93ac316fe...@mygate.mailgate.org...

Per ogni campo, sostituisci il campo stesso con questa espressione
nz([NOME CAMPO];"*******")
Se poi ti guardi l'help sulla funzione nz, ti fai del bene!
Antonio


title: Valore già inserito.

author: Alice Inama

text:
Salve a tutti.
In una maschera ho una casella testo nella quale devo inserire una
combinazione alfanumerica di circa 16 caratteri (una marca auricolare per
bovini). Solitamente questa sequenza
è univoca, ma può accadere che si debba inserirla un'altra volta. Posso
ottenere un messaggio che mi informa della presenza di detto valore appena
questo è stato digitato?
Paolo


title: Valore già inserito.

author: Fabio

text:
"Alice Inama" <
alice...@vivoscuola.it
> ha scritto nel messaggio
news:ak3itt$r75$1...@lacerta.tiscalinet.it...

Nell'evento PrimaDiAggiornare scrivi
    If not isnull(dlookup("[CampoCodice]","NomeTabella","[CampoCodice] = '"
& me.CampoCodice & "'")) then
        msgbox "Valore già inserito"
        cancel=true
    end if
Ciao, FABIO


title: Valore già inserito.

text:
"Fabio" <
nospam_fa...@tin.it
> ha scritto nel messaggio
news:fIk99.89269$n04.2...@twister2.libero.it...

Moltissime grazie, funziona alla perfezione.
Avevo provato in mille modi ma non ci ero mai riuscito.
Paolo.


title: Utilizzo più complesso di like

text:
Ponendo "miocamporicerca" come casella di controllo non
associata di una maschera, utilizzando nei criteri del
campo "miocampo" della  query associata alla maschera la formula
like nz(forms!miocampo;"*"), la maschera mi fa vedere tutti i
record della query e nel caso seleziono un valore
in "miocamporicerca", mi filtra i record secondo selezione.
Fin qui tutto ok.
E' mio interesse però vedere nella maschera (prima di
selezionare qualcosa in miocamporicerca) tutti i record compresi
quelli che in miocampo hanno valore vuoto, e dopo che do un
valore a "miocamporicerca" mi occorre il filtro secondo questo
valore.
Ho utilizzato like nz(forms!miocampo;"*")or is null e mi fa
vedere tutti i record compresi quelli con miocampo vuoto ma
quando assegno un valore a miocamporicerca mi filtra i record
secondo miocamporicerca ma mi fa vedere anche quelli con il
campo valore vuoto.
Spero di essere stato chiaro.
Grazie a tutti
--
Postato da Alice Newsgroup: lo usi da web ma con le funzioni del newsreader
http://newsgroup.alice.it
Gerarchie it, italia, it-alt, tin, it.binari. Unico!


title: Utilizzo più complesso di like

author: Karl Donaubauer

text:
Elsis1977 wrote:
> Ponendo "miocamporicerca" come casella di controllo non
> associata di una maschera, utilizzando nei criteri del
> campo "miocampo" della  query associata alla maschera la formula
> like nz(forms!miocampo;"*"), la maschera mi fa vedere tutti i
> record della query e nel caso seleziono un valore
> in "miocamporicerca", mi filtra i record secondo selezione.
> Fin qui tutto ok.
> E' mio interesse però vedere nella maschera (prima di
> selezionare qualcosa in miocamporicerca) tutti i record compresi
> quelli che in miocampo hanno valore vuoto, e dopo che do un
> valore a "miocamporicerca" mi occorre il filtro secondo questo
> valore.
>
> Ho utilizzato like nz(forms!miocampo;"*")or is null e mi fa
> vedere tutti i record compresi quelli con miocampo vuoto ma
> quando assegno un valore a miocamporicerca mi filtra i record
> secondo miocamporicerca ma mi fa vedere anche quelli con il
> campo valore vuoto.
Criterio che restituirà tutti i record
www.donkarl.com/it?FAQ3.14
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: origine riga "complesso"

text:
Ragazzi sto uscendo pazzo!!
Eppure il problema deve essere davvero banale :(
Ho una maschera che mi serve ad inserire delle fatture.
C'è un combobox "IDAzienda" che serve a selezionare l'azienda.
Ho creato poi una sottomaschera ("Dettagli fatture") costitutita da un
combobox "prodotti" e relative "quantità". L'unico problema è che questo
combobox deve filtrare i prodotti in base all'azienda prima selezionata.
Nella tabella prodotti c'è un campo numerico "IDAzienda" che associa ogni
prodotto all'azienda relativa.
Il problema quindi è che se nell'"origine riga" del combobox "prodotti"
metto:
"SELECT Prodotti.IDProdotto, Prodotto FROM Prodotti"
ovviamente non va bene in quanto mi dà tutti i prodotti della tabella
prodotti.
Ho provato con:
 "SELECT Prodotti.IDProdotto, Prodotto FROM Prodotti where
IDAzienda=Forms!Fatture!IDAzienda;
in questo caso funziona solo alla prima immissione cioè se dopo aver
selezionato un prodotto "filtrato" in base all'azienda cambio IDAzienda nel
combobox superiore, continua a darmi lo stesso filtro di prima! E ancora
peggio se provo ad inserire una nuova fattura (mediante i tastini di
scorrimento in basso a sx per intenderci) continua a "ricordare" il primo
valore "IDAzienda" selezionato prima e a filtrarmi in base a quest'ultimo!!!
Come posso fare???
Maverick1168
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: origine riga "complesso"

author: Sergio MAZZA

text:
"maverick1168" <
maveri...@libero.it
> ha scritto nel messaggio
news:84Z222Z130Z106Y...@usenet.libero.it...

Ogni volta che cambi il valore della casella combinata [IDAzienda] (evento
"dopo aggiornamento") e cambi il record della form (evento "su corrente")
devi fare un requery della casella combinata [prodotti]:
es.
Me![Dettagli fatture]!prodotti.requery
Oppure, gestisci solo l'evento "su invio", della casella combinata
[prodotti], e fai il requery:
Me!prodotti.requery
Ciao.
--
Sergio MAZZA


title: origine riga "complesso"

text:
Il> Ogni volta che cambi il valore della casella combinata [IDAzienda]
(evento
> "dopo aggiornamento") e cambi il record della form (evento "su corrente")
> devi fare un requery della casella combinata [prodotti]:
> es.
> Me![Dettagli fatture]!prodotti.requery
>
> Oppure, gestisci solo l'evento "su invio", della casella combinata
> [prodotti], e fai il requery:
> Me!prodotti.requery
>
Grazie mille..ha funzionato alla grande!!



title: origine riga "complesso"

text:
>> Ogni volta che cambi il valore della casella combinata [IDAzienda]
> (evento
> > "dopo aggiornamento") e cambi il record della form (evento "su
corrente")
> > devi fare un requery della casella combinata [prodotti]:
> > es.
> > Me![Dettagli fatture]!prodotti.requery
> >
> > Oppure, gestisci solo l'evento "su invio", della casella combinata
> > [prodotti], e fai il requery:
> > Me!prodotti.requery
Ciao a tutti,
è successa una cosa stranissima!
Come dicevo nel post precedente la proprietà requery sembrava aver
funzionato alla grande.
Sono andato aventi nella costruzione del DB e tutto sembrava andare
egregiamente.
Improvvisamente però, senza alcuna ragione apparente i comandi di requery
hanno cominciato
a "svalvolare" generandomi delle finestre di immissione parametri.
Praticamente è come se al momento della query di origine riga che viene
eseguita dalla proprietà requery l'elemento
forms!Fatturazione![Sottomaschera]!IDProdotto non è più valorizzato!!
Perchè succede questo e, soprattutto, come mai prima funzionava ed ora non
più?



title: origine riga "complesso"

text:
"maverick1168" <
maveri...@libero.it
> ha scritto nel messaggio
news:84Z222Z128Z233Y...@usenet.libero.it...
>
> Ciao a tutti,
> è successa una cosa stranissima!
> Come dicevo nel post precedente la proprietà requery sembrava aver
> funzionato alla grande.
> Sono andato aventi nella costruzione del DB e tutto sembrava andare
> egregiamente.
> Improvvisamente però, senza alcuna ragione apparente i comandi di requery
> hanno cominciato
> a "svalvolare" generandomi delle finestre di immissione parametri.
> Praticamente è come se al momento della query di origine riga che viene
> eseguita dalla proprietà requery l'elemento
> forms!Fatturazione![Sottomaschera]!IDProdotto non è più valorizzato!!
>
> Perchè succede questo e, soprattutto, come mai prima funzionava ed ora non
> più?
Tra il "prima" e "ora" che è successo?
Ciao.
--
Sergio MAZZA


title: origine riga "complesso"

text:
Il 01 Set 2006, 10:17, "Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto:
>> > è successa una cosa stranissima!
> > Come dicevo nel post precedente la proprietà requery sembrava aver
> > funzionato alla grande.
> > Sono andato aventi nella costruzione del DB e tutto sembrava andare
> > egregiamente.
> > Improvvisamente però, senza alcuna ragione apparente i comandi di
requery
> > hanno cominciato
> > a "svalvolare" generandomi delle finestre di immissione parametri.
> > Praticamente è come se al momento della query di origine riga che viene
> > eseguita dalla proprietà requery l'elemento
> > forms!Fatturazione![Sottomaschera]!IDProdotto non è più valorizzato!!
> >
> > Perchè succede questo e, soprattutto, come mai prima funzionava ed ora
non
> > più?
>
>
> Tra il "prima" e "ora" che è successo?
>
Sembra incredibile ma non è successo nulla! Ho ripreso una versione
precedente che non dava il problema è ho controllato le istruzioni una da
una..coincidono! Chiaramente nella attuale c'è del codice in più ma il
problema lo dà prima, in fase di apertura della maschera principale e dopo
l'aggiornamento del combo principale. Mi concentro su quest'ultimo caso.
Dopo l'aggiornamento del combobox (quello IDAzienda per intenderci) "parte"
il requery sul combo secondario (IDProdotto per intenderci) e mi appare la
finestra "Immettere Maschere!Fatturazione!IDAzienda" anche se l'origine riga
del combo secondario è valorizzata come "SELECT Prodotti.IDProdotto,
Prodotto FROM Prodotti WHERE IDAzienda=Maschere!Fatturazione!IDAzienda ORDER
BY Prodotto;" a questo punto però Maschere!Fatturazione!IDAzienda è
valorizzato (l'ho verificato da debug) e cmq al limite dovrebbe essere null,
perchè si comporta come se non esistesse proprio??? A me sembra un bug di
Access tu che ne pensi?
Grazie infinitamente della tua attenzione



title: origine riga "complesso"

text:
"maverick1168" <
maveri...@libero.it
> ha scritto nel messaggio news:84Z222Z133Z83Y...@usenet.libero.it...
> Sembra incredibile ma non è successo nulla! Ho ripreso una versione
> precedente che non dava il problema è ho controllato le istruzioni una da
> una..coincidono! Chiaramente nella attuale c'è del codice in più ma il
> problema lo dà prima, in fase di apertura della maschera principale e dopo
> l'aggiornamento del combo principale. Mi concentro su quest'ultimo caso.
> Dopo l'aggiornamento del combobox (quello IDAzienda per intenderci) "parte"
> il requery sul combo secondario (IDProdotto per intenderci) e mi appare la
> finestra "Immettere Maschere!Fatturazione!IDAzienda" anche se l'origine riga
> del combo secondario è valorizzata come "SELECT Prodotti.IDProdotto,
> Prodotto FROM Prodotti WHERE IDAzienda=Maschere!Fatturazione!IDAzienda ORDER
> BY Prodotto;" a questo punto però Maschere!Fatturazione!IDAzienda è
> valorizzato (l'ho verificato da debug) e cmq al limite dovrebbe essere null,
> perchè si comporta come se non esistesse proprio??? A me sembra un bug di
> Access tu che ne pensi?
>
> Grazie infinitamente della tua attenzione
Maschere?!? Non era Forms? Ma che versione di access stai utilizzando?
Ciao.
--
Sergio MAZZA


title: origine riga "complesso"

text:

Ho risolto!!! Posto per essere in qualche modo di aiuto a qualcun altro. Lla
versione di Access che uso è Access 2002 ma praticamente utilizzo il formato
di Access 2002, e maschere e la traduzione che mi fa in automatico di
'forms'
Praticamente l'errore che ho fatto in un copia incolla è stato quello di
definire l'intestazione dell'evento Sub txtquant_afterUpdate senza
specificare ill parametro (Cancel as integer)....non chiedetemi perchè :)
Cmq sta il fatto che se nell'intestazione manca mi dà quelle finestre di
immissione parametri.
Cmq Sergio grazie delle tue risposte!
A presto



title: Casella combinata con dati di origine con parametri

text:
Buongiorno,
ho una maschera denominata "oggetti" nella quale viene inserito un valore in una casella di testo chiamata "Prov_Allevamento"; in questa maschera c'è una sottomaschera nella quale è presente una casella combinata i cui dati di origine vengono presi da una query dove il campo della provincia è parametrato nel senso che nei criteri è presente un parametro che riporto di seguito "[Maschere]![oggetti]![Prov_Allevamento]"; purtroppo invece di filtrare i record, mi esce sempre il messaggio "immettere valore parametro Maschere!oggetti!Prov_Allevamento"
Ho verificato più e più volte ma è come se non trovasse tale dato e mi dice di inserire il parametro (è strano perchè l'ho inserito anche attraverso la generazione di espressioni).
L'ho fatta una miriade di volte ed ha sempre funzionato; stavolta non riesco a capire dove sbaglio.
Vi ringrazio


title: Aprire più report con lo stesso comando

author: Lorena Zanini

text:
Buongiorno,
sapete se è possibile con un unico comando su un pulsante aprire due o più report contemporaneamente?
Per farmi capire, se il primo report ha due pagine e il secondo tre pagine, vorrei che mi aprisse un documento con cinque pagine.
Al momento sono riuscita ad aprirli con questa routine ma restano due report separati:
    Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "A"
    stLinkCriteria = "[IdStudio]=" & Me![IdStudio]
    DoCmd.OpenReport stDocName, acPreview, , stLinkCriteria
    Dim stDocName1 As String
    Dim stLinkCriteria1 As String
    stDocName1 = "M"
    stLinkCriteria1 = "[IdStudio]=" & Me![IdStudio]
    DoCmd.OpenReport stDocName1, acPreview, , stLinkCriteria1

Ringrazio anticipatamente chi avesse un'idea da suggerirmi.
Buon pomeriggio


title: Aprire più report con lo stesso comando

text:
I Report sono basati sui Dati... quindi per aprire solo 1 Report contenente TUTTI i dati che compongono il Report1 ed il Report2, serve che i Dati che popolano il Report3 siano uniti in una unica origine dati.
Per questo potresti valutare una UNION SELECT ma i dati devono essere coerenti chiaramente, quindi significa che i Report1 e Report2 dovrebbero essere UGUALI.
A questo punto uno si chiede che senso abbiano 2 Report UGUALI...? In tal caso emergono varie cose che magari richiedono chiarimento e riflessione.
Se invece i Report sono diversi, la cosa non è fattibile.

Alessandro


title: Aprire più report con lo stesso comando

text:
Salve,

Lorena Zanini:
> sapete se è possibile con un unico comando su un pulsante aprire due o più report contemporaneamente?
> Per farmi capire, se il primo report ha due pagine e il secondo tre pagine, vorrei che mi aprisse un documento con cinque pagine.
> Al momento sono riuscita ad aprirli con questa routine ma restano due report separati:
>      Dim stDocName As String
>      Dim stLinkCriteria As String
>      stDocName = "A"
>      stLinkCriteria = "[IdStudio]=" & Me![IdStudio]
>      DoCmd.OpenReport stDocName, acPreview, , stLinkCriteria
>      Dim stDocName1 As String
>      Dim stLinkCriteria1 As String
>      stDocName1 = "M"
>      stLinkCriteria1 = "[IdStudio]=" & Me![IdStudio]
>      DoCmd.OpenReport stDocName1, acPreview, , stLinkCriteria1

Forse puoi integrare i due report come sottoreport in un nuovo report
principale.

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

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


title: Aprire più report con lo stesso comando

author: Ammammata

text:
Il giorno Tue 06 Apr 2021 02:59:07p, *Karl Donaubauer* ha inviato su
it.comp.appl.access il messaggio
news:id348r...@mid.individual.net
.
Vediamo cosa ha scritto:

>
> Forse puoi integrare i due report come sottoreport in un nuovo report
> principale.
>
>

confermo, fattibile

oppure genera due PDF e li unisce

--
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\
-=- -=- -=- -=- -=- -=- -=- -=- - -=-
........... [ al lavoro ] ...........


title: Aprire più report con lo stesso comando

author: Bruno Campanini

text:

Se i due report (RR1 e RR2) hanno per Record Source
due tabelle (TT1 e TT2), fa' una copia di TT1 (o TT2) e chiamala TT3,
poi fai una copia di RR1 (o RR2) e chiamala RR3, ed esegui:
===================================
Private Sub Command0_Click()
Dim RS(1 To 3) As Recordset, TT(1 To 3), RR(1 To 3)
Dim SQL As String, i As Integer, j As Integer

'---  Definizioni  ---------------------------
TT(1) = "TT1": RR(1) = "RR1"  ' Sostituire
TT(2) = "TT2": RR(2) = "RR2"  ' "TTx" e "RRx"
TT(3) = "TT3": RR(3) = "RR3"  ' coi nomi reali
'---------------------------------------------

SQL = "DELETE TT3.* FROM TT3;"
CurrentDb.Execute SQL

Set RS(1) = CurrentDb.OpenRecordset("TT1", dbOpenDynaset)
Set RS(2) = CurrentDb.OpenRecordset("TT2", dbOpenDynaset)
Set RS(3) = CurrentDb.OpenRecordset("TT3", dbOpenDynaset)

For i = 1 To 2
    Do Until RS(i).EOF
        RS(3).AddNew
        For j = 0 To RS(i).Fields.Count - 1
            RS(3).Fields(j) = RS(i).Fields(j)
        Next
        RS(3).Update
        RS(i).MoveNext
    Loop
Next

DoCmd.OpenReport "RR3", acViewDesign
Reports("RR3").RecordSource = "TT3"
DoCmd.OpenReport "RR3", acViewNormal

End Sub
=================================

La procedura è valida "mutatis mutandis" per qualsiasi
numero di tabelle/record.

Se i Record Source dei report sono query, occorre qualche modifica...
fammelo sapere.

Bruno


title: Aprire più report con lo stesso comando

author: BFS

text:

se non ho capito male questa cosa vale solo se le due tabelle hanno
stessa struttura

non faresti quindi prima a fare una query di unione tra TT1 e TT2?

BFS


title: Aprire più report con lo stesso comando

text:

Perché nelle union query le tabelle non devono avere
la stessa struttura?

Se poi l'OP vuole un unico report tratto dalle parti
comuni di due tabelle di diversa struttura, allora si potrà
fare una Union Query con due query che abbiano la stessa
struttura, con dati comuni tratti da tabelle di diversa struttura.

Fa' tu l'ipotesi esemplificativa e sviluppa tutto il codice, così
se l'OP lo richiedesse tutto sarebbe già pronto.

Bruno

PS
In effetti l'OP aveva richiesto la possibilità di unire 2 o più
report.
Peranto aggiungo il codice modificato per n report da stampare in 1:
=================================
Private Sub Command0_Click()
'
' Access 2019    07-04-2021    BC2.accdb
' Form: Stampa_n_Record_in_1
'
' n report devono esser stampati in un unico report
'
Dim RS() As Recordset, TT() As String, RR() As String
Dim SQL As String, i As Integer, j As Integer, n As Integer

'---  Definizioni  ---------------------------
n = 2 ' Numero record da stampare uniti
ReDim RS(1 To n + 1): ReDim TT(1 To n + 1): ReDim RR(1 To n + 1)
TT(1) = "TT1": RR(1) = "RR1"  ' Sostituire TTx, RRx coi nomi reali
' ... ... ...
TT(n) = "TT" & n: RR(n) = "RR" & n
TT(n + 1) = "TT" & n + 1: RR(n + 1) = "RR" & n + 1
'---------------------------------------------

SQL = "DELETE TT" & n + 1 & ".* FROM TT" & n + 1 & ";"
CurrentDb.Execute SQL

Set RS(1) = CurrentDb.OpenRecordset("TT1", dbOpenDynaset)
'  ... ... ...
Set RS(n) = CurrentDb.OpenRecordset("TT" & n, dbOpenDynaset)
Set RS(n + 1) = CurrentDb.OpenRecordset("TT" & n + 1, dbOpenDynaset)

For i = 1 To n + 1
    Do Until RS(i).EOF
        RS(n + 1).AddNew
        For j = 0 To RS(i).Fields.Count - 1
            RS(n + 1).Fields(j) = RS(i).Fields(j)
        Next
        RS(n + 1).Update
        RS(i).MoveNext
    Loop
Next

DoCmd.OpenReport "RR" & n + 1, acViewDesign
Reports("RR" & n + 1).RecordSource = "TT" & n + 1
DoCmd.OpenReport "RR" & n + 1, acViewPreview
DoCmd.Save acReport, "RR" & n + 1

End Sub
===================================================


title: Aprire più report con lo stesso comando

text:

forse non mi sono spiegato
appurato che le tue due tabelle sono identiche..
mi chiedevo che utilità avesse creare una terza tabella, identica pure
quella, scriverci dentro i dati di una e dell'altra quando bastava
semplicemente fare una query di unione delle due

esempio se tabA ha ID e Nome  con 500000 di record
e tabB ha id e Nome con 600000 di record
che vantaggi ho a creare una tabC, fare 1100000 inserimenti/update
rispetto a fare una banale query di unione e impostarla come origine report

tutto qui
ma forse mi sfugge qualcosa nella tua soluzione
BFS


title: Aprire più report con lo stesso comando

text:

No, sono io che avevo inteso volessi eccepire sulla possibilità
che potesse trattarsi di tabelle di differente struttura delle
quali stampare in unico report i campi comuni.

> appurato che le tue due tabelle sono identiche..
> mi chiedevo che utilità avesse creare una terza tabella, identica pure
> quella, scriverci dentro i dati di una e dell'altra quando bastava
> semplicemente fare una query di unione delle due
Sì, hai ragione, non ci avevo pensato... e poi mi diverto troppo
coi cicli For... Next e gli array.

> ma forse mi sfugge qualcosa nella tua soluzione
Forse ti sfugge che se si tratta di 10 record da stampare in uno,
credo sia più semplice la mia soluzione e non la tua.
Ma ribadisco che il motivo della mia scelta è stato quello
appena enunciato.

Bruno


title: Aprire più report con lo stesso comando

text:

Grazie a tutti per le numerose idee, quella di Bruno è troppo complessa per le mie capacità e i dati arrivano comunque da query diverse e non da tabella, potrebbe essere interessante nel mio caso specifico fare come dice Ammammata, solo che sono di nuovo da capo.
C'è una routine che si può fare per unire i due report in pdf direttamente da vba?
Io al momento apro il primo report in anteprima di stampa e lancio la stampa del pdf che accodo, poi apro il secondo report e lo accodo, poi unisco con pdf creator e salvo il file...
Per snellire la procedura mi piacerebbe riuscire a unire direttamente i due pdf da vba semplicemente con un pulsante.
Se non è fattibile continuo con la mia procedura, un po' noiosa ma funzionante, oppure creo un terzo report come suggerisce Karl mettendo i primi due come sottoreport.
Grazie infinite per la vostra professionalità!  ;-)


title: Aprire più report con lo stesso comando

text:

puoi usare questo per fondere i pdf

https://www.pdflabs.com/docs/pdftk-cli-examples/

dati n pdf in una cartella puoi fonderli in uno solo tramite :

Join in1.pdf and in2.pdf into a new PDF, out1.pdf

     pdftk in1.pdf in2.pdf cat output out1.pdf

comandi che puoi eseguire da riga di comanda quindi tramite un click di
un bottone

BFS


title: Aprire più report con lo stesso comando

author: RobertoA

text:
Il 07/04/2021 18:26, Lorena Zanini ha scritto:

La tua procedura, trattando due report separati, cosente di unire stampe
qualsiasi anche provenienti da dati completamente diversi
Quindi mi pare mooolto milliore delle altre soluzioni
Non si e' ancora ben capito perche' non riesci ad eseguire tutta la
trafila (creazione pdf1, creazione pdf2, unione due pdf, invio in
stampa) da codice vba eseguito a seguito pressione tasto unico
Cosa osta?


title: Aprire più report con lo stesso comando

text:
>
> Grazie a tutti per le numerose idee, quella di Bruno è troppo complessa per
> le mie capacità e i dati arrivano comunque da query diverse e non da tabella,
> potrebbe essere interessante nel mio caso specifico fare come dice Ammammata,
> solo che sono di nuovo da capo. C'è una routine che si può fare per unire i
> due report in pdf direttamente da vba? Io al momento apro il primo report in
> anteprima di stampa e lancio la stampa del pdf che accodo, poi apro il
> secondo report e lo accodo, poi unisco con pdf creator e salvo il file...
> Per snellire la procedura mi piacerebbe riuscire a unire direttamente i due
> pdf da vba semplicemente con un pulsante. Se non è fattibile continuo con la
> mia procedura, un po' noiosa ma funzionante, oppure creo un terzo report come
> suggerisce Karl mettendo i primi due come sottoreport. Grazie infinite per la
> vostra professionalità!  ;-)

Non ho intenzione di "venderti" alcunché: vorrei solo farti apprezzare
la semplicità.
Per cui ti chiedo, puoi inviarmi le query che ti servono per compilare
i report, 2, 3 o 30 che siano?
Non dovresti ritenere violata la privacy perché le query non contengono
dati ma solo riferimenti a tabelle (quelle sì contengono dat!) che
rimangono presso di te.
Completerei la procedura con le query e te invierei.
Dovresti solo trascinarla come modulo nella finestra VBA ed attivarla
con un Tasto da una Scheda, per vedere il preview e poi stampare
quell'unico report.

Bruno


title: Maschera con caselle collegate

author: Eugenio

text:
Salve a tutti, vorrei creare una maschera con le seguenti caratteristiche:
due caselle (per semplificare) che hanno le seguenti caratteristiche:
la prima deve essere una casella combinata nella quale posso selezionare,
mediante il pulsante "a tendina", dei valori presenti nella tabella di
origine. E questo lo so fare.
La seconda, invece, dovrebbe visualizzare in automatico un valore associato
a quello selezionato nella casella precedente.
Non so se mi sono riuscito a spiegare, percio' faccio un esempio.
Ho una tabella con i campi Nome e Cognome.
Nella prima riga ci sono i valori "Pinco" per il nome e "Pallino" per il
cognome, mentre nella seconda ci sono "Galileo" per il mome e "Galilei" per
il cognome.
Ora, io vorrei poter selezionare il nome "Pinco" nella prima casella e
vedere poi visualizzato il nome "Pallino" nella seconda, automaticamente.
Stessa cosa per Galileo Galilei.
Mi potete dare una mano?
Grazie e Buona Pasqua,
Eugenio


title: Maschera con caselle collegate

author: cidi

text:
"Eugenio" <
epime...@hotmail.com
> ha scritto nel messaggio
news:Mzxdc.34092$hc5.1...@news3.tin.it...
> Salve a tutti, vorrei creare una maschera con le seguenti caratteristiche:
>
> due caselle (per semplificare) che hanno le seguenti caratteristiche:
> la prima deve essere una casella combinata nella quale posso selezionare,
> mediante il pulsante "a tendina", dei valori presenti nella tabella di
> origine. E questo lo so fare.
Evento dopo aggiornamento di questa casella combinata inserisci:
Me.NomeSecondaCasella = Me.NomePrimaCasellaCombinata.Column(2)
> La seconda, invece, dovrebbe visualizzare in automatico un valore
associato
> a quello selezionato nella casella precedente.
>
> Non so se mi sono riuscito a spiegare, percio' faccio un esempio.
>
> Ho una tabella con i campi Nome e Cognome.
> Nella prima riga ci sono i valori "Pinco" per il nome e "Pallino" per il
> cognome, mentre nella seconda ci sono "Galileo" per il mome e "Galilei"
per
> il cognome.
> Ora, io vorrei poter selezionare il nome "Pinco" nella prima casella e
> vedere poi visualizzato il nome "Pallino" nella seconda, automaticamente.
> Stessa cosa per Galileo Galilei.
>
> Mi potete dare una mano?
> Grazie e Buona Pasqua,
> Eugenio
>
Ciao Eugenio
vai sul sito comune che ci trovi esempi.
www.sitocomune.com
Daniele


title: Maschera con caselle collegate

author: Luca

text:
"cidi" <
dadonzin...@tin.it
> ha scritto nel messaggio
news:iNgec.42626$hc5.1...@news3.tin.it...
> Evento dopo aggiornamento di questa casella combinata inserisci:
> Me.NomeSecondaCasella = Me.NomePrimaCasellaCombinata.Column(2)
> vai sul sito comune che ci trovi esempi.
>
www.sitocomune.com
> Daniele
Grazie dell'aiuto e del link.
Eugenio


title: Parametro di query impostato da maschera

author: Antonio

text:
Per favore, ho un urgente bisogno di aiuto !!!
Ho una query con un parametro ed una maschera basata su questa query.
Ogni volta che apro la maschera, viene richiesto di immettere il parametro.
Come posso fare per impostare questo parametro direttamente dalla maschera,
visto che lo conosco fin dalla OPEN della maschera ?
Vi ringrazio e vi prego !!!!!! con cortese urgenza.
Ciao
Antonio


author: ALESSANDRO Baraldi

text:
"Antonio" <
bv...@tiscali.it
> ha scritto nel messaggio
news:clfiq5$avb$1...@lacerta.tiscalinet.it...

Lo devi passare dalla Form precedente....!
La query viene eseguita su evento Open della Form in questione
pertanto deve averlo già il Parametro.
Suppongo tu apra la form in questione da un'altra Form, pertanto
passagli come riferimento il contenuto del controllo nella Form Chiamante.
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: ACCESS e SQL Server

author: gibs

text:
ciao a tutti, è da un pò di tempo che seguo questo NG ma è la prima volta
che intervengo:
ho il seguente problema non riesco a modificare i campi in una form access
alla quale ho assegggnato un recordset prelevando i dati da una tabella SQL
server.
mi spiego meglio con il codice di esempio:
    Set rstprogramma = New ADODB.Recordset
    SqlSource= "SELECT ...
    rstprogramma.CursorLocation = adUseClient
    rstprogramma.Open SqlSource, cnnsrv, adOpenKeyset, adLockOptimistic
    Set Forms![Prescrizione
Psicofarmacologica]![Programma-Sottoscheda].Form.Recordset = rstprogramma
Quando tento di modificare i campi della form mi appare sulla barra di stato
il msg "recordset not updatable"
ringrazio anticipatamente per l'eventuale aiuto.


title: Problema teorico con una query

author: Buterao

text:
Dalla seguente query, perfettamente funzionante sotto Access
SELECT [carrelloId], [nome], [NrTrasporti]
FROM MerceTrasportataPerCarrello
WHERE
(NrTrasporti)>=DMax("NrTrasporti","MerceTrasportataPerCarrello","carrelloID="
& [carrelloId])
ORDER BY [MerceTrasportataPerCarrello].[carrelloId];
Qualcuno che conosce molto bene Sql Standard ... mi aiuterebbe a tradurla ?
Mi spiego meglio ...
la funzione DMax non fa parte del linguaggio sql, pertanto non posso
utilizzarla, quindi sto cercando di scrivere la query utilizzando al
posto della DMAX una sub-query o qualcosa del genere ... solo che
non riesco a trovare il massimo per ogni carrello ma mi da il max della
colonna ... io continuo a provare ...
confido anche in un'opera buona da parte di qualcuno di voi !!!
Ciao
Francesco


title: Problema teorico con una query

author: Alessandro Cara

text:
Buterao wrote:
>
> Dalla seguente query, perfettamente funzionante sotto Access
>
> SELECT [carrelloId], [nome], [NrTrasporti]
> FROM MerceTrasportataPerCarrello
> WHERE
> (NrTrasporti)>=
  (select max(nrtrasporti) from mercetrasportatapercarrello where
carrelloiD =
    &  carrelloId)
> ORDER BY [MerceTrasportataPerCarrello].[carrelloId];
>
c'e' qualcosa che non mi torna, ma non so cosa, quand'e' che potrebbe
uscire per > ?
--
a.cara
Togli qualcosa dall'email


title: Problema teorico con una query

author: Giorgio prx

text:
"Buterao" <
ver...@softhome.net
> ha scritto nel messaggio
news:3E413E5A...@softhome.net...

Ciao Buterao
Visto che Sql server quando genera il piano di esecuzione predilige la JOIN
ti propongo una query che la utilizza.
SELECT MerceTrasportataPerCarrello.carrelloId, [nome], [NrTrasporti]
FROM MerceTrasportataPerCarrello LEFT JOIN (Select MAX(NrTrasporti) as
MaxTr,carrelloId  FROM MerceTrasportataPerCarrello GROUP BY carrelloID) MTC
ON MerceTrasportataPerCarrello.CarrelloId=MTC.CarrelloId
WHERE NrTrasporti=MTC.MaxTr
ORDER BY [MerceTrasportataPerCarrello].[carrelloId];
Ciao Giorgio.


title: Report e parametri

author: RinaLuca

text:
Ciao,
ho una maschera, associata ad una tabella "Scuole", dalla quale lancio un
report la cui origine record è una query di nome "Ordini Totali".
Quando provo l'anteprima mi si aprono 2 finestre consecutive di immissione
parametri ID_Scuola e  ID_Ordine che non fanno parte del report.
Inoltre l'unico parametro che uso nella query è nella maschera di lancio del
report ed è un combo_box di nome Sel_Scuola che ho incluso nel criterio
associato al campo ID_Scuola (non visualizzato) della tabella "Scuole" come
[Forms]![Inserimento Ordini]![Sel_Scuola].
La cosa curiosa è che qualunque valore io metta nelle maschere che compaiono
la query visualizza correttamente l'output.
Cosa sbaglio?
Grazie.
Luca


title: Report e parametri

author: Antonio Biso

text:
"RinaLuca" <
rina...@yahoo.it
> ha scritto nel messaggio
news:lPYda.116143$zo2.3...@news2.tin.it...

Ci deve essere un riferimento a ID_Scuola e ID_Ordine nel report che non
trova nela query, forse come controllo o nella mascherina raggruppamento
ordinamento
Antonio


title: Report e parametri

author: Giacomo Rossi

text:
"RinaLuca" <
rina...@yahoo.it
> wrote in message
news:lPYda.116143$zo2.3...@news2.tin.it...

Per me hai qualche controllo sul report tipo, casella di testo e simili non
dichiarati sulla query del report, oppure se fai riferimento ad una query
nella query del report puoi andare a controllare se per caso hai qualche
incongruenza li. A me è capitato lostesso problema.........eh errori di
gioventu'
Ciao Giacomo


title: qualcuno mi sa spiegare il motivo dell'utlizzo della data GIULIANA????

text: Grazie a tutti.


author: sv

text:
Simba883 ha scritto:
http://www.mosac.com/astronomia/data_giuliana/index.php
--
rgrds
SC
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:
"sv" <
salv...@nospbox.enel.it
> ha scritto nel messaggio
news:bnm5m4$orn$1...@news.newsland.it...
> Simba883 ha scritto:
>
>
http://www.mosac.com/astronomia/data_giuliana/index.php
>
> --
> rgrds
> SC
grazie, e cosa centra con access?


text:
"Simba883" <
simb...@libero.it
> ha scritto nel messaggio
news:bnme1r$322$1...@lacerta.tiscalinet.it...

Oh!
L'hai iniziato tu 'sto thread nel NG di access, eh!
Antonio


author: Alberto S.

text:
On Mon, 27 Oct 2003 18:18:14 +0100, "Simba883" <
simb...@libero.it
>
wrote:
[cut]
Io invece mi riferirò ad un altro tipo di data giuliana ... un po' più
miserello, ma, vedi mai ...
Si tratta di una stringa di sei caratteri (formato AAAGGG) tramite la
quale si può designare una data compresa tra l'1/1/1900 e il
31/12/2899.
Noi l'abbiamo utilizzando, avendolo considerato il sistema meno
oneroso, per gestire il passaggio all'anno 2000 (riuscendo a mantenere
i campi data - non seriali ovviamente - lunghi 6 caratteri).
Ciao
--
Alberto
No alle guerre


text:
> > grazie, e cosa centra con access?
>
> Oh!
> L'hai iniziato tu 'sto thread nel NG di access, eh!
>
> Antonio
>
forse non mi hai capito, ho detto > > grazie, e cosa centra con access?
nel senso che lui mi ha dato il link di dove spiega la data giuliana ma io
chiedevo in access perchč so che a volte si usa tale data ma non so perchč,
ecco perchč ho detto
> > grazie, e cosa centra con access? che sta per  > > grazie per il link ,
a cosa centra con access la data giuliana?
;)


text:
On Tue, 28 Oct 2003 21:15:10 +0100, Alberto S.
<
sartori.SPA...@tin.it
> wrote:
[cut]
>Noi l'abbiamo utilizzando, avendolo considerato il sistema meno
ehm ... intendevo 'noi l'abbiamo utilizzato'



text:
"Simba883" <
simb...@libero.it
> ha scritto nel messaggio
news:bnn5ds$hkt$4...@lacerta.tiscalinet.it...
> > > grazie, e cosa centra con access?
> >
> > Oh!
> > L'hai iniziato tu 'sto thread nel NG di access, eh!
> >
> > Antonio
> >
>
> forse non mi hai capito, ho detto > > grazie, e cosa centra con access?
> nel senso che lui mi ha dato il link di dove spiega la data giuliana ma io
> chiedevo in access perchč so che a volte si usa tale data ma non so
perchč,
Ecco....
e secondo te noi stiamo nella tua testa e riusciamo a capire cosa stai
pensando e vorresti dire senza pur scriverlo?
Antonio


title: Progress Bar

author: Ferrari Rino

text:
Come poter assegnare una ProgressBar a una o più query a seguire
tipo :
DoCmd.RunSQL "INSERT INTO tblControlloGiacenzeDepositi ( IDDeposito,
CapacitàSerbatoio, Carburante, Descrizione, IDCarburante,
IDContolloGiacenze )" & vbNewLine _
              & "SELECT tblGestioneDepositi.IDDeposito,
tblGestioneDepositi.Misura, tblGestioneDepositi.Carburante,
tblGestioneDepositi.Descrizione, tblGestioneDepos" _
              & "iti.IDCarburante, Forms!frmCaricoCarburanti!IDCarico AS
IDControllo" & vbNewLine & "FROM tblGestioneDepositi" & vbNewLine _
              & "WHERE
((([Forms]![frmCaricoCarburanti]![GiacenzeDepositi])=False))" & vbNewLine _
              & "GROUP BY tblGestioneDepositi.IDDeposito,
tblGestioneDepositi.Misura, tblGestioneDepositi.Carburante,
tblGestioneDepositi.Descrizione, tblGestioneDep" _
              & "ositi.IDCarburante;" & vbNewLine
Grazie
Ferrari Rino


title: Progress Bar

text:
"Ferrari Rino" <
rinof...@virgilio.it
> ha scritto nel messaggio
news:z%tEd.387554$b5.18...@news3.tin.it...

Non puoi.
Le query Action vengono eseguite tutte in un botto per Access.
Nel senso che non c'è modo di recuperare un valore di progressione.
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: Progress Bar

author: Il Gatto

text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:crtr3p$9p1$1...@lacerta.tiscalinet.it...
> "Ferrari Rino" <
rinof...@virgilio.it
> ha scritto nel messaggio
> news:z%tEd.387554$b5.18...@news3.tin.it...
> Non puoi.
> Le query Action vengono eseguite tutte in un botto per Access.
> Nel senso che non c'è modo di recuperare un valore di progressione.
Verissimo, però... quadruplicando il tempo di esecuzione in questo caso
specifico se uno non vuole rinunciare alle progress bar può sempre smontare
la query nelle due parti, aprire il recordset sorgente ed eseguire gli
insert un record alla volta in un bel ciclo while, dove di volta in volta
aggiorna anche la progress bar e subito dopo da un bel DoEvents (sennò la
p.b. si ridisegna solo al termine della gestione evento)....
IG


title: Progress Bar

text:
"Il Gatto" <
no...@nowhere.no
> ha scritto nel messaggio
news:0EwEd.76570$C94....@tornado.fastwebnet.it...

Speriamo non ci sia nessuno che antepone l'estetica alla funzionalità....!
Di mio non consiglio mai cose assurde.



title: Progress Bar

text:
> Speriamo non ci sia nessuno che antepone l'estetica alla funzionalità....!
> Di mio non consiglio mai cose assurde.
Molto dipende dal tipo di persona che ti devi aspettare davanti al monitor
mentre il tutto è in funzione. Ovviamente non conosco il problema esposto
nello specifico, e se come credo qualche secondo è il massimo di attesa
prevista un bel "Attendere qualche istante..." va più che bene, era giusto
per dire non è del tutto impossibile.
Se però la procedura per ragioni insondabili (rete lumaca, ecc) dura minuti
e l'applicativo finisce in mano a dogs + pigs piuttosto che incorrere nei
disastri che può fare un utente spazientito di fronte ad Access in forma
autistica che va di Ctrl-Alt-Canc e accoppa tutti i processi che gli
capitano a tiro o che (per me) è peggio, alza il telefono e chiama per dire
"S'è inchiodato!", può anche valer la pena! :-)
IG


title: Progress Bar

text:
"Il Gatto" <
no...@nowhere.no
> ha scritto nel messaggio
news:nlyEd.76794$C94....@tornado.fastwebnet.it...

Le tue considerazioni sono corrette e mi fanno sorridere, perchè gli utenti
sono proprio come li hai descritti.
Fai un test, se non l'hai già fatto, del tempo di esecuzione delle 2
procedure.
Su campioni di dati significativi come possono essere gestionali la cosa
è quanto meno improponibile.
Io credo che se la soluzione è granitica, solida e funzionale, non serve una
progressbar, basta come dici tu un messaggio.
La soluzione in questione non ha altro scopo che rallentare a fronte di un
fatto solo ed esclusivamente estetico.
Tieni poi conto che in un ambiente Client/Server multiutente quanto dici
è assurdamente ed inesorabilmente pericoloso e destinato a problemi.
Le transazioni sarebbero da far eseguire al Server nel minor tempo possibile
escludendo qualunque ritardo di qualunque tipo o causa.
Questo è solo a carico del programmatore, se l'utente vuole la Progress
gli faccio vedere un ciclo alla fine così è contento....!!!!!
Un'aggiornamento di questo tipo viene eseguito con una StoredProcedure
in un Server SQL e non ci si sognerebbe mai di impegnare un Recordset
in Read/Write in quel modo....!!!
Per JET è la stessa cosa, l'aggiornamento ISTANTANEO(il rapporto è enorme
tra i 2 metodi)
garantisce una minor possibilità di problematiche con la gestione dei
bloccaggi
Record.
Prendi le mie considerazioni come globali e concettuali, poi ognuno è libero
di fare "TAFAZZI" con i propri applicativi.....! ;-)



title: Lentezza query calcolo progressivi

author: Nina

text:
Salve a tutti,
su un db in formato Access XP ho una tabella movimenti, con i campi data
movimento, entrate di cassa, uscite di cassa, prelievi  e versamenti banca,
prelievi e versamenti posta.
Ho una query Saldi progressivi che mi calcola i progressivi su cassa, banca
e posta.
Finchč la tabella movimenti contiene poche decine di record la query č
velocissima, ma con qualche migliaio di record diventa lentissima.
Come posso ottimizzare la query?
--
Nina


title: Lentezza query calcolo progressivi

author: GC

text:
On 26 Feb, 10:43, "Nina" <
paninotCnacellaredopopani...@yahoo.it
>
wrote:
> Salve a tutti,
>
> su un db in formato Access XP ho una tabella movimenti, con i campi data
> movimento, entrate di cassa, uscite di cassa, prelievi  e versamenti banca,
> prelievi e versamenti posta.
>
> Ho una query Saldi progressivi che mi calcola i progressivi su cassa, banca
> e posta.
> Finchè la tabella movimenti contiene poche decine di record la query è
> velocissima, ma con qualche migliaio di record diventa lentissima.
>
> Come posso ottimizzare la query?
>
> --
> Nina
In linea di principio, si può provare a inserire qualche indice. Ma
per fare una corretta valutazione bisognerebbe conoscere il dettaglio
delle tabelle, della query e di tutto il contorno


title: Lentezza query calcolo progressivi

text:
"GC" <
g.cal...@yahoo.it
> ha scritto nel messaggio
news:1172483473....@j27g2000cwj.googlegroups.com...
On 26 Feb, 10:43, "Nina" <
paninotCnacellaredopopani...@yahoo.it
>
wrote:
> Salve a tutti,
>
> su un db in formato Access XP ho una tabella movimenti, con i campi data
> movimento, entrate di cassa, uscite di cassa, prelievi  e versamenti
> banca,
> prelievi e versamenti posta.
>
> Ho una query Saldi progressivi che mi calcola i progressivi su cassa,
> banca
> e posta.
> Finchč la tabella movimenti contiene poche decine di record la query č
> velocissima, ma con qualche migliaio di record diventa lentissima.
>
> Come posso ottimizzare la query?
>
> --
> Nina
In linea di principio, si puņ provare a inserire qualche indice. Ma
per fare una corretta valutazione bisognerebbe conoscere il dettaglio
delle tabelle, della query e di tutto il contorno
Ciao GC,
la query č questa:
SELECT Tab1.IdMovimento, Tab1.DataMovimento, SUM(nz(Tab2.CassaEntrate)) AS
ProgressivoCassaEntrate, SUM(nz(Tab2.CassaEntrate) - nz(tab2.CassaUscite))
AS ProgressivoCassa, SUM(nz(Tab2.BancaVersamenti) -nz(tab2.BancaPrelievi))
AS ProgressivoBanca, SUM(nz(Tab2.PostaVersamenti) -nz(tab2.PostaPrelievi))
AS ProgressivoPosta, SUM(nz(Tab2.PartiteFuoriCassa)) AS ProgressivoPFC
FROM Movimenti AS Tab1 INNER JOIN Movimenti AS Tab2 ON
Format(Tab1.Datamovimento, "yyyymmdd") & Format(Tab1.IdMovimento, "000000")
 >= Format(Tab2.Datamovimento, "yyyymmdd") & Format(Tab2.IdMovimento,
"000000")
GROUP BY Tab1.DataMovimento, Tab1.IdMovimento
ORDER BY Tab1.DataMovimento, Tab1.IdMovimento;
IdMovimento č chiave primaria (contatore).
Sarebbe utile indicizzare i campi data?
Ciao, grazie
--
Nina


title: Lentezza query calcolo progressivi

text:
> SELECT Tab1.IdMovimento, Tab1.DataMovimento, SUM(nz(Tab2.CassaEntrate)) AS
> ProgressivoCassaEntrate, SUM(nz(Tab2.CassaEntrate) - nz(tab2.CassaUscite))
> AS ProgressivoCassa, SUM(nz(Tab2.BancaVersamenti) -nz(tab2.BancaPrelievi))
> AS ProgressivoBanca, SUM(nz(Tab2.PostaVersamenti) -nz(tab2.PostaPrelievi))
> AS ProgressivoPosta, SUM(nz(Tab2.PartiteFuoriCassa)) AS ProgressivoPFC
> FROM Movimenti AS Tab1 INNER JOIN Movimenti AS Tab2 ON
> Format(Tab1.Datamovimento, "yyyymmdd") & Format(Tab1.IdMovimento, "000000")
>  >= Format(Tab2.Datamovimento, "yyyymmdd") & Format(Tab2.IdMovimento,
> "000000")
> GROUP BY Tab1.DataMovimento, Tab1.IdMovimento
> ORDER BY Tab1.DataMovimento, Tab1.IdMovimento;
>
> IdMovimento è chiave primaria (contatore).
> Sarebbe utile indicizzare i campi data?
> Ciao, grazie
>
> --
> Nina
Suppongo che il problema della velocità risieda soprattutto nella
condizione del join, applicato su campi calcolati e formattati.
Correggimi se sbaglio: la query, per ciascun movimento, deve andare a
considerare tutti i movimenti ad esso successivi (è questo il motivo
della join su un campo calcolato). Se così è, dovresti cercare di
semplificare la join: ad esempio,
....
FROM Movimenti AS Tab1 INNER JOIN Movimenti AS Tab2 ON
Tab1.Datamovimento>Tab2.Datamovimento OR
(Tab1.Datamovimento=Tab2.Datamovimento AND
Tab1.IdMovimento>=Tab2.IdMovimento)
o qualcosa del genere. In questo caso, sicuramente un indice sul campo
Datamovimento sarebbe molto utile


title: N°progressivo unico x multiutente

text:
devo creare un applicativo con destinazione multiutente in rete e su cui
devo inserire un contatore (non contatore) che mi permetta la sicurazza
dei dati unici, mi permetta in caso di più utenti che stanno immettendo
record contemporaneamente, di non assegnare lo stesso numero, e che il
numero assegnato non possa essere eliminato.
in precedenti applicativi ho creato un campo contatore in formato testo e
sul controllo maschera, nel valore predefinito ho inserito il seguente
codice
=IIf(DCount("[Numero_pratica]";"Tabella1")=0;1;DMax("[numero_pratica]";"Tabella1")+1)
ma spesso quando 2 utenti inseriscono un record contemporaneamente capita
che:
1° utente fa nuovo record, il contatore assegna un numero, mentre completa
il record, un 2° utente inserisce un nuovo record, il contatore assegna un
numero uguale al primo utente, in quanto quest'ultimo ancora non ha
completato il record. Il 2° completa il record e passa al successivo,
tutto OK per lui, ma il primo utente che completa dopo il record, alla
fine dell'inserimento gli si presenta un messaggio di errore in cui si
dice che il numero è già esistente con la conseguenza di dover reinserire
il record.
E questo voglio evitarlo!.
suggerimenti, procedure e pazienza sono ben accette!
luigi
grazie
ps: ho spulciato il demo gestionefacile3impresa postato su questo NG e il
modulo Modnumber che potrebbe fare al caso mio, ma non ci ho capito nulla!
la demo è troppo complicata per i miei saperi.
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: N°progressivo unico x multiutente

author: MA

text:
"luigi.onofrio" <
onofrio...@tin.it
> ha scritto nel messaggio news:f5d9q3$u3b$1...@news.newsland.it...

tu assegni il contatore sul dirty del record
spostalo sul salvataggio
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access
Segrate (MI), 7-8 giugno 2007


title: N°progressivo unico x multiutente

author: Mauro Trevisan

text:
Io assegnerei il numero solo all'atto del salvataggio del record.
Ciao, Mauro


title: N°progressivo unico x multiutente

text:
MA ha scritto:


grazie del suggerimento, ma come fare? praticamente!
luigi



title: N°progressivo unico x multiutente

text:
Mauro Trevisan ha scritto:
> Io assegnerei il numero solo all'atto del salvataggio del record.
> Ciao, Mauro
come? in pratica?
grazie



title: N°progressivo unico x multiutente

author: CIDI

text:
"luigi.onofrio" <
onofrio...@tin.it
> ha scritto nel messaggio
news:f5dia3$glm$1...@news.newsland.it...
> Mauro Trevisan ha scritto:
>
>> Io assegnerei il numero solo all'atto del salvataggio del record.
>> Ciao, Mauro
>
> come? in pratica?
> grazie
>
Ciao Luigi
qualcosa di simile su prima di aggiornare della maschera:
' Se č un nuovo record
If Me.NewRecord Then
         Me.ctrlNumeroFattura = Nz(DMax("NumeroFattura", "tblFatture"), 0) +
1
  End If
Daniele


title: N°progressivo unico x multiutente

text:
CIDI ha scritto:


ok! pare che vada bene!
ma per vedere il numero assegnato prima di inserire un nuovo record come
potrei fare?
grazie
luigi



title: N°progressivo unico x multiutente

text:
On 21 Giu, 13:48,
onofriolNOtS...@tin.it
 (luigi.onofrio) wrote:
> CIDI ha scritto:
>
> > "luigi.onofrio" <
onofriolNOtS...@tin.it
> ha scritto nel messaggio
> >news:f5dia3$glm$1...@news.newsland.it...
> > > Mauro Trevisan ha scritto:
>
> > >> Io assegnerei il numero solo all'atto del salvataggio del record.
> > >> Ciao, Mauro
>
> > > come? in pratica?
> > > grazie
>
> > Ciao Luigi
> > qualcosa di simile su prima di aggiornare della maschera:
> > ' Se è un nuovo record
> > If Me.NewRecord Then
> >          Me.ctrlNumeroFattura = Nz(DMax("NumeroFattura", "tblFatture"), 0) +
> > 1
> >   End If
>
> ok! pare che vada bene!
> ma per vedere il numero assegnato prima di inserire un nuovo record come
> potrei fare?
> grazie
> luigi
>
> --
Se puoi, salva subito appena calcolato il numero:
Riprendendo l'esempio di Daniele, potrebbe essere:
If Me.NewRecord Then
 Me.ctrlNumeroFattura = Nz(DMax("NumeroFattura", "tblFatture"), 0) +1
 docmd.RunCommand acCmdSaveRecord
End If
Se non puoi salvare, si potrebbe memorizzare il numero in una tabella
temporanea.
Ciao, Mauro.


title: N°progressivo unico x multiutente

author: Ammammata

text:
onofrio...@tin.it
 (luigi.onofrio) wrote in
news:f5doiq$liv$
1...@news.newsland.it
:
> ma per vedere il numero assegnato prima di inserire un nuovo record come
> potrei fare?
>
non si puņ
puoi invece mostrare quello che PROBABILMENTE sarą il numero assegnato
--
/-\ /\/\ /\/\ /-\ /\/\ /\/\ /-\ T /-\


title: N°progressivo unico x multiutente

text:
Mauro Trevisan ha scritto:



con questo mi da l'errore 2115
> Se non puoi salvare, si potrebbe memorizzare il numero in una tabella
> temporanea.
> Ciao, Mauro.
tipo?



title: N°progressivo unico x multiutente

text:
"luigi.onofrio" <
onofrio...@tin.it
> ha scritto nel messaggio
news:f5duq6$tp7$1...@news.newsland.it...

Ciao Luigi - Mauro
secondo me, salvare il numero fattura in una tab. temporanea non
risolve il problema.
Poichè prima del salvataggio del record un'altro utente potrebbe usare
lo stesso numero.
Invece la routine, prima di aggiornare il record, legge l'ultimo numero in
tabella Fatture
ed assegna il nuovo numero fattura.
Daniele


title: N°progressivo unico x multiutente

author: Famiglia Franchi

text:
"luigi.onofrio" <
onofrio...@tin.it
> ha scritto nel messaggio
news:f5d9q3$u3b$1...@news.newsland.it...

buona Sera Luigi
Funziona da circa 7 anni quando ho messo in rete tutto.
Crei una sub vedi sotto.
Quando premi il pulsante nuovo record gli passi i valori.
Il messaggio ->MsgBox ("ATTENZIONE STESSA MASCHERA"), 48, "CONDIVISIONE"
basta toglierlo.
Sub NuovoRecordAutoID(PrimoID As Variant, Intervallo As Byte, Frm As Form,
SecondoID As Variant, TerzoID As Variant)
On Error GoTo Err_NuovoRecordAutoID
  VariabileRecord = 1
  Frm.[DefaultEditing] = 2
  DoCmd.GoToRecord , , acNewRec
InizioNuovoRecordAutoID:
  Frm![AutoID] = PrimoID
  Frm![Operatore] = NomeOperatore
  If SecondoID Then Frm![SecoID] = SecondoID
  If TerzoID Then Frm![TerzID] = TerzoID
  DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
  VariabileRecord = 0
Exit_NuovoRecordAutoID:
  Exit Sub
Err_NuovoRecordAutoID:
  If Err = 3022 Then
    MsgBox ("ATTENZIONE STESSA MASCHERA"), 48, "CONDIVISIONE"
    PrimoID = PrimoID + Intervallo
    Resume InizioNuovoRecordAutoID
  End If
  MsgBox Error$
  Resume Exit_NuovoRecordAutoID
End Sub
Saluti


title: N°progressivo unico x multiutente

text:
"Famiglia Franchi" <
franchi....@tiscali.it
> ha scritto nel messaggio
news:467ae38d$0$21202$5fc...@news.tiscali.it...

Mi dimenticavo:
Private Sub Nuovo_Click()
On Error GoTo Err_Nuovo_Click
  Dim UltimoID As Variant
  If DCount("[ID Dettaglio Bolla Cliente]", "xInfo Fatture Clienti/Bolle") =
0 Then MsgBox ("NON Esistono D.d.t. Da FATTURARE"),
48,IntestazioneMessaggio:Exit Sub
  UltimoID = DMax("[ID Serie Fattura]", "Fatture Clienti", "(Int([ID Serie
Fattura]/100000))=((Year(Date()))-1995)")
  If IsNull(UltimoID) Then UltimoID = ((Year(Date) - 1995) * 100000)
  Call NuovoRecordAutoID((UltimoID + 1), 1, Screen.ActiveForm, 0, 0)
  eccetera................
Exit_Nuovo_Click:
  Exit Sub
Err_Nuovo_Click:
  MsgBox Error$
  Resume Exit_Nuovo_Click
End Sub


title: N°progressivo unico x multiutente

text:
Famiglia Franchi ha scritto:

> Mi dimenticavo:

>   Dim UltimoID As Variant



>   eccetera................
> Exit_Nuovo_Click:
>   Exit Sub

> End Sub
scusa, ma per mia ignoranza non ci ho capito niente!
io ho la tabella "disabili" campo "N_autorizzazione"
ho la maschera "frmdisabili" con il controllo campo "n_autorizzazione"
in pratica la progressione in rete deve avvenire su "N_autorizzazione"
non riesco ad adattare il tuo codice al mio DB.
luigi



title: N°progressivo unico x multiutente

text:
Iniziamo
Ora adatto la mia per la TUA:
Questo è access 2000
Sub NuovoRecordAutoID(PrimoID As Variant, Intervallo As Byte, Frm As Form,
SecondoID As Variant, TerzoID As Variant)
On Error GoTo Err_NuovoRecordAutoID
  Frm.[DefaultEditing] = 2
  DoCmd.GoToRecord , , acNewRec
InizioNuovoRecordAutoID:
  Frm![AutoID] = PrimoID
  If SecondoID Then Frm![SecoID] = SecondoID
  If TerzoID Then Frm![TerzID] = TerzoID
  DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
Exit_NuovoRecordAutoID:
  Exit Sub
Err_NuovoRecordAutoID:
  If Err = 3022 Then
    MsgBox ("ATTENZIONE STESSA MASCHERA"), 48, "CONDIVISIONE"
    PrimoID = PrimoID + Intervallo
    Resume InizioNuovoRecordAutoID
  End If
  MsgBox Error$
  Resume Exit_NuovoRecordAutoID
End Sub
Nella maschera avrai un pulsante chiamato Nuovo per creare il record:
Private Sub Nuovo_Click()
On Error GoTo Err_Nuovo_Click
  Dim UltimoID As Variant
 'UltimoID naturalmente è l'ultimo record della tua tabella "disabili"
  UltimoID = DMax("[N_autorizzazione]", "disabili")
 'Andiamo a prendere il valore UltimoID
  Call NuovoRecordAutoID((UltimoID + 1), 1, forms![frmdisabili], 0, 0)
 'Vado a chiamare la sub
  eccetera................
'-------------------------------------------------------------------------------------
'ATTENZIONE IL CAMPO "N_autorizzazione" della maschera lo chiamerai
AutoID -->solo il nome mentre il valore "N_autorizzazione"
'Questo vuol dire che in tutte le maschere con campi di nome diverso che
devi generare un numero progressivo li chiami AutoID
'in modo che la sub sia sempre quella.
'-------------------------------------------------------------------------------------
Exit_Nuovo_Click:
  Exit Sub
Err_Nuovo_Click:
  MsgBox Error$
  Resume Exit_Nuovo_Click
End Sub
Altrimenti manda il piccolo database formato (ACCESS 2000 io lavoro solo con
questo) con la maschera che lo preparo e te lo rispedisco.
Ciao
Graziano


title: N°progressivo unico x multiutente

text:

> questo articolo e` stato inviato via web dal servizio gratuitohttp://
www.newsland.it/newssegnala
 gli abusi ad a...@newsland.it- Nascondi testo tra virgolette -
>
> - Mostra testo tra virgolette -
Ciao Luigi,
scusa se rispondo solo ora.
Crei una tabella "UltimoNumero" con un solo campo "Ultimo" di tipo
intero che conterrà sempre un solo record.
Quando un utente crea un nuovo record, vai a leggere in questa tabella
qual'è l'ultimo numero disponibile (esempio: 883), e lo memorizzi in
una variabile.
Subito dopo sommi 1 (883+1=884) e sovrascrivi 883 con 884 nella
tabella "UltimoNumero".
In questo modo, il secondo utente che va leggere l'ultimo numero
disponibile nella tabella "UltimoNumero", trova 884.
Il primo utente può usare in tranquillità il numero 883 (memorizzato
nella variabile) come "N_autorizzazione" nella tabella "disabili",
perchè è sicuro che il secondo utente userà il numero 884.
Per la realizzazione pratica:
Nell'evento che crea un nuovo record scrivi:
Dim rst As Recordset, intUltimo as Long
Set rst = CurrentDb.OpenRecordset("UltimoNumero", dbOpenDynaset)
intUltimo = rst!ultimo
rst.Edit
rst!ultimo = rst!ultimo + 1
rst.Update
rst.Close
Me.N_autorizzazione = intUltimo
...
Ora, nella variabile "intUltimo" hai il tuo numero (883), che potrai
usare per compilare il campo "N_autorizzazione".
L'unico problema è che se il primo utente annulla il salvataggio del
record (magari perchè ha sbagliato a premere un pulsante), "brucia" il
numero assegnato (883) e nella tabella "disabili" le autorizzazioni
passano dal n.882 al 884. (a Max Pezzali dispiacerebbe molto :-)
A disposizione per chiarimenti.
Ciao, Mauro.


title: contatore in transfertext

author: max

text:
Ho l'esigenza di importare a cadenza mensile dei dati da un file TXT e
riesco tranquillamente a farlo tramite TransferText, la tabella che si crea
però dovrebbe avere anche un indice ID contatore come faccio ad inserirlo
nelle specifiche di importazione?
spero di essere  stato chiaro nell'esposizione e ringrazio tutti per il
supporto
ciao
max


title: contatore in transfertext

author: Sergio MAZZA

text:
"max" <
pi...@pippo.it
> ha scritto nel messaggio
news:ghqp87$qnv$1...@news.task.gda.pl...

Utilizzi VBA e inserisci nel nomeTabella del file il numero del contatore
(dall'help)
TransferText(TipoTrasferimento, NomeSpecifica, NomeTabella, NomeFile,
NomiCampo, NomeTabellaHTML, TabellaCodici)
Ciao.
--
Sergio MAZZA


title: contatore in transfertext

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:ghrecp$1ta$1...@tdi.cu.mi.it...

perdonami Sergio ma probabilmente non sono stato chiaro io nell'esposizione
del problema (che fra le altre cose ho risolto con un ALTER TABLE).
Nel mio file di testo non ho un campo contatore, solo che se io importo
"manualmente" il file in una tabella, l'importazione mi chiede se voglio
aggiungere una chiave automatica. Io volevo fare la stessa cosa importando
il file con tranfertext, e nell'help che tu mi indichi sinceramente non ho
capito se e come.
grazie comunque della risposta ti auguro un buon natale visto che ormai ci
siamo quasi...
ciao
max


title: contatore in transfertext

text:
"max" <
pi...@pippo.it
> ha scritto nel messaggio
news:ghtb7a$kff$1...@news.task.gda.pl...
> perdonami Sergio ma probabilmente non sono stato chiaro io
> nell'esposizione del problema (che fra le altre cose ho risolto con un
> ALTER TABLE).
> Nel mio file di testo non ho un campo contatore, solo che se io importo
> "manualmente" il file in una tabella, l'importazione mi chiede se voglio
> aggiungere una chiave automatica. Io volevo fare la stessa cosa importando
> il file con tranfertext, e nell'help che tu mi indichi sinceramente non ho
> capito se e come.
> grazie comunque della risposta ti auguro un buon natale visto che ormai ci
> siamo quasi...
> ciao
> max
Puoi sempre creare la tabella con il campo contatore e accodare i dati
importandoli...
Ciao.
--
Sergio MAZZA


title: contatore in transfertext

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:ghtcpq$htp$1...@tdi.cu.mi.it...

questa č una soluzione, l'altra quella che ho scelto io č al contrario,
importo la tabella e gli inserisco un campo contatore subito dopo. La cosa
fondamentale per me č che l'ordinamento della tabella rimanga esattamente lo
stesso (devo importare questo file due volte con delimitazione do spazi
differenti) presumo che la mia soluzione sia piů efficace, mi farebbe
comunque piacere avere le tue considerazioni
ciao
max


title: contatore in transfertext

text:
"max" <
pi...@pippo.it
> ha scritto nel messaggio
news:ghtda4$p76$1...@news.task.gda.pl...
>
> questa è una soluzione, l'altra quella che ho scelto io è al contrario,
> importo la tabella e gli inserisco un campo contatore subito dopo. La cosa
> fondamentale per me è che l'ordinamento della tabella rimanga esattamente
> lo stesso (devo importare questo file due volte con delimitazione do spazi
> differenti) presumo che la mia soluzione sia più efficace, mi farebbe
> comunque piacere avere le tue considerazioni
> ciao
> max
L'efficacia è, a parer mio, dettata dal risultato, dal tempo impiegato e
dalla difficoltà nell'ottenerlo.
Se per te è accettabile, non hai bisogno di sperimentare altre strade.
Nulla ti vieta di fare degli esperimenti...
Ciao.
P.S. Ah! Per la cronaca io non utilizzo il tuo sistema...
--
Sergio MAZZA