title: campo troppo lungo nel report

text:

é possibile da codice impostare una condizione di questo tipo e dove
eventualmente va inserito?
se il campo descrizione è più lungo di 42 caratteri lo "0"(zero) della
quantità, prezzo e importo non deve essere visibile.
Grazie


title: campo troppo lungo nel report

author: Antonio Biso

text:
"Ryc" <
ars...@yahoo.it
> ha scritto nel messaggio
news:72c530dd-ffb4-4ac2...@f2g2000vby.googlegroups.com...
Ciao a tutti,
Ho un problema nel report per la  lunghezza dei dati da inserire
prima dei vari prodotti.
Vai a vedere la proprietą espandibile dei controlli nel report
Antonio


title: campo troppo lungo nel report

author: Ryc

text:
On 8 Gen, 11:25, "Antonio Biso" <
ab...@libero.it
> wrote:
> "Ryc" <
ars...@yahoo.it
> ha scritto nel messaggionews:72c530dd-ffb4-4ac2...@f2g2000vby.googlegroups.com...
> Ciao a tutti,
> Ho un problema nel report per la  lunghezza dei dati da inserire
> prima dei vari prodotti.
>
> Vai a vedere la proprietà espandibile dei controlli nel report
>
> Antonio
grazie Antonio.
è possibile creare una condizione che quando la categoria della
Tbdescrizione è ddt
gli zeri nei campi ncolli/quantità/prezzo/importo non siano visibili?
Perchè se così fosse posso recuperare spazio allungando il campo
descrizione
del report coprendo quantità/prezzo/importo.


title: campo troppo lungo nel report

text:
"Ryc" <
ars...@yahoo.it
> ha scritto nel messaggio
news:98d8e050-3b3b-4c5f...@fm22g2000vbb.googlegroups.com...


Ma tu a priori dimensioni i controlli, quindi quando invece non devi
nascondere, la descrizione copre un valore significativo
cmq su formattazione del corpo puoi testare il valore del controllo e
impostare la proprietà visible del controlloche vuoi
Antonio


title: campo troppo lungo nel report

text:
On 8 Gen, 12:04, "Antonio Biso" <
ab...@libero.it
> wrote:
> "Ryc" <
ars...@yahoo.it
> ha scritto nel messaggionews:98d8e050-3b3b-4c5f...@fm22g2000vbb.googlegroups.com...
> On 8 Gen, 11:25, "Antonio Biso" <
ab...@libero.it
> wrote:
>
> > "Ryc" <
ars...@yahoo.it
> ha scritto nel
> > messaggionews:72c530dd-ffb4-4ac2...@f2g2000vby.googlegroups.com...
> > Ciao a tutti,
> > Ho un problema nel report per la lunghezza dei dati da inserire
> > prima dei vari prodotti.
>
> > Vai a vedere la propriet espandibile dei controlli nel report
>
> > Antonio
>
> grazie Antonio.
> possibile creare una condizione che quando la categoria della
> Tbdescrizione ddt
> gli zeri nei campi ncolli/quantit /prezzo/importo non siano visibili?
> Perch se cos fosse posso recuperare spazio allungando il campo
> descrizione
> del report coprendo quantit /prezzo/importo.
>
> Ma tu a priori dimensioni i controlli, quindi quando invece non devi
> nascondere, la descrizione copre un valore significativo
>
> cmq su formattazione del corpo puoi testare il valore del controllo e
> impostare la propriet visible del controlloche vuoi
>
> Antonio
troppo articolata per me impostare questa condizione
nel codice su formattazione del corpo.
io dovrei creare una condizione del tipo:
se il campo Descrizione contiene un valore della Tbdescrizione e come
sottogruppo denominato categoria= "DDT"
i campi ncolli, quantita, prezzo e importo non devono essere visibili.
Grazie per l'aiuto


title: campo troppo lungo nel report

text:
"Ryc" <
ars...@yahoo.it
> ha scritto nel messaggio
news:3829784c-770f-4adb...@k11g2000vbf.googlegroups.com...

si fa sull'evento su formattazione del corpo
test sul valore
impostazione delle propriet�
non c'� altra strada
Antonio


title: campo troppo lungo nel report

text:
On 8 Gen, 22:01, "Antonio Biso" <
ab...@libero.it
> wrote:
> "Ryc" <
ars...@yahoo.it
> ha scritto nel messaggionews:3829784c-770f-4adb...@k11g2000vbf.googlegroups.com...

Ciao Antonio
questo l'ho risolto con:
Me!miocampo.Visible = (Me!QUANTITA.Value > 0)
End Sub


title: help !! sos !!

author: Danilo Engil

text:
chi mi puo' aiutare? ho il seguente problema ancora in ballo
devo aprire da una maschere un altra maschera passando come filtro il valore
di una casella combinata e quello della casella di testo  myCitta, riesco al
massimo a passargli uno dei due valori
 es.
"[perfezionamentoID]=" & [myCombinata]    funziona !
"[perfezionamentoID]=" & [myCombinata]  & " [Citta]=" & [myCitta]
non funziona!
ho provato a mettere AND a separare le due cose con gli apici ecc.
ma niente da fare.
avete un altro sistema per fare operazioni del genere, sono io che sbaglio
metodo?  o  questo Access  non lo capisco proprio ?
lo ucciderei ! grr
saluti e grazie a tutti


title: help !! sos !!

author: Silvio Berruti

text:
"Danilo Engil" <
soft...@hotmail.com
> ha scritto nel messaggio
news:8qf5ie$jav$1...@suite03.caspur.it...
> chi mi puo' aiutare? ho il seguente problema ancora in ballo
> devo aprire da una maschere un altra maschera passando come filtro il
valore
> di una casella combinata e quello della casella di testo  myCitta, riesco
al
> massimo a passargli uno dei due valori
>  es.
>
> "[perfezionamentoID]=" & [myCombinata]    funziona !
>
> "[perfezionamentoID]=" & [myCombinata]  & " [Citta]=" & [myCitta]
"[perfezionamentoID]=" & [myCombinata]  & " And [Citta]='" & [myCitta] & "'"
cioé And [Citta]= apostrofo virgolette & [myCitta] & virgolette apostrofo
virgolette
--
Silvio
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access


title: help !! sos !!

author: Stefano

text:
Il filtro è la parte WHERE di una stringa SQL.
Dato che specifichi due criteri ci vuole sicuramente l'AND (nota che prima
c'è uno spazio). Inoltre se, come penso, myCitta è una stringa la devi
mettere tra apici singoli:
Prova con:
"[perfezionamentoID] = " & [myCombinata] & " AND [Citta] = '" & [myCitta] &
"'"
Se poi non fai una ricerca esatta sul nome della città allora al posto
dell'uguale devi metterci LIKE e aggiungere un paio di asterischi:
.... " AND [Citta] LIKE '*" & [myCitta] & "*'"
Non ho provato queste stringhe. L'ideale è che definisci una stringa ad
esempio:
strSQL = "perfezionamento....
e ci metti sopra un punto interruzione in visual basic. Così puoi vedere se
la stringa che ti sei costruito è corretta.
Ciao. Ste
"Danilo Engil" <
soft...@hotmail.com
> ha scritto nel messaggio
news:8qf5ie$jav$1...@suite03.caspur.it...
> chi mi puo' aiutare? ho il seguente problema ancora in ballo
> devo aprire da una maschere un altra maschera passando come filtro il
valore
> di una casella combinata e quello della casella di testo  myCitta, riesco
al
> massimo a passargli uno dei due valori
>  es.
>
> "[perfezionamentoID]=" & [myCombinata]    funziona !
>
> "[perfezionamentoID]=" & [myCombinata]  & " [Citta]=" & [myCitta]
>



title: help !! sos !!

author: Andrea Sciamanna

text:
> "[perfezionamentoID]=" & [myCombinata]    funziona !
>
> "[perfezionamentoID]=" & [myCombinata]  & " [Citta]=" & [myCitta]
>
> non funziona!
E certo!
Supponi
[myCombinata] = 10
[myCitta] = 20
In pratica gli hai passato "[perfezionamentoID]=10 [Citta]= 20"
Che per Access, anzi, per SQL, non ha nessun significato.
> ho provato a mettere AND a separare le due cose con gli apici ecc.
> ma niente da fare.
Evidentemente hai provato male.
Prova cosě:
"[perfezionamentoID]=" & [myCombinata]  & " AND [Citta]=" & [myCitta]
Se uno dei valori č di tipo testo, devi mettere gli apici. Supponendo che
[myCitta] sia di tipo testo:



title: help !! sos !!

text:
Grazie ragazzi ora funziona!
ho  utilizzato la seguente condizione
"[perfezionamentoID]=" & Me![myCombinata] & " AND [Citta]='" & Me![myCitta]
& "'"
certo avvolte si rischia di impazzire per cose del genere :)
Ciao Danilo Engil


title: Calendario Access.

author: Silver

text:
Ciao ragazzi, io ho un problema con il calendario di access.
praticamente io apro una maschera con al suo interno solo il
calendario, ma nn riesco ad assegnargli il giorno odierno, perche
nelle proprietà del calendario ci devo mettere per forza un Value.
Questo però nn va bene perchè la data sarà sempre fissa io invece
voglio farlo aprire con la data del giorno in cui si apre la maschera.
Ho provato un po di cose a metterlo sull'apertutra, sul focus
sull'attivazione ma niente da fare, voi sapete aiutarmi?
Grazie a tutti Silver.


title: Calendario Access.

author: Access

text:
Ciao Silver,
"Silver" <
marco....@gmail.com
> ha scritto nel messaggio
news:1180773600.1...@w5g2000hsg.googlegroups.com...



Grazie a tutti Silver.
sotto l'evento load della maschera inserisci:
Calendar0 = now
Ciao
Access


title: Calendario Access.

author: Alessandro Baraldi

text:

L'uso di OCX sarebbe da restringere solo a quelli realmente
necessari... ed i calendario non è tra questi.
Prova a vedere questi Demo:
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=278http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=87
Ciao
@Alex


title: calcolo differenza tra due orari

text:
Salve,
dovrei calcolare la differenza tra due date da due campi e non so come fare, ora mi spiego meglio.
Ho un campo "inizio ora" ed un campo " ore finale" e l'orario di lavoro finisce alle 15:12.
Vorrei calcolare quante le ore e minuti di straordinario che faccio oltre le 15:12.
Quale funzione posso usare?
Grazie del vostro aiuto


title: calcolo differenza tra due orari

author: Bruno Campanini

text:
..:: GiGhEn ::.. formulated the question :

Prova questa funzione:
=================================
Public Function TimeDiff(TimeFin)
Dim T, H, M, S

