title: selezionare record in maschera continua

text:
Salve,

cesare....@gmail.com
:
> ho così modificato il codice (e colore)
> Dim ctl As Control
> For Each ctl In Me.Controls
> Select Case ctl.ControlType
> Case acTextBox, acComboBox, acListBox
> With ctl
> .FormatConditions.Delete
> .FormatConditions.Add acExpression, acEqual, "idpaziente=" & Me!IDPaziente
> .FormatConditions(0).BackColor = vbYellow
> End With
> End Select
> Next ctl
> (il secondo id non era presente... mio errore)
> adesso funziona,
> ...
> ps prima di implementare questo codice  era presente un'altra FC che colorava le textbox a seconda del sesso dei pazienti (blu maschietti, rosa femminucce). ora è sparito tutto. Come posso fare?

Se vuoi mantenere l'altra formattazione già esistente, potresti provare
di fare tutto nel codice. In principio circa:

With ctl

     .FormatConditions.Delete

     .FormatConditions.Add _
     	acExpression, acEqual, "idpaziente=" & Me!idpaziente & _
			" And id_esami=" & Me!id_esami
     ctl.FormatConditions(0).BackColor = vbYellow

     ctl.FormatConditions.Add _
     	acExpression, acEqual, "maschietti = True"
     ctl.FormatConditions(1).BackColor = vbBlue

     ctl.FormatConditions.Add _
     	acExpression, acEqual, "femminucce = True"
     ctl.FormatConditions(2).BackColor = TuoValorePerRosa

Next ctl



title: selezionare record in maschera continua

text:
Scusa il ritardo nel risponderti e continuo a ringraziarti per l'attenzione (lavoro in ospedale e attualmente non stiamo passando un periodo facile...)
questo il codice modificato come mi hai suggerito

Dim ctl As Control
For Each ctl In Me.Controls
Select Case ctl.ControlType
Case acTextBox
With ctl
    .FormatConditions.Delete
    .FormatConditions.Add acExpression, acEqual, "idpaziente=" & Me!IDPaziente
    ctl.FormatConditions(0).BackColor = vbYellow

    ctl.FormatConditions.Add acExpression, acEqual, Me.Sesso = "M"
    ctl.FormatConditions(1).BackColor = vbBlue

    ctl.FormatConditions.Add acExpression, acEqual, Me.Sesso = "F"
    ctl.FormatConditions(2).BackColor = vbMagenta
End With
End Select
Next ctl

però ora il record selezionato è giallo e TUTTI gli altri sono blu o magenta a seconda del sesso del paziente  selezionato...
Grazie ancora
BC


title: selezionare record in maschera continua

author: Karl Donaubauer

text:
Salve,

cesare....@gmail.com
:
> ...
> Dim ctl As Control
> For Each ctl In Me.Controls
> Select Case ctl.ControlType
> Case acTextBox
> With ctl
>      .FormatConditions.Delete
>      .FormatConditions.Add acExpression, acEqual, "idpaziente=" & Me!IDPaziente
>      ctl.FormatConditions(0).BackColor = vbYellow
>
>      ctl.FormatConditions.Add acExpression, acEqual, Me.Sesso = "M"
>      ctl.FormatConditions(1).BackColor = vbBlue
>
>      ctl.FormatConditions.Add acExpression, acEqual, Me.Sesso = "F"
>      ctl.FormatConditions(2).BackColor = vbMagenta
> End With
> End Select
> Next ctl
>
> però ora il record selezionato è giallo e TUTTI gli altri sono blu o magenta a seconda del sesso del paziente  selezionato...

With ctl
     .FormatConditions.Delete
     .FormatConditions.Add acExpression, acEqual, "idpaziente=" &
Me!IDPaziente
     .FormatConditions(0).BackColor = vbYellow

     .FormatConditions.Add acExpression, acEqual, "Sesso = 'M'"
     .FormatConditions(1).BackColor = vbBlue

     .FormatConditions.Add acExpression, acEqual, "Sesso = 'F'"
     .FormatConditions(2).BackColor = vbMagenta
End With

Meglio così?



title: selezionare record in maschera continua

text:
> Meglio così?
> --
> Ciao
> Karl
> *********
>
http://AccessDevCon.com

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

Perfetto!
Se mai dovessero fare una statua che rappresenti la gentilezza e la disponibilità, questa dovrebbe avere le fattezze di Karl Donaubauer.
Grazie ancora

BC


title: Tabelle pivot

author: LeoDuca

text:
A2000.
La mia tabella pivot presenta il campo Clienti come selezione di pagina,
il campo Ordini sulle colonne e il campo Prodotti sulle righe.
Clienti
                          Prodotti
Ordini        <costi dei prodotti>
Consideriamo il campo Ordini: la tabella pivot mi da la possibilità di
scegliere quali
visualizzare o meno utilizzando la lista che appare cliccando
sull'apposito controllo di
intestazione colonna. Mi aspetto che se cancello un ordine dal mio DB
questo scompaia
dalla sudetta lista, una volta riaperta e aggiornata la tabella pivot.
Ma ho scoperto che non è così.
Qualcuno sa dirmi se questo è normale o se c'è il modo di
porre rimedio all'inconveniente?
La tabella pivot  NON è salvata con i dati ed è (o meglio dovrebbe
essere
.... vedi post precedenti)
aggiornata all'apertura  (a mano :_( )
Grazie
---
Leo_duca
PS:
una volta cancellato l'ordine:
- il recordset di origine della tabella pivot è corretto (non presenta
l'ordine cancellato);
- la tabella funziona correttamente (l'ordine cancellato, anche se
presente nella lista
     di cui sopra con relativo segno di spunta, non viene preso in
considerazione ).


title: modifiche multiple

author: Christian

text:
Da qualche tempo uso Access 2002 SP3 ed SQL. Il mio problema è che ho
creato centinaia di query sql, sulle quali devo fare modifiche
multiple. Ora come ora non posso fare altro che andare una per una a
modificare lo stesso parametro, per esempio il nome di una tabella.
C'è un sistema per dirgli : <SOSTITUISCI SU TUTTE LE QUERY IL TALE
NOME TABELLA> ?. Grazie per l'aiuto e a presto.
christian.hamne...@mail.italgas.it


title: modifiche multiple

author: Alessandro Baraldi

text:
Christian ha scritto:

Fatti una Routinetta che cicla l'Insieme Querydefs in questo modo:
Public Function SostituisciQDF(OLDText as String, NEWText as string)
Dim qdf as QueryDef
For each qdf in CurrentDb.QueryDefs
    qdf.SQL=replace (qdf.sql, OLDText , NEWText)
Next
Ciao
@Alex


title: Importazione dati file di testo delimitato da TAB.

author: Fabrizio Alessandri

text:
Ciao a tutti..
Via codice importo in Access '97 dati da un file di testo delimitato da TAB
(unica formattazione disponibile), ma mi si presenta un prob. banale: il
carattere predefinito di Windows č il ";". Come posso fare per ovviare a
ciň? L'Az. distributrice di tali dati, ci suggerisce di convertire il file
suddetto con un'applicazioncina, prima di darlo in pasto alla routine di
importazione. Credo sia superfluo dire che la cosa non ci aggrada.
Premetto che ho dato un'occhiata in giro (anche in questo forum tramite
Google-gruppi), ma senza esito.
Confido nella Vs. saggezza.
Grazie anticipatamente.


author: Sergio MAZZA

text:
"Fabrizio Alessandri" <
eteual_...@tin.it
> ha scritto nel messaggio
news:iMnpi.73007$%k.21...@twister2.libero.it...
> Ciao a tutti..
> Via codice importo in Access '97 dati da un file di testo delimitato da
> TAB (unica formattazione disponibile), ma mi si presenta un prob. banale:
> il carattere predefinito di Windows è il ";". Come posso fare per ovviare
> a ciò? L'Az. distributrice di tali dati, ci suggerisce di convertire il
> file suddetto con un'applicazioncina, prima di darlo in pasto alla routine
> di importazione. Credo sia superfluo dire che la cosa non ci aggrada.
> Premetto che ho dato un'occhiata in giro (anche in questo forum tramite
> Google-gruppi), ma senza esito.
> Confido nella Vs. saggezza.
> Grazie anticipatamente.
Devi solo confidare nell'help di access F1, perché puoi indicare qual'è il
separatore dei dati; e oltretutto puoi salvare la specifica per poi
richiamarla quando vuoi...
Ciao.
--
Sergio MAZZA


text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:f852ti$7is$1...@tdi.cu.mi.it...
> "Fabrizio Alessandri" <
eteual_...@tin.it
> ha scritto nel messaggio
> news:iMnpi.73007$%k.21...@twister2.libero.it...
>> Ciao a tutti..
>> Via codice importo in Access '97 dati da un file di testo delimitato da
>> TAB (unica formattazione disponibile), ma mi si presenta un prob. banale:
>> il carattere predefinito di Windows č il ";". Come posso fare per ovviare
>> a ciň? L'Az. distributrice di tali dati, ci suggerisce di convertire il
>> file suddetto con un'applicazioncina, prima di darlo in pasto alla
>> routine di importazione. Credo sia superfluo dire che la cosa non ci
>> aggrada.
>> Premetto che ho dato un'occhiata in giro (anche in questo forum tramite
>> Google-gruppi), ma senza esito.
>> Confido nella Vs. saggezza.
>> Grazie anticipatamente.
>
>
> Devi solo confidare nell'help di access F1, perché puoi indicare qual'č il
> separatore dei dati; e oltretutto puoi salvare la specifica per poi
> richiamarla quando vuoi...
>
> Ciao.
> --
> Sergio MAZZA
Ciao Sergio,
ho cercato (prima e dopo il post) nell'help, ma non ho trovato. Ti pregherei
di essere piů esplicito (nome funzione), o in alternativa un link.
Grazie ancora e perdona se il tema č banale.
Fabrizio Alessandri


text:
"Fabrizio Alessandri" <
eteual_...@tin.it
> ha scritto nel messaggio
news:Mnopi.73051$%k.21...@twister2.libero.it...
> Ciao Sergio,
> ho cercato (prima e dopo il post) nell'help, ma non ho trovato. Ti
> pregherei di essere più esplicito (nome funzione), o in alternativa un
> link.
> Grazie ancora e perdona se il tema è banale.
>
> Fabrizio Alessandri
(VBA) Metodo TransferText.
File - Carica dati esterni - Importa; seguendo il percorso guidato troverai
un bottone che ti permette di salvare la specifica di importazione che hai
indicato...
Ciao.
--
Sergio MAZZA


text:
> (VBA) Metodo TransferText.
>
Era quello che cercavo.
Lo provo subito e ti faccio sapere!
> Ciao.
> --
> Sergio MAZZA
Grazie 1.000!
Fabrizio Alessandri


title: problema stampa etichette con vecchia panasonic

author: Arold

text:
un mio cliente a una vecchia panasonic ad aghi di quelle piccole
stiamo cercando di stampare delle etichette lui possiede un modulo
continuo di piccole etichette di 7,1 cm x 3,5 cm
accade che:
quando da access lancio la stampa stampa l'etichetta e poi ne scorre
tante quante ce ne stanno in un A4.
ho provato anche a mettere interruziione di pagina e mettere la pagina
misure
personalizzae in proprietą della stampante ma nulla
sapete se c'č un comando che dopo la stampa dice alla stampante FERMATI!!!!
Grazie a tutti.


author: George

text:
"Arold" <
simb...@libero.it
> ha scritto nel messaggio
news:bekov8$38f$1...@lacerta.tiscalinet.it...

Definisci un formato carta personalizzato delle dimensioni dell'etichetta e
crea il report di riflesso.
Ciao.


text:
> Definisci un formato carta personalizzato delle dimensioni dell'etichetta
e
> crea il report di riflesso.
> Ciao.
>
>
crea il report di riflesso cosa vuol dire? Grazie.


text:
"Arold" <
simb...@libero.it
> ha scritto nel messaggio
news:belo5s$9qm$1...@lacerta.tiscalinet.it...

Crei un report in cui il formayo pagina è quello che hai definito e
l'etichetta è una pagina intera.
OK?


title: Ordinamento numeri fattura in campo testo su maschera

author: robb

text:
Salve,
visto che le mie fatture sono numerate in un campo testo, nella forma
"numero/aa" (es. 2/06), ho dovuto usare, riadattandola, la seguente
formula, proposta da Roberto in un altro messaggio, per tenerle
ordinate in una query:
"OrdinaFatture:
Val(Left([NumeroFattura];InStr([NumeroFattura];"/")+1))".
Nella query tutto a posto.
Il problema sorge nella maschera collegata alla query. In questa
maschera ho configurato l'ordinamento dei numeri delle fatture tramite
l'evento click sull'etichetta "Et_NumeroFattura" in questo modo (altro
consiglio trovato su un altro messaggio):
Me.NumeroFattura.SetFocus
DoCmd.RunCommand acCmdSortAscending
Il problema è che, quando nella maschera clicko sull'etichetta, i
numeri delle fatture tornano ad ordinarsi come testo, cioè 1/06 -
10/06 - 100/06 - 2/06 - 21/06 - 3/06 - 4/06 ecc.
Come posso risolvere?
Grazie.


text:
robb ha scritto:

