author: Roberto da casa

text:
"Mimmo Peluso" <
dom...@tin.it
> ha scritto nel messaggio
news:Gehp8.44033$S52.1...@news2.tin.it...

Se la tabella Carnet ha una struttura simile a questa:
IDCarnet             Contatore e chiave primaria
NumeroIniziale    Numerico
NumeroFinale     Numerico
Se la tabella Assegni ha come chiave primaria un campo numerico chiamato
NumAss.
Se la maschera con cui inserisci un nuovo carnet ha come origine record la
tabella Carnet e contiene due controlli chiamati rispettivamente
NumeroIniziale e NumeroFinale come i campi cui sono associati.
A fronte dell'evento "Dopo aggiornamento" del controllo NumeroFinale genera
il seguente codice VBA che usa le librerie DAO:
Dim rst As Recordset
Dim Conta As Long
Set rst = CurrentDb.OpenRecordset("Assegni")
For Conta = Me!NumeroIniziale To Me!NumeroFinale
    rst.AddNew
    rst!NumAss = Conta
    rst.Update
Next Conta
Set rst = Nothing
Dovrebbe funzionare.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: COMANDO ANNULLA NON DISPONIBILE.

author: Angelo

text:
Ho inserito del codice su un Bottone; quando lo clicco mi appare la domada:
" Vuoi Accodare i dati ?"  con i bottoni di risposta : Si    -    No   -
Annulla .
Come mai a volte l'annulla funziona e a volte no?????
Premetto che ho creato un menu' personalizzato che comprende quel comando..
Grazie.


title: COMANDO ANNULLA NON DISPONIBILE.

author: Carlo Costarella

text:
"Angelo" <
ang...@aerofiltri.it
> ha scritto nel messaggio
news:Gh0S8.125766$g04....@tornado.fastwebnet.it...

Questo un esempio di codice:
Dim msg As Integer
msg = MsgBox("Vuoi accodare i dati?", vbYesNoCancel + vbDefaultButton1,
"pIPPO")
If msg = 6 Then ' Sě
ElseIf msg = 7 Then ' NO
ElseIf msg = 2 Then  'ANNULLA
End If
Vedi un po se puň servirti
Ciao, Carlo


title: COMANDO ANNULLA NON DISPONIBILE.

text:
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:KJ1S8.67098$j65.1...@twister1.libero.it...

Non mi funziona correttamente; se clicco su No procede ugualmente: ti invio
il codice che ho inserito.
Dim Cancel As Integer
   Dim stDocName As String
   Dim retValue As Integer
     Dim strmsg As String
     strmsg = "Si stanno per passare i dati a consuntivo.Verificare di aver
compilato il campo REDATTO DA: e RIF. INT.: . Il passaggio dei dati da
preventivo a consuntivo NON PERMETTERA' LA CANCELLAZIONE DELLA SCHEDA !!!."
& vbCrLf & _
            "CONFERMI IL PASSAGGIO ?"
   retValue = MsgBox(strmsg, vbYesNo + vbDefaultButton1, "pIPPO")
   If retValue = 6 Then 'Si
   ElseIf retValue = 7 Then 'no
   End If
    Me.Consuntivo_si_no = True
    stDocName = "Passaggio_a_consuntivo"
    DoCmd.OpenQuery stDocName, acNormal, acEdit
    Me.Requery
    DoCmd.GoToRecord , , acLast
Exit_passaggio_a_consuntivo_Click:
    Exit Sub
Err_passaggio_a_consuntivo_Click:
    MsgBox Err.Description
    Resume Exit_passaggio_a_consuntivo_Click
End Sub


title: COMANDO ANNULLA NON DISPONIBILE.

text:

Certo che non funziona: il codice che apre la query va inserito dopo il
valore 6 (esegui) dell'if.
Dim Cancel As Integer
   Dim stDocName As String
   Dim retValue As Integer
     Dim strmsg As String
     strmsg = "Si stanno per passare i dati a consuntivo.Verificare di aver
compilato il campo REDATTO DA: e RIF. INT.: . Il passaggio dei dati da
preventivo a consuntivo NON PERMETTERA' LA CANCELLAZIONE DELLA SCHEDA !!!."
& vbCrLf & _
            "CONFERMI IL PASSAGGIO ?"
   retValue = MsgBox(strmsg, vbYesNo + vbDefaultButton1, "pIPPO")
   If retValue = 6 Then 'Si
    Me.Consuntivo_si_no = True
    stDocName = "Passaggio_a_consuntivo"
    DoCmd.OpenQuery stDocName, acNormal, acEdit
    Me.Requery
    DoCmd.GoToRecord , , acLast
   ElseIf retValue = 7 Then 'no
'qui devi mettere il codice in caso si sia scelto NO
   End If
    Exit_passaggio_a_consuntivo_Click:
    Exit Sub
Err_passaggio_a_consuntivo_Click:
    MsgBox Err.Description
    Resume Exit_passaggio_a_consuntivo_Click
Ciao, Carlo


title: COMANDO ANNULLA NON DISPONIBILE.

text:
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:b1hS8.70278$j65.1...@twister1.libero.it...

Si hai perfettamente ragione, infatti subito dopo sono giunto all tua stessa
conclusione.
Pero' il codice da inserire dopo il no?????
Es. una conferma si/no io l'ho messa sul before_update della form; se dopoil
si non metto nulla prosegue e salva cio' che ho fatto ma dopo il no????cosa
devo mettergli se il comado annulla non finziona???
Grazie.


title: COMANDO ANNULLA NON DISPONIBILE.

text:
cut
>
> Si hai perfettamente ragione, infatti subito dopo sono giunto all tua
stessa
> conclusione.
>
> Pero' il codice da inserire dopo il no?????
>
> Es. una conferma si/no io l'ho messa sul before_update della form; se
dopoil
> si non metto nulla prosegue e salva cio' che ho fatto ma dopo il
no????cosa
> devo mettergli se il comado annulla non finziona???
>
> Grazie.
>
>
Puoi mettere una msgbox che avverte che l'operazione non č stata effettuata
e poi un bel Exit sub.
Oppure puoi semplicemente cancellare l'ElseIf = 7 se non ti serve nessuna
azione.
Ciao, Carlo


title: Access in ambiente di rete... lento, lento, lento!!!

author: GigioTD

text:
Un mio conoscente usa access in rete (ha un db con le maschere
collegate ad un altro db con i dati).
Da qualche tempo, complice l'aumento dei records, lamenta una lentezza
esasperante. Premesso che vorrei evitare il più possibile di mettere
le mani sul sw, che la rete é da 100 Mbit e non ha problemi, che le
stesse maschere si caricano istantaneamente sulla macchina che fa da
server, che soluzione si può ipotizzare?
Tenendo aperto il task manager, ho notato che é la cpu che va a palla,
mentre rete e memoria (file di paging) si mantengono costanti.
Idee?
Ciao e grazie
GigioTD


author: Mirko Caporali

text:
GigioTD ha scritto:
> Un mio conoscente usa access in rete (ha un db con le maschere
> collegate ad un altro db con i dati).
> Da qualche tempo, complice l'aumento dei records, lamenta una lentezza
> esasperante.
Quale versione di Access possiedi? A me sembra che il 2003 funzioni
meglio in rete.


text:
lui usa la 2000, ma ho anche provato la 2003 senza notare
miglioramenti....


author: Sergio MAZZA

text:
"GigioTD" <
gig...@despammed.com
> ha scritto nel messaggio news:1131746370.7...@g44g2000cwa.googlegroups.com...
> lui usa la 2000, ma ho anche provato la 2003 senza notare
> miglioramenti....
Hai compattato l'mdb sul client?
Così è difficile darti dei consigli perché non descrivi se (per esempio) le form hanno delle immagini come sfondo o usano
pesantemente le funzioni dlookup (e simili) o chissà che cos'altro.
Prova a realizzare una form semplice che apre una tabella pesante e guarda il risultato se soddisfa o meno...
Ciao.
--
Sergio MAZZA


author: massimo

text:

Access elabora i dati solo localmente xcui ha bisogno di trasferire dal
server tutti i recor per poi elaborarli e restituire i dati richiesti. Ne
consegue che maggiore è il numero di record maggiore è la lentezza di
elaboprazione. Se poi aggiungi l'ambiente multiutenza ....Personalmente per
elaborazioni in rete sono passato ai progetti adp installando su un pc che
funge da server msde2000a (lo trovi sul sito microsoft). In tal modo è al
server che viene demandato il compito di elaborare le istruzioni sql e
restituire solo i dati richiesti. Ti assicuro che in rete ed in ambiante
multiutenza va.
Ciao, Max.
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


text:
> Hai compattato l'mdb sul client?
Purtroppo sì... non é così facile la soluzione. :(
Le form lente sono solo due su una 15ina, quindi evidentemente sono
quelle che hanno qualcosa di pesante. Quello che mi faceva pensare alla
rete é il fatto che sul server queste due form sono istantanee.
Ciao


text:
>Personalmente per elaborazioni in rete sono passato ai progetti adp installando su un pc
>che funge da server msde2000a
Uhm... il passaggio é indolore? Ovvero: c'é qualche tool che
trasforma tutto l'mdb in desktop engine? Occorre pagare un'altra
licenza per convertirsi all'msde?
Ti ringrazio molto per le tue delucidazioni.
Ciao


text:

La questione è che in access il motore jet elabora localmente i dati. Ne
consegue che quando l'elaborazione avviene sul pc su cui risiedono i dati
(nel tuo esempio il server stesso), il tempo di elaborazione è dato dalla
prestazione della cpu. Quando però all'mdb si accede via rete da altro pc su
cui è installato access, è il motore jet di quest'ultimo che elaborerà i
dati xcui tutti i record relativi alle tabelle coinvolte nell'interrogazione
dovranno essere prima trasferiti sul pc chiamante per poi da quest'ultimo
successivamente elaborati. Ne consegue come puoi facilmente comprendere che
il tempo di attesa tenderà ad aumentare per quanto maggiore saranno i record
coinvolti che dovranno transitare in rete. In ambiente sql invece le cose
cambiano radicalmente perchè il lavoro sporco di elaborazione dei dati viene
fatto dal server stesso tramite le viste e/o le stored procedure che
risiedono sullo stesso server ed attivate dai pc chiamanti a cui il server
restituirà solo i dati richiesti. Per fare ciò occorre installare su un pc
facente funzioni di server, sql server (a pagamento) oppure msde2000a (free)
o latri motori sql quali mysql. Relativamente al secondo che è quello con il
quale normalmente mi interfaccio, è una versione ridotta di sql server la
cui limitazione, oltre a mancare ad una serie di utility di amministrazione
in parte recuperabili con altre utility free disponibili in rete, risiede
nelle dimensioni max del database nonchè nelle interrogazioni concorrenti
(max 5). Occorre precisare che le interrogazioni concorrenti non coincidono
con il numero di utenti connessi che possono essere anche molti di + ma
semplicemente con le istruzioni che vengono inviate contemporaneamente al
server da + utenti. Quando le interrogazioni concorrenti superano il numero
di 5, le prestazioni tendono a decadere in maniera +o- apprezzabile a
seconda dei singoli casi. Per la sintassi da impiegare e la tipologia dei
dati l'approccio a sql è in certi aspetti diverso da quello tradizionale di
access, ad esempio bisogna dire addio alla libreria dao e passare ad ado.
Per quanto riguarda la conversione dei dati delle tabelle, nel menù
strumenti -> utilità database è presente l'utility upsize guidato che esegue
una prima conversione dei dati per renderli gestibili in sql. La questione è
che il + delle volte a questo primo passaggio deve seguirne un successivo
intervento sulle singole tabelle convertite e risedenti sul server per un
intervento puntuale su alcune tipologie di dati. Il discorso cambia per le
righe di codice ma la cosa è + difficile a dirsi che a farsi. Se l'argomento
può interessarti ti posso consigliare la guida in linea di sql server
(
http://www.microsoft.com/downloads/details.aspx?FamilyId=A6F79CB1-A420-445F-8A4B-BD77A7DA194B&displaylang=it
)
ma soprattutto il testo "Microsoft Access e SQL Server Guida dello
sviluppatore" edito da Mondadori (50 euro). Credo sia un buon testo per
cominciare, almeno a me è servito. Sempre sul sito microsoft troverai che è
prossimo alla licenza finale anche sql2005express (evoluzione di msde2000).
Per concludere considera che access come tale non è nato per applicazioni in
rete per cui se i dati da elaborare sono pochi e/o si accetta la lentezza di
elaborazione in rete, l'approccio all'applicativo è di un tipo ma se
l'applicazione è già un pochino + complessa e/o le performance hanno valenza
non trascurabile, occorre ragionare seriamente al passaggio ad altri sistemi
tra cui anche access+sql ma non solo. Certamente dal forum ci sarà chi a
ragione potrà segnalarti altri sistemi anche + performanti.
In ogni caso saluti e buon lavoro, Max.



text:
Quello che hai scritto mi é chiaro, ma volevo chiederti una cosa: se
io lasciassi le maschere in access e poi collegassi le tabelle (con la
funzione di access "collega tabelle") su un db esterno, che può essere
anche oracle o mysql, secondo te cambierebbe la logica?
Ovvero, non che é le maschere di access poi continuano a lavorare con
la stessa modalità, cioé si scaricano prima tutte le tabelle della
query in locale e poi fanno le join, nonostante il cambio del motore
del db? Il "collega tabelle" di access mi farebbe salvare tutto il sw
fatto in passato, ma mi é sorto questo dubbio...
Ciao e grazie!
GigioTD


text:

Cerco di risponderti:
le maschere, i report, le pagine, le macro, i moduli rimangono in access.
Sul server sql vengono salvate solo le tabelle, le viste e le stored
procedure. La questione è che per maschere e report va definita l'origine
dati della maschera o report che può essere la tabella, una vista o una
stored procedure. Può anche non essere definita a priori ma da codice
sull'evento "su apertura" della maschera stessa. Inoltre a prescindere
dall'origine dati, sia esso vista che tabella ma con l'esclusione delle sp
per le quali il discorso si complica un pò, c'è la possibilità di impostare
la funzione "filtro su server" per cui i dati in fase di apertura della
maschera ma prima del loro caricamento vengono filtrati dal server in base
al filtro impostato. Ne consegue che se correttamente organizzata la
maschera e le righe di codice in essa riportate, non vengono mai travasati
in locale tutti i dati a meno di esplicita richiesta come nel caso di una
maschera continua che deve visualizzare tutti i record.
A titolo di esempio ti passo 2 stringhe di codice che operano in fase di
apertura di 2 distinte maschere. Nel primo caso l'origine dati viene
assegnata in fase di apertura e con esso il criterio di selezione dei dati,
nel secondo caso l'origine dati è già impostata nelle proprietà della
maschera ma in apertura viene impostato il filtro su server ed attivato. In
entrambi i casi è il server che preliminarmente al trasferimento dei dati al
client esegue la selezione dei dati.
Caso 1:
Private Sub Form_Open(Cancel As Integer)
    Me!ElencoDatiSelezionati.RowSourceType = "Tabella/visualizzazione/stored
procedure"
    Me!ElencoDatiSelezionati.RowSource = "SELECT TOP 100 PERCENT Campo1,Campo2
FROM dbo.TBL_ElencoDati WHERE " & str_SelezionaElaborati & " ORDER BY
Campo1"
End Sub
Caso 2:
 Private Sub Form_Open(Cancel As Integer)
    Me.Filter = "[Campo1] = '" & str_Campo1 & "'"
    Me.FilterOn = True
End Sub

Spero di averti chiarito qualche dubbio e non contribuito a creartene altri.



text:
Ok, é tutto chiaro... quindi il comportamento cambia semplicemente
spostando i dati su un "vero" db.
Un'ultima cosa: qual é il limite fisico dell'msde2000?
Ciao e grazie
GigioTD


text:
"GigioTD" <
gig...@despammed.com
> ha scritto nel messaggio
news:1132070674....@z14g2000cwz.googlegroups.com...

Ciao e grazie
GigioTD
Vedi
http://www.microsoft.com/italy/sql/msde/productinfo/features.mspx
troverai anche altre indicazioni oltre al limite fisico (2 Gb)
ps. il comportamento cambia nella misura in cui, oltre a spostare i dati sul
server, adegui la sintassi delle righe di programma.
ciao, Max


text:
>ps. il comportamento cambia nella misura in cui, oltre a >spostare i dati sul
>server, adegui la sintassi delle righe di programma
Dal primo esempio che mi hai fatto, é bastato mettere una "where"
nella select... credo che questo non comporti alcun cambio nella logica
del sw (insomma, la where mi aspetto che ci sia già con Access: se mi
deve dare solo i record con città= 'Milano', che sia Access o Sql non
cambia nulla), oppure mi sfugge qualcosa?
Ciao! ;)
GigioTD