T = DateDiff("s", #3:12:00 PM#, TimeFin)
    H = Int(T / 3600)
    M = Int((T - H * 3600) / 60)
    S = T - 3600 * H - M * 60
TimeDiff = H & ":" & M & ":" & S

End Function
================================

Dove TimeFin è il campo di Form che porta l'ora di uscita.

Bruno


title: calcolo differenza tra due orari

text:

Ciao, grazie della celere risposta, ma non so dove inserire la funzione visto che io la volevo mettere in una casella di testo perchè non devo salvarla, mi deve solo apparire nella maschera. Poi si vedrà se inserire un campo per archiviarla.


title: calcolo differenza tra due orari

text:
..:: GiGhEn ::.. was thinking very hard :

È una UDF: User Defined Function; per poterla utilizzare devi
inserirla in um Modulo, come segue:

1 - AltF11 per accedere all'editor VBA
2 - sulla barra del menu LeftClick su Insert, scegli Module
    ed ivi copia quanto segue:

=========================================
Option Explicit
Option Compare Database

Public Function TimeDiff(TimeFin)
Dim T, H, M, S

If Not IsNull([TimeFin]) Then
    T = DateDiff("s", #3:12:00 PM#, TimeFin)
    H = Int(T / 3600)
    M = Int((T - H * 3600) / 60)
    S = T - 3600 * H - M * 60
    TimeDiff = CDate(H & ":" & M & ":" & S)
End If

End Function
=========================================

3 - Ancora AltF11 per ritornare da dove sei partito
4 - In Control Source della casella che ti interessa poni:
    =TimeDiff([TimeFin])
    (TimeFin è il nome che ho assegnato alla casella che
     porta l'ora di uscita dal lavoro: se ne cambi il nome
     il cambiamento dovrà essere riportato anche nel codice)
5 - Quando chiudi il database ti verrà chiesto il nome da
    assegnare al Modulo che hai generato: qualunque nome va bene.

Bruno


title: SQL

author: Daniele Da Fatti

text:
Qualcuno di Voi ha dei riferimenti a siti che trattino SQL ( info, slide,
txt o quant'altro )
Grazie


title: SQL

author: ing. Franco Varoli

text:


Puoi seguire le lezioni su Basi di dati che trasmettono su
RaiNettunoSat1. Sono 30 lezioni di 45 minuti l'una. Non insegnano a
programmare in VBA, pero' trattano molto bene la parte che riguarda la
progettazione di un database, l'algebra relazionale ed il linguaggio
SQL con degli esempi presentati bene.
Puoi consultare il sito del Dipartimento Nettuno agli indirizzi
http://www.uninettuno.it/
 e
http://nettuno.stm.it/
Attenzione perche' non sempre funzionano.
ing. Franco Varoli
fva...@tin.it
fva...@libero.it


title: SQL

author: Lucia Rita Carfagno

text:
"Daniele Da Fatti" <
daf...@cpsoftware.it
> ha scritto nel messaggio
news:BhKL7.163368$sq5.7...@news.infostrada.it...
> Qualcuno di Voi ha dei riferimenti a siti che trattino SQL ( info, slide,
> txt o quant'altro )
>
> Grazie
>
>
>
Personalmente ritengo utilissime e valide le lezioni fatte al Politecnico di
Torino su Nettuno, però se hai problemi di tempo posso indicarti un testo
fatto davvero molto bene.
Il testo si chiama 'Imparare in 6 ore SQL' di Riccardo Cervelli - Editore
Tecniche Nuove.
Il testo contiene tutto in maniera sintetica, però abbastanza esaustiva e
comprensibile.
Saluti Rita


title: SQL

author: Pierpa

text:
Il 24 Nov 2001, 11:05, "Daniele Da Fatti" <
daf...@cpsoftware.it
> ha
scritto:

>Grazie
Prova questo:
www.suffritti.it/SQLTutorial.htm
Pierpa
--------------------------------
Inviato via
http://usenet.iol.it


title: Dlookup in un report

author: Kripsio

text: E' possibile utilizzare la funzione Dlookup in un report?


title: Dlookup in un report

author: mino

text:
Kripsio ha scritto:
> E' possibile utilizzare la funzione Dlookup in un report?
dipende per fare cosa specifica meglio cosa ti serve.
ciao
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Dlookup in un report

author: Sergio MAZZA

text:
"Kripsio" <
a...@efo.it
> ha scritto nel messaggio
news:ygJpb.409336$R32.13...@news2.tin.it...
> E' possibile utilizzare la funzione Dlookup in un report?
>
Sě...
Ciao.
--
Sergio MAZZA


title: Dlookup in un report

text:
Ho un report chiamato "DETTAGLIO" nel quale è presente un campo chiamato
TOTNETTO vorrei utilizzare una funzione dlookup per andare a cercare in una
tabella composta dalle colonne
IDCATEGORIA
MINIMO
MASSIMO
INCENTIVO
in quale riga si trova il mio valore TOTNETTO e restituire in un altro campo
chiamato INCENTIVI il valore corrispondente alla riga usata come posso fare?
"Kripsio" <
a...@efo.it
> ha scritto nel messaggio
news:ygJpb.409336$R32.13...@news2.tin.it...



title: Dlookup in un report

text:
Kripsio ha scritto:


si in questo caso puoi tranquillamente fare una dlookup appropriata che ti
restituisce il valore. è interesante però sapere se il tuo campo totnetto
è un campo di una tabella o è un campo calcolato del tuo report.



title: Dlookup in un report

text:
è un campo calcolato sul report



title: Dlookup in un report

text:
Kripsio ha scritto:


allora nei criteri della dlookup devi mettere lo stesso calcolo che hai
nel campo calcolato e confrontarlo con il tuo campo del report.



title: problema con query e join

author: Generale Cluster

text:
Ciao a tutti,
ho una tabella fatture e una tabella clienti così esemplificabili:
FATTURE:
idfattura
idcliente
importo
idreferente
data
idreferente è l'id del cliente che ha presentato il cliente al quale è
stata emessa fattura.
CLIENTI:
idcliente
ragione_sociale
Ho bisogno di recuperare con una query la ragione sociale del cliente,
la ragione sociale del referente se esiste, l'importo della fattura.
Con questa query mi riesce l'operazione, ma vorrei capire se riesco a
semplificarne un po' la struttura, magari togliendo lo UNION.
Come si può fare?
select b.numero,a.[ragione_sociale],b.importo, c.[ragione sociale] as
referente
from clienti a, fatture b , clienti c
where a.idcliente=b.[idcliente]  and c.idcliente=b.idreferente and
b.data>='20080801' and b.data<='20080808'
UNION
select b.idfattura,a.[ragione_sociale],b.importo, ''
from clienti a, fatture b
where a.idcliente=b.[idcliente] and b.idreferente is null and
b.data>='20080801' and b.data<='20080808'
grazie
bye!
--
elimina unsampdoriano per rispondere via email


title: problema con query e join

author: Cinzia

text:
"Generale Cluster" <
alexunsa...@unsampdorianosoftmasters.net
> ha
scritto nel messaggio news:g7h59b$36t$1...@aioe.org...

Ciao generale Cluster,
prova così:
SELECT b.numero,a.[ragione_sociale],b.importo, c.[ragione sociale] as
  referente
 FROM fatture b INNER JOIN Clienti a
    ON b.idCliente = a.idCliente
LEFT JOIN clienti c
    ON b.idReferente = c.idCliente
 WHERE b.data>='20080801' and b.data<='20080808'
--
Cinzia [Office Access MVP]
_______________________

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


title: query a campi incrociati particolare

author: omnitow

text:
Sto cercando di ottenere una query a campi incrociati in runtime che mostri
in verticale tutti i campi e relativi valori di una tabella multipla a
struttura dinamica.
La tabella multipla è composta da una tabella tbPunti (con numero fisso di
campi) e da un numero variabile di tabelle (tbPuntiN) con numero variabile
di campi puParN tutti elencati in tbDefParametri.
Descrivo la struttura delle tabelle:
tbPunti
puID, .....
tbPunti1
puID, puPar11, puPar12 ....
tbPunti2
puID, puPar21, puPar22 ....
tbPuntiN
puID, puParN1, puParN2 ....
tbDefParametri
dpNomeParametro, dpCampoTabPunti, dpNomeTabPunti, .....
tutte le tabelle tbPuntiN sono in relazione Uno ad Uno + integrita
referenziale su elimizazione con la tabella tbPunti
Ora, partendo da questa struttura, e conoscendo a priori tutti i nomi delle
tabelle ed i nomi dei campi che compongono la tabella multipla, genero la
stringa SQL da passare a QueryDefs("MiaQuery").SQL
TRANSFORM
First(Switch([dpCampoTabPunti]='PuPar01',[TabPunti0].[PuPar01],[dpCampoTabPu
nti]='PuPar02',[TabPunti0].[PuPar02],[dpCampoTabPunti]='PuPar0N',[TabPunti0]
.[PuPar0N],[dpCampoTabPunti]='PuPar11',[TabPunti1].[PuPar11],
..................................)) AS EsprValore
SELECT tbDefParametri.dpCampoTabPunti, ........
FROM tbDefParametri, ((tbPunti0 INNER JOIN tbPunti1 ON tbPunti0.puID =
tbPunti1.puID) INNER JOIN tbPunti2 ON tbPunti0.puID = tbPunti2.puID) INNER
JOIN tbPunti3 ON tbPunti0.puID = tbPunti3.puID
WHERE(((tbPunti0.puID) = 173 Or (tbPunti0.puID) = 176))
GROUP BY tbDefParametri.dpCampoTabPunti, tbDefParametri.dpNome,
tbDefParametri.dpVoce
PIVOT 'Valore';
nella FROM non includo tbPunti (tabella "primaria" della multitabella)
perche non contiene nessun campo che mi interessa e la sostituisco con la
prima delle tbPuntiN
La SWITCH, le condizioni WHERE  ed i JOIN li compilo da codice conoscendo
gli ID da ricercare e, come detto prima, i nomi dei campi e delle tabelle.
Finalmente arrivo al dunque
Quando apro la query non viene visualizzato nessun record mentre se dalla
struttura, mantengo dolo le tabelle tbPunti0 e tbPunti, quindi
FROM tbDefParametri, tbPunti0 INNER JOIN tbPunti1 ON tbPunti0.puID =
tbPunti1.puID
il risultato (parziale) e corretto. Leggendo i post precedenti ho pensato
che il problema sia nel fatto che non tutti i puID contenuti nella prima
tabella tbPunti0, sono contenuti nelle restanti tabelle tbPuntiN (puo
presentarsi il caso che siano anche vuote) e quindi sostituire INNER JOIN
con LEFT JOIN
FROM tbDefParametri, ((tbPunti0 LEFT JOIN tbPunti1 ON tbPunti0.puID =
tbPunti1.puID) LEFT JOIN tbPunti2 ON tbPunti0.puID = tbPunti2.puID) LEFT
JOIN tbPunti3 ON tbPunti0.puID = tbPunti3.puID
ma access mi avvisa con "espressione JOIN non supportata"
dove sto' sbagliando?
ciao omnitow


title: Query di ricerca

author: F. Piccardi

text:
Ciao a tutti
Uso Access 97
Ho una tabella per la gestionbe di una videoteca
Una maschera di ricerca con dei controlli testo relativi ai campi della
tabella nei quali eseguo un requery.
Ho una query parametrica che mi consente di effettuare ricerche con uno o
più parametri, la cosa che non riesco a impostare nella query è un'eventuale
ricerca della durata del video maggiore o uguale al parametro digitato nel
controllo relativo.
Cosi come è impostata infatti mi trova i corrisponedenti della durata uguali
al parametro inserito nel controllo di ricerca
Questa è la query:
SELECT TabVideoteca.Cassetta, TabVideoteca.[Data di archiviazione],
TabVideoteca.Titolo, TabVideoteca.Genere, TabVideoteca.Durata,
TabVideoteca.[Data di registrazione], TabVideoteca.[Canale di
registrazione], nz([imprestata a],"") AS imprestala
FROM TabVideoteca
WHERE (((TabVideoteca.Cassetta) Like
IIf(IsNull([forms]![masccerca]![txtcercacassetta]),"*",[forms]![masccerca]![
txtcercacassetta] & "*")) AND ((TabVideoteca.Titolo) Like
IIf(IsNull([forms]![masccerca]![txtcercatitolo]),"*","*" &
[forms]![masccerca]![txtcercatitolo] & "*")) AND ((TabVideoteca.Genere) Like
IIf(IsNull([forms]![masccerca]![cbcercagenere]),"*","*" &
[forms]![masccerca]![cbcercagenere] & "*")) AND ((TabVideoteca.Durata) Like
IIf(IsNull([forms]![masccerca]![txtcercadurata]),"*",[forms]![masccerca]![tx
tcercadurata])) AND ((nz([imprestata a],"")) Like
IIf(IsNull([forms]![masccerca]![txtcercaimprestata]),"*","*" &
[forms]![masccerca]![txtcercaimprestata] & "*")));
Franco


title: Query di ricerca

author: Roberto dalla campagna

text:
F. Piccardi <
f.pic...@tin.it
> wrote in message
SYwUa.27444$Za4.7...@news2.tin.it...

Il campo Durata che tipo dati ha?
Data/ora, Testo o che cosa?
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Query di ricerca

text:
Roberto dalla campagna <
r.ma...@libero.it
> wrote in message
nQNUa.206828$lK4.5...@twister1.libero.it...
>
> F. Piccardi <
f.pic...@tin.it
> wrote in message
> SYwUa.27444$Za4.7...@news2.tin.it...
> > Ciao a tutti
> >
> >
> > Uso Access 97
> >
> > Ho una tabella per la gestione di una videoteca

    I dati sono di tipo numerico
    Franco



title: Ripetitività Comando Query: cod SQl o VBS?

author: Gabriella

text:
Salve a tutti,
è la prima volta che scrivo in questo forum.
Vorrei sapere se è possibile creare una ripetizione nell'esecuzione di una
query.
Mi spiego: lancio la query, e questa mi dà quanto richiesto.
Ora, esiste un modo per dire: Vuoi fare una nuova ricerca o usciamo?
Così non devo rilanciare la query nel caso devo cercare nello stesso
momento 5 clienti, per esempio.
Grazie a chi mi darà una dritta sull'argomento.
(P.S. conosco poco il VisualBasic).
Ciao
Gabriella
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


author: sunrex

text:
"Gabriella" <
gabryBa...@tele2.it
> ha scritto nel messaggio
news:br1h82$m9$1...@news.newsland.it...
> Salve a tutti,
> è la prima volta che scrivo in questo forum.
> Vorrei sapere se è possibile creare una ripetizione nell'esecuzione di una
> query.
> Mi spiego: lancio la query, e questa mi dà quanto richiesto.
> Ora, esiste un modo per dire: Vuoi fare una nuova ricerca o usciamo?
> Così non devo rilanciare la query nel caso devo cercare nello stesso
> momento 5 clienti, per esempio.
> Grazie a chi mi darà una dritta sull'argomento.
> (P.S. conosco poco il VisualBasic).
> Ciao
> Gabriella
>
Partendo dal presupposto che la qry la lanci da un pulsante......
Ho creato una qry su una tbl che ho chiamato Query1....
Con l'autocomposizione mi sono fatto un pulsante per lanciarla....
E poi con una spruzzatina di VBA ecco qua quello che volevi....
Più tecnicamente ho impostato un loop che si chiude solo se rispondi no
alla domanda del msgbox.In queste poche righe puoi vedere tutta la
potenza e la semplicità di VBA.Nota la dichiarazione della variabile
intScelta.
Fammi sapere se era quello che volevi.
SunRex
Private Sub Comando30_Click()
Dim intScelta As Integer
On Error GoTo Err_Comando30_Click
    Dim stDocName As String
    stDocName = "Query1"
    DoCmd.OpenQuery stDocName, acNormal, acEdit
    Do Until intScelta = vbNo
        intScelta = MsgBox("Vuoi rieseguire la query?", vbQuestion +
vbYesNo, "Bada a quello che rispondi")
            DoCmd.OpenQuery stDocName, acNormal, acEdit
            DoCmd.OpenQuery stDocName, acNormal, acEdit
        Loop
Exit_Comando30_Click:
    Exit Sub
Err_Comando30_Click:
    MsgBox Err.Description
    Resume Exit_Comando30_Click
End Sub



author: ADELISIA M.

text:
Era proprio quello che cercavo!
Grazie mille e grazie per la solerzia nel rispondermi e per la completezza
della risposta!
Grazie ancora!
Ciao
Gabriella
sunrex ha scritto:


> SunRex
> Private Sub Comando30_Click()
> Dim intScelta As Integer
> On Error GoTo Err_Comando30_Click
>     Dim stDocName As String




>         Loop
> Exit_Comando30_Click:
>     Exit Sub

> End Sub

--



text:
"ADELISIA M." <
adelisiaT...@everyday.com
> ha scritto nel messaggio
news:br43lo$ne7$1...@news.newsland.it...
>
>
> Era proprio quello che cercavo!
> Grazie mille e grazie per la solerzia nel rispondermi e per la completezza
> della risposta!
> Grazie ancora!
> Ciao
> Gabriella
>
Prego.
Due precisazioni cmq
1) quando rispondi scrivi dopo il messaggio e non prima (regola di questo
ng)
2) ma non facevi prima a ripremere il pulsante ?  ;)
SunRex


text:
Comunque mi dà errore.
Me lo dà proprio sulla prima istruzione Private Sub Comando30_Click()
Dice Errore di compilazione
Prevista End Sub()
Ciao
Private Sub Comando30_Click()
Dim intScelta As Integer
On Error GoTo Err_Comando30_Click
Dim stDocName As String
stDocName = "Query1"
DoCmd.OpenQuery stDocName, acNormal, acEdit
Do Until intScelta = vbNo
intScelta = MsgBox("Vuoi rieseguire la query?", vbQuestion +
vbYesNo, "Bada a quello che rispondi")
DoCmd.OpenQuery stDocName, acNormal, acEdit
DoCmd.OpenQuery stDocName, acNormal, acEdit
Loop
Exit_Comando30_Click:
Exit Sub
Err_Comando30_Click:
MsgBox Err.Description
Resume Exit_Comando30_Click
End Sub
--



text:
"ADELISIA M." <
adelisiaT...@everyday.com
> ha scritto nel messaggio
news:br47ac$rpk$1...@news.newsland.it...
>
> Comunque mi dà errore.
> Me lo dà proprio sulla prima istruzione Private Sub Comando30_Click()
> Dice Errore di compilazione
> Prevista End Sub()
> Ciao
Controlla che tutta la routine stia tra
Private Sub Comando30_Click()
ed
End Sub
SunRex



title: Report con immagini

author: Enrico

text:
Ho un problema con la stampa e anteprima dei report con immagini ovvero ho
una composizione e la lista di oggetti che la compone alla fine della pagina
o delle pagine se esiste l'immagine viene inserita, per fare cio mi creo una
tabella temporanea dove inserisco il percorso del file per rendere il tutto
piu veloce il problema è che mi visualizza sempre l'ultima immagine che è
nella tabella temporanea per tutte le pagine del report anche se non ci
dovrebbere essere nessuna immagine.
Qualcuno di voi ha mai avuto a che fare con questi problemi, se vi serve il
codice del report ve lo posso aNche scrivere per vedere se commetto qualche
errore.
Grazie Enrico


title: Casella di Riepilogo

author: Ghost

text:
Risolto
grazie comunque


title: Date ()

author: Cam

text:
Ho fatto un file mdb sotto access 2003. Non riesco a capire il perchè
ma sul mio computer funzione (s.o. Win xp) mentre su un altro computer
(sempre s.o. win xp) mi da errore in tutte le query o tabelle dove ho
inserito la funzione "date()".
Perciò spesso file mdb 2 computer sempre con win xp e access 2003 su
uno riconosce la funzione date() su un altro no.
Vi sembra possibile?


title: Date ()

author: Alessandro Cara

text:
Cam wrote:

Si. controlla i riferimenti.
--
a.cara


title: Date ()

author: TheMax

text:
"Alessandro Cara" <
alexqu...@blunet.it
> ha scritto nel messaggio
news:c46tu1$2ectu7$1...@ID-163946.news.uni-berlin.de...

Era successo lo stesso anche a me, controlla i riferimenti e aggiornamli
come già consigliato. Altrimenti usa un'altra funzione di conversione come
Clgn(Now())
Ciao,
Massimo
--
web:
www.piubelli.net
Vuoi il mio indirizzo? Togli _cut_ per rispondermi


title: Date ()

author: Sergio

text:
"Cam" <
f...@libero.it
> ha scritto nel messaggio
news:5srd60lrb5mvr8tlf...@4ax.com...
> Ho fatto un file mdb sotto access 2003. Non riesco a capire il perchč
> ma sul mio computer funzione (s.o. Win xp) mentre su un altro computer
> (sempre s.o. win xp) mi da errore in tutte le query o tabelle dove ho
> inserito la funzione "date()".
> Perciň spesso file mdb 2 computer sempre con win xp e access 2003 su
> uno riconosce la funzione date() su un altro no.
>
> Vi sembra possibile?
la butto lě...per caso un winxp non č italiano...oppure access...oppure i
settaggi internazionali...


title: Date ()

author: MA

text:
"Sergio" <
serpic_toglimi@toglimi_libero.it
> ha
scritto nel messaggio
news:c476dq$ohp$1...@fata.cs.interbusiness.it...

Come stai a riferimenti DAO 3.6?
MAssimiliano


title: Date ()

text:
Sicuro che esiste la funzione Clgn(Now()) o hai commesso un errore di
ortografia?
Il Sun, 28 Mar 2004 23:07:00 +0200, "TheMax" <
elpiub...@yahoo.it
>
ha scritto:



title: Date ()

text:
Cam wrote:
> Sicuro che esiste la funzione Clgn(Now()) o hai commesso un errore di
> ortografia?
per favore rispondi dopo il "quoting"
"clgn" non lo so
forse "clng" esiste
[cut]
--
a.cara


title: Modificare la struttura delle tabelle

author: Salvatore

text:
Ciao a tutti,
ho un problema:
dovrei modificare le proprietà di alcuni campi  di una tabella, ma devo fare
tutto questo da in automatico.Qualcuno saprebbe dirmi qual'è il codice in VB
per fare questo? Grazie in anticipo!


title: Modificare la struttura delle tabelle

author: Luciano (DOC)

text:
Salvatore ha scritto nel messaggio <93v45f$c7h$
1...@news.cineca.it
>...
>Ciao a tutti,
>ho un problema:
>dovrei modificare le proprietą di alcuni campi  di una tabella, ma devo
fare
>tutto questo da in automatico.Qualcuno saprebbe dirmi qual'č il codice in
VB
>per fare questo? Grazie in anticipo!
Guardati sull'help la gerarchia degli oggetti DAO. Ogni campo dell'insieme
fields ha delle proprieta' settabili da codice.
Saluti.
Luciano
(DOC)


title: Modificare la struttura delle tabelle

author: Lbo

text:
>dovrei modificare le proprietà di alcuni campi  di una tabella, ma devo fare
>tutto questo da in automatico.Qualcuno saprebbe dirmi qual'è il codice in VB
automaticamente non si modifica niente.
comunque oltre a quello che ti ha detto luciano vedi anche il comando
alter table dell'sql.
--
non studio non lavoro non guardo la tv
non vado al cinema non faccio sport
----------------------------------------
il sito comune di it.comp.appl.access:
http://members.xoom.it/it_db_access


title: Nuovo record su campo vuoto

author: Filippo

text:
Buongiorno a tutti, ho il seguente problema:
ho due tabelle 1° anagrafica 2° dati aggiuntivi.
la relazione avviene tra il campo "ragionesociale" in entrambe le tabelle,
inserita manualmente.
Il problema sta quando provo ad aggiungere un dato aggiuntivo la maschera si
resetta quindi anche la ragione sociale e devo inserirla a mano e in modo
preciso altrimenti si perde la relazione. E' possibile aggiungere un comando
al pulsante "nuovo record" che in automatico copi la ragione sociale dalla
maschera attuale e me la reinserisca manualmente dopo la pressione del tasto
aggiungi record?
Scausatemi se sono domande magari stupide o terra terra sto cercando di
riuscirci come posso.
Grazie mille, Filippo.


title: Nuovo record su campo vuoto

author: newsmino

text:
Filippo ha scritto:

anzitutto non devi usare un campo testo come relazione ma devi usare un
campo contatore nella prima tabella e metterlo anche nella seconda come
campo numerico
poi basta fare due maschere e correllarle con il campo contatore
il resto va da sè
ciao
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Nuovo record su campo vuoto

text:
"newsmino" <
news...@libero.it
> ha scritto nel messaggio
news:g4vg2i$9c9$1...@news.newsland.it...

Grazie, la relazione deve essere uno a molti vero? io attualmente la ricerca
la facevo in questo modo:
[ragione_sociale]=[Maschere]![Anagrafica]![ragione_sociale]    era una
alternativa vero? poi come farò la ricerca dei dati aggiuntivi dalla
maschera anagrafica?
Grazie ancora.


title: Nuovo record su campo vuoto

text:
Filippo ha scritto:

la relazione deve essere uno a molti e l'indice del campo contattore della
seconda tabella deve essere a "duplicati ammessi"
la ricerca la fai sempre per ragione sociale, come prima, ma il risultato
te lo da access in base ai due campi correllati ealla richiesta che fai tu
nella ragione sociale



title: Nuovo record su campo vuoto

text:
"newsmino" <
news...@libero.it
> ha scritto nel messaggio
news:g4vgla$ci8$1...@news.newsland.it...

Ok un' ultima cosa; nella tabella anagrafica creo un campo contatore che va
avanti progressivamente per conto suo e sarà la chiave primaria, nella
tabella dei dati aggiuntivi devo creare un altro campo contatore?? non mi è
chiara questa cosa. Scusami.


title: Nuovo record su campo vuoto

text:
Filippo ha scritto:

nella tabella secondaria crei un campo numerico che servirà per il tuo
collegamento con il campo di tipo contatore della tabella principale
ma crea anche un secondo campo di tipo contatore nella tabella secondaria
che chiamerai per esempio id_secondario
tutte le tabelle è buona cosa che abbiano un campo di tipo contatore che
serve come chiave primaria, ricordalo



title: Nuovo record su campo vuoto

text:
"newsmino" <
news...@libero.it
> ha scritto nel messaggio
news:g4vhj3$hq6$1...@news.newsland.it...

E' tutto chiaro, ci provo subito, solamente un piccolo dubbio sul campo
numerico della seconda tabella (che servirà per la relazione con il
contatore della prima tabella) devo editarlo io o come si genera l'id uguale
al contatore della prima tabella?


title: Nuovo record su campo vuoto

text:
Filippo ha scritto:

se usi le maschere, io spero e credo, basta mettere nei campi master e
secondari il nome del campo di tipo contatore della maschera principale ed
il relativo campo secondario ne campi secondari



title: Nuovo record su campo vuoto

text:
"newsmino" <
news...@libero.it
> ha scritto nel messaggio
news:g4vnt2$m13$1...@news.newsland.it...

Forse ho fatto confusione, mi spigo meglio: 2 tabelle: tabella 1 anagrafica,
tabella 2 altri dati.
Maschera anagrafica dove ho i dati principali poi pulsante "visualizza dati
secondari". Alla pressione del pulsante mi apre la sottomaschera "altri
dati". Io vorrei: 1° premendo visualizza dati aggiuntivi vedere i soli dati
relativi a quel record e fin qui ok 2° poter aggiungere "dati aggiuntivi"
nella seconda tabella relativi al record aperto nella maschera 1. Quando
faccio nuovo record devo aver fatto precedentemente copia e reincollare la
ragione sociale altrimenti è come se popolassi la seconda tabella senza
nessun collegamento con la prima.
Grazie.


title: Nuovo record su campo vuoto

text:

Ciao Filippo, un parere: io nn userei il campo contatore di Access, ma un campo numerico che incrementerei da codice. L'idea è che tu abbia 2 tabelle unite con una relazione 1 a molti. La tabella Padre contiene, diciamo, l'intestazione del documento, la tabella figlio le righe. Esempio: se dovessi fare una fattura di vendita, avresti :
PADRE
NumFattura (chiave primaria)
Intestazione
Varie cose
FIGLIO
NumFattura (collegato a PADRE)
Varie cose
Quando tu crei una maschera con sottomaschera per visualizzare il tutto, succede che la maschera principale contiene quello che ho definito PADRE e la sottomaschera il figlio. Nei campi master e secondari (finestra proprietà della sottomaschera) devi imporre quali sono i campi a cui Access deve riferirsi per collegare i due oggetti: MASTER (NumFattura PADRE), secondari (NumFattura figlio). Ora le due maschere sono collegate. Quando fai un'inserimento nn c'è bisogno che duplichi la ragione sociale (è già nel PADRE): è suff che ripeti il NumFattura e le due cose sono già collegate. Se all'inizio uso la composizione guidata per creare la sottomaschera, Access ti aiuta a fare tutto. Per inserire un nuovo record devi imporre che il NumFattura sia il medesimi del PADRE.
Spero di essere stato chiaro
Ciao

--
Questo articolo e` stato inviato dal sito web
http://www.nonsolonews.it


title: Nuovo record su campo vuoto

text:
"Fair87" <
roby...@gmail.com
> ha scritto nel messaggio
news:g50mu4$2qv$1...@news.nonsolonews.it...

Sei stato chiarissimo Fair e ti ringrazio.
Nel caso fatture ripeterei il numero fattura, nel caso di una anagrafica
ripeto l'id esatto? Quello che vorrei capire ulteriormente è se quando mi
trovo in anagrafica e sto inserendo i dati: Nome, cognome, poi premo altri
dati per aggiungerli devo inserire a mano l'id del record? Non è possibile
fare in modo che se sto già visualizzando il record "pippo" quando premo
dati aggiuntivi lui li leghi automaticamente a pippo?
Grazie tante.


title: Nuovo record su campo vuoto

text:
On 8 Lug, 15:04, "Filippo" <
filippo...@libero.it
> wrote:
> "newsmino" <
newsm...@libero.it
> ha scritto nel messaggionews:g4vnt2$m13$1...@news.newsland.it...
>
>
>
> > Filippo ha scritto:
>
> >> "newsmino" <
newsm...@libero.it
> ha scritto nel messaggio
> >>news:g4vhj3$hq6$1...@news.newsland.it...
> >> > Filippo ha scritto:
>
> >> >> "newsmino" <
newsm...@libero.it
> ha scritto nel messaggio
> >> >>news:g4vgla$ci8$1...@news.newsland.it...
> >> >> > Filippo ha scritto:
>
> >> >> >> "newsmino" <
newsm...@libero.it
> ha scritto nel messaggio

> >> >> >> >
http://www.newsland.it/newssegnala
 gli abusi ad
> >> >> >> >
ab...@newsland.it
>
> >> >> >> Grazie, la relazione deve essere uno a molti vero? io attualmente
> >> >> >> la
> >> >> >> ricerca
> >> >> >> la facevo in questo modo:
> >> >> >> [ragione_sociale]=[Maschere]![Anagrafica]![ragione_sociale]    era
> >> >> >> una
> >> >> >> alternativa vero? poi come farò la ricerca dei dati aggiuntivi
> >> >> >> dalla
> >> >> >> maschera anagrafica?
> >> >> >> Grazie ancora.
> >> >> > la relazione deve essere uno a molti e l'indice del campo contattore
> >> >> > della
> >> >> > seconda tabella deve essere a "duplicati ammessi"
>
> >> >> > la ricerca la fai sempre per ragione sociale, come prima, ma il
> >> >> > risultato
> >> >> > te lo da access in base ai due campi correllati ealla richiesta che
> >> >> > fai
> >> >> > tu
> >> >> > nella ragione sociale
>
> >> >> > ciao
>
> >> >> > --
>
> >> >> > questo articolo e` stato inviato via web dal servizio gratuito
> >> >> >
http://www.newsland.it/newssegnala
 gli abusi ad
ab...@newsland.it
>
> >> >> Ok un' ultima cosa; nella tabella anagrafica creo un campo contatore
> >> >> che
> >> >> va
> >> >> avanti progressivamente per conto suo e sarà la chiave primaria, nella
> >> >> tabella dei dati aggiuntivi devo creare un altro campo contatore?? non
> >> >> mi
> >> >> è
> >> >> chiara questa cosa. Scusami.
>
> >> > nella tabella secondaria crei un campo numerico che servirà per il tuo
> >> > collegamento con il campo di tipo contatore della tabella principale
>
> >> > ma crea anche un secondo campo di tipo contatore nella tabella
> >> > secondaria
> >> > che chiamerai per esempio id_secondario
>
> >> > tutte le tabelle è buona cosa che abbiano un campo di tipo contatore
> >> > che
> >> > serve come chiave primaria, ricordalo
>
> >> > ciao
>
> >> > --
>
> >> > questo articolo e` stato inviato via web dal servizio gratuito
> >> >
http://www.newsland.it/newssegnala
 gli abusi ad
ab...@newsland.it
>
> >> E' tutto chiaro, ci provo subito, solamente un piccolo dubbio sul campo
> >> numerico della seconda tabella (che servirà per la relazione con il
> >> contatore della prima tabella) devo editarlo io o come si genera l'id
> >> uguale
> >> al contatore della prima tabella?
>
> > se usi le maschere, io spero e credo, basta mettere nei campi master e
> > secondari il nome del campo di tipo contatore della maschera principale ed
> > il relativo campo secondario ne campi secondari
>
> > ciao
>
> > --
>
> > questo articolo e` stato inviato via web dal servizio gratuito
> >
http://www.newsland.it/newssegnala
 gli abusi ad
ab...@newsland.it
>
> Forse ho fatto confusione, mi spigo meglio: 2 tabelle: tabella 1 anagrafica,
> tabella 2 altri dati.
> Maschera anagrafica dove ho i dati principali poi pulsante "visualizza dati
> secondari". Alla pressione del pulsante mi apre la sottomaschera "altri
> dati". Io vorrei: 1° premendo visualizza dati aggiuntivi vedere i soli dati
> relativi a quel record e fin qui ok 2° poter aggiungere "dati aggiuntivi"
> nella seconda tabella relativi al record aperto nella maschera 1. Quando
> faccio nuovo record devo aver fatto precedentemente copia e reincollare la
> ragione sociale altrimenti è come se popolassi la seconda tabella senza
> nessun collegamento con la prima.
> Grazie.- Nascondi testo citato
>
> - Mostra testo citato
Sempre dal basso della mia 'gnoranza:
1) in openform utilizzi openargs (vedi guida online)
2) metti nel valore predefinito della chiave esterna nella maschera
secondaria forms![nomemascheraprincipale.[nomecontrollochiave]
3) invece che una maschera scollegata, utilizzi una sottomaschera
(magari con uan struttura a schede e colleghi i campi chiave (te lo
chiede la procedura guidata quale sia la relazione))
F.