Non ho capito se hai generato un campo calcolato nella query al quale
hai assegnato
la formula sopracitata...!
Il metodo che hai usato, va ad agire sul campo TESTO e pertanto ordina
in modo erroneo
per la tua esigenza, ma corretto per il tipo di campo.
A questo punto se tu avessi generato un campo calcolato in Query
l'azione di ordinamento
la dovresti eseguire su quel campo, ma con il metodo che usi deve avere
il FOCUS
cosa che invece sarà poco probabile in quanto farai un campo NASCOSTO.
Invece di usare Runcommand usa la proprietà ORDERBY e ORDERBYON
applicandola
al campo calcolato.
Nella Query hai il campo calcolato:
"OrdinaFatture:Val(Left([NumeroFattura];InStr([NumeroFattura];"/")+1))"
Nella Form inserisci un controllo associato a tale campo ma rendilo
Nascosto.
Su Click del pulsante Ordina scrivi:
Me.OrderByOn=False
Me.OrderBy="[OrdinaFatture]"  ' se lo vuoi discendente metti DESC
Me.OrderByOn=True
Ciao
@Alex


text:

Ti ringrazio molto. Funziona alla perfezione!
Un'ultima cosa, sempre se si può fare. Sempre nella stessa maschera,
ho aggiunto la proprietà OrderBy, come da te specificata, anche al
campo "NomeCliente" e funziona perfettamente. Solo che vorrei che i
numeri delle fatture, a parità di Cliente, venissero ordinati a loro
volta in ordine crescente, cosa che non avviene.
Ho provato ad usare
Me.OrderByOn=False
Me.OrderBy="[NomeCliente]", "[OrdinaFatture]"
Me.OrderByOn=True
ma, giustamente, non funziona :)
C'è qualche modo per ottenere questo tipo di "doppio ordinamento"?


text:
robb ha scritto:
> Ti ringrazio molto. Funziona alla perfezione!
>
> Un'ultima cosa, sempre se si può fare. Sempre nella stessa maschera,
> ho aggiunto la proprietà OrderBy, come da te specificata, anche al
> campo "NomeCliente" e funziona perfettamente. Solo che vorrei che i
> numeri delle fatture, a parità di Cliente, venissero ordinati a loro
> volta in ordine crescente, cosa che non avviene.
>
> Ho provato ad usare
>
> Me.OrderByOn=False
> Me.OrderBy="[NomeCliente]", "[OrdinaFatture]"
> Me.OrderByOn=True
>
> ma, giustamente, non funziona :)
>
> C'è qualche modo per ottenere questo tipo di "doppio ordinamento"?
Ma l'Help cosa dice ...?
Me.OrderBy="[NomeCliente],[OrdinaFatture]"
Ciao
@Alex


text:

Pardon, non avevo fatto caso alle doppie virgolette. Grazie!


title: hardware e sowftware

author: Brown

text:
Ho la necessità di fare un applicativo in access per memorizzare tuttii
dati del computer che lo esegue in modo da tener traccia di tutto il
parco macchine.
Cercando in
sitocomune.com
 ho trovato molto su
risoluzione video
sistema operativo
indirizzo IP
nome computer
nome utente
stampante predefinita
RAM
spazio libero sul disco
Mi interesse però avere qualche informazione sull'hardware:
elenco dell'HW montato
scheda di rete (con indirizzo fisico)
...una sorta di gestione periferiche di windows insomma che però sia
multipiattaforma e funzioni quindi su tutti i S.O.
Sto chiedendo troppo o sfruttando qualche API tutto ciò è possibile ??
Grazie
-Brown-


title: hardware e sowftware

author: Gabriele Bertolucci

text:
> Ho la necessità di fare un applicativo in access per memorizzare
> tuttii dati del computer che lo esegue in modo da tener traccia di
> tutto il parco macchine.
>
> Mi interesse però avere qualche informazione sull'hardware:
> elenco dell'HW montato
> scheda di rete (con indirizzo fisico)
> ...una sorta di gestione periferiche di windows insomma che però sia
> multipiattaforma e funzioni quindi su tutti i S.O.
> Sto chiedendo troppo o sfruttando qualche API tutto ciò è possibile ??
Non ci ho mai lavorato direttamente, ma puoi ottenere molto con la Windows
Management Instrumentation.
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnwmi/html/msdn_wmiwp.asp
--
PBsoft di Gabriele Bertolucci
www.pbsoft.it
skype: pbsoftsolution


title: Access euro format

author: Nicola De Tomasi

text:
Per i decimali dell'euro utilizzando access ottengo
risultati diversi con access 97 ed access 2000.
Perchè in access 97 il risultato di format$(1.555,"0.##")
è uguale a 1,55 ed in access 2000 il risultato di
format$(1.555,"0.##") è uguale a 1,56 ?
Ringrazio in anticipo.
--
Posted from
a-bu16-39.tin.it
 [213.45.130.6]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Access euro format

author: The-real-Isaac

text:
"Nicola De Tomasi" <
nicola...@inwind.it
> ha scritto nel messaggio
news:8b11cfdb5c0070780fd...@mygate.mailgate.org...

Secondo me ti stai concentrando sul problema sbagliato. Arrotonda tu prima
il dato (vedi sul sito comune) e poi non avrai problemi di visualizzazione.
Altrimenti disorienterai l'operatore perché poi quell'importo (visualizzato
1,55 o 1,56 -  poco importa) agli effetti di ogni calcolo sarà sempre 1,555.
Ciao
--
Alberto


title: Esportare dati con word problemi con IIf

author: tiziano

text:
Ciao a tutto il ng,
ho trovato su sitocomune la possibilità di esportare i dati in word.
il mio problema è legato al fatto che in alcuni campi ho un valore asterisco
per non lasciare il campo vuoto e vorrei che nella stampa il valore non
venisse visualizzato.
La stringa originale è :
wrd.Selection.TypeText " (tel. "&IIf(IsNull(me.NumTel), "<tel segreteria>",
me.NumTel)&_
",Fax"& IIf(IsNull(Me.NumFax), "<fax segreteria>", Me.NumFax)&")"
ora io desidero:
se il valore è uguale a asterisco non venga visualizzato nulla in caso
contrario scriva il valore presente nel controllo
Wrd.Selection.TypeText "IIf (me.forma=" * "), " < pippo > ",me.forma"
dove sbaglio?
Grazie
Tz

--------------------------------
Inviato via
http://arianna.libero.it/usenet/


author: Marco Pizzamiglio

text:
tiziano ha scritto:
> Ciao a tutto il ng,
> ho trovato su sitocomune la possibilità di esportare i dati in word.
> il mio problema è legato al fatto che in alcuni campi ho un valore asterisco
> per non lasciare il campo vuoto e vorrei che nella stampa il valore non
> venisse visualizzato.
> La stringa originale è :
> wrd.Selection.TypeText " (tel. "&IIf(IsNull(me.NumTel), "<tel segreteria>",
> me.NumTel)&_
> ",Fax"& IIf(IsNull(Me.NumFax), "<fax segreteria>", Me.NumFax)&")"
> ora io desidero:
> se il valore è uguale a asterisco non venga visualizzato nulla in caso
> contrario scriva il valore presente nel controllo
> Wrd.Selection.TypeText "IIf (me.forma=" * "), " < pippo > ",me.forma"
> dove sbaglio?
> Grazie
> Tz
Quella riga dovrebbe darti errore di compilazione.
Non ci vanno gli apici prima dell'iif e alla fine, e non ci vanno gli
spazi a fianco all'asterisco a meno che non ci siano anche nel campo forma.
La sintassi è iif(condizione, valore se vero, valore se falso) Vedi help
<F1>.
Una di queste due dovrebbe andarti bene, il risultato è equivalente:
Wrd.Selection.TypeText IIf(me.forma="*","",me.forma)
If me.forma<>"*" then
  Wrd.Selection.TypeText me.forma
else
  Wrd.Selection.TypeText ""
end if
Ciao.
-Marco-
--
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


text:
							Il 27 Apr 2006, 11:48,
marco.pi...@gmail.com
 (Marco Pizzamiglio) ha
scritto:

Grazie ora funziona a meraviglia...
Ciao



title: Ufficiale: Novità su Cisa

author: MA

text:
Come anticipato

--
--
Massimiliano Amendola
www.accessgroup.it
Il sito italiano di
svilupatori Access
www.donkarl.com/it/cisa


title: Ufficiale: Novità su Cisa

text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:ejjq4n$uuh$1...@tdi.cu.mi.it...
Come anticipato

[risposta]
Il Re è morto! Viva il Re!
Ciao.
--
Sergio MAZZA


title: Ufficiale: Novità su Cisa

author: Pablitomf (Maurizio Facciuti)

text:
>"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
>news:ejjq4n$uuh$1...@tdi.cu.mi.it...
>Come anticipato
Notizie Ufficiali su
WWW.ACCESSGROUP.IT
--
--
Ciao
Pablitomf (Maurizio Facciuti)
-----------------------------------------------------------------
Access: 97, 2000, XP e 2003
ASP
-----------------------------------------------------------------
http://www.accessgroup.it/
-----------------------------------------------------------------
Il mio motto :
""Non mi fido molto delle statistiche, perchč un uomo con la testa nel forno
acceso e i piedi nel congelatore statisticamente ha una temperatura media."


qualcuno saprebbe gentilmente suggerirmi come fare per :
aggiornare da una sottomaschera il contenuto di un campo in tabella in un
elenco di
record determinato ?
ovvero:  ho  disegnato una maschera con sottomaschera nella quale visualizzo
con maschere multiple alcuni record basandomi su una query,
una volta ricalcolato il valore dei campi tramite  operazioni sulla
sottomaschera li visualizzo  correttamente ma devo inserirli nella tabella
specificata.
ho provato ma mi viene aggiornato solo il primo dei record della
sottomaschera!
come posso fare a forzare tutti i valori visualizzati a "ritornare" nei
rispettivi record?
nella fattispecie,  estraggo una serie di record tramite query da una
tabella di componenti.
selezionando un prodotto nella maschera (ad es.una radio), automaticamente
appaiono nella sottomaschera i relativi componenti con le quantità presenti
in magazzino (2 transistor necessari per la radio e 50 presenti in
magazzino, 1 altoparlante necessario per la radio e 30 presenti in
magazzino, ...ecc..)
quando imposto sulla maschera il numero di radio che voglio realizzare mi
compaiono correttamente nella sottomaschera i relativi campi con i valori
giusti (se chiedo 2 radio, appariranno nelle maschere continue della
sottomaschera: 4 transistor necessari e 50 pim, 2 altoparlanti nec. e 30 pim
ed inoltre mi appaiono in un altro campo ricalcolato i residui, cioè 46
residui di transistor e 28 residui di altoparlanti )  con
scelgo quante radio produrre:  inserisco txt_quantita_da_produrre ;
(proprietà di ciascun componente è "scorta" valore in tabella)
componenti necessari =
[quantita_componente]*Maschere!Frm_CaricoScarico_Manufatti!txt_quantita_da_produrre
;
txt_residuo =[Scorte]-[quantita_da_produrre]
ricalcolo tutti i campi per benino nella visualizzazione maschere continue
della sottomaschera.
fin qui tutto ok.
ma se voglio scrivere  i valori che ho ricalcolato e rimetterli nella
tabella con
Forms!Frm_CaricoScarico_manufatti!Sottomaschera_Composizione_Manufatti!Scorte.Value
=
Forms!Frm_CaricoScarico_manufatti!Sottomaschera_Composizione_Manufatti!txt_residuo.Value
mi aggiorna in tabella SOLO il PRIMO record ! (!!!!!!)
come faccio a richiedere di cambiare ciascun record e non solo il primo ???
help
mm


title: aggiornare da una sottomaschera il contenuto di un campo in tabella

text:
"madmax71" <
madm...@geocities.com
> ha scritto nel messaggio news:45cbadaa$0$26040$4faf...@reader5.news.tin.it...

Puoi utilizzare la proprietà recordsetclone della (sub)form; cicli per ogni record modificando il valore del campo...
Ciao.
--
Sergio MAZZA


text:
grazie,
ho provato con il ciclo:
while  rst not EOF
   rst.movefirst
   <operazione di confronto sul record>
   rst.movenext
end while
sembra funzionare.
ciao
m
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:eqnnr7$mse$1...@tdi.cu.mi.it...



text:
grazie,
ho risolto con proprio col recordset.
m
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:eqnnr7$mse$1...@tdi.cu.mi.it...



title: Riproporre la data dell'ultimo record

text:
Ciao
    č possibile far riproporre la data inserita nel record precedente ? Se
sě sareste cosě gentili da darmi una dritta.
Riciao e grazie
        Bruno


title: Riproporre la data dell'ultimo record

author: sv

text:
Bruno-S95 ha scritto:
> Ciao

> Riciao e grazie
>         Bruno
Sul Sito Comune, Sezione Queries, scaricati il database di esempio "Esempi
di utilizzo e creazione di queries".
Guarda l'esempio "Topic Referring to a Field in the Previous or Next
Record".
Le spiegazioni si trovano a:
http://support.microsoft.com/support/kb/articles/q101/0/81.asp
--
rgrds
SC
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Riproporre la data dell'ultimo record

text:
"sv" <
salv...@nospbox.enel.it
> ha scritto nel messaggio
news:c9srdp$6ij$1...@news.newsland.it...
> Bruno-S95 ha scritto:
>
> > Ciao
>
> >     è possibile far riproporre la data inserita nel record precedente ?
Se
> > sì sareste così gentili da darmi una dritta.
>
> > Riciao e grazie
>
> >         Bruno
>
> Sul Sito Comune, Sezione Queries, scaricati il database di esempio "Esempi
> di utilizzo e creazione di queries".
> Guarda l'esempio "Topic Referring to a Field in the Previous or Next
> Record".
>
> Le spiegazioni si trovano a:
>
>
http://support.microsoft.com/support/kb/articles/q101/0/81.asp
>
> --
> rgrds
> SC
>
-------------------------
Proprio non riesco a far uscire di defoult la data del record precedente +
un giorno. Eppure mi sembra di aver seguito correttamente le due istruzioni.
Perchééé ?
1) provato sia con + che con - .
   =DLookUp("[Field]","Table","[ID]=Forms![Form1]![ID]-1")2) Ripetere un