text:

No. La mia è una considerazione di carattere + generale. Ad esempio, se
avrai modo di sviluppare ulteriormente l'approccio ad sql, vedrai che sia le
sp che le viste risiedono sul server ma le prime hanno velocità di
elaborazione superiore in quanto sono , tra virgolette, già compilate dal
server. Le viste e più in generale le istruzioni SELECT trasmesse come negli
esempi che hai visto, devono prima essere "compilate" per poi elaborate. Per
contro le sp hanno dei vincoli che le viste non hanno. Vedrai poi che ci
sono le sp di sistema che consentono determinate operazioni che in una
gestione in rete di un database risultano utili oltre che talvolta
necessarie. Esiste il concetto di proprietario degli oggetti (tabelle, sp)
che se vuole condividerne l'impiego con altri utenti deve abilitare gli
altri utenti all'esecuzione e via di seguito. Troverai libri di testo a iosa
su questo e tanto altro e + in generale su come ottimizzare il connubio
access+sql la cui lettura ti consiglio prima di affrontare il passaggio al
nuovo sistema.



title: spostare contenuto campi da orizzontale a verticale

author: Fanciullo

text:
Ciao a tutti,
ho una tabella con quattro campi che rappresentano delle risposte  a dei
quiz.
i record sono 50, ecco lo schema;
rispostaA      rispostaB          rispostaC         rispostaD
togli sale         metti sale          sciogli sale       spargi sale
vorrei incolonnare in un solo campo le quattro risposte come
nello schema che segue:
CAMPORISPOSTE
togli sale
metti sale
taglia sale
spargi sale
non so da dove iniziare per evitare il lavoro manualmente
grazie


author: Pablitomf (da casa)

text:

=RispostaA & vbcrlf & RispostaB & vbcrlf & RispostaC & vbcrlf & RispostaD


text:
"Pablitomf (da casa)" <
pabl...@hotmail.it
> ha scritto nel messaggio
news:7VNHn.58432$Ua.1...@twister2.libero.it...

>s�, ma se non mi dici dove devo mettere questa istruzione io come faccio???
tra i criteri di una query??


text:
"Fanciullo" <
vito...@libero.it
> ha scritto nel messaggio
news:4befe16f$0$18652$4faf...@reader3.news.tin.it...

>forse mi sono spiegato male
 CAMPORISPOSTE
>>> togli sale
>>> metti sale
>>> taglia sale
>>> spargi sale
>>>
le quattro righe sono record diversi, quindi non si tratta di concatenere i
valori dei 4 campi
come indichi tu
".......>> =RispostaA & vbcrlf & RispostaB & vbcrlf & RispostaC & vbcrlf &
RispostaD...."
insomma da orizzontale devo spostare i valori in verticale ma in record
distinti (ogni valore un record)
ciao scusa
bens� di metterli su record diversi, insomma da orizzontala a verticale
ciao scusa


text:
"Fanciullo" <
vito...@libero.it
> ha scritto nel messaggio
news:4befe58b$0$18650$4faf...@reader3.news.tin.it...
>
vedi risposta al precedente tread..
Ciao, Carlo


author: Bruno Campanini

text:
"Fanciullo" <
vito...@libero.it
> wrote in message
news:4befa2c4$0$31381$4faf...@reader1.news.tin.it...

T1 � la tabella che contiene le 4 risposte
T2 quella coi record formati da un solo campo denominato [R]
========================================
Private Sub Command0_Click()
Dim db As Database, i As Integer
Dim RS1 As Recordset, RS2 As Recordset
Set db = CurrentDb
Set RS1 = db.OpenRecordset("T1", dbOpenDynaset)
Set RS2 = db.OpenRecordset("T2", dbOpenDynaset)
Do Until RS1.EOF
    For i = 0 To 3
        RS2.AddNew
        RS2![R] = RS1(i)
        RS2.Update
    Next
    RS1.MoveNext
Loop
End Sub
=================================
Bruno


text:
"Bruno Campanini" <
B...@gmail.com
> ha scritto nel messaggio
news:4beffcbd$0$40284$4faf...@reader2.news.tin.it...

> Bruno Bellissimo codice, ho scoperto che RS1(numero)
si riferisce all'ordine numerico dei campi giusto???
per� ho un problemino che non avevo messo nel thred
le domande hanno un campo con la risposta..... cos� me le vedo accodate
in orizzontale ma non so a quale domanda appartengono........
cmq Costarella mi ha indicato un sistema basato su una query di unione
(pi� il sistema per agganciare le quattro risposte alla domanda
attraverso un IDdomanda posto nella tabella delle domande......
se sei curioso puoi vedere nel mio thred sotto....)
che mi accoda tutti i quattro campi
grazie Bruno


title: Password di protezione del database

author: luciano Archetti

text:
Se qualcuno ha messo un apassword sul database e poi se ne andato, c'č una
possibilitŕ di forzare la password?
Vi ringrazione per l'eventuale risposta.
Ciao.
Luciano


title: Password di protezione del database

author: Lanza

text:
Esiste un applicativo su
www.download.com
 (recorery password) che ti
resituisce la password immessa dall'utente.


title: Password di protezione del database

author: Franchi Graziano (Da Casa)

text: come funziona??


title: Password di protezione del database

text:
Franchi Graziano (Da Casa) <
franchi...@tiscalinet.it
> wrote in message
891egc$7uo$1...@lacerta.tiscalinet.it...
> come funziona??
>
> Dopo averlo installato, all'esecuzione dell'eseguibile ti chiede il path
del file (su cui devi scoprire la password) e immediatamente compare una
finestra dove "tra le parentesi" c'è la password.
By Lanza


title: Password di protezione del database

author: Alessandro Nucci

text:
"Lanza" <
lan...@yahoo.it
> ha scritto nel messaggio
news:8938rv$3on$1...@serv1.iunet.it...

> finestra dove "tra le parentesi" c'č la password.
Scusate, mi devo essere perso qualcosa...
Dove č possibile reperire questo programmino ?
Grazie...


title: Password di protezione del database

text:
Alessandro Nucci <
call...@libero.it
> wrote in message
wDet4.9053$qv.9...@news.infostrada.it...
> "Lanza" <
lan...@yahoo.it
> ha scritto nel messaggio
> news:8938rv$3on$1...@serv1.iunet.it...
> >
> > Franchi Graziano (Da Casa) <
franchi...@tiscalinet.it
> wrote in
message
> > 891egc$7uo$1...@lacerta.tiscalinet.it...
> > > come funziona??
> > >
> > > Dopo averlo installato, all'esecuzione dell'eseguibile ti chiede il
path
> > del file (su cui devi scoprire la password) e immediatamente compare una
> > finestra dove "tra le parentesi" c'è la password.
>
> Scusate, mi devo essere perso qualcosa...
> Dove è possibile reperire questo programmino ?
>
> Grazie...
>
lo puoi reperire su
www.download.com
 (nome pgm "recorey password)


title: Eliminare tutti i record di tutte le tabelle .. ?

author: Aldo

text:
Esiste un modo per eliminare in un colpo solo tutti i record di tutte le
tabelle di un db access ?
Grazie
Aldo


author: Esteban

text:
"Aldo" <
al...@nospam.it
> wrote in message
news:h1XP6.12559$WT5.4...@news.infostrada.it...

Da DOS:
del MioDatabase.Mdb
;-P
Ciao!
Esteban
Hosted by
www.seber.it


text:
"Esteban" <
Est...@news.it
> ha scritto nel messaggio
news:uG1Q6.13288$WT5.5...@news.infostrada.it...
> "Aldo" <
al...@nospam.it
> wrote in message
> news:h1XP6.12559$WT5.4...@news.infostrada.it...
> > Esiste un modo per eliminare in un colpo solo tutti i record di tutte le
> > tabelle di un db access ?
> >
> > Grazie
> > Aldo
>
> Da DOS:
> del MioDatabase.Mdb
Carina la battuta.
Ovviamente, non voglio cancellare il database, ma tutti i record contenuti
all'interno di tutte le tabelle.
Hai qualche idea ?
CIao
Aldo


author: Antonio Biso

text:
Aldo <
al...@nospam.it
> wrote in message
OJeQ6.18274$WT5.7...@news.infostrada.it...

for each tbl in currentdb.tabledefs
  if left(
tbl.name
,4) <> "MSys" then
    sql_cmd = "DELETE * FROM " &
tbl.name
    docmd.setwarnings false
    docmd.runsql sql_cmd
    docmd.setwarnings true
  end if
next
Antonio


author: Luciano (DOC)

text:
"Antonio Biso" <
ch...@etruria.net
> wrote in message
news:OdnQ6.19544$WT5.7...@news.infostrada.it...
> for each tbl in currentdb.tabledefs
>   if left(
tbl.name
,4) <> "MSys" then
>     sql_cmd = "DELETE * FROM " &
tbl.name
>     docmd.setwarnings false
>     docmd.runsql sql_cmd
>     docmd.setwarnings true
>   end if
> next
Se ci sono relazioni con integrita' referenziale non funziona. Devi prima
intercettare la gerarchia.
Saluti.
Luciano
(DOC)


text:
Luciano (DOC) <
lucia...@sitocomune.com
> wrote in message
9f309m$1vfbk$1...@ID-86073.news.dfncis.de...

Vero, te ne do atto. Perň non l'aveva specificato.
Antonio


text:
"Antonio Biso" <
ch...@etruria.net
> wrote in message
news:T7lR6.4331$i71.1...@news.infostrada.it...
> Vero, te ne do atto.
Ehehehe.....il Biso che fa ammissione di peccato....:-)))
Saluti.
Luciano
(DOC)


text:
Luciano (DOC) <
lucia...@sitocomune.com
> wrote in message
9f4u9o$2ap96$1...@ID-86073.news.dfncis.de...
>
> "Antonio Biso" <
ch...@etruria.net
> wrote in message
> news:T7lR6.4331$i71.1...@news.infostrada.it...
>
> > Vero, te ne do atto.
>
> Ehehehe.....il Biso che fa ammissione di peccato....:-)))
E bravo! Hai tagliato il mio messaggio cambiandone il significato!!!!
Antonio


text:
"Antonio Biso" <
ch...@etruria.net
> wrote in message
news:xTqR6.5676$i71.1...@news.infostrada.it...
> E bravo! Hai tagliato il mio messaggio cambiandone il significato!!!!
Ma non e' vero!!!! Un quoting ben fatto estrapola le parti siginficative di
un msg...:-)
E per restare nel merito, e' ovvio che se lui ha cosi tante tabelle da non
poterle cancellare a mano ci saranno delle relazioni di cui tenere conto.
Saluti.
Luciano
(DOC)


text:
Grazie a tutti per le dritte !
"Luciano (DOC)" <
lucia...@sitocomune.com
> ha scritto nel messaggio
news:9f5ode$2as4i$1...@ID-86073.news.dfncis.de...



text:
Luciano (DOC) <
lucia...@sitocomune.com
> wrote in message
9f5ode$2as4i$1...@ID-86073.news.dfncis.de...

Non sono d'accordo. Le relazioni sono una rogna per me e non le uso manco se
c'ho uno sbroscio di tabelle...
Antonio