title: Nuovo record su campo vuoto

text:
[TAGLIO]
>Sei stato chiarissimo Fair e ti ringrazio.
>Nel caso fatture ripeterei il numero fattura, nel caso di una anagrafica
>ripeto l'id esatto? Quello che vorrei capire ulteriormente è se quando mi
>trovo in anagrafica e sto inserendo i dati: Nome, cognome, poi premo altri
>dati per aggiungerli devo inserire a mano l'id del record? Non è possibile
>fare in modo che se sto già visualizzando il record "pippo" quando premo
>dati aggiuntivi lui li leghi automaticamente a pippo?
>Grazie tante.
>
>
>
[RISPOSTA]
Aspetta un attimo! Se devi aggiungere al tre 'righe' alla 'fattura' 3, ogni riga deve avere nelcampo di collegamento 3. Esempio: Se Girolamo Taddei ha un campi chiave primaria = 7, quando tu premi 'AltriDati' devi impostare il campo di collegamento a 7 (lo fai con OpenArgs, oppure con la formula Forms!TuaSottomaschera.form!TuoCampo.value = tuovalore applicata al bottone che premi, o lo richiami dalla routine di apertura della sottomaschera). In verità tu nn devi pensare di collegare le maschere, ma di scrivere dati consistenti nelle TABELLE in modo che le maschere poi possano visualizzarli in modo corretto.