valore del record precedente in una form. Sito comune.   Federico
LucianiMe.txtAnno.DefaultValue =  "'" & Me.txtAnno.Value & "'"
'(doppioapice-apice-doppioapice)
 Ciao .. Bruno


title: Riproporre la data dell'ultimo record

text:
Bruno-S95 ha scritto:



Se ti trovi in un nuovo record, e l'ID nella tua maschera è "contatore",
Dlookup non può funzionare.
Prova ad inserire, pertanto, questo codice sull'evento "DopoAggiornamento"
di un controllo che precede il tuo controllo data.
Supponendo:
Tabella=[MiaTabella]
Maschera= [MiaMaschera]
Controllo=[MioControllo]
Data=[MiaData]
abbiamo:
Me.MiaData = DLookup("[MiaData]", "MiaTabella", "[ID]=" & Me.ID - 1)



title: Riproporre la data dell'ultimo record

author: Fabio Gulotta

text:
"Bruno-S95" <
mus...@virgilio.it
> ha scritto nel messaggio
news:HK5wc.285917$hc5.12...@news3.tin.it...

parlando di maschere/sottomaschere associate,
personalmente utilizzo il comando sendkeys
per riprodurre la combinazione di tasti CTRL+2
che appunto in access serve per ricopiare il valore dell'ultimo record
inserito.
Fammi sapere .... ciao
Fabio


title: Riproporre la data dell'ultimo record

author: Lorenzo

text:
Il problema può essere nella formattazione del campo. Prova:
Campo.DefaultValue = Format(Campo, "yyyy-mm-dd hh:nn:ss")
"sv" <
salv...@nospbox.enel.it
> ha scritto nel messaggio
news:ca3uet$53r$1...@news.newsland.it...



title: Ftp

author: Gian

text:
Ciao a tutti,
ho creato in una maschera un pulsante "carica" che, con EseguiApplicazione,
esegue un file Batch  "c:\carica.bat" che usa comandi Ftp:
[carica.bat]
ftp -s:carica.txt
ftp.dragonflysolution.it
[carica.txt]
dragonflysolution.it
nonveladico
send magazzino.mdb
quit
Se lo eseguo direttamente da windows funziona, se uso il pulsante creato mi
apre la schermata della Shell e la chiude immediatamente senza riuscire a
leggere il contenuto.
Qualcuno sa dirmi come risolvere il problema?
Grazie
Gianfranco


title: Ftp

author: eSQueL

text:
"Gian" <gia...@NONPIUlibero.it> ha scritto nel messaggio
news:bqpZg.1551$fE3....@tornado.fastwebnet.it...

Prova a togliere il quit, chissà che butti bene.
Ciao.
eSQueL


title: Ftp

text:
Già fatto.....e anche in quel caso chiude immediatamente la finestra.
grazie
"eSQueL" <
eSQ...@libero.it
> ha scritto nel messaggio
news:3fvZg.8112$uv5....@twister1.libero.it...



title: Ftp

author: Alessandro Baraldi

text:
Gian ha scritto:

Non ho capito cosa dovrebbe fare....??
Deve eseguirlo ed attenderne il termine...??
@Alex


title: Ftp

text:


@Alex
____________________________________________
Il file  .bat carica sul server il file magazzino.mdb sovrascrivendolo, con
l'adsl impiega 16 secondi e poi chiude la finestra di Dos.
Dragonlfy.it e nonveladico sono i codici utente e pwd per accedere via Ftp.
Ciao e grazie dell'attenzione.
Gian


title: Ftp

text:
Gian ha scritto:
[CUT]
> Il file  .bat carica sul server il file magazzino.mdb sovrascrivendolo, con
> l'adsl impiega 16 secondi e poi chiude la finestra di Dos.
> Dragonlfy.it e nonveladico sono i codici utente e pwd per accedere via Ftp.
> Ciao e grazie dell'attenzione.
>
> Gian
Va bene, allora qual'è il problema...?
Vuoi che si attenda il tempo di esecuzione del BAT....?
Sub MyShell(ByVal Percorso As String, _
            ByVal windowstyle As Integer, _
            ByVal Attendi As Boolean)
Dim wshell As Object
Set wshell = CreateObject("WScript.shell")
wshell.Run Percorso, windowstyle, Attendi
Set wshell = Nothing
End Sub
Al posto di Percorso passa la stringa che esegue il Bat, si tratta di
una Shell alla fine...eseguita in modalità Sincrona se passerai
Attendi=true
@Alex


title: Ftp

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:1161255875.3...@k70g2000cwa.googlegroups.com...
Gian ha scritto:





@Alex
________________________
il problema è che non esegue il file Bat direttamente da Access.
Apre la finestra Dos e la chiude direttamente senza eseguire il comando FTP.
Se creo un altro file Bat senza comandi Ftp lo carica tranquillamente.
Non capisco il perchè...
Chiederei a qualcuno di fare una prova.
Ciao e grazie
Gian
Ciao
Gian


title: Ftp

author: Lorenzo(pyx)

text:
In news:mPJZg.1452$
pL3....@tornado.fastwebnet.it
,
Gian <gia...@NONPIUlibero.it> typed:
> "Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
> news:1161255875.3...@k70g2000cwa.googlegroups.com...
>
> il problema č che non esegue il file Bat direttamente da Access.
> Apre la finestra Dos e la chiude direttamente senza eseguire il
> comando FTP. Se creo un altro file Bat senza comandi Ftp lo carica
> tranquillamente. Non capisco il perchč...
Ciao,
prova cosě:
Shell("cmd /K Path\Nomefilebat.bat")
La finestra dos dovrebbe rimanere aperta,
vedi se ti da qualche messaggio, magari
non trova il file con le istruzioni ftp.
>
> Ciao
> Gian
--
Lorenzo


title: Ftp

text:
"Lorenzo(pyx)" <
lorenzoTha...@pyx.it
> ha scritto nel messaggio
news:VrM_g.12880$uv5....@twister1.libero.it...

Grazie dell'attenzione,
ma quello che non capisco č perchč se il file bat lo eseguo direttamente
funziona e se lo faccio partire tramite access no.
Le istruzioni son giuste, anche provando la tua soluzione.
I misteri di Access...
Ho postato una sequenza di comandi che si possono provare per caricare un
file sul web.
Chiederi a qualcuno di postare un'altro modo per caricare un file secondario
database.mdb su uno spazio ftp.
Grazie
Ciao
Gian


title: Ftp

text:
In news:Mc%_g.7315$
pL3....@tornado.fastwebnet.it
,
Gian <gia...@NONPIUlibero.it> typed:

Se stai inviando via ftp lo stesso database dal quale
esegui il codice e' molto probabile che ti dia un errore
di accesso negato, questo perche' il file e' in uso.
Se esegui l'istruzione shell("cmd /K ....") questo
lo vedi nella finestra dos che rimane aperta.
[...]
>
> Ciao
> Gian
--
Lorenzo


title: Ftp

author: Sergio MAZZA

text:
"Gian" <gia...@NONPIUlibero.it> ha scritto nel messaggio
news:Mc%_g.7315$pL3....@tornado.fastwebnet.it...
>
> Grazie dell'attenzione,
> ma quello che non capisco è perchè se il file bat lo eseguo direttamente
> funziona e se lo faccio partire tramite access no.
> Le istruzioni son giuste, anche provando la tua soluzione.
> I misteri di Access...
>
> Ho postato una sequenza di comandi che si possono provare per caricare un
> file sul web.
> Chiederi a qualcuno di postare un'altro modo per caricare un file
> secondario database.mdb su uno spazio ftp.
> Grazie
>
> Ciao
> Gian
Utilizza un controllo ocx free:
Es.
'---
'--> lo trovi:
http://activex.sourceforge.net/esftp.html
'--> utilizzo:
'--> Transfer EsFtp32.ocx to your \windows\system or \winnt35\system32
directory and register it by executing the command:
'--> RegSvr32 \Windows\System\EsFtp32.ocx
'--> RegSvr32.exe can be found on the Visual Basic 4.0 CD-ROM and in our dll
archive (
www.eurosource.se
).
'--> If RegSvr32.exe fails, it's probably because you don't have the MFC 4.0
DLL library installed on your system.
'--> This is available from many sources on the Internet including our ftp
archive as MFCDLLS.ZIP. Regsvr32.exe is also included in this archive.
'--> If you want to check if you already got the files in mfcdlls.zip they
are
    Dim EsFtp1 As EsFtp
    Set EsFtp1 = CreateObject("EsFtp.EsFtpCtrl.1")
DoEvents
    EsFtp1.Port = 21
    EsFtp1.RemoteHost = "
ftp.miosito.it
"
    EsFtp1.UserName = "" & "miouser"
    EsFtp1.password = "" & "miapass"
If EsFtp1.Connect Then
    If EsFtp1.ChangeWorkingDir("cartella") = True Then
        If EsFtp1.GetRemoteFile("nomeFile.boh", "C:\nomeFile.boh", "I") =
True Then
            MsgBox "Scaricato."
        Else
            MsgBox "Non scaricato."
        End If
    Else
        MsgBox "Errore nel cambio directory"
    End If
Else
    MsgBox "Connessione fallita"
End If
EsFtp1.Disconnect
MsgBox "Disconnesso."
Set EsFtp1 = Nothing
'---
Ciao.
--
Sergio MAZZA


title: Ftp

text:
"Sergio MAZZA" <
sergi...@tiscali.it
> ha scritto nel messaggio
news:ehi55b$3f7$1...@tdi.cu.mi.it...
> "Gian" <gia...@NONPIUlibero.it> ha scritto nel messaggio
> news:Mc%_g.7315$pL3....@tornado.fastwebnet.it...
>>
>> Grazie dell'attenzione,
>> ma quello che non capisco č perchč se il file bat lo eseguo direttamente

Ora provo, se non mi perdo via...
Thanx
Gian


title: Run-time di Access 97

author: Diego

text:
Ho installato su una macchina un'applicazione Access 97 con il pacchetto
Microsoft ODE Tools.
L'applicazione in esecuzione non genera errori, l'unico problema riscontrato
è quando esco dall'applicativo tramite il comando Access Basic DoCmd.Quit ;
mi rimane in esecuzione l'applicazione (l'icona rimane visualizzata nella
barra dei task) e l'unica maniera per chiuderla è uccidere il task.
Chi sa darmi una mano per risolvere questo noioso errore.
Grazie della collaborazione.
Diego Milani


title: Run-time di Access 97

author: Paolo Beltrame

text:
Ciao Diego,
> L'applicazione in esecuzione non genera errori, l'unico problema
riscontrato
> è quando esco dall'applicativo tramite il comando Access Basic DoCmd.Quit
;
> mi rimane in esecuzione l'applicazione (l'icona rimane visualizzata nella
> barra dei task) e l'unica maniera per chiuderla è uccidere il task.
> Chi sa darmi una mano per risolvere questo noioso errore.
Io uso Application.Quit per chiudere Access.
L'applicazione rimane a volte aperta quando alcuni oggetti
non sono stati chiusi, es. i recorset, i database ecc.
    Paolo


title: Run-time di Access 97

author: VT @ work

text:
Il Mon, 14 Aug 2000 11:17:49 +0100, "Diego" <
dmi...@invalleee.it
>
scrisse:
>(.....)
>L'applicazione in esecuzione non genera errori, l'unico problema riscontrato
>è quando esco dall'applicativo tramite il comando Access Basic DoCmd.Quit ;
>mi rimane in esecuzione l'applicazione (l'icona rimane visualizzata nella
>barra dei task) e l'unica maniera per chiuderla è uccidere il task.
>Chi sa darmi una mano per risolvere questo noioso errore.
>(.....)
Per impedire che si verifichi quanto hai osservato, è bene osservare
tre regole (se qualcuno ne conosce altre, ben venga)
1) Chiudere tutti gli oggetti recordset, database ecc.
2) "Distruggere" tutti gli oggetti creati da codice
Per esempio:
dim rs as recordset
set rs = currentdb().openrecordset("Tabella")
.....
rs.close		' Chiude l'oggetto
set rs = nothing	' Distrugge l'oggetto
3) Scrivere esplicitamente le condizioni di verifica di variabili
booleane
Istruzione sconsigliata:
If varBooleana then
Istruzione preferibile:
If varBooleana =True then
Vincenzo Turturro
----------------------------------
Niuna impresa, per minima che sia,
può avere cominciamento e fine
senza queste tre cose:
e cioè senza sapere,
senza potere,
senza con amore volere
(Anonimo fiorentino, XIV sec.)
------------------------------


title: Run-time di Access 97

author: Paolo Holzl

text:
>L'applicazione in esecuzione non genera errori, l'unico problema riscontrato
>è quando esco dall'applicativo tramite il comando Access Basic DoCmd.Quit ;
>mi rimane in esecuzione l'applicazione (l'icona rimane visualizzata nella
>barra dei task) e l'unica maniera per chiuderla è uccidere il task.
>Chi sa darmi una mano per risolvere questo noioso errore.
>
>Grazie della collaborazione.
L'errore e' dato da un errore che abbiamo denominato l'infame
(dovrebbe esserci nelle FAQ).
Riassumendo e' un baco di Access che si genera quando vi e' una
istruzione del tipo IF FINITO THEN considerando FINITO come una check
box o un radio button, basta scrivere IF FINITO=-1 THEN oppure IF
FINITO=TRUE THEN.
Controlla tutte le IF che hai scritto.
----------------------------------------------------------
Paolo Hölzl
Gruppo Tekup Software developer (Bologna)
----------------------------------------------------------
ATTENTION!, antispam
For reply, substitute xxx with gruppotekup