text:
"Antonio Biso" <
ch...@etruria.net
> wrote in message
news:dK0T6.4702$%m1.1...@news.infostrada.it...
> Non sono d'accordo. Le relazioni sono una rogna per me e non le uso manco
se
> c'ho uno sbroscio di tabelle...
Male, fratello....:-))
Saluti.
Luciano
(DOC)


title: Maschera visibile

author: fid

text:
Salve, se una maschera di nome Anag ha 2 sottomaschere, contatti e
dettagli e voorei rendere visibile la mashera dettagli solo se è puntato
un record di contatti, mentre se è in inserimento, record vuoto, non
mostrare la dettagli come fare? Ho pensato a cose tipo:
Bye
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Maschera visibile

author: Gaspare

text:
[CUT]
> Ho pensato a cose tipo:
> Bye
>
Ciao,
ed hai pensato bene -> quella è la soluzione migliore! ;-)


title: Maschera visibile

text:
Gaspare ha scritto:
> [CUT]


stavo provando prima di dire boiate.Il mio pensiero è:
nella maschera dettagli una properti get, dove gestisco la visibilità
della maschera, ovvero
Public Property Get CosaFaccio(DataIns As Long) As Variant
If DataIns Then
Me.Form.Visible = True
Else
Me.Form.Visible = False
End If
End Property
nella contatti assegno a DataIns un valore
If Me.NewRecord Then
[Form_Dettagli Sottomaschera].CosaFaccio = True
Else
[Form_Dettagli Sottomaschera].CosaFaccio = False
End If
ma non funziona!



title: Maschera visibile

text:
[CUT]
sinceramente non penso che sia la strada migliore...aspetta che arrivino i
rinforzi -> x adesso non mi viene nulla in mente :-)


title: Maschera visibile

author: Alessandro Baraldi

text:
"fid" <
fe_l...@yahoo.it
> wrote in message
news:di8lvp$fbl$
1...@news.newsland.it
> Gaspare ha scritto:
>
> > [CUT]
>
> > > Ho pensato a cose tipo:
> > > Bye
> > >
>
>
> > Ciao,
> > ed hai pensato bene -> quella è la soluzione migliore! ;-)
> stavo provando prima di dire boiate.Il mio pensiero è:
> nella maschera dettagli una properti get, dove gestisco la visibilità
> della maschera, ovvero
>
>
> Public Property Get CosaFaccio(DataIns As Long) As Variant
> If DataIns Then
> Me.Form.Visible = True
> Else
> Me.Form.Visible = False
> End If
> End Property
>
> nella contatti assegno a DataIns un valore
> If Me.NewRecord Then
> [Form_Dettagli Sottomaschera].CosaFaccio = True
> Else
> [Form_Dettagli Sottomaschera].CosaFaccio = False
> End If
> ma non funziona!
Partiamo dal fatto che in questo caso l'uso di Property
non lo ritengo la soluzione migliore, ma è un mio parere.
Se lo ritieni però io la modificherei in questo modo
in quanto potresti esserti confuso:
Public Property Let CosaFaccio(DataIns As Boolean)
  Me.Form.Visible = DataIns
End Property
In ogni caso la proprietà Visible è già una proprietà
Public pertanto non serve esporla ulteriormente con
la dichiarazione di cui sopra.
La puoi gestire direttamente dall'esterno, e questa
la ritengo la soluzione più pratica.
Se la devi gestire dalla SubForm1 allora sarà:
Me.Parent!NomeSubForm2.Form.Visible=False/True
Se la devi gestire dalla Form sarà:
Me!nomeSubForm2.Form.Visible=False/True
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: distribuzione applicazione in access 2003

author: Giovanni Franco

text:
Come posso eliminare gli avvisi di protezione all'avvio di una applicazione
access 2003 distribuita tramite il developer ?
Grazie


title: Err 3197

author: Carloo

text:
MSAccess2000(Office2000pro) su Win98,senza scheda di rete.
Quando cerco di aprire un Report, sia in visualizzazione struttura,
sia in anteprima, sia in stampa, ottengo questo messaggio di errore:
"Il modulo di gestione di database Microsoft Jet ha interrotto
l'elaborazione.
Un altro utente sta tentando contemporaneamente di modificare gli stessi
dati. (3197)."
Ogni altro Report funziona correttamente.
Le opzioni di accesso che ho impostato sono le seguenti:
<STRUMENTI, OPZIONI, AVANZATE>
Modalità di apertura predefinita: Accesso condiviso
Blocco record predefinito: Nessun blocco
Apri database utilizzando blocco a livello di record: unchecked
Le Protezioni sono:
<Autorizzazioni utenti e gruppi>
Utente corrente amministratore
Autorizzazioni richeste solo per gli utenti
Modificando modalità di apertura e tempo di intervallo tentativi di
aggiornamento,
aprendo altri db, sono riuscito ad accedere al Report, senza aver capito
come ...
tanto che ora sono di nuovo bloccato.
Qualcuno può darmi una mano?
Grazie e cordiali saluti a tutti,
Carlo Ragazzi.


title: Err 3197

author: Carlo Costarella

text:
"Carloo" <
carlor...@lombardiacom.it
> ha scritto nel messaggio
news:ak5paj$rre$1...@monty.lombardiacom.it...

Su MSDN, anche dal sito microsoft, trova : "Locking Shared Data by Using
Recordset Objects in VBA".
E' troppo lungo perchè possa postarlo sul NG.
Se anche questo aiuto non ti risolve il problema prova a cancellare il file
con estensione .ldb e con lo stesso nome del db. che Access crea ogni volta
che fai partire l'applicativo mdb o mde, prima di aprire il db stesso.
Ciao, Carlo


title: Err 3197

text:
Carlo Costarella <
carloantoni...@virgilio.it
> wrote in message
j2H99.2874$ub2....@news1.tin.it...
Grazie per la dritta.  Ora provo ....
Ciao, Carlo


title: Riallega su +BE

author: Ferrari Rino

text:
Salve sul sito comune (e non solo)
ci sono degli esempi di come ripristinare i collegamenti
da un FE ad BE ma se un FE fa riferimento a due BE (x es.)come comportarsi ?
Il metodo da me usato ma poco pratico con un utente poco esperto e quello
messo a disposizione di access (Collega Tabelle).
Grazie


title: Riallega su +BE

author: Roberto da casa

text:
"Ferrari Rino" <
gen...@tin.it
> ha scritto nel messaggio
news:64Mra.37016$K35.1...@news2.tin.it...

Vai sul Sito Comune (link qui sotto) e nella Sezione Tables leggi la FAQ di
Vincenzo Turturro intitolata "Effettuare in maniera del tutto automatica
l'aggiornamento delle tabelle allegate ad un FE". La Sub pubblicata in
quella FAQ dovrebbe funzionare anche quando le tabelle sono contenute in più
BE, residenti su percorsi differenti (anche LAN) e protetti da password.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Riallega su +BE

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:ywNra.79354$iy5.2...@twister2.libero.it...
>
> "Ferrari Rino" <
gen...@tin.it
> ha scritto nel messaggio
> news:64Mra.37016$K35.1...@news2.tin.it...
> > Salve sul sito comune (e non solo)
> > ci sono degli esempi di come ripristinare i collegamenti
> > da un FE ad BE ma se un FE fa riferimento a due BE (x es.)come
comportarsi
> ?
> > Il metodo da me usato ma poco pratico con un utente poco esperto e
quello
> > messo a disposizione di access (Collega Tabelle).
> > Grazie
>
> Vai sul Sito Comune (link qui sotto) e nella Sezione Tables leggi la FAQ
di
> Vincenzo Turturro intitolata "Effettuare in maniera del tutto automatica
> l'aggiornamento delle tabelle allegate ad un FE". La Sub pubblicata in
> quella FAQ dovrebbe funzionare anche quando le tabelle sono contenute in
più
> BE, residenti su percorsi differenti (anche LAN) e protetti da password.
>
> --
> Roberto
>
Quesito:
E se i BE dovessero essere rinomonati nel momento in cui si va ad agiornare
il
collegamento la routin generera un errore il codice verra bloccato.
>
>


title: Riallega su +BE

text:
"Ferrari Rino" <
gen...@tin.it
> ha scritto nel messaggio
news:OxQra.40489$K35.1...@news2.tin.it...
>
> "Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
> news:ywNra.79354$iy5.2...@twister2.libero.it...
> >
> > "Ferrari Rino" <
gen...@tin.it
> ha scritto nel messaggio
> > news:64Mra.37016$K35.1...@news2.tin.it...
> > > Salve sul sito comune (e non solo)
> > > ci sono degli esempi di come ripristinare i collegamenti
> > > da un FE ad BE ma se un FE fa riferimento a due BE (x es.)come
> comportarsi
> > ?
> > > Il metodo da me usato ma poco pratico con un utente poco esperto e
> quello
> > > messo a disposizione di access (Collega Tabelle).
> > > Grazie
> >
> > Vai sul Sito Comune (link qui sotto) e nella Sezione Tables leggi la FAQ
> di
> > Vincenzo Turturro intitolata "Effettuare in maniera del tutto automatica
> > l'aggiornamento delle tabelle allegate ad un FE". La Sub pubblicata in
> > quella FAQ dovrebbe funzionare anche quando le tabelle sono contenute in
> piů
> > BE, residenti su percorsi differenti (anche LAN) e protetti da password.
> >
> > --
> > Roberto
> >
> Quesito:
> E se i BE dovessero essere rinomonati nel momento in cui si va ad
agiornare
> il
> collegamento la routin generera un errore il codice verra bloccato.
Io ho usato con soddisfazione quella Sub, ma non mi sono mai posto il
problema di capire come funziona e non credo che lo farň mai; penso che sia
piů logico che la domanda tu la ponga a Vincenzo. ;-)



title: [Segnalazione] Gestire le Immagini

text:
Visto che l'argomento è tra i più gettonati spero che questo link
possa
essere utile:
http://support.microsoft.com/kb/285820/it
@Alex


title: [Segnalazione] Gestire le Immagini

author: Sergio MAZZA

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:1148885838.7...@u72g2000cwu.googlegroups.com...

http://support.microsoft.com/kb/285820/it
@Alex
[risposta]
Raccoglilo sul tuo sito supermegafico no?
Ciao.
--
Sergio MAZZA


title: [Segnalazione] Gestire le Immagini

author: Simone Calligaris

text:
"Sergio MAZZA"
> [risposta]
> Raccoglilo sul tuo sito supermegafico no?
Confessa che sei invidioso: sembri Simoni che stuzzica Basso   ;-D
Ciao!


title: [Segnalazione] Gestire le Immagini

text:
"Simone Calligaris" <
simo...@libero.it
> ha scritto nel messaggio
news:447ac4c7$0$14777$4faf...@reader4.news.tin.it...
>
> Confessa che sei invidioso: sembri Simoni che stuzzica Basso   ;-D
>
> Ciao!
Non vi si può nascondere nulla eh?
Ciao.
--
Sergio MAZZA


title: [Segnalazione] Gestire le Immagini

text:
Si lascialo perdere Simone, è invidioso che io ho un sito bello...!!!
;-)
Per gli inserimenti invece devo valutare.... ;-)
@Alex


title: [Segnalazione] Gestire le Immagini

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:1148900817.8...@g10g2000cwb.googlegroups.com...

;-)

@Alex
[risposta]
Prrrrr...
Ciao.
--
Sergio MAZZA


title: [Segnalazione] Gestire le Immagini

text:
[risposta]
Prrrrr...
Stai provando il Sidecar...?
mica male come rombo.
Alessandro


title: [Segnalazione] Gestire le Immagini

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio news:1148912778.2...@y43g2000cwc.googlegroups.com...

AH!AH!AH!AH!AH!AH!AH!AH!AH!AH!
Ciao.
--
Sergio MAZZA


title: [Segnalazione] Gestire le Immagini

text:
Se ti servono i tappi(acustici per il rumore) dimmelo ne ho vagoni
al lavoro.
In compenso io mi procuso un paio di scarpe comode, per avviarmi a
piedi.
@Alex


title: Development

text:
Salve, voelvo chiedervi, se io acquisto la versione development di office XP
posso creare pacchetti di installazione che non richiedono access sul
computer di destinazione?
Inoltre posso creare pacchetti anche di versioni 2000 o 97 con quello di XP?
Microsoft autorizza al rilascio di database se si possiede la versione
development?
Grazie a tutti.


title: Development

author: Roberto - Syd

text:
"Tosto73" <
tos...@libero.it
> ha scritto nel messaggio
news:QRhK7.133336$sq5.6...@news.infostrada.it...

All'ultima domanda la risposta è Si.
Ciao Roberto - Syd


title: Development

author: Antonio in the city

text: prova


title: Restituzione del nome del pulsante

author: Govardo Libero

text:
Vorrei utilizzare come variabile il nome del pulsante clickato, ma non so
come ottenerlo. Help


title: Restituzione del nome del pulsante

author: Alex

text:
"Govardo Libero" <
gov...@libero.it
> wrote in message
news:9q1uu9$gro$1...@pegasus.tiscalinet.it...
> Vorrei utilizzare come variabile il nome del pulsante clickato, ma non so
> come ottenerlo. Help
Su evento Click del Pulsante sarà:
TuaVariabile(Stringa)=
Me.Pulsante.Name
@Alex.
--
Posted from  [62.98.24.235]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Restituzione del nome del pulsante

author: Silvio Berruti

text:
"Govardo Libero" <
gov...@libero.it
> ha scritto nel messaggio
news:9q1uu9$gro$1...@pegasus.tiscalinet.it...
> Vorrei utilizzare come variabile il nome del pulsante clickato, ma non so
> come ottenerlo. Help
Screen.ActiveControl.Name
--
Silvio
il sito comune di it.comp.appl.access:
http://www.sitocomune.com


title: Restituzione del nome del pulsante

text:
"Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:8d749676c3e77ee7f1...@mygate.mailgate.org...

Grazie Alex, ma io volevo ottenere Name senza specificare Me.Pulsante,
chiedo troppo?


