title: Aiuto per stringa SQL

text:
"Agostini Gianluigi" <
agostini....@tin.it
> ha scritto nel messaggio
> Cut
> > Basta impostare il "NOT IN SELECT..." una volta per ogni campo.
>
> > Sib
>
> Ciao e grazie per l'interessamento. Ho provato a scrivere: (Dove query è
> tutta la select principale, salvata appunto in una query a se stante per
più
> chiarezza)
>
> SELECT Query.Lotto, Query.CodBB, Query.Finito, Query.Fase
> FROM Query
> WHERE (((Query.Lotto) Not In (SELECT Lotto From TblRigheDDT)) AND
> (Query.Fase) Not In (SELECT Fase From TblRigheDDT))
>
> Sintatticamente è a posto, ma restituisce i record di Query che non hanno
nè
> un lotto nè una fase corrispondenti in TblRigheDDT, ma considerandoli
> slegati tra loro (ovvero toglie tantissimi record in più).
Che vuoi dire? la query che hai scritto deve comportarsi cosi', Tu hai
chiesto alla query i record dove (where) ne' lotto ne' fase sono in tbl,
quindi se anche uno solo dei due campi (lotto o fase) ha una corrispondenza,
il record viene escluso. Se vuoi escludere solo i record che hanno entrambi
una corridpondenza devi usare l'operatore OR e non l'AND.
> Se invece scrivo:
>
> SELECT Query.Lotto, Query.CodBB, Query.Finito, Query.Fase
> FROM Query
> WHERE (((Query.Lotto, Query.fase) Not In (SELECT Lotto, fase From
> TblRigheDDT)))
>
> ottengo un errore "Non Definito": rivolgersi all'assistenza
> Microsoft........((((
Non mi risulta che questa sintassi sia utilizzabile, dovrebbe restituirti
appunto un errore di sintassi. La prima e' quella corretta
> ....qualcuno che si muova a pietà e mi scriva la corretta sintassi per
fare
> in modo che di una query io veda solo i record che non presentano gli
stessi
> valori relativamente a due campi in un'altra tabella.
Come ti ho gia' detto, tu gli hai chiesto di prendere i record in cui
entrambi i campi non corrispondono, se vuoi che prenda anche i record in cui
anche un solo campo non corrisponda devi mettere un OR e non un AND



title: Aiuto per stringa SQL

author: Agostini Gianluigi

text:
"Sib dal portatile" <
sibN...@iol.it
> ha scritto nel messaggio
news:VkJy7.25861$1H1.2...@news.infostrada.it...
> "Agostini Gianluigi" <
agostini....@tin.it
> ha scritto nel messaggio
> > Cut
> > > Basta impostare il "NOT IN SELECT..." una volta per ogni campo.
> >
> > > Sib
> >
> > Ciao e grazie per l'interessamento. Ho provato a scrivere: (Dove query č
> > tutta la select principale, salvata appunto in una query a se stante per
> piů
> > chiarezza)
> >
> > SELECT Query.Lotto, Query.CodBB, Query.Finito, Query.Fase
> > FROM Query
> > WHERE (((Query.Lotto) Not In (SELECT Lotto From TblRigheDDT)) AND
> > (Query.Fase) Not In (SELECT Fase From TblRigheDDT))
> >
> > Sintatticamente č a posto, ma restituisce i record di Query che non
hanno
> nč
> > un lotto nč una fase corrispondenti in TblRigheDDT, ma considerandoli
> > slegati tra loro (ovvero toglie tantissimi record in piů).
>
> Che vuoi dire? la query che hai scritto deve comportarsi cosi', Tu hai
> chiesto alla query i record dove (where) ne' lotto ne' fase sono in tbl,
> quindi se anche uno solo dei due campi (lotto o fase) ha una
corrispondenza,
> il record viene escluso. Se vuoi escludere solo i record che hanno
entrambi
> una corridpondenza devi usare l'operatore OR e non l'AND.
> Sib
Grazie per la pazienza, m ancora non ci siamo. Anche mettendo l' OR, vengono
esclusi record in piů. Nella tabella di confronto, nella quale ci sono i
record che non voglio che appaiano, ce ne sono 22, mentre la query
strutturata con l'OR me ne esclude una cinquantina.  In linguaggio umano, mi
sembra di capire che la differenza č tra dire: escludi i record dove campoA
= X ed ANCHE (AND) i record dove campoB = Y, piuttosto che escludi i record
dove campoA=X OPPURE (OR) dove campoB =Y. A me invece serve escludere i
record che contemporaneamente hanno lo stesso valore nei due campi delle due
tabelle. A naso mi sembra che non sia sufficiente l'uso degli operatori
logici, ma che si debba usare un join.
L'SQL qui sotto mi riporta correttamente i 22 record della tabella A che
hanno una corrispondenza nei due campi della TabellaB, mi servirebbe poter
dire: fammi vedere gli altri!!!
SELECT TblOrdini.Lotto
FROM TblRigheDDT INNER JOIN (TblRArticoliFase INNER JOIN TblOrdini ON
TblRArticoliFase.CodBB = TblOrdini.CodBB) ON (TblRigheDDT.Lotto =
TblOrdini.Lotto) AND (TblRigheDDT.CodBB = TblRArticoliFase.CodBB) AND
(TblRigheDDT.Fase = TblRArticoliFase.Fase);
Grazie
Gianluigi Agostini


title: Aiuto per stringa SQL

author: Sib dall'ufficio

text:
"Agostini Gianluigi" <
agostini....@tin.it
> ha scritto nel messaggio
> "Sib dal portatile" <
sibN...@iol.it
> ha scritto nel messaggio
> > "Agostini Gianluigi" <
agostini....@tin.it
> ha scritto nel
messaggio
CUT
> > Che vuoi dire? la query che hai scritto deve comportarsi cosi', Tu hai
> > chiesto alla query i record dove (where) ne' lotto ne' fase sono in tbl,
> > quindi se anche uno solo dei due campi (lotto o fase) ha una
> corrispondenza,
> > il record viene escluso. Se vuoi escludere solo i record che hanno
> entrambi
> > una corridpondenza devi usare l'operatore OR e non l'AND.
>
> > Sib
>
> Grazie per la pazienza, m ancora non ci siamo. Anche mettendo l' OR,
vengono
> esclusi record in più. Nella tabella di confronto, nella quale ci sono i
> record che non voglio che appaiano, ce ne sono 22, mentre la query
> strutturata con l'OR me ne esclude una cinquantina.  In linguaggio umano,
mi
> sembra di capire che la differenza è tra dire: escludi i record dove
campoA
> = X ed ANCHE (AND) i record dove campoB = Y, piuttosto che escludi i
record
> dove campoA=X OPPURE (OR) dove campoB =Y. A me invece serve escludere i
> record che contemporaneamente hanno lo stesso valore nei due campi delle
due
> tabelle. A naso mi sembra che non sia sufficiente l'uso degli operatori
> logici, ma che si debba usare un join.
CUT
Ora ho capito cosa intendi dire. Ci sono diverse strade, la piu' semplice mi
sembra questa:
SELECT Query.Lotto, Query.CodBB, Query.Finito, Query.Fase
FROM Query
WHERE (((Query.Lotto & Query.fase) Not In (SELECT TblRigheDDT.Lotto &
TblRigheDDT.fase as Espress1 From TblRigheDDT)))
Fammi sapere se funziona.
Sib


title: Aiuto per stringa SQL

text:
> Ora ho capito cosa intendi dire. Ci sono diverse strade, la piu' semplice
mi
> sembra questa:
>
> SELECT Query.Lotto, Query.CodBB, Query.Finito, Query.Fase
> FROM Query
> WHERE (((Query.Lotto & Query.fase) Not In (SELECT TblRigheDDT.Lotto &
> TblRigheDDT.fase as Espress1 From TblRigheDDT)))
>
> Fammi sapere se funziona.
>
> Sib
Se funziona??? FUNZIONA!!!!
Grazieeeeeeeeeeee....
Gianluigi Agostini


title: riferimento a maschera

author: Checco

text:
Ho dei problemi a filtrare dei record che voglio visualizzare in una
maschera "Ordini per commessa" che apro dalla maschera "ordini". Il comando
che uso è openform.
Private Sub CasellaCombinata73_DblClick(Cancel As Integer)
    DoCmd.OpenForm "ordini per commessa" , , ,"Idcommessa = ___________"
End Sub
come dovrei scrivere per prendere come riferimento idcommessa della maschera
ordini


title: riferimento a maschera

author: Antonio Biso

text:
"Checco" <
full...@iol.it
> ha scritto nel messaggio
news:bApc8.20557$8F6.9...@twister2.libero.it...

DoCmd.OpenForm "ordini per commessa" , , ,"Idcommessa = " & idcommessa
se idcommessa è numerico
DoCmd.OpenForm "ordini per commessa" , , ,"Idcommessa = '" & idcommessa &
"'"
se idcommessa è stringa
Antonio


title: Non Devo Uscire dalla Maschera

author: LUIGI C.

text:
Buon Giorno A97
In USCITA dalla maschera_rendiconto ho questo CODICE:
If Me![Totale_Mandato] <> Me![ControlloPareggio] Then
MsgBox ("Documento non rendicontato totalmente")
End If
If Me![Totale_Mandato] = Me![ControlloPareggio] Then
MsgBox ("Documento rendicontato")
Rendicontato = -1
End If
...vorrei nella prima IF non poter uscire dalla Maschera se il valore
[Totale_Mandato] è diverso da [ControlloPareggio]...
Come devo fare???
Grazie e ciao
Luigi Corinna


title: Non Devo Uscire dalla Maschera

author: Alessandro Baraldi

text:
"LUIGI C." <
luigic...@hotmail.com
> wrote in message
news:bPYFf.72158$
av6....@tornado.fastwebnet.it
> Buon Giorno A97
>
[CUT]
> Come devo fare???
>
> Grazie e ciao
>
> Luigi Corinna
Usa l'Evento Unload.
Private Sub Form_Unload(Cancel as integer)
   Cancel=Me![Totale_Mandato] <> Me![ControlloPareggio]
End sub
Ciao
@Alex
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: Non Devo Uscire dalla Maschera

text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:fcfd5e4e3d8e47ac3d...@mygate.mailgate.org...

dove lo scrivo...nell' IF o dove....????
Grazie
Ciao


title: Non Devo Uscire dalla Maschera

text:
"LUIGI C." <
luigic...@hotmail.com
> wrote in message
news:8DZFf.72228$
av6....@tornado.fastwebnet.it
[CUT]
> dove lo scrivo...nell' IF o dove....????
> Grazie
>
> Ciao
Non serve IF scrivi quello che ti ho detto.



title: ordinare listbox

author: Cholo

text:
è possibile ordinare con un comando vb ordinare gli elementi di una casella
di riepilogo?
vorrei applicarlo a dei pulsanti da mettere come intestazione delle colonne,
tipo quelli di excel.
grazie


title: ordinare listbox

author: Pablitomf

text:
Cholo ha scritto:
> è possibile ordinare con un comando vb ordinare gli elementi di una casella
> di riepilogo?
basta cambiare l'origine dati, mettendo quella ordinata per l'elemento che
vuoi.
> vorrei applicarlo a dei pulsanti da mettere come intestazione delle colonne,
> tipo quelli di excel.
Questo no.
> grazie
--
Ciao
Pablitomf (Maurizio Facciuti)
------------------------------
http://www.sitocomune.com/
http://www.accessgroup.it/
------------------------------
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: ordinare listbox

author: namor

text:
Cholo ha scritto:

Si, si può fare. Vedi sul
www.sitocomune.com
, sez. forms, il mio esempio
"Cambiare l'ordinamento di una casella di riepilogo a selezione multipla
senza perdere le selezioni già effettuate".
I pulsanti (o etichette) li devi mettere fuori dalla casella, come
nell'esempio, e lanciare l'ordinamento sull'evento click di ciascuno.
Namor
--
namor at inwind punto it



title: ordinare listbox

author: ALESSANDRO Baraldi

text:
"Cholo" <m.mag...@NOSPAMlibero.it> ha scritto nel messaggio
news:kKUvd.23993$Lg7.7...@twister1.libero.it...

La cosa è fattibile, ma richiede un pò di codice.
Supponi di avere l'Origine dati così:
"SELECT * FROM NomeTabella"
Quello che dovresti implementare è esattamente l'uso della Proposizione
ORDER BY
in modo dinamico, sapendo che in un Predicato SQL è sempre l'ultima sezione.
Io ti consiglierei di salvare in una QUERY la STRUTTURA SQL con già
un'ordinamento di DEFAULT.
Ora supponi la query si chiami Q_Ordina
All'interno della tua Form metti un Gruppo Opzioni in visualizzazione
Pulsanti che ti aiuti
nella schelta del Criterio di ordinamento, attenzione all'Ordine progressivo
dei Controlli
nell'OptionButton in quanto la funzione Choose nella routine sotto è legata
proprio
a quello.
Gestisci l'evento Dopo Aggiornamento dell'Option Buttom
Private Sub NomeOptionButton_AfterUpdate()
    dim strOrder    as string
    dim strSQL      as string
    dim intPos       as Integer
    'Rileva l'indice del Button premuto e lo converte nell'equivalente
campo.
    strOrder =
Choose(Me!NomeOtionButton,"Campo1","Campo2","Campo3","Campo4")
    'Ora hai esrtatto nella stringa il nome del Campo che deve essere il
criterio di Ordinamento
    strSQL=CurrentDb.Querydefs("Q_Ordina").SQL
    intPos=Instr(strSQL,"ORDER BY"+8)
    strSQL=Mid(strSQL,1,intpos) & "ORDER BY " & strOrder
    CurrentDb.Querydefs("Q_Ordina").SQL=strSQL
    me.NomeListBox.Requery
End sub
Ci sono altri metodi, come ad esempio per le versioni da XP in poi
di uare un Recordset ed ordinare direttamente il Recordset tramite
la proprietà SORT/SORTBY, usando Recordset ADO ed associandoli
alla List.....!
In fondo si tratta di usare un pò di fantasia grafica applicata al codice.
Ciao
--
@Alex (Alessandro Baraldi)
---------------------------------------------------------------------------
http://www.sitocomune.com/
http://www.mantuanet.it/alessandro.baraldi/
---------------------------------------------------------------------------


title: ordinare listbox

text:
grazie per tutti i contributi... sto lavorando per fare funzionare la
listbox come voglio, con i vostri suggerimenti.
già chi ci sono vi chiedo:
come faccio ad aprire (in un'altra finestra) la maschea di gestione del
record quando clicco (o doppio clicco...) su un elemento della listbox?
avevo provato con
DoCmd.OpenForm "Nome_Form_Dettaglio", , , "[ID]=" & Me![ID]
ma mi apriva sempre la maschera vuota, come se dovessi inserire un nuovo
record... dov'è l'errore???
grazie


title: ordinare listbox

text:
"Cholo" <m.mag...@NOSPAMlibero.it> ha scritto nel messaggio
news:ntXvd.27909$Zk.4...@twister2.libero.it...

Apparentemente è corretta, non è che la Form è in modalità
InserimentoDati...?



title: ordinare listbox

text:
> Apparentemente è corretta, non è che la Form è in modalità
> InserimentoDati...?
esatto... ne ho da imparare!!!
però quando devo inserire (tipo con un pulsante "inserisci") come faccio a
impostare il parametro "Inserimento Dati" da codice? uso sempre la stessa
sintassi senza passare alcune condizione Where?


title: ordinare listbox

text:
"Cholo" <m.mag...@NOSPAMlibero.it> ha scritto nel messaggio
news:iEXvd.27926$Zk.4...@twister2.libero.it...

Io passo un Argomento tramite la proprietà OpeArgs e su Evento Load
controlli il valore dopo di che via Codice setti la proprietà:
Me.DataEntry=True
Esempio:
   DoCmd.OpenForm "NomeForm", , , , , , "DataEntry;True"
Su Load:
Private Sub Form_Load()
    dim varP as variant
    if Len(me.OpenArgs)>0 then
        varp=Split(Me.OpenArgs,";")
        Me.Properties(cstr(varp(0)).value=cint(varp(1))
    End if
End sub
In questo modo passo Proprietà da impostare e valore.
Questo metodo lo si usa solo per casi un pò particolari come questo
non è da preferirsi all'Uso esplicito delle Proprietà dall'esterno, ma
può risultare molto utile.
Ciao



title: ordinare listbox

text:
ok... ma tornato alla mia listbox, a che elemento devo associare l'openform
per fare in modo che nella maschera venga visualizzato il record su cui
faccio doppio clic?
ancora grazie


title: ordinare listbox

text:
"Cholo" <m.mag...@NOSPAMlibero.it> ha scritto nel messaggio
news:6eYvd.28016$Zk.4...@twister2.libero.it...

Non capisco cosa dici...!
Il Doppio Click è un evento della ListBox, se è lei che deve
generare l'apertura sarà lei ad avere l'EVENTO su cui inserire
il Codice.....!
Cosa mi sfugge......?



title: ordinare listbox

text:
> Il Doppio Click è un evento della ListBox, se è lei che deve
> generare l'apertura sarà lei ad avere l'EVENTO su cui inserire
> il Codice.....!
io ho associato all'evento DoppioClick della ListBox il seguente codice:
DoCmd.OpenForm "NomeForm", , , "[Cod]=" & Me![Cod]
dove [Cod] è la chiave univoca del record (presente anche come campo della
ListBox ma nascosto).
quando faccio doppio click su un elemento della listbox il debug mi dice che
"è impossibile trovare il campo 'Cod' a cui si fa riferimento
nell'espressione".
sicuramente commetto un errore da pirla...


title: ordinare listbox

text:
"Cholo" <m.mag...@NOSPAMlibero.it> ha scritto nel messaggio
news:tsYvd.28047$Zk.4...@twister2.libero.it...


Così come l'hai scritta non va ovviamente bene ,scomponiamo la stringa:
"[Cod]=" & Me![Cod]
"[Cod]="     'Questo è il riferimento al campo della Tabella/Query
Me![Cod]    'Questo dovrebbe essere un Controllo chiamato COD nella Form
                 'e a meno chè la tua LisBox non si chiami COD e la colonna
associata
                 'sia la prima non và.
Supponiamo:
TuaListBox    (Nome del Controllo ListBox)
Colonna associata è la PRIMA, quindi indice 0
DoCmd.OpenForm "NomeForm", , , "[Cod]=" & Me!TuaListBox
Se fosse la colonna 2(nascosta) ad essere collagata a COD:
DoCmd.OpenForm "NomeForm", , , "[Cod]=" & Me!TuaListBox.Column(1)
P.S. la numerazione colonne parte da ZERO.
Ciao



title: ordinare listbox

text:
> DoCmd.OpenForm "NomeForm", , , "[Cod]=" & Me!TuaListBox
giusto!
grazie ancora...


title: MI5 Persecution: harassment at work

text:
-=-=-=-=-=-=-=-=-=-=-=-=
-= harassment at work -=
-=-=-=-=-=-=-=-=-=-=-=-=
Once I stopped watching television and listening to the radio at the end of
1990, "they" had to find other ways of committing abuses. So they took what
must be for them a tried and tested route; they get at you by subversion of
those around you. Since they wouldn't be able to do that with my family or
friends, that meant getting at people in the workplace to be their
mouthpieces and do their dirty work for them.
They supplied my employers in Oxford with details from what was going on in
my private life, and what I and other people had said at my home and
accommodation in Oxford. So people at work repeated verbatim words which
had been said in my home, and repeated what I'd been doing recently. Often
the most trivial things, the ones from your domestic life, are the ones
which hurt most. One manager in particular at Oxford continuously abused me
for ten months with verbal sexual abuse, swearing, and threats to terminate
my employment. After ten months I was forced to seek psychiatric help and
start taking medication, and was away from work for two months. I spoke
later with a solicitor about what had happened at that company; he advised
it was only possible to take action if you had left the company as a result
of harassment, and such an action would have to be started very soon after
leaving.
Over a year later the same manager picked on another new worker, with even
more serious results; that employee tried to commit suicide with an
overdose as a result of the ill-treatment, and was forced to leave his job.
But he didn't take action against the company, either. Abuse at work is
comparable to that elsewhere in that tangible evidence is difficult to
produce, and the abusers will always have their denials ready when
challenged. And even if a court accepts what you say happened, it still
remains to prove that abuse causes the type of breakdown I had at the end
of 1992. In a recent case before a British court, a former member of the
Army brought a case against others who had maltreated him ten years
previously. Although the court accepted that abuse had occurred, it did not
agree that depressive illness necessarily followed, and denied justice to
the plaintiff.
5
--
Posted via a free Usenet account from
http://www.teranews.com


title: Impostare data calendario

text:
Ciao a tutti, avrei di bisogno di impostare una certa data nel calendario
alla'apertura della maschera contenente il calendario stesso.
Mi interesserebbe che la data che viene evidenziata nel calendario sia una
data predefinita.
La data viene caricata prima da una tabella.
Ho provato con:
Private Sub Form_Open(Cancel As Integer)

      me.calendario.value= data
end sub
..ma non ho ottenuto alcun risultato.
Come si dovrebbe fare???
Grazie a tutti in anticipo!!!
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: Somme e report

author: Sthepan

text:
In db con uma semplice tabella con i campi
data
n_operazione
allegato
descrizione
entrate
uscite
saldo
ho un report che riporta le voci in linea
data     n_oper.  all.   descrizione    entrate   uscite    saldo
e una casella di testo in alto che riporta il saldo totale
il mio problema è che non riesco a far effettuare l'operazione riga per
riga.
esempio
saldo inziale 1200
entrate  100   uscite 000   saldo 1300
entrate  000   uscite 50    saldo 1250
aggiornando il saldo totale
non riesco a capire dove sbaglio

ciao Sthepan


title: Somme e report

author: MA

text:

ciao guarda su
www.accessgroup.it
 sez. report, Sv ha appena uploadato un
esempio che fa al caso tuo
--
_ _
Ciao
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana per Sviluppatori Access
Info:
www.donkarl.com/it


title: Strano lampeggiamento del puntatore

author: Femto

text:
Ciao NG, dopo vari post e aiuti,  sono a quasi giunto al termine del mio
progetto..ora però sta capitando una cosa molto strana, praticamente il
puntatore del mouse continua a lampeggiare cambiando forma, cioè dalla
freccia passa alla clessidra, da sempre la sensazione di continuare a
lavorare...vi è mai capitata una situazione simile?
Grazie
Femto


title: Strano lampeggiamento del puntatore

author: Carlo Costarella

text:
"Femto" <
fem...@virgilio.it
> ha scritto nel messaggio
news:b1jod.375317$35.17...@news4.tin.it...

Non è che hai una funzione o una qualche routine che si esegue
periodicamente magari sull'evento "su Timer" di qualche maschera aperta?
In Strumenti...Opzioni...Avanzate, l'impostazione di "Intervallo
aggiornamenti" su quanto è impostata? (60?).
Ciao, Carlo


title: Strano lampeggiamento del puntatore

text:

...grazie del suggerimento, ci do un'occhiata...
ciao, Femto


title: BackUp Tabelle, Query, Relazioni ed Indici.

author: FACE ONE

text:
Salve a tutti,
ho la necessità di creare una procedura di salvataggio dati da codice che
permetta di creare un nuovo DB contenente :
Tabelle
Query
Indici
Dati
Relazioni.
Ho trovato varie versioni in giro (Anche su libri) ma non funzionano
correttamente)
Qualcuno di voi può aiutarmi?
Penso che la cosa possa essere interessante a molti di noi.
Grazie anticipatamente del vostro aiuto
FACE ONE


text:

Creati una copia con un "bat"
--
Maurizio75


title: Lettura della proprietà Tag di un Report di Access 97

text:
Dato l'elenco dei report di un Database di Access 97 ottenuto attraverso la
lettura dell'oggetto Container del database stesso
Dim dbs As Database, ctr As Container, doc As Document, TagReport As String
Set dbs = CurrentDb
Set ctr = dbs.Containers!Reports
For Each doc In ctr.Documents
    [...]
Next doc
dbs.Close
Set dbs = Nothing
la lettura della proprietą TAG di ogni report puņ avvenire solo aprendo il
report e leggendo dal report aperto la proprietą:
    DoCmd.OpenReport doc.Name, acViewPreview
    TagReport = Reports(doc.Name).Tag
    DoCmd.Close acReport, doc.Name
o esiste qualche altro modo per leggere la proprietą TAG senza aprire il
report evitando di vederlo comparire, anche solo per un attimo, sullo
schermo?
Grazie!


author: Lorenzo Coronati

text:
Scrisse "pasc_p" <
pasc_...@libero.it
>:
>o esiste qualche altro modo per leggere la proprietą TAG senza aprire il
>report evitando di vederlo comparire, anche solo per un attimo, sullo
>schermo?
Non mi pare ci siano altri metodi.
Se vuoi evitare l'apparizione momentanea del report, prova a settare
echo a false.
--
Lorenzo Coronati
--
<<Nessuno sa che questa affermazione e' vera>>
(John D. Barrow)
--


title: Gestire il "NULL" in un campo testo

author: Dino

text:
Ciao a tutti ho questa problematica.Ho un istruzione IIF che mi deve
verificare alcune condizioni,quando uno di questi valori e' Null a
volte l'istruzione non visualizza le condizioni.
Per cercare di essere piu' preciso ho impostato un pagamento standard
rappresentato da 5 possibilita' (30/60/90/120/150) ogniuna delle quali
e' rappresentata dal campo "PrimoDiI°stand" - "PrimoDiII°stand" ecc.
Ovviamente do anche la possibilita' di sostituire il pagamento
standard con un inserimento manuale.
Anche gli inserimenti manuali sono 5 e sono rappresentati dal "PrimoDiI
°" - "PrimoDiII°" ecc.
Di seguito vi riporto come esempio la condizione che gestisce il terzo
pag :
N°3pag: Round(IIf([PrimoDiIII°stand]="90" And [PrimoDiIII°pag]="0" And
[PrimoDiN°ric]>0;Null;IIf([PrimoDiIII°pag]="90" And [PrimoDiIII
°stand]="0";[tot]/[PrimoDiN°ric];IIf([PrimoDiIII°stand]="90" And
[PrimoDiDescrizione pagamento effettivo]="Nessuno";[tot]/[PrimoDiN
°ric];IIf([PrimoDiIII°pag]="90" And [PrimoDiDescrizione pagamento
effettivo]<>"Nessuno";[tot]/[PrimoDiN°ric]))));2)
Grazie in anticipo
Dino


title: Gestire il "NULL" in un campo testo

author: OneEDP

text:

Cerca la guia NZ e "elenco valori"
Daniele


title: Gestire il "NULL" in un campo testo

text:

> Daniele- Nascondi testo citato
>
> - Mostra testo citato -
Ciao e grazie per la risp.ho gia' provato con Nz ma il risultato non
cambia.
A dir la verita' ho provato come si usa normalmente la funzione cioe'
Nz([Nome campo]) c'e' anche un'altra sintassi????
Grazie
Dino


title: Gestire il "NULL" in un campo testo

text:
Il 24/05/2010 21.12, Dino ha scritto:
> On 24 Mag, 19:51, OneEDP<OneEDP@antispam>  wrote:
>
>> Il 24/05/2010 16.39, Dino ha scritto:
>>
>>
>>
>>
>>> Ciao a tutti ho questa problematica.Ho un istruzione IIF che mi deve
>>> verificare alcune condizioni,quando uno di questi valori e' Null a
>>> volte l'istruzione non visualizza le condizioni.
>>> Per cercare di essere piu' preciso ho impostato un pagamento standard
>>> rappresentato da 5 possibilita' (30/60/90/120/150) ogniuna delle quali
>>> e' rappresentata dal campo "PrimoDiI�stand" - "PrimoDiII�stand" ecc..
>>> Ovviamente do anche la possibilita' di sostituire il pagamento
>>> standard con un inserimento manuale.
>>> Anche gli inserimenti manuali sono 5 e sono rappresentati dal "PrimoDiI
>>> �" - "PrimoDiII�" ecc.
>>>
>>
>>> Di seguito vi riporto come esempio la condizione che gestisce il terzo
>>> pag :
>>>
>>
>>> N�3pag: Round(IIf([PrimoDiIII�stand]="90" And [PrimoDiIII�pag]="0" And
>>> [PrimoDiN�ric]>0;Null;IIf([PrimoDiIII�pag]="90" And [PrimoDiIII
>>> �stand]="0";[tot]/[PrimoDiN�ric];IIf([PrimoDiIII�stand]="90" And
>>> [PrimoDiDescrizione pagamento effettivo]="Nessuno";[tot]/[PrimoDiN
>>> �ric];IIf([PrimoDiIII�pag]="90" And [PrimoDiDescrizione pagamento
>>> effettivo]<>"Nessuno";[tot]/[PrimoDiN�ric]))));2)
>>>
>>
>>> Grazie in anticipo
>>>
>>
>>> Dino
>>>
>> Cerca la guia NZ e "elenco valori"
>> Daniele- Nascondi testo citato
>>
>> - Mostra testo citato -
>>
> Ciao e grazie per la risp.ho gia' provato con Nz ma il risultato non
> cambia.
>
> A dir la verita' ho provato come si usa normalmente la funzione cioe'
> Nz([Nome campo]) c'e' anche un'altra sintassi????
>
> Grazie
> Dino
>
  Round(
	IIf([PrimoDiIII�stand]="90" And [PrimoDiIII�pag]="0" And[PrimoDiN�ric]>0;
		Null;
		IIf([PrimoDiIII�pag]="90" And [PrimoDiIII�stand]="0";
			[tot]/[PrimoDiN�ric];
				IIf([PrimoDiIII�stand]="90" And [PrimoDiDescrizione pagamento effettivo]="Nessuno";
					[tot]/[PrimoDiN�ric];
					IIf([PrimoDiIII�pag]="90" And [PrimoDiDescrizione pagamentoeffettivo]<>"Nessuno";
						[tot]/[PrimoDiN�ric];"QUIMANCAQUALCOSAQUIMANCA" ))));2)
Vedi quimancaqualcosa!!!
Ciao


title: Gestire il "NULL" in un campo testo

text:
"Dino" <
verreng...@alice.it
> ha scritto nel messaggio
news:13cfbc3f-65c4-4bbf...@k31g2000vbu.googlegroups.com...
> On 24 Mag, 19:51, OneEDP <OneEDP@antispam> wrote:
>> Il 24/05/2010 16.39, Dino ha scritto:
>>
>>
>>
>> > Ciao a tutti ho questa problematica.Ho un istruzione IIF che mi deve
>> > verificare alcune condizioni,quando uno di questi valori e' Null a
>> > volte l'istruzione non visualizza le condizioni.
>> > Per cercare di essere piu' preciso ho impostato un pagamento standard
>> > rappresentato da 5 possibilita' (30/60/90/120/150) ogniuna delle quali
>> > e' rappresentata dal campo "PrimoDiIīŋŊstand" - "PrimoDiIIīŋŊstand" ecc.
>> > Ovviamente do anche la possibilita' di sostituire il pagamento
>> > standard con un inserimento manuale.
>> > Anche gli inserimenti manuali sono 5 e sono rappresentati dal "PrimoDiI
>> > īŋŊ" - "PrimoDiIIīŋŊ" ecc.
>>
>> > Di seguito vi riporto come esempio la condizione che gestisce il terzo
>> > pag :
>>
>> > NīŋŊ3pag: Round(IIf([PrimoDiIIIīŋŊstand]="90" And [PrimoDiIIIīŋŊpag]="0" And
>> > [PrimoDiNīŋŊric]>0;Null;IIf([PrimoDiIIIīŋŊpag]="90" And [PrimoDiIII
>> > īŋŊstand]="0";[tot]/[PrimoDiNīŋŊric];IIf([PrimoDiIIIīŋŊstand]="90" And
>> > [PrimoDiDescrizione pagamento effettivo]="Nessuno";[tot]/[PrimoDiN
>> > īŋŊric];IIf([PrimoDiIIIīŋŊpag]="90" And [PrimoDiDescrizione pagamento
>> > effettivo]<>"Nessuno";[tot]/[PrimoDiNīŋŊric]))));2)
>>
>> > Grazie in anticipo
>>
>> > Dino
>>
>> Cerca la guia NZ e "elenco valori"
>> Daniele- Nascondi testo citato
>>
>> - Mostra testo citato -
>
> Ciao e grazie per la risp.ho gia' provato con Nz ma il risultato non
> cambia.
>
> A dir la verita' ho provato come si usa normalmente la funzione cioe'
> Nz([Nome campo]) c'e' anche un'altra sintassi????
>
> Grazie
> Dino
Nz(TuovaloreNullo;"Concosalosostituisci")


title: Gestire il "NULL" in un campo testo

text:
On 25 Mag, 11:56, "MA" <
mas...@massimilianoamendola.it
> wrote:
> "Dino" <
verrengia.d...@alice.it
> ha scritto nel messaggionews:13cfbc3f-65c4-4bbf...@k31g2000vbu.googlegroups.com...
>
>
>
>
>
> > On 24 Mag, 19:51, OneEDP <OneEDP@antispam> wrote:
> >> Il 24/05/2010 16.39, Dino ha scritto:
>
> >> > Ciao a tutti ho questa problematica.Ho un istruzione IIF che mi deve
> >> > verificare alcune condizioni,quando uno di questi valori e' Null a
> >> > volte l'istruzione non visualizza le condizioni.
> >> > Per cercare di essere piu' preciso ho impostato un pagamento standard
> >> > rappresentato da 5 possibilita' (30/60/90/120/150) ogniuna delle quali
> >> > e' rappresentata dal campo "PrimoDiI°stand" - "PrimoDiII°stand" ecc.
> >> > Ovviamente do anche la possibilita' di sostituire il pagamento
> >> > standard con un inserimento manuale.
> >> > Anche gli inserimenti manuali sono 5 e sono rappresentati dal "PrimoDiI
> >> > °" - "PrimoDiII°" ecc.
>
> >> > Di seguito vi riporto come esempio la condizione che gestisce il terzo
> >> > pag :
>
> >> > N°3pag: Round(IIf([PrimoDiIII°stand]="90" And [PrimoDiIII°pag]="0" And
> >> > [PrimoDiN°ric]>0;Null;IIf([PrimoDiIII°pag]="90" And [PrimoDiIII
> >> > °stand]="0";[tot]/[PrimoDiN°ric];IIf([PrimoDiIII°stand]="90" And
> >> > [PrimoDiDescrizione pagamento effettivo]="Nessuno";[tot]/[PrimoDiN
> >> > °ric];IIf([PrimoDiIII°pag]="90" And [PrimoDiDescrizione pagamento
> >> > effettivo]<>"Nessuno";[tot]/[PrimoDiN°ric]))));2)
>
> >> > Grazie in anticipo
>
> >> > Dino
>
> >> Cerca la guia NZ e "elenco valori"
> >> Daniele- Nascondi testo citato
>
> >> - Mostra testo citato -
>
> > Ciao e grazie per la risp.ho gia' provato con Nz ma il risultato non
> > cambia.
>
> > A dir la verita' ho provato come si usa normalmente la funzione cioe'
> > Nz([Nome campo]) c'e' anche un'altra sintassi????
>
> > Grazie
> > Dino
>
> Nz(TuovaloreNullo;"Concosalosostituisci")- Nascondi testo citato
>
> - Mostra testo citato -
Ciao a tutti e grazie per la risposta.
ho cercato di riscrivere i vari passaggi per snellire l'istruzione
IIF.Ho riscontrato quanto segue:
1) Quando una delle due variabili e' "Null" io devo avere come
risultato "Null".Ho provato con la funz Nz e funziona solo se scrivo
la parte di istruzione IIF rigurdante questa condizione.Se invece
associo le altre condizioni non funziona.Questo vale anche per le
altre condizioni.
ho paura che sia un problema di sintassi.
Di seguito vi riporto l'istruzione IIF riguardante il pagamento a 60
giorni:
N°2pag: Round(IIf(([PrimoDiII°]="0") And ([PrimoDiII
°stand]="0");Null;IIf(([PrimoDiII°stand]="60") And (Nz([PrimoDiII
°]));Null;IIf(([PrimoDiII°stand]="60") And ([PrimoDiII°pag]="0");[tot]/
[PrimoDiN°ric];IIf(([PrimoDiII°pag]="60") And ([PrimoDiII°stand]="0");
[tot]/[PrimoDiN°ric]))));2)
Grazie in anticipo
Dino


title: Gestire il "NULL" in un campo testo

text:


Vedi qui sopra l'ultima if nel caso la condizione � falsa che cosa viene
restituito?
Dovresti aggiungere ";Null" se vuoi il null



title: Gestire il "NULL" in un campo testo

text:

> Vedi qui sopra l'ultima if nel caso la condizione è falsa che cosa viene
> restituito?
> Dovresti aggiungere ";Null" se vuoi il null
>
>
>
> > ))));2)
>
> > Grazie in anticipo
> > Dino- Nascondi testo citato
>
> - Mostra testo citato -- Nascondi testo citato
>
> - Mostra testo citato -
Ciao e grazie per la risposta.A dir la verita' mi stanno succedendo
cose mai successe prima d'ora.Di seguito ti riporto solo questo pezzo
di funzione:
IIf(([PrimoDiII°]="0") And ([PrimoDiII°stand]="0");Null;IIf(([PrimoDiII
°stand]="60") And (Nz([PrimoDiII°]));Null)
Sto facendo delle prove per capire dove e' l'
errore.Incredibile.Se
tolgo le parentesi tonde all' AND la funzione no mi da nessun
risultato pur verificando le condizioni.sE le inserisco a volte lo da
qa volte no!!!!!Secondo te puo' dipendere dalla sintassi e così per
tutta la funzione IIF sopra impostata????
Dino


title: Gestire il "NULL" in un campo testo

text:

>> Vedi qui sopra l'ultima if nel caso la condizione � falsa che cosa viene
>> restituito?
>> Dovresti aggiungere ";Null" se vuoi il null
>>
>>
>>
>>
>>> ))));2)
>>>
>>
>>> Grazie in anticipo
>>> Dino- Nascondi testo citato
>>>
>> - Mostra testo citato -- Nascondi testo citato
>>
>> - Mostra testo citato -
>>
> Ciao e grazie per la risposta.A dir la verita' mi stanno succedendo
> cose mai successe prima d'ora.Di seguito ti riporto solo questo pezzo
> di funzione:
>
> IIf(([PrimoDiII�]="0") And ([PrimoDiII�stand]="0");Null;IIf(([PrimoDiII
> �stand]="60") And (Nz([PrimoDiII�]));Null)
>
> Sto facendo delle prove per capire dove e' l'
errore.Incredibile.Se
> tolgo le parentesi tonde all' AND la funzione no mi da nessun
> risultato pur verificando le condizioni.sE le inserisco a volte lo da
> qa volte no!!!!!Secondo te puo' dipendere dalla sintassi e cos� per
> tutta la funzione IIF sopra impostata????
>
> Dino
>
Il problema � semplice: il null � la pecora nera dei dati.  Sei il tuo
campo PrimodiII o altri contengono null l'intera iif nidificata va a
farsi friggere.
Un null non � confrontabile con un null. Va convertito. Cmq � davvero
ardua la tua espressione. Mancano degli nz e delle parentesi messe forse
fuori luogo
Dovresti usare nz con Nz(Campo; '0')
Ciao


title: Gestire il "NULL" in un campo testo

text:

> >> Vedi qui sopra l'ultima if nel caso la condizione è falsa che cosa viene
> >> restituito?
> >> Dovresti aggiungere ";Null" se vuoi il null
>
> >>> ))));2)
>
> >>> Grazie in anticipo
> >>> Dino- Nascondi testo citato
>
> >> - Mostra testo citato -- Nascondi testo citato
>
> >> - Mostra testo citato -
>
> > Ciao e grazie per la risposta.A dir la verita' mi stanno succedendo
> > cose mai successe prima d'ora.Di seguito ti riporto solo questo pezzo
> > di funzione:
>
> > IIf(([PrimoDiII°]="0") And ([PrimoDiII°stand]="0");Null;IIf(([PrimoDiII
> > °stand]="60") And (Nz([PrimoDiII°]));Null)
>
> > Sto facendo delle prove per capire dove e' l'
errore.Incredibile.Se
> > tolgo le parentesi tonde all' AND la funzione no mi da nessun
> > risultato pur verificando le condizioni.sE le inserisco a volte lo da
> > qa volte no!!!!!Secondo te puo' dipendere dalla sintassi e così per
> > tutta la funzione IIF sopra impostata????
>
> > Dino
>
> Il problema è semplice: il null è la pecora nera dei dati.  Sei il tuo
> campo PrimodiII o altri contengono null l'intera iif nidificata va a
> farsi friggere.
> Un null non è confrontabile con un null. Va convertito. Cmq è davvero
> ardua la tua espressione. Mancano degli nz e delle parentesi messe forse
> fuori luogo
> Dovresti usare nz con Nz(Campo; '0')
> Ciao- Nascondi testo citato
>
> - Mostra testo citato -
Le parentesi fuori luogo sono una prova (ti riferisci alle parentesi
dei vari AND).Per quanto riguarda gli Nz.Ho provato ha racchiudere
tutti i campi con Nz,ma il ris. non cambia.
Il problema come dici tu e' sicuramente il null.La cosa incredibili e'
che in altre query funziona tutto senza prob.
Sono d'accordo su "Dovresti usare nz con Nz(Campo; '0')" il problema
e' che se converto "campo" da Null a zero (tramite Nz) mi sballa la
formula.
Dino


title: Gestire il "NULL" in un campo testo

text:

>>>> Vedi qui sopra l'ultima if nel caso la condizione � falsa che cosa viene
>>>> restituito?
>>>> Dovresti aggiungere ";Null" se vuoi il null
>>>>
>>
>>>>> ))));2)
>>>>>
>>
>>>>> Grazie in anticipo
>>>>> Dino- Nascondi testo citato
>>>>>
>>
>>>> - Mostra testo citato -- Nascondi testo citato
>>>>
>>
>>>> - Mostra testo citato -
>>>>
>>
>>> Ciao e grazie per la risposta.A dir la verita' mi stanno succedendo
>>> cose mai successe prima d'ora.Di seguito ti riporto solo questo pezzo
>>> di funzione:
>>>
>>
>>> IIf(([PrimoDiII�]="0") And ([PrimoDiII�stand]="0");Null;IIf(([PrimoDiII
>>> �stand]="60") And (Nz([PrimoDiII�]));Null)
>>>
>>
>>> Sto facendo delle prove per capire dove e' l'
errore.Incredibile.Se
>>> tolgo le parentesi tonde all' AND la funzione no mi da nessun
>>> risultato pur verificando le condizioni.sE le inserisco a volte lo da
>>> qa volte no!!!!!Secondo te puo' dipendere dalla sintassi e cos� per
>>> tutta la funzione IIF sopra impostata????
>>>
>>
>>> Dino
>>>
>> Il problema � semplice: il null � la pecora nera dei dati.  Sei il tuo
>> campo PrimodiII o altri contengono null l'intera iif nidificata va a
>> farsi friggere.
>> Un null non � confrontabile con un null. Va convertito. Cmq � davvero
>> ardua la tua espressione. Mancano degli nz e delle parentesi messe forse
>> fuori luogo
>> Dovresti usare nz con Nz(Campo; '0')
>> Ciao- Nascondi testo citato
>>
>> - Mostra testo citato -
>>
> Le parentesi fuori luogo sono una prova (ti riferisci alle parentesi
> dei vari AND).Per quanto riguarda gli Nz.Ho provato ha racchiudere
> tutti i campi con Nz,ma il ris. non cambia.
> Il problema come dici tu e' sicuramente il null.La cosa incredibili e'
> che in altre query funziona tutto senza prob.
>
> Sono d'accordo su "Dovresti usare nz con Nz(Campo; '0')" il problema
> e' che se converto "campo" da Null a zero (tramite Nz) mi sballa la
> formula.
>
>
> Dino
>
Dovreti crearti una tabella tblTipiDiPagamento ed eseguire un dlookup
(F1 per la guida).


title: Gestire il "NULL" in un campo testo

text:

> >>>> Vedi qui sopra l'ultima if nel caso la condizione è falsa che cosa viene
> >>>> restituito?
> >>>> Dovresti aggiungere ";Null" se vuoi il null
>
> >>>>> ))));2)
>
> >>>>> Grazie in anticipo
> >>>>> Dino- Nascondi testo citato
>
> >>>> - Mostra testo citato -- Nascondi testo citato
>
> >>>> - Mostra testo citato -
>
> >>> Ciao e grazie per la risposta.A dir la verita' mi stanno succedendo
> >>> cose mai successe prima d'ora.Di seguito ti riporto solo questo pezzo
> >>> di funzione:
>
> >>> IIf(([PrimoDiII°]="0") And ([PrimoDiII°stand]="0");Null;IIf(([PrimoDiII
> >>> °stand]="60") And (Nz([PrimoDiII°]));Null)
>
> >>> Sto facendo delle prove per capire dove e' l'
errore.Incredibile.Se
> >>> tolgo le parentesi tonde all' AND la funzione no mi da nessun
> >>> risultato pur verificando le condizioni.sE le inserisco a volte lo da
> >>> qa volte no!!!!!Secondo te puo' dipendere dalla sintassi e così per
> >>> tutta la funzione IIF sopra impostata????
>
> >>> Dino
>
> >> Il problema è semplice: il null è la pecora nera dei dati.  Sei il tuo
> >> campo PrimodiII o altri contengono null l'intera iif nidificata va a
> >> farsi friggere.
> >> Un null non è confrontabile con un null. Va convertito. Cmq è davvero
> >> ardua la tua espressione. Mancano degli nz e delle parentesi messe forse
> >> fuori luogo
> >> Dovresti usare nz con Nz(Campo; '0')
> >> Ciao- Nascondi testo citato
>
> >> - Mostra testo citato -
>
> > Le parentesi fuori luogo sono una prova (ti riferisci alle parentesi
> > dei vari AND).Per quanto riguarda gli Nz.Ho provato ha racchiudere
> > tutti i campi con Nz,ma il ris. non cambia.
> > Il problema come dici tu e' sicuramente il null.La cosa incredibili e'
> > che in altre query funziona tutto senza prob.
>
> > Sono d'accordo su "Dovresti usare nz con Nz(Campo; '0')" il problema
> > e' che se converto "campo" da Null a zero (tramite Nz) mi sballa la
> > formula.
>
> > Dino
>
> Dovreti crearti una tabella tblTipiDiPagamento ed eseguire un dlookup
> (F1 per la guida).- Nascondi testo citato
>
> - Mostra testo citato -
Ok grazie provo e ci sentiamo domani
Dino


title: Aiuto

author: rosario

text:
Gentilissimi amici,
volendo creare un db che gestisce un piccolo condominio, mi sono trovato in
un mare di confusione quando dovevo far fare i calcoli per poi stamparli. mi
sono impallato.
Ho creato tre tabelle :
TCondomini (Id_Condomino, Nominativo, Tab_A[valore millesimi] Tab_B[valore
millesimi] Tab_C[valore millesimi] Tab_S [valore per spese singole che
imposto a 1], Paga_Spese_Ordinarie [si/no], Paga_Spese_Straordinarie
[si/no]);
TSpese (Id_Spesa, Descrizione, Data, Importo);
TAcconti (Id_Acconto, Importo, Data, Descrizione, Nominativo[combo su
nominativo TCondomini]);
I calcoli, li effettuo con le query ? sii ? come ?
Considerato che ho da fare i calcoli quanto paga e versa un condomino,  :
per mese
spese ordinarie, straordinarie,singole (telefonate, posta)
per poi stampare una specie di bollettino per il condomino.
io ho creato delle querry ma sono stato costretto comunque a crearne una per
la creazzione di una tabella che mi accorpasse le spese per la famosa stampa
ma per i calcoli dare e avere nella stessa stampa come faccio?
vi prego di aiutarmi e se potete darmi l'indirizzo di qualche corso in rete
su come svillupare passo passo questo tipo di applicazione grazie
nb ho allegato il db per i curiosi


title: Aiuto

text:
aiuto
rosario <
rosari...@tiscalinet.it
> wrote in message
896eu2$6om$1...@pegasus.tiscalinet.it...



title: Aiuto

author: sergio mazza

text:
rosario <
rosari...@tiscalinet.it
> wrote in message
898m0e$6ig$1...@lacerta.tiscalinet.it...
> aiuto
> rosario <
rosari...@tiscalinet.it
> wrote in message
> 896eu2$6om$1...@pegasus.tiscalinet.it...
------------- ommissis ----------------------
> > I calcoli, li effettuo con le query ? sii ? come ?
> > Considerato che ho da fare i calcoli quanto paga e versa un condomino,
:
> > per mese
> > spese ordinarie, straordinarie,singole (telefonate, posta)
> > per poi stampare una specie di bollettino per il condomino.
> > io ho creato delle querry ma sono stato costretto comunque a crearne una
> per
> > la creazzione di una tabella che mi accorpasse le spese per la famosa
> stampa
> > ma per i calcoli dare e avere nella stessa stampa come faccio?
> > vi prego di aiutarmi e se potete darmi l'indirizzo di qualche corso in
> rete
> > su come svillupare passo passo questo tipo di applicazione grazie
> > nb ho allegato il db per i curiosi
> >
Per creare un campo calcolato nella query:
(nella griglia dove sono inseriti i campi)
riga "Campo"
- scrivi: TotaleSpese: [speseTelefono]+[spesePosta]
i ":" (due punti) indicano l'assegnazione del risultato dell'espressione
"[speseTelefono]+[spesePosta]" e "TotaleSpese è il nome del campo calcolato
a cui puoi fare riferimento nel report.
Ciao.


title: x esperti - Access può "sentire" un evento esterno ?

author: Marcello Gabrielli

text:
Ciao a tutti
Vi pongo un quesito un pochino strano: Access puň "sentire" un evento
esterno ?
Mi spiego meglio: io ho un programma esterno che va a scrivere dei
record in una apposita tabella, decidendo se aggiungere un nuovo record
o modificare quelli esistenti. Io vorrei che access si accorgesse quando
questo programma gli scrive sopra e mi facesse vedere cosa č successo.
Mi spiego ancora meglio: io ho aperta una maschera che mi visualizza,
filtrati attraverso una query, i dati di una tabella. Quando l'altro
programma va a scrivere sulla tabella vorrei che la maschera si
aggiornasse mostrandomi i dati nuovi immessi o modificati (magari
evidenziati).
Ho provato a mettere un timer di aggiormanento della maschera (on timer
1000 requery) e funziona, ma cosě mi fa il refresh ogni secondo e non
quando c'č un dato nuovo.
Avete qualche idea in merito ?
Grazie per l'aiuto
Marcello
--
Posted from
www.enginsoft.it
 [213.82.68.132]
via Mailgate.ORG Server -
http://www.Mailgate.ORG


author: MarcoS

text:
Marcello Gabrielli <
m.gab...@enginsoft.it
> wrote in message
3B0A63C9...@enginsoft.it...
>
> Mi spiego ancora meglio: io ho aperta una maschera che mi visualizza,
> filtrati attraverso una query, i dati di una tabella. Quando l'altro
> programma va a scrivere sulla tabella vorrei che la maschera si
> aggiornasse mostrandomi i dati nuovi immessi o modificati (magari
> evidenziati).
>
Ti mostro cosa ho fatto io per una cosa simile, forse però non soddisfa il
tuo caso.
Da un programma scritto VB.6 inserisco un record su una tab di access, a
questo punto inserisco campi aggiuntivi relativi al Record (es. 144),
aprendo direttamente il programma di access sul Record inserito da VB.
p.s. Nel mio caso il programma di Access è chiuso.
"C:\Programmi\Microsoft Office\Office\MSACCESS.EXE"
C:\prog\commerciali\Comm.mdb /Wrkgrp \\tnt\database\zecc.mdw /x M_Offerta
/cmd 144
M_Offeta = Macro che apre la scheda specificata
144 = Il record inserito
--
Ciao Marco S.
http://digilander.iol.it/santimarco


text:
"Marcello Gabrielli" <
m.gab...@enginsoft.it
> ha scritto nel messaggio
news:3B0A63C9...@enginsoft.it...
> Ciao a tutti
>
> Vi pongo un quesito un pochino strano: Access puň "sentire" un evento
> esterno ?
>
> Mi spiego meglio: io ho un programma esterno che va a scrivere dei
> record in una apposita tabella, decidendo se aggiungere un nuovo record
> o modificare quelli esistenti. Io vorrei che access si accorgesse quando
> questo programma gli scrive sopra e mi facesse vedere cosa č successo.
>
> Mi spiego ancora meglio: io ho aperta una maschera che mi visualizza,
> filtrati attraverso una query, i dati di una tabella. Quando l'altro
> programma va a scrivere sulla tabella vorrei che la maschera si
> aggiornasse mostrandomi i dati nuovi immessi o modificati (magari
> evidenziati).
>
> Ho provato a mettere un timer di aggiormanento della maschera (on timer
> 1000 requery) e funziona, ma cosě mi fa il refresh ogni secondo e non
> quando c'č un dato nuovo.
>
> Avete qualche idea in merito ?
>
> Grazie per l'aiuto
>
> Marcello
>
Cosě di getto andrei con il timer a testare la data ultima modifica e solo
se varia farei una requery.
--
Claudio Tregambe


text:
"Cl@udi0" <
clau...@hotmail.com
> ha scritto nel messaggio
news:9ee1kf$6q5$1...@fe1.cs.interbusiness.it...
>
> "Marcello Gabrielli" <
m.gab...@enginsoft.it
> ha scritto nel messaggio
> news:3B0A63C9...@enginsoft.it...
> > Ciao a tutti
> >
SUPERCUT
> >
> Cosě di getto andrei con il timer a testare la data ultima modifica e solo
> se varia farei una requery.
>
>
A volte farei meglio a pensare prima di parlare. :-(
La data ultima modifica si riferisce alla struttura della tabella, NON a
quella dei record :-(
Sorry
--
Claudio Tregambe


author: Sergio MAZZA

text:
"Marcello Gabrielli" <
m.gab...@enginsoft.it
> ha scritto nel messaggio
news:3B0A63C9...@enginsoft.it...
> Ciao a tutti
>
> Vi pongo un quesito un pochino strano: Access puň "sentire" un evento
> esterno ?
>
> Mi spiego meglio: io ho un programma esterno che va a scrivere dei
> record in una apposita tabella, decidendo se aggiungere un nuovo record
> o modificare quelli esistenti. Io vorrei che access si accorgesse quando
> questo programma gli scrive sopra e mi facesse vedere cosa č successo.
>
> Mi spiego ancora meglio: io ho aperta una maschera che mi visualizza,
> filtrati attraverso una query, i dati di una tabella. Quando l'altro
> programma va a scrivere sulla tabella vorrei che la maschera si
> aggiornasse mostrandomi i dati nuovi immessi o modificati (magari
> evidenziati).
>
> Ho provato a mettere un timer di aggiormanento della maschera (on timer
> 1000 requery) e funziona, ma cosě mi fa il refresh ogni secondo e non
> quando c'č un dato nuovo.
>
> Avete qualche idea in merito ?
>
> Grazie per l'aiuto
>
> Marcello
>
La butto lě, ha provato con il DDE?
Ciao.


author: Roberto dal portatile

text:
"Marcello Gabrielli" <
m.gab...@enginsoft.it
> ha scritto nel messaggio
news:3B0A63C9...@enginsoft.it...
> Ciao a tutti
>
> Vi pongo un quesito un pochino strano: Access può "sentire" un evento
> esterno ?
>
> Mi spiego meglio: io ho un programma esterno che va a scrivere dei
> record in una apposita tabella, decidendo se aggiungere un nuovo record
> o modificare quelli esistenti. Io vorrei che access si accorgesse quando
> questo programma gli scrive sopra e mi facesse vedere cosa è successo.
>
> Mi spiego ancora meglio: io ho aperta una maschera che mi visualizza,
> filtrati attraverso una query, i dati di una tabella. Quando l'altro
> programma va a scrivere sulla tabella vorrei che la maschera si
> aggiornasse mostrandomi i dati nuovi immessi o modificati (magari
> evidenziati).
>
> Ho provato a mettere un timer di aggiormanento della maschera (on timer
> 1000 requery) e funziona, ma così mi fa il refresh ogni secondo e non
> quando c'è un dato nuovo.
>
> Avete qualche idea in merito ?
>
> Grazie per l'aiuto
>
> Marcello
>
Una prima idea.
Ti crei una tebella Pippo contenente un solo record composto da un solo
campo Pluto che può assumere il valore 0 o 1.
Il programma esterno, quando aggiorna l'attuale tabella, mette a 1 il campo
Pluto.
Nell'evento su timer vai a verificare con una Dlookup se il valore di Pluto
è uguale a 1, nel qualcaso fai il Requery della maschera e forzi Pluto a
zero.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: SDM Alert

author: SunRex

text:
Sto tentando di installare un applicazione in Access 97 su un pc.Dopo aver
istallato il BE su un server ho installato il FE su un pc ma quando provo a
collegare le tbl attraverso
l'apposito comando File\ Carica dati esterni \Collega
mi appare il seguente messaggio:
SDM Alert
 FRetrySdmError
con i seguenti pulsanti
Termina Riprova Ignora
Naturalmente sia premendo Riprova che Ignora il problema non si risolve.
Sul alcuni pc ,del luogo dove lavoro , succede mentre su altri no.
Il SO dei pc è Windows NT.
Anche reistallando Access 97 il problema non si risolve.
Qualcuno ci si è mai imbattuto?
SunRex


title: SDM Alert

text:
"SunRex" <
sunrexs...@hotmail.com
> ha scritto nel messaggio
news:qi8Va.34189$Za4.1...@news2.tin.it...

Credo tu abbia beccato un bel virus: NIMDA.
Questo messaggio si verifica quando tenti di aprire o salvare un file in
programmi Office.
La soluzione è un antivirus aggiornato.
Cerca in MSDN: Q308360
qui è spiegato bene cosa fare oltre all'antivirus, che da solo non basta.
In Norton:
http://securityresponse.symantec.com/avcenter/venc/data/w32.n...@mm.html
Ciao, Carlo


title: SDM Alert

text:
"Carlo Costarella" <
carloantoni...@virgilio.it
> ha scritto nel
messaggio news:VpJVa.45003$Za4.1...@news2.tin.it...

Il pc in questione è stato scansionato per la ricerca di questo maledetto
virus dal
servizio informatico del posto dove lavoro ma di Nimda non c'è traccia.
Che succede?
SunRex


title: SDM Alert

text:
CUT
> > Credo tu abbia beccato un bel virus: NIMDA.
> > Questo messaggio si verifica quando tenti di aprire o salvare un file in
> > programmi Office.
> > La soluzione è un antivirus aggiornato.
> > Cerca in MSDN: Q308360
> > qui è spiegato bene cosa fare oltre all'antivirus, che da solo non
basta.
> > In Norton:
> >
>
http://securityresponse.symantec.com/avcenter/venc/data/w32.n...@mm.html
> >
> > Ciao, Carlo
>
> Il pc in questione è stato scansionato per la ricerca di questo maledetto
> virus dal
> servizio informatico del posto dove lavoro ma di Nimda non c'è traccia.
> Che succede?
> SunRex
>
>
Hai letto l'articolo Q308360 di MSDN?
Lì sono spiegate le procedure e i file che vanno sostituiti.
Ciao, Carlo


title: casella Combo e codice fiscale, non accetta apostrofo

author: JOE

text:
salve
mi sono accorto, avendo un db anagrafico, ed un controllo in una Form in
cui si
inserisce il comune di residenza con completamento automatico durante la
digitazione
per il calcolo del codice fiscale che digitando dei comuni con apostrofo
mi procura errore:
esempio: digitando Sant'Ambrogio all'apostrofo mi procura errore...
sono convinto che il problema è parte di questo codice....
 Private Sub Form_Current()
Me.txtProvincia = Nz(DLookup("COMU_PROV", "Comuni", "COMU_DESCR=" & """"
& Me.TxTComune & """"), "")
Me.txtCodiceComune = Nz(DLookup("COMU_COD", "Comuni", "COMU_DESCR=" &
"""" & Me.TxTComune & """"), "")
Me.txtProvinciaRes = Nz(Me.TxtComResidenza.Column(1), "")
Me.txtCodiceComuneRes = Nz(Me.TxtComResidenza.Column(2), "")
End Sub
ciao e grazie per l'aiuto


text:

o usi il replace o sostituisci l'apostrofo con il chr(34)
"COMU_DESCR=" & chr(34) & Me.TxTComune & chr(34)
--
--
MAssimiliano Amendola
www.accessgroup.it
Cisa - Conferenza Italiana Sviluppatori Access


text:
"MA" <
mas...@massimilianoamendola.it
> ha scritto nel messaggio
news:ftko78$81k$1...@tdi.cu.mi.it...
> per il calcolo del codice fiscale che digitando dei comuni con
> apostrofo mi procura errore:
> esempio: digitando Sant'Ambrogio all'apostrofo mi procura errore...
> sono convinto che il problema è parte di questo codice....
>
> Private Sub Form_Current()
> Me.txtProvincia = Nz(DLookup("COMU_PROV", "Comuni", "COMU_DESCR=" &
> """" & Me.TxTComune & """"), "")
> Me.txtCodiceComune = Nz(DLookup("COMU_COD", "Comuni", "COMU_DESCR=" &
> """" & Me.TxTComune & """"), "")
> Me.txtProvinciaRes = Nz(Me.TxtComResidenza.Column(1), "")
> Me.txtCodiceComuneRes = Nz(Me.TxtComResidenza.Column(2), "")
> End Sub
>
> ciao e grazie per l'aiuto
o usi il replace o sostituisci l'apostrofo con il chr(34)
"COMU_DESCR=" & chr(34) & Me.TxTComune & chr(34)
------------------
ciao Ma... fatto quanto da te descritto (forse male) ma mi procura lo
stesso
errore... l'errore consiste che quando arrivo a digitare l'apostrofo mi
compare la finestrella
che dice "comune non in elenco" ma il comune esiste in elenco...
ecco la modifica: è esatta ???
COMU_DESCR=" & Chr(34) & Me.TxTComune & Chr(34)), "")
COMU_DESCR=" & Chr(34) & Me.TxTComune & Chr(34)), "")
ciao


text:


Guarda le doppie virgolette, sono uguali?
>
> ciao



author: Oscar Manfredini

text:
"MA"
Yuuuuu, huuuuuu?
Hai testato quella faccenda (che interessa tutti) ed eventualmente segnalato
sul blog di Access il problema che "affliggerebbe" il Runtime 2007 SP1?
La lentezza *random* delle SubForms dipende dal gran volume di dati o da
particolarità della tua applicazione?
Ciao: Oscar


text:

sì
mi ha non-rispossto Covinton
It is hard to tell what might be causing the problem. Your best bet would be to call support and have them help narrow things down.

http://support.microsoft.com/kb/936982

This is the type of issue we would likely try to fix but the request has to come through the support channels.

Clint

-----Original Message-----
From:
mas...@massimilianoamendola.it
 [mailto:
mas...@massimilianoamendola.it
]
Sent: Wednesday, April 09, 2008 3:48 AM
To: Access Bloggers
Subject: (Access Team Blog) : Low perfomances of subforms
Importance: High

Dear mr. Convinton,
in an application in LAN with a Back End of 300MB and 15 users, the  ambient is mixed among Access 2003, runtime Xp, runtime 2007 SP1.
Unfortunately the runtime (eng first and ita version after) gives very bad perfomances in navigation of the subform. This problem happens scrolling the records and the fields of the same record.
Is there any solution?
Tks
MAssimiliano



text:
"MA" <
sě
mi ha non-rispossto Covinton
-----------------------------------------------
Ben fatto comunque!  ;-)
Una cosa m'era sfuggita: il problema si verifica solo in ambiente "misto"?
Ovvero, se gli utenti utilizzassero solo Access 2007 Runtime, il degrado si
verifica o no?
Ciao: Oscar


text:
Oscar Manfredini wrote:
> "MA" <
>
>
> sì

Questo non l'ho testato anche perchè non ne vedo il senso



text:
>> CUT <<<
> che dice "comune non in elenco" ma il comune esiste in elenco...
> ecco la modifica: è esatta ???
>
> COMU_DESCR=" & Chr(34) & Me.TxTComune & Chr(34)), "")
> COMU_DESCR=" & Chr(34) & Me.TxTComune & Chr(34)), "")
 "COMU_DESCR=" & chr(34) & Me.TxTComune & chr(34)
Guarda le doppie virgolette, sono uguali?
-----------
perdona la mia incapacità... se ti riferisci alle doppie virgolette
finali
le ho tolte, ma il codice si colora di rosso quindi mi da errore...
ho copiato pari-pari la tua stringa di sopra e fa lo stesso..
dove procura l'errore ??
Ciao
"COMU_DESCR=" & Chr(34) & Me.TxTComune & Chr(34)
--



text:
"MA" <
> Ovvero, se gli utenti utilizzassero solo Access 2007 Runtime, il
> degrado si verifica o no?
>
> Ciao: Oscar
Questo non l'ho testato anche perchè non ne vedo il senso
--------------------------------------------------
??
Spero tu stia scherzando: io, al contrario, non vedo il senso in
quell'insalata mista di versioni di Access.
A maggior ragione se il Runtime 2007 è free ... distribuisci quello e basta.
Le rogne te le stai cercando...
Ciao: Oscar


author: geppo

text:
Ciao JOE wrote:
>>> CUT <<<
>> che dice "comune non in elenco" ma il comune esiste in elenco...
>> ecco la modifica: è esatta ???
>>
>> COMU_DESCR=" & Chr(34) & Me.TxTComune & Chr(34)), "")
 COMU_DESCR=" & Chr(34) & Me.TxTComune & Chr(34) &")
--
Ciao
Geppo


text:
"geppo" <c...@tin.it.invalid> ha scritto nel messaggio
news:NNqMj.56969$FR.2...@twister1.libero.it...

Ciao Geppo... provato come sopra ma non va... mi segna queste 2 righe di
rosso...
vi sono altre soluzioni ???
Me.txtProvincia = Nz(DLookup("COMU_PROV", "Comuni", "COMU_DESCR=" &
Chr(34) & Me.TxTComune & Chr(34)&")
Me.txtCodiceComune = Nz(DLookup("COMU_COD", "Comuni", "COMU_DESCR=" &
Chr(34) & Me.TxTComune & Chr(34)&")
Ciao


text:
Ciao JOE wrote:
> "geppo" <c...@tin.it.invalid> ha scritto nel messaggio
> news:NNqMj.56969$FR.2...@twister1.libero.it...
>> Ciao JOE wrote:
>>>>> CUT <<<
>>>> che dice "comune non in elenco" ma il comune esiste in elenco...
>>>> ecco la modifica: è esatta ???
>>>>
>>>> COMU_DESCR=" & Chr(34) & Me.TxTComune & Chr(34)), "")
>>
>> COMU_DESCR=" & Chr(34) & Me.TxTComune & Chr(34) &")
>>
>
> Ciao Geppo... provato come sopra ma non va... mi segna queste 2 righe
> di rosso...
> vi sono altre soluzioni ???
manca una parentesi ) in chiusura:
> Me.txtProvincia = Nz(DLookup("COMU_PROV", "Comuni", "COMU_DESCR=" &
> Chr(34) & Me.TxTComune & Chr(34)&")
> Me.txtCodiceComune = Nz(DLookup("COMU_COD", "Comuni", "COMU_DESCR=" &
> Chr(34) & Me.TxTComune & Chr(34)&")
> Ciao
--
Ciao
Geppo


text:
"geppo" <c...@tin.it.invalid> ha scritto nel messaggio news:2JGMj.57484>
> manca una parentesi ) in chiusura:
>
>> Me.txtProvincia = Nz(DLookup("COMU_PROV", "Comuni", "COMU_DESCR=" &
>> Chr(34) & Me.TxTComune & Chr(34)&")
>> Me.txtCodiceComune = Nz(DLookup("COMU_COD", "Comuni", "COMU_DESCR=" &
>> Chr(34) & Me.TxTComune & Chr(34)&")
-----------
penso tu ti riferisca in questo modo:
"COMU_DESCR=" & Chr(34) & Me.TxTComune & Chr(34)&"))
mi dà sempre errore dice che manca separatore di elenco...
mi editi tu le stringhe ??? grazie
"COMU_DESCR=" & Chr(34) & Me.TxTComune & Chr(34)&")
"COMU_DESCR=" & Chr(34) & Me.TxTComune & Chr(34)&")
Giuseppe


text:
Ciao JOE wrote:
> "geppo" <c...@tin.it.invalid> ha scritto nel messaggio
> news:2JGMj.57484>
>> manca una parentesi ) in chiusura:
>>
>>> Me.txtProvincia = Nz(DLookup("COMU_PROV", "Comuni", "COMU_DESCR=" &
>>> Chr(34) & Me.TxTComune & Chr(34)&")
>>> Me.txtCodiceComune = Nz(DLookup("COMU_COD", "Comuni", "COMU_DESCR="
>>> & Chr(34) & Me.TxTComune & Chr(34)&")
> -----------
>
> penso tu ti riferisca in questo modo:
> "COMU_DESCR=" & Chr(34) & Me.TxTComune & Chr(34)&"))
Me.txtProvincia = Nz(DLookup("COMU_PROV", "Comuni", "COMU_DESCR=" & Chr(34)
& Me.TxTComune & Chr(34) & ""))
Me.txtCodiceComune = Nz(DLookup("COMU_COD", "Comuni", "COMU_DESCR=" &
Chr(34) & Me.TxTComune & Chr(34) & ""))
--
Ciao
Geppo


text:
"geppo" <c...@tin.it.invalid> ha scritto nel messaggio news:3DOMj.58037>>
>
> Me.txtProvincia = Nz(DLookup("COMU_PROV", "Comuni", "COMU_DESCR=" &
> Chr(34) & Me.TxTComune & Chr(34) & ""))
> Me.txtCodiceComune = Nz(DLookup("COMU_COD", "Comuni", "COMU_DESCR=" &
> Chr(34) & Me.TxTComune & Chr(34) & ""))
---------------
ti ringrazio dell'aiuto Geppo... provato quanto sopra... il codice non
mi procura errore
ma purtroppo il problema originale permane ossia quando in maschera vado
ad inserire un Comune con l'apostrofo mi esce la finestrella di errore
che recita "comune non in elenco".
pazienza... forse non si può fare..
Ciao


text:

Quanta ne vuoi
>forse non si può fare..
No, forse il problema è da un'altra parte.
Qual'è il codice che usi per ricercare il comune?
> Ciao
--
Ciao
Geppo


text:
"geppo" <c...@tin.it.invalid> ha scritto nel messaggio
news:OUZMj.289721$%provato
>> mi procura errore
>> ma purtroppo il problema originale permane ossia quando in maschera
>> vado ad inserire un Comune con l'apostrofo mi esce la finestrella di
>> errore che recita "comune non in elenco".
>> pazienza...
>
> Quanta ne vuoi
grazie.. della pazienza ;.)))
> No, forse il problema è da un'altra parte.
> Qual'è il codice che usi per ricercare il comune?
-----------
ecco il codice... dovrebbe essere questo che è dentro la proprietà
> su modifica:
Private Sub txtComune_Change()
    Dim S As String
    Dim T As String
    Dim Colore As Long
    On Error GoTo ErrFas
    Colore = 0
    T = Trim(Nz(Me.TxTComune.Text, ""))
    If T = "" Then
        Me.TxTComune.Tag = T
        Exit Sub
    End If
    If Len(T) = 1 Then S = T
    COMUNI.Seek ">=", T
    If Not COMUNI.EOF And Not COMUNI.NoMatch Then
      If UCase(T) = UCase(Mid(COMUNI!COMU_DESCR, 1, Len(T))) Then
        If Len(T) > Len(Me.TxTComune.Tag) Then
            Me.TxTComune = COMUNI!COMU_DESCR
            Me.TxTComune.SelStart = Len(T)
            Me.TxTComune.SelLength = Len(Me.TxTComune) - (Len(T))
            Me.txtProvincia = COMUNI!COMU_PROV
            Me.txtCodiceComune = COMUNI!COMU_COD
        End If
      Else
        If Me.TxTComune.ForeColor = 0 Then MsgBox "Comune non in elenco"
        Colore = &H80&
        Me.txtProvincia = ""
        Me.txtCodiceComune = ""
        Me.TxTComune.SetFocus
      End If
    End If
    If Me.TxTComune.ForeColor <> Colore Then Me.TxTComune.ForeColor =
Colore
    Me.TxTComune.Tag = T
Exit Sub
ErrFas:
    MsgBox ("FasMsg: " & Err.Number & " " & Err.Description)
    Err.Clear
End Sub
---------------
Ciao ed ancora grazie


text:
Ciao JOE wrote:
> "geppo" <c...@tin.it.invalid> ha scritto nel messaggio
> news:OUZMj.289721$%provato
--cut--
> ecco il codice... dovrebbe essere questo che è dentro la proprietà
>> su modifica:
Prova a fare questa modifica:
>
> Private Sub txtComune_Change()
>    Dim S As String
>    Dim T As String
>    Dim Colore As Long
>    On Error GoTo ErrFas
>
>    Colore = 0
>
    T = Trim(Nz(Chr(34) & Me.txtComune.Text & Chr(34), ""))

--
Ciao
Geppo


text:
"geppo" <c...@tin.it.invalid> ha scritto nel messaggio news:2j0Nj.58475>
>
> Prova a fare questa modifica:
>
>    T = Trim(Nz(Chr(34) & Me.txtComune.Text & Chr(34), ""))
---------------->
Ciao Geppo... mi pare che la stringa da modificare era solo questa..
giusto..??
cmq ho fatto la prova e la cosa peggiora nel senso che ora appena digito
un tasto sulla
tastiera, ossia una lettera qualsiasi, mi dice sempre "comune non in
elenco"...
Ciao


text:

Se puoi mettere a disposizione una copia del DB, forse diventa più facile
darti una mano.
--
Ciao
Geppo


text:
"geppo" <c...@tin.it.invalid> ha scritto nel messaggio
news:oXkNj.290608$%k.40...@twister2.libero.it...
>> cmq ho fatto la prova e la cosa peggiora nel senso che ora appena
>> digito un tasto sulla
>> tastiera, ossia una lettera qualsiasi, mi dice sempre "comune non in
>> elenco"...
>> Ciao
>
>
> Se puoi mettere a disposizione una copia del DB, forse diventa più
> facile darti una mano.
>
----------
ne sarei felicissimo... vi sono 1600 record.. lo svuoto e te lo mando.
mi dai l'indirizzo email valido ??
grazie e ciao
Giuseppe


text:

p i e t r o 1 9 9 chiocciola i n t e r f r e e . i t
senza spazi
--
Ciao
Geppo


text:

Ti ho rinviato il db.
--
Ciao
Geppo


title: Visualizzare il nome e non l'ID in sottomaschera

author: Paolo Ferrino

text:
Mi scuso per la mia incapacità, ma prima di scrivere questo msg ho già
guardato tutto l'help e cercato sia sul Ng che sul sito comune.
Ho tre tabelle
Corsi               Docenti            Sedi Corsi
IDCorso            IDDocente           IDSedeCorso
NomeCorso          TitoloDocente       Denominazione
SedeCorso          NomeDocente         Indirizzo
Docente            CognomeDocente      Telefono
Ho relazionato IDDocente con Docente e IDSedeCorso con SedeCorso.
Quando ho cercato di far visualizzare in una sottomaschera i corsi per
ogni docente prendendoli dalla tabella Corsi con un filtro opportuno, nel
campo SedeCorso mi ritrovo solo e sempre l'IDSedeCorso e invece io vorrei
che ci fosse la Denominazione.
Come devo fare?
                    Paolo Ferrino
PS: spero di aver scritto un oggetto giusto, se non lo è ditemi cosa
dovrei scrivere.
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


author: Roberto da casa

text:
"Paolo Ferrino" <
paolo.f...@yahoo.it
> ha scritto nel messaggio
news:buosji$7fe$1...@news.newsland.it...
> Mi scuso per la mia incapacità, ma prima di scrivere questo msg ho già
> guardato tutto l'help e cercato sia sul Ng che sul sito comune.
>
> Ho tre tabelle
>
> Corsi               Docenti            Sedi Corsi
>
> IDCorso            IDDocente           IDSedeCorso
> NomeCorso          TitoloDocente       Denominazione
> SedeCorso          NomeDocente         Indirizzo
> Docente            CognomeDocente      Telefono
>
> Ho relazionato IDDocente con Docente e IDSedeCorso con SedeCorso.
>
> Quando ho cercato di far visualizzare in una sottomaschera i corsi per
> ogni docente prendendoli dalla tabella Corsi con un filtro opportuno, nel
> campo SedeCorso mi ritrovo solo e sempre l'IDSedeCorso e invece io vorrei
> che ci fosse la Denominazione.
>
> Come devo fare?
>
>                     Paolo Ferrino
>
> PS: spero di aver scritto un oggetto giusto, se non lo è ditemi cosa
> dovrei scrivere.
>
> --
Hai due possibilità per risolvere il tuo problema:
1) Per la tabella Corsi, per il campo SedeCordo esegui l'Autocomposizione
Ricerca... basandola sulla tabella SediCorsi. A questo punto cancella
l'attuale tua sottomaschera e ricreatela con l'autocomposizione: sicuramente
ora nella sottomaschera vedrai la Denominazione del corso e non IDSedeCorso,
e questo anche se nel campo SedeCorso della tabella Corsi hai memorizzato
IDSedeCorso.
2) In alternativa al punto 1) inserisci nella sottomaschera una casella di
testo non associata e nella sua origine controllo scrivi:
= DLookup("Denominazione"; "[Sede Corsi]"; "IDSedeCorso=" & SedeCorso)
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


title: stampare una tabella...

author: Rimo

text:
Domanda:
Avrei bisogno di stampare la struttura delle mie tabelle,come posso
fare?Stamparle da access non riesco,ma neanche copiando i campi e
incollandoli da un'altra parte..Come posso fare?Ce un modo?
Grazie!!
Inviato da
www.mynewsgate.net


title: stampare una tabella...

author: Nick

text:
"Rimo" <
6175i...@mynewsgate.net
> ha scritto nel messaggio
news:200405031...@mynewsgate.net...

usa l'analizzatore
in Access 2000:
Strumenti -->Analizza --> Analizzatore
Ciao
Nick


title: Evento Current ListBox e Rotellina mouse

text:
In una frm ho messo una listbox con l'autocomposizione per trovare un record
nella maschera
Private Sub lstDocumenti_AfterUpdate()
    ' Trova il record corrispondente al controllo
    Dim rs As Object
    Set rs = Me.Recordset.Clone
    rs.FindFirst "[IDDocumento] = " & Str(Me![lstDocumenti])
    Me.Bookmark = rs.Bookmark
End Sub
Quindi per sincronizzare la listbox con la maschera ho inserito sull'evento
current
Private Sub Form_Current()
lstDocumenti= IDDocumento
End Sub
Tale codice mi permette di usare la rotellina per scorrere i record
della frm senza perdere la sincronia tra la listbox ed i controlli della
frm.
Ora il problema č che se clicco sulla listbox per selezionare un record la
medesima
 mi funziona come se avesse la selezione multipla attivata e quindi
dopo un paio di cliccate non si capisce piů che record
sulla listbox sia evidenziato.La cosa si risolve aggiungendo sull'evento
current un requery della listbox ma cosě facendo non funziona piů la
rotellina.
Suggerimenti?
SunRex


author: ALESSANDRO Baraldi

text:
"SunRex" <
sunrexs...@hotmail.it
> ha scritto nel messaggio
news:JguMb.76421$VW.32...@news3.tin.it...
> In una frm ho messo una listbox con l'autocomposizione per trovare un
record
> nella maschera
>
> Private Sub lstDocumenti_AfterUpdate()
>     ' Trova il record corrispondente al controllo
>     Dim rs As Object
>
>     Set rs = Me.Recordset.Clone
>     rs.FindFirst "[IDDocumento] = " & Str(Me![lstDocumenti])
>     Me.Bookmark = rs.Bookmark
>
> End Sub
>
> Quindi per sincronizzare la listbox con la maschera ho inserito
sull'evento
> current
>
> Private Sub Form_Current()
>
> lstDocumenti= IDDocumento
>
> End Sub
>
> Tale codice mi permette di usare la rotellina per scorrere i record
> della frm senza perdere la sincronia tra la listbox ed i controlli della
> frm.
> Ora il problema è che se clicco sulla listbox per selezionare un record la
> medesima
>  mi funziona come se avesse la selezione multipla attivata e quindi
> dopo un paio di cliccate non si capisce più che record
> sulla listbox sia evidenziato.La cosa si risolve aggiungendo sull'evento
> current un requery della listbox ma così facendo non funziona più la
> rotellina.
>
> Suggerimenti?
>
> SunRex
Ma se la ListBox non è associata non è il metodo corretto per
evidenziare il ROW....!
Ho avuto lo stesso porbelma, con gli stessi effetti e per sincronizzare
su evento Current non ho fatto altro che CICLARE la List
e mettere a true il Selected corrispondente...:
una cosa del genere, non invertire il Selected=False con TRUE
poichè anche quello dà noie....!
In questo esempio il Legame è dato dalla Column(0)=ID che è Nascosta
e rappresenta la PrimaryKEY della Tabella.....!
        Dim intRigaCorrente as Integer
        For intRigaCorrente = 1 To Me.TuaList.ListCount
            Me.TuaList.Selected(intRigaCorrente) = False    'per
deselezionare quello precedentemente selezionato
            If Me.TuaList.Column(0, intRigaCorrente) = Me.ID Then
                .Selected(intRigaCorrente) = True
            End If
        Next
Se ci fosse un metodo migliore sarei interessato anch'io....!
Ciao.
@Alex.


text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:bu1ovb$tua$1...@lacerta.tiscalinet.it...

[CUT]
>
> Ma se la ListBox non è associata non è il metodo corretto per
> evidenziare il ROW....!
In che senso non è associata?I campi della ListBox sono IDDocumento e Nome
con IDDocumento PK.Tali campi sono gli stessi presenti nella frm.
> Ho avuto lo stesso porbelma, con gli stessi effetti e per sincronizzare
> su evento Current non ho fatto altro che CICLARE la List
> e mettere a true il Selected corrispondente...:
> una cosa del genere, non invertire il Selected=False con TRUE
> poichè anche quello dà noie....!
Scusa ma non ti seguo.A quale select ti riferisci?
> In questo esempio il Legame è dato dalla Column(0)=ID che è Nascosta
> e rappresenta la PrimaryKEY della Tabella.....!
>
>         Dim intRigaCorrente as Integer
>         For intRigaCorrente = 1 To Me.TuaList.ListCount
>             Me.TuaList.Selected(intRigaCorrente) = False    'per
> deselezionare quello precedentemente selezionato
>             If Me.TuaList.Column(0, intRigaCorrente) = Me.ID Then
>                 .Selected(intRigaCorrente) = True
>             End If
>         Next
>
> Se ci fosse un metodo migliore sarei interessato anch'io....!
A me tale routine su Access 2000 mi inchioda l'applicazione buttandomi
fuori.
Quindi non riesco a capire se funziona o meno.
Ho notato che su Access 97 tale problema (anche non usando la tua routine)
non si presenta.
Ciao e grazie
SunRex
>
> Ciao.
> @Alex.
>
>


author: Alessandro Baraldi

text:
"SunRex" <
sunrexs...@hotmail.it
> wrote in message
news:MO5Nb.110573$_
P.40...@news4.tin.it
> [CUT]
> >
> > Ma se la ListBox non è associata non è il metodo corretto per
> > evidenziare il ROW....!
>
> In che senso non è associata?I campi della ListBox sono IDDocumento e Nome
> con IDDocumento PK.Tali campi sono gli stessi presenti nella frm.
Lascia stare i campi usati nella ORIGINE RIGA, la ListBox è o no
associata ad un Campo Tabella o QRY, Proprietà ORIGINE CONTROLLO
è vuota o no...?

> Scusa ma non ti seguo.A quale select ti riferisci?
La proprietà Selected dell'oggetto listBox permette di Gestirne
l'Evidenziazioine della Riga, con A97 io usavo come
te il sistema = Valore, ma passando ad XP ho notato anch'io
problemi.
Non sapendo come risolverli ho trovato questa alternativa
sfruttando le proprietà della ListBox vedi SELECTED...!
>
> > In questo esempio il Legame è dato dalla Column(0)=ID che è Nascosta
> > e rappresenta la PrimaryKEY della Tabella.....!
> >
> >         Dim intRigaCorrente as Integer
> >         For intRigaCorrente = 1 To Me.TuaList.ListCount
> >             Me.TuaList.Selected(intRigaCorrente) = False    'per
> > deselezionare quello precedentemente selezionato
> >             If Me.TuaList.Column(0, intRigaCorrente) = Me.ID Then
> >                 .Selected(intRigaCorrente) = True
> >             End If
> >         Next
> >
> > Se ci fosse un metodo migliore sarei interessato anch'io....!
> A me tale routine su Access 2000 mi inchioda l'applicazione buttandomi
> fuori.
> Quindi non riesco a capire se funziona o meno.
Hai sostituito alla Routine i nomi dei tuoi controlli e i riferimenti
corretti relativi alla tua situazione, quello che ti ho passato
è uno stralcio di un mio codice....!!!
Devi generare una Private Sub in cui metti quel codice
personalizzandolo.
> Ciao e grazie
>
> SunRex
> >
Ciao.
@Alex.

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


text:
"Alessandro Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:343d27858f2a25e00a...@mygate.mailgate.org...
> "SunRex" <
sunrexs...@hotmail.it
> wrote in message
> news:MO5Nb.110573$_
P.40...@news4.tin.it
>
> > [CUT]
> > >
> > > Ma se la ListBox non è associata non è il metodo corretto per
> > > evidenziare il ROW....!
> >
> > In che senso non è associata?I campi della ListBox sono IDDocumento e
Nome
> > con IDDocumento PK.Tali campi sono gli stessi presenti nella frm.
>
> Lascia stare i campi usati nella ORIGINE RIGA, la ListBox è o no
> associata ad un Campo Tabella o QRY, Proprietà ORIGINE CONTROLLO
> è vuota o no...?
E' vuota.

Infatti gli ho dato una pettinata.Ma forse ho sbagliato evento.
Private Sub Form_Current()
        Dim intRigaCorrente As Integer
        For intRigaCorrente = 1 To Me.lstDocumenti.ListCount
            Me.lstDocumentiSelected(intRigaCorrente) = False
            'per deselezionare quello precedentemente selezionato
            If Me.lstDocumenti.Column(0, intRigaCorrente) = Me.IDDocumento
Then
                Me.lstDocumenti.Selected(intRigaCorrente) = True
            End If
        Next
' lstDocumenti.= IDDocumento
' lstDocumenti..Requery
End Sub



text:
"SunRex" <
sunrexs...@hotmail.it
> ha scritto nel messaggio
news:xvgNb.116161$_P.42...@news4.tin.it...
>
[CUT]
> Infatti gli ho dato una pettinata.Ma forse ho sbagliato evento.
>
> Private Sub Form_Current()
>
>
>         Dim intRigaCorrente As Integer
>         For intRigaCorrente = 1 To Me.lstDocumenti.ListCount
>             Me.lstDocumentiSelected(intRigaCorrente) = False
>             'per deselezionare quello precedentemente selezionato
>             If Me.lstDocumenti.Column(0, intRigaCorrente) = Me.IDDocumento
> Then
>                 Me.lstDocumenti.Selected(intRigaCorrente) = True
>             End If
>         Next
>
>
> ' lstDocumenti.= IDDocumento
> ' lstDocumenti..Requery
>
> End Sub
>
> > > SunRex
> > > >
L'unico dubio che mi viene è se per te la Column(0) della proprietà Origine
Controllo,
quindi della Qry o tabella o SELECT è realmente IDDocumento ???
@Alex.


text:
"ALESSANDRO Baraldi" <
ik2...@libero.it
> ha scritto nel messaggio
news:bu45re$trk$1...@lacerta.tiscalinet.it...
>
> "SunRex" <
sunrexs...@hotmail.it
> ha scritto nel messaggio
> news:xvgNb.116161$_P.42...@news4.tin.it...
> >
> [CUT]
>
[CUT]
>
> L'unico dubio che mi viene è se per te la Column(0) della proprietà
Origine
> Controllo,
> quindi della Qry o tabella o SELECT è realmente IDDocumento ???
>
> @Alex.
>
Guarda sono andato a controllare ma è proprio lui
A me il dubbio che mi è venuto è che Access 97 è molto meglio di 2000.
Ciao
SunRex


text:
"SunRex" <
sunrexs...@hotmail.it
> ha scritto nel messaggio
news:2QjNb.117543$_P.42...@news4.tin.it...
>
[CUT]
> Guarda sono andato a controllare ma č proprio lui
> A me il dubbio che mi č venuto č che Access 97 č molto meglio di 2000.
>
> Ciao
> SunRex
>
Non saprei io uso 97 al 90% e al 10% XP per lavoretti domestici, ma
piů che altro ADP con MSDE, e mi trovo molto bene....!
@Alex.


title: Passare nome scheda al subform

author: Amenwrk

text:
Ciao a tutti,
sto cercando di creare un database per l'iscrizione all'oratorio che
frequento, ho creato un form principale
collegato alla tabella angrafica, ho inserito quattro schede, nelle
schede ho inserito un subform collegato alla
tabella iscrizioni, ho il problema che quando clicco sulla scheda
nella tabella iscrizione devo memorizzare il numero o nome della
scheda.
Grazie


title: Passare nome scheda al subform

author: almorel

text:

Ciao, se ho capito bene il tuo problema, metti come valore
predefinito  Parent!TuoCampoForm  nella casella di testo
TuoCampoSuForm.
Parent indica il form "padre" del sub form.
Alberto


title: problema di sicurezza

author: Stefano

text:
Nell'azienda in cui sto lavorando hanno un gestionale sviluppato in access
Il problema che si presenta ora è questo:
Il BE è installato nel server mentre nella macchina in cui sto lavorando c'è
il FE, oggi ho provato a collegare il mio portatile in rete ma quando copio
il FE nel portatile questo all'avvio mi chiede nome utente e pss, io gli
immetto ma mi dice " L'account utente corrente non dispone delle
autorizzazioni per convertire o abilitare il database".
Dimenticavo..... il db e stato sviluppato in ACCESS 2.00 nel mio portatile
c'è ACCESS 97
ho provato a creare lo stesso utente con la stessa pss che ho nell'altro pc
ma nulla da fare
dove devo intervenire visto che id e la pss sul pc da cui ho copiato il file
funzionano perfettamente
saluti bix


title: problema di sicurezza

author: Antonio Biso

text:
Stefano <
stefa...@sicurtre.it
> wrote in message
912a23$2hg$1...@lacerta.tiscalinet.it...

Guarda che la conversione automatica da access 2 al 97, quasi sempre non
riesce completamente e quindi il tuo applicativo non funzionerà!
Sarà il caso che ti procuri una copia di access 2 e utilizzi quella per
aprire il database.
Antonio


title: access 2000 "impossibile bloccare il file" - ok in access 2003

text:
Salve
ho realizzato un applicativo in access 2003 che legge e scrive su
delle
tabelle collegate residenti in 3 db protetti da password. Il db deve
essere
utilizzato da più utenti ed è settato per operare in modalità
condivisa e con
blocco a livello record
Il problema risiede nel fatto che mentre dal computer con access 2003
funziona tutto correttamente, dai terminali con access 2000 non si
riesce ad
aprire il db in questione in quanto restituisce la segnalazione
d'errore "impossibile bloccare
il file".


author: Roberto da Parma

text:
<
ice_lo...@yahoo.it
> ha scritto nel messaggio
news:1194430497.4...@57g2000hsv.googlegroups.com...

Il formato delle tabelle è in AC2000?
Setta il Blocco record predefinito a "Nessun blocco"
Prova così...
Ciao
--
Roberto da Parma


title: Avviare il programma associato di default

author: napo

text:
Ciao,
in una maschera ho inserito un campo Immagine non associato.
L'immagine (un JPG) viene caricata in tempo reale dal disco, modificando
image.Picture="nomefile".
Quello che voglio ora è fare in modo che, facendo doppio click
sull'immagine, si apra il programma di grafica associato ai file JPG.
Dal prompt dei comandi di Windows è sufficiente fare "start nomefile.jpg" e
il programma parte.
Ma in VBA se lancio lo stesso comando dalla funzione Shell(..., ...) mi dà
un errore di file non trovato. E infatti "start" è un comando di sistema e
non esiste come file.
Al momento ho risolto esplicitando il percorso completo del programma che
poi richiamo con Shell().
Però il database gira su una LAN e utenti diversi possono avere programmi
diversi installati, quindi la mia soluzione non funzionerebbe.
Come faccio ad aprire un file JPG usando il programma associato di default?
Ciao
Marco


author: fidirico (lavoro)

text:
"napo" <na...@NOPRIVATEMESSAGE.com> ha scritto nel messaggio
news:e0tpmq$dmb$1...@news.tiscali.fr...

Puoi usare l'API ShellExecute. Qui trovi un esempio:
http://www.mvps.org/access/api/api0018.htm
--
Ciao
Galliano.


text:
> Puoi usare l'API ShellExecute. Qui trovi un esempio:
>
http://www.mvps.org/access/api/api0018.htm
Purtroppo su sitocomune e donkarl non avevo trovato nulla.
Ora mi guardo l'API.
Ciao
Marco


text:
"napo" <na...@NOPRIVATEMESSAGE.com> ha scritto nel messaggio
news:e0tqpe$en7$1...@news.tiscali.fr...
> > Puoi usare l'API ShellExecute. Qui trovi un esempio:
> >
http://www.mvps.org/access/api/api0018.htm
>
> Purtroppo su sitocomune e donkarl non avevo trovato nulla.
Forse perché non hai cercato bene.
Non so sul Sito di Karl, ma nel Sito Comune trovi ciò che ti serve nella
Sezione General, nella mia FAQ intitolata "6.183 Aprire un qualsiasi file
(di formato txt, pdf, tif ecc.) direttamente da un db access (2)".
> Ora mi guardo l'API.
>
> Ciao
> Marco
--
Roberto
-----------------------------------------------
il Sito Comune di it.comp.appl.access
http://www.sitocomune.com
-----------------------------------------------


text:
> Forse perché non hai cercato bene.
> Non so sul Sito di Karl, ma nel Sito Comune trovi ciò che ti serve nella
> Sezione General, nella mia FAQ intitolata "6.183 Aprire un qualsiasi file
> (di formato txt, pdf, tif ecc.) direttamente da un db access (2)".
A dire il vero avevo guardato solo nella sezione Modules.
Ciao
Marco


text:
"napo" <na...@NOPRIVATEMESSAGE.com> ha scritto nel messaggio
news:e0tuhm$hme$1...@news.tiscali.fr...

Si, in effetti molte FAQ potrebbero trovarsi indifferentemente in una di
quelle due Sezioni.



text:
Se ti basta il Click singolo puoi fare così:
         Me.ControlloImmagine.HyperlinkAddress = Me.Path_Foto
In questo modo con il Click sull'immagine si apre di default il
programma
associato.
Se invece devi controllare la cosa:
La cosa più immediata(che mi viene in mente) è recuperare tramite le
API il file EXE associato all'estensione, cosa estremamente semplice
con la chiamata FindExecutable, quindi comporre la stringa da passare
alla chiamata con Shell.
Sono 10 righe di codice in tutto, la funzione FindExecutable la trovi
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/shellcc/platform/shell/reference/functions/findexecutable.asp
Ciao
@Alex


text:
>Sono 10 righe di codice in tutto, la funzione FindExecutable la trovi
>
http://msdn.microsoft.com/library/default.asp?url=/library/en-
>us/shellcc/platform/shell/reference/functions/findexecutable.asp
Sembrerebbe fare al caso mio, però come la dichiaro e come la uso?
Ciao
Marco


text:
> Sembrerebbe fare al caso mio, perň come la dichiaro e come la uso?
Io l'ho dichiarata cosě all'inizio del modulo:
Private Declare Function apiFindExecutable Lib "shell32.dll" _
    Alias "FindExecutableA" _
    (ByRef lpFile As String, _
    ByRef lpDirectory As String, _
    ByRef lpResult As String) _
    As Long
Ho messo FindExecutableA anzichč FindExecutable altrimenti mi dava errore.
Per usarla faccio cosě:
    Dim prgPath As String
    Dim res As Long
    res = apiFindExecutable(getPath() & "test.jpg", getPath(), prgPath)
    MsgBox res & " - " & prgPath
Ma il risultato č: "2 - ". prgPath č una stringa vuota.
La funzione getPath() restituisce un percorso del tipo C:\dir1\dir2\...\.
Ed il file test.jpg esiste davvero in quella cartella.
Ciao
Marco


text:
> Sembrerebbe fare al caso mio, però come la dichiaro e come la uso?
Ho risolto!
Ciao
Marco


title: copia BE alla chiusura del FE

author: ^luigi^

text:
vorrei fare una copia di sicurezza del DB BE essistente su un pc remoto
ogni volta che chiudo il FE , è possibile?
in termini pratici?  .....:-))
l.
--
questo articolo e` stato inviato via web dal servizio gratuito
http://www.newsland.it/news
 segnala gli abusi ad
ab...@newsland.it


title: copia BE alla chiusura del FE

author: miciomao

text:
Io uso un file batch che lancio alla chiusura del FE
con:
Call Shell("\\pippo\pluto\backup.bat", vbHide)
DoCmd.Quit
contenente una cosa tipo:
cls
echo
COPY \\pippo\pluto\MDB_BE.mdb \\minny\paperoga\Backup\MDB_BE.bak
cls
exit
Ciao
Alex


title: copia BE alla chiusura del FE

text:
miciomao ha scritto:
> Io uso un file batch che lancio alla chiusura del FE
> con:
> Call Shell("pippoplutobackup.bat", vbHide)
> DoCmd.Quit
> contenente una cosa tipo:
> cls
> echo
> COPY pippoplutoMDB_BE.mdb minnypaperogaBackupMDB_BE.bak
> cls
> exit
> Ciao
> Alex
esempio pratico?
file batch!   ????
un evento su chiusura?



title: copia BE alla chiusura del FE

author: sv

text:
^luigi^ ha scritto:
> vorrei fare una copia di sicurezza del DB BE essistente su un pc remoto
> ogni volta che chiudo il FE , è possibile?
> in termini pratici?  .....:-))
> l.
Nel SitoComune, sezione General:
6.29 Compattare tutti i BackEnd di un FrontEnd e farne una copia di backup
--
sv



title: copia BE alla chiusura del FE

text:
sv ha scritto:
> ^luigi^ ha scritto:
> > vorrei fare una copia di sicurezza del DB BE essistente su un pc remoto
> > ogni volta che chiudo il FE , è possibile?
> > in termini pratici?  .....:-))
> > l.
> Nel SitoComune, sezione General:
> 6.29 Compattare tutti i BackEnd di un FrontEnd e farne una copia di backup
> --
> sv
l'ho provata, ma mi da un errore sulla riga:
Private Declare Function IsNetworkAlive Lib "Sensapi" (lpdwFlags As Long)
As Long
che mi dice: dopo end sub, end function o end property sono ammessi solo
commenti.



title: copia BE alla chiusura del FE

text:
^luigi^ ha scritto:
> sv ha scritto:
> > ^luigi^ ha scritto:
> > > vorrei fare una copia di sicurezza del DB BE essistente su un pc remoto
> > > ogni volta che chiudo il FE , è possibile?
> > > in termini pratici?  .....:-))
> > > l.
> > Nel SitoComune, sezione General:
> > 6.29 Compattare tutti i BackEnd di un FrontEnd e farne una copia di backup
> > --
> > sv
> l'ho provata, ma mi da un errore sulla riga:
> Private Declare Function IsNetworkAlive Lib "Sensapi" (lpdwFlags As Long)
> As Long
> che mi dice: dopo end sub, end function o end property sono ammessi solo
> commenti.
La FAQ che ti ho suggerito non riporta questo codice.
L'API che hai citato serve per testare se un sistema è connesso ad una
rete e di che rete si tratti.
--
sv



title: copia BE alla chiusura del FE

text:
sv ha scritto:
> ^luigi^ ha scritto:
> > sv ha scritto:
> > > ^luigi^ ha scritto:
> > > > vorrei fare una copia di sicurezza del DB BE essistente su un pc remoto
> > > > ogni volta che chiudo il FE , è possibile?
> > > > in termini pratici?  .....:-))
> > > > l.
> > > Nel SitoComune, sezione General:
> > > 6.29 Compattare tutti i BackEnd di un FrontEnd e farne una copia di
backup
> > > --
> > > sv
> > l'ho provata, ma mi da un errore sulla riga:
> > Private Declare Function IsNetworkAlive Lib "Sensapi" (lpdwFlags As Long)
> > As Long
> > che mi dice: dopo end sub, end function o end property sono ammessi solo
> > commenti.
> La FAQ che ti ho suggerito non riporta questo codice.
> L'API che hai citato serve per testare se un sistema è connesso ad una
> rete e di che rete si tratti.
> --
> sv
scusa la mia figura di cacca che ho fatto, ma ho riportato l'errore di un
altro codice senza accorgemene.
in effetti io sull'evento chiusura della form ho piazzato il codice da te
citato, togliendo la riga per access97, quando apro la form tutto ok.
quando la chiudo mi da l'errore sulla prima riga
"errore di compilazione- prevista end sub"
il codice risultante è questo:
Private Sub Form_Close()
Sub CompattaBE()
   'Autore: Riccardo Pozzi e Federico Luciani
On Error GoTo gestErr
   Dim backend As String
   Dim strSQL As String
   Dim rs As DAO.Recordset
   Dim risp As Integer
   Dim copia As String
   Dim msg As String
   strSQL = "SELECT Trim([Database]) AS DB " & _
            "FROM MSysObjects " & _
            "GROUP BY Trim([Database]), MSysObjects.Type " & _
            "HAVING (((MSysObjects.Type)=6));"
   Set rs = CurrentDb.OpenRecordset(strSQL)
   If rs.EOF And rs.BOF Then GoTo esci
   risp = MsgBox("Procedere con salvataggio e compattazione?", _
      vbQuestion + vbYesNo)
   If risp <> vbYes Then Exit Sub
   DoCmd.Hourglass True
   DoCmd.SetWarnings False
   rs.MoveFirst
   msg = ""
   Do
       backend = rs![DB]
       msg = backend & vbCrLf & msg
       '*****************************
       ' La riga di codice che segue va usata solo con Access 97
       'DBEngine.RepairDatabase backend
       '*****************************
       DBEngine.CompactDatabase backend, backend & ".new"
       copia = Dir(backend & ".bak")
       If copia <> "" Then Kill backend & ".bak"
       Name backend As backend & ".bak"
       Name backend & ".new" As backend
       rs.MoveNext
   Loop Until rs.EOF
   MsgBox "Compattazione terminata per i seguenti DB:" & _
      vbCrLf & msg, vbExclamation
esci:
   rs.Close
   DoCmd.SetWarnings True
   DoCmd.Hourglass False
   Exit Sub
gestErr:
   MsgBox Err.Number & " - " & Err.Description
   GoTo esci
End Sub
End Sub
naturalmente capisco che è la mia ignoranza il problema. :-))
l.



title: copia BE alla chiusura del FE

author: Carlo Costarella

text:
"^luigi^" <
onofrio...@in.it
> ha scritto
Private Sub Form_Close()
CompattaBE
End Sub
Private Sub CompattaBE() 'meglio in un modulo pubblico
'Public Sub CompattaBE()

Ciao, Carlo


title: copia BE alla chiusura del FE

text:
^luigi^ ha scritto:
> sv ha scritto:
> > ^luigi^ ha scritto:
> > > sv ha scritto:
> > > > ^luigi^ ha scritto:

> > > > Nel SitoComune, sezione General:

> > > > --
> > > > sv



> > --
> > sv



Carlo ti ha già evidenziato l'errore.
--
sv



title: copia BE alla chiusura del FE

text:
Carlo Costarella ha scritto:
> "^luigi^" <
onofrio...@in.it
> ha scritto


> Ciao, Carlo
ti ringrazio della pazienza, ma ancora da errore
"errore di compilazione - Tipo definito dall'utente non definito"
evidenziandomi il rigo:
Dim rs As DAO.Recordset
e siccome io non ci capisco, chiedo aiuto!



title: copia BE alla chiusura del FE

author: Karl Donaubauer

text:
^luigi^ wrote:
> ...
> ti ringrazio della pazienza, ma ancora da errore
> "errore di compilazione - Tipo definito dall'utente non definito"
> evidenziandomi il rigo:
> Dim rs As DAO.Recordset
Dim DB As Database produce un errore
www.donkarl.com/it?FAQ7.11
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: copia BE alla chiusura del FE

text:
Karl Donaubauer ha scritto:
> ^luigi^ wrote:
> > ...
> > ti ringrazio della pazienza, ma ancora da errore
> > "errore di compilazione - Tipo definito dall'utente non definito"
> > evidenziandomi il rigo:
> > Dim rs As DAO.Recordset
> Dim DB As Database produce un errore
>
www.donkarl.com/it?FAQ7.11
ho letto! ho aggiunto il riferimento al DAO3.6 ma adesso, dopo la
richiesta di conferma "procedere con salvataggio e compattazione?" mi da
errore
"3356 - database già aperto in modo esclusivo dall'utente admin sulla
macchina "luigi" , ritentare l'operazione quando il database è disponibile"
eppure non ho aperto il Db in modalità esclusiva!



title: copia BE alla chiusura del FE

text:
^luigi^ wrote:
> Karl Donaubauer ha scritto:
>>> ...
>>> ti ringrazio della pazienza, ma ancora da errore
>>> "errore di compilazione - Tipo definito dall'utente non definito"
>>> evidenziandomi il rigo:
>>> Dim rs As DAO.Recordset
>
>> Dim DB As Database produce un errore
>>
www.donkarl.com/it?FAQ7.11
>
> ho letto! ho aggiunto il riferimento al DAO3.6 ma adesso, dopo la
> richiesta di conferma "procedere con salvataggio e compattazione?" mi
> da errore
> "3356 - database già aperto in modo esclusivo dall'utente admin sulla
> macchina "luigi" , ritentare l'operazione quando il database è
> disponibile" eppure non ho aperto il Db in modalità esclusiva!
Devi forzare questo "luigi" chi blocca il BE di andare per un café.
Nel frattempo riprova. ;-)
Se non aiuta, leggi cosa scrivo all'inizio della parte "Soluzione"
nell'articolo
www.donkarl.com/it?FAQ6.7
.



title: Zoom all'apertura di un Report

author: Riccardo

text:
Buongiorno a tutti,
vorrei sapere se è possibile all'apertura di un report impostare lo zoom al
150%.
Ho provato con docmd.RunCommand acCmdZoom150 ma mi viene restituito il
seguente errore:
Errore di run-time 2046:
Comando o azione Zoom150% non disponibile.
grazie
Riccardo


title: Zoom all'apertura di un Report

text:
Riccardo wrote:
> vorrei sapere se è possibile all'apertura di un report impostare lo zoom
> al 150%.
>
> Ho provato con docmd.RunCommand acCmdZoom150 ma mi viene restituito il
> seguente errore:
> Errore di run-time 2046:
> Comando o azione Zoom150% non disponibile.
È chiaro perché questa constante non esiste.
Puoi usare il metodo ZoomControl. Vedi:
Aprire un report con un fattore di zoom
www.donkarl.com/it?FAQ5.4
--
HTH
Karl
*********
Access FAQ:
www.donkarl.com/it


title: Zoom all'apertura di un Report

text:
"Riccardo" <
ricc...@free.panservice.it
> ha scritto nel messaggio
news:gd7080$un6$1...@news.panservice.it...
> Buongiorno a tutti,
>
> vorrei sapere se č possibile all'apertura di un report impostare lo zoom
> al 150%.
>
> Ho provato con docmd.RunCommand acCmdZoom150 ma mi viene restituito il
> seguente errore:
> Errore di run-time 2046:
> Comando o azione Zoom150% non disponibile.
>
> grazie
>
> Riccardo
La butto lě al volo:
Una macro impostata a "Esegui comando" con zoom a 150 (sono in fondo alla
lista)
poi DoCmd.RunMacro "tua macro"
C'č anche la possibilitŕ
DoCmd.Maximize ma non credo si pčossa settare lo zoom
Ciao
Mr.Quid


title: Zoom all'apertura di un Report

text:
"Karl Donaubauer" <
NoS...@donkarl.com
> ha scritto nel messaggio
news:6lof6pF...@mid.individual.net...

grazie, provero' così.
ma su report che vengono aperti direttamente dalla barra dei menu' quindi
non è possibile aumentare lo zoom?
è possibile solo se vengono aperti da un form?
ciao e grazie
Riccardo


title: Zoom all'apertura di un Report

text:
Riccardo wrote:
> "Karl Donaubauer ha scritto:
>>> vorrei sapere se è possibile all'apertura di un report impostare
>>>  lo zoom al 150%.
>>>
>>> Ho provato con docmd.RunCommand acCmdZoom150 ma mi viene restituito il
>>> seguente errore:
>>> Errore di run-time 2046:
>>> Comando o azione Zoom150% non disponibile.
>>
>> È chiaro perché questa constante non esiste.
*oops* certo che esiste per 150.
Ma non ti aiuta perché ne questi RunCommand ne ZoomControl
funzionano nel codice del report stesso.
>> Puoi usare il metodo ZoomControl. Vedi:
>>
>> Aprire un report con un fattore di zoom
>>
www.donkarl.com/it?FAQ5.4
> ...
> grazie, provero' così.
>
> ma su report che vengono aperti direttamente dalla barra dei menu' quindi
> non è possibile aumentare lo zoom?
> è possibile solo se vengono aperti da un form?
Come apri un report "direttamente dalla barra dei menu' "?
Se intendi aprire dalla finestra di database, non conosco un
metodo per impostare lo Zoom.
--
cu



title: casella combinata

author: Massimo Manfredelli

text:
Ciao,
ho un casella combinata ed ha seconda del valore selezionato vorrei far
aprire una maschera diversa.
Come posso fare?


title: casella combinata

author: Alessandro

text:
"Massimo Manfredelli" <
mmanfr...@libero.it
> wrote in message
news:a3o3vg$fcn$1...@fe1.cs.interbusiness.it...

Su evento After_Update
Dim SelItem as Integer
Dim StrFrmName as string
strFrmName=Vbnullstring
Select case SelItem
    Case 1
        strFrmName="Form1"
    Case 2
        strFrmName="Form2"
    ecc............
End select
If strFrmName<>Vbnullstring
   Docmd.OpenForm strFrmName
End if
Alessandro.
--
Posted via Mailgate.ORG Server -
http://www.Mailgate.ORG


title: casella combinata


title: textbox di dimensioni variabii in Form o Report

author: Gaetano Di Zanni

text:
Ciao a tutti!
Ho bisogno di aiuto.
Nel sito comune ho visto come far assumere dimensioni variabili ad una
casella non associata sull'evento formattazione del corpo di un report.
Vi chiedo: e' possibile la stessa cosa in una maschera continua, magari
facendo assumere una posizione orizzontale della stessa casella piu' a sx o
a dx a seconda del valore di una casella di testo che contiene un valore
numerico.
Grazie!
Buona Pasqua.


author: Roberto da casa

text:
"Gaetano Di Zanni" <
gaetano...@tiscali.it
> ha scritto nel messaggio
news:c4rubk$6u4$1...@lacerta.tiscalinet.it...

Se la maschera ha una visualizzazione a Maschere continue penso proprio di
no, ma se avessa una visualizzazione a Maschera singola penso proprio di si.
> Grazie!
> Buona Pasqua.
Buona Pasqua a te.
--
Roberto
---------------------------------------------
il Sito Comune di it.comp.appl.access:
http://www.sitocomune.com
---------------------------------------------


text:
Grazie Roberto.
"Roberto da casa" <
r.ma...@libero.it
> ha scritto nel messaggio
news:_Dxcc.113514$FJ6.4...@twister1.libero.it...



title: Pulsanti di navigazione tra record

author: Sigi

text:
Domanda da niubbone...
Vorrei inserire in una maschera dei pulsanti di navigazione nei record che
abbiano la stessa funzione di quelli che si trovano in fondo alla maschera.
Quindi mi servirebbero i pulsanti "vai al primo record" "indietro di 1"
"avanti di 1" "vai all'ultimo record" "crea nuovo record"
Che comandi devo dare a questi pulsanti perchč facciano ciň?
Grazie e buon anno :)
--
SigiTM
Togli 'NOSPAMMM' per rispondermi.
Visita il sito dei Metal Detector:
http://listen.to/metaldetector


title: Pulsanti di navigazione tra record

text:
"Sigi" <
sigimail...@tiscali.it
> ha scritto nel messaggio
news:CAjtf.10435$av6....@tornado.fastwebnet.it...
>
> Domanda da niubbone...
>
> Vorrei inserire in una maschera dei pulsanti di navigazione nei record che
> abbiano la stessa funzione di quelli che si trovano in fondo alla
> maschera.
> Quindi mi servirebbero i pulsanti "vai al primo record" "indietro di 1"
> "avanti di 1" "vai all'ultimo record" "crea nuovo record"
>
> Che comandi devo dare a questi pulsanti perchč facciano ciň?
>
>
> Grazie e buon anno :)
>
>
> --
> SigiTM
1 dietro: DoCmd.GoToRecord , , acPrevious
1 avanti: DoCmd.GoToRecord , , acNext
Primo: DoCmd.GoToRecord , , acFirst
Ultimo: DoCmd.GoToRecord , , acLast
Nuovo: DoCmd.GoToRecord , , acNewRec
Le icone le trovi tra quelle standard dei pulsanti.
Ciao, Carlo


title: Pulsanti di navigazione tra record

author: cidi

text:
"Sigi" <
sigimail...@tiscali.it
> ha scritto nel messaggio
news:CAjtf.10435$av6....@tornado.fastwebnet.it...
> Domanda da niubbone...
>
> Vorrei inserire in una maschera dei pulsanti di navigazione nei record che
> abbiano la stessa funzione di quelli che si trovano in fondo alla
> maschera.
> Quindi mi servirebbero i pulsanti "vai al primo record" "indietro di 1"
> "avanti di 1" "vai all'ultimo record" "crea nuovo record"
>
> Che comandi devo dare a questi pulsanti perchč facciano ciň?
prova con l'autocomposizione pulsante
> Grazie e buon anno :)
Buon Anno anche a te
>
> --
> SigiTM
> Togli 'NOSPAMMM' per rispondermi.
> Visita il sito dei Metal Detector:
http://listen.to/metaldetector
Daniele