title: Pippo

author: pippo

text: Pippo!


title: Pippo

text:
Il 9 May 2001 12:33:17 GMT, "pippo" <
pi...@pippo.it
> scrisse:
>(.....)
>Pippo!
Topolino !
Vincenzo Turturro
---------------------------------------------------------
Se no diventiamo tutti **** dai portatili o peggio ancora
provetti poeti fiorentini come vturturro.
(Cosě disse Ivan Lelli Ven 25 Aug 2000 09:34:52 +0200)
---------------------------------------------
il sito comune di it.comp.appl.access:
http://www.sitocomune.com/
---------------------------------------------
... e quello di it.comp.as400:
http://www.faq400.com/
---------------------------------------------


title: cambiare pagina in un report

author: superd

text:
ciao a tutti, sapete dirmi come posso fare quando creo da codice un report
in prewiew, a far sě che venga mostrata una certa pagina, la 3 o la 10 ecc
ciao grazie
dario


title: Problema con stampa di report

author: Mario

text:
Salve a tutti,
ho un problema per quanto riguarda la stampa di un report su una
stampante ad aghi EPSON LX 300+.
Una volta impostati l'altezza e la largezza del foglio e quindi poi dei
margini, la stampa di piů di 2 pagine consecutive non funziona, nel
senso che la priuma e la seconda pagina vengono stampati correttamente,
cioč alla giusta posizione sul foglio da compilare.
Il report č composto da:
Intestazione di report
Intestazione di pagina
Corpo
Pič di pagina
Dunque alla stampa della terza pagina i dati vengono stampati molto piů
sotto di quanto doveva essere, sfasando tutto.
Cosa posso fare per risolvere il problema ?
Vi ringranzio.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Problema con stampa di report

author: Mario Longo

text:
Dimenticavo di dirvi che
i fogli sono a modulo continuo...



title: Problema con stampa di report

author: Eleonora

text:
Il 31 Gen 2004, 14:59, "Mario" <
qpj...@tin.it
> ha scritto:
> Salve a tutti,
> ho un problema per quanto riguarda la stampa di un report su una
> stampante ad aghi EPSON LX 300+.
>
banalmente.. hai controllato sia l'impostazione della stampante *magari ha
degli sw da settare* e dell'impostazione pagina del reoprt di Access?
ciao
eleonora
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: Problema con stampa di report

author: Carlo Costarella

text:
"Mario Longo" <
qpj...@tin.it
> ha scritto nel messaggio
news:d6dc1e0cd5d28793737...@mygate.mailgate.org...
> Dimenticavo di dirvi che
>
> i fogli sono a modulo continuo...
>
>
>
Hai impostato il foglio a formato lettera nella stampante? (21x27,9). E' la
stampante predefinita?
Ciao, Carlo


title: Problema con stampa di report

text:
Le dimensione del foglio sono personalizzate, ma l'ho provate anche a
modulo legale, modulo legale/German.



title: Problema con stampa di report

text:
"Eleonora" <
eleonora28...@libero.it
> wrote in message
news:62Z94Z232Z103Y...@usenet.libero.it

La stampante non ha nessun sw da settare, per quanto riguarda
l'impostazione
della pagina, le ho provate dal moduloo legale al modulo personalizzato.
I margini inizialmente avevano un'impostazione che mi faceva
stampare una sola pagina correttamente, mentre la seconda iniziava da
piů
sotto, poi ho aggiustato i margini e la dimensione dell'intestazione
del report e tutto ha funzionato con due fogli a modulo continuo, ma
arrivati alla terza pagina si č sfasato tutto...



title: Problema con stampa di report

text:
La stampante non ha nessun sw da settare, per quanto riguarda
l'impostazione
della pagina, le ho provate dal moduloo legale al modulo personalizzato.
I margini inizialmente avevano un'impostazione che mi faceva
stampare una sola pagina correttamente, mentre la seconda iniziava da
piů
sotto, poi ho aggiustato i margini e la dimensione dell'intestazione
del report e tutto ha funzionato con due fogli a modulo continuo, ma
arrivati alla terza pagina si č sfasato tutto...



title: Problema con stampa di report

text:
Il 01 Feb 2004, 11:15, "Mario Longo" <
qpj...@tin.it
> ha scritto:
> "Eleonora" <
eleonora28...@libero.it
> wrote in message
>
news:62Z94Z232Z103Y...@usenet.libero.it
>
>> La stampante non ha nessun sw da settare, per quanto riguarda
> l'impostazione
> della pagina, le ho provate dal moduloo legale al modulo personalizzato.
.. ti posso portare la mia esperienza..
dovevo stampare da access su modulo continuo con un formato balordo..
se la stampante non supporta QUEL formato non si riesce a stampare
correttamente *almeno io non ci sono riuscita*.. fortunatamente la stampa
era semplice, senza fincature o ghirigori particolari; così ho risolto
esportando in word e poi, da WOrd, dando le esatte misure nell'impostazione
di pagina.
Certo, io conosco access pochissimo, ma nessuno è riuscito a farmi fare
qualcosa di meglio!
Cioa eleonora



title: Problema con stampa di report

text:
Grazie



title: "Mailto:" e "ValidationRule"

author: Woodrov

text:
ciao!
Due problemini da risolvere:
1) Ho un campo di tipo Collegamento Ipertestuale all'interno di una maschera.
    Voglio dare la possibilità di inserirvici un indirizzo di posta elettronica standard e fare in modo
   che se l'utente ci fa click, automaticamente viene lanciato il client di posta elettronica predefinito
   di quella macchina con già pronta una email con l'indirizzo contenuto nel campo.
   Per farla breve l'effetto del tag html  "MAILTO:"
   Come si fa?
2) Ho un campo (sempre nella stessa maschera) di tipo testo nel quale è presente una
   maschera di input (che fa un po' da regola di validazione).
   Voglio fare in modo che, se l'operatore inserisce i dati senza rispettare la maschera di input,
   appaia un messaggio che NON sia il messaggio predefinito di Access ma uno personalizzato
   che spieghi un po' meglio cosa bisogna fare e perché è uscito fuori l'errore.
   Ho provato a scrivere 4 linee di codice VBA a fronte dell'evento AfterUpdate del controllo associato
   CasellaDiTesto associato a quel campo;
   in pratica ho considerato la proprietà ValidationRule del controllo CasellaDiTesto e con un ciclo
   condizionale gli ho detto che se quella proprietà non era uguale ad una certa maschera,
   faceva apparire un messaggio di errore con MsgBox... ma non ha funzionato in quanto appare inizialmente
   il msg predefinito di Access e poi quello mio... insomma un bel pasticcio!
   Come mai?
grazie 1k!  :))
	luca


title: "Mailto:" e "ValidationRule"

author: Neo

text:
"Woodrov" <
luca....@tiscali.it
> ha scritto nel messaggio
news:10pi8v05ipdpfn4pm...@4ax.com...
> ciao!
>
> Due problemini da risolvere:
>
> 1) Ho un campo di tipo Collegamento Ipertestuale all'interno di una
maschera.
>     Voglio dare la possibilità di inserirvici un indirizzo di posta
elettronica standard e fare in modo
>    che se l'utente ci fa click, automaticamente viene lanciato il client
di posta elettronica predefinito
>    di quella macchina con già pronta una email con l'indirizzo contenuto
nel campo.
>    Per farla breve l'effetto del tag html  "MAILTO:"
>    Come si fa?
>
>
se non vuoi usare il codice puoi utilizzare le macro.. c'è la funzione
inviaoggetto.
ci sono tutte le opzioni di un messaggio e-mail.
> 2) Ho un campo (sempre nella stessa maschera) di tipo testo nel quale è
presente una
>    maschera di input (che fa un po' da regola di validazione).
>    Voglio fare in modo che, se l'operatore inserisce i dati senza
rispettare la maschera di input,
>    appaia un messaggio che NON sia il messaggio predefinito di Access ma
uno personalizzato
>    che spieghi un po' meglio cosa bisogna fare e perché è uscito fuori
l'errore.
>    Ho provato a scrivere 4 linee di codice VBA a fronte dell'evento
AfterUpdate del controllo associato
>    CasellaDiTesto associato a quel campo;
>    in pratica ho considerato la proprietà ValidationRule del controllo
CasellaDiTesto e con un ciclo
>    condizionale gli ho detto che se quella proprietà non era uguale ad una
certa maschera,
>    faceva apparire un messaggio di errore con MsgBox... ma non ha
funzionato in quanto appare inizialmente
>    il msg predefinito di Access e poi quello mio... insomma un bel
pasticcio!
>    Come mai?
>
> grazie 1k!  :))
>
> luca
inserisci il messaggio nell'opzione messaggio errore nella finestra propietà


title: "Mailto:" e "ValidationRule"

author: Roberto da casa

text:
"Woodrov" <
luca....@tiscali.it
> ha scritto nel messaggio
news:10pi8v05ipdpfn4pm...@4ax.com...
> ciao!
>
> Due problemini da risolvere:
>
> 1) Ho un campo di tipo Collegamento Ipertestuale all'interno di una
maschera.
>     Voglio dare la possibilità di inserirvici un indirizzo di posta
elettronica standard e fare in modo
>    che se l'utente ci fa click, automaticamente viene lanciato il client
di posta elettronica predefinito
>    di quella macchina con già pronta una email con l'indirizzo contenuto
nel campo.
>    Per farla breve l'effetto del tag html  "MAILTO:"
>    Come si fa?
Se il controllo associato al campo di tipo Collegamento ipertestuale si
chiama Pippo.
Se nella casella di testo Pippo digiti solo l'indirizzo di posta
elettronica.
A fronte dell'evento "Dopo aggiornamento" di Pippo genera il seguente codice
VBA:
Private Sub Pippo_AfterUpdate()
If Nz(Me!Pippo, "") <> "" Then
Me!Pippo = "#mailto: " & Me!Pippo & "#"
End If
End Sub
>
>
> 2) Ho un campo (sempre nella stessa maschera) di tipo testo nel quale è
presente una
>    maschera di input (che fa un po' da regola di validazione).
>    Voglio fare in modo che, se l'operatore inserisce i dati senza
rispettare la maschera di input,
>    appaia un messaggio che NON sia il messaggio predefinito di Access ma
uno personalizzato
>    che spieghi un po' meglio cosa bisogna fare e perché è uscito fuori
l'errore.
>    Ho provato a scrivere 4 linee di codice VBA a fronte dell'evento
AfterUpdate del controllo associato
>    CasellaDiTesto associato a quel campo;
>    in pratica ho considerato la proprietà ValidationRule del controllo
CasellaDiTesto e con un ciclo
>    condizionale gli ho detto che se quella proprietà non era uguale ad una
certa maschera,
>    faceva apparire un messaggio di errore con MsgBox... ma non ha
funzionato in quanto appare inizialmente
>    il msg predefinito di Access e poi quello mio... insomma un bel
pasticcio!
>    Come mai?
Di due l'una: o usi la maschera di input e quindi accetti il messaggio
standard di Access, oppure non usi la maschera di input e ti gestisci tutto
da codice VBA a fronte degli eventi "Su disttivato", "Prima di aggiornare"
e/o "Dopo aggiornamento" del controllo.
>
> grazie 1k!  :))
>
> luca
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: "Mailto:" e "ValidationRule"

text:


Per quanto riguarda la gestione della maschera di input tramite VBA,
posso utilizzare la proprietà InputMask del controllo?
grazie,
sei gentilissimo!


title: "Mailto:" e "ValidationRule"

text:


Le macro non le voglio utilizzare per principio.
Il messaggio della finestra proprietà non è associabile alla  maschera di input
ma solo al campo ValidoSe...


title: "Mailto:" e "ValidationRule"

text:
"Woodrov" <
luca....@tiscali.it
> ha scritto nel messaggio
news:hkti8v4eu25kon576...@4ax.com...
> On Tue, 01 Apr 2003 11:08:57 GMT, "Roberto da casa" <
r.ma...@libero.it
>
wrote:
[CUT]

Se usi la proprietà InputMask del controllo non ti cambia proprio nulla. ;-)
> grazie,
> sei gentilissimo!



title: "Mailto:" e "ValidationRule"

text:
On Tue, 01 Apr 2003 11:08:57 GMT, "Roberto da casa" <
r.ma...@libero.it
> wrote:
>Se il controllo associato al campo di tipo Collegamento ipertestuale si
>chiama Pippo.
>Se nella casella di testo Pippo digiti solo l'indirizzo di posta
>elettronica.
>
>A fronte dell'evento "Dopo aggiornamento" di Pippo genera il seguente codice
>VBA:
>
>Private Sub Pippo_AfterUpdate()
>If Nz(Me!Pippo, "") <> "" Then
>Me!Pippo = "#mailto: " & Me!Pippo & "#"
>End If
>End Sub
Purtroppo non va molto bene perché dopo aver inserito l'email,
appare sia mailto: indirizzo, sia
http://indirizzo
 che non c'entra niente...
come mai?


title: "Mailto:" e "ValidationRule"

text:
"Woodrov" <
luca....@tiscali.it
> ha scritto nel messaggio
news:feej8v41t8mhlm2op...@4ax.com...

Non so cosa dirti, per scrupolo ho provato la soluzione che ti ho
consigliato ed a me funziona bene; natiralmente il campo associato è di tipo
Collegamento ipertestuale.
Se l'indirizzo email è
pi...@libero.it
 , se elimini il codice VBA e nella
casella di testo digiti:
mailto:
pi...@libero.it
cosa succede?



title: "Mailto:" e "ValidationRule"