title: Restituzione del nome del pulsante

text:
"Govardo Libero" <
gov...@libero.it
> ha scritto nel messaggio
news:9q1uu9$gro$1...@pegasus.tiscalinet.it...
> Vorrei utilizzare come variabile il nome del pulsante clickato, ma non so
> come ottenerlo. Help
esempio il pulsante si chiama  pls_premi
evento su clic del pulsante
dim nome as string
nome=
pls_premi.name
dovrebbe essere cosě
penso


title: Restituzione del nome del pulsante

text:
"Silvio Berruti" <
sber...@libero.it
> ha scritto nel messaggio
news:ez%w7.8229$g42.1...@news.infostrada.it...

Grazie Silvio, ne sai una più del diavolo!


title: Restituzione del nome del pulsante

text:
"Govardo Libero" <
gov...@libero.it
> ha scritto nel messaggio
news:9q24lk$jgk$1...@pegasus.tiscalinet.it...
>
> "Silvio Berruti" <
sber...@libero.it
> ha scritto nel messaggio
> news:ez%w7.8229$g42.1...@news.infostrada.it...
> >
> > "Govardo Libero" <
gov...@libero.it
> ha scritto nel messaggio
> > news:9q1uu9$gro$1...@pegasus.tiscalinet.it...
> > > Vorrei utilizzare come variabile il nome del pulsante clickato, ma non
> so
> > > come ottenerlo. Help
> >
> >
Screen.ActiveControl.Name
> >
> Grazie Silvio, ne sai una più del diavolo!
Non è vero, Roberto da casa (o dal portatile) ne sa + di me...  :-))))



title: Restituzione del nome del pulsante

author: Roberto dal portatile

text:
"Silvio Berruti" <
sber...@libero.it
> ha scritto nel messaggio
news:m51x7.9262$g42.1...@news.infostrada.it...
[CUT]
>
> Non è vero, Roberto da casa (o dal portatile) ne sa + di me...  :-))))
>
> --
>
> Silvio
>
E' un modo carino per dirmi che ho le corna?
Vado subito a casa a chiederlo a mia moglie. :-))))
Ciao
Roberto


title: Restituzione del nome del pulsante

text:
"Roberto dal portatile" <
r.ma...@repubblica.it
> ha scritto nel messaggio
news:9q26p4$2g48$1...@stargate1.inet.it...

Siete bravi tuttedue, spero che per uno stupido pulsante non veniate alle
mani.
Un saluto alle signore.


title: Restituzione del nome del pulsante

text:
"Roberto dal portatile" <
r.ma...@repubblica.it
> ha scritto nel messaggio
news:9q26p4$2g48$1...@stargate1.inet.it...

Ciao Roberto,
sarà meglio che ti affretti... se a quest'ora non sei ancora a casa...
chissà come ti aspetta con ansia...
scherzo!  ;-D
Non vedo l'ora di incontrarti nuovamente, e, con te, anche il resto della
combriccola targata ICAA (ormai è passato un anno).



title: Restituzione del nome del pulsante

text:
"Govardo Libero" <
gov...@libero.it
> ha scritto nel messaggio
news:9q273c$d5j$1...@lacerta.tiscalinet.it...
[CUT]
> Siete bravi tuttedue, spero che per uno stupido pulsante non veniate alle
> mani.
Non ti preoccupare: è impossibile che io e Silvio veniamo alle mani.
> Un saluto alle signore.
>
Sarai servito. :-)
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Restituzione del nome del pulsante

text:
"Silvio Berruti" <
sber...@libero.it
> ha scritto nel messaggio
news:tg1x7.9379$g42.1...@news.infostrada.it...
>
[CUT]
>
> sarą meglio che ti affretti... se a quest'ora non sei ancora a casa...
> chissą come ti aspetta con ansia...
>
L'errore l'ho fatto quando ho scelto di coordinare un gruppo di nottambuli:
d'altra parte il giormale si fa di notte. :-)
> scherzo!  ;-D
>
> Non vedo l'ora di incontrarti nuovamente, e, con te, anche il resto della
> combriccola targata ICAA (ormai č passato un anno).
>
Anche ne ho voglia.
> --
>
> Silvio
>
Ciao
Roberto


title: Restituzione del nome del pulsante

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:tK3x7.11412$g42.2...@news.infostrada.it...
>
> "Govardo Libero" <
gov...@libero.it
> ha scritto nel messaggio
> news:9q273c$d5j$1...@lacerta.tiscalinet.it...
> [CUT]
> > Siete bravi tuttedue, spero che per uno stupido pulsante non veniate
alle
> > mani.
>
> Non ti preoccupare: è impossibile che io e Silvio veniamo alle mani.
E' vero, con Roberto non potrei mai, neanche se fossimo a meno di 500 Km.
>
> Un saluto alle signore.
> >
>
> Sarai servito. :-)
>
Anche le mie ringraziano tutte...



title: Tabella Collegata dal Web

author: luigi corinna

text:
Buon Giorno
Access 97
E' possibile avere un FE residente sul Pc con tabelle
collegate ad un BE residente nella directory del sito web
residente sul server del provider...
Grazie
Luigi, Bari


title: margini report da codice

author: Gianni

text:
ho bisogno di impostare i margini del report da codice
come posso intervenire.
Saluti


title: visualizzazione report in forma calendario

author: beeth

text:
buongiorno a tutti
ho costruito con Access un DB con vari appuntamenti. Per la
visualizzazione complessiva del mese ho creato il relativo report con
tutti gli appuntamenti (più appuntamenti per la stessa giornata) in
verticale disponendo per colonna:
giorno appuntamento
inizio ora appuntamento
fine appuntamento
descrizione appuntamento
Ora vorrei visualizzare il tutto in formato outlook 2000 (ma meglio
sunbird mozilla, google calendar). Esiste un modello a riguardo per i
report(o come per le maschere devo usare un ActiveX?) ?
Avete suggerimenti in merito su come muovermi?
Grazie anticipatamente.


title: Assegnazione numerazione progressiva

author: perseo

text:
Ho un campo di una tabella in cui deve mettere un numero intero.
Tale numero deve essere progressivo, vale a dire che ogni volta che creo una
nuova riga questo campo deve contenere il numero successivo a quello
contenuto nella riga precedente senza salti nella numerazione.
Vorrei assegnare il numero tramite un pulsante di una maschera.
Come posso fare?
Grazie in anticipo a chi mi invia suggerimenti.
Stefano


title: Assegnazione numerazione progressiva

author: FABIO

text:
perseo wrote:

> Come posso fare?

> Stefano
PROVA A METTERE NELLA TABELLA SU CUI è BASATA LA MASCHERA UN CAMPO DI TIPO
CONTATORE. QUESTO VERRA INCREMENTATO E VISUALIZZATO NELLA MASCHERA OGNI
VOLTA CHE INSERISCI UN NUOVO RECORD. SE ELIMINI IL RECORDO, SALTI IL NUMERO
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Assegnazione numerazione progressiva

author: Alessandro Cara

text:
perseo wrote:
>
> Ho un campo di una tabella in cui deve mettere un numero intero.
> Tale numero deve essere progressivo, vale a dire che ogni volta che creo una
> nuova riga questo campo deve contenere il numero successivo a quello
> contenuto nella riga precedente senza salti nella numerazione.
> Vorrei assegnare il numero tramite un pulsante di una maschera.
proprieta' valore iniziale: =dmax("nomecampo","nometabella")
--
a.cara


title: Assegnazione numerazione progressiva

author: desio

text:
"FABIO" <
blue...@libero.it
> ha scritto nel messaggio
news:aqgtg4$7vk$1...@news.newsland.it...

> caro fabio non per farmi gli affari tuoi ma con tutto quel gridare non Ti
verra mal di gola
cordialmente desio


title: Assegnazione numerazione progressiva

text:
"FABIO" <
blue...@libero.it
> ha scritto nel messaggio
news:aqgtg4$7vk$1...@news.newsland.it...
> perseo wrote:
>
> > Ho un campo di una tabella in cui deve mettere un numero intero.
> > Tale numero deve essere progressivo, vale a dire che ogni volta che creo
una
> > nuova riga questo campo deve contenere il numero successivo a quello
> > contenuto nella riga precedente senza salti nella numerazione.
> > Vorrei assegnare il numero tramite un pulsante di una maschera.
>
> > Come posso fare?
>
> > Grazie in anticipo a chi mi invia suggerimenti.
>
> > Stefano
>
> PROVA A METTERE NELLA TABELLA SU CUI è BASATA LA MASCHERA UN CAMPO DI TIPO
> CONTATORE. QUESTO VERRA INCREMENTATO E VISUALIZZATO NELLA MASCHERA OGNI
> VOLTA CHE INSERISCI UN NUOVO RECORD. SE ELIMINI IL RECORDO, SALTI IL
NUMERO
>
ma non voglio che cio' avvenga, prima di numerare il record devo avere la
possibilita' di eliminarlo!


title: Messaggi di errore inibiti: come recuperarli?!?!?!

text:
Mi sono ritrovato un DB ereditato da altri e modificato da me, che pare
avere una serie di messaggi di errore inibiti!!! Mi spiego meglio: ho una
maschera in cui inserisco il nome di un cliente e il suo codice (che viene
memorizzato nel campo Chiave Primaria). Se provo ad inserire un codice già
presente direttamente sulla tabella Access, giustamente, mi blocca con un
errore di violazione della chiave. Se lo faccio damma maschera, invece,
Access non fa una piega: ovviamente non aggiunge il nuovo record, ma non mi
dice nulla! In sostanza mi ritrovo che sono convinto di aver aggiunto il
record, ma ciò non è avvenuto! Idem con un'altra tabella in cui uno dei
campi ha la proprietà Richiesto valorizzata a Vero e inserendo un nuovo
record dalla maschera non viene visualizzato alcun errore nel caso il campo
in questione non sia valorizzato!
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


author: Alessandro Baraldi

text:

Verifica il Form_Error, oppure l'Evento BeforeUpdate, la gestione
dell'annullamento deve essere li...!
@Alex


text:

Su entrambe le maschere su cui ho riscontrato l'anomalia non ho messo alcun
codice sull'evento Form_Error. Una delle due, invece su BeforeUpdate prevede
la valorizzazione di un campo.
Ma errori di questo tipo non dovrebbero essere segnalati con un messaggio di
default? O devo creare io la routine?



title: Ancora Stored Procedure...

author: Agos

text:
Ciao a tutti.
Ho una maschera che ottiene il recordsource con una stored. Sulla stessa
maschera vorrei aggiungere un comando attraverso il quale filtrare
ulteriormente i dati. Ho pensato di usare questa routine, ma sono stato
troppo 'ottimista':
Forms!CreaServizio!Calendario.recordsource = NomeStoredDaEseguire
Come devo fare?
Ciao e grazie per il prezioso aiuto


title: Ancora Stored Procedure...

author: giorgio rancati

text:
"Agos" <
aga...@alice.it
> ha scritto nel messaggio
news:46cc0d46$0$36439$4faf...@reader5.news.tin.it...

Ciao Agos,
Il manuale di Access dice:
----
È possibile impostare la proprietà RecordSource utilizzando la finestra
delle proprietà della maschera o del report, una macro o Visual Basic.
Per impostare tale proprietà in Visual Basic, utilizzare un'espressione
stringa.
----
Quidi
----
Forms!CreaServizio!Calendario.recordsource = "NomeStoredDaEseguire"
----
Ciao
--
Giorgio Rancati
[Office Access MVP]


title: Ancora Stored Procedure...

text:
> Ciao Agos,
> Il manuale di Access
dice:
> ----
> È possibile impostare la proprietà RecordSource
utilizzando la finestra
> delle proprietà della maschera o del report,
una macro o Visual Basic.
> Per impostare tale proprietà in Visual Basic,
utilizzare un'espressione
> stringa.
> ----
>
>
Quidi
> ----
> Forms!CreaServizio!Calendario.recordsource =
"NomeStoredDaEseguire"
> ----
>
> Ciao
> --
>
Giorgio Rancati
> [Office Access MVP]
>

>-------------------------------------------------------------------------

Ciao Giorgio

OK, mancavano le virgolette. Ma adesso il problema
è un altro: non riesco ad indicare correttamente il criterio di selezione
su un campo di tipo 'DateTime' contenente orari in questo formato:
30/12/1899 7.30.00. Dovrei filtrare nel campo 'OraInizio' i valori inferiori
alle ore 12.00. La Stored è questa, dov'è l'errore?

ALTER PROCEDURE [dbo].[SelezionaEsterniMattina]

@DataIns DateTime

AS

SELECT GIORNO AS Expr1, ID, GIORNO, IDAgente,
Ufficio, Servizio, OraInizio, OraFine, Reperibile, Turno, Zona, Viabilità,
NoteServizio, Turnazione,

TurnoReperibilità, TipoAssenza, Assente,
AssegnazioneAutom, OraInizRientro, OraFineRientro, DettaglioServ, TurnoRiposo,
TurnoRiduzioneOrario,

Turdom, Turmart, Progetto, OraInizio AS Expr2,
Servizio AS Expr3, Assente AS Expr4

FROM dbo.ArchivioServizi