title: Nuovo record su campo vuoto

text:
"Fair87" <
roby...@gmail.com
> ha scritto nel messaggio
news:g521er$f0c$1...@news.nonsolonews.it...

Esatto hai individuato perfettamente è quello che volevo capire e che mi
serve.
Se l'utente "Taddei" ha id 7, quando premo il pulsante "altri dati" mi si
aprirà la maschera contenenti gli altri dati e avrà riferimento all'id 7.
Quando però premo su nuovo record della stessa maschera (altri dati)
dovrebbe in automatico scrivermi l'id di riferimento ovvero il 7. Ho
problema a realizzazare questo automatismo.
Ti ringrazio.


title: Nuovo record su campo vuoto

text:
Filippo ha scritto:

Io userei uno di questi 2 metodi: o metti (nella sottomaschera) una routine sull'evento 'corrente' impostata a
if me.newrecord then
TuoCampo = forms!NomeMascheraPadre.CampoId.value
end if
in modo che, senza bottoni ma con solo la barra di navigazione di Access quando premi la freccettina/asterisco la routine viene lanciata (ti crea una nuova riga con l'ID corretto) o alla pressione del tuo bottone crei una maschera nn associata con tutti i campi che ti servono (impostando ovviamente l'ID corretto e mettendo la sua casella come BLOCCATA e NON ABILITATA), li riempi e poi, con un altro bottone, esegui una query di accodamento. Io personalmente uso sempre il secondo metodo perchèè posso controllare meglio gli inserimenti. Naturalmente il primo è più veloce....



title: Subtotali maschera continua

author: Ivan

text:
Vorrei sapere se è possibile avere su una maschera continua dei subtotali
stile report:
Mostro un esempio  trovato in un newsgroup di 2 anni fa:
Io vorrei questo:
Data              Cliente            Evaso
10/02/2004    Pippo             ? 30
10/02/2004    Pippo             ? 25
                       Totale Pippo  ? 55
10/02/2004    Lillo                ? 25
                       Totale Lillo     ? 25
            TOTALE 10/02/2004 ? 80
Dove posso eventualmente modificare valori sulle righe dei records e con una
requery aggiornare i totali.
Grazie a tutti.


title: Subtotali maschera continua

author: Roberto da casa

text:
"Ivan" <
bell_...@tin.it
> ha scritto nel messaggio
news:441314b2$0$18300$4faf...@reader1.news.tin.it...

Ti ho risposto nell'altro NG.
>
> Grazie a tutti.
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: Importazione e/o conversione formato

author: lucia

text:
Ciao
in un file di testo ho una colonna di dati di questo tipo
20001001
19991203
19991111
20050102
ogni riga rappresenta una data (aaaammgg).
Con l'importazione guidata riesco ad importare in formato numerico o testo.
L'obiettivo è di avere un formato data/ora.
Quindi la domanda è: posso importare in formato data/ora, oppure una volta
importato il numero o il testo convertirlo in data/ora?
Grazie
lucia


title: Importazione e/o conversione formato

author: Sergio MAZZA

text:
"lucia" <
luc...@hotmail.com
> ha scritto nel messaggio
news:33X7c.84534$Kc3.2...@twister2.libero.it...

Crea una query di accodamento con un campo calcolato con il codice:
cdate(right("19991203";2) & "/" & mid("19991203";5;2) & "/" &
left("19991203";4))
Ciao.
--
Sergio MAZZA


title: Importazione e/o conversione formato

text:
"lucia" <
luc...@hotmail.com
> ha scritto nel messaggio
news:33X7c.84534$Kc3.2...@twister2.libero.it...

DataDataOra = CDate(Right(DataAAAAmmgg, 2) _
& "/" & Mid(DataAAAAmmgg, 5, 2) & "/" _
& Left(DataAAAAmmgg, 4))
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: Importazione e/o conversione formato

text:
"Sergio MAZZA" <
sergi...@tiscalinet.it
> ha scritto
>
> Crea una query di accodamento con un campo calcolato con il codice:
> cdate(right("19991203";2) & "/" & mid("19991203";5;2) & "/" &
> left("19991203";4))
>
Ok, grazie a tutti
ciao


title: Importazione e/o conversione formato

author: knives

text:
> > Ciao
> >
> > in un file di testo ho una colonna di dati di questo tipo
> >
> > 20001001
> > 19991203
> > 19991111
> > 20050102
> >
> > ogni riga rappresenta una data (aaaammgg).
> >
> > Con l'importazione guidata riesco ad importare in formato numerico o
> testo.
> > L'obiettivo è di avere un formato data/ora.
> > Quindi la domanda è: posso importare in formato data/ora, oppure una
volta
> > importato il numero o il testo convertirlo in data/ora?
> >
> > Grazie
> > lucia
>
Chiedo scusa, premetto che non conosco le versioni access in uso in questo
caso, ma proprio oggi importando delle date da un file txt, nella creazione
guidata di access, ad un certo punto, nell'impostare il tipo dati mi pare di
aver notato che selezionando "tipo dati data/ora" acces permette di
scegliere tra GMA, AMG e qualcos'altro, ditemi se sbaglio.
Quindi se così è non è + semplice seguire la procedura di importazione
guidata?
ciao


title: Importazione e/o conversione formato

text:
"knives" <x@x.x> ha scritto
> Chiedo scusa, premetto che non conosco le versioni access in uso in questo
> caso, ma proprio oggi importando delle date da un file txt, nella
creazione
> guidata di access, ad un certo punto, nell'impostare il tipo dati mi pare
di
> aver notato che selezionando "tipo dati data/ora" acces permette di
> scegliere tra GMA, AMG e qualcos'altro, ditemi se sbaglio.
> Quindi se così è non è + semplice seguire la procedura di importazione
> guidata?
> ciao
>
Quelle opzioni credo che servano per specificare il formato dei dati di
origine, quindi scegliendo AMG, Access si aspetta di trovare 2000/10/01 e
non 20001001, per cui l'importazione non va a buon fine.
Così almeno ho capito io.
ciao


title: Importazione e/o conversione formato

text:
"knives" <x@x.x> ha scritto nel messaggio
news:D218c.114371$O31.4...@news4.tin.it...
> > > Ciao
> > >
> > > in un file di testo ho una colonna di dati di questo tipo
> > >
> > > 20001001
> > > 19991203
> > > 19991111
> > > 20050102
> > >
> > > ogni riga rappresenta una data (aaaammgg).
> > >
> > > Con l'importazione guidata riesco ad importare in formato numerico o
> > testo.
> > > L'obiettivo č di avere un formato data/ora.
> > > Quindi la domanda č: posso importare in formato data/ora, oppure una
> volta
> > > importato il numero o il testo convertirlo in data/ora?
> > >
> > > Grazie
> > > lucia
> >
> Chiedo scusa, premetto che non conosco le versioni access in uso in questo
> caso, ma proprio oggi importando delle date da un file txt, nella
creazione
> guidata di access, ad un certo punto, nell'impostare il tipo dati mi pare
di
> aver notato che selezionando "tipo dati data/ora" acces permette di
> scegliere tra GMA, AMG e qualcos'altro, ditemi se sbaglio.
> Quindi se cosě č non č + semplice seguire la procedura di importazione
> guidata?
> ciao
>
"...Provare per credere.."
Ciao.
--
Sergio MAZZA


title: Importazione e/o conversione formato

text:
>
> "...Provare per credere.."
>
> Ciao.
>
> --
> Sergio MAZZA
>
>
E' vero!
Scusate :P


title: Problema con apici in VBA

author: AM Liapunov