text:
On Tue, 01 Apr 2003 17:59:42 GMT, "Roberto da casa" <
r.ma...@libero.it
> wrote:
>
>"Woodrov" <
luca....@tiscali.it
> ha scritto nel messaggio
>news:feej8v41t8mhlm2op...@4ax.com...
>> On Tue, 01 Apr 2003 11:08:57 GMT, "Roberto da casa" <
r.ma...@libero.it
>
>wrote:
>>
>> >Se il controllo associato al campo di tipo Collegamento ipertestuale si
>> >chiama Pippo.
>> >Se nella casella di testo Pippo digiti solo l'indirizzo di posta
>> >elettronica.
>> >
>> >A fronte dell'evento "Dopo aggiornamento" di Pippo genera il seguente
>codice
>> >VBA:
>> >
>> >Private Sub Pippo_AfterUpdate()
>> >If Nz(Me!Pippo, "") <> "" Then
>> >Me!Pippo = "#mailto: " & Me!Pippo & "#"
>> >End If
>> >End Sub
>>
>>
>> Purtroppo non va molto bene perché dopo aver inserito l'email,
>> appare sia mailto: indirizzo, sia
http://indirizzo
 che non c'entra
>niente...
>>
>> come mai?
>
>Non so cosa dirti, per scrupolo ho provato la soluzione che ti ho
>consigliato ed a me funziona bene; natiralmente il campo associato č di tipo
>Collegamento ipertestuale.
>
>Se l'indirizzo email č
pi...@libero.it
 , se elimini il codice VBA e nella
>casella di testo digiti:
>
>mailto:
pi...@libero.it
>
>cosa succede?
Togliendo il codice esce fuori un indirizzo cliccabile ed effettivamente viene creata una
nuova email con lo stesso indirizzo del campo.. quindi va bene!
Perň ho dovuto scrivere io mailto:
etc
 etc ...
Se invece c'č il codice che m'hai suggerito tu,
quando scrivo l'indirizzo ed esco dal controllo con TAB appare sia
mailto:
pi...@libero.it
, sia
http://pi...@libero.it
 ma viene lanciato solo
Explorer con un indirizzo ovviamente non valido...
mah...


title: "Mailto:" e "ValidationRule"

text:
"Woodrov" <
luca....@tiscali.it
> ha scritto nel messaggio
news:mv0k8v45bcjsqb02f...@4ax.com...

Non so cosa dirti, a me funziona; capisci da solo che scrivere mailto: a
manina santa o far precedere da codice VBA l'indirizzo di posta dalla
costante "#mailto: " e falo seguire dalla costante "#" č la stessa cosa.
Per maggiori chiarimenti leggi sull'help Digitare un collegamento
ipertestuale in un campo o in una casella di testo , ma soprattuto leggi
sull'help Informazioni sugli indirizzi dei collegamenti ipertestuali nei
campi di collegamento ipertestuale e nei controlli.



title: "Mailto:" e "ValidationRule"

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:8Ayia.5468$mg5.1...@twister2.libero.it...
[CUT]
Ecco una soluzione con i fiocchi.. ideata e già stracollaudata da me
Questo è il modulo...
Public Function scrivi(email As String)
If Len(email) > 0 Then
DoCmd.SendObject acSendNoObject, , , email
End If
End Function
nella tua maschera ci metti un campo chiamato come vuoi (es. email)
sul doppio click del campo....routine evento
Private Sub email_dblclick()
call scrivi(me.email)
end sub
ciao


title: "Mailto:" e "ValidationRule"

text:
"### CH v2.003 ###" <
ngma...@genio-af.it
> ha scritto nel messaggio
news:b6etij$8v7$1...@grillo.cs.interbusiness.it...

Ti ringrazio, ma a me funziona anche la mia soluzione; prova a suggerirla a
Woodrov.



title: "Mailto:" e "ValidationRule"

text:
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:JtFia.762$DT4....@twister1.libero.it...
> > [CUT]
> Ti ringrazio, ma a me funziona anche la mia soluzione; prova a suggerirla
a
> Woodrov.
scusami... ho sbagliato il reply ... ;)


title: "Mailto:" e "ValidationRule"

text:
"Woodrov" <
luca....@tiscali.it
> ha scritto nel messaggio
news:10pi8v05ipdpfn4pm...@4ax.com...
> ciao!



title: "Mailto:" e "ValidationRule"

text:
Non riesco a "dividere" un database,
 mi da questo 2 avvisi:
Indice non incluso nell'intervallo.
e di seguito :
Chiamata di routine o argomenti non validi.
Come posso risolvere ?
Succede solo con l'unico database che voglio dividere ! Per gli altri tutto
funziona a meraviglia.


title: "Mailto:" e "ValidationRule"

author: Sib

text:
"db1" <
nimzo...@yahoo.it
> ha scritto nel messaggio

Fai un compila e salva tutti  i moduli dal menu debug.
Sib


title: "Mailto:" e "ValidationRule"

text:
-----
"Sib" <si...@SPAMiol.it> ha scritto nel messaggio
news:ofqta.43358$3M4.1...@news1.tin.it...

ho provato a fare come hai detto, anzi ho cancellato  i soli 3 moduli del
database ma continua a darmi gli stessi errori.....
altre soluzioni ?
grazie !


title: "Mailto:" e "ValidationRule"

text:
Ho scaricato tutto il sito comune, divorato i 2 libri su access che ho,
letto quasi tutto Google,
ma non sono riuscito a farlo :
In una query ho 4 campi
    Dal : 14/03/2003 15.00
    All : 24/03/2003  20.00            Durata Complessiva della Missione
   Dallo : 14/03/2003 12.20
   Allo :  22/03/2003 20.00         Durata Della Missione Estera
Io debbo calcolare la durata in giorni e ore  trascorsi nel paese estero, e
per differenza calcolarmi la permanenza in Italia.
Quindi uso le seguenti formule :
GiorniEstero :     Int([Allo]-[Dallo])
OreEstero      :      Round((([Allo]-[Dallo])-Int([Allo]-[Dallo]))*24)
E fin qui Ok
Poi per calcolarmi i giorni in Italia, mi calcolo prima la durata
complessiva
GiorniComplessivi : Int([All]-[Dal])    e poi
Giorni in Italia    :   Int([GiorniCompl]-[GiorniEstero])
dove mi sono completamente bloccato e su come calcolare le "benedette"
Ore in Italia         : ????????????????????????????????????????
con Excel il risultato deve essere :
Diaria in MALAYSIA 8 Giorni
Diaria in MALAYSIA 8 Ore
Diaria in Italia 2 Giorni
Diaria in Italia 21 Ore
Da tener conto che le ore vanno arrotondate : se minuti >= 30 all'ora
successiva, <30 all'ora precedente.
Mille Grazie !


title: "Mailto:" e "ValidationRule"

text:
"db1" <
nimzo...@yahoo.it
> ha scritto nel messaggio
news:b9d4bt$hqd5t$1...@ID-24065.news.dfncis.de...

Fermo restando che nel tuo esempio la diaria in italia č di 1 giorno e 21
ore e non 2 giorni e 21 ore, prova cosě:
GiorniEstero: Int([Allo]-[Dallo])
OreEstero: Round((([Allo]-[Dallo])-[GiorniEstero])*24)
Giorni in Italia: Int(([All]-[Dal])-([Allo]-[Dallo]))
Ore in Italia: Round(((([All]-[Dal]) - ([Allo]-[Dallo])) - [Giorni in
Italia])*24)



title: "Mailto:" e "ValidationRule"

text:
> Fermo restando che nel tuo esempio la diaria in italia č di 1 giorno e 21
> ore e non 2 giorni e 21 ore, prova cosě:
>
> GiorniEstero: Int([Allo]-[Dallo])
>
> OreEstero: Round((([Allo]-[Dallo])-[GiorniEstero])*24)
>
> Giorni in Italia: Int(([All]-[Dal])-([Allo]-[Dallo]))
>
> Ore in Italia: Round(((([All]-[Dal]) - ([Allo]-[Dallo])) - [Giorni in
> Italia])*24)
>
> --
Mille grazie !!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!


title: convivere con access 2003 e 2013 x64

author: pfm

text:
salve

come posso far convivere questo costrutto sia per Access x64 che per access 2003?

#If VBA7 Then
    Private Declare PtrSafe Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" _
                                (ByVal lpApplicationName As String, _
                                 ByVal lpKeyName As Any, _
                                 ByVal lpDefault As String, _
                                 ByVal lpReturnedString As String, _
                                 ByVal nSize As Long, _
                                 ByVal lpFileName As String) As Long
#Else
Public Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" _
                                (ByVal lpApplicationName As String, _
                                 ByVal lpKeyName As Any, _
                                 ByVal lpDefault As String, _
                                 ByVal lpReturnedString As String, _
                                 ByVal nSize As Long, _
                                 ByVal lpFileName As String) As Long
#Endif


title: convivere con access 2003 e 2013 x64

author: Bruno Campanini

text:
After serious thinking pfm wrote :
> salve
>
> come posso far convivere questo costrutto sia per Access x64 che per access
> 2003?
[...]

Non usare le API... mai!

Bruno


title: convivere con access 2003 e 2013 x64

text:
La costante VBA7 non esiste in A2003, quindi creati una Costante, poi la devi cambiare tu prima della Compilazione.

@Alex


title: Somma delle colonne di una query a campi incrociati

text:
Ho creato una query a campi incrociati le colonne (delle date) sono
create dinamicamente e mostrano la data nel formato:
               (altri campi)    totale     06giu    06 apr   06ago
......
pezzo1      .....                3500      1500     1000     1000
......
pezzo2      .....                1000                              1000
  ......
pezzo3      .....                1500        500     1000
......
Io vorrei che quando creo il report di questa tabella venisse fatta
anche la somma dei pezzi per data cioè in verticale cioè uscisse una
cosa del genere:
risultato che vorrei:
               (altri campi)    totale     06giu    06 apr   06ago
......
pezzo1      .....                3500      1500     1000     1000
......
pezzo2      .....                1000                              1000
  ......
pezzo3      .....                1500        500     1000
......
-------------------------------------------------------------------------------------------------
Totale                             6000      2000      2000    2000
.....
Aiuto!!! Come posso fare????


title: Controllo numeri record

author: Mauro

text:
In una tabella ho una numerazione progressiva che parte da 1 ed arriva ad n.
Come posso verificare che tutti i numeri inseriti siano effettivamente in
sequenza (1,2,3,ecc) e chiaramente trovare i numeri mancanti?
Mi serve per controllo della numerazione di bolle, perchè qualcuno è
riuscito a perdere quelche numero.
Grazie Mauro


title: Controllo numeri record

author: Il Gatto

text:
Mauro ha scritto:
> Come posso verificare che tutti i numeri inseriti siano effettivamente in
> sequenza (1,2,3,ecc) e chiaramente trovare i numeri mancanti?
Qualcosa tipo:
If DCount("NumeroBolla", "BOLLE","")<>DMax("NumeroBolla", "BOLLE", "") then
     ' Hanno saltato qualche numero
End If
In pratica prima conti il numero di record e poi verifichi che combaci
col numero di bolla + alto. Ovviamente le bolle devono partire da 1 e
non devono esserci duplicati di numero. Se la chiave fosse invece
p.es
.
numero E anno metti un filtro per l'anno che ti interessa nel terzo
parametro di Dxxx )
Cmq mi pare che il numero di bolla non sia più fiscale, quindi se nella
sequenza ne manca uno non fa niente, anche non è elegante. Altra cosa
ovviamente coi numeri di fattura.
--
       ^    ^
oOo (Il Gatto) oOo


title: Controllo numeri record

author: Emyr

text:
On Wed, 10 Jul 2002 18:29:33 +0200, Il Gatto <
no...@nowhere.no
> wrote:
>Cmq mi pare che il numero di bolla non sia piů fiscale, quindi se nella
>sequenza ne manca uno non fa niente, anche non č elegante. Altra cosa
>ovviamente coi numeri di fattura.
non penso sia cosě scontato e semplice
Saluti.
Emanuele.


title: Casella testo con proprietà estendibile!

author: Cortesi Marche

text:
Dovrei disegnare  su un report una struttura composta da righe veticali
avente come corpo una casella di testo (memo > 250 caratteri) avente come
proprietà 'estendibile'.
Al momento della stampa, la casella sopraindicata mi si dimensiona
automaticamente contenendo tutto il testo immesso, ma le righe disegnate,
non con il codice, ma come oggetti sul report stesso, restano spezzettate e
della stessa dimensione da me riportata.
sò che posso ovviare da codice, ma non sono all'altezza!
mi potete aiutare, grazie!!
help!
ps. Ho letto le precedenti news, dov'è stato già citato un simile problema,
ma non ho trovato le risposte e soprattutto il metodo per ovviare a ciò.


author: Potone

text:
"Cortesi Marche" <
ecort...@tiscalinet.it
> ha scritto nel messaggio news:ai5ak7$bh1$1...@lacerta.tiscalinet.it...

Ciao,
prova a consultare l'help in linea per l'evento Su pagina (OnPage) del report e l'istruzione Line, puoi tracciare una serie di linee
sulle pagine formattate del report prima che vadano in stampa.
Ciao,
Mat.


author: Massimiliano Amendola  kksrl

text:
"Cortesi Marche" <
ecort...@tiscalinet.it
> ha scritto nel messaggio
news:ai5ak7$bh1$1...@lacerta.tiscalinet.it...

se non sai come fare da codice usa un espediente:
la riga non farla capitare sotto il controllo estendibile ma sopra.
così facendo il controllo si può allungare quanto vuole, la riga sarà sempre
sopra il tracciato record
ciao MAssimiliano


text:
> Scusa ma non ti seguo.
> Fammi un esempio chiaro se puoi o spiegami meglio cosa intendi.
> Grazie!!