WHERE (OraInizio < CONVERT(DATETIME, '2007-08-22
12:00:00', 102)) AND (GIORNO = @DataIns) AND (Servizio = 'Ctrr')

AND (Assente = 'False' OR

Assente IS NULL)

Ciao, grazie di nuovo, Agos


title: Ancora Stored Procedure...

text:
"Agos" <
aga...@alice.it
> ha scritto nel messaggio
news:46cc7cc0$0$4790$4faf...@reader4.news.tin.it...
>Ciao Giorgio
>OK, mancavano le virgolette. Ma adesso il problema è un altro: non riesco
>ad indicare correttamente il criterio di selezione su un campo di tipo
>'DateTime' contenente orari >in questo formato:  30/12/1899 7.30.00. Dovrei
>filtrare nel campo 'OraInizio' i valori inferiori alle ore 12.00. La Stored
>è questa, dov'è l'errore?
>ALTER PROCEDURE [dbo].[SelezionaEsterniMattina]
>@DataIns DateTime
>AS
>SELECT GIORNO AS Expr1, ID, GIORNO, IDAgente, Ufficio, Servizio, OraInizio,
>OraFine, Reperibile, Turno, Zona, Viabilità, NoteServizio, Turnazione,
>TurnoReperibilità, TipoAssenza, Assente, AssegnazioneAutom, OraInizRientro,
>OraFineRientro, DettaglioServ, TurnoRiposo, TurnoRiduzioneOrario,
>Turdom, Turmart, Progetto, OraInizio AS Expr2, Servizio AS Expr3, Assente
>AS Expr4
>FROM dbo.ArchivioServizi
>WHERE (OraInizio < CONVERT(DATETIME, '2007-08-22 12:00:00', 102)) AND
>(GIORNO = @DataIns) AND (Servizio = 'Ctrr')
>AND (Assente = 'False' OR
>Assente IS NULL)
 dovresti dire anche cosa devi passare nel parametro @DataIns e cosa
contengono i campi OraInizio e Giorno.
Da quello che posso intuire in @Datains passi una data senza la parte ora e
i campi OraInizio e Giorno contendono rispettivamente la sola parte ora e la
sola parte data.
quindi la Sp diventa (metto solo la where)
----
WHERE OraInizio < '12:00:00'
  AND  GIORNO = @DataIns
  AND  Servizio = 'Ctrr'
  AND (Assente = 'False' OR
       Assente IS NULL
        )
----
poi inserisci la Sp nella proprietà origine record passando la data nel
formato che il manuale di T-SQL definisce ISO, questo per evitare
incompatibilità con la lingua con cui si autentica l'utente a Sql Server.
----
Forms!CreaServizio!Calendario.recordsource = "NomeStoredDaEseguire " +
Format(Date(),"'yyyymmdd'")
----
Se non ho indovinato fornisci maggiori dettagli.
:-)



title: Ancora Stored Procedure...

text:

==================================>
>Ciao Giorgio.
Vado con ordine:
Nel parametro @DataIns passo una data 'pescata' da un form;
I campi OraInizio e Giorno contegono dati del tipo DateTime:
esempio OraInizio: 30/12/1899 7.30.00
esempio Giorno: 10/09/1999 0.00.00
Ora semplifico la situazione così mi spiego meglio.
La vista che segue, che utilizzo per i miei esperimenti, funziona...
SELECT     GIORNO, OraInizio, OraFine, IDAgente
FROM         dbo.ArchivioServizi
WHERE     (GIORNO = CONVERT(DATETIME, '2004-01-15 00:00:00', 102))
... ma se sulla stessa vista aggiungo il filtro dell'ora, come appresso
indicato, non funziona più,  non filtra alcun record (e ciò non è possibile
perché ve ne sono)...
SELECT     GIORNO, OraInizio, OraFine, IDAgente
FROM         dbo.ArchivioServizi
WHERE     (GIORNO = CONVERT(DATETIME, '2004-01-15 00:00:00', 102)) AND
(OraFine = CONVERT(DATETIME, '2007-08-23 07:30:00', 102))
... e non funziona neanche se scrivo:  (OraFine = '07:30:00')
Non v'è dubbio, pertanto, che dipende dal formato del parametro 'OraInizio',
ma le mie 'conoscenze' non mi permettono di risolvere il problema (ho sempre
usato Access e solo da poco i progetti di Access con SQL Server).
Quindi il problema adesso non è tanto far funzionare la Stored, quanto
piuttosto imparare a filtrare le date e gli orari.
Può essere utile sapere che per ottenere le due viste qui sopra ho usato il
'Query Designer' di <Microsoft SQL Server Management Studio Express>
Grazie per l'aiuto
Ciao Agos


title: Ancora Stored Procedure...

text:
"Agos" <
aga...@alice.it
> ha scritto nel messaggio
news:46cd61c3$0$10626$4faf...@reader2.news.tin.it...
>
> ==================================>
>>Ciao Giorgio.
> Vado con ordine:
> Nel parametro @DataIns passo una data 'pescata' da un form;
> I campi OraInizio e Giorno contegono dati del tipo DateTime:
> esempio OraInizio: 30/12/1899 7.30.00
> esempio Giorno: 10/09/1999 0.00.00
>
> Ora semplifico la situazione cosě mi spiego meglio.
> La vista che segue, che utilizzo per i miei esperimenti, funziona...
>
> SELECT     GIORNO, OraInizio, OraFine, IDAgente
> FROM         dbo.ArchivioServizi
> WHERE     (GIORNO = CONVERT(DATETIME, '2004-01-15 00:00:00', 102))
>
> ... ma se sulla stessa vista aggiungo il filtro dell'ora, come appresso
> indicato, non funziona piů,  non filtra alcun record (e ciň non č
> possibile perché ve ne sono)...
>
> SELECT     GIORNO, OraInizio, OraFine, IDAgente
> FROM         dbo.ArchivioServizi
> WHERE     (GIORNO = CONVERT(DATETIME, '2004-01-15 00:00:00', 102)) AND
> (OraFine = CONVERT(DATETIME, '2007-08-23 07:30:00', 102))
>
> ... e non funziona neanche se scrivo:  (OraFine = '07:30:00')
certo, se l'ora č memorizzata con 1899-12-30 7.30.00, come potrebbe trovarla
se gli passi '2007-08-23 07:30:00' o anche '1900-01-01 07:30:00' ?
>
> Non v'č dubbio, pertanto, che dipende dal formato del parametro
> 'OraInizio', ma le mie 'conoscenze' non mi permettono di risolvere il
> problema (ho sempre usato Access e solo da poco i progetti di Access con
> SQL Server).
> Quindi il problema adesso non č tanto far funzionare la Stored, quanto
> piuttosto imparare a filtrare le date e gli orari.
> Puň essere utile sapere che per ottenere le due viste qui sopra ho usato
> il 'Query Designer' di <Microsoft SQL Server Management Studio Express>
> Grazie per l'aiuto
se le ore sono memorizzate con il riferimento data0 di Access allora dovrai
attenerti alla stessa convenzione.
----
 SELECT     GIORNO, OraInizio, OraFine, IDAgente
 FROM         dbo.ArchivioServizi
 WHERE     GIORNO =  '20040115' AND
 (OraFine = '18991230 07:30:00'
----
Sql Server ha il riferimento della data0 impostato a '19000101'
Spero che i dati immessi nel database provengano solo da fonte ODBC
altrimenti ti ritrovi un pasticcio di ore, alcune che hanno data0 = 18991230
altre che hanno data0 = 19990101



title: Ancora Stored Procedure...

text:
"giorgio rancati" <
giorgio_No_Sp...@tiscali.it
> ha scritto nel
messaggio news:46cd688f$0$21210$5fc...@news.tiscali.it...
>
> "Agos" <
aga...@alice.it
> ha scritto nel messaggio
> news:46cd61c3$0$10626$4faf...@reader2.news.tin.it...
>>
>> ==================================>
>>>Ciao Giorgio.
>> Vado con ordine:
>> Nel parametro @DataIns passo una data 'pescata' da un form;
>> I campi OraInizio e Giorno contegono dati del tipo DateTime:
>> esempio OraInizio: 30/12/1899 7.30.00
>> esempio Giorno: 10/09/1999 0.00.00
>>
>> Ora semplifico la situazione così mi spiego meglio.
>> La vista che segue, che utilizzo per i miei esperimenti, funziona...
>>
>> SELECT     GIORNO, OraInizio, OraFine, IDAgente
>> FROM         dbo.ArchivioServizi
>> WHERE     (GIORNO = CONVERT(DATETIME, '2004-01-15 00:00:00', 102))
>>
>> ... ma se sulla stessa vista aggiungo il filtro dell'ora, come appresso
>> indicato, non funziona più,  non filtra alcun record (e ciò non è
>> possibile perché ve ne sono)...
>>
>> SELECT     GIORNO, OraInizio, OraFine, IDAgente
>> FROM         dbo.ArchivioServizi
>> WHERE     (GIORNO = CONVERT(DATETIME, '2004-01-15 00:00:00', 102)) AND
>> (OraFine = CONVERT(DATETIME, '2007-08-23 07:30:00', 102))
>>
>> ... e non funziona neanche se scrivo:  (OraFine = '07:30:00')
>
> certo, se l'ora è memorizzata con 1899-12-30 7.30.00, come potrebbe
> trovarla se gli passi '2007-08-23 07:30:00' o anche '1900-01-01 07:30:00'
> ?
>
>>
>> Non v'è dubbio, pertanto, che dipende dal formato del parametro
>> 'OraInizio', ma le mie 'conoscenze' non mi permettono di risolvere il
>> problema (ho sempre usato Access e solo da poco i progetti di Access con
>> SQL Server).
>> Quindi il problema adesso non è tanto far funzionare la Stored, quanto
>> piuttosto imparare a filtrare le date e gli orari.
>> Può essere utile sapere che per ottenere le due viste qui sopra ho usato
>> il 'Query Designer' di <Microsoft SQL Server Management Studio Express>
>> Grazie per l'aiuto
>
> se le ore sono memorizzate con il riferimento data0 di Access allora
> dovrai attenerti alla stessa convenzione.
>
> ----
> SELECT     GIORNO, OraInizio, OraFine, IDAgente
> FROM         dbo.ArchivioServizi
> WHERE     GIORNO =  '20040115' AND
> (OraFine = '18991230 07:30:00'
> ----
>
> Sql Server ha il riferimento della data0 impostato a '19000101'
> Spero che i dati immessi nel database provengano solo da fonte ODBC
> altrimenti ti ritrovi un pasticcio di ore, alcune che hanno data0 =
> 18991230 altre che hanno data0 = 19990101
>
> Ciao
> --
> Giorgio Rancati
> [Office Access MVP]
======================================================
>Ciao Giorgio
La tabella è stata trasferita da un db access su SQL Server
Grazie alle indicazioni che mi hai fornito, le stringhe SQL che seguono
funzionano entrambe correttamente
SELECT     GIORNO, OraInizio, OraFine, IDAgente
FROM         dbo.ArchivioServizi
WHERE     (OraInizio = '18991230 07:30:00') AND (GIORNO = CONVERT(DATETIME,
'2006-09-22 00:00:00', 102))
SELECT     GIORNO, OraInizio, OraFine, IDAgente
FROM         dbo.ArchivioServizi
WHERE     (OraInizio = '18991230 07:30:00') AND (GIORNO = '20060922
00:00:00')
Peraltro, per un problema analogo, mi sono impantanato anche nel creare un
report in Visual Basic 6,
dove il parametro giorno è pescato da un form. Non ho ancora verificato, ma
credo che questa sia la soluzione anche in quel caso.
Ti ringrazio del prezioso aiuto. Mi hai risolto un grosso problema e credo
di aver capito qualcosa in più.
Ciao e grazie di nuovo
Agos


title: Calcolare da VBA il numero di giorni in un mese

author: SunRex

text:
Ho guardato nei vecchi post ma non ho capito molto.
Problema : calcolare il numero di giorni in un mese passando anno e nome del
mese.
Avrei fatto questa cosa molto copiando ed un pò aggiustando ma non funziona.
Mi da tipo non corrispondente.Probabilmente sono le variabili anche se le ho
dichiarate Variant.
Qualcuno mi da una dritta?
Private Sub Comando0_Click()
Dim NumGiorni
Dim Anno
Dim Mese
Anno = "2003"
Mese = "Gennaio"
NumGiorni = DateSerial(Year(Anno), Month(Mese) + 1, 0) -
DateSerial(Year(Anno), Month(Mese), 1)
End Sub
SunRex


text:
"SunRex" <
sunrexs...@hotmail.com
> ha scritto nel messaggio
news:YiG5b.12922$hE5.4...@news1.tin.it...

Scusate adesso funziona ma mi dice che Febbraio ha 30 giorni.
Ma de che?
Private Sub Comando0_Click()
Dim Anno As Integer
Dim Mese As Integer
Dim intNumGiorni As Integer
Anno = "2003"
Mese = 2
intNumGiorni = DateSerial(Year(Anno), Month(Mese) + 1, 0) -



author: OneEDP

text:
"SunRex" <
sunrexs...@hotmail.com
> ha scritto nel messaggio
news:YiG5b.12922$hE5.4...@news1.tin.it...

"SunRex" <
sunrexs...@hotmail.com
> ha scritto nel messaggio
news:YiG5b.12922$hE5.4...@news1.tin.it...

Anno e mese non devono essere delle stringhe, ma delle date. Al massimo puoi
fare in questo modo:
Dim intAnno As Integer
Dim intMese As Integer
Dim intNumGiorni As Integer
intAnno = 2003
intMese = 1
intNumGiorni = _
    DateSerial(intAnno, intMese + 1, 0) - _
    DateSerial(intAnno, intMese, 1) + _
    1
... e magari premi F1 sulle funzioni DateSerial, Year e Month
Ciao


text:
"OneEDP" <
one.emme...@tin.it
> ha scritto nel messaggio
news:8AG5b.290940$lK4.9...@twister1.libero.it...
>
> "SunRex" <
sunrexs...@hotmail.com
> ha scritto nel messaggio
> news:YiG5b.12922$hE5.4...@news1.tin.it...
> > Ho guardato nei vecchi post ma non ho capito molto.
> > Problema : calcolare il numero di giorni in un mese passando anno e nome
> del
> > mese.
> > Avrei fatto questa cosa molto copiando ed un pò aggiustando ma non
> funziona.
> > Mi da tipo non corrispondente.Probabilmente sono le variabili anche se
le
> ho
> > dichiarate Variant.
> > Qualcuno mi da una dritta?
> >
> > Private Sub Comando0_Click()
> >
> > Dim NumGiorni
> > Dim Anno
> > Dim Mese
> >
> > Anno = "2003"
> > Mese = "Gennaio"
> >
> >
> > NumGiorni = DateSerial(Year(Anno), Month(Mese) + 1, 0) -
> > DateSerial(Year(Anno), Month(Mese), 1)
> >
> > End Sub
> >
> > SunRex
[CUT]
**********************************************************
                            Qua in mezzo c'era il mio II post.....
**********************************************************
>
> Anno e mese non devono essere delle stringhe, ma delle date. Al massimo
puoi
> fare in questo modo:
>
> Dim intAnno As Integer
> Dim intMese As Integer
> Dim intNumGiorni As Integer
>
> intAnno = 2003
> intMese = 1
>
> intNumGiorni = _
>     DateSerial(intAnno, intMese + 1, 0) - _
>     DateSerial(intAnno, intMese, 1) + _
>     1
>
> ... e magari premi F1 sulle funzioni DateSerial, Year e Month
> Ciao
Grazie ;
SunRex


author: Karl Donaubauer

text:
OneEDP ha scritto:
> "SunRex ha scritto:
>> Problema : calcolare il numero di giorni in un mese passando
>> anno e nome del mese.
>> ...
> Anno e mese non devono essere delle stringhe, ma delle date.
> Al massimo puoi fare in questo modo:
>
> Dim intAnno As Integer
> Dim intMese As Integer
> Dim intNumGiorni As Integer
>
> intAnno = 2003
> intMese = 1
>
> intNumGiorni = _
>     DateSerial(intAnno, intMese + 1, 0) - _
>     DateSerial(intAnno, intMese, 1) + _
>     1
>...
Qui basta:
intNumGiorni = Day(DateSerial(intAnno, intMese + 1, 0))
--
cu
Karl
*********
Access-FAQ (tedesco):
http://www.donkarl.com


text:
"Karl Donaubauer" <
ad...@donkarl.com
> ha scritto nel messaggio
news:bj7dnm$g3pkd$1...@ID-46617.news.uni-berlin.de...

A quanto pare devo rivedere anch'io con F1 la funzione Day.
E' la migliore. E' una soluzione ancora piů cazzuta!
La mia intNumGiorni si basava sulle sulla visualizzazione del fine mese in
una form.
La tua soluzione č molto piů pulita e ingengnerizzata... specialmente se
devo elaborare migliaia di date.
Ciao


title: vba & access cosa usare DAO ADODB - cosa consigliate?

author: pfm

text:
salve

svilippando in vba

cosa consigliate

DAO
ADODB o altro?

GRAZIE


text:
Dipende... anche entrambi...
La domanda posta così non ha senso.
Access e jet sono ottimizzati con DAO o ACEDAO.
Ma anche ADO ha una grande utilità... ad esempio i Recordset non associati...
Se poi parliamo di BE un RDBMS ci sono altre considerazioni...

@ALEX


author: Bruno Campanini

text:
pfm was thinking very hard :

DAO

Bruno


text:
Ero incuriosito da "altro"... pensavo qualcuno proponesse una 3° opzione...

@ALEX


text:
salve

devo dire che avendo sviluppato un buon numero di funzioni di mio utilizzo lavoro essenzialmente con DAO

Ora devo dare una mano ad un mio collega che ha sviluppato in Adodb
ho provato a convertire delle mie procedure

crea query, cancella query, ...
ma trovo alcune difficoltà - in particolare stavo eseguendo una procedura per creazione query mi dice che l'espressione troppo complessa

mentre in DAO nessun problema

...
per altro intendevo ADO,ADODB, ADOX


text:
Prima di tutto Ado/Adodb/Adox non sono affatto altro...
I 2 driver sono DAO e ADO Adodb è il riferimento all'oggetto che accede ai dati... mentre ADOX all'oggetto che accede alla struttura del db...cosa che DAO raggruppa in un unico Oggetto...

Per il problema che invece esponi serve analizzare singolarmente le anomalie... ti faccio un esempio semplice...
Con DAO il Jolly è il char [*]
Con ADO il Jolly è il char [%]

Quindi se vuoi pubblica qualche esempio è lo si analizza.

@ALEX


text:
ciao

prima di tutto grazie per le tue precisazioni

sono concorde che i 2 driver sono DAO e ADO

ma quello che mi crea confuzione e dubbio prima di volermi allontane da DAO

e' l'articolo
http://allenbrowne.com/tips.html

in particolare

Examples by Library

Developer reference section: create, delete, modify, and list the database objects (tables, fields, indexes, relations, queries, databases) and set their properties. Heaps of code, with only limited explanations.

    DAO code - 25 examples Access 97 and later
    ADO code - 9 examples Access 2000 and later
    ADOX code - 21 examples Access 2000 and later
    DDL query - 8 examples Access 2000 and later


text:
Mi permetto di chiedere

Ma qualcuno di voi utilizza query dll o l'altra?


text:
Il giorno giovedì 2 marzo 2017 08:09:45 UTC+1, pfm ha scritto:
> Mi permetto di chiedere
>
> Ma qualcuno di voi utilizza query dll o l'altra?

Cosa sarebbe QUERY DLL...?

Non è che intendi DDL...? (Data Definition Language)
Ovvero Statement SQL di Modifica Strutturale dello schema, anche esegubili con Query di comando.

Cosa intendi per "o Altra"...?

Mi pare di parlare con uno sche scivola sull'olio... siamo in un FORUM TECNICO... cerca di essere concreto, altrimenti rischi di dare impressioni di grande superficialità.

@Alex


title: salvare report in N file

text:
ciao
ho bisogno di salvare N report in base al cambio del codice ENTE della
mia tabella
copiazzando in qua e là ho costruito questo codice:
------------------------------------------------------------------------
Public Function prova()
Dim nome As String
Dim rst As DAO.Recordset
Set rst = CurrentDb.OpenRecordset("SELECT ente FROM [stampa
divulgazione] GROUP BY [ente];")
If rst.RecordCount > 0 Then
With rst
.MoveFirst
While Not .EOF
nome = !ENTE & " " & Year(Date) & Mid("00", 1, 2 - Len(Month(Date))) &
Month(Date) & Mid("00", 1, 2 - Len(Day(Date))) & Day(Date) & " " &
Mid("00", 1, 2 - Len(Hour(Now()))) & Hour(Now()) & Mid("00", 1, 2 -
Len(Minute(Now()))) & Minute(Now())
DoCmd.OpenReport "stampa", acViewNormal, , "ente=""" & !ENTE & """"
DoCmd.OutputTo acOutputReport, "stampa", "Snapshot Format", "\
\srv01\discox\resi\archivio\" & nome
.MoveNext
Wend
End With
End If
rst.Close: Set rst = Nothing
End Function
----------------------------------------------------
fino a qui tutto ok
DoCmd.OpenReport "stampa", acViewNormal, , "ente=""" & !ENTE & """"
poi però la funzione OutputTo acOutputReport non permette l'utilizzo
di filtri, perciò mi sono bloccato
qualcuno può aiutarmi?
grazie


title: salvare report in N file

author: tasso

text:
Mirco75 ha scritto:
> ciao
> ho bisogno di salvare N report in base al cambio del codice ENTE della
> mia tabella
> copiazzando in qua e là ho costruito questo codice:
> ------------------------------------------------------------------------
> Public Function prova()
> Dim nome As String
> Dim rst As DAO.Recordset
> Set rst = CurrentDb.OpenRecordset("SELECT ente FROM [stampa
> divulgazione] GROUP BY [ente];")
> If rst.RecordCount > 0 Then
> With rst
> .MoveFirst
> While Not .EOF
> nome = !ENTE & " " & Year(Date) & Mid("00", 1, 2 - Len(Month(Date))) &
> Month(Date) & Mid("00", 1, 2 - Len(Day(Date))) & Day(Date) & " " &
> Mid("00", 1, 2 - Len(Hour(Now()))) & Hour(Now()) & Mid("00", 1, 2 -
> Len(Minute(Now()))) & Minute(Now())
> DoCmd.OpenReport "stampa", acViewNormal, , "ente=""" & !ENTE & """"
> DoCmd.OutputTo acOutputReport, "stampa", "Snapshot Format", "
> srv01discoxresiarchivio" & nome
> .MoveNext
> Wend
> End With
> End If
> rst.Close: Set rst = Nothing
> End Function
> ----------------------------------------------------
> fino a qui tutto ok
> DoCmd.OpenReport "stampa", acViewNormal, , "ente=""" & !ENTE & """"
> poi però la funzione OutputTo acOutputReport non permette l'utilizzo
> di filtri, perciò mi sono bloccato
> qualcuno può aiutarmi?
> grazie
se il problema è questo utilizza una sql di origne dati diversa per ogni
report in modo tale che non devi utilizzare nessun filtro
ciao
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: tasti funzione

author: jef

text:
Ciao all'NG,
si può intercettare la pressione di un tasto funzione? (F1 F2 ecc. ecc.)
L'eventuale intercettazione avviene = per tutto il DB o ogni Form può avere
i suoi tasti funzione ?
Grazie


title: tasti funzione

author: "Roccia" Max De Poli

text:
Il Fri, 19 Jul 2002 17:06:27 GMT, "jef" <
j...@libero.it
> ha scritto:
>Ciao all'NG,
>si può intercettare la pressione di un tasto funzione? (F1 F2 ecc. ecc.)
Si, devi impostare la propreta' anteprima tasti della form a "Vero". Vedi help
della proprieta' per info.
Io/Noi/Gaia salutiamo.
"Roccia" Max De Poli <
rocc...@katamail.com
>


title: tasti funzione

author: Emyr

text:


vedi autokeys
puoi personalizzare a piacimento, vedi quindi anche activeform, screen
Saluti.
Emanuele.


title: Passaggio da DB Access a SQL server

author: Franco Lombardo

text:
Ciao a tutti.
Un mio programma ha sia il Frontend che il Backend in Access 2003).
Vorrei ora trasportare il Backend su SQL server 2005. Esiste qualche
strumento per effettuare la transizione in modo semi-automatico? Ho visto
che esiste un certo "upsizing tool" per il passaggio da Access 2002 a SQL
server 2000, ma, a parte che le versioni dei prodotti non corrispondono alle
mie, non riesco a trovare dove poterlo scaricare. E' un prodotto a
pagamento?
Grazie mille.
Ciao
Franco


title: Passaggio da DB Access a SQL server

author: Ivan

text:
"Franco Lombardo" <
f_lom...@hotmail.com
> ha scritto nel messaggio
news:ffkg95$pd$1...@tdi.cu.mi.it...

La procedura non è indolore...ma fattibilissima.


title: Passaggio da DB Access a SQL server

author: MA

text:

Non crederai mai dove reerire un tool del genere per le tue versioni...
nientepopodimenoche in Access stesso
Strumenti
Upsize guidato...
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


title: Passaggio da DB Access a SQL server

text:
Grazie mille!
Ciao
Franco


title: Passaggio da DB Access a SQL server

text:
"Ivan" <
fasdfsad...@tin.it
> ha scritto
> La procedura non č indolore...ma fattibilissima.
Quali potrebbero essere i passaggi piů delicati?
Grazie mille
Ciao
Franco


title: Passaggio da DB Access a SQL server

text:
Franco Lombardo wrote:
> "Ivan" <
fasdfsad...@tin.it
> ha scritto
>> La procedura non è indolore...ma fattibilissima.
>
> Quali potrebbero essere i passaggi più delicati?
>
> Grazie mille
>
> Ciao
>
> Franco
www.accessgroup.it
 vedi l'articolo su come gestire l'id nel recordset in un mdb o in SQL come back end
Dichiarazione del tipo di recordset e delle opzioni del cursore in partura di un rst



title: Passaggio da DB Access a SQL server

author: Davide (Sib)

text:
"Franco Lombardo" <
f_lom...@hotmail.com
> ha scritto nel messaggio
> "Ivan" <
fasdfsad...@tin.it
> ha scritto
>> La procedura non č indolore...ma fattibilissima.
>
> Quali potrebbero essere i passaggi piů delicati?
Le query dovrai quasi certamente riscriverle tutte (o per la maggior parte)
Le query a campi incrociati devi reimpararle perchč sono completamente
diverse in SQL Server
Nelle query SQL Server non puoi usare funzioni VBA nč riferimenti alle
maschere (particolari non da poco).
Devi imparare a usare le funzioni interne di SQL Server per formattazione,
confronti, valorizzazione condizionale ecc ecc ecc.
Ciao
Davide (Sib)
--
www.gestionedati.com


title: Passaggio da DB Access a SQL server

text:
> Le query dovrai quasi certamente riscriverle tutte (o per la maggior
parte)
Scusa la domanda da ignorante, ma perche' le dovrei riscrivere? Lo dovrei
fare se le trasformassi tutte in pass-through, o sbaglio? E' necessario
passare a query pass-through?
Ciao
Franco


title: Passaggio da DB Access a SQL server

author: Marco Papo

text:
"Davide (Sib)" <sedavi...@Mtiscali.it> ha scritto nel messaggio
news:471e591f$0$17945$4faf...@reader1.news.tin.it...
> "Franco Lombardo" <
f_lom...@hotmail.com
> ha scritto nel messaggio
>> "Ivan" <
fasdfsad...@tin.it
> ha scritto
>>> La procedura non è indolore...ma fattibilissima.
>>
>> Quali potrebbero essere i passaggi più delicati?
>
Ciao io non sono molto d'accordo con Davide. Anch'io sto migrando un grosso
applicativo che spazia dalla contabilità al controllo di produzione, alle
rilevazioni presenze...eccc.
E non ho avuto grossi problemi. Certo io sto adottando una transizione per
passi. Migro una decina di tabelle alla volta.
> Le query dovrai quasi certamente riscriverle tutte (o per la maggior
> parte)
Molte query acccess, se lasci le tabelle collegate funzionano.
Io ho creato query SQL solo dove c'erano problemi di prestazione! Tabelle
grosse....per esempio, e solo se l'applicazione risultava lenta.
> Le query a campi incrociati devi reimpararle perchè sono completamente
> diverse in SQL Server
> Nelle query SQL Server non puoi usare funzioni VBA nè riferimenti alle
> maschere (particolari non da poco).
Per passare riferimenti da form a query SQL, puoi usare l'oggetto QueryDef,
che ti permette di prendere l'SQl di una query PassThough e modificarlo e
poi ripassarlo alla query...certo è un po più laborioso, ma mi ripeto
dicendo che questo lavoro è necessario solo dove è necessario usare query
SQL... e quindi solo dove vuoi migliorare le prestazioni.
Stessa cosa per le funzioni VBA....Poi puoi crearti funzioni so store
procedure in SQL che puoi usare nel transact alla stregua di access.
> Devi imparare a usare le funzioni interne di SQL Server per formattazione,
> confronti, valorizzazione condizionale ecc ecc ecc.
Certo il linguaggio SQL è un po diverso (un po) ma offre molte più
possibilità. Inoltre SQL è spaziale...io sto imparando i reporting
services... che ti consiglio di studiare perchè ti offrono la possibiolità
di avere report internet dinamici.. (drill down, sotto report che si
attivano cliccando su un campo del report, gli utenti si possono pianificare
con un interfacci agià esistente la spedizione degli stessi via e-amil...e
molto altro)
>
> Ciao
> Davide (Sib)
>
> --
>
www.gestionedati.com
Qualche volta ho dovuto modificare l'apertura di recordset se le tabelle
contengono chiavi contatore, ma basta mettere dbseechanges......
ciao
--
Marco Papetti
www.shortchannel.it
 Il software di commercio elettronico OpenSource
www.mondoideale.com
  - Prodotti naturali e biologici.


title: Passaggio da DB Access a SQL server

author: pamela fluente

text:
On 24 Ott, 14:15, "Marco Papo" <
marco.pape...@gmail.com
> wrote:
> "Davide (Sib)" <sedavideN...@Mtiscali.it> ha scritto nel messaggionews:471e591f$0$17945$4faf...@reader1.news.tin.it...
>
> > "Franco Lombardo" <
f_lomba...@hotmail.com
> ha scritto nel messaggio
> >> "Ivan" <
fasdfsadfsadf...@tin.it
> ha scritto

> Marco Papettiwww.shortchannel.itIlsoftwaredi commercio elettronico
OpenSourcewww.mondoideale.com
 - Prodotti naturali e biologici.
Per Report dinamici e anche per la migrazione dati puoi considerare
questo software (free),
che si sta imponendo per la sua enorme potenza:
http://www.datatime.eu/DataTimeUniversal.htm
http://www.datatime.eu/download.aspx
Ti consente anche, volendo, di preparare dei DUMP file sui quali puoi
eventualmente intervenire manualmente
prima di ricaricare.
Se devi implementare report dinamici puoi scaricarti anche il
ReportPortal, facilmente integrabile con pagine preesistenti.
-P


title: Passaggio da DB Access a SQL server

text:
"Franco Lombardo" <
f_lom...@hotmail.com
> ha scritto nel messaggio
news:ffmrt6$a9b$1...@tdi.cu.mi.it...

Non c'entrano nulla le query pass through, che tra l'altro negli adp lo sono
tutte.
Devi sostituire tutte le funzioni VBA presenti nelle query con le istruzioni
equivalenti di SQL Server, inoltre non puoi utilizzare in modo esplicito i
riferimenti alle maschere e devi quindi parametrizzare le query.
Infine le query a campi incrociati non funzioneranno più, devi utilizzare
una sintassi completamente diversa facendo largo uso dell'istruzione sql
CASE.
Per concludere l'utilizzo del calcolo totali nelle maschere per alcuni tipi
di stored crea qualche difficoltà.
Saluti
Davide(Sib)
--
www.gestionedati.com


title: Passaggio da DB Access a SQL server

text:
"Marco Papo" <
marco....@gmail.com
> ha scritto nel messaggio
> "Davide (Sib)" <sedavi...@Mtiscali.it> ha scritto nel messaggio
>> "Franco Lombardo" <
f_lom...@hotmail.com
> ha scritto nel messaggio
>>> "Ivan" <
fasdfsad...@tin.it
> ha scritto
>>>> La procedura non è indolore...ma fattibilissima.
>>>
>>> Quali potrebbero essere i passaggi più delicati?
>>
>
> Ciao io non sono molto d'accordo con Davide. Anch'io sto migrando un
> grosso applicativo che spazia dalla contabilità al controllo di
> produzione, alle rilevazioni presenze...eccc.
>
> E non ho avuto grossi problemi. Certo io sto adottando una transizione per
> passi. Migro una decina di tabelle alla volta.
>
>
>> Le query dovrai quasi certamente riscriverle tutte (o per la maggior
>> parte)
>
> Molte query acccess, se lasci le tabelle collegate funzionano.
> Io ho creato query SQL solo dove c'erano problemi di prestazione! Tabelle
> grosse....per esempio, e solo se l'applicazione risultava lenta.
CUT
Credo che ci sia stato un fraintendimento.
Infatti da quanto dici sembrerebbe che tu stia usando un mdb collegato a SQL
invece di utilizzare un adp.
Certamente viene più facile ma hai appunto il problema che le elaborazioni
non esplicitamente passthrough sono tutte locali.
Fatto sta che questo non è un upsizing propriamente detto.
Saluti
Davide(Sib)
--
www.gestionedati.com


title: database "libri microsoft press"

author: paolo

text:
Sto cominciando a conoscere access, mi anno prestato il libro della
mondadori guida di riferimento access 97, ma è sprovvisto del cd contenente
i db d'esempio. sapete dove potrei trovarlo? fatemi sapere . Grazie Paolo


title: database "libri microsoft press"

author: Roberto da casa

text:
"paolo" <
gabri...@tiscalinet.it
> ha scritto nel messaggio
news:c1kc7u$f4h$1...@lacerta.tiscalinet.it...

Il CD viene venduto insieme al manuale e non credo tu possa trovarlo da
solo.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: database "libri microsoft press"

text:
Sicuramente, infatti chiedevo se qualcuno fosse cosě gentile da mandarmi
almeno qualcuno dei database esplicativi(libri microsoft
press,college.mdb,Entertain.mdb,Nozze.mdb). Grazie
Roberto da casa <
r.ma...@libero.it
> wrote in message
Y2F%b.34564$Kc3.1...@twister2.libero.it...
>
> "paolo" <
gabri...@tiscalinet.it
> ha scritto nel messaggio
> news:c1kc7u$f4h$1...@lacerta.tiscalinet.it...
> > Sto cominciando a conoscere access, mi anno prestato il libro della
> > mondadori guida di riferimento access 97, ma č sprovvisto del cd



title: database "libri microsoft press"

text:
"paolo" <
gabri...@tiscalinet.it
> ha scritto nel messaggio
news:c1t32o$rs2$1...@lacerta.tiscalinet.it...
> Sicuramente, infatti chiedevo se qualcuno fosse così gentile da mandarmi
> almeno qualcuno dei database esplicativi(libri microsoft
> press,college.mdb,Entertain.mdb,Nozze.mdb). Grazie
Innanzitutto quando rispondi scrivi DOPO e non prima del testo dei messaggi
precedenti.
Quanto ad inviarti i file che chiedi, essi complessivamente pesano oltre 35
Mbyte, ed a parte il fatto che la mia casella di posta ha dimensioni minori,
poichè uso una normale linea commutata con un modem a 56K, ci impiegherei
una vita.
Forse la cosa migliore è che tu trovi qualcuno che abita nella tua città e
che, avendo il CD sia disposto a duplicartelo.
La persona che ti ha prestato il libro dovrebbe avere il CD; nel caso che
l'abbia perso c'è una buona possibilità che abbia installato i file che ti
servono sul suo computer: potresti copiarli da lì.



title: database "libri microsoft press"

text:
Scrivere prima o dopo è una questione irrilevante dato l'argomento, e poi
pensi che sia possibile che chi ha comprato questo libro nel 98 possa ancora
avere nel proprio computer i file del cd allegato?A sette(7) anni di
distanza? Beata innocenza....
In ogni caso il db Northwind è poco meno di 3 mb, dubito che ciascuno dei
quattro db che gentilmente richiedevo siano grandi oltre il doppio di
questo.
Se non hai voglia, tempo o possibilità di spedirne qualcuno non capisco
perchè ci tenga a farmelo sapere. Grazie comunque.
 Roberrto da casa <
r.ma...@libero.it
> wrote in message
_Up0c.39109$Kc3.1...@twister2.libero.it...



title: database "libri microsoft press"

author: Antonio Biso

text:
"paolo" <
gabri...@tiscalinet.it
> ha scritto nel messaggio
news:c1uslj$4ab$1...@lacerta.tiscalinet.it...
> Scrivere prima o dopo è una questione irrilevante dato l'argomento, e poi
E' IRRILEVANTE UN PAR DE PALLE!!!!
Qui ci sono delle norme, da rispettare senza deroghe se vuoi che qualcuno
perda del tempo per aiutarti!
Altrimenti, puoi rivolgerti tranquillamente da un'altra parte e amici come
prima!!!
Antonio


title: database "libri microsoft press"

text:
"paolo" <
gabri...@tiscalinet.it
> ha scritto nel messaggio
news:c1uslj$4ab$1...@lacerta.tiscalinet.it...
> Scrivere prima o dopo è una questione irrilevante dato l'argomento,
Non era nelle mie intenzione fare polemica, ma mi ci hai tirato per i
capelli, quindi...
Il fatto di scrivere prima o dopo il quoting forse è una questione
irrilevante per te, ma non per tutti i partecipanti di questo NG rispettosi
delle regole che questo NG si è dato democraticamente; se poi ci pensi bene
è molto più logico, per chi legge il thread senza parteciparvi, leggere
prima la domanda e poi la risposta e non prima la risposta e poi la domanda.
Ma presumibilmente l'unica cosa che ti interessa è risolvere il tuo problema
e degli altri non te ne frega niente: questo però non è lo spirito con il
quale vive questo NG.
> e poi
> pensi che sia possibile che chi ha comprato questo libro nel 98 possa
ancora
> avere nel proprio computer i file del cd allegato?
Si lo credo, perché io ho acquistato quel manuale ed i database di esempio
sono ancora oggi  installati sul mio computer (e quando ho cambiato il
computer li ho installati anche nel nuovo PC); non vedo perché non dovrebbe
essere così, visto che, dopo averli usati durante lo studio del manuale,
ancora oggi mi capita di consultare quei database per risolvere alcuni
problemi con Access.
D'altra parte ho dei dubbi che tu abbia eliminato dal tuo computer il
database di esempio NorthWind che hai installato insieme ad Access.
O sbaglio?
> A sette(7) anni di distanza? Beata innocenza....
Forse io sarò innocente, ma tu sicuramente sei presentuoso e abbastanza
strafottente, visto che dai per scontato cose che non conosci.
> In ogni caso il db Northwind è poco meno di 3 mb, dubito che ciascuno dei
> quattro db che gentilmente richiedevo siano grandi oltre il doppio di
> questo.
Visto che hai chiesto i file necessari a seguire la lettura del manuale, per
tua conoscenza ti faccio presente che si tratta di 15 file .mdb, 1 file
.mde, 1 file .MDW, 72 file .BMP, 5 file .txt, 34 file .doc, un file .bak, 1
file .DB, 5 file .DBF, 2 file .jpg, 1 file .FTP, 2 file .xls, 6 file .htm, 4
file .ICO, 1 file .INI e 1 fiel .dsn.
Tutti questi file sono INDISPENSABILI a rendere eseguibili gli esempi cui il
manuale fa riferimento: sempre per tua opportuna conoscenza sappi che ognuno
dei 15 file .mdb ha una dimensione paragonabile a quella di Northwind,
pertanto mi sembra evidente che la dimensione di file che ti ho comunicato
con il mio messaggio precedente è reale e che invece la tua affermazione
l'hai scritta senza cognizione di causa.
> Se non hai voglia, tempo o possibilità di spedirne qualcuno non capisco
> perchè ci tenga a farmelo sapere.
Forse ti è sfuggito che l'unica cosa cui tengo farti sapere è che la tua
richiesta di spedirti per posta elettronica quei file, visto la loro
dimensione, è a dir poco molto onerosa per chi si prendesse la briga di
assecondarla e che invece una soluzione che risolve il tuo problema è quella
di trovare qualcuno della tua città che ti duplichi e ti consegni brevi manu
quei file.
> Grazie comunque.
Prego, non c'è di che.
[CUT]



title: database "libri microsoft press"

author: Sergio MAZZA

text:
"paolo" <
gabri...@tiscalinet.it
> ha scritto nel messaggio
news:c1uslj$4ab$1...@lacerta.tiscalinet.it...
> Scrivere prima o dopo è una questione irrilevante dato l'argomento, e poi
> pensi che sia possibile che chi ha comprato questo libro nel 98 possa
ancora
> avere nel proprio computer i file del cd allegato?A sette(7) anni di
> distanza? Beata innocenza....
> In ogni caso il db Northwind è poco meno di 3 mb, dubito che ciascuno dei
> quattro db che gentilmente richiedevo siano grandi oltre il doppio di
> questo.
> Se non hai voglia, tempo o possibilità di spedirne qualcuno non capisco
> perchè ci tenga a farmelo sapere. Grazie comunque.
>
>
Porca paletta... Ero lì, lì, per inviartelo... Peccato!
Ciao.
--
Sergio MAZZA


title: codice chiusura maschera

author: stefano

text:
Ciao a tutti e ringrazio da subito per eventuali aiuti
Essendo un principiante di Access , ho creato dei bottoni che aprono
direttamente delle maschere con l'autocomposizione.
In ogni maschera ho creato un bottone che mi rimanda al menu' principale, ma
che pero' mi lascia aperta ed in sottofondo la maschera vecchia
Quale codice devo aggiungere all'evento clic del bottone per far si che mi
rimandi al menu principale e contemporaneamente chiuda la maschera
sottostante ?
Ringrazio Tutti
Ciao Stefano


title: codice chiusura maschera

text:

Devi utilizzare il metodo Close (vedi help VBA).
Es.(bottone chiusura)
Docmd.openform "menu principale"
DoCmd.Close acform,
me.name
Ciao.
--
Sergio MAZZA


title: codice chiusura maschera

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:fc9n82$3p3$1...@tdi.cu.mi.it...

>Molte grazie e buonanotte
Stefano


title: Rilevare nomi macro

author: Dominijanni Giuseppe

text:
Salve
con il seguente codice riesco a stampare le macro del db:
Dim db As Database, ctr As Container, doc As Document
Set db = CurrentDb
Set ctr = db.Containers("Scripts") 'set a variabile to the Macro
container.
For Each doc In ctr.Documents
   Debug.Print doc.Name
Next doc
-------------
come devo fare per stampare con Debug.Print il nome di ogni singola
macro e
il nome dell'azione ?
giuseppe


title: Query di aggregazione

text:
Ciao a tutti avrei bisogno di sapere come si realizza una query di
aggregazione.
Grazie 1000 a tutti
Ciao DimAnto


title: Query di aggregazione

author: ciroteo

text:
<NoSpam...@Libero.it> ha scritto nel messaggio
news:OVPde.78735$IN.13...@twister2.libero.it...

Nella barra degli strumenti  in query visualizzazione struttura dovrebbe
esserci un'icona rappresentante una sigma maiuscola in greco. Se clicchi li
ti appare una nuova riga nella griglia di struttura della query.
A questo punto puoi iniziare a inserire i campi della query a partire da
quelli che vuoi che siano raggruppati secondo una delle funzioni di
aggregazione: somma, media, min, max deviazione standard ecc...
Se poi guardi il codice sql generato noterai che le query di raggruppamento
hanno il costrutto group by.


title: cambiamento immediato del colore

author: Romano

text:
In una maschera, su corrente, metto :
if me.casellacombinata = "rosso" then
me.etichetta100.forecolor=255
end if
Come fare perchè il cambiamento di colore dell'etichetta avvenga
contestalmente all'immissione di "rosso" nella casella combinata?
Ho messo refresh ma non funziona.


title: cambiamento immediato del colore

text:
"Romano" <
or...@tin.it
> ha scritto nel messaggio
news:eud7fe$qcv$1...@carabinieri.cs.interbusiness.it...

Metti la stessa cosa su evento dopo aggiornamento della combo
Antonio


title: cambiamento immediato del colore

text:
"Antonio Biso" <ch...@NOSPAMetruria.net> ha scritto nel messaggio
news:5FpOh.40306$zG1.4...@twister2.libero.it...

Fatto, ma non funziona!


title: cambiamento immediato del colore

text:
"Romano" <
or...@tin.it
> ha scritto nel messaggio
news:euddlb$9ba$1...@fata.cs.interbusiness.it...

non funziona... che vor dì non funziona?
dà errore?
non fa quello che dici?
hai fatto il debug del test if per vedere se ci va dentro al forecolor?
Io ho provato e funziona.
Allora, o non esiste l'etichetta100, o la combo non vale "rosso".
Prova a cambiare colore senza fare il test if
Antonio


title: cambiamento immediato del colore

author: Access

text:
"Romano" <
or...@tin.it
> ha scritto nel messaggio
news:euddlb$9ba$1...@fata.cs.interbusiness.it...

Ciao Romano sei sicuro di aver scritto questo come evento dopo aggiornamento
della casella combinata?
Private Sub NomeTuaCasellaCombinata_AfterUpdate()
If Me.NomeTuaCasellaCombinata = "rosso" Then
   Me.NomeTuaEtichetta.ForeColor = "255"
End If
End Sub
Ciao


title: Controllo calendario

author: Ferdinando De Marco

text:
Salve a tutti,
premetto che sono alle prime armi con access, quindi scusate la mia
ignoranza.
Ho una tabella in cui ho un campo data, vorrei inserire la data tramite un
calendario, che ho messo in una maschera insieme agli altri campi della
tabella da aggiornare.
Poi con un report vorrei poter visualizzare tutti i record di quei campi
selezionando un mese e l'anno, come posso fare?
Grazie


title: Controllo calendario

text:
"Ferdinando De Marco" <
nandod...@libero.it
> ha scritto nel messaggio
news:3l_tc.79134$Qc.31...@twister1.libero.it...

Sul sito
www.sitocomune.com
 sezione forms ci sono due bellissimi esempi per
l'uso del controllo calendario.
Ciao.
--
Gastone


title: chiedo chiarimento sugli effetti del blocco livello record (quale tecnica di prelievo dati in multiutenza è migliore)

author: GiorgioDaPrato

text:
per argomentare la mia richiesta, cito dalla guida
--------------------------
OPZIONE: Apri i database con blocco a livello di record
DESCRIZIONE: Consente di definire il blocco a livello di record come l'impostazione predefinita per il database aperto. (...)
Questa opzione si applica ai dati contenuti nelle maschere, nei fogli dati e nel codice che utilizza un oggetto recordset per eseguire cicli tra i record, mentre non si applica alle query di comando o al codice che esegue operazioni collettive tramite istruzioni SQL.
-----------------------------

Per MIA comodità ho dato (molta) prevalenza all'utilizzo di query di comando
(docmd.openquery ...)
per il trasferimento, via accodamento, di dati dal BE
a tabelle temporanee dei FE (multiutenza)
che rappresentano origini di reports o di forms di consultazione.

Ma, se non interpreto male la spiegazione,
questa modalità è più "aggressiva" verso il BE
(non trovando lo "scudo" di un blocco) ?


title: x VT@work or at home... Tnx

author: SuperPippo

text:
> Scusami: rileggendo la mia risposta mi sono accorto di essere stato
> troppo categorico.
> In realtà intendevo dire:
> sostituisci virgola con punto e virgola all'interno delle parentesi
> che racchiudono i parametri passati alla funzione Token.
> Quindi l'istruzione SQL diventa
>
> SELECT Token(Anagrafe.N_Protocollo;"/";3) AS N_ProtocolloCampo,
> Count(Anagrafe.N_Protocollo) AS NumDuplicati
> FROM Anagrafe
> GROUP BY Token(Anagrafe.N_Protocollo;"/";3)
> HAVING (((Count(Anagrafe.N_Protocollo))>1));
>
-----------------------
scusami tu Vincenzo... e grazie x la tua pazienza... ma questa query stà
diventando una telenovela...
cmq... avevo già  ieri provato a sostituire il punto e virgola solo nelle
funzioni Token...dentro le parentesi... niente...
oggi x evitare casini ho copiato-incollato il tuo codice sql... ma la
risposta da parte di Access è sempre la stessa..."Errore di compilazione
..etc..ed il prompt mi evidenzia proprio il punto e virgola..
dove è l'arcano ???
------------------------
ho ripostato il messaggio dato che non ero sicuro fosse arrivato a
destinazione...


title: Problema con la gestione degli errori

author: Michele (Giò)

text:
Intanto buona Domenica a tutti (per chi c'è).
Dunque, sono alle prese con una gestione multipla degli errori, che per comodità di comprensione
riporto a seguito. Premetto che nelle opzioni ho settato "interrompi ad ogni errore non gestito" e
che ho inserito sopra la clausola "On Error Goto ErrorFunc"
-----------------------------------------------------------------------------
ErrorFunc:
Select Case Err.Number
Case 32813, -
2147467259
, 438
    Err.Clear
    Resume Next
Case 2091
    Err.Clear
    Echo True
    MsgBox "Non risulta la proprietà """ & rcd!Proprietà.Value & """.", vbExclamation, "Attenzione"
    Echo False
    Resume Next
Case 3012
    Err.Clear
    GoTo NextRel
Case Else
    Echo True
    Err.Raise Err.Number, Err.Source, Err.Description, Err.HelpFile, Err.HelpContext
End Select
---------------------------------------------------------------------------
Quando termina il primo spezzone di codice che potrebbe generare gli errori -
2147467259
 e 438, e qui
tutto funziona correttamente, quando passo al secondo pezzo dove mi servirebbe il Resume Next per
l'errore 32813, invece di gestirmi l'errore si blocca l'esecuzione sulla riga di codice e mi si
presenta l'errore a monitor come se non avessi mai utilizzato la gestione degli errori.
Vi informo che ho già provato a fare CopiaIncolla con il modulo, a riavviare Windows e ad importare
tutto in un altro db. "Err.Clear" l'ho inserito in un secondo momento ma senza risolvere niente.
Che cos'altro posso fare? Non mi è mai capitata una cosa del genere. Io uso WinXPsp2 e Acc2002.
Grazie a chiunque riesca a darmi una mano.
---------------------------
Michele (Giò)
joyl...@alice.it


title: Problema con la gestione degli errori

author: Carlo Costarella

text:
"Michele (Giò)" <
joyl...@alice.it
> ha scritto nel messaggio
news:4531f8f4$0$25885$4faf...@reader1.news.tin.it...

Non tutti gli errori sono intercettabili (vedi errori intercettabili) e
probabilmente questo è uno di questi.
Potresti provare con:
If err.number = 32813 then
err.number = 0
end if
Magari usato lì dove si genera l'errore.
Ciao, Carlo


title: Problema con la gestione degli errori

text:
"Michele (Giò)" <
joyl...@alice.it
> ha scritto nel messaggio
news:4531f8f4$0$25885$4faf...@reader1.news.tin.it...
> Intanto buona Domenica a tutti (per chi c'è).
cut
Questo codice crea una tabella "Errori" da 1 a 1000...forse ti può servire.
E' presa dalla guida di A97.
Ciao, Carlo
Sub CreaTabellaErrori()
    Dim dbs As Database, tdf As TableDef, fld As Field
    Dim rst As Recordset, lngCodice As Long
    Const conErroreOggAppl = "Errore definito da applicazioni o da oggetti"
    ' Crea la tabella Errori in cui sono presenti i campi NumeroErrore e
DescrizioneErrore.
    Set dbs = CurrentDb
    Set tdf = dbs.CreateTableDef("Errori")
    Set fld = tdf.CreateField("CodiceErrore", dbLong)
    tdf.Fields.Append fld
    Set fld = tdf.CreateField("StringaErrore", dbText, 255)
tdf.Fields.Append fld
    dbs.TableDefs.Append tdf
    ' Apre il set di record della tabella Errori.
    Set rst = dbs.OpenRecordset("Errori")
    ' Esegue un ciclo sui primi 1000 codici di errore di Visual Basic.
    For lngCodice = 1 To 1000
        On Error Resume Next
        ' Rileva ciascun errore.
        Err.Raise lngCodice
        DoCmd.Hourglass True
        ' Omette codici di errore che generano errori definiti da
applicazioni o da oggetti.
        If Err.Description <> conErroreOggAppl Then
' Aggiunge ogni stringa e codice di errore alla tabella Errori.
            rst.AddNew
            rst!CodiceErrore = Err.Number
            rst!StringaErrore = Err.Description
            rst.Update
        End If
        ' Cancella oggetto Err.
        Err.Clear
    Next lngCodice
    ' Chiude il set di record.
    rst.Close
    DoCmd.Hourglass False
    MsgBox "Creata tabella Errori."
End Sub


title: Problema con la gestione degli errori

text:
"Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
news:egt571$vlr$1...@area.cu.mi.it...
>
> "Michele (Giò)" <
joyl...@alice.it
> ha scritto nel messaggio
> news:4531f8f4$0$25885$4faf...@reader1.news.tin.it...
>> Intanto buona Domenica a tutti (per chi c'è).
>>
>> Dunque, sono alle prese con una gestione multipla degli errori, che per comodità di comprensione
>> riporto a seguito. Premetto che nelle opzioni ho settato "interrompi ad ogni errore non gestito"
>> e che ho inserito sopra la clausola "On Error Goto ErrorFunc"
>> Quando termina il primo spezzone di codice che potrebbe generare gli errori -
2147467259
 e 438, e
>> qui tutto funziona correttamente, quando passo al secondo pezzo dove mi servirebbe il Resume Next
>> per l'errore 32813, invece di gestirmi l'errore si blocca l'esecuzione sulla riga di codice e mi
>> si presenta l'errore a monitor come se non avessi mai utilizzato la gestione degli errori.
> Non tutti gli errori sono intercettabili (vedi errori intercettabili) e probabilmente questo è uno
> di questi.
> Potresti provare con:
> If err.number = 32813 then
> err.number = 0
> end if
> Magari usato lì dove si genera l'errore.
>
> Ciao, Carlo
Gli errori sono tutti intercettabili purtroppo, e questo lo dico perchè, anche se inverto il primo
spezzone di codice con il secondo (sempre all'interno di una stessa funzione), il primo viene
gestito egregiamente, il secondo va sempre in blocco.
Adesso voglio provare a scomporre la Function in Function + n Private Function all'interno del
modulo, ognuna con la gestione degli errori, e vediamo quel che succede.
Intanto grazie, ti farò sapere.
Michele


title: Problema con la gestione degli errori

text:
"Michele (Giò)" <
joyl...@alice.it
> ha scritto nel messaggio
news:45326d16$0$4562$4faf...@reader2.news.tin.it...
> "Carlo Costarella" <
carloco...@libero.it
> ha scritto nel messaggio
> news:egt571$vlr$1...@area.cu.mi.it...
>>
>> "Michele (Giò)" <
joyl...@alice.it
> ha scritto nel messaggio
>> news:4531f8f4$0$25885$4faf...@reader1.news.tin.it...
>>> Intanto buona Domenica a tutti (per chi c'è).
> Adesso voglio provare a scomporre la Function in Function + n Private Function all'interno del
> modulo, ognuna con la gestione degli errori, e vediamo quel che succede.
>
> Intanto grazie, ti farò sapere.
>
> Michele
>
Caro Carlo, proprio come mi aspettavo......
Scomponendo la f principale in più pezzi, ognuno con la gestione degli errori ad hoc (scomposta
quindi pure quella) fa funzionare il modulo che è una meraviglia.
Se ti dovesse capitare......sai come fare
Grazie
Michele