text:
Quando inserisco un record nuovo controllo che il cognome non sia già
presente nel db con un'istruzione del tipo...
If DLookup("aut_ID", "tblAutori", "[aut_Nome] = '" & rs![aut_nome] & "' and
[aut_cognome] = '" & rs![aut_cognome] & "'") Then
            MsgBox "L'autore " & rs![aut_cognome] & ", " & rs![aut_nome] & "
esiste già nel db centrale", , "Avvisi"
Tutto funziona alla grande finchè non mi sono trovato ad importare Francesco
d'Assisi.
Ovviamente l'apice presente nel cognome ha scombinato il codice della
DLookUp.
Come posso risolvere il problema???
Grazie


title: Problema con apici in VBA

author: OndaMax

text:
Il 27 Mar 2002, 11:09, "AM Liapunov" <
liap...@uni.de
> ha scritto:
>Tutto funziona alla grande finchè non mi sono trovato ad importare
>Francesco
>d'Assisi.
>Ovviamente l'apice presente nel cognome ha
scombinato il codice della
>DLookUp.
>Come posso risolvere il problema???
.
Elimina i singoli apici (') che racchiudono il nome nel parametro WHERE
e concatena il tutto con CHR(34).
.
DLookup("aut_ID", "tblAutori",
"[aut_Nome] = " & Chr(34) _
& rs![aut_nome] & Chr(34) & " and
[aut_cognome] = " & Chr(34) _
& rs![aut_cognome] & Chr(34))
Ciao
Marco
--------------------------------
Inviato via
http://usenet.iol.it


title: Problema con apici in VBA

author: Namor

text:
Al posto dei singoli apici che usi per racchiudere le stringhe, prova a
mettere due doppi apici, così:
"WHERE Nome=""" & Nome & """ AND Cognome=""" & Cognome & """"
Questo ti darà problemi se nei nomi ci sono doppi apici, ma è più difficile
trovarne di doppi che di singoli in un nome!
Se vuoi proprio essere sicuro al 100%, devi usare una funzione che
sostituisca tutti i doppi apici (") con due doppi apici ("") prima di usare
il nome per costruire il filtro.
-Marco-
"AM Liapunov" <
liap...@uni.de
> ha scritto nel messaggio
news:ETgo8.78709$%g7.25...@twister2.libero.it...



title: Problema con apici in VBA

author: Antonio Biso

text:
Namor <
na...@inwind.it
> wrote in message
fomo8.80107$%g7.25...@twister2.libero.it...
> Al posto dei singoli apici che usi per racchiudere le stringhe, prova a
Scrivi DOPO IL QUOTING!!!
Antonio


title: Licenze .....

author: Jason

text:
Ciao a tutti, lo sò che non è il NG giusto ma !!!!!! spero.
Ho il seguente problema, su W2k3 se vado ad aprire l'utiliti licenze il so
mi risponde che nn è connesso al dominio e mi chiede di indicarlo.
seleziono il dominio che vedo nel riquadro sottostante e mi risponde che
nn riesce ad eseguire la connessione.
i Client sono regolarmente connessi sotto dominio e si collegamo
beatamente in terninal server ma mi visualizzano un messaggio che dice che
le licenze di T S scadrà tra 3 giorni.
P.S. le licenze erano state regolarmente installate a suo tempo come pure
le licenze CAL aggiuntive.
avete qualche dritta.
Grazie anticipatamente.
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Query ricerca duplicati (2)

text:
Su suggerimento del "buffalo" A.Cara
ho ripostato il 3d, in effetti c era un pò
di confuzione.
Appurato che ora funziona...
cè un problemino, nuovo:
Ho provato ad inserire un duplicato, ovviamente
(visto che funziona), mi restituisce il msg
"esiste già quel......"
vuoi salvarlo? io rispondo si.
Vado a controllare nella tbl e trovo
che mi va a selezionare a VERO solo la caselladicontrollo
del primo record duplicato.
A me, servirebbe che li selezionasse entrambi i duplicati!
--
Debora


title: Query ricerca duplicati (2)

text:
> "Debora" [...]:
> Dim crit as string
> Dim rst as recordset
    Dim rst As DAO.Recordset
> Dim msg as string
> Set rst = CurrentDb.openrecorset(crit)
[...]
> If rst.RecordCount > 0 Then
    Consulta la guida a proposito di
        Property RecordCount As Long
            sola lettura
            Membro di DAO.Recordset
in particolare dove dice:
**********
La proprietą RecordCount non indica il numero di record contenuti in un
oggetto Recordset di tipo dynaset, snapshot o forward-only scrolling finché
non si č avuto accesso a tutti i record.
[...]
Quando si utilizzano oggetti TableDef collegati, la proprietą RecordCount č
sempre impostata a -1.
**********
    Considera il codice seguente:
        If ((rst.BOF=True) And (rst.EOF=True)) Then
            '
            ' Nessun record.
            '
            MsgBox <...>
        Else
            '
            ' Scorre tutti i record.
            '
            Do Until rst.EOF = True
                ' ...
                rst.Movenext
            Loop
        End If
--
Ciao :-)
Maurizio
--------
?SPQR(C)
 X
--------
Ho copiato qui quello che hai scritto nel 3d di pari oggetto.
So cosa sono BOF (inizio...) EOF(ultimo...) per aver letto
nell'help, ma non capisco quello che mi vuoi dire.
Cč qualcosa che mi puņ portare all'errore?
--
Debora


title: Query ricerca duplicati (2)

author: Maurizio Borrelli

text:
"Debora.Maniero" <
debbym...@libero.it
> ha scritto nel messaggio
news:INqh9.2594$Hc7....@twister1.libero.it...
> > "Debora" [...]:
> > Dim crit as string
> > Dim rst as recordset
>     Dim rst As DAO.Recordset
    Qui e' chiaro cosa devi fare, vero?
> > Dim msg as string
> > Set rst = CurrentDb.openrecorset(crit)
> [...]
> > If rst.RecordCount > 0 Then
>     Consulta la guida a proposito di
>         Property RecordCount As Long
>             sola lettura
>             Membro di DAO.Recordset
> in particolare dove dice:
> **********
> La proprietà RecordCount non indica il numero di record contenuti in un
> oggetto Recordset di tipo dynaset, snapshot o forward-only scrolling
> finché non si è avuto accesso a tutti i record.
> [...]
> Quando si utilizzano oggetti TableDef collegati, la proprietà RecordCount
> è sempre impostata a -1.
> **********
>     Considera il codice seguente:
>         If ((rst.BOF=True) And (rst.EOF=True)) Then
>             '
>             ' Nessun record.
>             '
>             MsgBox <...>
>         Else
>             '
>             ' Scorre tutti i record.
>             '
>             Do Until rst.EOF = True
>                 ' ...
>                 rst.Movenext
>             Loop
>         End If
> Ho copiato qui quello che hai scritto nel 3d di pari oggetto.
> So cosa sono BOF (inizio...) EOF(ultimo...) per aver letto
> nell'help, ma non capisco quello che mi vuoi dire.
> Cè qualcosa che mi può portare all'errore?
    Voglio dire che non e' opportuno basarsi su RecordCount, all'apertura
del recordset, per decidere se il recordset contiene o non contiene record o
per sapere quanti record contiene.
    Come vedi la guida dice chiaramente che RecordCount *non indica il
numero di record ecc.*. Invece, se *all'apertura* del recordset sia BOF che
EOF hanno valore True allora sei sicura, in qualsiasi circostanza, che il
recordset e' vuoto.



title: Query ricerca duplicati (2)

author: Debora

text:
"Maurizio Borrelli" <
maurizio...@freepass.it
> ha scritto nel messaggio
news:am5elt$2uqhs$1...@ID-52090.news.dfncis.de...
> "Debora.Maniero" <
debbym...@libero.it
> ha scritto nel messaggio
> news:INqh9.2594$Hc7....@twister1.libero.it...
> > > "Debora" [...]:
> > > Dim crit as string
> > > Dim rst as recordset
> >     Dim rst As DAO.Recordset
>
>     Qui e' chiaro cosa devi fare, vero?
>
> > > Dim msg as string
> > > Set rst = CurrentDb.openrecorset(crit)
> > [...]
> > > If rst.RecordCount > 0 Then
> >     Consulta la guida a proposito di
> >         Property RecordCount As Long
> >             sola lettura
> >             Membro di DAO.Recordset
> > in particolare dove dice:
> > **********
> > La proprietą RecordCount non indica il numero di record contenuti in un
> > oggetto Recordset di tipo dynaset, snapshot o forward-only scrolling
> > finché non si č avuto accesso a tutti i record.
> > [...]
> > Quando si utilizzano oggetti TableDef collegati, la proprietą
RecordCount
> > č sempre impostata a -1.
> > **********
> >     Considera il codice seguente:
> >         If ((rst.BOF=True) And (rst.EOF=True)) Then
> >             '
> >             ' Nessun record.
> >             '
> >             MsgBox <...>
> >         Else
> >             '
> >             ' Scorre tutti i record.
> >             '
> >             Do Until rst.EOF = True
> >                 ' ...
> >                 rst.Movenext
> >             Loop
> >         End If
>
>     Voglio dire che non e' opportuno basarsi su RecordCount, all'apertura
> del recordset, per decidere se il recordset contiene o non contiene record
o
> per sapere quanti record contiene.
>
>     Come vedi la guida dice chiaramente che RecordCount *non indica il
> numero di record ecc.*. Invece, se *all'apertura* del recordset sia BOF
che
> EOF hanno valore True allora sei sicura, in qualsiasi circostanza, che il
> recordset e' vuoto.
>
Ho capito. Tu hai letto il mio quesito? Credi che debba rinunciare
nel mio intento?
Ho gią fuso Antonio Biso e A. Cara!
--
Debora


title: Query ricerca duplicati (2)

author: Alessandro Cara

text:
"Debora.Maniero" ha scritto:

metti la famosa edit in un ciclo
do while not rst.eof
   rst.edit
   rst!campo = valore
   rst.update
   rst.movenext
loop
e cerca di essere un po piu' topo...logica
--
a.cara


title: Query ricerca duplicati (2)

text:
"Alessandro Cara" <
al...@blunet.it
> ha scritto nel messaggio
news:3D86D426...@blunet.it...

Ci provo, un'altra cosa:
Uno dei campi in questo caso il campo "SUB" che è di tipo
testo, può noncontenere valori, ho provato a mettergli
 un "-" (come suggeritodal Biso) ma continua a non
riconoscerlo come dato valido.
Ovvero, se scrivo in tutti e 4 campi in questione, funziona
e mi trova i duplicati se ci sono.
Ma se un campo e vuoto o ha il "-" pur essendo uguali negli
altri campi, non lo riconosce come duplicato? Perchè?
--
Debora


title: Query ricerca duplicati (2)

text:
Debora wrote:
[cut]
> Ci provo, un'altra cosa:
> Uno dei campi in questo caso il campo "SUB" che č di tipo
> testo, puň noncontenere valori, ho provato a mettergli
>  un "-" (come suggeritodal Biso) ma continua a non
> riconoscerlo come dato valido.
> Ovvero, se scrivo in tutti e 4 campi in questione, funziona
> e mi trova i duplicati se ci sono.
> Ma se un campo e vuoto o ha il "-" pur essendo uguali negli
> altri campi, non lo riconosce come duplicato? Perchč?
1) il mago Otelma e' su altro NG. ;<)
2) c'e' un 3d recente in cui il buon (si fa per dire) Borrelli ha fatto
   una dotta disquisizione sui Null
   (bada ben bada ben bada bene Null e' diverso da vuoto)
3) se i valori di SUB sono entrambi "-" non vedo perche' non li
   debba considera uguali (discorso diverso per i null)
4) Se postassi il codice che usi per rilevare i duplicati
   sarebbe meglio
5) Quanto ti e' costato Giansergio?
--
a.cara


title: Query ricerca duplicati (2)

text:
"Alessandro Cara" <
al...@blunet.it
> ha scritto nel messaggio
news:3D86E5E6...@blunet.it...

per rilevare i duplicati uso solo quello che ho postato
e che tu stesso mi hai corretto.
lo trovi nel 3d queri duplicate.
Non ho altro codice!
> 5) Quanto ti e' costato Giansergio?
Cioč? Non ti capisco, che vuoi dire
che centra Giansergio?
--
Debora


title: Query ricerca duplicati (2)

text:
> "Debora" [...]:
> > "Maurizio Borrelli" [...]:
> > >     Considera il codice seguente:
> > >         If ((rst.BOF=True) And (rst.EOF=True)) Then
> > >             '
> > >             ' Nessun record.
> > >             '
> > >             MsgBox <...>
> > >         Else
> > >             '
> > >             ' Scorre tutti i record.
> > >             '
> > >             Do Until rst.EOF = True
> > >                 ' ...
> > >                 rst.Movenext
> > >             Loop
> > >         End If
> >     Voglio dire che non e' opportuno basarsi su RecordCount,
> > all'apertura
> > del recordset, per decidere se il recordset contiene o non contiene
> > record o per sapere quanti record contiene.
[...]
> Ho capito. Tu hai letto il mio quesito?
    Sto seguendo il discorso ma ogni tanto mi perdo perche' sei un po'
indisciplinata e tendi a rispondere a botta calda invece di meditare su cio'
che gli illustri colleghi ti scrivono.
> Credi che debba rinunciare nel mio intento?
    Avessi io capito qual e' saprei risponderti, credo.
> Ho già fuso Antonio Biso e A. Cara!
    Se e' cosi' anche tu non devi essere messa molto bene, allora.



title: Query ricerca duplicati (2)

text:
"Debora" <
cbo.ma...@tiscali.it
> ha scritto nel messaggio
news:ZTBh9.4501$Hc7....@twister1.libero.it...
>
> "Alessandro Cara" <
al...@blunet.it
> ha scritto nel messaggio
> news:3D86E5E6...@blunet.it...
> > Debora wrote:
> > [cut]
> > > Ci provo, un'altra cosa:
> > > Uno dei campi in questo caso il campo "SUB" che è di tipo
> > > testo, può noncontenere valori, ho provato a mettergli
> > >  un "-" (come suggeritodal Biso) ma continua a non
> > > riconoscerlo come dato valido.
> > > Ovvero, se scrivo in tutti e 4 campi in questione, funziona
> > > e mi trova i duplicati se ci sono.
> > > Ma se un campo e vuoto o ha il "-" pur essendo uguali negli
> > > altri campi, non lo riconosce come duplicato? Perchè?
> >
> > 1) il mago Otelma e' su altro NG. ;<)
> >
> > 2) c'e' un 3d recente in cui il buon (si fa per dire) Borrelli ha fatto
> >    una dotta disquisizione sui Null
> >    (bada ben bada ben bada bene Null e' diverso da vuoto)
> >
> > 3) se i valori di SUB sono entrambi "-" non vedo perche' non li
> >    debba considera uguali (discorso diverso per i null)
> >
> > 4) Se postassi il codice che usi per rilevare i duplicati
> >    sarebbe meglio
>
> per rilevare i duplicati uso solo quello che ho postato
> e che tu stesso mi hai corretto.
> lo trovi nel 3d queri duplicate.
> Non ho altro codice!
>
> > 5) Quanto ti e' costato Giansergio?
>
> Cioè? Non ti capisco, che vuoi dire
> che centra Giansergio?
>
ho visto, il solito depravato!
ragazzi ne non ne posso più!!!
Saluto tutti quanti, tolgo il disturbo. :°-(
--
Debora


title: Query ricerca duplicati (2)

author: Fabrizio

text:
>cut
> 2) c'e' un 3d recente in cui il buon (si fa per dire) Borrelli ha fatto
>    una dotta disquisizione sui Null
>    (bada ben bada ben bada bene Null e' diverso da vuoto)
>cut
Dimmi dov'è e subito :-) , chè me lo sono perso ( troppi post accidenti a
voi ).
--
Ciao. Fabrizio.


title: Query ricerca duplicati (2)

text:
Debora wrote:
>
[cut]
> >
> > 4) Se postassi il codice che usi per rilevare i duplicati
> >    sarebbe meglio
>
> per rilevare i duplicati uso solo quello che ho postato
> e che tu stesso mi hai corretto.
> lo trovi nel 3d queri duplicate.
> Non ho altro codice!
1) Quando rispondi "cutta" la roba che non serve
   (ho un modem a 1400)
2) In mezzo a quel casino di "Query duplicate" ti
   pare facile trovare le cose?
"> > Ovvero, se scrivo in tutti e 4 campi in questione, funziona
> > e mi trova i duplicati se ci sono.
> > Ma se un campo e vuoto o ha il "-" pur essendo uguali negli
> > altri campi, non lo riconosce come duplicato? Perchè?"
3) Se il codice e' quello che ricordo il campo SUB non c'entra
    nulla, mi spiego:
    se ricerchi "A=0 and B=0"
    rileva tutti i record che hanno contemporaneamente i valori
    A e B a zero. Non mi sembra che nella tua query venga citato
    il campo SUB
4)  Certo che averti come programmatrice in un gruppo di lavoro
    deve essere una bella rogna. Non fai "mai" quello che ti si
    chiede.
--
a.cara


title: Query ricerca duplicati (2)

text:

non lo so. Ultimamente c'e' in giro una certa Debora Maniero e ogni 3d
che la riguarda sembra un romanzo di appendice (ovviamente a puntate)
--
a.cara


title: Query ricerca duplicati (2)

text:
"Alessandro Cara" <
al...@blunet.it
> ha scritto nel messaggio
news:3D86F2EB...@blunet.it...
> Fabrizio wrote:
> >
> > >cut
> > > 2) c'e' un 3d recente in cui il buon (si fa per dire) Borrelli ha
fatto
> > >    una dotta disquisizione sui Null
> > >    (bada ben bada ben bada bene Null e' diverso da vuoto)
> > >cut
> >
> > Dimmi dov'č e subito :-) , chč me lo sono perso ( troppi post accidenti
a
> > voi ).
> > --
> > Ciao. Fabrizio.
>
> non lo so. Ultimamente c'e' in giro una certa Debora Maniero e ogni 3d
> che la riguarda sembra un romanzo di appendice (ovviamente a puntate)
> --
> a.cara
Ti prego non mi dire che č dentro quel 3d ( Spostare dati in altra tabella )
: č illegibile non ci si capisce un'acca, l'ho praticamente saltato tutto
perchč non ne potevo piů.
Ciccia , questa volta rimarrň nella mia ignoranza e non mi eleverň: quel 3d
non lo voglio leggere piů.
--
Ciao. Fabrizio.


title: Query ricerca duplicati (2)

text:
"Alessandro Cara" <
al...@blunet.it
> ha scritto nel messaggio
news:3D86F202...@blunet.it...
> Debora wrote:
> >
> 4)  Certo che averti come programmatrice in un gruppo di lavoro
>     deve essere una bella rogna. Non fai "mai" quello che ti si
>     chiede.
Senti, ma stai continuando a cazziarmela?!?
Antonio


title: Query ricerca duplicati (2)

text:

ma dai che gli fa bene. Tanto ti ha gia' invitato a pranzo.
Poi visto che ha il "capo" in vacanza la tengo in allenamento.
--
a.cara


title: Query ricerca duplicati (2)

text:
"Alessandro Cara" <
al...@blunet.it
> ha scritto nel messaggio
news:3D871CF8...@blunet.it...

CI ha invitati...
Antonio


title: Query ricerca duplicati (2)

text:
>cut
> > non lo so. Ultimamente c'e' in giro una certa Debora Maniero e ogni 3d
> > che la riguarda sembra un romanzo di appendice (ovviamente a puntate)
> > --
> > a.cara
>
> Ti prego non mi dire che è dentro quel 3d ( Spostare dati in altra
tabella )
> : è illegibile non ci si capisce un'acca, l'ho praticamente saltato tutto
> perchè non ne potevo più.
> Ciccia , questa volta rimarrò nella mia ignoranza e non mi eleverò: quel
3d
> non lo voglio leggere più.
> --
> Ciao. Fabrizio.
Aggiungo anche il 3d "Query ricerca duplicati", anche quello è da un bel po'
che non lo leggo più per manifesta incapacità ( mia di leggerlo ).
--
Ciao. Fabrizio.


title: Query ricerca duplicati (2)

text:
"Fabrizio" <fabrizio...@SPAMtiscalinet.it> ha scritto nel messaggio
news:am6v8h$uk2$1...@lacerta.tiscalinet.it...
>
> "Alessandro Cara" <
al...@blunet.it
> ha scritto nel messaggio
> news:3D86F2EB...@blunet.it...
> > Fabrizio wrote:
> > >
> > > >cut
> > > > 2) c'e' un 3d recente in cui il buon (si fa per dire) Borrelli ha
> fatto
> > > >    una dotta disquisizione sui Null
> > > >    (bada ben bada ben bada bene Null e' diverso da vuoto)
> > > >cut
> > >
> > > Dimmi dov'č e subito :-) , chč me lo sono perso ( troppi post
accidenti
> a
> > > voi ).
> > > --
> > > Ciao. Fabrizio.
> >
> > non lo so. Ultimamente c'e' in giro una certa Debora Maniero e ogni 3d
> > che la riguarda sembra un romanzo di appendice (ovviamente a puntate)
Mi spieace crearvi tanti problemi.            :-DDDDDDDDDDDD
> > --
> > a.cara
>
> Ti prego non mi dire che č dentro quel 3d ( Spostare dati in altra
tabella )
> : č illegibile non ci si capisce un'acca, l'ho praticamente saltato tutto
> perchč non ne potevo piů.
Pensa che ci sono persone che adorano le telenovelas! ;-PPPPPPPPP
> Ciccia , questa volta rimarrň nella mia ignoranza e non mi eleverň: quel
3d
> non lo voglio leggere piů.
> --
> Ciao. Fabrizio.
Mi spiace, ma non č colpa mia, cioč un pň si.
Dimmi cosa ti serve di preciso, xkč malgrado il caos, le
risoluzioni dei problemi in quei 3d ci sono state.
Sono a tua disposizione.
Fabrizio eh? Non sarai il mio capo che posta
dalle vacanze?
--
Debora


title: Query ricerca duplicati (2)

text:
On Wed, 18 Sep 2002 06:35:42 GMT, "Debora" <
cbo.ma...@tiscali.it
>
wrote:
>cut
>cut
>> > non lo so. Ultimamente c'e' in giro una certa Debora Maniero e ogni 3d
>> > che la riguarda sembra un romanzo di appendice (ovviamente a puntate)
>
>Mi spieace crearvi tanti problemi.            :-DDDDDDDDDDDD
>cut
Si scherza Debora ;-)
>> Ti prego non mi dire che č dentro quel 3d ( Spostare dati in altra
>tabella )
>> : č illegibile non ci si capisce un'acca, l'ho praticamente saltato tutto
>> perchč non ne potevo piů.
>
>Pensa che ci sono persone che adorano le telenovelas! ;-PPPPPPPPP
Si scherza Debora ;-) , ma c'č un limite a tutto.Notavo una cosa perň:
di solito 3d cosě lunghi dopo il 10° post č giŕ OT , tranne quelli di
Debora: ragazza perseverante, confermate?
>> Ciccia , questa volta rimarrň nella mia ignoranza e non mi eleverň: quel
>3d
>> non lo voglio leggere piů.
>> --
>> Ciao. Fabrizio.
>
>Mi spiace, ma non č colpa mia, cioč un pň si.
>Dimmi cosa ti serve di preciso, xkč malgrado il caos, le
>risoluzioni dei problemi in quei 3d ci sono state.
Sarebbe piů di uno il 3d che ti vede protagonista di telenovele, credo
che farai fatica anche tu a ricordatene: cmq , come si diceva, c'č un
post di Maurě ( Borelli ) che disquisisce sul valore Null, non ho
capito se č una cosa seria o meno ma sarei curioso di leggerlo, perchč
da Maurě c'č sempre da imparare.
>Sono a tua disposizione.
>Fabrizio eh? Non sarai il mio capo che posta
>dalle vacanze?
Non sono il tuo capo, per cui non sentirti in obbligo.  :-)
:-)))))
...e poi vedi ho dei figli .... sai sono sposato .... ciň convivo ma č
come essere sposati .... non vorrei mi fraintendessi .... cerchiamo di
rimanere amici ..... e poi io amo solo la mia mamma e non c'č spazio
nel mio cuore anche per te, tič .
:-)))))))
Ciao. Fabrizio


title: Query ricerca duplicati (2)

text:
>
> Sarebbe più di uno il 3d che ti vede protagonista di telenovele, credo
> che farai fatica anche tu a ricordatene: cmq , come si diceva, c'è un
> post di Maurì ( Borelli ) che disquisisce sul valore Null, non ho
> capito se è una cosa seria o meno ma sarei curioso di leggerlo, perchè
> da Maurì c'è sempre da imparare.
>
Allora è semplice,ti fai una ricerca di tutti i 3d's dove l'autore è
Borrelli.
Facile no
> ...e poi vedi ho dei figli .... sai sono sposato .... ciò convivo ma è
> come essere sposati .... non vorrei mi fraintendessi .... cerchiamo di
> rimanere amici ..... e poi io amo solo la mia mamma e non c'è spazio
> nel mio cuore anche per te, tiè .
?!?!?!?!?!?!?!?!?!?!!!!!!!!!!!!!!!!!!!
Allora è semplice,ti fai una ricerca di tutti i 3d's dove l'autore è
Borrelli.
e nel messaggio è contenuta la parola Null.
Facile no?!
Sembra che non ne sappia niente, in realtà....
ne so meno....di quanto sembra!!!!!! ;-PPPPPPP
--
Debora


title: Query ricerca duplicati (2)

text:
On Wed, 18 Sep 2002 08:33:05 GMT, "Debora" <
cbo.ma...@tiscali.it
>
wrote:
>
>>
>> Sarebbe più di uno il 3d che ti vede protagonista di telenovele, credo
>> che farai fatica anche tu a ricordatene: cmq , come si diceva, c'è un
>> post di Maurì ( Borelli ) che disquisisce sul valore Null, non ho
>> capito se è una cosa seria o meno ma sarei curioso di leggerlo, perchè
>> da Maurì c'è sempre da imparare.
>>
>
>Allora è semplice,ti fai una ricerca di tutti i 3d's dove l'autore è
>Borrelli.
>Facile no
Provo tutto ( a dire il vero l'avevo già fatto ): mi da un bel po' di
risultati ( troppi anche restringendo il lasso di tempo dal tuo primo
post ad qlc giorno fa ); poi ho provato così per sfizio la ricerca che
ti riguarda, prendo gli oggetti del tuo messaggio e li metto nella
ricerca di Borrelli ( dopo una bella mezz'oretta buona ) nada ( il che
mi fa pensare che non rispondeva a te ).
Ritorno a vedere i risultati della ricerca da te suggeritami e mi
chiedo come mai così tanti post: sarà mica che il valore null è
vagamente importante e compare un po' ovunque ( nei codici, nei
discorsi ...) ? oppure è matto lui che ne parla sempre?
>> ...e poi vedi ho dei figli .... sai sono sposato .... ciò convivo ma è
>> come essere sposati .... non vorrei mi fraintendessi .... cerchiamo di
>> rimanere amici ..... e poi io amo solo la mia mamma e non c'è spazio
>> nel mio cuore anche per te, tiè .
>
>
>?!?!?!?!?!?!?!?!?!?!!!!!!!!!!!!!!!!!!!
Sono un giocherellone :-)
>Allora è semplice,ti fai una ricerca di tutti i 3d's dove l'autore è
>Borrelli.
>e nel messaggio è contenuta la parola Null.
>Facile no?!
No.
>Sembra che non ne sappia niente, in realtà....
>ne so meno....di quanto sembra!!!!!! ;-PPPPPPP
? concordo con te, ma siamo sulla stessa barca.   :-)
Ciao. Fabrizio


title: Query ricerca duplicati (2)

text:
> >Allora è semplice,ti fai una ricerca di tutti i 3d's dove l'autore è
> >Borrelli.
> >e nel messaggio è contenuta la parola Null.
> >Facile no?!
>
> No.
Come no, se usi Outlook, dove hai la cartella dei NG
ci vai sopra col mouse, pulsante destro, trova ......
così puoi personalizzare la ricerca!!!!
FACILE NO?!
>
> >Sembra che non ne sappia niente, in realtà....
> >ne so meno....di quanto sembra!!!!!! ;-PPPPPPP
>
> ? concordo con te, ma siamo sulla stessa barca.   :-)
pufffff!!!!
--
Debora


title: Query ricerca duplicati (2)

text:
On Wed, 18 Sep 2002 10:54:43 GMT, "Debora" <
cbo.ma...@tiscali.it
>
wrote:
>
>> >Allora č semplice,ti fai una ricerca di tutti i 3d's dove l'autore č
>> >Borrelli.
>> >e nel messaggio č contenuta la parola Null.
>> >Facile no?!
>>
>> No.
>
>Come no, se usi Outlook, dove hai la cartella dei NG
>ci vai sopra col mouse, pulsante destro, trova ......
>cosě puoi personalizzare la ricerca!!!!
>FACILE NO?!
>cut
Forse non mi sono spiegato: questo tipo di ricerca da troppi risultati
per essere efficace, perchč Borelli č molto prolifico e la parola null
compare in quasi tutti i suoi post essendo in questo NG usatissima, ma
hai provato tu ( cmq uso freeagent da ieri, cosě per sfizio ).
Ciao. Fabrizio


title: Selezione record da elenco di riepilogo

author: DBN

text:
Tempo fa ho posto la domanda di come poter selezionare un record dall'elenco
di riepilogo inserito in una maschera di imputazione e far si che i campi
vengano compilati immediatamente dai valori del record selezionato.
Mi e stato spiegato in inserire il seguente codice sulla funzione doppio
click dell'elenco
Me.Filter = "Id_maschera =" &  Me.Elenco .Column(0)
Me.FilterOn = True
Me.AllowEdits = True
Me.CasellaCombinata.SetFocus
Funziona.
C'č un problema.
Una volta selezionato un record dall'elenco non posso piů utilizzare i tasti
precedente e successivo.
Mi si azzera il contatore dei record.
Che riga di codice devo inserire per riportare il condtatore Id_maschera al
valore corretto?
Grazie in anticipo per l'aiuto.


title: Selezione record da elenco di riepilogo

author: Carlo Costarella

text:
"DBN" <
dbo...@dalbosco.com
> ha scritto nel messaggio
news:bg2q0j$jq5rn$1...@ID-91233.news.uni-berlin.de...

Certo che non puoi andare avanti o indietro: la maschera č filtrata per un
unico record.
Reimposta il RecordSource e fai un Requery della maschera. Il tutto al click
di un pulsante:
Me.Filter = ""
Me.RecordSource = TuaQueryOTabella (quella originale che alimentava la
maschera)
Me.Requery
Ciao, Carlo


title: Copia ultimo record inserito in maschera in altra tabella

author: Franco Poggiali

text:
Salve a tutti,
è possibile senza ricorrere a VBA copiare tutti i campi di una maschera
relativa ad una tabella come nuovo record in un'altra tabella (sostituendo
il record preesistente)?. Per il DB che stiamo realizzando ci occorrono 2
tabelle: una che mantenga lo storico dei record inseriti e l'altra che tenga
traccia solo degli ultimi inserimenti per ciascuna persona (si tratta di un
DB anagrafico personale).
In VBA esiste un comando semplice?


text:
"Franco Poggiali" <
fra...@artestudio53.it
> ha scritto nel messaggio
news:Vm5oc.238238$rM4.10...@news4.tin.it...

No.
Ciao.
--
Sergio MAZZA


title: Codice vba

author: Gatti Vittorio

text:
Premetto che non sono pratico di codice VBA
Ho un database di nome MAG
All'interno ho due tabelle una denominata MOV e l'altra denominata MOV2
Potreste dirmi che codice devo utilizzare in VBA per copiare alcuni dati
(cioe' il valore di alcuni campi) da una tabella all'altra
Grazie


title: Codice vba

author: Woodrov

text:


Se le due tabelle hanno la stessa struttura puoi utilizzare una query di accodamento
senza scomodare il vba...
Non serve neanche conoscere l'SQL dal momento che in access si dispone del
metodo QBE..
ciao!


title: Codice vba

text:
Woodrov <
luca....@tiscali.it
> wrote in message
onbt8vo6nhfd9t0mj...@4ax.com...

Ti ringrazio per la risposta
Pero' mi piacerebbe capire come poterlo fare in VBA, in quanto mi
permetterebbe nel momento che leggo i records di effettuare dei controlli ed
altro sui records.
Quindi se qualcuno mi puo' indicare il codice mi sarebbe motlo utile
Grazie


title: Codice vba

text:
"Gatti Vittorio" <
vi...@libero.it
> ha scritto nel messaggio
news:iXCja.9437$DT4.2...@twister1.libero.it...

La cosa è un pò più lunga, io concordo con il consiglio che ti hanno dato di
usare Qry Action....!
In ogni caso ti scrivo 2 righe senza averle provate, solo per indicazione,
quindi ci sarà sicuramente qualche errore...!
Sub Accoda()
    Dim rsFrom as Dao.Recordset
    Dim rsTo    as DAO.Recordset
    Dim strCond as string
    Dim x as Long
    Set rsFrom=Currentdb.openrecordset("SELECT * FROM MOV WHERE
...................") ' Quì devi inserire le Condizioni per individuare
' quali sono i Record da Copiare
    if rsForm.Eof AND rsFrom.Bof Then MsgBox"VUOTO":Exit Sub
    rsFrom.MoveLast
    rsFrom.MoveFirst
    Set rsTo=Currentdb.Openrecordset("MOVE2")    'Nome della Tabella di
Destinazione
    Do Until rsFrom.Eof
        rsTo.Addnew
        For x=0 to rsFrom.Fields.Count-1
            rsTo.Fields(x).Value=rsFrom.Fields(x).Value
        Next
        rsTo.Update
        rsFrom.MoveNext
    Loop
    'Andrebbe fatta una bella gestione ERRORI, magari usando le Transazioni
prima di iniziare
    rsFrom.Close
    rsTo.Close
    Set rsFrom=Nothing
    Set rsTo=Nothing
End SUB
Prendi il codice con il beneficio d'inventario, è solo una
traccia............!
Ciao.
@Alex.


title: Codice vba

text:
"@Alex" <
ik2...@libero.it
> ha scritto nel messaggio
news:NZDja.9643$DT4.2...@twister1.libero.it...

> Grazie mille. Ora provo immediatamente!!!
Ciao e buona Domenica


title: Buon Natale e felice anno 2006 a tutti

author: Nicolas

text:
anche ai permalosi
agli scassa palle
e ai dio in terra.
Buon Natale e felice anno 2006


title: Buon Natale e felice anno 2006 a tutti

author: Roberto da casa

text:
"Nicolas" <
nico...@email.it
> ha scritto nel messaggio
news:43ada3a5$1$1053$4faf...@reader2.news.tin.it...

Buon Natale a te ed anche a loro. :)
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


title: Buon Natale e felice anno 2006 a tutti

author: Fabio Valsangiacomo

text:
Nicolas <
nico...@email.it
> wrote:
> anche ai permalosi
> agli scassa palle
> e ai dio in terra.
Urca tolto un sassolino dalla scarpa he he :-)
> Buon Natale e felice anno 2006
Anche a voi tutti
Fabio


title: Buon Natale e felice anno 2006 a tutti

author: ciroteo

text:
"Nicolas" <
nico...@email.it
> ha scritto nel messaggio
news:43ada3a5$1$1053$4faf...@reader2.news.tin.it...

e questa č bella ... te la rubo ...
auguri.


title: Buon Natale e felice anno 2006 a tutti

author: cidi

text:
"Nicolas" <
nico...@email.it
> ha scritto nel messaggio
news:43ada3a5$1$1053$4faf...@reader2.news.tin.it...
> anche ai permalosi
> agli scassa palle
> e ai dio in terra.
soprattutto a loro! augurando il bene solo agli amici sarebbe molto facile.
> Buon Natale e felice anno 2006
>
Buon Natale e felice 2006 anche a te Nicolas
Daniele


title: Buon Natale e felice anno 2006 a tutti

author: Sergio MAZZA

text:
"Nicolas" <
nico...@email.it
> ha scritto nel messaggio
news:43ada3a5$1$1053$4faf...@reader2.news.tin.it...

E' proprio vero che a Natale si č tutti (o quasi) piů buoni!
Ciao e buon Natale, buona... Fine e buon Inizio...
--
Sergio MAZZA


title: Buon Natale e felice anno 2006 a tutti

author: Alessandro Baraldi

text:
"Nicolas" <
nico...@email.it
> wrote in message
news:43ada3a5$1$1053$
4faf...@reader2.news.tin.it

Buon Natale anche a te, che mancavi dalla tua lista....!
Ciao Marco
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Buon Natale e felice anno 2006 a tutti

text:
>> anche ai permalosi
>> agli scassa palle
>> e ai dio in terra.
>>
>> Buon Natale e felice anno 2006
>
>
> Buon Natale anche a te, che mancavi dalla tua lista....!
>
> Ciao Marco
>
> @Alex
>
Mancavo? cosa avrei dovuto scrivere per essere incluso? :)


title: Buon Natale e felice anno 2006 a tutti

text:
"Nicolas" <
nico...@email.it
> wrote in message
news:43b25e54$0$1071$
4faf...@reader3.news.tin.it
[CUT]
> Mancavo? cosa avrei dovuto scrivere per essere incluso? :)
A perchè eri già incluso...?
Beh posso decisamente concordare con te questa
volta, ritiro tutto, mi sono sbagliato.
;-)



title: Buon Natale e felice anno 2006 a tutti

text:
> [CUT]
>> Mancavo? cosa avrei dovuto scrivere per essere incluso? :)
>
> A perchè eri già incluso...?
> Beh posso decisamente concordare con te questa
> volta, ritiro tutto, mi sono sbagliato.
> ;-)
>
> @Alex
>
ahahahaha ha fatto la bbbbatttutaaaa!!!


title: Lentezza di dlookup

author: vuLCan Karayan

text:
Che noia!
E' possibile che il dlookup sia una funzione da evitare?
Per estrarre un valore da una query (TOP 5) impiega anche 10/15 secondi
(parlo di un archivio di circa 40.000 record)
Come mi suggerite di procedere per estrapolare il campo A del primo record
di una tabella da codice?
Sapete come va meglio? Usando una mascheda temporanea che prende i dati da
tale tabella e che all'occorrenza viene aperta, preso il valore del CampoA
(via codice) e richiusa.
Possibile?


title: Lentezza di dlookup

text:
"vuLCan Karayan" <
nos...@nospam.it
> wrote in message
news:YF3ae.811291$
b5.35...@news3.tin.it

Certo che č possibile, tutte le funzioni di Aggregamento sui
Domini sono da evitare quando il numero di Records č elevato.
La tecnica da usare č quella del Recordset aperto sulla Query
ma se posti la funzione DLOOKUP che usi posso essere piů
preciso.
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Lentezza di dlookup

text:
"vuLCan Karayan" <
nos...@nospam.it
> ha scritto nel messaggio
news:YF3ae.811291$b5.35...@news3.tin.it...

Le funzioni di aggregazione sui dominii come DLookup, specie se usate un una
query, hanno effetti negativi sulla sua performance.
Se non l'hai già fatto, dichiarandoti un indice sul campo che usi sui
criteri della DLookup dovresti ottenere un primo miglioramento.
Un'altra soluzione potrebbe essere quella di eliminare nella query la
DLookup ed usare invece subquery e/o tabelle derivate: insomma invece di
eseguire la DLookup per tutti i 40.000 record della tabella, farlo solo per
i 5 record che ti verranno visualizzati alla fine.
--
Roberto
-----------------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
----------------------------------------------------


title: Lentezza di dlookup

text:
> Certo che č possibile, tutte le funzioni di Aggregamento sui
> Domini sono da evitare quando il numero di Records č elevato.
>
> La tecnica da usare č quella del Recordset aperto sulla Query
> ma se posti la funzione DLOOKUP che usi posso essere piů
> preciso.
>
> Ciao
> @Alex
Grazie Alex...
Ecco il problema:
Ho una tabella di 40000 records.
Mi interessa estrapolare l'ultimo codice (IDRecord, contatore, intero lungo)
inserito.
Ho creato una query che ho chiamato "GuardaUltimoRecord" nella quale viene
selezionato solo il campo in questione (IDRecord) ordinato in modo
discendente  e TOP1. In questo modo ho un valore che č l'ultimo IDRecord
della tabella.
Io ho semplicemente scritto
Dim UltimoRecord as Long
UltimoRecord = dlookup("IDRecord","GuardaUltimoRecord")
Grazie per il tuo aiuto.
Ciao


title: Lentezza di dlookup

text:
"vuLCan Karayan" <
nos...@nospam.it
> wrote in message
news:eI4ae.811592$
b5.35...@news3.tin.it
[CUT]
> Ho creato una query che ho chiamato "GuardaUltimoRecord" nella quale viene
> selezionato solo il campo in questione (IDRecord) ordinato in modo
> discendente  e TOP1. In questo modo ho un valore che č l'ultimo IDRecord
> della tabella.
>
> Io ho semplicemente scritto
>
> Dim UltimoRecord as Long
> UltimoRecord = dlookup("IDRecord","GuardaUltimoRecord")
>
> Grazie per il tuo aiuto.
>
> Ciao
Per me non serve la Query:
'----------- METTILA IN UN MODULO ---------------
Public Function retLast(id as String,strTabella as string) as Long
Dim rs    as DAO.Recordset
Dim sSQL  as String
sSQL="SELECT Max([" & id & "]) As Ultimo From " & strTabella
set rs=CurrentDb.Openrecordset(sSQL,dbreadOnly)
If rs.Eof Then
  retLast=0
Else
  retLast=rs!Ultimo
End if
rs.Close
set rs=Nothing
End Function
'------- NELLA FORM ---------
La chiami cosě:
   Dim UltimoRecord as Long
   UltimoRecord= retLast("IDRecord","NomeTabella")



title: Lentezza di dlookup

author: Karl Donaubauer

text:
Alessandro Baraldi wrote:
> ...
> set rs=CurrentDb.Openrecordset(sSQL,dbreadOnly)
>...
Prima di dbreadOnly manca un altra comma. Adesso si trova
alla posizione del tipo. Ma come dbreadOnly = 4 ed anche
dbOpenSnapshot = 4 hai quasi scritto
set rs=CurrentDb.Openrecordset(sSQL,dbOpenSnapshot)
e in questo senso il codice č giusto di nuovo. ;-)
--
cu
Karl
*********
Access FAQ:
www.donkarl.com/it
 + iscriviti alla prima Conferenza
Italiana per Sviluppatori di Access (CISA 1), Arezzo, 4+5/6/2005


title: Lentezza di dlookup

text:
> Per me non serve la Query:
>
> '----------- METTILA IN UN MODULO ---------------
> Public Function retLast(id as String,strTabella as string) as Long
> Dim rs    as DAO.Recordset
> Dim sSQL  as String
>
> sSQL="SELECT Max([" & id & "]) As Ultimo From " & strTabella
> set rs=CurrentDb.Openrecordset(sSQL,dbreadOnly)
> If rs.Eof Then
>   retLast=0
> Else
>   retLast=rs!Ultimo
> End if
> rs.Close
> set rs=Nothing
> End Function
>
> '------- NELLA FORM ---------
> La chiami cosģ:
>
>    Dim UltimoRecord as Long
>    UltimoRecord= retLast("IDRecord","NomeTabella")
>
> Ciao
>
> @Alex
Grandioso.
Grazie mille.
Sei un grande.
CIao


title: Lentezza di dlookup

text:
> '----------- METTILA IN UN MODULO ---------------
> Public Function retLast(id as String,strTabella as string) as Long
> Dim rs    as DAO.Recordset
> Dim sSQL  as String
>
> sSQL="SELECT Max([" & id & "]) As Ultimo From " & strTabella
> set rs=CurrentDb.Openrecordset(sSQL,dbreadOnly)
> If rs.Eof Then
>   retLast=0
> Else
>   retLast=rs!Ultimo
> End if
> rs.Close
> set rs=Nothing
> End Function
>
> '------- NELLA FORM ---------
> La chiami cosě:
>
>    Dim UltimoRecord as Long
>    UltimoRecord= retLast("IDRecord","NomeTabella")
>
> Ciao
Grandioso.



title: Lentezza di dlookup

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> wrote in message
news:3cs5lsF...@individual.net
> Alessandro Baraldi wrote:
> > ...
> > set rs=CurrentDb.Openrecordset(sSQL,dbreadOnly)
> >...
>
> Prima di dbreadOnly manca un altra comma. Adesso si trova
> alla posizione del tipo. Ma come dbreadOnly = 4 ed anche
> dbOpenSnapshot = 4 hai quasi scritto
> set rs=CurrentDb.Openrecordset(sSQL,dbOpenSnapshot)
> e in questo senso il codice è giusto di nuovo. ;-)
Si hai ragione Karl sono andato a memoria e spesso
fallisce.
In questo caso casualmente andava, ma concordo con
la segnalazione di correzione.
Grazie



title: Lentezza di dlookup

text:
"vuLCan Karayan" <
nos...@nospam.it
> ha scritto nel messaggio
news:eI4ae.811592$b5.35...@news3.tin.it...

Se il problema č questo la cosa piů semplice č usare la funzione DMax (vedi
help):
UltimoRecord = DMax("IDRecord", "NomeTabella")
o in alternativa la funzione DLast (vedi help):
UltimoRecord = DLast("IDRecord", "NomeTabella")



title: Come ciclare fra form / controlli dell'applicazione ?

author: RobertoA

text:
Sto tentando di creare una routine per inserire in automatico ad ogni
avviamento delle istruzioni sugli eventi GotFocus e LostFocus dei controlli
textbox e combobox di tutte le form
Uso il seguente codice:
-----------------------------------------
    For Each Form_Corrente In CurrentProject.AllForms
       Debug.Print Form_Corrente.Name
       For Each controllo In Forms(Form_Corrente.Name)
           If controllo.ControlType = acTextBox Or controllo.ControlType =
acComboBox Then
               controllo.OnGotFocus = "=Setta_Focus()"
               controllo.OnLostFocus = "=Rimuovi_Focus()"
               End If
           Next
        Next
-----------------------------------------
Che pero' non funziona in quanto alla riga  For Each ctl In
Forms(Form_Corrente.Name)  mi restituisce un errore:
"Impossibile trovare la maschera 'frmPippo' a cui si fa riferimento in
un'espressione macro o nel codice di Visual Basic"
La form frmPippo ovviamente esiste nel progetto corrente
La riga Debug.Print stampa correttamente il nome della form frmPippo sulla
finestra di debug
Le mie domande sono:
- perche' mi viene restituito un errore di form inesistente anche se e'
perfettamente presente la form incriminata?
- se in qualche controllo gia' ci fosse del codice nell'evento GotFocus,
viene sostituito da questa procedura?
- c'e' modo di 'aggiungere' il codice a quello eventualmente gia' presente
nell'evento desiderato?
Ciao e grazie
RobertoA


author: Antonio

text:
"RobertoA" <
amor...@tiscalinet.it
> ha scritto nel messaggio
news:4ae296ae$1...@newsgate.x-privat.org...

Credo che l'istruzione
      For Each controllo In Forms(Form_Corrente.Name)
dovrebbe essere
      For Each controllo In Forms(Form_Corrente.Controls)
Ciao
Antonio


text:

Con   Each controllo In Forms(Form_Corrente.Controls)  adesso restituisce
"Propriet� o metodo non supportati dall'oggetto"
Se provo con  Each controllo In Forms(Form_Corrente.Name).Controls
restituisce lo stesso errore di prima, in sostanza "form non trovata"
Ciao e grazie
RobertoA


text:
"RobertoA" <
amor...@tiscalinet.it
> ha scritto nel messaggio
news:4ae2...@newsgate.x-privat.org...

Hai ragione, avevo sbagliato. Comunque non sono andato oltre
quell'istruzione che mi � sembrata errata. La for sta ad indicare "per ogni
controllo presente..." ed i controlli sono nei controls della form. Dovrebbe
funzionare come l'hai corretta tu... forse pu� pretendere che ci sia la
parola form in mezzo; prova cos�:
For Each controllo In Forms(Form_Corrente.Name).form.controls


text:

Provato
Stesso errore di mancanza form
Grazie comunque
RobertoA


text:
"RobertoA" <
amor...@tiscalinet.it
> ha scritto nel messaggio
news:4ae2...@newsgate.x-privat.org...

Quando mi capitano errori che non riesco a capire io sono abituato a mettere
un'istruzione Stop fra le istruzioni che precedono quella incriminata e
verificare passo-passo (pigiando il tasto F8) come si evolve la situazione.
Nella finestra immediata puoi anche provare altre istruzioni non incluse
nella routine. Per esempio, dopo che hai valorizzato la Form_Corrente, nella
finestra immediata puoi scrivere "print
forms(form_corrente).form.controls.count" per vedere se ti d� il numero di
controlli... etc. etc.


author: Oscar Manfredini

text:
(cut)
> Le mie domande sono:
> - perche' mi viene restituito un errore di form inesistente anche se e'
> perfettamente presente la form incriminata?
> - se in qualche controllo gia' ci fosse del codice nell'evento GotFocus,
> viene sostituito da questa procedura?
> - c'e' modo di 'aggiungere' il codice a quello eventualmente gia' presente
> nell'evento desiderato?
Per� non � chiaro se tu voglia creare questi eventi a "Runtime" su evento
apertura di una Form, in tal caso il codice che hai postato dovrebbe essere
corretto
(un esempi analogo sicuramente funzionante potrebbe essere :
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=85
)
Oppure se tu intenda creare fisicamente nel Design delle Forms del tuo .mdb
questi eventi.
Nel secondo caso devi ricordarti di aprire le Forms, appunto, in modalit�
Design prima di creare gli eventi (trovi nell'Help di Access vari esempi).
Ciao: Oscar


text:

La prima
Vorrei impostare il codice nell'evento senza memorizzarlo nella form
In pratica ad ogni avviamento, il programma dovrebbe inserire negli eventi
SetFocus e LostFocus le due righe col richiamo alle funzioni per colorare lo
sfondo textbox e 'scolorarlo'
Ciao
RobertoA


text:
"RobertoA" <
(cut)
>> Per� non � chiaro se tu voglia creare questi eventi a "Runtime" su evento
>> apertura di una Form, in tal caso il codice che hai postato dovrebbe
>> essere corretto
>> (un esempi analogo sicuramente funzionante potrebbe essere :
>>
http://www.alessandrobaraldi.it/DettaglioFaq.asp?IdFAQ=85
)
>>
>> Oppure se tu intenda creare fisicamente nel Design delle Forms del tuo
>> .mdb questi eventi.
>> Nel secondo caso devi ricordarti di aprire le Forms, appunto, in modalit�
>> Design prima di creare gli eventi (trovi nell'Help di Access vari
>> esempi).
> La prima
> Vorrei impostare il codice nell'evento senza memorizzarlo nella form
> In pratica ad ogni avviamento, il programma dovrebbe inserire negli eventi
> SetFocus e LostFocus le due righe col richiamo alle funzioni per colorare
> lo sfondo textbox e 'scolorarlo'
In tal caso il suddetto esempio dovrebbe adattarsi al caso tuo, ma si pu�
fare in almeno un altro modo: utilizzando WithEvents.
Non credo comunque (gradite eventuali smentite) che sia possibile aggiungere
a un evento preesistente del nuovo codice.
L'assegnazione di un nuovo evento disabilita quello eventualmente gi�
presente.
Ciao: Oscar


text:

Ti ringrazio del consiglio
Quello che volevo capire pero' era il motivo del non funzionamento del mio
esempio
La form esiste, ma non viene 'vista'
Ciao
RobertoA


text:
RobertoA wrote:
> ...
> Uso il seguente codice:
> -----------------------------------------
>    For Each Form_Corrente In CurrentProject.AllForms
>       Debug.Print Form_Corrente.Name
>       For Each controllo In Forms(Form_Corrente.Name)
>           If controllo.ControlType = acTextBox Or
> controllo.ControlType = acComboBox Then
>               controllo.OnGotFocus = "=Setta_Focus()"
>               controllo.OnLostFocus = "=Rimuovi_Focus()"
>               End If
>           Next
>        Next
>
> Che pero' non funziona in quanto alla riga  For Each ctl In
> Forms(Form_Corrente.Name)  mi restituisce un errore:
> "Impossibile trovare la maschera 'frmPippo' a cui si fa riferimento
> in un'espressione macro o nel codice di Visual Basic"
> La form frmPippo ovviamente esiste nel progetto corrente
> La riga Debug.Print stampa correttamente il nome della form
> frmPippo sulla finestra di debug
> Le mie domande sono:
> - perche' mi viene restituito un errore di form inesistente anche
> se e' perfettamente presente la form incriminata?
Perchï¿œ la maschera non ï¿œ aperta.
La tua confusione viene dal fatto che usi due insiemi diversi:
L'insieme CurrentProject.AllForms che contiene tutte le maschere,
aperte e chiuse.
L'insieme "Forms" che contiene solo le maschere aperte.
Questo provoca l'errore.
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:7kg3aoF...@mid.individual.net...
> RobertoA wrote:
>> ...
>> Uso il seguente codice:
>> -----------------------------------------
>>    For Each Form_Corrente In CurrentProject.AllForms
>>       Debug.Print Form_Corrente.Name
>>       For Each controllo In Forms(Form_Corrente.Name)
>>           If controllo.ControlType = acTextBox Or
>> controllo.ControlType = acComboBox Then
>>               controllo.OnGotFocus = "=Setta_Focus()"
>>               controllo.OnLostFocus = "=Rimuovi_Focus()"
>>               End If
>>           Next
>>        Next
>>
>> Che pero' non funziona in quanto alla riga  For Each ctl In
>> Forms(Form_Corrente.Name)  mi restituisce un errore:
>> "Impossibile trovare la maschera 'frmPippo' a cui si fa riferimento
>> in un'espressione macro o nel codice di Visual Basic"
>> La form frmPippo ovviamente esiste nel progetto corrente
>> La riga Debug.Print stampa correttamente il nome della form
>> frmPippo sulla finestra di debug
>> Le mie domande sono:
>> - perche' mi viene restituito un errore di form inesistente anche
>> se e' perfettamente presente la form incriminata?
>
> Perch� la maschera non � aperta.
>
> La tua confusione viene dal fatto che usi due insiemi diversi:
>
> L'insieme CurrentProject.AllForms che contiene tutte le maschere,
> aperte e chiuse.
>
> L'insieme "Forms" che contiene solo le maschere aperte.
> Questo provoca l'errore.
>
> --
> HTH
> Karl
> *********
> Access FAQ:
www.donkarl.com/it
Karl non si smentisce mai. Bravissimo !!!


text:
"RobertoA" <
>> In tal caso il suddetto esempio dovrebbe adattarsi al caso tuo, ma si pu�
>> fare in almeno un altro modo: utilizzando WithEvents.
>> Non credo comunque (gradite eventuali smentite) che sia possibile
>> aggiungere a un evento preesistente del nuovo codice.
>> L'assegnazione di un nuovo evento disabilita quello eventualmente gi�
>> presente.
> Ti ringrazio del consiglio
> Quello che volevo capire pero' era il motivo del non funzionamento del mio
> esempio
> La form esiste, ma non viene 'vista'
Ma tu hai avviato quel codice su evento "Open" dalla maschera?
Ciao: Oscar


text:
>> Uso il seguente codice:
>> -----------------------------------------
>>    For Each Form_Corrente In CurrentProject.AllForms
>>       Debug.Print Form_Corrente.Name
>>       For Each controllo In Forms(Form_Corrente.Name)
>>           If controllo.ControlType = acTextBox Or
>> controllo.ControlType = acComboBox Then
>>               controllo.OnGotFocus = "=Setta_Focus()"
>>               controllo.OnLostFocus = "=Rimuovi_Focus()"
>>               End If
>>           Next
>>        Next
>>
>> Che pero' non funziona in quanto alla riga  For Each ctl In
>> Forms(Form_Corrente.Name)  mi restituisce un errore:
>> "Impossibile trovare la maschera 'frmPippo' a cui si fa riferimento
>> in un'espressione macro o nel codice di Visual Basic"
>> La form frmPippo ovviamente esiste nel progetto corrente
>> La riga Debug.Print stampa correttamente il nome della form
>> frmPippo sulla finestra di debug
>> Le mie domande sono:
>> - perche' mi viene restituito un errore di form inesistente anche
>> se e' perfettamente presente la form incriminata?
>
> Perch� la maschera non � aperta.
>
> La tua confusione viene dal fatto che usi due insiemi diversi:
>
> L'insieme CurrentProject.AllForms che contiene tutte le maschere,
> aperte e chiuse.
>
> L'insieme "Forms" che contiene solo le maschere aperte.
> Questo provoca l'errore.
Eh si, e' proprio cosi
Difatti se apro la form prima di richiamarla, funziona
Ciao e grazie
RobertoA


text:

Il codice e' sul Form_Load della prima maschera
Ma comunque la prima form per la quale viene tentato l'inserimento delle
funzioni negli eventi non e' la form corrente
Ciao
RobertoA