Ho immaginato che tu abbia allungato una linea sotto il tracciato record e
che questa sia sballata perchè un campo si estende e la linea non lo segue.
Basterebbe inserire la linea sopra il tracciato record e un'altra nel
sottoreport.
mi spiego con un esempio
oggi è:
campo1 campo2 campo3campo3campo3
                         ____________________
                           campo3campo3campo3
diventerebbe:
_______________________________
campo1 campo2 campo3campo3campo3
                           campo3campo3campo3
Una sola cortesia usa il NG
ciao MAssimiliano


author: Franco

text:
non ci siamo!
ti faccio l'esempio:
 1 Casella testo estendibile perchè possa contenere molto testo 1 altra
casella 1 altra casella 1
 1
1                   1                    1
 1
1                   1                    1
ecc...
la casella di testo estendibile occuperà tante righe quanto più lungo sarà
il testo immesso nella maschera di input, metre le righe verticali
(disegnate con l' '1') nel report, resteranno della lunghezza disegnate e
non occuperanno tutta la lunghezza che avrà la casella di testo. Per essere
espliciti: Le righe mi servono per dividere le colonne di testo stampate nel
report, fai conto una tabella!
Grazie tante!
"Massimiliano Amendola kksrl" <
massimilia...@kksrl.com
> ha scritto
nel messaggio news:aianka$a5e$1...@atlantis.cu.mi.it...



text:

Ah il caldo, no avevo capito che tu volessi le verticali pensavo le
orizzontali. scusa.
Satmpale prima sul report e sopra ci metti la tua sottomaschera
ciao MAssimiliano


author: Antonio Biso

text:
"Franco" <
adv...@tiscali.it
> ha scritto nel messaggio
news:aijn92$qjt$1...@lacerta.tiscalinet.it...
> non ci siamo!
E' vero! Il tuo quoting non č corretto!
> ti faccio l'esempio:
Anch'io! Il mio č un esempio di quoting corretto!!!
Antonio


title: Problemi con gestionale MOSAICO

author: Capitano

text:
Salve,
spero che questo sia il newsgroup adatto, in caso contrario chiedo
venia.
Sto provando  il gestionale MOSAICO (ultima versione disponibile sul
sito), programma molto valido, se non altro perche' e' Freeware.
Ho pero' un problema, quando stampo le fatture, la data mi appare in
formato americano (04/30/2003 al posto di 30/04/2003) , ho provato ad
installare mosaico su un secondo Pc ma il problema sussiste.
Ma e' un bug del programma oppure sbaglio io qualcosa?
Ps ho gia provato a contattare il produttore del software ma sono 3
settimane che non ricevo risposta.
Grazie 1000 dell'aiuto.


title: eliminare record doppi

author: ringo

text:
Salve a tutti,
esiste un comando per eliminare
in una tabella i record doppi?
grazie!
ringo


title: eliminare record doppi

text:
"ringo" <
ri...@tiscali.it
> ha scritto nel messaggio
news:bc4kej$ati$1...@newsread.albacom.net...

Prova con una query di raggruppamento, raggruppando su tutti i campi.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: cambio aspetto caselle di testo

author: bc

text:
Sapete come si fa (ci ho provato ma ... dal momento che vi scrivo....) a
cambiare l'aspetto di una casella di testo durante l'esecuzione del
programma .
Cioè, ho una textbox (bloccata e nella quale leggo i dati) e nel momento in
cui devo inserire dati (dopo averla sbloccata) devo farla diventare una
casella combinata ... e viceversa
mi date una mano?
bce...@tiscalinet.it


title: cambio aspetto caselle di testo

author: Dario Martello

text:
E se usi due controlli (una textbox e una combobox) entrambe nella stessa
posizione (una sopra l'altra) che rendi visibile alternativamente a seconda
di quella che ti serve ?
bc <
bce...@tiscalinet.it
> wrote in message
8d7rpe$csl$1...@pegasus.tiscalinet.it...
> Sapete come si fa (ci ho provato ma ... dal momento che vi scrivo....) a
> cambiare l'aspetto di una casella di testo durante l'esecuzione del
> programma .
> Cioč, ho una textbox (bloccata e nella quale leggo i dati) e nel momento



title: cambio aspetto caselle di testo

author: Lorenzo Coronati

text:
Scrisse "bc" <
bce...@tiscalinet.it
>:
>Cioč, ho una textbox (bloccata e nella quale leggo i dati) e nel momento in
>cui devo inserire dati (dopo averla sbloccata) devo farla diventare una
>casella combinata ... e viceversa
Fossi in te userei due ctl, un textbox e una combo, uno
sopra l'altro, e mi giostrerei con visible.
Bai
--
Lorenzo Coronati
--
<<Nessuno sa che questa affermazione e' vera>>
(John D. Barrow)
--


title: dividere tabella con molti campi in più tabelle

author: mario rossi

text:
se devo creare una tabella costituita per esempio da 100 campi
secondo voi esperti ha senso dividere la tabella in più tabelle in relazione 1 a 1 magari creando una tabella principale con i 10 campi più importanti e altre 3 tabelle con 30 campi ognuna?

grazie.


text:
Non mi pare abbia senso..  tu che senso ci vedi...?

@Alex


text:
mario rossi has brought this to us :

Se devi dividere una tabella di 100 campi per farne tre che siano
in relazione 1-a-1, del senso ne vedo poco, anzi niente del tutto.

Se la trasformazione è richiesta perché una revisione del layout
richiede che gruppi di quei 100 siano opportunamente relazionati,
beh allora si faccia.

Bruno


text:
...
> Se la trasformazione è richiesta perché una revisione del layout
> richiede che gruppi di quei 100 siano opportunamente relazionati,
> beh allora si faccia.
>
> Bruno

Fermo restando le specifiche dei 100 Campi, ho provato a ragionare su questa affermazione ma fatico ad immaginarla nel concreto... puoi aiutare alla comprensione, magari con un esempio...?

Grazie
@Alex


text:

Grazie a tutti, immaginavo anch'io pensavo di farlo per alleggerire il carico della tabella principale, ma poi per vedere nel report le sotto tabelle devo valorizzare un campo nascosto se non ho inserito nessun valore, quindi credodi aver commesso un errore e farò una tabella unica.


text:
Magari Bruno ci darà, quando avrà tempo,dei chiarimenti che possono essere di aiuto a capire la sua affermazione di oggettiva utilità del sistema proposto.

Nel frattempo lascia una tabella sola.

@Alex


text:

ok, grazie.


text:
...
>
> ok, grazie.

Ringrazia Bruno per la spiegazione tecnica...

@Alex


text:

ringrazio tutti


title: problemi di memoria

text:
A97/w95- w98
il mio problema è quello di operare con file di grande dimensione (i dati mi
arrivano via CED su file di testo che arrivano anche a 130 mb). Non appena
comincio ad importare il file access dichiare che lo spazio su disco è
esaurito. Ovviamente non è vero, perchè dicendogli di andare avanti lo fa.
C'è forse qualche stringa da aggiustare nel file di registro per evitare
questo inconveniente?
una volta importato il file quando comincio a lavorarlo la dimensione
del'mdb che creo cresce a dismisura ed arriva anche a 400/500 mb. A questo
punto ogni operazione diventa lentissima.
Ho provato a sostituire l'operatività che facevo con le query con
altrettanti moduli: i tempi di lavorazione si sono notevolmente ristretti.
Tuttavia, in alcuni di questi moduli, con i quali ad esempio si effettua
l'aggiornamentio di un campo di una tabella ad un certo valore contenuto in
un'altra tabella (tabe.edit ....do while not eof...loop), nonostante il
codice, dopo alcuni minuti di attesa verifico che access è rimasto bloccato.
Per evitare questo inconveniente non c'è la possibilità di impostare che il
loop venga eseguito a blocchi?
chiedo scusa se sono stato poco chiaro.
se del caso posso mandare il codice in questione
grazie anticipatamente
Antonio


title: problemi di memoria

author: Marco Serra

text:
Inserisci questa dentro il ciclo:
Doevents
E' solo un tentativo.
Ciao
Marco
--
Posted from [212.210.92.253]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: problemi di memoria

author: Newsgroup

text:
Non ti conviene utilizzare SQL server come Database e Access per lo sviluppo
dell'applicazione?
Saluti
    Leo



title: problemi di memoria

author: MS

text:
Prendi questa mia con il beneficio d'inventario, perché sono un neofita.
Giorni fa dovevo trasformare in db un file di testo contenente circa 300
record (il testo era composto da 42.000 caratteri.
Al momento di caricare il file di testo, Access mi ha dato il messaggio di
memoria esaurita e, come dici tu, dopo l'ok ha proseguito caricando il testo
ma in modo errato.
Dopo tentativi, anche con Excel, mi sono reso conto che viene caricato il
testo orizzontalmente e che quindi, arrivato a fine riga, si trova in
difficoltà a proseguire; peraltro non ho trovato nessuna indicazione sul
numero massimo di record in orizzontale quindi non so se era un problema di
Access o mio (più probabile).
Ho provato anche con l'elaboratore/convertitore di SQL, ma con lo stesso
risultato.
Comunque un amico mi ha preparato un programmino che permette di sostituire
i caratteri del file di testo impostando il carattere di fine record e con
l'opzione di rielaborazione con rimando a capo di ogni record così
costruito. Successivamente Access ha caricato il testo nel formato del txt
senza nessun problema (idem Excel).
Spero di esserti stato in qualche modo utile.
Ciao, Massimiliano


title: Formato valuta in SQL

author: Fabrizio Domiziani

text:
Come faccio in una query scritta direttamente
in SQL a stabilire che ad una colonna di un recordset
frutto di un campo calcolato venga applicato il
formato valuta?
Molte grazie
--
Fabrizio Domiziani
dom...@tin.it


title: Formato valuta in SQL

author: sib

text:
Fabrizio Domiziani chiese:
> Come faccio in una query scritta direttamente
> in SQL a stabilire che ad una colonna di un recordset
> frutto di un campo calcolato venga applicato il
> formato valuta?
Premesso che in una semplice istruzione SQL non puoi impostare il formato, a
cosa mai ti serve impostare tale proprieta' se, comunque, visualizzando il
recordset o stampandolo imposti il formato nella maschera o nel report?
In ogni caso, se sei cosi' masochista da voler usare direttamente le query,
devi usare l'insieme querydefs e accodare la proprieta' Format  alle
proprieta' del campo e impostarne il valore come ti riporto qui sotto.
MioCampo.Properties.Append CurrentDb.CreateProperty("Format", 10, """L.
""#,##0;""-L. ""#,##0")
Ciao, Sib
--
------------------------------------------------------
il sito comune di it.comp.database.access:
http://members.xoom.it/it_db_access
------------------------------------------------------
4000 anni fa', il saggio egizio Ptahhotep scrisse:
"... perche' non esistono saggi per nascita."
------------------------------------------------------
Saturiamo ECHELON:
bomba saddam attentato medio oriente


title: aggiungere record da + utenti

author: cristiano

text:
Buon pomeriggio a tutti.
Ho fatto un applicativo con Access 97. Tale può essere utilizzato da +
utenti contemporaneamente (è il bello di access).
Se, con una routine vb, aggiungo un record (tale deve essere univoco),
l'utente successivo non può aggiungerne un altro.
Il primo utente (quello che ha create il 1° record) deve chiudere
l'applicazione. Quindi il secondo può accedervi per aggiunger un record. E
così via.
Sembra che la tabella si aggiorni del nuovo record solo all'atto dell'uscita
da access.
*Cosa posso fare?*
Data la mia ignoranza se, oltre ad una delucidazione, aveste anche un
piccolo esempio sarebbe perfetto!
Grazie 1000, cristiano.
--------------------------------
Inviato via
http://arianna.libero.it/usenet/


title: aggiungere record da + utenti

author: mauro

text:
Prova ad impostare la proprietą "Blocco a livello di record"=SI dalla
finestra delle opzioni di access. Eventualmente verifica se gli uteni
hanno accesso esclusivo.
Mauro
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: aggiungere record da + utenti

author: namor

text:
cristiano ha scritto:
> Buon pomeriggio a tutti.
> Ho fatto un applicativo con Access 97. Tale puň essere utilizzato da +
> utenti contemporaneamente (č il bello di access).
> Se, con una routine vb, aggiungo un record (tale deve essere univoco),
> l'utente successivo non puň aggiungerne un altro.
> Il primo utente (quello che ha create il 1° record) deve chiudere
> l'applicazione. Quindi il secondo puň accedervi per aggiunger un record. E
> cosě via.
> Sembra che la tabella si aggiorni del nuovo record solo all'atto dell'uscita
> da access.
> *Cosa posso fare?*
> Data la mia ignoranza se, oltre ad una delucidazione, aveste anche un
> piccolo esempio sarebbe perfetto!
> Grazie 1000, cristiano.
Che sistema usi per inserire il record? Manda un esempio.
Forse lasci un recordset aperto che blocca la tabella. Se usi i recordset
devi mettere un XXX.close alla fine dell'inserimento, e ci starebbe bene
anche un 'set XXX=nothing' per liberare la memoria.
Namor
--
namor at inwind punto it



title: aggiungere record da + utenti

text:
Il 05 Dic 2003, 10:09,
do...@spam.me
 (namor) ha scritto:
> cristiano ha scritto:
> > Buon pomeriggio a tutti.
> > Ho fatto un applicativo con Access 97. Tale può essere utilizzato da +
> > utenti contemporaneamente (è il bello di access).
> > Se, con una routine vb, aggiungo un record (tale deve essere univoco),
> > l'utente successivo non può aggiungerne un altro.
> > Il primo utente (quello che ha create il 1° record) deve chiudere
> > l'applicazione. Quindi il secondo può accedervi per aggiunger un record.
E
> > così via.
> > Sembra che la tabella si aggiorni del nuovo record solo all'atto
dell'uscita
> > da access.
> > *Cosa posso fare?*
> > Data la mia ignoranza se, oltre ad una delucidazione, aveste anche un
> > piccolo esempio sarebbe perfetto!
> > Grazie 1000, cristiano.
>
>
> Che sistema usi per inserire il record? Manda un esempio.
> Forse lasci un recordset aperto che blocca la tabella. Se usi i recordset
> devi mettere un XXX.close alla fine dell'inserimento, e ci starebbe bene
> anche un 'set XXX=nothing' per liberare la memoria.
> Namor
>
>
> --
> namor at inwind punto it
>
> questo articolo e` stato inviato via web dal servizio gratuito
>
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it
>
Grazie x la tua gentile risposta.
Sfortunatamente ho già fatto quello che mi hai suggerito.
Ti allego l'esempio:
Private Sub Nuova_Offerta_Click()
    On Error GoTo Err_Nuova_Offerta_Click
Dim dbs As Database, rst As Recordset
DoCmd.GoToRecord , , acNewRec
    Set dbs = CurrentDb
    Set rst = dbs.OpenRecordset("DettagliOfferta")
   Debug.Print rst.RecordCount
Select Case rst.RecordCount
Case Is < 10
   IDNumeroOfferta.Value = "E3-01" & rst.RecordCount + 1
Case Is < 99
   IDNumeroOfferta.Value = "E3-0" & rst.RecordCount + 1
Case Is >= 99
  IDNumeroOfferta.Value = "E3-" & rst.RecordCount + 1
End Select
    rst.Close
    Set dbs = Nothing
Exit_Nuova_Offerta_Click:
    Exit Sub
Err_Nuova_Offerta_Click:
    MsgBox Err.Description
    Resume Exit_Nuova_Offerta_Click
    End Sub
Spero che tu mi possa aiutare.
Ciao e grazie 1000, Cristiano.



title: aggiungere record da + utenti

text:
cristiano ha scritto:
> Il 05 Dic 2003, 10:09,
do...@spam.me
 (namor) ha scritto:
> > cristiano ha scritto:
> > > Buon pomeriggio a tutti.
> > > Ho fatto un applicativo con Access 97. Tale può essere utilizzato da +
> > > utenti contemporaneamente (è il bello di access).
> > > Se, con una routine vb, aggiungo un record (tale deve essere univoco),
> > > l'utente successivo non può aggiungerne un altro.
> > > Il primo utente (quello che ha create il 1° record) deve chiudere
> > > l'applicazione. Quindi il secondo può accedervi per aggiunger un record.
> > > E così via.
> > > Sembra che la tabella si aggiorni del nuovo record solo all'atto
> dell'uscita
> > > da access.
> > > *Cosa posso fare?*
> > > Data la mia ignoranza se, oltre ad una delucidazione, aveste anche un
> > > piccolo esempio sarebbe perfetto!
> > > Grazie 1000, cristiano.
> > Che sistema usi per inserire il record? Manda un esempio.
> > Forse lasci un recordset aperto che blocca la tabella. Se usi i recordset
> > devi mettere un XXX.close alla fine dell'inserimento, e ci starebbe bene
> > anche un 'set XXX=nothing' per liberare la memoria.
> > Namor
> Grazie x la tua gentile risposta.

Ma qui non inserisci nessun nuovo record, serve solo a calcolare un codice.
Manca il "Set rst=Nothing". Messa così la gestione degli errori, se si
verifica un errore durante l'esecuzione la procedura esce senza chiudere
il recordset.
A vedere il funzionamento della sub, credo che il tutto possa essere
sostituito con questo:
IDNumeroOfferta = "E3-" & Format(nz(Dcount("*","DettagliOfferta"))+1,"000")



title: aggiungere record da + utenti

text:

Egregio <<Namor>>,
Grazie tante per la risposta.
Evviva, funziona!
Ora ho un altro questito.
Quando porto il risultato di un report da access a word perdo il frame
(linee, loghi, etc).
Come posso fare?
Aspetto news.
Grazie cristiano.



title: aggiungere record da + utenti

author: MA

text:
> Egregio <<Namor>>,
> Grazie tante per la risposta.
>
> Evviva, funziona!
>
> Ora ho un altro questito.
>
> Quando porto il risultato di un report da access a word perdo il frame
> (linee, loghi, etc).
>
> Come posso fare?
>
> Aspetto news.
Aspettale aprendo un 3d diverso
MAssimiliano


title: aggiungere record da + utenti

text:
cristiano ha scritto:
[cut]
> Ora ho un altro questito.
> Quando porto il risultato di un report da access a word perdo il frame
> (linee, loghi, etc).
> Come posso fare?
> Aspetto news.
> Grazie cristiano.
E' meglio aprire una nuova discussione sul ng, visto che la richiesta non
ha niente a che fare con l'argomento trattato in questa.
Ciao.



title: Routine

author: Giuseppe

text:
Ciao a tutti
non riesco in questa routine  a fare riferimento al controllo
  "TblFornitori.CodiceFornitore"
Private Sub IDProdotto_NotInList(NewData As String, Response As Integer)
 Dim IntNuovo As Integer, strTitolo As String
Dim IntFinestraMsg As Integer, strMsg As String
strTitolo = "                       codice non in elenco"
strMsg = "ATTENZIONE il Codice   " & NewData & "   è inesistente vuoi
codificarlo ? "
IntFinestraMsg = vbYesNo + vbQuestion
IntNuovo = MsgBox(strMsg, IntFinestraMsg, strTitolo)
 If IntNuovo = vbYes Then
If Forms!ordiniGenerico!TblFornitori.CodiceFornitore.Value = 54 Then
                                      -----------------------------
Se qualcuno mi vuole aiutare
Ciao Giuseppe


title: Routine

author: Alessandro Baraldi

text:
"Giuseppe" <
amrma...@tin.it
> wrote in message
news:v6%ab.91745$
hE5.3...@news1.tin.it
> non riesco in questa routine  a fare riferimento al controllo
>   "TblFornitori.CodiceFornitore"
>
> Private Sub IDProdotto_NotInList(NewData As String, Response As Integer)
>  Dim IntNuovo As Integer, strTitolo As String
> Dim IntFinestraMsg As Integer, strMsg As String
>
> strTitolo = "                       codice non in elenco"
> strMsg = "ATTENZIONE il Codice   " & NewData & "   è inesistente vuoi
> codificarlo ? "
> IntFinestraMsg = vbYesNo + vbQuestion
> IntNuovo = MsgBox(strMsg, IntFinestraMsg, strTitolo)
>
>  If IntNuovo = vbYes Then
> If Forms!ordiniGenerico!TblFornitori.CodiceFornitore.Value = 54 Then
Secondo me servirebbe un SANTONE..............!
> Ciao Giuseppe
Ma TblFornitori è una Tabella oppure una SottoMaschera...???
Se è la 1° allora non ci siamo proprio, se la 2° allora
le cose cambiano.
@Alex.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Routine

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:f183241b904724788b...@mygate.mailgate.org...

E' una tabella .
Deve poter fare riferimento a "CodiceFornitore" della Tabella
"TblFornitori"
ho un controllo  con origine controllo appunto TblFornitori.CodiceFornitore
Perchè non ci siamo proprio?
Ciao Giuseppe


title: Routine

text:
"Giuseppe" <
amrma...@tin.it
> wrote in message
news:kpebb.131649$
R32.4...@news2.tin.it
[CUT]
> >
> > Ma TblFornitori è una Tabella oppure una SottoMaschera...???
> >
> > Se è la 1° allora non ci siamo proprio, se la 2° allora
> > le cose cambiano.
> >
> > @Alex.
> >
> >
>
> E' una tabella .
> Deve poter fare riferimento a "CodiceFornitore" della Tabella
> "TblFornitori"
> ho un controllo  con origine controllo appunto TblFornitori.CodiceFornitore
>
> Perchè non ci siamo proprio?
>
> Ciao Giuseppe
Non ci siamo perchè non hai ben compreso come funzionano i controlli
associati.
Come scrivi tu:
If Forms!ordiniGenerico!TblFornitori.CodiceFornitore.Value = 54 Then
Come si deve fare:
If Forms!ordiniGenerico!NomeControlloAssociatoCodiceFornitore = 54 Then
E' il controllo stesso che essento associato al CAMPO(CodiceFornitore)
della Tabella(TblFornitori) propone il valore relativo.
Poichè tu devi controllarne il valore non ti devi riferire alla
Tabella con il relativo campo(Lavoreresti con Controlli non associati)
ma al controllo stesso.
Per semplificarla ancora, se il controllo lo esegui nella Form in cui
risiede il CONTROLLO(scusa il gioco di parole) allor apuoi scrivere:
If Me.NomeControlloCodiceFornitore= 54 Then
Ovvio che il NomeControlloCodiceFornitore può essere quello che vuoi
mentre la sua origine dati è CodiceFornitore.
Quello che conta è capire che è la Form ASSOCIATA alla Tabella,
i controlli in essa contenuti sono ASSOCIATI ai CAMPI.
Saluti.



title: Routine

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:617701e57214bcda96...@mygate.mailgate.org...

Ho capito  e ti ringrazio per la spiegazione
Ciao Giuseppe


title: Access legge archivi AS/400

author: Eradicator

text:
Premettendo che non so che tipo di archivi usi AS/400 avrei necessità (Se
possibile, di collegarmi ad un archivio AS/400) per pescarvi dei dati
anagrafici
I campi dovrebbero essere:
[CodCliente]
[RagioneSociale]
[Città]
Come potrei fare?
Grazie.


title: Access legge archivi AS/400

author: Mark

text:
"Eradicator" <
m.enteza...@virgilio.it
> ha scritto nel messaggio
news:R89Ba.8184$pR3.1...@news1.tin.it...

Dei configurare dei driver odbc. Configurandoli con le impostazioni del tuo
sistema AS400 puoi importare o collegare le tabelle direttamente su un DB
Access.
Saluti


title: Access legge archivi AS/400

text:
> Dei configurare dei driver odbc. Configurandoli con le impostazioni del
tuo
> sistema AS400 puoi importare o collegare le tabelle direttamente su un DB
> Access.
> Saluti
>
E come si fa tale procedura?
Grazie


title: Access legge archivi AS/400

author: Paolo opg

text:
"Eradicator" <
m.enteza...@virgilio.it
> wrote in
news:6eaBa.8500$
pR3.1...@news1.tin.it
:
> E come si fa tale procedura?
>
>
se hai un as400, hai anche installato client access.
con il clientaccess, ti installa anche i drivers odbc e crea una fonte dati
che si chiama as400 o 'as-400 ca' o qualcosa del genere.
la modifichi e c metti l'indirizzo del tuo as, l'elenco delle librerie a
cui devi accedere e poi ti colleghi con access come faresti con qualsiasi
altro db.
--
+-------
| Paolo opg
|
| janickg ( at ) hotmail ( dot ) com
+-------
** Free nntp server at
www.x-privat.org
 **


title: Access legge archivi AS/400

text:
> se hai un as400, hai anche installato client access.
> con il clientaccess, ti installa anche i drivers odbc e crea una fonte
dati
> che si chiama as400 o 'as-400 ca' o qualcosa del genere.
> la modifichi e c metti l'indirizzo del tuo as, l'elenco delle librerie a
> cui devi accedere e poi ti colleghi con access come faresti con qualsiasi
> altro db.
Quindi se ho capito bene dovrei trovare tale driver nella lista di driver
che c'è in pannello di controllo, e ciò che risulta in quella lista è la
lista di tutti i formati di dati leggibili da access, quindi collegabili
come tabelle.
Quindi avendo sul computer utente un client che legge ed elabora dati dal
server as400 è ovvio che ho anche il relativo driver ODBC installato!
E'giusto?
Grazie.


title: Access legge archivi AS/400

text:
"Eradicator" <
m.enteza...@virgilio.it
> wrote in
news:qLaBa.8924$
pR3.1...@news1.tin.it
:
> Quindi se ho capito bene dovrei trovare tale driver nella lista di
> driver che c'è in pannello di controllo, e ciò che risulta in quella
> lista è la lista di tutti i formati di dati leggibili da access,
> quindi collegabili come tabelle.
> Quindi avendo sul computer utente un client che legge ed elabora dati
> dal server as400 è ovvio che ho anche il relativo driver ODBC
> installato!
>
> E'giusto?
>
esatto.
se hai fatto l'installazione standard del clientaccess, hai installati
anche i drivers odbc per as400.



title: Access legge archivi AS/400

text:
Devo dire che di connessioni ODBC non ci capisco nulla.
Chi č cosě gentile da dirmi brevemente una procedura passo passo?
Grazie.


title: WORD 2 (non Access)

author: Peo

text:
Scusate di nuovo, volevo solo aggiungere che potete scrivermi direttamente,
senza disturbare il NG.
Peo
www.studiopasquali.it
in...@studiopasquali.it
Messaggio originale------------------------------------------------
Scusate, ho un problema bloccante con Word 2000
(mi "butta fuori" di continuo sputandomi un messaggio di errore)
qualcuno sa se esiste un NG per word (magari in Italiano)?
Dopo 4 reinstallazioni non so più cosa provare a fare...
Peo
P.S.: so che non c'entra nulla, ma non so più dove parare...
www.studiopasquali.it
in...@studiopasquali.it
-------------------------------------------------------------------------


title: WORD 2 (non Access)

author: Sergio MAZZA

text:
"Peo" <
moto...@libero.it
> ha scritto nel messaggio
news:9qhlpj$8rk$1...@fe1.cs.interbusiness.it...

Tanto per provare, qual'è il messaggio?
Ciao.
--
- - - - - - - - - - - - - - -
Sergio MAZZA
- - - - - - - - - - - - - - -


title: cancellare la griglia del filtro

author: Rupen

text:
come posso fare per cancellare via codice la griglia del filtro precedente
all'evento apply filter?
ciao e grazie !


title: cancellare la griglia del filtro

author: JBad

text:
In article <newscache$wyu30g$kmm$
1...@news.silink.com
>,
gi...@silink.it.CANCELLAMI says...
> come posso fare per cancellare via codice la griglia del filtro precedente
> all'evento apply filter?
>
> ciao e grazie !
Prova a cancellare la proprieta' .filter del form (e' solo un'idea, prova
tu :)
Ciao
--
JBad


title: AIUTO !! Non mi rimane aperto Access

author: Maurino

text:
Dopo aver installato la SR-1 di Office 2000 non mi rimane più aperto
qualsiasi programma della famiglia Office, o meglio mi si aprono e rimangono
aperti sino a quando non muovo il mouse e poi si chiudono automaticamente !
Sapete come posso risolvere tale problema ?
Grazie
Maurino


title: Come chiudere tutti i recordset con un ciclo?

author: luk

text:
E' possibile con un ciclo (for each recordset ......next....etcetc o
qualcosa del genere) chiudere tutti i recordset aperti?
Ho provato a inserire al fondo della routine la chiusura dei vari recordset
le istruzioni:
    Rs1.Close
    Rs2.Close
    Rs3.Close
Ma se uno di questi recordset non è aperto mi restituisce un errore. Quindi
volevo creare un ciclo che mi chiudesse tutti i recordset aperti
Altra domanda: è il caso di impostare anche la seguente istruzione?
    set rs1 = nothing
Thanks
Luk


text:
luk wrote:
> E' possibile con un ciclo (for each recordset ......next....etcetc o
> qualcosa del genere) chiudere tutti i recordset aperti?
>
> Ho provato a inserire al fondo della routine la chiusura dei vari
> recordset le istruzioni:
>     Rs1.Close
>     Rs2.Close
>     Rs3.Close
>
> Ma se uno di questi recordset non è aperto mi restituisce un errore.
> Quindi volevo creare un ciclo che mi chiudesse tutti i recordset
> aperti
Se hai un problema con la condizionata apertura di recorset ti conviene
mettere il close nella condizione in cui l'hai aperto
es
If Pippo = 1 then
    set rst1 = currentdb.openrecordset("tuaTab")
    ...
    rst1.close
else
end if
Qui o la apre e la chiude o non lo apre proprio
>
> Altra domanda: è il caso di impostare anche la seguente istruzione?
>     set rs1 = nothing
Certo se allochi troppa memoria hai problemi di crashing
>
> Thanks
> Luk
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


text:
"luk" <
magi...@hotmail.com
> wrote in message
news:df4j35$s3i$
1...@newsreader.mailgate.org
> E' possibile con un ciclo (for each recordset ......next....etcetc o
> qualcosa del genere) chiudere tutti i recordset aperti?
>
> Ho provato a inserire al fondo della routine la chiusura dei vari recordset
> le istruzioni:
>     Rs1.Close
>     Rs2.Close
>     Rs3.Close
>
> Ma se uno di questi recordset non č aperto mi restituisce un errore. Quindi
> volevo creare un ciclo che mi chiudesse tutti i recordset aperti
Non esiste una Collection di Recordset(a meno tu non ne crei una)
pertanto non č fattibile un ciclo.
Per risolvere il problema io faccio cosě:
If Not rs Is Nothing Then rs.Close
> Altra domanda: č il caso di impostare anche la seguente istruzione?
>     set rs1 = nothing
Io faccio anche questo.
> Thanks
> Luk
Saluti
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


text:
luk ha scritto:
> E' possibile con un ciclo (for each recordset ......next....etcetc o
> qualcosa del genere) chiudere tutti i recordset aperti?
> Ho provato a inserire al fondo della routine la chiusura dei vari recordset
> le istruzioni:
>     Rs1.Close
>     Rs2.Close
>     Rs3.Close
> Ma se uno di questi recordset non è aperto mi restituisce un errore. Quindi
> volevo creare un ciclo che mi chiudesse tutti i recordset aperti
La cosa più corretta sarebbe chiudere e distruggere gli oggetti alla fine
dei blocchi di codice in cui li utilizzi. Per esempio, se uno dei tre
viene aperto dentro ad un If dovresti chiuderlo e distruggerlo nello
stesso blocco di codice dell'If, in modo che se la condizione If non si
verifica non verranno eseguite nè le istruzioni di creazione nè quelle di
eliminazione dell'oggetto.
Per farla più breve puoi risolvere mettendo un On Error Resume Next prima
del blocco delle istruzioni di chiusura (Rsx.Close) per bypassare
eventuali errori dovuti a recordset non istanziati.
> Altra domanda: è il caso di impostare anche la seguente istruzione?
>     set rs1 = nothing
> Thanks
> Luk
Si, è il caso di fare anche questo. Queste istruzioni non ti daranno
errore, anche nei casi in cui i recordset non siano stati istanziati.
Ciao.
Namor
--
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


author: Karl Donaubauer

text:
Alessandro Baraldi wrote:
> "luk wrote:
>
>> E' possibile con un ciclo (for each recordset ......next....etcetc o
>> qualcosa del genere) chiudere tutti i recordset aperti?
>>
>> Ho provato a inserire al fondo della routine la chiusura dei vari
>> recordset le istruzioni:
>>     Rs1.Close
>>     Rs2.Close
>>     Rs3.Close
>>
>> Ma se uno di questi recordset non è aperto mi restituisce un errore.
>> Quindi volevo creare un ciclo che mi chiudesse tutti i recordset
>> aperti
>
> Non esiste una Collection di Recordset(a meno tu non ne crei una)
> pertanto non è fattibile un ciclo.
> ...
Beh...
Ogni oggetto Connection o Database ha la sua Collection di Recordsets.
Si puo ciclare questa collection, usando For Each o Count e il numero
del item nella collection, chiedere il nome e altre proprietà del recordset
ecc.
Certo tutto solo nel scope della variabile database. Ma se si crea un'unica
variabile globale per database si puo fare tante cose.
--
cu
Karl
*********
Access FAQ:
www.donkarl.com/it
+ Conferenza Italiana per Sviluppatori di Access (CISA)


text:
"Karl Donaubauer" <
NoS...@donkarl.com
> wrote in message
news:3nm3vqF...@individual.net
[CUT]
> Beh...
> Ogni oggetto Connection o Database ha la sua Collection di Recordsets.
> Si puo ciclare questa collection, usando For Each o Count e il numero
> del item nella collection, chiedere il nome e altre proprietà del recordset
> ecc.
Si quanto dici è verissimo, ma ti impone di avere una riconoscibilità
dell'Oggetto come il Nome nelle collection Controls o Forms ecc...!
La collections Recordsets non ti espone la proprietà Name di conseguenza
questa opportunità è applicabile solo se non hai altri RS aperti
a livello Globale.
Insomma dici bene, ma non lo consiglierei a nessuno.
> Certo tutto solo nel scope della variabile database. Ma se si crea un'unica
> variabile globale per database si puo fare tante cose.
Odio le variabili GLOBALI, le uso il meno possibile, ma concordo.
;-)
Saluti.



text:
Alessandro Baraldi wrote:
> "Karl Donaubauer wrote:
>
> [CUT]
>> Beh...
>> Ogni oggetto Connection o Database ha la sua Collection di
>> Recordsets.
>> Si puo ciclare questa collection, usando For Each o Count e il numero
>> del item nella collection, chiedere il nome e altre proprietà del
>> recordset ecc.
>
> Si quanto dici è verissimo, ma ti impone di avere una riconoscibilità
> dell'Oggetto come il Nome nelle collection Controls o Forms ecc...!
> La collections Recordsets non ti espone la proprietà Name
Ma no, espone una bella proprietà Name che ti dà la stringa che
hai usato nel OpenRecordset, cioè il nome della tabella/query o
l'enunciato SQL. ;-)
> di
> conseguenza questa opportunità è applicabile solo se non hai altri RS
> aperti a livello Globale.
Almeno offre la possibilità di ciclare e applicare un Close per tutti
recordset di una globale variabile database (diciamo "miodb"),
molto simile che per Forms ecc. Tipo:
Dim rs As DAO.Recordset
Dim i As Integer
For i = miodb.Recordsets.count - 1 To 0 Step -1
    miodb.Recordsets(i).Close
Next i
> Insomma dici bene, ma non lo consiglierei a nessuno.
>
>> Certo tutto solo nel scope della variabile database. Ma se si crea
>> un'unica variabile globale per database si puo fare tante cose.
>
> Odio le variabili GLOBALI, le uso il meno possibile, ma concordo.
>
> ;-)
Dipende. Invece di cento volte usare Currentdb di solito è meglio
una sola variabile + funzione globale. Ancora più bella è un
Public Property.
--
HTH



text:
"Karl Donaubauer" <
NoS...@donkarl.com
> wrote in message
news:3nm6uaF...@individual.net
[CUT]
> Ma no, espone una bella proprietà Name che ti dà la stringa che
> hai usato nel OpenRecordset, cioè il nome della tabella/query o
> l'enunciato SQL. ;-)
Che bello...! ;-)
[CUT]
> > Odio le variabili GLOBALI, le uso il meno possibile, ma concordo.
> >
> > ;-)
>
> Dipende. Invece di cento volte usare Currentdb di solito è meglio
> una sola variabile + funzione globale. Ancora più bella è un
> Public Property.
Easatto la Public Property e la soluzione che più apprezzo ma
che nessuno usa o forse conosce.
L'esempio che hai fatto del CurrentDb è decisamente valido
la multiistanza di WorkSpaces è pericolosa ed inutile.
Sta di fatto che l'uso di Public Variable è, a mio avviso, abusato
questo non significa non utile, ma molti usano delle Public solo
per passare parametri da una Form all'altra senza pensare alle
Public Property di Form nonchè di Classi...!
Servirebbe in una futura CISA una sessione di come si scrive
del codice DECENTE e leggibile.
;-)
Ciao



text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:077a77fae442010bc9...@mygate.mailgate.org...
> "Karl Donaubauer" <
NoS...@donkarl.com
> wrote in message
>
news:3nm6uaF...@individual.net
[CUT]
> Servirebbe in una futura CISA una sessione di come si scrive
> del codice DECENTE e leggibile.
> ;-)
> Ciao
> @Alex
Attento che questa la prendiamo come un tuo preimpegno x CISA2.....
Namor  ;-)


author: Peppe Monti

text:
namor ha scritto:
> "Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
>>"Karl Donaubauer" <
NoS...@donkarl.com
> wrote in message
>>Servirebbe in una futura CISA una sessione di come si scrive
>>del codice DECENTE e leggibile.
> Attento che questa la prendiamo come un tuo preimpegno x CISA2.....
Non mi impallinate se ve lo chiedo:
ma a sto CISA (un convegno su Access, suppongo) si può partecipare
tutti? Il livello è troppo alto per uno che si diletta con Access per
hobby? E sopratutto, quando e dove si terrà il prossimo?
ciao
Peppe


text:
"namor" <
do...@spam.me
> wrote in message
news:V0mRe.41283$
F23.4...@twister2.libero.it

;-) era una battuta voluta........
Hai dato un'occhiata al Demo sulle Classi...?(quello più complesso)
Mi interessava un parere anche se l'ho fatto solo come
dimostrativo di potenzialità.



text:

www.donkarl.com/it
 e clicki su Cisa
poi qui trovi tutti i commenti alla prima edizione che si è tenuta a giugno



text:
> Non esiste una Collection di Recordset(a meno tu non ne crei una)
> pertanto non č fattibile un ciclo.
> Per risolvere il problema io faccio cosě:
>
> If Not rs Is Nothing Then rs.Close
Grazie ragazzi. Oggi provo e vediamo se riesco.
Cmq    ho due cicli  con dei recordset che vengono utilizzati se si
verificano determinate situazioni e in alcuni casi utilizzo lo stesso
recordset poco dopo per effettuare dei controlli. Quindi pensavo che non era
il caso di aprirli e chiuderli ogni volta ma che si potesse chiuderli tutti
alla fine della routine con un ciclo.
Saluti
Luk


text:
MA ha scritto:
> Peppe Monti wrote:
>>ma a sto CISA (un convegno su Access, suppongo) si può partecipare
>>tutti? Il livello è troppo alto per uno che si diletta con Access per
>>hobby? E sopratutto, quando e dove si terrà il prossimo?
>
www.donkarl.com/it
 e clicki su Cisa
> poi qui trovi tutti i commenti alla prima edizione che si è tenuta a giugno
Grazie e ciao
Peppe


text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
[CUT]
> > > Servirebbe in una futura CISA una sessione di come si scrive
> > > del codice DECENTE e leggibile.
> > > ;-)
> > > Ciao
> > > @Alex
> > Attento che questa la prendiamo come un tuo preimpegno x CISA2.....
> > Namor  ;-)
> ;-) era una battuta voluta........
Ormai ti sei inguaiato... comincia a preparare la relazione!
> Hai dato un'occhiata al Demo sulle Classi...?(quello più complesso)
> Mi interessava un parere anche se l'ho fatto solo come
> dimostrativo di potenzialità.
> Ciao
> @Alex
Si, già a suo tempo quando me l'avevi mandato l'avevo esaminato velocemente,
col proposito di studiarlo più a fondo. Purtroppo a tutt'oggi è rimasto solo
un proposito. Troverò un po' di tempo per guardarlo meglio poi ci sentiamo.
Ciao.
Namor